Вопросы по CLEO-скриптингу

[LaRossa]

хук инк. RPC ShowDialog

Вот сам диалог:

Вот тело хука:

0BE5: raknet 31@ = get_hook_param PARAM_PACKETID
if 0039: 31@ == 61 //rpc_showdialog
    then
    0BE5: raknet 31@ = get_hook_param PARAM_BITSTREAM
    0BE7: raknet 10@ = bit_stream_read 31@ type BS_TYPE_SHORT   //DialogId
    0BE7: raknet 11@ = bit_stream_read 31@ type BS_TYPE_BYTE    //ButtonID;
    0BE7: raknet 12@ = bit_stream_read 31@ type BS_TYPE_SHORT
    0BE7: raknet 13@ = bit_stream_read 31@ type BS_TYPE_BYTE    //size
    0BE8: raknet bit_stream 31@ read_array 14@ size 13@
    0C1E: array 14@ element 13@ el_size 1 = 0   //resize
    0af8: "id: %d | buttonId: %d | listItem: %d | size: %d" -1  10@ 11@ 12@ 13@
    0af8: "%s" 0x00ff00  14@
    //0af8: "%d %d %d" -1 10@ 11@ 12@
end

Вот то, что выводит в чат:

Вопрос: как в 14@ получить текст listItem'ов, а не эту хуету?
пс мне это в первый и в последний раз понадобилось, разбираться смысла нет, так что, желательно, сразу готовый код, не валите намеками

0BE3: raknet setup_incoming_rpc_hook @incoming_rpc

/*while true
    wait 0
end*/

:incoming_rpc
0BE5: raknet 0@ = get_hook_param PARAM_PACKETID // Получаем RPC ID
if 0@ == RPC_SCRSHOWDIALOG
then
    /*
        C++: RakSAMP code
        bsData.Read(sampDialog.wDialogID);
        bsData.Read(sampDialog.bDialogStyle);
        bsData.Read(sampDialog.bTitleLength);
        bsData.Read(sampDialog.szTitle, sampDialog.bTitleLength);
        sampDialog.szTitle[sampDialog.bTitleLength] = 0;
        bsData.Read(sampDialog.bButton1Len);
        bsData.Read(sampDialog.szButton1, sampDialog.bButton1Len);
        sampDialog.szButton1[sampDialog.bButton1Len] = 0;
        bsData.Read(sampDialog.bButton2Len);
        bsData.Read(sampDialog.szButton2, sampDialog.bButton2Len);
        sampDialog.szButton2[sampDialog.bButton2Len] = 0;
        stringCompressor->DecodeString(sampDialog.szInfo, 256, &bsData);
    */
    // Получаем данные
    0BE5: raknet 1@ = get_hook_param PARAM_BITSTREAM // Получаем BitStream
    0BE7: raknet 2@ = bit_stream_read 1@ type BS_TYPE_SHORT // WORD(DialogId)
    0BE7: raknet 3@ = bit_stream_read 1@ type BS_TYPE_BYTE // byte(DialogStyle)

    0BE7: raknet 4@ = bit_stream_read 1@ type BS_TYPE_BYTE // byte(TitleLength)
    0AB1: call @allocate_memory 2 size 4@ reserve 1 ret_to 5@
    0BE8: raknet bit_stream 1@ read_array 5@ size 4@ // Title

    0BE7: raknet 4@ = bit_stream_read 1@ type BS_TYPE_BYTE // byte(Button1Length)
    0AB1: call @allocate_memory 2 size 4@ reserve 1 ret_to 6@
    0BE8: raknet bit_stream 1@ read_array 6@ size 4@ // Button1
 
    0BE7: raknet 4@ = bit_stream_read 1@ type BS_TYPE_BYTE // byte(Button2Length)
    0AB1: call @allocate_memory 2 size 4@ reserve 1 ret_to 7@
    0BE8: raknet bit_stream 1@ read_array 7@ size 4@ // Button2
 
    0AB1: call @allocate_memory 2 size 4096 reserve 1 ret_to 8@ // Info
    0BF4: raknet bit_stream 1@ decode_string 8@ size 4096 // Т.к. текст диалога сжат(закодирован), то нужно его раскодировать
 
    // Итак: 5@ - заголовок диалога, 6@, 7@ - первая и вторая кнопка соответственно, 8@ - текст диалога
    0AF8: samp add_message_to_chat "Открыт диалог №%d, тип: %d. Заголовок: '%s'. Кнопки: '%s' / '%s'" color -1 params 2@ 3@ 5@ 6@ 7@
    //
 
    // Освобождаем ранее выделенную память(больше не используется, в данное время)
    0AC9: free_allocated_memory 5@
    0AC9: free_allocated_memory 6@
    0AC9: free_allocated_memory 7@
    0AC9: free_allocated_memory 8@
end
0BE0: raknet hook_ret true

:allocate_memory
// call @allocate_memory 2 size 0@ reserve 1@ ret_to 2@
005A: 0@ += 1@
0AC8: 2@ = allocate_memory_size 0@
0C11: memset destination 2@ value 0 size 0@
0AB2: ret 1 2@

 

[wuc]

Подскажите, пожалуйста, как в коде ниже записаны цвета клистов и как мне из hex их перевести.

// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}
//-------------MAIN---------------
0000: NOP 
if 
0@ = SAMP.Base()
else_jump @Noname_20 
0A93: end_custom_thread 
:Noname_20
wait 0 
   SAMP.Available
else_jump @Noname_20 
if 
8AAB:   not file_exists "cleo\Checker Criminal.ini" 
else_jump @Noname_319 
0AF1: write_int 1 to_ini_file "cleo\Checker Criminal.ini" section "Settings" key "CLEAR_SCREEN" 
0AF1: write_int 10 to_ini_file "cleo\Checker Criminal.ini" section "Settings" key "HEIGHT" 
0AF1: write_int 13 to_ini_file "cleo\Checker Criminal.ini" section "Settings" key "FLAGS" 
0AF1: write_int 1075178818 to_ini_file "cleo\Checker Criminal.ini" section "Settings" key "X" 
0AF1: write_int 1132123477 to_ini_file "cleo\Checker Criminal.ini" section "Settings" key "Y" 
:Noname_319
0AF0: 2@ = get_int_from_ini_file "cleo\Checker Criminal.ini" section "Settings" key "HEIGHT" 
0AF0: 3@ = get_int_from_ini_file "cleo\Checker Criminal.ini" section "Settings" key "FLAGS" 
11@ = Render.CreateFont("Segoe UI", 2@, 3@)
2@ = 0 
3@ = 0 
0B34: samp register_client_command "cc" to_label @Noname_2653 
alloc 4@ 4096 
alloc 5@ 4096 
alloc 6@ 4096 
alloc 7@ 4096 
alloc 8@ 4096 
:Noname_504
wait 0 
0AF0: 14@ = get_int_from_ini_file "cleo\Checker Criminal.ini" section "Settings" key "CLEAR_SCREEN" 
if and
  12@ == 1 
  14@ == 1 
key_down 119 
else_jump @Noname_618 
call @Noname_11289 0 
wait 1000 
call @Noname_11129 0 
:Noname_618
if 
  3@ == 1 
else_jump @Noname_778 
SAMP.SetCursorMode(1)
0B5E: get_cursor_pos 9@ 10@ 
0B5F: convert_window_screen_coords 9@ 10@ to_game_screen_coords 9@ 10@ 
0AF1: write_int 9@ to_ini_file "cleo\Checker Criminal.ini" section "Settings" key "X" 
0AF1: write_int 10@ to_ini_file "cleo\Checker Criminal.ini" section "Settings" key "Y" 
if 
key_down 1 
else_jump @Noname_778 
3@ = 0 
SAMP.SetCursorMode(0)
:Noname_778
if 
  12@ == 1 
else_jump @Noname_2646 
14@ = 0 
15@ = 0 
16@ = 0 
17@ = 0 
18@ = 0 
19@ = 0 
20@ = 0 
21@ = 0 
22@ = 0 
23@ = 0 
24@ = 0 
26@ = 0 
27@ = 0 
28@ = 0 
29@ = 0 
30@ = 0 
1@ = 0 
:Noname_915
if 
   SAMP.IsPlayerConnected(1@)
else_jump @Noname_2127 
2@ = SAMP.GetPlayerColor(1@)
if 
  2@ == -1442208768 
else_jump @Noname_967 
14@ += 1 
:Noname_967
if 
  2@ == -1426072028 
else_jump @Noname_995 
15@ += 1 
:Noname_995
if 
  2@ == -1441927681 
else_jump @Noname_1023 
16@ += 1 
:Noname_1023
if 
  2@ == -1429924353 
else_jump @Noname_1051 
17@ += 1 
:Noname_1051
if 
  2@ == -1439784837 
else_jump @Noname_1079 
18@ += 1 
:Noname_1079
if 
  2@ == -1430735178 
else_jump @Noname_1107 
19@ += 1 
:Noname_1107
if 
  2@ == -1426127354 
else_jump @Noname_1135 
20@ += 1 
:Noname_1135
if 
  2@ == -1426802688 
else_jump @Noname_1163 
21@ += 1 
:Noname_1163
2@ = SAMP.GetActorHandleByPlayerID(1@)
if 
   not 2@ == -1 
else_jump @Noname_2127 
if 
   Actor.Model(2@) == #FAM1
else_jump @Noname_1214 
22@ += 1 
:Noname_1214
if 
   Actor.Model(2@) == #FAM2
else_jump @Noname_1239 
22@ += 1 
:Noname_1239
if 
   Actor.Model(2@) == #FAM3
else_jump @Noname_1264 
22@ += 1 
:Noname_1264
if 
   Actor.Model(2@) == 269
else_jump @Noname_1290 
22@ += 1 
:Noname_1290
if 
   Actor.Model(2@) == 270
else_jump @Noname_1316 
22@ += 1 
:Noname_1316
if 
   Actor.Model(2@) == #OFYST
else_jump @Noname_1341 
22@ += 1 
:Noname_1341
if 
   Actor.Model(2@) == 271
else_jump @Noname_1367 
22@ += 1 
:Noname_1367
if 
   Actor.Model(2@) == #LSV1
else_jump @Noname_1392 
23@ += 1 
:Noname_1392
if 
   Actor.Model(2@) == #LSV2
else_jump @Noname_1417 
23@ += 1 
:Noname_1417
if 
   Actor.Model(2@) == #LSV3
else_jump @Noname_1442 
23@ += 1 
:Noname_1442
if 
   Actor.Model(2@) == #COPGRL3
else_jump @Noname_1468 
23@ += 1 
:Noname_1468
if 
   Actor.Model(2@) == #VLA2
else_jump @Noname_1493 
24@ += 1 
:Noname_1493
if 
   Actor.Model(2@) == #VLA3
else_jump @Noname_1518 
24@ += 1 
:Noname_1518
if 
   Actor.Model(2@) == #VLA1
else_jump @Noname_1543 
24@ += 1 
:Noname_1543
if 
   Actor.Model(2@) == #HFYST
else_jump @Noname_1568 
24@ += 1 
:Noname_1568
if 
   Actor.Model(2@) == #SFR1
else_jump @Noname_1594 
27@ += 1 
:Noname_1594
if 
   Actor.Model(2@) == #SFR2
else_jump @Noname_1620 
27@ += 1 
:Noname_1620
if 
   Actor.Model(2@) == #SFR3
else_jump @Noname_1646 
27@ += 1 
:Noname_1646
if 
   Actor.Model(2@) == #SOFYST
else_jump @Noname_1672 
27@ += 1 
:Noname_1672
if 
   Actor.Model(2@) == #BALLAS1
else_jump @Noname_1697 
26@ += 1 
:Noname_1697
if 
   Actor.Model(2@) == #BALLAS2
else_jump @Noname_1722 
26@ += 1 
:Noname_1722
if 
   Actor.Model(2@) == #BALLAS3
else_jump @Noname_1747 
26@ += 1 
:Noname_1747
if 
   Actor.Model(2@) == #GANGRL3
else_jump @Noname_1773 
26@ += 1 
:Noname_1773
if 
   Actor.Model(2@) == #MAFFA
else_jump @Noname_1798 
28@ += 1 
:Noname_1798
if 
   Actor.Model(2@) == #MAFFB
else_jump @Noname_1823 
28@ += 1 
:Noname_1823
if 
   Actor.Model(2@) == #VMAFF2
else_jump @Noname_1848 
28@ += 1 
:Noname_1848
if 
   Actor.Model(2@) == #VWFYWAI
