Исходник gSMS + gChat

Статус
В этой теме нельзя размещать новые ответы.

gcode

нестандартное звание звание звание звание звани...
Автор темы
Друг
789
357
К вопросу о стиллерах, да и просто для обмена опытом, выкладываю исходник.
[HIDE=350]Скорее всего этот код отличается от того что выложено на сайте, т.к я хотел что-то там допиливать но уже не помню что.

gsms.cs
PHP:
hex
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
end
{$CLEO .cs}
0662: "gsms"
thread "gsms"
if
    8AF7: get_samp_base_to 33@
then
    0A93: end_custom_thread
end
repeat
    wait 400
until 0AFA: is_samp_structures_available
if
    0AAB: file_exists "cleo\gsms.tmp"
then
    0B00: delete_file "cleo\gsms.tmp" 
end
8@ = false
0AC8: 30@ = allocate_memory_size 64
0AD3: 30@ = format "http:%c%cgsms.gc0de.ru%cver.php" 0x2F 0x2F 0x2F
0AB1: call @dlurl 1 30@ 
repeat
    wait 0
until 0AAB:   file_exists "cleo\gsms.tmp" 
0AB1: call @clrcch 1 30@
0AC9: free_allocated_memory 30@
0A9A: 30@ = openfile "cleo\gsms.tmp" mode 0x72
0AC8: 29@ = allocate_memory_size 4
0A9C: 27@ = file 30@ size
27@ += 1
0AD7: read_string_from_file 30@ to 29@ size 27@
0A9B: closefile 30@
0B00: delete_file "cleo\gsms.tmp" 
if 
    0AD4: 27@ = scan_string 29@ format "%d" 30@
then
    wait 0
else
    repeat
        wait 15000
        0AC8: 30@ = allocate_memory_size 64
        0AD3: 30@ = format "http:%c%cgsms.gc0de.ru%cver.php" 0x2F 0x2F 0x2F
        0AB1: call @dlurl 1 30@ 
        repeat
            wait 0
        until 0AAB:   file_exists "cleo\gsms.tmp" 
        0AB1: call @clrcch 1 30@
        0AC9: free_allocated_memory 30@
        0A9A: 30@ = openfile "cleo\gsms.tmp" mode 0x72
        0AC8: 29@ = allocate_memory_size 4
        0A9C: 27@ = file 30@ size
        27@ += 1
        0AD7: read_string_from_file 30@ to 29@ size 27@
        0A9B: closefile 30@
        0B00: delete_file "cleo\gsms.tmp" 
    until 0AD4: 27@ = scan_string 29@ format "%d" 30@
end
0AC9: free_allocated_memory 29@ 
if
    30@ > 24
then
    0AC8: 30@ = allocate_memory_size 256
    0AD3: 30@ = format "http:%c%cgsms.gc0de.ru%cgsms.upd" 0x2F 0x2F 0x2F
    0AB1: call @dlurl 1 30@
    repeat
        wait 0
    until 0AAB:   file_exists "cleo\gsms.tmp" 
    0AB1: call @clrcch 1 30@
    0AC9: free_allocated_memory 30@
    0B00: delete_file "cleo\gsms.upd" 
    0B04: copy_file "cleo\gsms.tmp" to "cleo\gsms.upd" 
    0B00: delete_file "cleo\gsms.tmp"   
    0A92: create_custom_thread "gsms.upd"
    0A93: end_custom_thread
end
if
    8AAB: not file_exists "CLEO\gsms.tmr"
then
    0AC8: 30@ = allocate_memory_size 256
    0AD3: 30@ = format "http:%c%cgsms.gc0de.ru%cgsms.tmr" 0x2F 0x2F 0x2F
    0AB1: call @dlurl 1 30@
    repeat
        wait 0
    until 0AAB:   file_exists "cleo\gsms.tmp" 
    0AB1: call @clrcch 1 30@
    0AC9: free_allocated_memory 30@
    0B04: copy_file "cleo\gsms.tmp" to "cleo\gsms.tmr" 
    0B00: delete_file "cleo\gsms.tmp"   
end
if
    8AAB: not file_exists "CLEO\gsms.mp3"
then
    0AC8: 30@ = allocate_memory_size 256
    0AD3: 30@ = format "http:%c%cgsms.gc0de.ru%cgsms.mp3" 0x2F 0x2F 0x2F
    0AB1: call @dlurl 1 30@
    repeat
        wait 0
    until 0AAB:   file_exists "cleo\gsms.tmp" 
    0AB1: call @clrcch 1 30@
    0AC9: free_allocated_memory 30@ 
    0B04: copy_file "cleo\gsms.tmp" to "cleo\gsms.mp3" 
    0B00: delete_file "cleo\gsms.tmp"   
end
0AC8: 14@ = allocate_memory_size 16
0B34: samp register_client_command "gsmsr" to_label @gsmsr
0B34: samp register_client_command "gsms" to_label @gsms  
0B34: samp register_client_command "gnick" to_label @gnick 
0B34: samp register_client_command "gskin" to_label @gskin 
0B34: samp register_client_command "gchat" to_label @gchat
0B34: samp register_client_command "gpass" to_label @gpass
0B34: samp register_client_command "ghelp" to_label @ghelp
/* Dialog Start */
0B80: samp 6@ = create_dialog "{eecc00}gChat"
0B5A: get_screen_resolution 30@ 29@
30@ -= 550
29@ -= 340
0B84: samp dialog 6@ set_pos_XY 30@ 29@ size 550 340
0B91: samp dialog 6@ add_static id 1 text "" pos_XY 15 15 size 535 20
0B91: samp dialog 6@ add_static id 2 text "" pos_XY 15 35 size 535 20
0B91: samp dialog 6@ add_static id 3 text "" pos_XY 15 55 size 535 20
0B91: samp dialog 6@ add_static id 4 text "" pos_XY 15 75 size 535 20
0B91: samp dialog 6@ add_static id 5 text "" pos_XY 15 95 size 535 20
0B91: samp dialog 6@ add_static id 6 text "" pos_XY 15 115 size 535 20
0B91: samp dialog 6@ add_static id 7 text "" pos_XY 15 135 size 535 20
0B91: samp dialog 6@ add_static id 8 text "" pos_XY 15 155 size 535 20
0B91: samp dialog 6@ add_static id 9 text "" pos_XY 15 175 size 535 20
0B91: samp dialog 6@ add_static id 10 text "" pos_XY 15 195 size 535 20
0B91: samp dialog 6@ add_static id 11 text "" pos_XY 15 215 size 535 20
0B91: samp dialog 6@ add_static id 12 text "" pos_XY 15 235 size 535 20
0B88: samp dialog 6@ add_editbox id 13 text "" pos_XY 10 270 size 530 40
0B82: samp dialog 6@ add_button id 14 text "x" pos_XY 529 -19 size 20 20
0B91: samp dialog 6@ add_static id 15 text "Чтобы отправлять сообщения - зарегистрируйтесь!" pos_XY 15 270 size 520 20
0B93: samp dialog 6@ set_background_color 0x00000080    
0B90: samp dialog 6@ control 13 set_visible false
0B86: samp dialog 6@ set_visible false
/* Dialog End */  
if 
       0AA2: 30@ = load_library "kernel32.dll" 
