Декомпиляция скриптов

// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}

//-------------MAIN---------------
0662: printstring "CLEO DRP CHECKER SIM-CARD BY ROMELO"
0662: printstring "VKONTAKTE: vk.com/romelonazarov"
thread "DRPSIM-BY-{ROMELO}"
if
33@ = SAMP.Base()
else_jump @DRPSIM-BY-{ROMELO}_114
0A93: end_custom_thread

:DRPSIM-BY-{ROMELO}_114
wait 400
   SAMP.Available
else_jump @DRPSIM-BY-{ROMELO}_114

:DRPSIM-BY-{ROMELO}_128
wait 0
   SAMP.IsLocalPlayerSpawned
else_jump @DRPSIM-BY-{ROMELO}_128
0B34: samp register_client_command "dsim" to_label @DRPSIM-BY-{ROMELO}_2311
chatmsg "DRP {ffffff}Checker Sim-Card Loaded!" -16744449
chatmsg "Author: {007fff}Romelo {ffffff}Activation: {007fff}/dsim" 16777215
log "{007fff}DRP {ffffff}Checker Sim-Card Loaded!"
log "{ffffff}Author: {007fff}Romelo {ffffff}Activation: {007fff}/dsim"
0BE3: raknet setup_incoming_rpc_hook @DRPSIM-BY-{ROMELO}_2738
2@ = 0
17@ = 0
18@ = 0
19@ = 1
24@ = 0
26@ = 0
3@ = Render.CreateFont("Segoe UI", 9, 5)
4@ = Render.FontDrawHeight(3@)
call @DRPSIM-BY-{ROMELO}_3716 2 48 1 5@
call @DRPSIM-BY-{ROMELO}_3716 2 84 1 6@
call @DRPSIM-BY-{ROMELO}_3716 2 128 1 7@
call @DRPSIM-BY-{ROMELO}_3716 2 128 1 8@
format 5@ "DRP {ffffff}Checker Sim-Card by Romelo"
format 6@ "Работа в свёр. режиме: {d9534f}выключена%c{AFAFAF}Pause: Numpad8, Stop: /dsim" 10
format 8@ "Статус: {ffffff}в ожидании диалога"
if
8AE4:   not directory_exists "CLEO\INI"
else_jump @DRPSIM-BY-{ROMELO}_740
0AE5: create_directory "CLEO\INI" // IF and SET

:DRPSIM-BY-{ROMELO}_740
if
8AAB:   not file_exists "CLEO\drp_sim_numbers.txt"
else_jump @DRPSIM-BY-{ROMELO}_844
if
22@ = File.Open("CLEO\drp_sim_numbers.txt", "wt")
else_jump @DRPSIM-BY-{ROMELO}_844
0AD9: write_formatted_text "111111" in_file 22@ 
File.Close(22@)

:DRPSIM-BY-{ROMELO}_844
if
8AAB:   not file_exists "CLEO\INI\drp_sim.ini"
else_jump @DRPSIM-BY-{ROMELO}_1002
0AF3: write_float 500.0 to_ini_file "CLEO\INI\drp_sim.ini" section "COORDS" key "X"
0AF3: write_float 150.0 to_ini_file "CLEO\INI\drp_sim.ini" section "COORDS" key "Y"
0AF1: write_int 1100 to_ini_file "CLEO\INI\drp_sim.ini" section "SETTINGS" key "WAIT"

:DRPSIM-BY-{ROMELO}_1002
0AF2: 13@ = get_float_from_ini_file "CLEO\INI\drp_sim.ini" section "COORDS" key "X"
0AF2: 14@ = get_float_from_ini_file "CLEO\INI\drp_sim.ini" section "COORDS" key "Y"

:DRPSIM-BY-{ROMELO}_1078
wait 0
if
  17@ == 1