else_jump @Noname_1874 
28@ += 1 
:Noname_1874
if 
   Actor.Model(2@) == #MAFBOSS
else_jump @Noname_1899 
30@ += 1 
:Noname_1899
if 
   Actor.Model(2@) == #SHMYCR
else_jump @Noname_1925 
30@ += 1 
:Noname_1925
if 
   Actor.Model(2@) == #VMAFF1
else_jump @Noname_1950 
30@ += 1 
:Noname_1950
if 
   Actor.Model(2@) == #WFYRI
else_jump @Noname_1975 
30@ += 1 
:Noname_1975
if 
   Actor.Model(2@) == #TRIBOSS
else_jump @Noname_2000 
29@ += 1 
:Noname_2000
if 
   Actor.Model(2@) == #TRIADB
else_jump @Noname_2025 
29@ += 1 
:Noname_2025
if 
   Actor.Model(2@) == #TRIADA
else_jump @Noname_2050 
29@ += 1 
:Noname_2050
if 
   Actor.Model(2@) == #DNB3
else_jump @Noname_2075 
29@ += 1 
:Noname_2075
if 
   Actor.Model(2@) == #SOMYRI
else_jump @Noname_2101 
29@ += 1 
:Noname_2101
if 
   Actor.Model(2@) == #SOFYRI
else_jump @Noname_2127 
29@ += 1 
:Noname_2127
1@ += 1 
  1@ > 999 
else_jump @Noname_915 
format 4@ "{FFFFFF}Банды%c{2ea07b} Rifa: %d (%d)%c{098A00} Grove: %d (%d)%c" 10 18@ 27@ 10 14@ 22@ 10 
format 5@ "{c515ff} Ballas: %d (%d)%c{ffde24} Vagos: %d (%d)%c" 17@ 26@ 10 15@ 23@ 10 
format 6@ "{00FFFE} Aztec: %d (%d)%c%c{FFFFFF}Мафии%c{f4b800} LCN: %d (%d)%c" 16@ 24@ 10 10 10 21@ 30@ 10 
format 7@ "{ff0606} Yakuza: %d (%d)%c {b8b6b6}RM: %d (%d)" 20@ 29@ 10 19@ 28@ 
format 8@ "%s%s%s%s" 4@ 5@ 6@ 7@ 
if and
0BDB:  samp is_chat_visible 
8BD5:   not samp is_scoreboard_opened 
   not key_down 116 
   not key_down 121 
else_jump @Noname_2646 
0AF0: 9@ = get_int_from_ini_file "cleo\Checker Criminal.ini" section "Settings" key "X" 
0AF0: 10@ = get_int_from_ini_file "cleo\Checker Criminal.ini" section "Settings" key "Y" 
0B60: convert_game_screen_coords 9@ 10@ to_window_screen_coords 9@ 10@ 
Render.DrawText(11@, 8@, 9@, 10@, -1)
:Noname_2646
jump @Noname_504 
:Noname_2653
   SAMP.IsCommandTyped(13@)
if 
0C18: 0 = strstr string1 13@ string2 "help" 
else_jump @Noname_2694 
call @Noname_10289 0 
SAMP.CmdRet
:Noname_2694
if 
0C18: 0 = strstr string1 13@ string2 "lcn" 
else_jump @Noname_2729 
call @Noname_6246 0 
SAMP.CmdRet
:Noname_2729
if 
0C18: 0 = strstr string1 13@ string2 "rm" 
else_jump @Noname_2763 
call @Noname_5587 0 
SAMP.CmdRet
:Noname_2763
if 
0C18: 0 = strstr string1 13@ string2 "yakuza" 
else_jump @Noname_2801 
call @Noname_4897 0 
SAMP.CmdRet
:Noname_2801
if 
0C18: 0 = strstr string1 13@ string2 "vagos" 
else_jump @Noname_2838 
call @Noname_6909 0 
SAMP.CmdRet
:Noname_2838
if 
0C18: 0 = strstr string1 13@ string2 "ballas" 
else_jump @Noname_2876 
call @Noname_7580 0 
SAMP.CmdRet
:Noname_2876
if 
0C18: 0 = strstr string1 13@ string2 "rifa" 
else_jump @Noname_2912 
call @Noname_8255 0 
SAMP.CmdRet
:Noname_2912
if 
0C18: 0 = strstr string1 13@ string2 "grove" 
else_jump @Noname_2949 
call @Noname_8925 0 
SAMP.CmdRet
:Noname_2949
if 
0C18: 0 = strstr string1 13@ string2 "aztec" 
else_jump @Noname_2986 
call @Noname_9619 0 
SAMP.CmdRet
:Noname_2986
if 
0C18: 0 = strstr string1 13@ string2 "1" 
else_jump @Noname_3019 
call @Noname_3070 0 
SAMP.CmdRet
:Noname_3019
if and
  12@ == 1 
0C18: 0 = strstr string1 13@ string2 "pos" 
else_jump @Noname_3058 
3@ = 1 
SAMP.CmdRet
:Noname_3058
0B12: 12@ = 12@ XOR 1 
SAMP.CmdRet
:Noname_3070
alloc 4@ 4096 
alloc 5@ 4096 
alloc 6@ 4096 
alloc 7@ 4096 
alloc 8@ 4096 
14@ = 0 
15@ = 0 
16@ = 0 
17@ = 0 
18@ = 0 
19@ = 0 
20@ = 0 
21@ = 0 
22@ = 0 
23@ = 0 
24@ = 0 
26@ = 0 
27@ = 0 
28@ = 0 
29@ = 0 
30@ = 0 
1@ = 0 
:Noname_3229
if 
   SAMP.IsPlayerConnected(1@)
else_jump @Noname_4441 
2@ = SAMP.GetPlayerColor(1@)
if 
  2@ == -1442208768 
else_jump @Noname_3281 
14@ += 1 
:Noname_3281
if 
  2@ == -1426072028 
else_jump @Noname_3309 
15@ += 1 
:Noname_3309
if 
  2@ == -1441927681 
else_jump @Noname_3337 
16@ += 1 
:Noname_3337
if 
  2@ == -1429924353 
else_jump @Noname_3365 
17@ += 1 
:Noname_3365
if 
  2@ == -1439784837 
else_jump @Noname_3393 
18@ += 1 
:Noname_3393
if 
  2@ == -1430735178 
else_jump @Noname_3421 
19@ += 1 
:Noname_3421
if 
  2@ == -1426127354 
else_jump @Noname_3449 
20@ += 1 
:Noname_3449
if 
  2@ == -1426802688 
else_jump @Noname_3477 
21@ += 1 
:Noname_3477
2@ = SAMP.GetActorHandleByPlayerID(1@)
if 
   not 2@ == -1 
else_jump @Noname_4441 
if 
   Actor.Model(2@) == #FAM1
else_jump @Noname_3528 
22@ += 1 
:Noname_3528
if 
   Actor.Model(2@) == #FAM2
else_jump @Noname_3553 
22@ += 1 
:Noname_3553
if 
   Actor.Model(2@) == #FAM3
else_jump @Noname_3578 
22@ += 1 
:Noname_3578
if 
   Actor.Model(2@) == 269
else_jump @Noname_3604 
22@ += 1 
:Noname_3604
if 
   Actor.Model(2@) == 270
else_jump @Noname_3630 
22@ += 1 
:Noname_3630
if 
   Actor.Model(2@) == #OFYST
else_jump @Noname_3655 
22@ += 1 
:Noname_3655
if 
   Actor.Model(2@) == 271
else_jump @Noname_3681 
22@ += 1 
:Noname_3681
if 
   Actor.Model(2@) == #LSV1
else_jump @Noname_3706 
23@ += 1 
:Noname_3706
if 
   Actor.Model(2@) == #LSV2
else_jump @Noname_3731 
23@ += 1 
:Noname_3731
if 
   Actor.Model(2@) == #LSV3
else_jump @Noname_3756 
23@ += 1 
:Noname_3756
if 
   Actor.Model(2@) == #COPGRL3
else_jump @Noname_3782 
23@ += 1 
:Noname_3782
if 
   Actor.Model(2@) == #VLA2
else_jump @Noname_3807 
24@ += 1 
:Noname_3807
if 
   Actor.Model(2@) == #VLA3
else_jump @Noname_3832 
24@ += 1 
:Noname_3832
if 
   Actor.Model(2@) == #VLA1
else_jump @Noname_3857 
24@ += 1 
:Noname_3857
if 
   Actor.Model(2@) == #HFYST
else_jump @Noname_3882 
24@ += 1 
:Noname_3882
if 
   Actor.Model(2@) == #SFR1
else_jump @Noname_3908 
27@ += 1 
:Noname_3908
if 
   Actor.Model(2@) == #SFR2
else_jump @Noname_3934 
27@ += 1 
:Noname_3934
if 
   Actor.Model(2@) == #SFR3
else_jump @Noname_3960 
27@ += 1 
:Noname_3960
if 
   Actor.Model(2@) == #SOFYST
else_jump @Noname_3986 
27@ += 1 
:Noname_3986
if 
   Actor.Model(2@) == #BALLAS1
else_jump @Noname_4011 
26@ += 1 
:Noname_4011
if 
   Actor.Model(2@) == #BALLAS2
else_jump @Noname_4036 
26@ += 1 
:Noname_4036
if 
   Actor.Model(2@) == #BALLAS3
else_jump @Noname_4061 
26@ += 1 
:Noname_4061
if 
   Actor.Model(2@) == #GANGRL3
else_jump @Noname_4087 
26@ += 1 
:Noname_4087
if 
   Actor.Model(2@) == #MAFFA
else_jump @Noname_4112 
28@ += 1 
:Noname_4112
if 
   Actor.Model(2@) == #MAFFB
else_jump @Noname_4137 
28@ += 1 
:Noname_4137
if 
   Actor.Model(2@) == #VMAFF2
else_jump @Noname_4162 
28@ += 1 
:Noname_4162
if 
   Actor.Model(2@) == #VWFYWAI
else_jump @Noname_4188 
28@ += 1 
:Noname_4188
if 
   Actor.Model(2@) == #MAFBOSS
else_jump @Noname_4213 
30@ += 1 
:Noname_4213
if 
   Actor.Model(2@) == #SHMYCR
else_jump @Noname_4239 
30@ += 1 
:Noname_4239
if 
   Actor.Model(2@) == #VMAFF1
else_jump @Noname_4264 
30@ += 1 
:Noname_4264
if 
   Actor.Model(2@) == #WFYRI
else_jump @Noname_4289 
30@ += 1 
:Noname_4289
if 
   Actor.Model(2@) == #TRIBOSS
else_jump @Noname_4314 
29@ += 1 
:Noname_4314
if 
   Actor.Model(2@) == #TRIADB
else_jump @Noname_4339 
29@ += 1 
:Noname_4339
if 
   Actor.Model(2@) == #TRIADA
else_jump @Noname_4364 
29@ += 1 
:Noname_4364
if 
   Actor.Model(2@) == #DNB3
else_jump @Noname_4389 
29@ += 1 
:Noname_4389
if 
   Actor.Model(2@) == #SOMYRI
else_jump @Noname_4415 
29@ += 1 
:Noname_4415
if 
   Actor.Model(2@) == #SOFYRI
else_jump @Noname_4441 
29@ += 1 
:Noname_4441
1@ += 1 
  1@ > 999 
else_jump @Noname_3229 
format 4@ "{FFFFFF}Банды%c{2ea07b} Rifa: %d (%d)%c{098A00} Grove: %d (%d)%c" 10 18@ 27@ 10 14@ 22@ 10 
format 5@ "{c515ff} Ballas: %d (%d)%c{ffde24} Vagos: %d (%d)%c" 17@ 26@ 10 15@ 23@ 10 
format 6@ "{00FFFE} Aztec: %d (%d)%c%c{FFFFFF}Мафии%c{f4b800} LCN: %d (%d)%c" 16@ 24@ 10 10 10 21@ 30@ 10 
format 7@ "{ff0606} Yakuza: %d (%d)%c {b8b6b6}RM: %d (%d)" 20@ 29@ 10 19@ 28@ 
format 8@ "%s%s%s%s" 4@ 5@ 6@ 7@ 
SAMP.ShowDialog(111, "Checker Criminal for SAMP-RP", 8@, "Закрыть", "", DIALOG_STYLE_MSGBOX)
free 4@ 
free 5@ 
free 6@ 
free 7@ 
free 8@ 
ret 0 
:Noname_4897
4@ = 0 
5@ = 0 
alloc 6@ 512 
alloc 8@ 512 
alloc 9@ 5000 
alloc 10@ 5000 
format 9@ " %c{FFFFFF}Игроки с клистами Yakuza%c%c" 10 9 10 
format 10@ "{FFFFFF}Игроки со скинами Yakuza (рядом)%c%c" 9 10 
0@ = 0 
:Noname_5059
if 
   SAMP.IsPlayerConnected(0@)