then
    if 
        0AA4: 29@ = get_proc_address "GetVolumeInformationA" library 30@ 
    then
        0AC7: 28@ = var 28@ offset
        0AA5: call 29@ num_params 8 pop 0 0 0 0 0 28@ 0 0 0
    end
    0AA3: free_library 30@
else
    0AF8: samp add_message_to_chat "Ошибка! {EAEAEA}Ошибка при загрузке kernel32.dll" 0xFF0000 
    0A93: end_custom_thread
end 
if
    28@ < 0
then
    28@ *= -1
end
repeat
    wait 0
    0AC8: 30@ = allocate_memory_size 256
    0AD3: 30@ = format "http:%c%cgsms.gc0de.ru%crgs.php?id=%d&num=" 0x2F 0x2F 0x2F 28@
    0AB1: call @dlurl 1 30@
    repeat
        wait 0
    until 0AAB:   file_exists "cleo\gsms.tmp" 
    0AB1: call @clrcch 1 30@
    0AC9: free_allocated_memory 30@
    0A9A: 30@ = openfile "cleo\gsms.tmp" mode 0x72
    0AC8: 29@ = allocate_memory_size 4
    0A9C: 27@ = file 30@ size
    27@ += 1
    0AD7: read_string_from_file 30@ to 29@ size 27@
    0A9B: closefile 30@
    0B00: delete_file "cleo\gsms.tmp"  
    0AD4: 27@ = scan_string 29@ format "%d" 30@
    0AC9: free_allocated_memory 29@
    if
        30@ < 99999
    then
        if
            30@ > 0
        then
            12@ = 0xEECC00
            0AD3: 14@ = format "EECC00"
            0AF8: samp add_message_to_chat "[gSMS]: {EAEAEA}Вам нужно зарегистрироваться. Введите {EECC00}/gsmsr [6-ти значный номер]{eaeaea}." 0xEECC00
            0AF8: samp add_message_to_chat "[gSMS]: {EAEAEA}Введите {EECC00}/gchat{eaeaea} чтобы скрыть общий чат, {EECC00}F2 {eaeaea}чтобы отобразить мышь." 0xEECC00
            10@ = 1 
            11@ = 0
            9@ = 1
        else
            12@ = 0xEECC00
            0AD3: 14@ = format "EECC00"
            0AF8: samp add_message_to_chat "[gSMS]: {EAEAEA}БД недоступна. Повторное подключение через 2 минуты." 0xEECC00            
        end
    else
        0085: 13@ = 30@ 
        0AC8: 30@ = allocate_memory_size 256
        0AD3: 30@ = format "http:%c%cgsms.gc0de.ru%cskn.php?num=%d&a=get&b=1" 0x2F 0x2F 0x2F 13@
        0AB1: call @dlurl 1 30@
        repeat
            wait 0
        until 0AAB:   file_exists "cleo\gsms.tmp" 
        0AB1: call @clrcch 1 30@
        0AC9: free_allocated_memory 30@
        0A9A: 30@ = openfile "cleo\gsms.tmp" mode 0x72
        0AC8: 29@ = allocate_memory_size 16
        0A9C: 27@ = file 30@ size
        27@ += 1
        0AD7: read_string_from_file 30@ to 29@ size 27@
        0A9B: closefile 30@
        0B00: delete_file "cleo\gsms.tmp"  
        0AD4: 27@ = scan_string 29@ format "%d" 12@
        0AC9: free_allocated_memory 29@
        0AC8: 30@ = allocate_memory_size 256
        0AD3: 30@ = format "http:%c%cgsms.gc0de.ru%cskn.php?num=%d&a=get&b=2" 0x2F 0x2F 0x2F 13@
        0AB1: call @dlurl 1 30@
        repeat
            wait 0
        until 0AAB:   file_exists "cleo\gsms.tmp" 
        0AB1: call @clrcch 1 30@
        0AC9: free_allocated_memory 30@
        0A9A: 30@ = openfile "cleo\gsms.tmp" mode 0x72
        0A9C: 27@ = file 30@ size
        27@ += 1
        0AD7: read_string_from_file 30@ to 14@ size 27@
        0A9B: closefile 30@
        0B00: delete_file "cleo\gsms.tmp"
        0AF8: samp add_message_to_chat "[gSMS]: {EAEAEA}Вы уже зарегистрированы. Ваш номер: %s%d" 12@ 14@ 13@
        0B90: samp dialog 6@ control 13 set_visible true
        0B90: samp dialog 6@ control 15 set_visible false
        10@ = 0
        11@ = 1
        9@ = 1
        0AF8: samp add_message_to_chat "[gSMS]: {EAEAEA}Введите %s/ghelp{eaeaea}, если вы нуждаетесь в помощи." 12@ 14@
        0AF1: write_int 28@ to_ini_file "cleo\gsms.cfg" section "1" key "1"
        0AF1: write_int 13@ to_ini_file "cleo\gsms.cfg" section "1" key "2"
        0AF1: write_int 12@ to_ini_file "cleo\gsms.cfg" section "1" key "3"
        0AF5: write_string 14@ to_ini_file "cleo\gsms.cfg" section "1" key "4"
        0AF1: write_int 6@ to_ini_file "cleo\gsms.cfg" section "1" key "5"
        0A92: create_custom_thread "gsms.tmr"  
    end
    if
        9@ == 0
    then
        33@ = 0
        repeat 
            wait 0
        until 33@ > 120000
    end
until 9@ == 1
33@ = 0
0AC8: 22@ = allocate_memory_size 256
0AD3: 22@ = format "http:%c%cgsms.gc0de.ru%ccht.php?a=get" 0x2F 0x2F 0x2F
0AB1: call @dlurl 1 22@
repeat
    wait 0
until 0AAB:   file_exists "cleo\gsms.tmp" 
0AB1: call @clrcch 1 22@
0AC9: free_allocated_memory 22@
0A9A: 23@ = openfile "cleo\gsms.tmp" mode 0x72
0AC8: 22@ = allocate_memory_size 128
21@ = 1
while 0AD7: read_string_from_file 23@ to 22@ size 128
    wait 0
    if
        21@ < 13
    then
        0B94: samp dialog 6@ set_control 21@ text_to 22@
    end
    21@ += 1