else_jump @DRPSIM-BY-{ROMELO}_1243
if
key_down 1
else_jump @DRPSIM-BY-{ROMELO}_1236
0B5E: get_cursor_pos 11@ 12@
0062: 11@ -= 15@ // (int)
0062: 12@ -= 16@ // (int)
0B5F: convert_window_screen_coords 11@ 12@ to_game_screen_coords 13@ 14@
0AF3: write_float 13@ to_ini_file "CLEO\INI\drp_sim.ini" section "COORDS" key "X"
0AF3: write_float 14@ to_ini_file "CLEO\INI\drp_sim.ini" section "COORDS" key "Y"
jump @DRPSIM-BY-{ROMELO}_1243

:DRPSIM-BY-{ROMELO}_1236
17@ = 0

:DRPSIM-BY-{ROMELO}_1243
if or
  2@ == 1
  2@ == 2
else_jump @DRPSIM-BY-{ROMELO}_2304
if
   not key_down 104
else_jump @DRPSIM-BY-{ROMELO}_1297
15@ = 1
jump @DRPSIM-BY-{ROMELO}_1529

:DRPSIM-BY-{ROMELO}_1297
if
  15@ == 1
else_jump @DRPSIM-BY-{ROMELO}_1529
if
key_down 104
else_jump @DRPSIM-BY-{ROMELO}_1529
15@ = 0
if and
  2@ == 1
   not 26@ == 0
else_jump @DRPSIM-BY-{ROMELO}_1432
format 8@ "Статус: {ffffff}скрипт в режиме {007fff}ожидания"
2@ = 2
jump @DRPSIM-BY-{ROMELO}_1529

:DRPSIM-BY-{ROMELO}_1432
if
  2@ == 2
else_jump @DRPSIM-BY-{ROMELO}_1529
format 8@ "Статус: {ffffff}в ожидании диалога"
2@ = 1
if
   not 26@ == 0
else_jump @DRPSIM-BY-{ROMELO}_1529
0BC9: samp send_dialog_response dialog 27@ button 1 listitem 0 input 23@

:DRPSIM-BY-{ROMELO}_1529
if
  31@ == 1
else_jump @DRPSIM-BY-{ROMELO}_1606
call @DRPSIM-BY-{ROMELO}_3764 1 33@ 29@
if
002D:   29@ >= 10@ // (int)
else_jump @DRPSIM-BY-{ROMELO}_1606
0BC9: samp send_dialog_response dialog 27@ button 1 listitem 0 input 28@
free 28@
31@ = 0

:DRPSIM-BY-{ROMELO}_1606
0B60: convert_game_screen_coords 13@ 14@ to_window_screen_coords 11@ 12@
0B5F: convert_window_screen_coords 11@ 12@ to_game_screen_coords 13@ 14@
if
call @DRPSIM-BY-{ROMELO}_3895 4 11@ 12@ 250 4@
else_jump @DRPSIM-BY-{ROMELO}_1698
0B5E: get_cursor_pos 15@ 16@
0062: 15@ -= 11@ // (int)
0062: 16@ -= 12@ // (int)
17@ = 1

:DRPSIM-BY-{ROMELO}_1698
Render.DrawText(3@, 5@, 11@, 12@, -16744449)
005A: 12@ += 4@ // (int)
Render.DrawText(3@, 6@, 11@, 12@, -83)
9@ = Render.FontDrawLength(3@, 6@)
if
call @DRPSIM-BY-{ROMELO}_3895 4 11@ 12@ 9@ 4@
else_jump @DRPSIM-BY-{ROMELO}_2240
if
   not key_down 1
else_jump @DRPSIM-BY-{ROMELO}_1814
19@ = 1
jump @DRPSIM-BY-{ROMELO}_2240

:DRPSIM-BY-{ROMELO}_1814
if
  19@ == 1
else_jump @DRPSIM-BY-{ROMELO}_2240
if
key_down 1
else_jump @DRPSIM-BY-{ROMELO}_2240
19@ = 0
if
  18@ == 1