else_jump @Noname_5309 
1@ = SAMP.GetPlayerColor(0@)
2@ = SAMP.GetPlayerNickname(0@)
3@ = SAMP.GetPlayerScore(0@)
if 
  1@ == -1426127354 
else_jump @Noname_5174 
4@ += 1 
format 8@ "%s(%d)%c[LVL:%d]%c" 2@ 0@ 9 3@ 10 
0C15: strcat destination 9@ source 8@ 
:Noname_5174
1@ = SAMP.GetActorHandleByPlayerID(0@)
if 
   not 1@ == -1 
else_jump @Noname_5309 
if or
   Actor.Model(1@) == #TRIBOSS
   Actor.Model(1@) == #TRIADB
   Actor.Model(1@) == #TRIADA
   Actor.Model(1@) == #DNB3
   Actor.Model(1@) == #SOMYRI
   Actor.Model(1@) == #SOFYRI
else_jump @Noname_5309 
5@ += 1 
format 8@ "%s(%d)%c[LVL:%d]%c" 2@ 0@ 9 3@ 10 
0C15: strcat destination 10@ source 8@ 
:Noname_5309
0@ += 1 
  0@ > 1001 
else_jump @Noname_5059 
if 
  4@ == 0 
else_jump @Noname_5416 
format 9@ " %c{FFFFFF}Игроки с клистами Yakuza%c%cНе найдено%c" 10 9 10 10 
:Noname_5416
if 
  5@ == 0 
else_jump @Noname_5504 
format 10@ "{FFFFFF}Игроки со скинами Yakuza (рядом)%c%cНе найдено%c" 9 10 10 
:Noname_5504
0C15: strcat destination 10@ source 9@ 
SAMP.ShowDialog(111, "Checker Criminal for SAMP-RP", 10@, "Закрыть", "", 4)
free 6@ 
free 8@ 
free 9@ 
free 10@ 
ret 0 
:Noname_5587
4@ = 0 
5@ = 0 
alloc 6@ 512 
alloc 8@ 512 
alloc 9@ 5000 
alloc 10@ 5000 
format 9@ " %c{FFFFFF}Игроки с клистами RM%c%c" 10 9 10 
format 10@ "{FFFFFF}Игроки со скинами RM (рядом)%c%c" 9 10 
0@ = 0 
:Noname_5741
if 
   SAMP.IsPlayerConnected(0@)
else_jump @Noname_5976 
1@ = SAMP.GetPlayerColor(0@)
2@ = SAMP.GetPlayerNickname(0@)
3@ = SAMP.GetPlayerScore(0@)
if 
  1@ == -1430735178 
else_jump @Noname_5856 
4@ += 1 
format 8@ "%s(%d)%c[LVL:%d]%c" 2@ 0@ 9 3@ 10 
0C15: strcat destination 9@ source 8@ 
:Noname_5856
1@ = SAMP.GetActorHandleByPlayerID(0@)
if 
   not 1@ == -1 
else_jump @Noname_5976 
if or
   Actor.Model(1@) == #MAFFA
   Actor.Model(1@) == #MAFFB
   Actor.Model(1@) == #VMAFF2
   Actor.Model(1@) == #VWFYWAI
else_jump @Noname_5976 
5@ += 1 
format 8@ "%s(%d)%c[LVL:%d]%c" 2@ 0@ 9 3@ 10 
0C15: strcat destination 10@ source 8@ 
:Noname_5976
0@ += 1 
  0@ > 1001 
else_jump @Noname_5741 
if 
  4@ == 0 
else_jump @Noname_6079 
format 9@ " %c{FFFFFF}Игроки с клистами RM%c%cНе найдено%c" 10 9 10 10 
:Noname_6079
if 
  5@ == 0 
else_jump @Noname_6163 
format 10@ "{FFFFFF}Игроки со скинами RM (рядом)%c%cНе найдено%c" 9 10 10 
:Noname_6163
0C15: strcat destination 10@ source 9@ 
SAMP.ShowDialog(111, "Checker Criminal for SAMP-RP", 10@, "Закрыть", "", 4)
free 6@ 
free 8@ 
free 9@ 
free 10@ 
ret 0 
:Noname_6246
4@ = 0 
5@ = 0 
alloc 6@ 512 
alloc 8@ 512 
alloc 9@ 5000 
alloc 10@ 5000 
format 9@ " %c{FFFFFF}Игроки с клистами LCN%c%c" 10 9 10 
format 10@ "{FFFFFF}Игроки со скинами LCN (рядом)%c%c" 9 10 
0@ = 0 
:Noname_6402
if 
   SAMP.IsPlayerConnected(0@)
else_jump @Noname_6637 
1@ = SAMP.GetPlayerColor(0@)
2@ = SAMP.GetPlayerNickname(0@)
3@ = SAMP.GetPlayerScore(0@)
if 
  1@ == -1426802688 
else_jump @Noname_6517 
4@ += 1 
format 8@ "%s(%d)%c[LVL:%d]%c" 2@ 0@ 9 3@ 10 
0C15: strcat destination 9@ source 8@ 
:Noname_6517
1@ = SAMP.GetActorHandleByPlayerID(0@)
if 
   not 1@ == -1 
else_jump @Noname_6637 
if or
   Actor.Model(1@) == #MAFBOSS
   Actor.Model(1@) == #SHMYCR
   Actor.Model(1@) == #VMAFF1
   Actor.Model(1@) == #WFYRI
else_jump @Noname_6637 
5@ += 1 
format 8@ "%s(%d)%c[LVL:%d]%c" 2@ 0@ 9 3@ 10 
0C15: strcat destination 10@ source 8@ 
:Noname_6637
0@ += 1 
  0@ > 1001 
else_jump @Noname_6402 
if 
  4@ == 0 
else_jump @Noname_6741 
format 9@ " %c{FFFFFF}Игроки с клистами LCN%c%cНе найдено%c" 10 9 10 10 
:Noname_6741
if 
  5@ == 0 
else_jump @Noname_6826 
format 10@ "{FFFFFF}Игроки со скинами LCN (рядом)%c%cНе найдено%c" 9 10 10 
:Noname_6826
0C15: strcat destination 10@ source 9@ 
SAMP.ShowDialog(111, "Checker Criminal for SAMP-RP", 10@, "Закрыть", "", 4)
free 6@ 
free 8@ 
free 9@ 
free 10@ 
ret 0 
:Noname_6909
4@ = 0 
5@ = 0 
alloc 6@ 512 
alloc 8@ 512 
alloc 9@ 5000 
alloc 10@ 5000 
format 9@ " %c{FFFFFF}Игроки с клистами Vagos%c%c" 10 9 10 
format 10@ "{FFFFFF}Игроки со скинами Vagos (рядом)%c%c" 9 10 
0@ = 0 
:Noname_7069
if 
   SAMP.IsPlayerConnected(0@)
else_jump @Noname_7304 
1@ = SAMP.GetPlayerColor(0@)
2@ = SAMP.GetPlayerNickname(0@)
3@ = SAMP.GetPlayerScore(0@)
if 
  1@ == -1429924353 
else_jump @Noname_7184 
4@ += 1 
format 8@ "%s(%d)%c[LVL:%d]%c" 2@ 0@ 9 3@ 10 
0C15: strcat destination 9@ source 8@ 
:Noname_7184
1@ = SAMP.GetActorHandleByPlayerID(0@)
if 
   not 1@ == -1 
else_jump @Noname_7304 
if or
   Actor.Model(1@) == #LSV1
   Actor.Model(1@) == #LSV2
   Actor.Model(1@) == #LSV3
   Actor.Model(1@) == #COPGRL3
else_jump @Noname_7304 
5@ += 1 
format 8@ "%s(%d)%c[LVL:%d]%c" 2@ 0@ 9 3@ 10 
0C15: strcat destination 10@ source 8@ 
:Noname_7304
0@ += 1 
  0@ > 1001 
else_jump @Noname_7069 
if 
  4@ == 0 
else_jump @Noname_7410 
format 9@ " %c{FFFFFF}Игроки с клистами Vagos%c%cНе найдено%c" 10 9 10 10 
:Noname_7410
if 
  5@ == 0 
else_jump @Noname_7497 
format 10@ "{FFFFFF}Игроки со скинами Vagos (рядом)%c%cНе найдено%c" 9 10 10 
:Noname_7497
0C15: strcat destination 10@ source 9@ 
SAMP.ShowDialog(111, "Checker Criminal for SAMP-RP", 10@, "Закрыть", "", 4)
free 6@ 
free 8@ 
free 9@ 
free 10@ 
ret 0 
:Noname_7580
4@ = 0 
5@ = 0 
alloc 6@ 512 
alloc 8@ 512 
alloc 9@ 5000 
alloc 10@ 5000 
format 9@ " %c{FFFFFF}Игроки с клистами Ballas%c%c" 10 9 10 
format 10@ "{FFFFFF}Игроки со скинами Ballas (рядом)%c%c" 9 10 
0@ = 0 
:Noname_7742
if 
   SAMP.IsPlayerConnected(0@)
else_jump @Noname_7977 
1@ = SAMP.GetPlayerColor(0@)
2@ = SAMP.GetPlayerNickname(0@)
3@ = SAMP.GetPlayerScore(0@)
if 
  1@ == -1429924353 
else_jump @Noname_7857 
4@ += 1 
format 8@ "%s(%d)%c[LVL:%d]%c" 2@ 0@ 9 3@ 10 
0C15: strcat destination 9@ source 8@ 
:Noname_7857
1@ = SAMP.GetActorHandleByPlayerID(0@)
if 
   not 1@ == -1 
else_jump @Noname_7977 
if or
   Actor.Model(1@) == #BALLAS1
   Actor.Model(1@) == #BALLAS2
   Actor.Model(1@) == #BALLAS3
   Actor.Model(1@) == #GANGRL3
else_jump @Noname_7977 
5@ += 1 
format 8@ "%s(%d)%c[LVL:%d]%c" 2@ 0@ 9 3@ 10 
0C15: strcat destination 10@ source 8@ 
:Noname_7977
0@ += 1 
  0@ > 1001 
else_jump @Noname_7742 
if 
  4@ == 0 
else_jump @Noname_8084 
format 9@ " %c{FFFFFF}Игроки с клистами Ballas%c%cНе найдено%c" 10 9 10 10 
:Noname_8084
if 
  5@ == 0 
else_jump @Noname_8172 
format 10@ "{FFFFFF}Игроки со скинами Ballas (рядом)%c%cНе найдено%c" 9 10 10 
:Noname_8172
0C15: strcat destination 10@ source 9@ 
SAMP.ShowDialog(111, "Checker Criminal for SAMP-RP", 10@, "Закрыть", "", 4)
free 6@ 
free 8@ 
free 9@ 
free 10@ 
ret 0 
:Noname_8255
4@ = 0 
5@ = 0 
alloc 6@ 512 
alloc 8@ 512 
alloc 9@ 5000 
alloc 10@ 5000 
format 9@ " %c{FFFFFF}Игроки с клистами Rifa%c%c" 10 9 10 
format 10@ "{FFFFFF}Игроки со скинами Rifa (рядом)%c%c" 9 10 
0@ = 0 
:Noname_8413
if 
   SAMP.IsPlayerConnected(0@)
else_jump @Noname_8651 
1@ = SAMP.GetPlayerColor(0@)
2@ = SAMP.GetPlayerNickname(0@)
3@ = SAMP.GetPlayerScore(0@)
if 
  1@ == -1439784837 
else_jump @Noname_8528 
4@ += 1 
format 8@ "%s(%d)%c[LVL:%d]%c" 2@ 0@ 9 3@ 10 
0C15: strcat destination 9@ source 8@ 
:Noname_8528
1@ = SAMP.GetActorHandleByPlayerID(0@)
if 
   not 1@ == -1 
else_jump @Noname_8651 
if or
   Actor.Model(1@) == #SFR1
   Actor.Model(1@) == #SFR2
   Actor.Model(1@) == #SFR3
   Actor.Model(1@) == 266