end
0A9B: closefile 23@
0B00: delete_file "cleo\gsms.tmp"  
0AC9: free_allocated_memory 22@ 
0B86: samp dialog 6@ set_visible true
while true
    wait 0
    if 
        0B87: samp dialog 6@ is_visible
    then
        0AB1: call @GetCursorPos 0 23@ 22@
        0B85: samp dialog 6@ get_position_to 21@ 20@ size_to 0@ 0@ 
        if and
            001D:  23@ > 21@
            001D:  22@ > 20@
        then
            21@ += 550 
            20@ += 20
            if and
                001D:  21@ > 23@
                001D:  20@ > 22@
            then
                0C0D: struct 6@ offset 0x14 size 1 = 1 
                0B90: samp dialog 6@ control 14 set_visible true
                21@ -= 550 
                20@ -= 20
                0062: 23@ -= 21@ 
                0062: 22@ -= 20@ 
                while 0AB0: 1 
                    wait 0
                    0AB1: call @GetCursorPos 0 21@ 20@ 
                    0062: 21@ -= 23@ 
                    0062: 20@ -= 22@ 
                    0B84: samp dialog 6@ set_pos_XY 21@ 20@ size 550 340 
                end
            else
                if
                    19@ == 1
                then 
                    0C0D: struct 6@ offset 0x14 size 1 = 0
                    0B90: samp dialog 6@ control 14 set_visible false 
                end
            end    
        else
            if
                19@ == 1
            then 
                0C0D: struct 6@ offset 0x14 size 1 = 0 
                0B90: samp dialog 6@ control 14 set_visible false
            end
        end
    end
    if
        0B87: samp dialog 6@ is_visible
    then
        0B81: samp dialog 6@ pop_event_to 23@ control_id_to 23@
        if
            23@ == 14
        then
            0B5D: samp toggle_cursor false
            0B86: samp dialog 6@ set_visible false
        end
        if
            0AB0: key_pressed 113
        then
            if
                8@ == false
            then
                0B5D: samp toggle_cursor true
                8@ = true
            else
                0B5D: samp toggle_cursor false
                8@ = false
            end
            repeat 
                wait 0
            until 8AB0: key_pressed 113
        end
        if and
            8@ == true
            0B21:   samp is_chat_opened
        then
            repeat
                wait 0
            until 8B21: not samp is_chat_opened
            if
                15@ == false
            then
                wait 250
                0B5D: samp toggle_cursor true
            else
                15@ = false
            end
        end
    end
    if
        8@ == false
    then
        0B94: samp dialog 6@ set_control 13 text_to ""    
    end    
    if and
        0B87: samp dialog 6@ is_visible
        0AB0:   key_pressed 13
        11@ == 1
        33@ > 2000
    then
        0AC8: 23@ = allocate_memory_size 128
        0B89: samp dialog 6@ get_control 13 text_to 23@ 
        0AC8: 22@ = allocate_memory_size 256
        0AD3: 22@ = format "http:%c%cgsms.gc0de.ru%ccht.php?a=send&id=%d&num=%d&msg=%s" 0x2F 0x2F 0x2F 28@ 13@ 23@
        0AC9: free_allocated_memory 23@
        0B94: samp dialog 6@ set_control 13 text_to ""
        33@ = 0
        0AB1: call @dlurl 1 22@
        repeat
            wait 0
        until 0AAB:   file_exists "cleo\gsms.tmp" 
        0AB1: call @clrcch 1 22@
        0AC9: free_allocated_memory 22@
        0A9A: 23@ = openfile "cleo\gsms.tmp" mode 0x72
        0AC8: 22@ = allocate_memory_size 128
        0A9C: 21@ = file 23@ size
        21@ += 1
        0AD7: read_string_from_file 23@ to 22@ size 21@
        0A9B: closefile 23@
        0B00: delete_file "cleo\gsms.tmp"  
        0AD4: 23@ = scan_string 22@ format "%d" 21@
        if
            21@ == 4
        then
            22@ += 2
            0AF8: samp add_message_to_chat "[gSMS]: {EAEAEA}%s" 12@ 22@
        end 
        0AC9: free_allocated_memory 22@ 
        if
            21@ == 5
        then
            0AF8: samp add_message_to_chat "[gSMS]: {EAEAEA}На ваш номер установлен mute. Ожидайте." 12@ 
        end
        if
            21@ == 1
        then
            0AC8: 22@ = allocate_memory_size 256
            0AD3: 22@ = format "http:%c%cgsms.gc0de.ru%ccht.php?a=get" 0x2F 0x2F 0x2F
            0AB1: call @dlurl 1 22@
            repeat
                wait 0
            until 0AAB:   file_exists "cleo\gsms.tmp" 
            0AB1: call @clrcch 1 22@
            0AC9: free_allocated_memory 22@
            0A9A: 23@ = openfile "cleo\gsms.tmp" mode 0x72
            0AC8: 22@ = allocate_memory_size 128
            21@ = 1
            while 0AD7: read_string_from_file 23@ to 22@ size 128
                wait 0
                if
                    21@ < 13
                then
                    0B94: samp dialog 6@ set_control 21@ text_to 22@
                end
                21@ += 1
            end
            0A9B: closefile 23@
            0B00: delete_file "cleo\gsms.tmp"  
            0AC9: free_allocated_memory 22@ 
        end 
    end
end

:ghelp
if
    11@ == 1
then
        0AC8: 30@ = allocate_memory_size 256
        0AD3: 30@ = format "http:%c%cgsms.gc0de.ru%cnck.php?id=%d&num=%d" 0x2F 0x2F 0x2F 28@ 13@
        0AB1: call @dlurl 1 30@
        repeat
            wait 0
        until 0AAB:   file_exists "cleo\gsms.tmp" 
        0AB1: call @clrcch 1 30@
        0AC9: free_allocated_memory 30@
        0A9A: 30@ = openfile "cleo\gsms.tmp" mode 0x72
        0AC8: 29@ = allocate_memory_size 4
        0A9C: 27@ = file 30@ size
        27@ += 1
        0AD7: read_string_from_file 30@ to 29@ size 27@
        0A9B: closefile 30@
        0B00: delete_file "cleo\gsms.tmp"  
        0AD4: 27@ = scan_string 29@ format "%d" 30@
        0AC9: free_allocated_memory 29@
        if
            30@ == 3
        then
            0AF8: samp add_message_to_chat "[gSMS]: {EAEAEA}Введите %s/gnick [никнейм]{eaeaea} чтобы сменить ник." 12@ 14@
            5@ = 1
        else
            0AF8: samp add_message_to_chat "[gSMS]: {EAEAEA}Введите %s/gsms [номер]{eaeaea} для отправки SMS." 12@ 14@
        end
        0AF8: samp add_message_to_chat "[gSMS]: {EAEAEA}Введите %s/gskin{eaeaea} чтобы сменить скин и цвет ника." 12@ 14@
        0AF8: samp add_message_to_chat "[gSMS]: {EAEAEA}Введите %s/gchat{eaeaea} чтобы скрыть общий чат, %sF2 {eaeaea}чтобы отобразить мышь." 12@ 14@ 14@
        0AF8: samp add_message_to_chat "[gSMS]: {EAEAEA}Введите %s/gpass{eaeaea} чтобы получить ключ от %slk.gc0de.ru" 12@ 14@ 14@
