[TAMBIK]

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