else_jump @Noname_8651 
5@ += 1 
format 8@ "%s(%d)%c[LVL:%d]%c" 2@ 0@ 9 3@ 10 
0C15: strcat destination 10@ source 8@ 
:Noname_8651
0@ += 1 
  0@ > 1001 
else_jump @Noname_8413 
if 
  4@ == 0 
else_jump @Noname_8756 
format 9@ " %c{FFFFFF}Игроки с клистами Rifa%c%cНе найдено%c" 10 9 10 10 
:Noname_8756
if 
  5@ == 0 
else_jump @Noname_8842 
format 10@ "{FFFFFF}Игроки со скинами Rifa (рядом)%c%cНе найдено%c" 9 10 10 
:Noname_8842
0C15: strcat destination 10@ source 9@ 
SAMP.ShowDialog(111, "Checker Criminal for SAMP-RP", 10@, "Закрыть", "", 4)
free 6@ 
free 8@ 
free 9@ 
free 10@ 
ret 0 
:Noname_8925
4@ = 0 
5@ = 0 
alloc 6@ 512 
alloc 8@ 512 
alloc 9@ 5000 
alloc 10@ 5000 
format 9@ " %c{FFFFFF}Игроки с клистами Grove%c%c" 10 9 10 
format 10@ "{FFFFFF}Игроки со скинами Grove (рядом)%c%c" 9 10 
0@ = 0 
:Noname_9085
if 
   SAMP.IsPlayerConnected(0@)
else_jump @Noname_9343 
1@ = SAMP.GetPlayerColor(0@)
2@ = SAMP.GetPlayerNickname(0@)
3@ = SAMP.GetPlayerScore(0@)
if 
  1@ == -1442208768 
else_jump @Noname_9200 
4@ += 1 
format 8@ "%s(%d)%c[LVL:%d]%c" 2@ 0@ 9 3@ 10 
0C15: strcat destination 9@ source 8@ 
:Noname_9200
1@ = SAMP.GetActorHandleByPlayerID(0@)
if 
   not 1@ == -1 
else_jump @Noname_9343 
if or
   Actor.Model(1@) == #FAM1
   Actor.Model(1@) == #FAM2
   Actor.Model(1@) == #FAM3
   Actor.Model(1@) == 269
   Actor.Model(1@) == 270
   Actor.Model(1@) == #OFYST
   Actor.Model(1@) == 271
else_jump @Noname_9343 
5@ += 1 
format 8@ "%s(%d)%c[LVL:%d]%c" 2@ 0@ 9 3@ 10 
0C15: strcat destination 10@ source 8@ 
:Noname_9343
0@ += 1 
  0@ > 1001 
else_jump @Noname_9085 
if 
  4@ == 0 
else_jump @Noname_9449 
format 9@ " %c{FFFFFF}Игроки с клистами Grove%c%cНе найдено%c" 10 9 10 10 
:Noname_9449
if 
  5@ == 0 
else_jump @Noname_9536 
format 10@ "{FFFFFF}Игроки со скинами Grove (рядом)%c%cНе найдено%c" 9 10 10 
:Noname_9536
0C15: strcat destination 10@ source 9@ 
SAMP.ShowDialog(111, "Checker Criminal for SAMP-RP", 10@, "Закрыть", "", 4)
free 6@ 
free 8@ 
free 9@ 
free 10@ 
ret 0 
:Noname_9619
4@ = 0 
5@ = 0 
alloc 6@ 512 
alloc 8@ 512 
alloc 9@ 5000 
alloc 10@ 5000 
format 9@ " %c{FFFFFF}Игроки с клистами Aztec%c%c" 10 9 10 
format 10@ "{FFFFFF}Игроки со скинами Aztec (рядом)%c%c" 9 10 
0@ = 0 
:Noname_9779
if 
   SAMP.IsPlayerConnected(0@)
else_jump @Noname_10013 
1@ = SAMP.GetPlayerColor(0@)
2@ = SAMP.GetPlayerNickname(0@)
3@ = SAMP.GetPlayerScore(0@)
if 
  1@ == -1441927681 
else_jump @Noname_9894 
4@ += 1 
format 8@ "%s(%d)%c[LVL:%d]%c" 2@ 0@ 9 3@ 10 
0C15: strcat destination 9@ source 8@ 
:Noname_9894
1@ = SAMP.GetActorHandleByPlayerID(0@)
if 
   not 1@ == -1 
else_jump @Noname_10013 
if or
   Actor.Model(1@) == #VLA2
   Actor.Model(1@) == #VLA3
   Actor.Model(1@) == #VLA1
   Actor.Model(1@) == #HFYST
else_jump @Noname_10013 
5@ += 1 
format 8@ "%s(%d)%c[LVL:%d]%c" 2@ 0@ 9 3@ 10 
0C15: strcat destination 10@ source 8@ 
:Noname_10013
0@ += 1 
  0@ > 1001 
else_jump @Noname_9779 
if 
  4@ == 0 
else_jump @Noname_10119 
format 9@ " %c{FFFFFF}Игроки с клистами Aztec%c%cНе найдено%c" 10 9 10 10 
:Noname_10119
if 
  5@ == 0 
else_jump @Noname_10206 
format 10@ "{FFFFFF}Игроки со скинами Aztec (рядом)%c%cНе найдено%c" 9 10 10 
:Noname_10206
0C15: strcat destination 10@ source 9@ 
SAMP.ShowDialog(111, "Checker Criminal for SAMP-RP", 10@, "Закрыть", "", 4)
free 6@ 
free 8@ 
free 9@ 
free 10@ 
ret 0 
:Noname_10289
0AC6: 0@ = label @Noname_10354 offset 
SAMP.ShowDialog(111, "Checker Criminal for SAMP-RP", 0@, "Закрыть", "", DIALOG_STYLE_MSGBOX)
ret 0 
:Noname_10354
hex
 20 7B 46 46 46 46 46 46 7D C2 F1 E5 20 EA EE EC
 E0 ED E4 FB 20 EC E0 EB E5 ED FC EA E8 EC E8 20
 E1 F3 EA E2 E0 EC E8 21 0A 20 7B 46 46 46 46 46
 46 7D 2F 63 63 20 2D 20 C2 EA EB 2F C2 FB EA EB
 20 F7 E5 EA E5 F0 20 EA F0 E8 EC E8 ED E0 EB E0
 20 ED E0 20 F5 F3 E4 E5 0A 20 7B 46 46 46 46 46
 46 7D 2F 63 63 20 31 20 2D 20 D2 EE F2 20 E6 E5
 20 F7 E5 EA E5 F0 2C 20 F2 EE EB FC EA EE 20 E2
 20 E4 E8 E0 EB EE E3 E5 0A 20 7B 46 46 46 46 46
 46 7D 2F 63 63 20 70 6F 73 20 2D 20 D1 EC E5 ED
 E8 F2 FC 20 EF EE E7 E8 F6 E8 FE 20 F7 E5 EA E5
 F0 E0 20 28 CB CA CC 20 F7 F2 EE E1 FB 20 F1 EE
 F5 F0 E0 ED E8 F2 FC 29 0A 20 7B 46 46 46 46 46
 46 7D 20 0A 20 D2 E0 EA 20 E6 E5 20 EC EE E6 ED
 EE 20 F1 EC EE F2 F0 E5 F2 FC 20 CD E8 EA ED E5
 E9 EC FB 20 E8 20 D3 F0 EE E2 ED E8 20 E2 20 E4
 E8 E0 EB EE E3 E5 20 2D 20 EA EE EC E0 ED E4 E0
 EC E8 20 ED E8 E6 E5 0A 20 7B 32 65 61 30 37 62
 7D 2F F1 F1 20 72 69 66 61 0A 20 7B 30 39 38 41
 30 30 7D 2F F1 F1 20 67 72 6F 76 65 0A 20 7B 63
 35 31 35 66 66 7D 2F F1 F1 20 62 61 6C 6C 61 73
 0A 20 7B 66 66 64 65 32 34 7D 2F F1 F1 20 76 61
 67 6F 73 0A 20 7B 30 30 46 46 46 45 7D 2F F1 F1
 20 61 7A 74 65 63 0A 20 7B 66 34 62 38 30 30 7D
 2F F1 F1 20 6C 63 6E 0A 20 7B 66 66 30 36 30 36
 7D 2F F1 F1 20 79 61 6B 75 7A 61 0A 20 7B 62 38
 62 36 62 36 7D 2F F1 F1 20 72 6D 0A 20 7B 46 46
 46 46 46 46 7D C2 ED E8 EC E0 ED E8 E5 21 20 C8
 ED F4 EE F0 EC E0 F6 E8 FF 20 E8 E7 20 F7 E5 EA
 E5 F0 E0 20 EC EE E6 E5 F2 20 E1 FB F2 FC 20 ED
 E5 20 F2 EE F7 ED EE E9 0A 20 7B 46 46 46 46 46
 46 7D C8 E7 2D E7 E0 20 E2 F1 FF EA E8 F5 20 E1
 E8 F7 E5 E9 20 EA EE F2 EE F0 FB E5 20 E2 EA EB
 FE F7 E0 FE F2 20 EA EB E8 F1 F2 FB 20 EE F0 E3
 E0 ED E8 E7 E0 F6 E8 E9 0A 20 7B 46 46 46 46 46
 46 7D 20 0A 20 7B 46 46 46 46 46 46 7D C2 20 F1
 EA F0 E8 EF F2 E5 20 E5 F1 F2 FC 20 F4 F3 ED EA
 F6 E8 FF 20 27 D7 E8 F1 F2 FB E9 20 F1 EA F0 E8
 ED F8 EE F2 27 0A 20 7B 46 46 46 46 46 46 7D CA
 E0 EA 20 EE ED 20 F0 E0 E1 EE F2 E0 E5 F2 3F 0A
 20 7B 46 46 46 46 46 46 7D D7 E5 EA E5 F0 20 EF
 F0 EE EF E0 E4 E0 E5 F2 2C 20 E4 E5 EB E0 E5 F2
 F1 FF 20 F1 EA F0 E8 ED 20 E8 20 EF EE F2 EE EC
 20 EE ED 20 E2 EA EB FE F7 E0 E5 F2 F1 FF 20 F1
 ED EE E2 E0 0A 20 7B 46 46 46 46 46 46 7D D0 E0
 E1 EE F2 E0 E5 F2 20 F2 EE EB FC EA EE 20 ED E0
 20 46 38 2C 20 E0 20 F1 20 62 61 6E 64 69 63 61
 6D 20 E8 20 66 72 61 70 73 20 ED E5 20 EF F0 EE
 EA E0 F2 E8 F2 21 00
end
:Noname_11129
0AA2: 30@ = load_library "samp.dll" // IF and SET 
0A8E: 1@ = 30@ + 457971 // int 
0A8C: write_memory 1@ size 6 value -1869574000 virtual_protect 1 
0A8E: 2@ = 30@ + 458004 // int 
0A8C: write_memory 2@ size 6 value -1869574000 virtual_protect 1 
0A8E: 3@ = 30@ + 458280 // int 
0A8C: write_memory 3@ size 2 value 37008 virtual_protect 1 
0A8E: 4@ = 30@ + 462648 // int 
0A8C: write_memory 4@ size 2 value 37008 virtual_protect 1 
0A8E: 5@ = 30@ + 462372 // int 
0A8C: write_memory 5@ size 6 value -1869574000 virtual_protect 1 
0AA3: free_library 30@ 
ret 0 
:Noname_11289
0AA2: 30@ = load_library "samp.dll" // IF and SET 
0A8E: 1@ = 30@ + 457971 // int 
0A8C: write_memory 1@ size 4 value 24216591 virtual_protect 1 
0A8E: 2@ = 1@ + 4 // int 
0A8C: write_memory 2@ size 2 value 0 virtual_protect 1 
0A8E: 3@ = 30@ + 458004 // int 
0A8C: write_memory 3@ size 4 value 22053903 virtual_protect 1 
0A8E: 4@ = 3@ + 4 // int 
0A8C: write_memory 4@ size 2 value 0 virtual_protect 1 
0A8E: 5@ = 30@ + 458280 // int 
0A8C: write_memory 5@ size 2 value 16500 virtual_protect 1 
0A8E: 6@ = 30@ + 462648 // int 
0A8C: write_memory 6@ size 2 value 24948 virtual_protect 1 
0A8E: 7@ = 30@ + 462372 // int 
0A8C: write_memory 7@ size 4 value 24218127 virtual_protect 1 
0A8E: 8@ = 7@ + 4 // int 
0A8C: write_memory 8@ size 2 value 0 virtual_protect 1 
0AA3: free_library 30@ 
ret 0 
free 4@ 
free 5@ 
free 6@ 
free 7@ 
free 8@ 
free 13@

 