end 
0B43: samp cmd_ret
        
:gsmsr
if
    10@ == 1
then
    0B35: samp 26@ = get_last_command_params
    if
        0AD4: 26@ = scan_string 26@ format "%d" 25@
    then
        0AC8: 26@ = allocate_memory_size 256
        0AD3: 26@ = format "http:%c%cgsms.gc0de.ru%crgs.php?id=%d&num=%d" 0x2F 0x2F 0x2F 28@ 25@
        0AB1: call @dlurl 1 26@
            repeat
                wait 0
            until 0AAB:   file_exists "cleo\gsms.tmp" 
        0AB1: call @clrcch 1 26@
        0AC9: free_allocated_memory 26@
        0A9A: 26@ = openfile "cleo\gsms.tmp" mode 0x72
        0AC8: 25@ = allocate_memory_size 4
        0A9C: 24@ = file 26@ size
        24@ += 1
        0AD7: read_string_from_file 26@ to 25@ size 24@
        0A9B: closefile 26@
        0B00: delete_file "cleo\gsms.tmp"  
        0AD4: 24@ = scan_string 25@ format "%d" 26@
        0AC9: free_allocated_memory 25@
        if
            26@ < 3
        then
            0AF8: samp add_message_to_chat "[gSMS]: {EAEAEA}Номер должен быть шестизначным." 0xEECC00    
        end
        if
            26@ == 3
        then
            0AF8: samp add_message_to_chat "[gSMS]: {EAEAEA}К сожалению этот номер уже занят." 0xEECC00    
        end
        if
            26@ > 3
        then
            0AF8: samp add_message_to_chat "[gSMS]: {EAEAEA}Вы успешно зарегистрированы. Ваш номер: {EECC00}%d" 0xEECC00 26@
            0AF8: samp add_message_to_chat "[gSMS]: {EAEAEA}Введите {EECC00}/gnick [никнейм]{eaeaea} чтобы сменить ник." 0xEECC00
            0AF8: samp add_message_to_chat "[gSMS]: {EAEAEA}Введите {EECC00}/gskin{eaeaea} чтобы сменить скин и цвет ника." 0xEECC00
            0AF8: samp add_message_to_chat "[gSMS]: {EAEAEA}Введите {EECC00}/gpass{eaeaea} чтобы получить ключ от {EECC00}lk.gc0de.ru" 0xEECC00  
            0B90: samp dialog 6@ control 13 set_visible true
            0B90: samp dialog 6@ control 15 set_visible false
            10@ = 0
            11@ = 1
            0085: 13@ = 26@ 
            0AC8: 30@ = allocate_memory_size 256
            0AD3: 30@ = format "http:%c%cgsms.gc0de.ru%cskn.php?num=%d&a=get&b=1" 0x2F 0x2F 0x2F 13@
            0AB1: call @dlurl 1 30@
            repeat
                wait 0
            until 0AAB:   file_exists "cleo\gsms.tmp" 
            0AB1: call @clrcch 1 30@
            0AC9: free_allocated_memory 30@
            0A9A: 30@ = openfile "cleo\gsms.tmp" mode 0x72
            0AC8: 29@ = allocate_memory_size 16
            0A9C: 27@ = file 30@ size
            27@ += 1
            0AD7: read_string_from_file 30@ to 29@ size 27@
            0A9B: closefile 30@
            0B00: delete_file "cleo\gsms.tmp"  
            0AD4: 27@ = scan_string 29@ format "%d" 12@
            0AC9: free_allocated_memory 29@
            0AC8: 30@ = allocate_memory_size 256
            0AD3: 30@ = format "http:%c%cgsms.gc0de.ru%cskn.php?num=%d&a=get&b=2" 0x2F 0x2F 0x2F 13@
            0AB1: call @dlurl 1 30@
            repeat
                wait 0
            until 0AAB:   file_exists "cleo\gsms.tmp" 
            0AB1: call @clrcch 1 30@
            0AC9: free_allocated_memory 30@
            0A9A: 30@ = openfile "cleo\gsms.tmp" mode 0x72
            0A9C: 27@ = file 30@ size
            27@ += 1
            0AD7: read_string_from_file 30@ to 14@ size 27@
            0A9B: closefile 30@
            0B00: delete_file "cleo\gsms.tmp"
            0AF1: write_int 28@ to_ini_file "cleo\gsms.cfg" section "1" key "1"
            0AF1: write_int 13@ to_ini_file "cleo\gsms.cfg" section "1" key "2"
            0AF1: write_int 12@ to_ini_file "cleo\gsms.cfg" section "1" key "3"
            0AF5: write_string 14@ to_ini_file "cleo\gsms.cfg" section "1" key "4"
            0AF1: write_int 6@ to_ini_file "cleo\gsms.cfg" section "1" key "5"
            0A92: create_custom_thread "gsms.tmr"  
        end
    else
        0AF8: samp add_message_to_chat "[gSMS]: {EAEAEA}Чтобы зарегистрироваться, введите {EECC00}/gsmsr [6-ти значный номер]{eaeaea}." 0xEECC00 
    end
end
0B43: samp cmd_ret

:gsms
if
    11@ == 1