else_jump @DRPSIM-BY-{ROMELO}_2050
18@ = 0
format 6@ "Работа в свёр. режиме: {d9534f}выключена%c{AFAFAF}Pause: Numpad8, Stop: /dsim" 10
0A8C: write_memory 7634870 size 1 value 0 virtual_protect 1
0A8C: write_memory 7635034 size 1 value 0 virtual_protect 1
0C10: memcpy destination 7623723 source 20@ size 8
0C10: memcpy destination 5499528 source 21@ size 6
018C: play_sound 1083 at 0.0 0.0 0.0
19@ = 0
jump @DRPSIM-BY-{ROMELO}_2240

:DRPSIM-BY-{ROMELO}_2050
18@ = 1
format 6@ "Работа в свёр. режиме: {5cb85c}включена%c{AFAFAF}Pause: Numpad8, Stop: /dsim" 10
0A8C: write_memory 7634870 size 1 value 1 virtual_protect 1
0A8C: write_memory 7635034 size 1 value 1 virtual_protect 1
0AC6: 20@ = label @DRPSIM-BY-{ROMELO}_3756 offset
0C11: memset destination 7623723 value 144 size 8
0AC6: 21@ = label @DRPSIM-BY-{ROMELO}_3750 offset
0C11: memset destination 5499528 value 144 size 6
018C: play_sound 1083 at 0.0 0.0 0.0
19@ = 0

:DRPSIM-BY-{ROMELO}_2240
005A: 12@ += 4@ // (int)
005A: 12@ += 4@ // (int)
005A: 12@ += 4@ // (int)
Render.DrawText(3@, 8@, 11@, 12@, -83)
005A: 12@ += 4@ // (int)
Render.DrawText(3@, 7@, 11@, 12@, -83)

:DRPSIM-BY-{ROMELO}_2304
jump @DRPSIM-BY-{ROMELO}_1078

:DRPSIM-BY-{ROMELO}_2311
wait 0
if
  2@ == 0
else_jump @DRPSIM-BY-{ROMELO}_2618
22@ = File.Open("CLEO\drp_sim_numbers.txt", "rt")
call @DRPSIM-BY-{ROMELO}_3716 2 7 1 23@
24@ = 0

:DRPSIM-BY-{ROMELO}_2392
wait 0
File.ReadString(22@, 23@, 8)
24@ += 1
   File.EOF(22@)
else_jump @DRPSIM-BY-{ROMELO}_2392
File.Close(22@)
free 23@
0AF0: 10@ = get_int_from_ini_file "CLEO\INI\drp_sim.ini" section "SETTINGS" key "WAIT"
format 7@ "Задержка: {ffffff}%dms {a9c4e4}[.ini]%c{ffffad}Загружено: {ffffff}%d {a9c4e4}[.txt]" 10@ 10 24@
26@ = 0
018C: play_sound 1052 at 0.0 0.0 0.0
2@ = 1
jump @DRPSIM-BY-{ROMELO}_2736

:DRPSIM-BY-{ROMELO}_2618
if
   not 26@ == 0
else_jump @DRPSIM-BY-{ROMELO}_2653
File.Close(22@)
free 23@
26@ = 0

:DRPSIM-BY-{ROMELO}_2653
format 8@ "Статус: {ffffff}в ожидании диалога"
018C: play_sound 1084 at 0.0 0.0 0.0
2@ = 0
31@ = 0
33@ = 0

:DRPSIM-BY-{ROMELO}_2736
SAMP.CmdRet

:DRPSIM-BY-{ROMELO}_2738
0BE5: raknet 0@ = get_hook_param 1
0BE5: raknet 1@ = get_hook_param 0
if
  0@ == 61
else_jump @DRPSIM-BY-{ROMELO}_3382
if or
  2@ == 1
  2@ == 2
else_jump @DRPSIM-BY-{ROMELO}_3382
32@ = BitStream.GetDataPtr(1@)
27@ = BitStream.Read(1@, 2)
0085: 27@ = 27@ // (int)
if or
0C18: 33@ = strstr string1 32@ string2 "Магазин 24/7"
0C18: 33@ = strstr string1 32@ string2 "Смена номера SIM-карты"
else_jump @DRPSIM-BY-{ROMELO}_3340
if
  2@ == 1