[Kotovasya]

Вопрос - Вопросы по CLEO-скриптингу^{(https://blast.hk/threads/13410/page-334#post-167192)} относительно нормальный код, проверки добавь на текст, если нужны

На нем и делал( Просто тут скомпилированный у меня( Переделаю в читабельный

 

[randazzo]

Как сделать

Если игрок не в интерьере
chatmsg "Зайди в инту" -1
Если игрок в интерьере
chatmsg "Выйди из интерьера" -1
И в этот момент когда игрок выйдет из инты сразу проходит мой код

077E: get_active_interior_to 0@

0 - не в интерьере, >0 - в интерьере

 

[D3.Pheonix]

Подскажите, пожалуйста, как в коде ниже записаны цвета клистов и как мне из hex их перевести.

// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}
//-------------MAIN---------------
0000: NOP 
if 
0@ = SAMP.Base()
else_jump @Noname_20 
0A93: end_custom_thread 
:Noname_20
wait 0 
   SAMP.Available
else_jump @Noname_20 
if 
8AAB:   not file_exists "cleo\Checker Criminal.ini" 
else_jump @Noname_319 
0AF1: write_int 1 to_ini_file "cleo\Checker Criminal.ini" section "Settings" key "CLEAR_SCREEN" 
0AF1: write_int 10 to_ini_file "cleo\Checker Criminal.ini" section "Settings" key "HEIGHT" 
0AF1: write_int 13 to_ini_file "cleo\Checker Criminal.ini" section "Settings" key "FLAGS" 
0AF1: write_int 1075178818 to_ini_file "cleo\Checker Criminal.ini" section "Settings" key "X" 
0AF1: write_int 1132123477 to_ini_file "cleo\Checker Criminal.ini" section "Settings" key "Y" 
:Noname_319
0AF0: 2@ = get_int_from_ini_file "cleo\Checker Criminal.ini" section "Settings" key "HEIGHT" 
0AF0: 3@ = get_int_from_ini_file "cleo\Checker Criminal.ini" section "Settings" key "FLAGS" 
11@ = Render.CreateFont("Segoe UI", 2@, 3@)
2@ = 0 
3@ = 0 
0B34: samp register_client_command "cc" to_label @Noname_2653 
alloc 4@ 4096 
alloc 5@ 4096 
alloc 6@ 4096 
alloc 7@ 4096 
alloc 8@ 4096 
:Noname_504
wait 0 
0AF0: 14@ = get_int_from_ini_file "cleo\Checker Criminal.ini" section "Settings" key "CLEAR_SCREEN" 
if and
  12@ == 1 
  14@ == 1 
key_down 119 
else_jump @Noname_618 
call @Noname_11289 0 
wait 1000 
call @Noname_11129 0 
:Noname_618
if 
  3@ == 1 
else_jump @Noname_778 
SAMP.SetCursorMode(1)
0B5E: get_cursor_pos 9@ 10@ 
0B5F: convert_window_screen_coords 9@ 10@ to_game_screen_coords 9@ 10@ 
0AF1: write_int 9@ to_ini_file "cleo\Checker Criminal.ini" section "Settings" key "X" 
0AF1: write_int 10@ to_ini_file "cleo\Checker Criminal.ini" section "Settings" key "Y" 
if 
key_down 1 
else_jump @Noname_778 
3@ = 0 
SAMP.SetCursorMode(0)
:Noname_778
if 
  12@ == 1 
else_jump @Noname_2646 
14@ = 0 
15@ = 0 
16@ = 0 
17@ = 0 
18@ = 0 
19@ = 0 
20@ = 0 
21@ = 0 
22@ = 0 
23@ = 0 
24@ = 0 
26@ = 0 
27@ = 0 
28@ = 0 
29@ = 0 
30@ = 0 
1@ = 0 
:Noname_915
if 
   SAMP.IsPlayerConnected(1@)
else_jump @Noname_2127 
2@ = SAMP.GetPlayerColor(1@)
if 
  2@ == -1442208768 
else_jump @Noname_967 
14@ += 1 
:Noname_967
if 
  2@ == -1426072028 
else_jump @Noname_995 
15@ += 1 
:Noname_995
if 
  2@ == -1441927681 
else_jump @Noname_1023 
16@ += 1 
:Noname_1023
if 
  2@ == -1429924353 
else_jump @Noname_1051 
17@ += 1 
:Noname_1051
if 
  2@ == -1439784837 
else_jump @Noname_1079 
18@ += 1 
:Noname_1079
if 
  2@ == -1430735178 
else_jump @Noname_1107 
19@ += 1 
:Noname_1107
if 
  2@ == -1426127354 
else_jump @Noname_1135 
20@ += 1 
:Noname_1135
if 
  2@ == -1426802688 
else_jump @Noname_1163 
21@ += 1 
:Noname_1163
2@ = SAMP.GetActorHandleByPlayerID(1@)
if 
   not 2@ == -1 
else_jump @Noname_2127 
if 
   Actor.Model(2@) == #FAM1
else_jump @Noname_1214 
22@ += 1 
:Noname_1214
if 
   Actor.Model(2@) == #FAM2
else_jump @Noname_1239 
22@ += 1 
:Noname_1239
if 
   Actor.Model(2@) == #FAM3
else_jump @Noname_1264 
22@ += 1 
:Noname_1264
if 
   Actor.Model(2@) == 269
else_jump @Noname_1290 
22@ += 1 
:Noname_1290
if 
   Actor.Model(2@) == 270
else_jump @Noname_1316 
22@ += 1 
:Noname_1316
if 
   Actor.Model(2@) == #OFYST
else_jump @Noname_1341 
22@ += 1 
:Noname_1341
if 
   Actor.Model(2@) == 271
else_jump @Noname_1367 
22@ += 1 
:Noname_1367
if 
   Actor.Model(2@) == #LSV1
else_jump @Noname_1392 
23@ += 1 
:Noname_1392
if 
   Actor.Model(2@) == #LSV2
else_jump @Noname_1417 
23@ += 1 
:Noname_1417
if 
   Actor.Model(2@) == #LSV3
else_jump @Noname_1442 
23@ += 1 
:Noname_1442
if 
   Actor.Model(2@) == #COPGRL3
else_jump @Noname_1468 
23@ += 1 
:Noname_1468
if 
   Actor.Model(2@) == #VLA2
else_jump @Noname_1493 
24@ += 1 
:Noname_1493
if 
   Actor.Model(2@) == #VLA3
else_jump @Noname_1518 
24@ += 1 
:Noname_1518
if 
   Actor.Model(2@) == #VLA1
else_jump @Noname_1543 
24@ += 1 
:Noname_1543
if 
   Actor.Model(2@) == #HFYST
else_jump @Noname_1568 
24@ += 1 
:Noname_1568
if 
   Actor.Model(2@) == #SFR1
else_jump @Noname_1594 
27@ += 1 
:Noname_1594
if 
   Actor.Model(2@) == #SFR2
else_jump @Noname_1620 
27@ += 1 
:Noname_1620
if 
   Actor.Model(2@) == #SFR3
else_jump @Noname_1646 
27@ += 1 
:Noname_1646
if 
   Actor.Model(2@) == #SOFYST
else_jump @Noname_1672 
27@ += 1 
:Noname_1672
if 
   Actor.Model(2@) == #BALLAS1
else_jump @Noname_1697 
26@ += 1 
:Noname_1697
if 
   Actor.Model(2@) == #BALLAS2
else_jump @Noname_1722 
26@ += 1 
:Noname_1722
if 
   Actor.Model(2@) == #BALLAS3
else_jump @Noname_1747 
26@ += 1 
:Noname_1747
if 
   Actor.Model(2@) == #GANGRL3
else_jump @Noname_1773 
26@ += 1 
:Noname_1773
if 
   Actor.Model(2@) == #MAFFA
else_jump @Noname_1798 
28@ += 1 
:Noname_1798
if 
   Actor.Model(2@) == #MAFFB
else_jump @Noname_1823 
28@ += 1 
:Noname_1823
if 
   Actor.Model(2@) == #VMAFF2
else_jump @Noname_1848 
28@ += 1 
:Noname_1848
if 
   Actor.Model(2@) == #VWFYWAI
else_jump @Noname_1874 
28@ += 1 
:Noname_1874
if 
   Actor.Model(2@) == #MAFBOSS
else_jump @Noname_1899 
30@ += 1 
:Noname_1899
if 
   Actor.Model(2@) == #SHMYCR
else_jump @Noname_1925 
30@ += 1 
:Noname_1925
if 
   Actor.Model(2@) == #VMAFF1
else_jump @Noname_1950 
30@ += 1 
:Noname_1950
if 
   Actor.Model(2@) == #WFYRI
else_jump @Noname_1975 
30@ += 1 
:Noname_1975
if 
   Actor.Model(2@) == #TRIBOSS
else_jump @Noname_2000 
29@ += 1 
:Noname_2000
if 
   Actor.Model(2@) == #TRIADB
else_jump @Noname_2025 
29@ += 1 
:Noname_2025
if 
   Actor.Model(2@) == #TRIADA
else_jump @Noname_2050 
29@ += 1 
:Noname_2050
if 
   Actor.Model(2@) == #DNB3
else_jump @Noname_2075 
29@ += 1 
:Noname_2075
if 
   Actor.Model(2@) == #SOMYRI
else_jump @Noname_2101 
29@ += 1 
:Noname_2101
if 
   Actor.Model(2@) == #SOFYRI
else_jump @Noname_2127 
29@ += 1 
:Noname_2127
1@ += 1 
  1@ > 999 
else_jump @Noname_915 
format 4@ "{FFFFFF}Банды%c{2ea07b} Rifa: %d (%d)%c{098A00} Grove: %d (%d)%c" 10 18@ 27@ 10 14@ 22@ 10 
format 5@ "{c515ff} Ballas: %d (%d)%c{ffde24} Vagos: %d (%d)%c" 17@ 26@ 10 15@ 23@ 10 
format 6@ "{00FFFE} Aztec: %d (%d)%c%c{FFFFFF}Мафии%c{f4b800} LCN: %d (%d)%c" 16@ 24@ 10 10 10 21@ 30@ 10 
format 7@ "{ff0606} Yakuza: %d (%d)%c {b8b6b6}RM: %d (%d)" 20@ 29@ 10 19@ 28@ 
format 8@ "%s%s%s%s" 4@ 5@ 6@ 7@ 
if and
0BDB:  samp is_chat_visible 
8BD5:   not samp is_scoreboard_opened 
   not key_down 116 
   not key_down 121 
else_jump @Noname_2646 
0AF0: 9@ = get_int_from_ini_file "cleo\Checker Criminal.ini" section "Settings" key "X" 
0AF0: 10@ = get_int_from_ini_file "cleo\Checker Criminal.ini" section "Settings" key "Y" 
0B60: convert_game_screen_coords 9@ 10@ to_window_screen_coords 9@ 10@ 
Render.DrawText(11@, 8@, 9@, 10@, -1)
:Noname_2646
jump @Noname_504 
:Noname_2653
   SAMP.IsCommandTyped(13@)
if 
0C18: 0 = strstr string1 13@ string2 "help" 
else_jump @Noname_2694 
call @Noname_10289 0 
SAMP.CmdRet
:Noname_2694
if 
0C18: 0 = strstr string1 13@ string2 "lcn" 
else_jump @Noname_2729 
call @Noname_6246 0 
SAMP.CmdRet
:Noname_2729
if 
0C18: 0 = strstr string1 13@ string2 "rm" 
else_jump @Noname_2763 
call @Noname_5587 0 
SAMP.CmdRet
:Noname_2763
if 
0C18: 0 = strstr string1 13@ string2 "yakuza" 
else_jump @Noname_2801 
call @Noname_4897 0 
SAMP.CmdRet
:Noname_2801
if 
0C18: 0 = strstr string1 13@ string2 "vagos" 
else_jump @Noname_2838 
call @Noname_6909 0 
SAMP.CmdRet
:Noname_2838
if 
0C18: 0 = strstr string1 13@ string2 "ballas" 
else_jump @Noname_2876 
call @Noname_7580 0 
SAMP.CmdRet
:Noname_2876
if 
0C18: 0 = strstr string1 13@ string2 "rifa" 
else_jump @Noname_2912 
call @Noname_8255 0 
SAMP.CmdRet
:Noname_2912
if 
0C18: 0 = strstr string1 13@ string2 "grove" 
else_jump @Noname_2949 
call @Noname_8925 0 
SAMP.CmdRet
:Noname_2949
if 
0C18: 0 = strstr string1 13@ string2 "aztec" 
else_jump @Noname_2986 
call @Noname_9619 0 
SAMP.CmdRet
:Noname_2986
if 
0C18: 0 = strstr string1 13@ string2 "1" 
else_jump @Noname_3019 
call @Noname_3070 0 
SAMP.CmdRet
:Noname_3019
if and
  12@ == 1 
0C18: 0 = strstr string1 13@ string2 "pos" 
else_jump @Noname_3058 
3@ = 1 
SAMP.CmdRet
:Noname_3058
0B12: 12@ = 12@ XOR 1 
SAMP.CmdRet
:Noname_3070
alloc 4@ 4096 
alloc 5@ 4096 
alloc 6@ 4096 
alloc 7@ 4096 
alloc 8@ 4096 
14@ = 0 
15@ = 0 
16@ = 0 
17@ = 0 
18@ = 0 
19@ = 0 
20@ = 0 
21@ = 0 
22@ = 0 
23@ = 0 
24@ = 0 
26@ = 0 
27@ = 0 
28@ = 0 
29@ = 0 
30@ = 0 
1@ = 0 
:Noname_3229
if 
   SAMP.IsPlayerConnected(1@)
else_jump @Noname_4441 
2@ = SAMP.GetPlayerColor(1@)
if 
  2@ == -1442208768 
else_jump @Noname_3281 
14@ += 1 
:Noname_3281
if 
  2@ == -1426072028 
else_jump @Noname_3309 
15@ += 1 
:Noname_3309
if 
  2@ == -1441927681 
else_jump @Noname_3337 
16@ += 1 
:Noname_3337
if 
  2@ == -1429924353 
else_jump @Noname_3365 
17@ += 1 
:Noname_3365
if 
  2@ == -1439784837 
else_jump @Noname_3393 
18@ += 1 
:Noname_3393
if 
  2@ == -1430735178 
else_jump @Noname_3421 
19@ += 1 
:Noname_3421
if 
  2@ == -1426127354 
else_jump @Noname_3449 
20@ += 1 
:Noname_3449
if 
  2@ == -1426802688 
else_jump @Noname_3477 
21@ += 1 
:Noname_3477
2@ = SAMP.GetActorHandleByPlayerID(1@)
if 
   not 2@ == -1 
else_jump @Noname_4441 
if 
   Actor.Model(2@) == #FAM1
else_jump @Noname_3528 
22@ += 1 
:Noname_3528
if 
   Actor.Model(2@) == #FAM2
else_jump @Noname_3553 
22@ += 1 
:Noname_3553
if 
   Actor.Model(2@) == #FAM3
else_jump @Noname_3578 
22@ += 1 
:Noname_3578
if 
   Actor.Model(2@) == 269
else_jump @Noname_3604 
22@ += 1 
:Noname_3604
if 
   Actor.Model(2@) == 270
else_jump @Noname_3630 
22@ += 1 
:Noname_3630
if 
   Actor.Model(2@) == #OFYST
else_jump @Noname_3655 
22@ += 1 
:Noname_3655
if 
   Actor.Model(2@) == 271
else_jump @Noname_3681 
22@ += 1 
:Noname_3681
if 
   Actor.Model(2@) == #LSV1
else_jump @Noname_3706 
23@ += 1 
:Noname_3706
if 
   Actor.Model(2@) == #LSV2
else_jump @Noname_3731 
23@ += 1 
:Noname_3731
if 
   Actor.Model(2@) == #LSV3
else_jump @Noname_3756 
23@ += 1 
:Noname_3756
if 
   Actor.Model(2@) == #COPGRL3
else_jump @Noname_3782 
23@ += 1 
:Noname_3782
if 
   Actor.Model(2@) == #VLA2
else_jump @Noname_3807 
24@ += 1 
:Noname_3807
if 
   Actor.Model(2@) == #VLA3
else_jump @Noname_3832 
24@ += 1 
:Noname_3832
if 
   Actor.Model(2@) == #VLA1
else_jump @Noname_3857 
24@ += 1 
:Noname_3857
if 
   Actor.Model(2@) == #HFYST
else_jump @Noname_3882 
24@ += 1 
:Noname_3882
if 
   Actor.Model(2@) == #SFR1
else_jump @Noname_3908 
27@ += 1 
:Noname_3908
if 
   Actor.Model(2@) == #SFR2
else_jump @Noname_3934 
27@ += 1 
:Noname_3934
if 
   Actor.Model(2@) == #SFR3
else_jump @Noname_3960 
27@ += 1 
:Noname_3960
if 
   Actor.Model(2@) == #SOFYST
else_jump @Noname_3986 
27@ += 1 
:Noname_3986
if 
   Actor.Model(2@) == #BALLAS1
else_jump @Noname_4011 
26@ += 1 
:Noname_4011
if 
   Actor.Model(2@) == #BALLAS2
else_jump @Noname_4036 
26@ += 1 
:Noname_4036
if 
   Actor.Model(2@) == #BALLAS3
else_jump @Noname_4061 
26@ += 1 
:Noname_4061
if 
   Actor.Model(2@) == #GANGRL3
else_jump @Noname_4087 
26@ += 1 
:Noname_4087
if 
   Actor.Model(2@) == #MAFFA
else_jump @Noname_4112 
28@ += 1 
:Noname_4112
if 
   Actor.Model(2@) == #MAFFB
else_jump @Noname_4137 
28@ += 1 
:Noname_4137
if 
   Actor.Model(2@) == #VMAFF2
else_jump @Noname_4162 
28@ += 1 
:Noname_4162
if 
   Actor.Model(2@) == #VWFYWAI
else_jump @Noname_4188 
28@ += 1 
:Noname_4188
if 
   Actor.Model(2@) == #MAFBOSS
else_jump @Noname_4213 
30@ += 1 
:Noname_4213
if 
   Actor.Model(2@) == #SHMYCR
else_jump @Noname_4239 
30@ += 1 
:Noname_4239
if 
   Actor.Model(2@) == #VMAFF1
else_jump @Noname_4264 
30@ += 1 
:Noname_4264
if 
   Actor.Model(2@) == #WFYRI
else_jump @Noname_4289 
30@ += 1 
:Noname_4289
if 
   Actor.Model(2@) == #TRIBOSS
else_jump @Noname_4314 
29@ += 1 
:Noname_4314
if 
   Actor.Model(2@) == #TRIADB
else_jump @Noname_4339 
29@ += 1 
:Noname_4339
if 
   Actor.Model(2@) == #TRIADA
else_jump @Noname_4364 
29@ += 1 
:Noname_4364
if 
   Actor.Model(2@) == #DNB3
else_jump @Noname_4389 
29@ += 1 
:Noname_4389
if 
   Actor.Model(2@) == #SOMYRI
else_jump @Noname_4415 
29@ += 1 
:Noname_4415
if 
   Actor.Model(2@) == #SOFYRI
else_jump @Noname_4441 
29@ += 1 
:Noname_4441
1@ += 1 
  1@ > 999 
else_jump @Noname_3229 
format 4@ "{FFFFFF}Банды%c{2ea07b} Rifa: %d (%d)%c{098A00} Grove: %d (%d)%c" 10 18@ 27@ 10 14@ 22@ 10 
format 5@ "{c515ff} Ballas: %d (%d)%c{ffde24} Vagos: %d (%d)%c" 17@ 26@ 10 15@ 23@ 10 
format 6@ "{00FFFE} Aztec: %d (%d)%c%c{FFFFFF}Мафии%c{f4b800} LCN: %d (%d)%c" 16@ 24@ 10 10 10 21@ 30@ 10 
format 7@ "{ff0606} Yakuza: %d (%d)%c {b8b6b6}RM: %d (%d)" 20@ 29@ 10 19@ 28@ 
format 8@ "%s%s%s%s" 4@ 5@ 6@ 7@ 
SAMP.ShowDialog(111, "Checker Criminal for SAMP-RP", 8@, "Закрыть", "", DIALOG_STYLE_MSGBOX)
free 4@ 
free 5@ 
free 6@ 
free 7@ 
free 8@ 
ret 0 
:Noname_4897
4@ = 0 
5@ = 0 
alloc 6@ 512 
alloc 8@ 512 
alloc 9@ 5000 
alloc 10@ 5000 
format 9@ " %c{FFFFFF}Игроки с клистами Yakuza%c%c" 10 9 10 
format 10@ "{FFFFFF}Игроки со скинами Yakuza (рядом)%c%c" 9 10 
0@ = 0 
:Noname_5059
if 
   SAMP.IsPlayerConnected(0@)
else_jump @Noname_5309 
1@ = SAMP.GetPlayerColor(0@)
2@ = SAMP.GetPlayerNickname(0@)
3@ = SAMP.GetPlayerScore(0@)
if 
  1@ == -1426127354 
else_jump @Noname_5174 
4@ += 1 
format 8@ "%s(%d)%c[LVL:%d]%c" 2@ 0@ 9 3@ 10 
0C15: strcat destination 9@ source 8@ 
:Noname_5174
1@ = SAMP.GetActorHandleByPlayerID(0@)
if 
   not 1@ == -1 
else_jump @Noname_5309 
if or
   Actor.Model(1@) == #TRIBOSS
   Actor.Model(1@) == #TRIADB
   Actor.Model(1@) == #TRIADA
   Actor.Model(1@) == #DNB3
   Actor.Model(1@) == #SOMYRI
   Actor.Model(1@) == #SOFYRI
else_jump @Noname_5309 
5@ += 1 
format 8@ "%s(%d)%c[LVL:%d]%c" 2@ 0@ 9 3@ 10 
0C15: strcat destination 10@ source 8@ 
:Noname_5309
0@ += 1 
  0@ > 1001 
else_jump @Noname_5059 
if 
  4@ == 0 
else_jump @Noname_5416 
format 9@ " %c{FFFFFF}Игроки с клистами Yakuza%c%cНе найдено%c" 10 9 10 10 
:Noname_5416
if 
  5@ == 0 
else_jump @Noname_5504 
format 10@ "{FFFFFF}Игроки со скинами Yakuza (рядом)%c%cНе найдено%c" 9 10 10 
:Noname_5504
0C15: strcat destination 10@ source 9@ 
SAMP.ShowDialog(111, "Checker Criminal for SAMP-RP", 10@, "Закрыть", "", 4)
free 6@ 
free 8@ 
free 9@ 
free 10@ 
ret 0 
:Noname_5587
4@ = 0 
5@ = 0 
alloc 6@ 512 
alloc 8@ 512 
alloc 9@ 5000 
alloc 10@ 5000 
format 9@ " %c{FFFFFF}Игроки с клистами RM%c%c" 10 9 10 
format 10@ "{FFFFFF}Игроки со скинами RM (рядом)%c%c" 9 10 
0@ = 0 
:Noname_5741
if 
   SAMP.IsPlayerConnected(0@)
else_jump @Noname_5976 
1@ = SAMP.GetPlayerColor(0@)
2@ = SAMP.GetPlayerNickname(0@)
3@ = SAMP.GetPlayerScore(0@)
if 
  1@ == -1430735178 
else_jump @Noname_5856 
4@ += 1 
format 8@ "%s(%d)%c[LVL:%d]%c" 2@ 0@ 9 3@ 10 
0C15: strcat destination 9@ source 8@ 
:Noname_5856
1@ = SAMP.GetActorHandleByPlayerID(0@)
if 
   not 1@ == -1 
else_jump @Noname_5976 
if or
   Actor.Model(1@) == #MAFFA
   Actor.Model(1@) == #MAFFB
   Actor.Model(1@) == #VMAFF2
   Actor.Model(1@) == #VWFYWAI
else_jump @Noname_5976 
5@ += 1 
format 8@ "%s(%d)%c[LVL:%d]%c" 2@ 0@ 9 3@ 10 
0C15: strcat destination 10@ source 8@ 
:Noname_5976
0@ += 1 
  0@ > 1001 
else_jump @Noname_5741 
if 
  4@ == 0 
else_jump @Noname_6079 
format 9@ " %c{FFFFFF}Игроки с клистами RM%c%cНе найдено%c" 10 9 10 10 
:Noname_6079
if 
  5@ == 0 
else_jump @Noname_6163 
format 10@ "{FFFFFF}Игроки со скинами RM (рядом)%c%cНе найдено%c" 9 10 10 
:Noname_6163
0C15: strcat destination 10@ source 9@ 
SAMP.ShowDialog(111, "Checker Criminal for SAMP-RP", 10@, "Закрыть", "", 4)
free 6@ 
free 8@ 
free 9@ 
free 10@ 
ret 0 
:Noname_6246
4@ = 0 
5@ = 0 
alloc 6@ 512 
alloc 8@ 512 
alloc 9@ 5000 
alloc 10@ 5000 
format 9@ " %c{FFFFFF}Игроки с клистами LCN%c%c" 10 9 10 
format 10@ "{FFFFFF}Игроки со скинами LCN (рядом)%c%c" 9 10 
0@ = 0 
:Noname_6402
if 
   SAMP.IsPlayerConnected(0@)
else_jump @Noname_6637 
1@ = SAMP.GetPlayerColor(0@)
2@ = SAMP.GetPlayerNickname(0@)
3@ = SAMP.GetPlayerScore(0@)
if 
  1@ == -1426802688 
else_jump @Noname_6517 
4@ += 1 
format 8@ "%s(%d)%c[LVL:%d]%c" 2@ 0@ 9 3@ 10 
0C15: strcat destination 9@ source 8@ 
:Noname_6517
1@ = SAMP.GetActorHandleByPlayerID(0@)
if 
   not 1@ == -1 
else_jump @Noname_6637 
if or
   Actor.Model(1@) == #MAFBOSS
   Actor.Model(1@) == #SHMYCR
   Actor.Model(1@) == #VMAFF1
   Actor.Model(1@) == #WFYRI
else_jump @Noname_6637 
5@ += 1 
format 8@ "%s(%d)%c[LVL:%d]%c" 2@ 0@ 9 3@ 10 
0C15: strcat destination 10@ source 8@ 
:Noname_6637
0@ += 1 
  0@ > 1001 
else_jump @Noname_6402 
if 
  4@ == 0 
else_jump @Noname_6741 
format 9@ " %c{FFFFFF}Игроки с клистами LCN%c%cНе найдено%c" 10 9 10 10 
:Noname_6741
if 
  5@ == 0 
else_jump @Noname_6826 
format 10@ "{FFFFFF}Игроки со скинами LCN (рядом)%c%cНе найдено%c" 9 10 10 
:Noname_6826
0C15: strcat destination 10@ source 9@ 
SAMP.ShowDialog(111, "Checker Criminal for SAMP-RP", 10@, "Закрыть", "", 4)
free 6@ 
free 8@ 
free 9@ 
free 10@ 
ret 0 
:Noname_6909
4@ = 0 
5@ = 0 
alloc 6@ 512 
alloc 8@ 512 
alloc 9@ 5000 
alloc 10@ 5000 
format 9@ " %c{FFFFFF}Игроки с клистами Vagos%c%c" 10 9 10 
format 10@ "{FFFFFF}Игроки со скинами Vagos (рядом)%c%c" 9 10 
0@ = 0 
:Noname_7069
if 
   SAMP.IsPlayerConnected(0@)
else_jump @Noname_7304 
1@ = SAMP.GetPlayerColor(0@)
2@ = SAMP.GetPlayerNickname(0@)
3@ = SAMP.GetPlayerScore(0@)
if 
  1@ == -1429924353 
else_jump @Noname_7184 
4@ += 1 
format 8@ "%s(%d)%c[LVL:%d]%c" 2@ 0@ 9 3@ 10 
0C15: strcat destination 9@ source 8@ 
:Noname_7184
1@ = SAMP.GetActorHandleByPlayerID(0@)
if 
   not 1@ == -1 
else_jump @Noname_7304 
if or
   Actor.Model(1@) == #LSV1
   Actor.Model(1@) == #LSV2
   Actor.Model(1@) == #LSV3
   Actor.Model(1@) == #COPGRL3
else_jump @Noname_7304 
5@ += 1 
format 8@ "%s(%d)%c[LVL:%d]%c" 2@ 0@ 9 3@ 10 
0C15: strcat destination 10@ source 8@ 
:Noname_7304
0@ += 1 
  0@ > 1001 
else_jump @Noname_7069 
if 
  4@ == 0 
else_jump @Noname_7410 
format 9@ " %c{FFFFFF}Игроки с клистами Vagos%c%cНе найдено%c" 10 9 10 10 
:Noname_7410
if 
  5@ == 0 
else_jump @Noname_7497 
format 10@ "{FFFFFF}Игроки со скинами Vagos (рядом)%c%cНе найдено%c" 9 10 10 
:Noname_7497
0C15: strcat destination 10@ source 9@ 
SAMP.ShowDialog(111, "Checker Criminal for SAMP-RP", 10@, "Закрыть", "", 4)
free 6@ 
free 8@ 
free 9@ 
free 10@ 
ret 0 
:Noname_7580
4@ = 0 
5@ = 0 
alloc 6@ 512 
alloc 8@ 512 
alloc 9@ 5000 
alloc 10@ 5000 
format 9@ " %c{FFFFFF}Игроки с клистами Ballas%c%c" 10 9 10 
format 10@ "{FFFFFF}Игроки со скинами Ballas (рядом)%c%c" 9 10 
0@ = 0 
:Noname_7742
if 
   SAMP.IsPlayerConnected(0@)
else_jump @Noname_7977 
1@ = SAMP.GetPlayerColor(0@)
2@ = SAMP.GetPlayerNickname(0@)
3@ = SAMP.GetPlayerScore(0@)
if 
  1@ == -1429924353 
else_jump @Noname_7857 
4@ += 1 
format 8@ "%s(%d)%c[LVL:%d]%c" 2@ 0@ 9 3@ 10 
0C15: strcat destination 9@ source 8@ 
:Noname_7857
1@ = SAMP.GetActorHandleByPlayerID(0@)
if 
   not 1@ == -1 
else_jump @Noname_7977 
if or
   Actor.Model(1@) == #BALLAS1
   Actor.Model(1@) == #BALLAS2
   Actor.Model(1@) == #BALLAS3
   Actor.Model(1@) == #GANGRL3
else_jump @Noname_7977 
5@ += 1 
format 8@ "%s(%d)%c[LVL:%d]%c" 2@ 0@ 9 3@ 10 
0C15: strcat destination 10@ source 8@ 
:Noname_7977
0@ += 1 
  0@ > 1001 
else_jump @Noname_7742 
if 
  4@ == 0 
else_jump @Noname_8084 
format 9@ " %c{FFFFFF}Игроки с клистами Ballas%c%cНе найдено%c" 10 9 10 10 
:Noname_8084
if 
  5@ == 0 
else_jump @Noname_8172 
format 10@ "{FFFFFF}Игроки со скинами Ballas (рядом)%c%cНе найдено%c" 9 10 10 
:Noname_8172
0C15: strcat destination 10@ source 9@ 
SAMP.ShowDialog(111, "Checker Criminal for SAMP-RP", 10@, "Закрыть", "", 4)
free 6@ 
free 8@ 
free 9@ 
free 10@ 
ret 0 
:Noname_8255
4@ = 0 
5@ = 0 
alloc 6@ 512 
alloc 8@ 512 
alloc 9@ 5000 
alloc 10@ 5000 
format 9@ " %c{FFFFFF}Игроки с клистами Rifa%c%c" 10 9 10 
format 10@ "{FFFFFF}Игроки со скинами Rifa (рядом)%c%c" 9 10 
0@ = 0 
:Noname_8413
if 
   SAMP.IsPlayerConnected(0@)
else_jump @Noname_8651 
1@ = SAMP.GetPlayerColor(0@)
2@ = SAMP.GetPlayerNickname(0@)
3@ = SAMP.GetPlayerScore(0@)
if 
  1@ == -1439784837 
else_jump @Noname_8528 
4@ += 1 
format 8@ "%s(%d)%c[LVL:%d]%c" 2@ 0@ 9 3@ 10 
0C15: strcat destination 9@ source 8@ 
:Noname_8528
1@ = SAMP.GetActorHandleByPlayerID(0@)
if 
   not 1@ == -1 
else_jump @Noname_8651 
if or
   Actor.Model(1@) == #SFR1
   Actor.Model(1@) == #SFR2
   Actor.Model(1@) == #SFR3
   Actor.Model(1@) == 266
else_jump @Noname_8651 
5@ += 1 
format 8@ "%s(%d)%c[LVL:%d]%c" 2@ 0@ 9 3@ 10 
0C15: strcat destination 10@ source 8@ 
:Noname_8651
0@ += 1 
  0@ > 1001 
else_jump @Noname_8413 
if 
  4@ == 0 
else_jump @Noname_8756 
format 9@ " %c{FFFFFF}Игроки с клистами Rifa%c%cНе найдено%c" 10 9 10 10 
:Noname_8756
if 
  5@ == 0 
else_jump @Noname_8842 
format 10@ "{FFFFFF}Игроки со скинами Rifa (рядом)%c%cНе найдено%c" 9 10 10 
:Noname_8842
0C15: strcat destination 10@ source 9@ 
SAMP.ShowDialog(111, "Checker Criminal for SAMP-RP", 10@, "Закрыть", "", 4)
free 6@ 
free 8@ 
free 9@ 
free 10@ 
ret 0 
:Noname_8925
4@ = 0 
5@ = 0 
alloc 6@ 512 
alloc 8@ 512 
alloc 9@ 5000 
alloc 10@ 5000 
format 9@ " %c{FFFFFF}Игроки с клистами Grove%c%c" 10 9 10 
format 10@ "{FFFFFF}Игроки со скинами Grove (рядом)%c%c" 9 10 
0@ = 0 
:Noname_9085
if 
   SAMP.IsPlayerConnected(0@)
else_jump @Noname_9343 
1@ = SAMP.GetPlayerColor(0@)
2@ = SAMP.GetPlayerNickname(0@)
3@ = SAMP.GetPlayerScore(0@)
if 
  1@ == -1442208768 
else_jump @Noname_9200 
4@ += 1 
format 8@ "%s(%d)%c[LVL:%d]%c" 2@ 0@ 9 3@ 10 
0C15: strcat destination 9@ source 8@ 
:Noname_9200
1@ = SAMP.GetActorHandleByPlayerID(0@)
if 
   not 1@ == -1 
else_jump @Noname_9343 
if or
   Actor.Model(1@) == #FAM1
   Actor.Model(1@) == #FAM2
   Actor.Model(1@) == #FAM3
   Actor.Model(1@) == 269
   Actor.Model(1@) == 270
   Actor.Model(1@) == #OFYST
   Actor.Model(1@) == 271
else_jump @Noname_9343 
5@ += 1 
format 8@ "%s(%d)%c[LVL:%d]%c" 2@ 0@ 9 3@ 10 
0C15: strcat destination 10@ source 8@ 
:Noname_9343
0@ += 1 
  0@ > 1001 
else_jump @Noname_9085 
if 
  4@ == 0 
else_jump @Noname_9449 
format 9@ " %c{FFFFFF}Игроки с клистами Grove%c%cНе найдено%c" 10 9 10 10 
:Noname_9449
if 
  5@ == 0 
else_jump @Noname_9536 
format 10@ "{FFFFFF}Игроки со скинами Grove (рядом)%c%cНе найдено%c" 9 10 10 
:Noname_9536
0C15: strcat destination 10@ source 9@ 
SAMP.ShowDialog(111, "Checker Criminal for SAMP-RP", 10@, "Закрыть", "", 4)
free 6@ 
free 8@ 
free 9@ 
free 10@ 
ret 0 
:Noname_9619
4@ = 0 
5@ = 0 
alloc 6@ 512 
alloc 8@ 512 
alloc 9@ 5000 
alloc 10@ 5000 
format 9@ " %c{FFFFFF}Игроки с клистами Aztec%c%c" 10 9 10 
format 10@ "{FFFFFF}Игроки со скинами Aztec (рядом)%c%c" 9 10 
0@ = 0 
:Noname_9779
if 
   SAMP.IsPlayerConnected(0@)
else_jump @Noname_10013 
1@ = SAMP.GetPlayerColor(0@)
2@ = SAMP.GetPlayerNickname(0@)
3@ = SAMP.GetPlayerScore(0@)
if 
  1@ == -1441927681 
else_jump @Noname_9894 
4@ += 1 
format 8@ "%s(%d)%c[LVL:%d]%c" 2@ 0@ 9 3@ 10 
0C15: strcat destination 9@ source 8@ 
:Noname_9894
1@ = SAMP.GetActorHandleByPlayerID(0@)
if 
   not 1@ == -1 
else_jump @Noname_10013 
if or
   Actor.Model(1@) == #VLA2
   Actor.Model(1@) == #VLA3
   Actor.Model(1@) == #VLA1
   Actor.Model(1@) == #HFYST
else_jump @Noname_10013 
5@ += 1 
format 8@ "%s(%d)%c[LVL:%d]%c" 2@ 0@ 9 3@ 10 
0C15: strcat destination 10@ source 8@ 
:Noname_10013
0@ += 1 
  0@ > 1001 
else_jump @Noname_9779 
if 
  4@ == 0 
else_jump @Noname_10119 
format 9@ " %c{FFFFFF}Игроки с клистами Aztec%c%cНе найдено%c" 10 9 10 10 
:Noname_10119
if 
  5@ == 0 
else_jump @Noname_10206 
format 10@ "{FFFFFF}Игроки со скинами Aztec (рядом)%c%cНе найдено%c" 9 10 10 
:Noname_10206
0C15: strcat destination 10@ source 9@ 
SAMP.ShowDialog(111, "Checker Criminal for SAMP-RP", 10@, "Закрыть", "", 4)
free 6@ 
free 8@ 
free 9@ 
free 10@ 
ret 0 
:Noname_10289
0AC6: 0@ = label @Noname_10354 offset 
SAMP.ShowDialog(111, "Checker Criminal for SAMP-RP", 0@, "Закрыть", "", DIALOG_STYLE_MSGBOX)
ret 0 
:Noname_10354
hex
 20 7B 46 46 46 46 46 46 7D C2 F1 E5 20 EA EE EC
 E0 ED E4 FB 20 EC E0 EB E5 ED FC EA E8 EC E8 20
 E1 F3 EA E2 E0 EC E8 21 0A 20 7B 46 46 46 46 46
 46 7D 2F 63 63 20 2D 20 C2 EA EB 2F C2 FB EA EB
 20 F7 E5 EA E5 F0 20 EA F0 E8 EC E8 ED E0 EB E0
 20 ED E0 20 F5 F3 E4 E5 0A 20 7B 46 46 46 46 46
 46 7D 2F 63 63 20 31 20 2D 20 D2 EE F2 20 E6 E5
 20 F7 E5 EA E5 F0 2C 20 F2 EE EB FC EA EE 20 E2
 20 E4 E8 E0 EB EE E3 E5 0A 20 7B 46 46 46 46 46
 46 7D 2F 63 63 20 70 6F 73 20 2D 20 D1 EC E5 ED
 E8 F2 FC 20 EF EE E7 E8 F6 E8 FE 20 F7 E5 EA E5
 F0 E0 20 28 CB CA CC 20 F7 F2 EE E1 FB 20 F1 EE
 F5 F0 E0 ED E8 F2 FC 29 0A 20 7B 46 46 46 46 46
 46 7D 20 0A 20 D2 E0 EA 20 E6 E5 20 EC EE E6 ED
 EE 20 F1 EC EE F2 F0 E5 F2 FC 20 CD E8 EA ED E5
 E9 EC FB 20 E8 20 D3 F0 EE E2 ED E8 20 E2 20 E4
 E8 E0 EB EE E3 E5 20 2D 20 EA EE EC E0 ED E4 E0
 EC E8 20 ED E8 E6 E5 0A 20 7B 32 65 61 30 37 62
 7D 2F F1 F1 20 72 69 66 61 0A 20 7B 30 39 38 41
 30 30 7D 2F F1 F1 20 67 72 6F 76 65 0A 20 7B 63
 35 31 35 66 66 7D 2F F1 F1 20 62 61 6C 6C 61 73
 0A 20 7B 66 66 64 65 32 34 7D 2F F1 F1 20 76 61
 67 6F 73 0A 20 7B 30 30 46 46 46 45 7D 2F F1 F1
 20 61 7A 74 65 63 0A 20 7B 66 34 62 38 30 30 7D
 2F F1 F1 20 6C 63 6E 0A 20 7B 66 66 30 36 30 36
 7D 2F F1 F1 20 79 61 6B 75 7A 61 0A 20 7B 62 38
 62 36 62 36 7D 2F F1 F1 20 72 6D 0A 20 7B 46 46
 46 46 46 46 7D C2 ED E8 EC E0 ED E8 E5 21 20 C8
 ED F4 EE F0 EC E0 F6 E8 FF 20 E8 E7 20 F7 E5 EA
 E5 F0 E0 20 EC EE E6 E5 F2 20 E1 FB F2 FC 20 ED
 E5 20 F2 EE F7 ED EE E9 0A 20 7B 46 46 46 46 46
 46 7D C8 E7 2D E7 E0 20 E2 F1 FF EA E8 F5 20 E1
 E8 F7 E5 E9 20 EA EE F2 EE F0 FB E5 20 E2 EA EB
 FE F7 E0 FE F2 20 EA EB E8 F1 F2 FB 20 EE F0 E3
 E0 ED E8 E7 E0 F6 E8 E9 0A 20 7B 46 46 46 46 46
 46 7D 20 0A 20 7B 46 46 46 46 46 46 7D C2 20 F1
 EA F0 E8 EF F2 E5 20 E5 F1 F2 FC 20 F4 F3 ED EA
 F6 E8 FF 20 27 D7 E8 F1 F2 FB E9 20 F1 EA F0 E8
 ED F8 EE F2 27 0A 20 7B 46 46 46 46 46 46 7D CA
 E0 EA 20 EE ED 20 F0 E0 E1 EE F2 E0 E5 F2 3F 0A
 20 7B 46 46 46 46 46 46 7D D7 E5 EA E5 F0 20 EF
 F0 EE EF E0 E4 E0 E5 F2 2C 20 E4 E5 EB E0 E5 F2
 F1 FF 20 F1 EA F0 E8 ED 20 E8 20 EF EE F2 EE EC
 20 EE ED 20 E2 EA EB FE F7 E0 E5 F2 F1 FF 20 F1
 ED EE E2 E0 0A 20 7B 46 46 46 46 46 46 7D D0 E0
 E1 EE F2 E0 E5 F2 20 F2 EE EB FC EA EE 20 ED E0
 20 46 38 2C 20 E0 20 F1 20 62 61 6E 64 69 63 61
 6D 20 E8 20 66 72 61 70 73 20 ED E5 20 EF F0 EE
 EA E0 F2 E8 F2 21 00
end
:Noname_11129
0AA2: 30@ = load_library "samp.dll" // IF and SET 
0A8E: 1@ = 30@ + 457971 // int 
0A8C: write_memory 1@ size 6 value -1869574000 virtual_protect 1 
0A8E: 2@ = 30@ + 458004 // int 
0A8C: write_memory 2@ size 6 value -1869574000 virtual_protect 1 
0A8E: 3@ = 30@ + 458280 // int 
0A8C: write_memory 3@ size 2 value 37008 virtual_protect 1 
0A8E: 4@ = 30@ + 462648 // int 
0A8C: write_memory 4@ size 2 value 37008 virtual_protect 1 
0A8E: 5@ = 30@ + 462372 // int 
0A8C: write_memory 5@ size 6 value -1869574000 virtual_protect 1 
0AA3: free_library 30@ 
ret 0 
:Noname_11289
0AA2: 30@ = load_library "samp.dll" // IF and SET 
0A8E: 1@ = 30@ + 457971 // int 
0A8C: write_memory 1@ size 4 value 24216591 virtual_protect 1 
0A8E: 2@ = 1@ + 4 // int 
0A8C: write_memory 2@ size 2 value 0 virtual_protect 1 
0A8E: 3@ = 30@ + 458004 // int 
0A8C: write_memory 3@ size 4 value 22053903 virtual_protect 1 
0A8E: 4@ = 3@ + 4 // int 
0A8C: write_memory 4@ size 2 value 0 virtual_protect 1 
0A8E: 5@ = 30@ + 458280 // int 
0A8C: write_memory 5@ size 2 value 16500 virtual_protect 1 
0A8E: 6@ = 30@ + 462648 // int 
0A8C: write_memory 6@ size 2 value 24948 virtual_protect 1 
0A8E: 7@ = 30@ + 462372 // int 
0A8C: write_memory 7@ size 4 value 24218127 virtual_protect 1 
0A8E: 8@ = 7@ + 4 // int 
0A8C: write_memory 8@ size 2 value 0 virtual_protect 1 
0AA3: free_library 30@ 
ret 0 
free 4@ 
free 5@ 
free 6@ 
free 7@ 
free 8@ 
free 13@

В hex пишешь ты, а SB при компиляции в Dec(int) переводит
Можешь зайти на int to hex и выудить код цвета

 

[AMAHACLA]

Хочу сделать так чтобы перса размораживало сразу как только проигрывалась анимация того как актер кладет какую нибудь вещь. Искал на форумах всяких названия анимаций, изменял просто названия анимаций в готовых клео анимациях, но не работает. Как так сделать? Если не лень, сделайте само клео разморозки при этой анимации.

 

[kawa operand]

ъукай эпли анимейшин и там проверяй и сбивай

 

[DarkP1xel]

Если ли опкод, который отправляет текст/команду в консоль sf?

0B78.

 

[Jack_Savage]

Какой опкод заставит игрока залезть назад в окно ?
Ну типу он вылез на H а как заставить залезть ?

 

[AMAHACLA]

Мне нужно помочь написать клео с помощью которого я начну бить стоящего на ногах перса как лежащего. Нужно для ускоренного дамага. Если я сделаю так чтобы при появлении зеленого треугольника игрок визуально опускался вниз и я начинал дамажить его ногой, то это будет ли видно другим игрокам и будет ли дамаг проходить? И как визуально изменить координаты другого игрока?

 

[deddosouru]

Мне нужно помочь написать клео с помощью которого я начну бить стоящего на ногах перса как лежащего. Нужно для ускоренного дамага. Если я сделаю так чтобы при появлении зеленого треугольника игрок визуально опускался вниз и я начинал дамажить его ногой, то это будет ли видно другим игрокам и будет ли дамаг проходить? И как визуально изменить координаты другого игрока?

будут видеть у тебя анимацию удара лежачего человека. дамаг проходить будет. координаты менять не надо, достаточно изменить ему анимацию визуально

 

[LaRossa]

Подскажите пожалуйста как можно отправить РПЦ о посадке в определенную машину

 

[randazzo]

Подскажите пожалуйста как можно отправить РПЦ о посадке в определенную машину

opcodes:0B30

0B30: samp send_enter_vehicle 1@ as_passenger 2@ // 0@ [int] - ид т/с 1@ [int] - ид места в т/с(0 - водительское)

//call @func 1 CarID
:func //OUTCOMING_RPCS[RPC.ENTERVEHICLE]              = {'onSendEnterVehicle', {vehicleId = 'int16'}, {passenger = 'bool8'}}
0B3D: raknet 1@ = new_bit_stream
0B40: raknet bit_stream 1@ write 0@ type BS_TYPE_SHORT size 2
0B40: raknet bit_stream 1@ write 0 type BS_TYPE_BOOL size 1
0B8A: raknet send_rpc RPC_ENTERVEHICLE bit_stream 1@
0B3E: raknet delete_bit_stream 1@
ret 0

 

[Jack_Savage]

Можно ли сделать так, чтобы прописав команду “/sell text”, текст добавлялся документ хранящийся в интернете(допустим гугл документы) Подскажите код именно добавления

Ну тебе нужно вызвать функцию Windows чтобы отослать запрос.
Только одно но... Твой скрипт сразу начнут палить все антистилеры и говорить что в нем стилер...

 

[Kristyan]

Here i have a label and i want to put an verificator for command /findd , i set jf, put it is not working, how can u help me guys? @kewa opcode ?

:SEND_MSG_WRAPPER
  
    0B35: samp 0@ = get_last_command_params
    0AD4: 4@ = scan_string 0@ format "%d" 2@
    0C18: 1@ = strstr string1 0@ string2 " /findd "
    1@++
    jf @SEND_MSG_WRAPPER
  
    call @SEND_MSG 2 2@ 1@
    chatmsg "{4ebf8b}[CopCMD]{5b7fa8} MDC was sent to ID %d." 0xff5b7fa8  2@
    cmdret