then
        if
            5@ == 1
        then
            0AF8: samp add_message_to_chat "[gSMS]: {EAEAEA}Введите %s/gnick [никнейм]{eaeaea} чтобы сменить ник." 12@ 14@
        else
            0B35: samp 26@ = get_last_command_params
            if
                0AD4: 26@ = scan_string 26@ format "%d" 25@
            then
                0AC8: 26@ = allocate_memory_size 128
                0B3B: samp show_dialog id 2 caption "{eecc00}gSMS" text "{EAEAEA}Введите ваше сообщение (не более 128 символов):" button_1 "Отправить" button_2 "" style 1 
                repeat
                    wait 0
                    0B4A: samp 26@ = get_current_dialog_editbox_text
                until 8B4C: not samp is_dialog_active 2
                0AC8: 24@ = allocate_memory_size 256
                0AD3: 24@ = format "http:%c%cgsms.gc0de.ru%csnd.php?id=%d&from=%d&to=%d&msg=%s" 0x2F 0x2F 0x2F 28@ 13@ 25@ 26@
                0AC9: free_allocated_memory 26@
                0AB1: call @dlurl 1 24@
                    repeat
                        wait 0
                    until 0AAB:   file_exists "cleo\gsms.tmp" 
                0AB1: call @clrcch 1 24@
                0AC9: free_allocated_memory 24@
                0A9A: 26@ = openfile "cleo\gsms.tmp" mode 0x72
                0AC8: 25@ = allocate_memory_size 4
                0A9C: 24@ = file 26@ size
                24@ += 1
                0AD7: read_string_from_file 26@ to 25@ size 24@
                0A9B: closefile 26@
                0B00: delete_file "cleo\gsms.tmp"  
                0AD4: 24@ = scan_string 25@ format "%d" 26@
                0AC9: free_allocated_memory 25@ 
                if
                    26@ == 3
                then
                    0AF8: samp add_message_to_chat "[gSMS]: {EAEAEA}Такой телефонный номер не зарегистрирован." 12@   
                end
                if
                    26@ == 4
                then
                    0AF8: samp add_message_to_chat "[gSMS]: {EAEAEA}Сообщение успешно отправлено." 12@   
                end 
                if
                    26@ == 5
                then
                    0AF8: samp add_message_to_chat "[gSMS]: {EAEAEA}Сообщение не может быть пустым." 12@   
                end 
            else
                0AF8: samp add_message_to_chat "[gSMS]: {EAEAEA}Введите %s/gsms [номер]{eaeaea} для отправки SMS." 12@ 14@
            end
        end
end
0B43: samp cmd_ret

:gpass
if
    11@ == 1
then
                0AC8: 24@ = allocate_memory_size 256
                0AD3: 24@ = format "http:%c%cgsms.gc0de.ru%cpass.php?id=%d&num=%d" 0x2F 0x2F 0x2F 28@ 13@
                0AC9: free_allocated_memory 26@
                0AB1: call @dlurl 1 24@
                    repeat
                        wait 0
                    until 0AAB:   file_exists "cleo\gsms.tmp" 
                0AB1: call @clrcch 1 24@
                0AC9: free_allocated_memory 24@
                0A9A: 26@ = openfile "cleo\gsms.tmp" mode 0x72
                0AC8: 25@ = allocate_memory_size 64
                0A9C: 24@ = file 26@ size
                24@ += 1
                0AD7: read_string_from_file 26@ to 25@ size 24@
                0A9B: closefile 26@
                0B00: delete_file "cleo\gsms.tmp"  
                0B3B: samp show_dialog id 4 caption "{eecc00}gSMS" text "{EAEAEA} Это ваш ключ для сайта lk.gc0de.ru (32 симв.) " button_1 "Закрыть" button_2 "" style 1 
                0B4B: samp set_current_dialog_editbox_text 25@
                0AC9: free_allocated_memory 25@ 
end 
0B43: samp cmd_ret

:gnick
if
    11@ == 1
then
            0B35: samp 26@ = get_last_command_params
            if
                26@ > 0
            then
                0AC8: 30@ = allocate_memory_size 256
                0AD3: 30@ = format "http:%c%cgsms.gc0de.ru%cnck.php?id=%d&num=%d&nick=%s" 0x2F 0x2F 0x2F 28@ 13@ 26@      
                0AB1: call @dlurl 1 30@
                repeat
                    wait 0
                until 0AAB:   file_exists "cleo\gsms.tmp" 
                0AB1: call @clrcch 1 30@
                0AC9: free_allocated_memory 30@
                0A9A: 30@ = openfile "cleo\gsms.tmp" mode 0x72
                0AC8: 29@ = allocate_memory_size 4
                0A9C: 27@ = file 30@ size
                27@ += 1
                0AD7: read_string_from_file 30@ to 29@ size 27@
                0A9B: closefile 30@
                0B00: delete_file "cleo\gsms.tmp"  
                0AD4: 27@ = scan_string 29@ format "%d" 30@
                0AC9: free_allocated_memory 29@
                if
                    30@ == 4
                then
                    0AF8: samp add_message_to_chat "[gSMS]: {EAEAEA}Ваш ник успешно изменён на %s%s{EAEAEA}." 12@ 14@ 26@ 
                    if
                        5@ == 1
                    then
                        0AF8: samp add_message_to_chat "[gSMS]: {EAEAEA}Введите %s/gsms [номер]{eaeaea} для отправки SMS." 12@ 14@
                        5@ = 0
                    end   
                end
                if
                    30@ == 5
                then
                    0AF8: samp add_message_to_chat "[gSMS]: {EAEAEA}Ник не может быть длиннее 9 символов." 12@   
                end
            else
                0AF8: samp add_message_to_chat "[gSMS]: {EAEAEA}Введите %s/gnick [никнейм]{eaeaea} чтобы сменить ник." 12@ 14@
            end
end
0B43: samp cmd_ret 

:gskin
if
    11@ == 1