else_jump @DRPSIM-BY-{ROMELO}_3329
if
0C18: 33@ = strstr string1 32@ string2 "Магазин 24/7"
else_jump @DRPSIM-BY-{ROMELO}_2948
0BC9: samp send_dialog_response dialog 27@ button 1 listitem 1 input 0

:DRPSIM-BY-{ROMELO}_2948
if
0C18: 33@ = strstr string1 32@ string2 "Смена номера SIM-карты"
else_jump @DRPSIM-BY-{ROMELO}_3329
if
  26@ == 0
else_jump @DRPSIM-BY-{ROMELO}_3061
22@ = File.Open("CLEO\drp_sim_numbers.txt", "rt")
call @DRPSIM-BY-{ROMELO}_3716 2 7 1 23@

:DRPSIM-BY-{ROMELO}_3061
if
   not File.EOF(22@)
else_jump @DRPSIM-BY-{ROMELO}_3226
File.ReadString(22@, 23@, 8)
26@ += 1
0C1A: 25@ = atoi 23@
call @DRPSIM-BY-{ROMELO}_3716 2 6 1 28@
format 28@ "%d" 25@
format 8@ "Статус: {ffffff}текущий номер {007fff}%s {a9c4e4}[%d/%d]" 28@ 26@ 24@
33@ = 0
31@ = 1
jump @DRPSIM-BY-{ROMELO}_3329

:DRPSIM-BY-{ROMELO}_3226
File.Close(22@)
free 23@
26@ = 0
format 8@ "Статус: {ffffff}список номеров {007fff}прочекан"
0BC9: samp send_dialog_response dialog 27@ button 0 listitem 0 input 0
018C: play_sound 1085 at 0.0 0.0 0.0

:DRPSIM-BY-{ROMELO}_3329
0BE0: raknet hook_ret 0
jump @DRPSIM-BY-{ROMELO}_3382

:DRPSIM-BY-{ROMELO}_3340
format 8@ "Статус: {ffffff}в ожидании диалога"

:DRPSIM-BY-{ROMELO}_3382
if
  0@ == 93
else_jump @DRPSIM-BY-{ROMELO}_3712
if or
  2@ == 1
  2@ == 2
else_jump @DRPSIM-BY-{ROMELO}_3712
32@ = BitStream.Read(1@, 3)
32@ = BitStream.Read(1@, 3)
call @DRPSIM-BY-{ROMELO}_3716 2 257 1 30@
BitStream.ReadArray(1@, 30@, 32@)
if
0C14: strcmp string1 30@ string2 "Такой номер уже используется"
else_jump @DRPSIM-BY-{ROMELO}_3531
0BE0: raknet hook_ret 0
jump @DRPSIM-BY-{ROMELO}_3712

:DRPSIM-BY-{ROMELO}_3531
if
0AD4: 33@ = scan_string 30@ format "Ваш новый номер телефона: {FFFFFF}%d." 28@ 
else_jump @DRPSIM-BY-{ROMELO}_3712
format 8@ "Статус: {ffffff}пойман номер {5cb85c}%d" 28@
if
   not 26@ == 0
else_jump @DRPSIM-BY-{ROMELO}_3678
File.Close(22@)
free 23@
26@ = 0

:DRPSIM-BY-{ROMELO}_3678
018C: play_sound 1084 at 0.0 0.0 0.0
31@ = 0
33@ = 0

:DRPSIM-BY-{ROMELO}_3712
0BE0: raknet hook_ret 1

:DRPSIM-BY-{ROMELO}_3716
005A: 0@ += 1@ // (int)
alloc 2@ 0@
0C11: memset destination 2@ value 0 size 0@
ret 1 2@

:DRPSIM-BY-{ROMELO}_3750
840F:   not
Actor.SetWeaponAmmo(, 2@, 2@)
hex
00 50 51 FF 15 00
end
   not Player.InZone(, 2@)

:DRPSIM-BY-{ROMELO}_3764
0B14: 1@ = 0@ MOD 60000
ret 1 1@
3@ = 0
if
0AD4: 1@ = scan_string 0@ format "Ваш новый номер телефона: {FFFFFF}%d." 2@ 
else_jump @DRPSIM-BY-{ROMELO}_3861
3@ = 1

