//34=RequestSocialAction:d(Action:Get.Func09) #$34: begin - вот эти цифры менять case ReadD(2) of 5: Status:=false;--no вырубить, 6: Status:=true;--yes врубить end; end;