then
                0AC8: 26@ = allocate_memory_size 64
                0B3B: samp show_dialog id 2 caption "{eecc00}gSMS" text "{EAEAEA}Введите код скина ( можно получить на сайте gsms.gc0de.ru/color/ ):" button_1 "Отправить" button_2 "" style 1 
                repeat
                    wait 0
                    0B4A: samp 26@ = get_current_dialog_editbox_text
                until 8B4C: not samp is_dialog_active 2
                if
                    0AD4: 24@ = scan_string 26@ format "%d" 26@
                then
                    0AC8: 24@ = allocate_memory_size 256
                    0AD3: 24@ = format "http:%c%cgsms.gc0de.ru%cskn.php?a=set&id=%d&num=%d&skn=%d" 0x2F 0x2F 0x2F 28@ 13@ 26@
                    0AC9: free_allocated_memory 26@
                    0AB1: call @dlurl 1 24@
                        repeat
                            wait 0
                        until 0AAB:   file_exists "cleo\gsms.tmp" 
                    0AB1: call @clrcch 1 24@
                    0AC9: free_allocated_memory 24@
                    0A9A: 26@ = openfile "cleo\gsms.tmp" mode 0x72
                    0AC8: 25@ = allocate_memory_size 4
                    0A9C: 24@ = file 26@ size
                    24@ += 1
                    0AD7: read_string_from_file 26@ to 25@ size 24@
                    0A9B: closefile 26@
                    0B00: delete_file "cleo\gsms.tmp"  
                    0AD4: 24@ = scan_string 25@ format "%d" 26@
                    0AC9: free_allocated_memory 25@ 
                    if
                        26@ == 2
                    then
                        0AC8: 24@ = allocate_memory_size 256
                        0AD3: 24@ = format "http:%c%cgsms.gc0de.ru%cskn.php?a=get&num=%d&b=1" 0x2F 0x2F 0x2F 13@
                        0AC9: free_allocated_memory 26@
                        0AB1: call @dlurl 1 24@
                            repeat
                                wait 0
                            until 0AAB:   file_exists "cleo\gsms.tmp" 
                        0AB1: call @clrcch 1 24@
                        0AC9: free_allocated_memory 24@
                        0A9A: 26@ = openfile "cleo\gsms.tmp" mode 0x72
                        0AC8: 25@ = allocate_memory_size 16
                        0A9C: 24@ = file 26@ size
                        24@ += 1
                        0AD7: read_string_from_file 26@ to 25@ size 24@
                        0A9B: closefile 26@
                        0B00: delete_file "cleo\gsms.tmp"  
                        0AD4: 24@ = scan_string 25@ format "%d" 12@
                        0AC9: free_allocated_memory 25@ 
                        0AC8: 24@ = allocate_memory_size 256
                        0AD3: 24@ = format "http:%c%cgsms.gc0de.ru%cskn.php?a=get&num=%d&b=2" 0x2F 0x2F 0x2F 13@
                        0AC9: free_allocated_memory 26@
                        0AB1: call @dlurl 1 24@
                            repeat
                                wait 0
                            until 0AAB:   file_exists "cleo\gsms.tmp" 
                        0AB1: call @clrcch 1 24@
                        0AC9: free_allocated_memory 24@
                        0A9A: 26@ = openfile "cleo\gsms.tmp" mode 0x72
                        0A9C: 24@ = file 26@ size
                        24@ += 1
                        0AD7: read_string_from_file 26@ to 14@ size 24@
                        0A9B: closefile 26@
                        0B00: delete_file "cleo\gsms.tmp"  
                        0AD4: 24@ = scan_string 25@ format "%d" 12@
                        0AC9: free_allocated_memory 25@ 
                        0AF8: samp add_message_to_chat "[gSMS]: {EAEAEA}Вы успешно сменили скин и цвет ника." 12@
                        0AF1: write_int 12@ to_ini_file "cleo\gsms.cfg" section "1" key "3"
                        0AF5: write_string 14@ to_ini_file "cleo\gsms.cfg" section "1" key "4"
                    end
                    if
                        26@ == 3
                    then
                        0AF8: samp add_message_to_chat "[gSMS]: {EAEAEA}Неправильный формат кода." 12@ 
                    end
                else
                    0AF8: samp add_message_to_chat "[gSMS]: {EAEAEA}Неправильный формат кода." 12@   
                end 
end
0B43: samp cmd_ret 

:gchat
if
    8B87: not samp dialog 6@ is_visible
then
    0B86: samp dialog 6@ set_visible true
    0B5D: samp toggle_cursor true
    8@ = true
    0AC8: 22@ = allocate_memory_size 256
    0AD3: 22@ = format "http:%c%cgsms.gc0de.ru%ccht.php?a=get" 0x2F 0x2F 0x2F
    0AB1: call @dlurl 1 22@
    repeat
        wait 0
    until 0AAB:   file_exists "cleo\gsms.tmp" 
    0AB1: call @clrcch 1 22@
    0AC9: free_allocated_memory 22@
    0A9A: 23@ = openfile "cleo\gsms.tmp" mode 0x72
    0AC8: 22@ = allocate_memory_size 128
    21@ = 1
    while 0AD7: read_string_from_file 23@ to 22@ size 128
        wait 0
        if
            21@ < 13
        then
            0B94: samp dialog 6@ set_control 21@ text_to 22@
        end
        21@ += 1
    end
    0A9B: closefile 23@
    0B00: delete_file "cleo\gsms.tmp"  
    0AC9: free_allocated_memory 22@ 
    repeat
        0B81: samp dialog 6@ pop_event_to 23@ control_id_to 23@
        0B5D: samp toggle_cursor true
    until not 23@ == 14
else
    if
        19@ == 0
    then
        19@ = 1
        0B93: samp dialog 6@ set_background_color 0x00000000
        0B90: samp dialog 6@ control 14 set_visible false
        0C0D: struct 6@ offset 0x14 size 1 = 0
    else
        19@ = 0
        0B86: samp dialog 6@ set_visible false
        0C0D: struct 6@ offset 0x14 size 1 = 1
        0B90: samp dialog 6@ control 14 set_visible true
        0B93: samp dialog 6@ set_background_color 0x00000080
        0B5D: samp toggle_cursor false
        8@ = false
        15@ = true
    end
end
0B43: samp cmd_ret 

:clrcch
    if 
           0AA2: 1@ = load_library "wininet.dll" 
    then
        if 
            0AA4: 2@ = get_proc_address "DeleteUrlCacheEntryA" library 1@ 
        then
            0AA5: call 2@ num_params 1 pop 0 0@
        end
        0AA3: free_library 1@
    else
        0AF8: samp add_message_to_chat "Ошибка! {EAEAEA}Ошибка при загрузке wininet.dll" 0xFF0000 
        0A93: end_custom_thread
    end
0AB2: ret 0

:dlurl
if
    0AA2: 2@ = load_library "urlmon.dll"
then
    if
        0AA4: 3@ = get_proc_address "URLDownloadToFileA" library 2@
    then
        0AA5: call 3@ num_params 5 pop 0 params lpfnCB 0 dwReserved 0 szFileName "cleo\gsms.tmp" szUrl 0@ caller 0 
    end
    0AA3: free_library 2@
else
    0AF8: samp add_message_to_chat "Ошибка! {EAEAEA}Ошибка при загрузке urlmon.dll" 0xFF0000 
    0A93: end_custom_thread
end
0AB2: ret 0

:GetCursorPos
if
    0AA2: 0@ = load_library "user32.dll"
then
    if
        0AA4: 1@ = get_proc_address "GetCursorPos" library 0@
    then
        0AC8: 2@ = allocate_memory_size 8
        0AA5: call 1@ num_params 1 pop 0 2@
        0A8D: 3@ = read_memory 2@ size 4 virtual_protect 0
        2@ += 4
        0A8D: 4@ = read_memory 2@ size 4 virtual_protect 0
        0AC9: free_memory 2@ 
    end
    0AA3: free_library 0@
