{$CLEO .cs}
0000: NOP
//-------------MAIN---------------
wait 1900  
0B34: samp register_client_command "bpost_on" to_label @bposton
0B34: samp register_client_command "bpost_off" to_label @bpostoff  
0AF8: samp add_message_to_chat "{0066FF}[Post Bot]:{FF6600} Автор скрипта - Dimka_Kolomiec"  
alloc 16@ 120  
alloc 17@ 120  
alloc 18@ 120
alloc 19@ 120  

:bpost
wait 0  
if  
   22@ == 1  
jf @bpost_266
0AF4: 16@ = read_string_from_ini_file "CLEO\INI\Bot-Post.ini" section "Bot-Post" key "TEG"  
0AF4: 17@ = read_string_from_ini_file "CLEO\INI\Bot-Post.ini" section "Bot-Post" key "Family"  
0AF4: 18@ = read_string_from_ini_file "CLEO\INI\Bot-Post.ini" section "Bot-Post" key "Post"  
0AF4: 19@ = read_string_from_ini_file "CLEO\INI\Bot-Post.ini" section "Bot-Post" key "Sostoyanie"  
say "/r [%s] Докладывает: %s. Пост: %s. Состояние: %s" 16@ 17@ 18@ 19@  
wait 1300  
say "/time"  
wait 1300  
call @bpost_282 2 119 1000
wait 300000  

:bpost_266
goto @bpost  

:bposton
22@ = 1  
SAMP.CmdRet

:bpostoff
22@ = 0  
SAMP.CmdRet

:bpost_282
if  
0AA2: 2@ = load_library "User32.dll" // IF and SET  
jf @bpost_385  
if  
0AA4: 2@ = get_proc_address "keybd_event" library 2@ // IF and SET  
jf @bpost_385  
0AA5: call 2@ num_params 4 pop 0 0 0 0 0@   
wait 1@  
0AA5: call 2@ num_params 4 pop 0 0 2 0 0@   

:bpost_385
ret 0