:DRPSIM-BY-{ROMELO}_3861
if
  3@ == 1
else_jump @DRPSIM-BY-{ROMELO}_3888
return_true
jump @DRPSIM-BY-{ROMELO}_3890

:DRPSIM-BY-{ROMELO}_3888
return_false

:DRPSIM-BY-{ROMELO}_3890
ret 0

:DRPSIM-BY-{ROMELO}_3895
0B5E: get_cursor_pos 4@ 5@
if and
001D:   4@ > 0@ // (int)
001D:   5@ > 1@ // (int)
else_jump @DRPSIM-BY-{ROMELO}_3980
005A: 0@ += 2@ // (int)
005A: 1@ += 3@ // (int)
if and
001D:   0@ > 4@ // (int)
001D:   1@ > 5@ // (int)
else_jump @DRPSIM-BY-{ROMELO}_3980
ret 0 1

:DRPSIM-BY-{ROMELO}_3980
ret 0
hex
48 45
end
0058: &0 += // (int)
0EA6:
0000: NOP
0006:  // Note: the incorrect math opcode was used here
hex
00 AC
end
000E:  // Note: the incorrect math opcode was used here
0008:  // Note: the incorrect math opcode was used here
hex
00

// 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

:Noname_2
wait 0
   SAMP.Available
else_jump @Noname_2
0B34: samp register_client_command "kulak" to_label @Noname_425
0B34: samp register_client_command "kulak_id" to_label @Noname_485
chatmsg "[Kulak-Master]: {ffffff}Çàïóùåí. Àâòîð: {00ffff}romacaddy" 65535

:Noname_113
wait 0
if
  30@ == 1
else_jump @Noname_229
1@ = 0

:Noname_142
2@ = SAMP.GetActorHandleByPlayerID(1@)
if
056D:   actor 2@ defined
else_jump @Noname_207
if and
   not Actor.Dead(2@)
02D8:   actor $PLAYER_ACTOR current_weapon == 0
else_jump @Noname_207
0BCB: samp send_give_damage playerid 1@ damage 7.0 weapon 0 bodypart 9
wait 99

:Noname_207
1@ += 1
  1@ > 300
else_jump @Noname_142

:Noname_229
if and
key_down 88
0AD2: 0@ = player $PLAYER_CHAR targeted_actor //IF and SET
else_jump @Noname_307
1@ = SAMP.GetSAMPPlayerIDByActorHandle(0@)
if
02D8:   actor $PLAYER_ACTOR current_weapon == 0
else_jump @Noname_307
0BCB: samp send_give_damage playerid 1@ damage 7.0 weapon 0 bodypart 9

:Noname_292
wait 0
   not key_down 88
else_jump @Noname_292

:Noname_307
if
  31@ == 1
else_jump @Noname_418

:Noname_325
0BCB: samp send_give_damage playerid 1@ damage 7.0 weapon 0 bodypart 9
printf "Attack - %s[%d]" 500 3@ 1@
wait 99
   Actor.Dead(2@)
else_jump @Noname_325
printf "%s[%d] - DEAD" 500 3@ 1@
31@ = 0

:Noname_418
jump @Noname_113

:Noname_425
if
  30@ == 1
else_jump @Noname_467
30@ = 0
print "OFF" 500
jump @Noname_483

:Noname_467
30@ = 1
print "ON" 500

:Noname_483
SAMP.CmdRet

:Noname_485
   SAMP.IsCommandTyped(0@)
if
0AD4: 0@ = scan_string 0@ format "%d" 1@ 
else_jump @Noname_585
2@ = SAMP.GetActorHandleByPlayerID(1@)
if
056D:   actor 2@ defined
else_jump @Noname_585
3@ = SAMP.GetPlayerNickname(1@)
printf "Attack - %s[%d]" 500 3@ 1@
31@ = 1

:Noname_585
SAMP.CmdRet