else
    0AF8: samp add_message_to_chat "Ошибка! {EAEAEA}Ошибка при загрузке urlmon.dll" 0xFF0000 
    0A93: end_custom_thread
end
0AB2: ret 2 3@ 4@

gsms.tmr
PHP:
hex
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
end
{$CLEO .cs}
0662: "gsms"
thread "gsmsgettmr"
if
    8AF7: get_samp_base_to 33@
then
    0A93: end_custom_thread
end
repeat
    wait 400
until 0AFA: is_samp_structures_available
0AF0: 0@ = get_int_from_ini_file "cleo\gsms.cfg" section "1" key "1"
0AF0: 1@ = get_int_from_ini_file "cleo\gsms.cfg" section "1" key "2"
0AF0: 2@ = get_int_from_ini_file "cleo\gsms.cfg" section "1" key "3"
0AC8: 3@ = allocate_memory_size 16
0AF4: 3@ = read_string_from_ini_file "cleo\gsms.cfg" section "1" key "4"
0AF0: 4@ = get_int_from_ini_file "cleo\gsms.cfg" section "1" key "5"
0B00: delete_file "cleo\gsms.cfg"  
while true
    wait 0
    0AC8: 13@ = allocate_memory_size 32
        if
            0AAB:   file_exists "cleo\gsms.cfg"
        then
            0AF0: 2@ = get_int_from_ini_file "cleo\gsms.cfg" section "1" key "3"
            0AF4: 3@ = read_string_from_ini_file "cleo\gsms.cfg" section "1" key "4"
            0B00: delete_file "cleo\gsms.cfg"  
        end
        0AC8: 30@ = allocate_memory_size 256
        0AD3: 30@ = format "http:%c%cgsms.gc0de.ru%cget.php?a=count&num=%d&id=%d" 0x2F 0x2F 0x2F 1@ 0@
        0AC9: free_allocated_memory 13@ 
        0AB1: call @dlurl 1 30@
            repeat
                wait 0
            until 0AAB:   file_exists "cleo\gsms.tmpi" 
        0AB1: call @clrcch 1 30@
        0AC9: free_allocated_memory 30@
        0A9A: 30@ = openfile "cleo\gsms.tmpi" mode 0x72
        0AC8: 29@ = allocate_memory_size 4
        0A9C: 27@ = file 30@ size
        27@ += 1
        0AD7: read_string_from_file 30@ to 29@ size 27@
        0A9B: closefile 30@
        0B00: delete_file "cleo\gsms.tmpi"  
        0AD4: 27@ = scan_string 29@ format "%d" 30@
        0AC9: free_allocated_memory 29@
        if
            30@ == 5450
        then
            33@ = 0
            repeat
                wait 0 
            until 33@ > 15000
            30@ = 0
        end
        if
            30@ > 0
        then
            for 29@ = 1 to 30@
                wait 0
                0AC8: 23@ = allocate_memory_size 256
                0AD3: 23@ = format "http:%c%cgsms.gc0de.ru%cget.php?a=from&num=%d&id=%d" 0x2F 0x2F 0x2F 1@ 0@
                0AB1: call @dlurl 1 23@
                repeat
                    wait 0
                until 0AAB:   file_exists "cleo\gsms.tmpi" 
                0AB1: call @clrcch 1 23@
                0AC9: free_allocated_memory 23@
                0A9A: 23@ = openfile "cleo\gsms.tmpi" mode 0x72
                0AC8: 22@ = allocate_memory_size 16
                0A9C: 21@ = file 23@ size
                21@ += 1
                0AD7: read_string_from_file 23@ to 22@ size 21@
                0A9B: closefile 23@
                0B00: delete_file "cleo\gsms.tmpi"  
                0AD4: 21@ = scan_string 22@ format "%d" 23@
                0AC9: free_allocated_memory 22@
                wait 200
                0AC8: 22@ = allocate_memory_size 256
                0AD3: 22@ = format "http:%c%cgsms.gc0de.ru%cget.php?a=date&num=%d&id=%d" 0x2F 0x2F 0x2F 1@ 0@
                0AB1: call @dlurl 1 22@
                repeat
                    wait 0
                until 0AAB:   file_exists "cleo\gsms.tmpi" 
                0AB1: call @clrcch 1 22@
                0AC9: free_allocated_memory 22@
                0A9A: 22@ = openfile "cleo\gsms.tmpi" mode 0x72
                0AC8: 24@ = allocate_memory_size 32
                0A9C: 20@ = file 22@ size
                20@ += 1
                0AD7: read_string_from_file 22@ to 24@ size 20@
                0A9B: closefile 22@
                0B00: delete_file "cleo\gsms.tmpi"
                wait 200
                0AC8: 22@ = allocate_memory_size 256
                0AD3: 22@ = format "http:%c%cgsms.gc0de.ru%cget.php?a=nick&num=%d&id=%d" 0x2F 0x2F 0x2F 1@ 0@
                0AB1: call @dlurl 1 22@
                repeat
                    wait 0
                until 0AAB:   file_exists "cleo\gsms.tmpi" 
                0AB1: call @clrcch 1 22@
                0AC9: free_allocated_memory 22@
                0A9A: 22@ = openfile "cleo\gsms.tmpi" mode 0x72
                0AC8: 21@ = allocate_memory_size 32
                0A9C: 20@ = file 22@ size
                20@ += 1
                0AD7: read_string_from_file 22@ to 21@ size 20@
                0A9B: closefile 22@
                0B00: delete_file "cleo\gsms.tmpi"
                wait 200
                0AC8: 22@ = allocate_memory_size 256
                0AD3: 22@ = format "http:%c%cgsms.gc0de.ru%cget.php?a=msg&num=%d&id=%d" 0x2F 0x2F 0x2F 1@ 0@
                0AB1: call @dlurl 1 22@
                repeat
                    wait 0
                until 0AAB:   file_exists "cleo\gsms.tmpi" 
                0AB1: call @clrcch 1 22@
                0AC9: free_allocated_memory 22@
                0A9A: 22@ = openfile "cleo\gsms.tmpi" mode 0x72
                0AC8: 20@ = allocate_memory_size 128
                0A9C: 19@ = file 22@ size
                19@ += 1
                0AD7: read_string_from_file 22@ to 20@ size 19@
                0A9B: closefile 22@
                0AC8: 22@ = allocate_memory_size 256
                0AD3: 22@ = format "http:%c%cgsms.gc0de.ru%cskn.php?a=get&num=%d&b=2" 0x2F 0x2F 0x2F 23@
                0AB1: call @dlurl 1 22@
                repeat
                    wait 0
                until 0AAB:   file_exists "cleo\gsms.tmpi" 
                0AB1: call @clrcch 1 22@
                0AC9: free_allocated_memory 22@
                0A9A: 22@ = openfile "cleo\gsms.tmpi" mode 0x72
                0AC8: 18@ = allocate_memory_size 128
                0A9C: 19@ = file 22@ size
                19@ += 1
                0AD7: read_string_from_file 22@ to 18@ size 19@
                0A9B: closefile 22@
                0B00: delete_file "cleo\gsms.tmpi"  
                0AF8: samp add_message_to_chat "[%s%s%s][%d][%s]:" 2@ 18@ 21@ 3@ 23@ 24@ 
                0AF8: samp add_message_to_chat "- {EAEAEA}%s" 2@ 20@
                0AC9: free_allocated_memory 21@
                0AC9: free_allocated_memory 20@
                0AC9: free_allocated_memory 18@
                0AAC: $hMP3 = load_audiostream "CLEO\gsms.mp3"
                00A0: store_actor $PLAYER_ACTOR position_to 13@ 12@ 11@
                0AC2: set_3d_audiostream $hMP3 position 13@ 12@ 11@
                0AAD: set_mp3 $hMP3 perform_action 1
                repeat
                    wait 0
                    0AB9: get_mp3 $hMP3 state_to 7@
                until 7@ == -1
                0AAE: release_mp3 $hMP3
            end
        end
        if
            0B87: samp dialog 4@ is_visible
        then
            0AC8: 22@ = allocate_memory_size 256
            0AD3: 22@ = format "http:%c%cgsms.gc0de.ru%ccht.php?a=get&id=%d" 0x2F 0x2F 0x2F 0@
            0AB1: call @dlurl 1 22@
            repeat
                wait 0
            until 0AAB:   file_exists "cleo\gsms.tmpi" 
            0AB1: call @clrcch 1 22@
            0AC9: free_allocated_memory 22@
            0A9A: 23@ = openfile "cleo\gsms.tmpi" mode 0x72
            0AC8: 22@ = allocate_memory_size 128
            21@ = 1
            while 0AD7: read_string_from_file 23@ to 22@ size 128
                wait 0
                if
                    21@ < 13
                then
                    0B94: samp dialog 4@ set_control 21@ text_to 22@
                end
                21@ += 1
            end
            0A9B: closefile 23@
            0B00: delete_file "cleo\gsms.tmpi"  
            0AC9: free_allocated_memory 22@ 
        end
        33@ = 0
        repeat
            wait 0
        until 33@ > 10000
        wait 0
end

:clrcch
    if 
           0AA2: 1@ = load_library "wininet.dll" 
    then
        if 
            0AA4: 2@ = get_proc_address "DeleteUrlCacheEntryA" library 1@ 
        then
            0AA5: call 2@ num_params 1 pop 0 0@
        end
        0AA3: free_library 1@
    else
        0AF8: samp add_message_to_chat "Ошибка! {EAEAEA}Ошибка при загрузке wininet.dll" 0xFF0000 
        0A93: end_custom_thread
    end
0AB2: ret 0

:dlurl
if
    0AA2: 2@ = load_library "urlmon.dll"
then
    if
        0AA4: 3@ = get_proc_address "URLDownloadToFileA" library 2@
    then
        0AA5: call 3@ num_params 5 pop 0 params lpfnCB 0 dwReserved 0 szFileName "cleo\gsms.tmpi" szUrl 0@ caller 0 
    end
else
    0AF8: samp add_message_to_chat "Ошибка! {EAEAEA}Ошибка при загрузке urlmon.dll" 0xFF0000 
    0A93: end_custom_thread
end
0AB2: ret 0

gsms.upd
PHP:
hex
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
end
{$CLEO .cs}
0662: "gsmsupd"
thread "gsmsupd"
if
    8AF7: get_samp_base_to 33@
then
    0A93: end_custom_thread
end
repeat
    wait 400
until 0AFA: is_samp_structures_available
0AF8: samp add_message_to_chat "[gSMS]: {EAEAEA}Началось автообновление. Ожидайте." 0xeecc00
0AC8: 30@ = allocate_memory_size 256
0AD3: 30@ = format "http:%c%cgsms.gc0de.ru%cgsms.cs" 0x2F 0x2F 0x2F
0AB1: call @dlurl 1 30@
repeat
    wait 0
until 0AAB:   file_exists "cleo\gsms.tmp" 
0AB1: call @clrcch 1 30@
0AC9: free_allocated_memory 30@
0B00: delete_file "cleo\gsms.cs" 
0B04: copy_file "cleo\gsms.tmp" to "cleo\gsms.cs" 
0B00: delete_file "cleo\gsms.tmp" 
0AC8: 30@ = allocate_memory_size 256
0AD3: 30@ = format "http:%c%cgsms.gc0de.ru%cgsms.tmr" 0x2F 0x2F 0x2F
0AB1: call @dlurl 1 30@
repeat
    wait 0
until 0AAB:   file_exists "cleo\gsms.tmp" 
0AB1: call @clrcch 1 30@
0AC9: free_allocated_memory 30@
0B00: delete_file "cleo\gsms.tmr" 
0B04: copy_file "cleo\gsms.tmp" to "cleo\gsms.tmr" 
0B00: delete_file "cleo\gsms.tmp"   
0A92: create_custom_thread "gsms.cs"
0A93: end_custom_thread

:clrcch
    if 
           0AA2: 1@ = load_library "wininet.dll" 
    then
        if 
            0AA4: 2@ = get_proc_address "DeleteUrlCacheEntryA" library 1@ 
        then
            0AA5: call 2@ num_params 1 pop 0 0@
        end
        0AA3: free_library 1@
    else
        0AF8: samp add_message_to_chat "Ошибка! {EAEAEA}Ошибка при загрузке wininet.dll" 0xFF0000 
        0A93: end_custom_thread
    end
0AB2: ret 0

:dlurl
if
    0AA2: 2@ = load_library "urlmon.dll"
then
    if
        0AA4: 3@ = get_proc_address "URLDownloadToFileA" library 2@
    then
        0AA5: call 3@ num_params 5 pop 0 params lpfnCB 0 dwReserved 0 szFileName "cleo\gsms.tmp" szUrl 0@ caller 0 
    end
else
    0AF8: samp add_message_to_chat "Ошибка! {EAEAEA}Ошибка при загрузке urlmon.dll" 0xFF0000 
    0A93: end_custom_thread
end
0AB2: ret 0
[/HIDE]
 
  • Нравится
Реакции: DrumKee и SR_team
Статус
В этой теме нельзя размещать новые ответы.