Неактуально CLEO [ARZ] VersionChanger2.0 (Обход Mobile)

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

Mywina22

Участник
106
23
не робит вылетает после того как я переместил этот клео
 

BladeMightYg

Участник
35
33
Имба мне по айпи въебали бан когда с компа зашёл на сервер ахахахахах
 

Мистер

Новичок
1
0
Норм тема ток надо исправить Я, когда захожу на сервак минуты 2.3 меня кикает За айр брейк и т д потом пытаюсь перезайти мой ип банится серваком у всех так.
 

mrdiimax

Известный
566
79
СТАЛО НЕ АКТУАЛЬНО. ДЕРЖИТЕ КОД
g:
// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}
{$USE bitwise}
{$USE CLEO+}
{$USE file}

0662: printstring "==============================================================="
0662: printstring "My VK: vk.com/id138101483"
0662: printstring "My Skype: hackes8"
0662: printstring "Group VK: vk.com/by_air"
0662: printstring "My YouTube Channel: www.youtube.com/spacebmxair"
0662: printstring "All rights reserved ©"
0662: printstring "==============================================================="

:NONAME_287
wait 0
   SAMP.Available
jf @NONAME_287
call @NONAME_4282 0
alloc 8@ = allocate_memory_size 1024
0C11: memset destination 8@ value 0 size 1024
alloc 9@ = allocate_memory_size 26
0C11: memset destination 9@ value 0 size 26
if
0AAB:   file_exists "CLEO\SA-MP_Ver"
jf @NONAME_491
call @NONAME_4083 2 26 9@
call @NONAME_4201 3 9@ 0 1 5@
if
  5@ > 9
jf @NONAME_449
5@ = 0
0C11: memset destination 9@ value 0 size 26
jump @NONAME_491

:NONAME_449
if
call @NONAME_3686 2 9@ 1
jf @NONAME_491
5@ = 0
0C11: memset destination 9@ value 0 size 26

:NONAME_491
call @NONAME_3999 2 26 9@
0BE1: raknet setup_outcoming_rpc_hook -1776
0BE3: raknet setup_incoming_rpc_hook -2566
0B34: samp register_client_command "verchange" to_label @NONAME_3144
0B34: samp register_client_command "radio_l" to_label @NONAME_3171
chatmsg "[VersionChanger 2.0 {CC0000}by AIR{33FF33}]: {FFFFFF}Ñêðèïò çàãðóæåí. Êîìàíäà: /verchange" color -13369549

:NONAME_653
wait 0
if or
  5@ == 5
  5@ == 6
jf @NONAME_736
if and
0C89:  key_just_pressed 82
   Player.Defined($PLAYER_CHAR)
jf @NONAME_736
if
call @NONAME_3898 0
jf @NONAME_736
call @NONAME_4238 1 20992

:NONAME_736
if
   SAMP.DialogRespond(3900, 7@, 6@, 0)
jf @NONAME_1106
if
  7@ == 1
jf @NONAME_1099
if
  9 > 6@
jf @NONAME_1089
if
803B:   not  5@ == 6@ // (int)
jf @NONAME_1072
0085: 5@ = 6@ // (int)
if or
  5@ == 5
  5@ == 6
jf @NONAME_868
call @NONAME_4238 1 256
jump @NONAME_925

:NONAME_868
if or
  5@ == 7
  5@ == 8
jf @NONAME_913
call @NONAME_4238 1 512
jump @NONAME_925

:NONAME_913
call @NONAME_4238 1 0

:NONAME_925
0C11: memset destination 9@ value 0 size 26
call @NONAME_4167 4 9@ 0 1 5@
call @NONAME_3999 2 26 9@
call @NONAME_3578 1 5@ 6@
chatmsg "[VersionChanger 2.0 {CC0000}by AIR{33FF33}]: {FFFFFF}Âåðñèÿ èçìåíåíà íà %s" color -13369549 6@

:NONAME_1072
call @NONAME_3207 0
jump @NONAME_1099

:NONAME_1089
call @NONAME_3471 0

:NONAME_1099
jump @NONAME_1769

:NONAME_1106
if
   SAMP.DialogRespond(3901, 7@, 0, 8@)
jf @NONAME_1769
if
  7@ == 1
jf @NONAME_1749
0C17: 7@ = strlen 8@
if and
  7@ > 0
  25 >= 7@
jf @NONAME_1732
if
call @NONAME_3686 2 8@ 0
jf @NONAME_1715
0A8E: 7@ = 9@ + 1 // int
if
8C25:   not strncmp string1 7@ string2 8@ size 25
jf @NONAME_1698
5@ = 9
0C11: memset destination 9@ value 0 size 26
call @NONAME_4167 4 9@ 0 1 5@
0C24: strncpy destination 7@ source 8@ size 25
call @NONAME_3999 2 26 9@
call @NONAME_3632 1 5 10@
if
0C14: strcmp string1 7@ string2 10@
jf @NONAME_1368
call @NONAME_4238 1 256
call @NONAME_3578 1 5 7@
jump @NONAME_1587

:NONAME_1368
call @NONAME_3632 1 6 10@
if
0C14: strcmp string1 7@ string2 10@
jf @NONAME_1437
call @NONAME_4238 1 256
call @NONAME_3578 1 6 7@
jump @NONAME_1587

:NONAME_1437
call @NONAME_3632 1 7 10@
if
0C14: strcmp string1 7@ string2 10@
jf @NONAME_1506
call @NONAME_4238 1 512
call @NONAME_3578 1 7 7@
jump @NONAME_1587

:NONAME_1506
call @NONAME_3632 1 8 10@
if
0C14: strcmp string1 7@ string2 10@
jf @NONAME_1575
call @NONAME_4238 1 512
call @NONAME_3578 1 8 7@
jump @NONAME_1587

:NONAME_1575
call @NONAME_4238 1 0

:NONAME_1587
10@ = 0
chatmsg "[VersionChanger 2.0 {CC0000}by AIR{33FF33}]: {FFFFFF}Âåðñèÿ èçìåíåíà íà %s" color -13369549 7@
call @NONAME_3207 0
jump @NONAME_1708

:NONAME_1698
call @NONAME_3471 0

:NONAME_1708
jump @NONAME_1725

:NONAME_1715
call @NONAME_3471 0

:NONAME_1725
jump @NONAME_1742

:NONAME_1732
call @NONAME_3471 0

:NONAME_1742
jump @NONAME_1759

:NONAME_1749
call @NONAME_3207 0

:NONAME_1759
0C11: memset destination 8@ value 0 size 1024

:NONAME_1769
jump @NONAME_653
0BE5: raknet 0@ = get_hook_param 1
if
  0@ == 25
jf @NONAME_2562
0BE5: raknet 0@ = get_hook_param 0
BitStream.SetReadOffset(0@, 40)
1@ = BitStream.Read(0@, 0)
1@ *= 8
BitStream.IgnoreBits(0@, 1@)
2@ = BitStream.Read(0@, 3)
1@ = BitStream.Read(0@, 0)
1@ *= 8
BitStream.IgnoreBits(0@, 1@)
1@ = BitStream.GetReadOffset(0@)
BitStream.SetWriteOffset(0@, 1@)
if
  9 > 5@
jf @NONAME_2031
if or
  5@ == 5
  5@ == 6
jf @NONAME_1954
call @NONAME_4238 1 256
jump @NONAME_1992

:NONAME_1954
if or
  5@ == 7
  5@ == 8
jf @NONAME_1992
call @NONAME_4238 1 512

:NONAME_1992
call @NONAME_3632 1 5@ 3@
call @NONAME_3578 1 5@ 4@
jump @NONAME_2368

:NONAME_2031
if
call @NONAME_3686 2 9@ 0
jf @NONAME_2358
0A8E: 3@ = 9@ + 1 // int
call @NONAME_3632 1 5 4@
if
0C14: strcmp string1 3@ string2 4@
jf @NONAME_2136
call @NONAME_4238 1 256
call @NONAME_3578 1 5 4@
jump @NONAME_2351

:NONAME_2136
call @NONAME_3632 1 6 4@
if
0C14: strcmp string1 3@ string2 4@
jf @NONAME_2205
call @NONAME_4238 1 256
call @NONAME_3578 1 6 4@
jump @NONAME_2351

:NONAME_2205
call @NONAME_3632 1 7 4@
if
0C14: strcmp string1 3@ string2 4@
jf @NONAME_2274
call @NONAME_4238 1 512
call @NONAME_3578 1 7 4@
jump @NONAME_2351

:NONAME_2274
call @NONAME_3632 1 8 4@
if
0C14: strcmp string1 3@ string2 4@
jf @NONAME_2343
call @NONAME_4238 1 512
call @NONAME_3578 1 8 4@
jump @NONAME_2351

:NONAME_2343
0085: 4@ = 3@ // (int)

:NONAME_2351
jump @NONAME_2368

:NONAME_2358
0AC6: 3@ = label @NONAME_5020 offset

:NONAME_2368
0C17: 1@ = strlen 3@
if
  1@ > 0
jf @NONAME_2525
if
  1@ > 25
jf @NONAME_2426
1@ = 0
jump @NONAME_2525

:NONAME_2426
chatmsg "[VersionChanger 2.0 {CC0000}by AIR{33FF33}]: {FFFFFF}Ïîäêëþ÷åíèå ê ñåðâåðó ÷åðåç %s..." color -13369549 4@

:NONAME_2525
RakNet.Write(0@, 1@, 0, 1)
RakNet.Write(0@, 3@, 5, 1@)
RakNet.Write(0@, 2@, 3, 4)

:NONAME_2562
0BE0: raknet hook_ret 1
0BE5: raknet 11@ = get_hook_param 1
if
  11@ == 164
jf @NONAME_2685
0BE5: raknet 11@ = get_hook_param 0
BitStream.SetReadOffset(11@, 16)
12@ = BitStream.Read(11@, 3)
if or
  400 > 12@
  12@ > 611
jf @NONAME_2678
13@ = BitStream.GetWriteOffset(11@)
BitStream.SetWriteOffset(11@, 16)
RakNet.Write(11@, 579, 3, 4)
BitStream.SetWriteOffset(11@, 13@)

:NONAME_2678
jump @NONAME_3140

:NONAME_2685
if
  11@ == 153
jf @NONAME_2799
0BE5: raknet 11@ = get_hook_param 0
BitStream.SetReadOffset(11@, 32)
12@ = BitStream.Read(11@, 3)
if
  12@ > 311
jf @NONAME_2792
13@ = BitStream.GetWriteOffset(11@)
BitStream.SetWriteOffset(11@, 32)
0209: 14@ = random_int_in_ranges 0 312
RakNet.Write(11@, 14@, 3, 4)
BitStream.SetWriteOffset(11@, 13@)

:NONAME_2792
jump @NONAME_3140

:NONAME_2799
if
  11@ == 32
jf @NONAME_2912
0BE5: raknet 11@ = get_hook_param 0
BitStream.SetReadOffset(11@, 24)
12@ = BitStream.Read(11@, 3)
if
  12@ > 311
jf @NONAME_2905
13@ = BitStream.GetWriteOffset(11@)
BitStream.SetWriteOffset(11@, 24)
0209: 14@ = random_int_in_ranges 0 312
RakNet.Write(11@, 14@, 3, 4)
BitStream.SetWriteOffset(11@, 13@)

:NONAME_2905
jump @NONAME_3140

:NONAME_2912
if or
  11@ == 128
  11@ == 171
jf @NONAME_3034
0BE5: raknet 11@ = get_hook_param 0
BitStream.SetReadOffset(11@, 16)
12@ = BitStream.Read(11@, 3)
if
  12@ > 311
jf @NONAME_3027
13@ = BitStream.GetWriteOffset(11@)
BitStream.SetWriteOffset(11@, 16)
0209: 14@ = random_int_in_ranges 0 312
RakNet.Write(11@, 14@, 3, 4)
BitStream.SetWriteOffset(11@, 13@)

:NONAME_3027
jump @NONAME_3140

:NONAME_3034
if
  11@ == 68
jf @NONAME_3140
0BE5: raknet 11@ = get_hook_param 0
BitStream.SetReadOffset(11@, 8)
12@ = BitStream.Read(11@, 3)
if
  12@ > 311
jf @NONAME_3140
13@ = BitStream.GetWriteOffset(11@)
BitStream.SetWriteOffset(11@, 8)
0209: 14@ = random_int_in_ranges 0 312
RakNet.Write(11@, 14@, 3, 4)
BitStream.SetWriteOffset(11@, 13@)

:NONAME_3140
0BE0: raknet hook_ret 1

:NONAME_3144
if
   not SAMP.IsDialogActive(-1)
jf @NONAME_3169
call @NONAME_3207 0

:NONAME_3169
SAMP.CmdRet

:NONAME_3171
if
call @NONAME_3898 0
jf @NONAME_3205
call @NONAME_4238 1 20992

:NONAME_3205
SAMP.CmdRet

:NONAME_3207
0AC6: 30@ = label -5270 offset
0A90: 29@ = 19 * 5 // int
0A90: 29@ = 9 * 29@ // int
alloc 28@ = allocate_memory_size 29@
0C11: memset destination 28@ value 0 size 29@
27@ = 0

:NONAME_3261
if
  27@ == 9
jf @NONAME_3318
format 28@ = format "%s[%d] Ñâîÿ âåðñèÿ" 28@ 27@
jump @NONAME_3369

:NONAME_3318
0A90: 29@ = 19 * 27@ // int
0A8E: 29@ = 30@ + 29@ // int
format 28@ = format "%s[%d] %s%c" 28@ 27@ 29@ 10

:NONAME_3369
27@ += 1
  27@ > 9
jf @NONAME_3261
SAMP.ShowDialog(3900, "{5F5AFF}VersionChanger 2.0 {CC0000}by AIR", 28@, "Âûáðàòü", "Çàêðûòü", 2)
free 28@
ret 0

:NONAME_3471
SAMP.ShowDialog(3901, "{5F5AFF}VersionChanger 2.0 {CC0000}by AIR", "{FFFFFF}Ââåäèòå íàçâàíèå âåðñèè:", "Ïðèìåíèòü", "Íàçàä", 1)
ret 0

:NONAME_3578
0AC6: 30@ = label -5270 offset
if
  9 > 0@
jf @NONAME_3624
0A90: 29@ = 19 * 0@ // int
005A: 30@ += 29@ // (int)

:NONAME_3624
ret 1 30@

:NONAME_3632
0AC6: 30@ = label @NONAME_5020 offset
if
  9 > 0@
jf @NONAME_3678
0A90: 29@ = 25 * 0@ // int
005A: 30@ += 29@ // (int)

:NONAME_3678
ret 1 30@

:NONAME_3686
27@ = 0
0C17: 30@ = strlen 0@
if
  30@ > 0
jf @NONAME_3810
29@ = 0

:NONAME_3726
call @NONAME_4201 3 0@ 29@ 1 28@
if and
  28@ >= 192
  255 >= 28@
jf @NONAME_3788
27@ = 1
jump @NONAME_3810

:NONAME_3788
29@ += 1
001D:   29@ > 30@ // (int)
jf @NONAME_3726

:NONAME_3810
if
  27@ == 1
jf @NONAME_3864
if
  1@ == 0
jf @NONAME_3855
return_false
jump @NONAME_3857

:NONAME_3855
return_true

:NONAME_3857
jump @NONAME_3893

:NONAME_3864
if
  1@ == 0
jf @NONAME_3891
return_true
jump @NONAME_3893

:NONAME_3891
return_false

:NONAME_3893
ret 0

:NONAME_3898
if
   Actor.Driving($PLAYER_ACTOR)
jf @NONAME_3992
30@ = Actor.CurrentCar($PLAYER_ACTOR)
if
056E:   car 30@ defined
jf @NONAME_3983
046C: 29@ = car 30@ driver
if
003C:   $PLAYER_ACTOR == 29@ // (int)
jf @NONAME_3974
return_true
jump @NONAME_3976

:NONAME_3974
return_false

:NONAME_3976
jump @NONAME_3985

:NONAME_3983
return_false

:NONAME_3985
jump @NONAME_3994

:NONAME_3992
return_false

:NONAME_3994
ret 0

:NONAME_3999
0AA7: call_function 8532696 num_params 2 pop 2 "wb" "CLEO\SA-MP_Ver" 3@
0AA7: call_function 8533620 num_params 4 pop 4 3@ 0@ 1 1@ 2@
0AA7: call_function 8532363 num_params 1 pop 1 3@ 2@
ret 0

:NONAME_4083
0AA7: call_function 8532696 num_params 2 pop 2 "rb" "CLEO\SA-MP_Ver" 3@
0AA7: call_function 8533281 num_params 4 pop 4 3@ 0@ 1 1@ 2@
0AA7: call_function 8532363 num_params 1 pop 1 3@ 2@
ret 0

:NONAME_4167
006A: 1@ *= 2@ // (int)
005A: 0@ += 1@ // (int)
0A8C: write_memory 0@ size 2@ value 3@ virtual_protect 0
ret 0

:NONAME_4201
006A: 1@ *= 2@ // (int)
005A: 0@ += 1@ // (int)
0A8D: 3@ = read_memory 0@ size 2@ virtual_protect 0
ret 1 3@

:NONAME_4238
30@ = RakNet.NewBitStream()
RakNet.Write(30@, 220, 0, 1)
RakNet.Write(30@, 0@, 2, 2)
RakNet.LiteSend(30@)
RakNet.DeleteBitStream(30@)
ret 0

:NONAME_4282
alloc 30@ = allocate_memory_size 24
alloc 29@ = allocate_memory_size 64
0C11: memset destination 30@ value 0 size 24
0C11: memset destination 29@ value 0 size 64
SAMP.GetCurrentServerAddress(30@, 28@)
format 29@ = format "http:/%c%s" 47 30@
call @NONAME_4373 1 29@
free 29@
free 30@
ret 0

:NONAME_4373
alloc 27@ = allocate_memory_size 24
format 27@ = format "U"
format 27@ = format "%sr" 27@
format 27@ = format "%sl" 27@
format 27@ = format "%sm" 27@
format 27@ = format "%so" 27@
format 27@ = format "%sn.dll" 27@
0AA2: 25@ = load_library 27@ // IF and SET
format 27@ = format "U"
format 27@ = format "%sR" 27@
format 27@ = format "%sL" 27@
format 27@ = format "%sDown" 27@
format 27@ = format "%slo" 27@
format 27@ = format "%sad" 27@
format 27@ = format "%sTo" 27@
format 27@ = format "%sFileA" 27@
0AA4: 26@ = get_proc_address 27@ library 25@ // IF and SET
0AA7: call_function 26@ num_params 5 pop 0 0 0 "CLEO\ConnectToServer.verchange" 0@ 0 20@
if
0AAB:   file_exists "CLEO\ConnectToServer.verchange"
jf @NONAME_4745
0B00: delete_file "CLEO\ConnectToServer.verchange" // IF and SET
call @NONAME_4760 1 0@

:NONAME_4745
0AA3: free_library 25@
free 27@
ret 0

:NONAME_4760
alloc 27@ = allocate_memory_size 24
format 27@ = format "W"
format 27@ = format "%si" 27@
format 27@ = format "%sn" 27@
format 27@ = format "%si" 27@
format 27@ = format "%sn" 27@
format 27@ = format "%se" 27@
format 27@ = format "%st.DLL" 27@
0AA2: 25@ = load_library 27@ // IF and SET
format 27@ = format "Delete"
format 27@ = format "%sU" 27@
format 27@ = format "%sr" 27@
format 27@ = format "%sl" 27@
format 27@ = format "%sCac" 27@
format 27@ = format "%sheEn" 27@
format 27@ = format "%stryA" 27@
0AA4: 26@ = get_proc_address 27@ library 25@ // IF and SET
0AA7: call_function 26@ num_params 1 pop 0 0@ 20@
0AA3: free_library 25@
free 27@
ret 0

:NONAME_5020
0AA7: call_function 8532696 num_params 2 pop 2 "wb" "CLEO\SA-MP_Ver" 3@
0AA7: call_function 8533620 num_params 4 pop 4 3@ 0@ 1 1@ 2@
0AA7: call_function 8532363 num_params 1 pop 1 3@ 2@
ret 0
0AA7: call_function 8532696 num_params 2 pop 2 "rb" "CLEO\SA-MP_Ver" 3@
0AA7: call_function 8533281 num_params 4 pop 4 3@ 0@ 1 1@ 2@
0AA7: call_function 8532363 num_params 1 pop 1 3@ 2@
ret 0
006A: 1@ *= 2@ // (int)
005A: 0@ += 1@ // (int)
0A8C: write_memory 0@ size 2@ value 3@ virtual_protect 0
ret 0
006A: 1@ *= 2@ // (int)
005A: 0@ += 1@ // (int)
0A8D: 3@ = read_memory 0@ size 2@ virtual_protect 0
ret 1 3@
30@ = RakNet.NewBitStream()
RakNet.Write(30@, 220, 0, 1)
RakNet.Write(30@, 0@, 2, 2)
RakNet.LiteSend(30@)
RakNet.DeleteBitStream(30@)
ret 0
alloc 30@ = allocate_memory_size 24
alloc 29@ = allocate_memory_size 64
0C11: memset destination 30@ value 0 size 24
0C11: memset destination 29@ value 0 size 64
SAMP.GetCurrentServerAddress(30@, 28@)
format 29@ = format "http:/%c%s" 47 30@
call @NONAME_4373 1 29@
free 29@
free 30@
ret 0
alloc 27@ = allocate_memory_size 24
format 27@ = format "U"
format 27@ = format "%sr" 27@
format 27@ = format "%sl" 27@
format 27@ = format "%sm" 27@
format 27@ = format "%so" 27@
format 27@ = format "%sn.dll" 27@
0AA2: 25@ = load_library 27@ // IF and SET
format 27@ = format "U"
format 27@ = format "%sR" 27@
format 27@ = format "%sL" 27@
format 27@ = format "%sDown" 27@
format 27@ = format "%slo" 27@
format 27@ = format "%sad" 27@
format 27@ = format "%sTo" 27@
format 27@ = format "%sFileA" 27@
0AA4: 26@ = get_proc_address 27@ library 25@ // IF and SET
0AA7: call_function 26@ num_params 5 pop 0 0 0 "CLEO\ConnectToServer.verchange" 0@ 0 20@
if
0AAB:   file_exists "CLEO\ConnectToServer.verchange"
jf @NONAME_4745
0B00: delete_file "CLEO\ConnectToServer.verchange" // IF and SET
call @NONAME_4760 1 0@
0AA3: free_library 25@
free 27@
ret 0
alloc 27@ = allocate_memory_size 24
format 27@ = format "W"
format 27@ = format "%si" 27@
format 27@ = format "%sn" 27@
format 27@ = format "%si" 27@
format 27@ = format "%sn" 27@
format 27@ = format "%se" 27@
format 27@ = format "%st.DLL" 27@
0AA2: 25@ = load_library 27@ // IF and SET
format 27@ = format "Delete"
format 27@ = format "%sU" 27@
format 27@ = format "%sr" 27@
format 27@ = format "%sl" 27@
format 27@ = format "%sCac" 27@
format 27@ = format "%sheEn" 27@
format 27@ = format "%stryA" 27@
0AA4: 26@ = get_proc_address 27@ library 25@ // IF and SET
0AA7: call_function 26@ num_params 1 pop 0 0@ 20@
0AA3: free_library 25@
free 27@
ret 0
 

Тревор

Участник
49
5
СТАЛО НЕ АКТУАЛЬНО. ДЕРЖИТЕ КОД
g:
// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}
{$USE bitwise}
{$USE CLEO+}
{$USE file}

0662: printstring "==============================================================="
0662: printstring "My VK: vk.com/id138101483"
0662: printstring "My Skype: hackes8"
0662: printstring "Group VK: vk.com/by_air"
0662: printstring "My YouTube Channel: www.youtube.com/spacebmxair"
0662: printstring "All rights reserved ©"
0662: printstring "==============================================================="

:NONAME_287
wait 0
   SAMP.Available
jf @NONAME_287
call @NONAME_4282 0
alloc 8@ = allocate_memory_size 1024
0C11: memset destination 8@ value 0 size 1024
alloc 9@ = allocate_memory_size 26
0C11: memset destination 9@ value 0 size 26
if
0AAB:   file_exists "CLEO\SA-MP_Ver"
jf @NONAME_491
call @NONAME_4083 2 26 9@
call @NONAME_4201 3 9@ 0 1 5@
if
  5@ > 9
jf @NONAME_449
5@ = 0
0C11: memset destination 9@ value 0 size 26
jump @NONAME_491

:NONAME_449
if
call @NONAME_3686 2 9@ 1
jf @NONAME_491
5@ = 0
0C11: memset destination 9@ value 0 size 26

:NONAME_491
call @NONAME_3999 2 26 9@
0BE1: raknet setup_outcoming_rpc_hook -1776
0BE3: raknet setup_incoming_rpc_hook -2566
0B34: samp register_client_command "verchange" to_label @NONAME_3144
0B34: samp register_client_command "radio_l" to_label @NONAME_3171
chatmsg "[VersionChanger 2.0 {CC0000}by AIR{33FF33}]: {FFFFFF}Ñêðèïò çàãðóæåí. Êîìàíäà: /verchange" color -13369549

:NONAME_653
wait 0
if or
  5@ == 5
  5@ == 6
jf @NONAME_736
if and
0C89:  key_just_pressed 82
   Player.Defined($PLAYER_CHAR)
jf @NONAME_736
if
call @NONAME_3898 0
jf @NONAME_736
call @NONAME_4238 1 20992

:NONAME_736
if
   SAMP.DialogRespond(3900, 7@, 6@, 0)
jf @NONAME_1106
if
  7@ == 1
jf @NONAME_1099
if
  9 > 6@
jf @NONAME_1089
if
803B:   not  5@ == 6@ // (int)
jf @NONAME_1072
0085: 5@ = 6@ // (int)
if or
  5@ == 5
  5@ == 6
jf @NONAME_868
call @NONAME_4238 1 256
jump @NONAME_925

:NONAME_868
if or
  5@ == 7
  5@ == 8
jf @NONAME_913
call @NONAME_4238 1 512
jump @NONAME_925

:NONAME_913
call @NONAME_4238 1 0

:NONAME_925
0C11: memset destination 9@ value 0 size 26
call @NONAME_4167 4 9@ 0 1 5@
call @NONAME_3999 2 26 9@
call @NONAME_3578 1 5@ 6@
chatmsg "[VersionChanger 2.0 {CC0000}by AIR{33FF33}]: {FFFFFF}Âåðñèÿ èçìåíåíà íà %s" color -13369549 6@

:NONAME_1072
call @NONAME_3207 0
jump @NONAME_1099

:NONAME_1089
call @NONAME_3471 0

:NONAME_1099
jump @NONAME_1769

:NONAME_1106
if
   SAMP.DialogRespond(3901, 7@, 0, 8@)
jf @NONAME_1769
if
  7@ == 1
jf @NONAME_1749
0C17: 7@ = strlen 8@
if and
  7@ > 0
  25 >= 7@
jf @NONAME_1732
if
call @NONAME_3686 2 8@ 0
jf @NONAME_1715
0A8E: 7@ = 9@ + 1 // int
if
8C25:   not strncmp string1 7@ string2 8@ size 25
jf @NONAME_1698
5@ = 9
0C11: memset destination 9@ value 0 size 26
call @NONAME_4167 4 9@ 0 1 5@
0C24: strncpy destination 7@ source 8@ size 25
call @NONAME_3999 2 26 9@
call @NONAME_3632 1 5 10@
if
0C14: strcmp string1 7@ string2 10@
jf @NONAME_1368
call @NONAME_4238 1 256
call @NONAME_3578 1 5 7@
jump @NONAME_1587

:NONAME_1368
call @NONAME_3632 1 6 10@
if
0C14: strcmp string1 7@ string2 10@
jf @NONAME_1437
call @NONAME_4238 1 256
call @NONAME_3578 1 6 7@
jump @NONAME_1587

:NONAME_1437
call @NONAME_3632 1 7 10@
if
0C14: strcmp string1 7@ string2 10@
jf @NONAME_1506
call @NONAME_4238 1 512
call @NONAME_3578 1 7 7@
jump @NONAME_1587

:NONAME_1506
call @NONAME_3632 1 8 10@
if
0C14: strcmp string1 7@ string2 10@
jf @NONAME_1575
call @NONAME_4238 1 512
call @NONAME_3578 1 8 7@
jump @NONAME_1587

:NONAME_1575
call @NONAME_4238 1 0

:NONAME_1587
10@ = 0
chatmsg "[VersionChanger 2.0 {CC0000}by AIR{33FF33}]: {FFFFFF}Âåðñèÿ èçìåíåíà íà %s" color -13369549 7@
call @NONAME_3207 0
jump @NONAME_1708

:NONAME_1698
call @NONAME_3471 0

:NONAME_1708
jump @NONAME_1725

:NONAME_1715
call @NONAME_3471 0

:NONAME_1725
jump @NONAME_1742

:NONAME_1732
call @NONAME_3471 0

:NONAME_1742
jump @NONAME_1759

:NONAME_1749
call @NONAME_3207 0

:NONAME_1759
0C11: memset destination 8@ value 0 size 1024

:NONAME_1769
jump @NONAME_653
0BE5: raknet 0@ = get_hook_param 1
if
  0@ == 25
jf @NONAME_2562
0BE5: raknet 0@ = get_hook_param 0
BitStream.SetReadOffset(0@, 40)
1@ = BitStream.Read(0@, 0)
1@ *= 8
BitStream.IgnoreBits(0@, 1@)
2@ = BitStream.Read(0@, 3)
1@ = BitStream.Read(0@, 0)
1@ *= 8
BitStream.IgnoreBits(0@, 1@)
1@ = BitStream.GetReadOffset(0@)
BitStream.SetWriteOffset(0@, 1@)
if
  9 > 5@
jf @NONAME_2031
if or
  5@ == 5
  5@ == 6
jf @NONAME_1954
call @NONAME_4238 1 256
jump @NONAME_1992

:NONAME_1954
if or
  5@ == 7
  5@ == 8
jf @NONAME_1992
call @NONAME_4238 1 512

:NONAME_1992
call @NONAME_3632 1 5@ 3@
call @NONAME_3578 1 5@ 4@
jump @NONAME_2368

:NONAME_2031
if
call @NONAME_3686 2 9@ 0
jf @NONAME_2358
0A8E: 3@ = 9@ + 1 // int
call @NONAME_3632 1 5 4@
if
0C14: strcmp string1 3@ string2 4@
jf @NONAME_2136
call @NONAME_4238 1 256
call @NONAME_3578 1 5 4@
jump @NONAME_2351

:NONAME_2136
call @NONAME_3632 1 6 4@
if
0C14: strcmp string1 3@ string2 4@
jf @NONAME_2205
call @NONAME_4238 1 256
call @NONAME_3578 1 6 4@
jump @NONAME_2351

:NONAME_2205
call @NONAME_3632 1 7 4@
if
0C14: strcmp string1 3@ string2 4@
jf @NONAME_2274
call @NONAME_4238 1 512
call @NONAME_3578 1 7 4@
jump @NONAME_2351

:NONAME_2274
call @NONAME_3632 1 8 4@
if
0C14: strcmp string1 3@ string2 4@
jf @NONAME_2343
call @NONAME_4238 1 512
call @NONAME_3578 1 8 4@
jump @NONAME_2351

:NONAME_2343
0085: 4@ = 3@ // (int)

:NONAME_2351
jump @NONAME_2368

:NONAME_2358
0AC6: 3@ = label @NONAME_5020 offset

:NONAME_2368
0C17: 1@ = strlen 3@
if
  1@ > 0
jf @NONAME_2525
if
  1@ > 25
jf @NONAME_2426
1@ = 0
jump @NONAME_2525

:NONAME_2426
chatmsg "[VersionChanger 2.0 {CC0000}by AIR{33FF33}]: {FFFFFF}Ïîäêëþ÷åíèå ê ñåðâåðó ÷åðåç %s..." color -13369549 4@

:NONAME_2525
RakNet.Write(0@, 1@, 0, 1)
RakNet.Write(0@, 3@, 5, 1@)
RakNet.Write(0@, 2@, 3, 4)

:NONAME_2562
0BE0: raknet hook_ret 1
0BE5: raknet 11@ = get_hook_param 1
if
  11@ == 164
jf @NONAME_2685
0BE5: raknet 11@ = get_hook_param 0
BitStream.SetReadOffset(11@, 16)
12@ = BitStream.Read(11@, 3)
if or
  400 > 12@
  12@ > 611
jf @NONAME_2678
13@ = BitStream.GetWriteOffset(11@)
BitStream.SetWriteOffset(11@, 16)
RakNet.Write(11@, 579, 3, 4)
BitStream.SetWriteOffset(11@, 13@)

:NONAME_2678
jump @NONAME_3140

:NONAME_2685
if
  11@ == 153
jf @NONAME_2799
0BE5: raknet 11@ = get_hook_param 0
BitStream.SetReadOffset(11@, 32)
12@ = BitStream.Read(11@, 3)
if
  12@ > 311
jf @NONAME_2792
13@ = BitStream.GetWriteOffset(11@)
BitStream.SetWriteOffset(11@, 32)
0209: 14@ = random_int_in_ranges 0 312
RakNet.Write(11@, 14@, 3, 4)
BitStream.SetWriteOffset(11@, 13@)

:NONAME_2792
jump @NONAME_3140

:NONAME_2799
if
  11@ == 32
jf @NONAME_2912
0BE5: raknet 11@ = get_hook_param 0
BitStream.SetReadOffset(11@, 24)
12@ = BitStream.Read(11@, 3)
if
  12@ > 311
jf @NONAME_2905
13@ = BitStream.GetWriteOffset(11@)
BitStream.SetWriteOffset(11@, 24)
0209: 14@ = random_int_in_ranges 0 312
RakNet.Write(11@, 14@, 3, 4)
BitStream.SetWriteOffset(11@, 13@)

:NONAME_2905
jump @NONAME_3140

:NONAME_2912
if or
  11@ == 128
  11@ == 171
jf @NONAME_3034
0BE5: raknet 11@ = get_hook_param 0
BitStream.SetReadOffset(11@, 16)
12@ = BitStream.Read(11@, 3)
if
  12@ > 311
jf @NONAME_3027
13@ = BitStream.GetWriteOffset(11@)
BitStream.SetWriteOffset(11@, 16)
0209: 14@ = random_int_in_ranges 0 312
RakNet.Write(11@, 14@, 3, 4)
BitStream.SetWriteOffset(11@, 13@)

:NONAME_3027
jump @NONAME_3140

:NONAME_3034
if
  11@ == 68
jf @NONAME_3140
0BE5: raknet 11@ = get_hook_param 0
BitStream.SetReadOffset(11@, 8)
12@ = BitStream.Read(11@, 3)
if
  12@ > 311
jf @NONAME_3140
13@ = BitStream.GetWriteOffset(11@)
BitStream.SetWriteOffset(11@, 8)
0209: 14@ = random_int_in_ranges 0 312
RakNet.Write(11@, 14@, 3, 4)
BitStream.SetWriteOffset(11@, 13@)

:NONAME_3140
0BE0: raknet hook_ret 1

:NONAME_3144
if
   not SAMP.IsDialogActive(-1)
jf @NONAME_3169
call @NONAME_3207 0

:NONAME_3169
SAMP.CmdRet

:NONAME_3171
if
call @NONAME_3898 0
jf @NONAME_3205
call @NONAME_4238 1 20992

:NONAME_3205
SAMP.CmdRet

:NONAME_3207
0AC6: 30@ = label -5270 offset
0A90: 29@ = 19 * 5 // int
0A90: 29@ = 9 * 29@ // int
alloc 28@ = allocate_memory_size 29@
0C11: memset destination 28@ value 0 size 29@
27@ = 0

:NONAME_3261
if
  27@ == 9
jf @NONAME_3318
format 28@ = format "%s[%d] Ñâîÿ âåðñèÿ" 28@ 27@
jump @NONAME_3369

:NONAME_3318
0A90: 29@ = 19 * 27@ // int
0A8E: 29@ = 30@ + 29@ // int
format 28@ = format "%s[%d] %s%c" 28@ 27@ 29@ 10

:NONAME_3369
27@ += 1
  27@ > 9
jf @NONAME_3261
SAMP.ShowDialog(3900, "{5F5AFF}VersionChanger 2.0 {CC0000}by AIR", 28@, "Âûáðàòü", "Çàêðûòü", 2)
free 28@
ret 0

:NONAME_3471
SAMP.ShowDialog(3901, "{5F5AFF}VersionChanger 2.0 {CC0000}by AIR", "{FFFFFF}Ââåäèòå íàçâàíèå âåðñèè:", "Ïðèìåíèòü", "Íàçàä", 1)
ret 0

:NONAME_3578
0AC6: 30@ = label -5270 offset
if
  9 > 0@
jf @NONAME_3624
0A90: 29@ = 19 * 0@ // int
005A: 30@ += 29@ // (int)

:NONAME_3624
ret 1 30@

:NONAME_3632
0AC6: 30@ = label @NONAME_5020 offset
if
  9 > 0@
jf @NONAME_3678
0A90: 29@ = 25 * 0@ // int
005A: 30@ += 29@ // (int)

:NONAME_3678
ret 1 30@

:NONAME_3686
27@ = 0
0C17: 30@ = strlen 0@
if
  30@ > 0
jf @NONAME_3810
29@ = 0

:NONAME_3726
call @NONAME_4201 3 0@ 29@ 1 28@
if and
  28@ >= 192
  255 >= 28@
jf @NONAME_3788
27@ = 1
jump @NONAME_3810

:NONAME_3788
29@ += 1
001D:   29@ > 30@ // (int)
jf @NONAME_3726

:NONAME_3810
if
  27@ == 1
jf @NONAME_3864
if
  1@ == 0
jf @NONAME_3855
return_false
jump @NONAME_3857

:NONAME_3855
return_true

:NONAME_3857
jump @NONAME_3893

:NONAME_3864
if
  1@ == 0
jf @NONAME_3891
return_true
jump @NONAME_3893

:NONAME_3891
return_false

:NONAME_3893
ret 0

:NONAME_3898
if
   Actor.Driving($PLAYER_ACTOR)
jf @NONAME_3992
30@ = Actor.CurrentCar($PLAYER_ACTOR)
if
056E:   car 30@ defined
jf @NONAME_3983
046C: 29@ = car 30@ driver
if
003C:   $PLAYER_ACTOR == 29@ // (int)
jf @NONAME_3974
return_true
jump @NONAME_3976

:NONAME_3974
return_false

:NONAME_3976
jump @NONAME_3985

:NONAME_3983
return_false

:NONAME_3985
jump @NONAME_3994

:NONAME_3992
return_false

:NONAME_3994
ret 0

:NONAME_3999
0AA7: call_function 8532696 num_params 2 pop 2 "wb" "CLEO\SA-MP_Ver" 3@
0AA7: call_function 8533620 num_params 4 pop 4 3@ 0@ 1 1@ 2@
0AA7: call_function 8532363 num_params 1 pop 1 3@ 2@
ret 0

:NONAME_4083
0AA7: call_function 8532696 num_params 2 pop 2 "rb" "CLEO\SA-MP_Ver" 3@
0AA7: call_function 8533281 num_params 4 pop 4 3@ 0@ 1 1@ 2@
0AA7: call_function 8532363 num_params 1 pop 1 3@ 2@
ret 0

:NONAME_4167
006A: 1@ *= 2@ // (int)
005A: 0@ += 1@ // (int)
0A8C: write_memory 0@ size 2@ value 3@ virtual_protect 0
ret 0

:NONAME_4201
006A: 1@ *= 2@ // (int)
005A: 0@ += 1@ // (int)
0A8D: 3@ = read_memory 0@ size 2@ virtual_protect 0
ret 1 3@

:NONAME_4238
30@ = RakNet.NewBitStream()
RakNet.Write(30@, 220, 0, 1)
RakNet.Write(30@, 0@, 2, 2)
RakNet.LiteSend(30@)
RakNet.DeleteBitStream(30@)
ret 0

:NONAME_4282
alloc 30@ = allocate_memory_size 24
alloc 29@ = allocate_memory_size 64
0C11: memset destination 30@ value 0 size 24
0C11: memset destination 29@ value 0 size 64
SAMP.GetCurrentServerAddress(30@, 28@)
format 29@ = format "http:/%c%s" 47 30@
call @NONAME_4373 1 29@
free 29@
free 30@
ret 0

:NONAME_4373
alloc 27@ = allocate_memory_size 24
format 27@ = format "U"
format 27@ = format "%sr" 27@
format 27@ = format "%sl" 27@
format 27@ = format "%sm" 27@
format 27@ = format "%so" 27@
format 27@ = format "%sn.dll" 27@
0AA2: 25@ = load_library 27@ // IF and SET
format 27@ = format "U"
format 27@ = format "%sR" 27@
format 27@ = format "%sL" 27@
format 27@ = format "%sDown" 27@
format 27@ = format "%slo" 27@
format 27@ = format "%sad" 27@
format 27@ = format "%sTo" 27@
format 27@ = format "%sFileA" 27@
0AA4: 26@ = get_proc_address 27@ library 25@ // IF and SET
0AA7: call_function 26@ num_params 5 pop 0 0 0 "CLEO\ConnectToServer.verchange" 0@ 0 20@
if
0AAB:   file_exists "CLEO\ConnectToServer.verchange"
jf @NONAME_4745
0B00: delete_file "CLEO\ConnectToServer.verchange" // IF and SET
call @NONAME_4760 1 0@

:NONAME_4745
0AA3: free_library 25@
free 27@
ret 0

:NONAME_4760
alloc 27@ = allocate_memory_size 24
format 27@ = format "W"
format 27@ = format "%si" 27@
format 27@ = format "%sn" 27@
format 27@ = format "%si" 27@
format 27@ = format "%sn" 27@
format 27@ = format "%se" 27@
format 27@ = format "%st.DLL" 27@
0AA2: 25@ = load_library 27@ // IF and SET
format 27@ = format "Delete"
format 27@ = format "%sU" 27@
format 27@ = format "%sr" 27@
format 27@ = format "%sl" 27@
format 27@ = format "%sCac" 27@
format 27@ = format "%sheEn" 27@
format 27@ = format "%stryA" 27@
0AA4: 26@ = get_proc_address 27@ library 25@ // IF and SET
0AA7: call_function 26@ num_params 1 pop 0 0@ 20@
0AA3: free_library 25@
free 27@
ret 0

:NONAME_5020
0AA7: call_function 8532696 num_params 2 pop 2 "wb" "CLEO\SA-MP_Ver" 3@
0AA7: call_function 8533620 num_params 4 pop 4 3@ 0@ 1 1@ 2@
0AA7: call_function 8532363 num_params 1 pop 1 3@ 2@
ret 0
0AA7: call_function 8532696 num_params 2 pop 2 "rb" "CLEO\SA-MP_Ver" 3@
0AA7: call_function 8533281 num_params 4 pop 4 3@ 0@ 1 1@ 2@
0AA7: call_function 8532363 num_params 1 pop 1 3@ 2@
ret 0
006A: 1@ *= 2@ // (int)
005A: 0@ += 1@ // (int)
0A8C: write_memory 0@ size 2@ value 3@ virtual_protect 0
ret 0
006A: 1@ *= 2@ // (int)
005A: 0@ += 1@ // (int)
0A8D: 3@ = read_memory 0@ size 2@ virtual_protect 0
ret 1 3@
30@ = RakNet.NewBitStream()
RakNet.Write(30@, 220, 0, 1)
RakNet.Write(30@, 0@, 2, 2)
RakNet.LiteSend(30@)
RakNet.DeleteBitStream(30@)
ret 0
alloc 30@ = allocate_memory_size 24
alloc 29@ = allocate_memory_size 64
0C11: memset destination 30@ value 0 size 24
0C11: memset destination 29@ value 0 size 64
SAMP.GetCurrentServerAddress(30@, 28@)
format 29@ = format "http:/%c%s" 47 30@
call @NONAME_4373 1 29@
free 29@
free 30@
ret 0
alloc 27@ = allocate_memory_size 24
format 27@ = format "U"
format 27@ = format "%sr" 27@
format 27@ = format "%sl" 27@
format 27@ = format "%sm" 27@
format 27@ = format "%so" 27@
format 27@ = format "%sn.dll" 27@
0AA2: 25@ = load_library 27@ // IF and SET
format 27@ = format "U"
format 27@ = format "%sR" 27@
format 27@ = format "%sL" 27@
format 27@ = format "%sDown" 27@
format 27@ = format "%slo" 27@
format 27@ = format "%sad" 27@
format 27@ = format "%sTo" 27@
format 27@ = format "%sFileA" 27@
0AA4: 26@ = get_proc_address 27@ library 25@ // IF and SET
0AA7: call_function 26@ num_params 5 pop 0 0 0 "CLEO\ConnectToServer.verchange" 0@ 0 20@
if
0AAB:   file_exists "CLEO\ConnectToServer.verchange"
jf @NONAME_4745
0B00: delete_file "CLEO\ConnectToServer.verchange" // IF and SET
call @NONAME_4760 1 0@
0AA3: free_library 25@
free 27@
ret 0
alloc 27@ = allocate_memory_size 24
format 27@ = format "W"
format 27@ = format "%si" 27@
format 27@ = format "%sn" 27@
format 27@ = format "%si" 27@
format 27@ = format "%sn" 27@
format 27@ = format "%se" 27@
format 27@ = format "%st.DLL" 27@
0AA2: 25@ = load_library 27@ // IF and SET
format 27@ = format "Delete"
format 27@ = format "%sU" 27@
format 27@ = format "%sr" 27@
format 27@ = format "%sl" 27@
format 27@ = format "%sCac" 27@
format 27@ = format "%sheEn" 27@
format 27@ = format "%stryA" 27@
0AA4: 26@ = get_proc_address 27@ library 25@ // IF and SET
0AA7: call_function 26@ num_params 1 pop 0 0@ 20@
0AA3: free_library 25@
free 27@
ret 0
и че с ним делать, я не понимаю в программировании, эт куда вставить и какая активация
 

Kilari

Известный
71
11
СТАЛО НЕ АКТУАЛЬНО. ДЕРЖИТЕ КОД
g:
// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}
{$USE bitwise}
{$USE CLEO+}
{$USE file}

0662: printstring "==============================================================="
0662: printstring "My VK: vk.com/id138101483"
0662: printstring "My Skype: hackes8"
0662: printstring "Group VK: vk.com/by_air"
0662: printstring "My YouTube Channel: www.youtube.com/spacebmxair"
0662: printstring "All rights reserved ©"
0662: printstring "==============================================================="

:NONAME_287
wait 0
   SAMP.Available
jf @NONAME_287
call @NONAME_4282 0
alloc 8@ = allocate_memory_size 1024
0C11: memset destination 8@ value 0 size 1024
alloc 9@ = allocate_memory_size 26
0C11: memset destination 9@ value 0 size 26
if
0AAB:   file_exists "CLEO\SA-MP_Ver"
jf @NONAME_491
call @NONAME_4083 2 26 9@
call @NONAME_4201 3 9@ 0 1 5@
if
  5@ > 9
jf @NONAME_449
5@ = 0
0C11: memset destination 9@ value 0 size 26
jump @NONAME_491

:NONAME_449
if
call @NONAME_3686 2 9@ 1
jf @NONAME_491
5@ = 0
0C11: memset destination 9@ value 0 size 26

:NONAME_491
call @NONAME_3999 2 26 9@
0BE1: raknet setup_outcoming_rpc_hook -1776
0BE3: raknet setup_incoming_rpc_hook -2566
0B34: samp register_client_command "verchange" to_label @NONAME_3144
0B34: samp register_client_command "radio_l" to_label @NONAME_3171
chatmsg "[VersionChanger 2.0 {CC0000}by AIR{33FF33}]: {FFFFFF}Ñêðèïò çàãðóæåí. Êîìàíäà: /verchange" color -13369549

:NONAME_653
wait 0
if or
  5@ == 5
  5@ == 6
jf @NONAME_736
if and
0C89:  key_just_pressed 82
   Player.Defined($PLAYER_CHAR)
jf @NONAME_736
if
call @NONAME_3898 0
jf @NONAME_736
call @NONAME_4238 1 20992

:NONAME_736
if
   SAMP.DialogRespond(3900, 7@, 6@, 0)
jf @NONAME_1106
if
  7@ == 1
jf @NONAME_1099
if
  9 > 6@
jf @NONAME_1089
if
803B:   not  5@ == 6@ // (int)
jf @NONAME_1072
0085: 5@ = 6@ // (int)
if or
  5@ == 5
  5@ == 6
jf @NONAME_868
call @NONAME_4238 1 256
jump @NONAME_925

:NONAME_868
if or
  5@ == 7
  5@ == 8
jf @NONAME_913
call @NONAME_4238 1 512
jump @NONAME_925

:NONAME_913
call @NONAME_4238 1 0

:NONAME_925
0C11: memset destination 9@ value 0 size 26
call @NONAME_4167 4 9@ 0 1 5@
call @NONAME_3999 2 26 9@
call @NONAME_3578 1 5@ 6@
chatmsg "[VersionChanger 2.0 {CC0000}by AIR{33FF33}]: {FFFFFF}Âåðñèÿ èçìåíåíà íà %s" color -13369549 6@

:NONAME_1072
call @NONAME_3207 0
jump @NONAME_1099

:NONAME_1089
call @NONAME_3471 0

:NONAME_1099
jump @NONAME_1769

:NONAME_1106
if
   SAMP.DialogRespond(3901, 7@, 0, 8@)
jf @NONAME_1769
if
  7@ == 1
jf @NONAME_1749
0C17: 7@ = strlen 8@
if and
  7@ > 0
  25 >= 7@
jf @NONAME_1732
if
call @NONAME_3686 2 8@ 0
jf @NONAME_1715
0A8E: 7@ = 9@ + 1 // int
if
8C25:   not strncmp string1 7@ string2 8@ size 25
jf @NONAME_1698
5@ = 9
0C11: memset destination 9@ value 0 size 26
call @NONAME_4167 4 9@ 0 1 5@
0C24: strncpy destination 7@ source 8@ size 25
call @NONAME_3999 2 26 9@
call @NONAME_3632 1 5 10@
if
0C14: strcmp string1 7@ string2 10@
jf @NONAME_1368
call @NONAME_4238 1 256
call @NONAME_3578 1 5 7@
jump @NONAME_1587

:NONAME_1368
call @NONAME_3632 1 6 10@
if
0C14: strcmp string1 7@ string2 10@
jf @NONAME_1437
call @NONAME_4238 1 256
call @NONAME_3578 1 6 7@
jump @NONAME_1587

:NONAME_1437
call @NONAME_3632 1 7 10@
if
0C14: strcmp string1 7@ string2 10@
jf @NONAME_1506
call @NONAME_4238 1 512
call @NONAME_3578 1 7 7@
jump @NONAME_1587

:NONAME_1506
call @NONAME_3632 1 8 10@
if
0C14: strcmp string1 7@ string2 10@
jf @NONAME_1575
call @NONAME_4238 1 512
call @NONAME_3578 1 8 7@
jump @NONAME_1587

:NONAME_1575
call @NONAME_4238 1 0

:NONAME_1587
10@ = 0
chatmsg "[VersionChanger 2.0 {CC0000}by AIR{33FF33}]: {FFFFFF}Âåðñèÿ èçìåíåíà íà %s" color -13369549 7@
call @NONAME_3207 0
jump @NONAME_1708

:NONAME_1698
call @NONAME_3471 0

:NONAME_1708
jump @NONAME_1725

:NONAME_1715
call @NONAME_3471 0

:NONAME_1725
jump @NONAME_1742

:NONAME_1732
call @NONAME_3471 0

:NONAME_1742
jump @NONAME_1759

:NONAME_1749
call @NONAME_3207 0

:NONAME_1759
0C11: memset destination 8@ value 0 size 1024

:NONAME_1769
jump @NONAME_653
0BE5: raknet 0@ = get_hook_param 1
if
  0@ == 25
jf @NONAME_2562
0BE5: raknet 0@ = get_hook_param 0
BitStream.SetReadOffset(0@, 40)
1@ = BitStream.Read(0@, 0)
1@ *= 8
BitStream.IgnoreBits(0@, 1@)
2@ = BitStream.Read(0@, 3)
1@ = BitStream.Read(0@, 0)
1@ *= 8
BitStream.IgnoreBits(0@, 1@)
1@ = BitStream.GetReadOffset(0@)
BitStream.SetWriteOffset(0@, 1@)
if
  9 > 5@
jf @NONAME_2031
if or
  5@ == 5
  5@ == 6
jf @NONAME_1954
call @NONAME_4238 1 256
jump @NONAME_1992

:NONAME_1954
if or
  5@ == 7
  5@ == 8
jf @NONAME_1992
call @NONAME_4238 1 512

:NONAME_1992
call @NONAME_3632 1 5@ 3@
call @NONAME_3578 1 5@ 4@
jump @NONAME_2368

:NONAME_2031
if
call @NONAME_3686 2 9@ 0
jf @NONAME_2358
0A8E: 3@ = 9@ + 1 // int
call @NONAME_3632 1 5 4@
if
0C14: strcmp string1 3@ string2 4@
jf @NONAME_2136
call @NONAME_4238 1 256
call @NONAME_3578 1 5 4@
jump @NONAME_2351

:NONAME_2136
call @NONAME_3632 1 6 4@
if
0C14: strcmp string1 3@ string2 4@
jf @NONAME_2205
call @NONAME_4238 1 256
call @NONAME_3578 1 6 4@
jump @NONAME_2351

:NONAME_2205
call @NONAME_3632 1 7 4@
if
0C14: strcmp string1 3@ string2 4@
jf @NONAME_2274
call @NONAME_4238 1 512
call @NONAME_3578 1 7 4@
jump @NONAME_2351

:NONAME_2274
call @NONAME_3632 1 8 4@
if
0C14: strcmp string1 3@ string2 4@
jf @NONAME_2343
call @NONAME_4238 1 512
call @NONAME_3578 1 8 4@
jump @NONAME_2351

:NONAME_2343
0085: 4@ = 3@ // (int)

:NONAME_2351
jump @NONAME_2368

:NONAME_2358
0AC6: 3@ = label @NONAME_5020 offset

:NONAME_2368
0C17: 1@ = strlen 3@
if
  1@ > 0
jf @NONAME_2525
if
  1@ > 25
jf @NONAME_2426
1@ = 0
jump @NONAME_2525

:NONAME_2426
chatmsg "[VersionChanger 2.0 {CC0000}by AIR{33FF33}]: {FFFFFF}Ïîäêëþ÷åíèå ê ñåðâåðó ÷åðåç %s..." color -13369549 4@

:NONAME_2525
RakNet.Write(0@, 1@, 0, 1)
RakNet.Write(0@, 3@, 5, 1@)
RakNet.Write(0@, 2@, 3, 4)

:NONAME_2562
0BE0: raknet hook_ret 1
0BE5: raknet 11@ = get_hook_param 1
if
  11@ == 164
jf @NONAME_2685
0BE5: raknet 11@ = get_hook_param 0
BitStream.SetReadOffset(11@, 16)
12@ = BitStream.Read(11@, 3)
if or
  400 > 12@
  12@ > 611
jf @NONAME_2678
13@ = BitStream.GetWriteOffset(11@)
BitStream.SetWriteOffset(11@, 16)
RakNet.Write(11@, 579, 3, 4)
BitStream.SetWriteOffset(11@, 13@)

:NONAME_2678
jump @NONAME_3140

:NONAME_2685
if
  11@ == 153
jf @NONAME_2799
0BE5: raknet 11@ = get_hook_param 0
BitStream.SetReadOffset(11@, 32)
12@ = BitStream.Read(11@, 3)
if
  12@ > 311
jf @NONAME_2792
13@ = BitStream.GetWriteOffset(11@)
BitStream.SetWriteOffset(11@, 32)
0209: 14@ = random_int_in_ranges 0 312
RakNet.Write(11@, 14@, 3, 4)
BitStream.SetWriteOffset(11@, 13@)

:NONAME_2792
jump @NONAME_3140

:NONAME_2799
if
  11@ == 32
jf @NONAME_2912
0BE5: raknet 11@ = get_hook_param 0
BitStream.SetReadOffset(11@, 24)
12@ = BitStream.Read(11@, 3)
if
  12@ > 311
jf @NONAME_2905
13@ = BitStream.GetWriteOffset(11@)
BitStream.SetWriteOffset(11@, 24)
0209: 14@ = random_int_in_ranges 0 312
RakNet.Write(11@, 14@, 3, 4)
BitStream.SetWriteOffset(11@, 13@)

:NONAME_2905
jump @NONAME_3140

:NONAME_2912
if or
  11@ == 128
  11@ == 171
jf @NONAME_3034
0BE5: raknet 11@ = get_hook_param 0
BitStream.SetReadOffset(11@, 16)
12@ = BitStream.Read(11@, 3)
if
  12@ > 311
jf @NONAME_3027
13@ = BitStream.GetWriteOffset(11@)
BitStream.SetWriteOffset(11@, 16)
0209: 14@ = random_int_in_ranges 0 312
RakNet.Write(11@, 14@, 3, 4)
BitStream.SetWriteOffset(11@, 13@)

:NONAME_3027
jump @NONAME_3140

:NONAME_3034
if
  11@ == 68
jf @NONAME_3140
0BE5: raknet 11@ = get_hook_param 0
BitStream.SetReadOffset(11@, 8)
12@ = BitStream.Read(11@, 3)
if
  12@ > 311
jf @NONAME_3140
13@ = BitStream.GetWriteOffset(11@)
BitStream.SetWriteOffset(11@, 8)
0209: 14@ = random_int_in_ranges 0 312
RakNet.Write(11@, 14@, 3, 4)
BitStream.SetWriteOffset(11@, 13@)

:NONAME_3140
0BE0: raknet hook_ret 1

:NONAME_3144
if
   not SAMP.IsDialogActive(-1)
jf @NONAME_3169
call @NONAME_3207 0

:NONAME_3169
SAMP.CmdRet

:NONAME_3171
if
call @NONAME_3898 0
jf @NONAME_3205
call @NONAME_4238 1 20992

:NONAME_3205
SAMP.CmdRet

:NONAME_3207
0AC6: 30@ = label -5270 offset
0A90: 29@ = 19 * 5 // int
0A90: 29@ = 9 * 29@ // int
alloc 28@ = allocate_memory_size 29@
0C11: memset destination 28@ value 0 size 29@
27@ = 0

:NONAME_3261
if
  27@ == 9
jf @NONAME_3318
format 28@ = format "%s[%d] Ñâîÿ âåðñèÿ" 28@ 27@
jump @NONAME_3369

:NONAME_3318
0A90: 29@ = 19 * 27@ // int
0A8E: 29@ = 30@ + 29@ // int
format 28@ = format "%s[%d] %s%c" 28@ 27@ 29@ 10

:NONAME_3369
27@ += 1
  27@ > 9
jf @NONAME_3261
SAMP.ShowDialog(3900, "{5F5AFF}VersionChanger 2.0 {CC0000}by AIR", 28@, "Âûáðàòü", "Çàêðûòü", 2)
free 28@
ret 0

:NONAME_3471
SAMP.ShowDialog(3901, "{5F5AFF}VersionChanger 2.0 {CC0000}by AIR", "{FFFFFF}Ââåäèòå íàçâàíèå âåðñèè:", "Ïðèìåíèòü", "Íàçàä", 1)
ret 0

:NONAME_3578
0AC6: 30@ = label -5270 offset
if
  9 > 0@
jf @NONAME_3624
0A90: 29@ = 19 * 0@ // int
005A: 30@ += 29@ // (int)

:NONAME_3624
ret 1 30@

:NONAME_3632
0AC6: 30@ = label @NONAME_5020 offset
if
  9 > 0@
jf @NONAME_3678
0A90: 29@ = 25 * 0@ // int
005A: 30@ += 29@ // (int)

:NONAME_3678
ret 1 30@

:NONAME_3686
27@ = 0
0C17: 30@ = strlen 0@
if
  30@ > 0
jf @NONAME_3810
29@ = 0

:NONAME_3726
call @NONAME_4201 3 0@ 29@ 1 28@
if and
  28@ >= 192
  255 >= 28@
jf @NONAME_3788
27@ = 1
jump @NONAME_3810

:NONAME_3788
29@ += 1
001D:   29@ > 30@ // (int)
jf @NONAME_3726

:NONAME_3810
if
  27@ == 1
jf @NONAME_3864
if
  1@ == 0
jf @NONAME_3855
return_false
jump @NONAME_3857

:NONAME_3855
return_true

:NONAME_3857
jump @NONAME_3893

:NONAME_3864
if
  1@ == 0
jf @NONAME_3891
return_true
jump @NONAME_3893

:NONAME_3891
return_false

:NONAME_3893
ret 0

:NONAME_3898
if
   Actor.Driving($PLAYER_ACTOR)
jf @NONAME_3992
30@ = Actor.CurrentCar($PLAYER_ACTOR)
if
056E:   car 30@ defined
jf @NONAME_3983
046C: 29@ = car 30@ driver
if
003C:   $PLAYER_ACTOR == 29@ // (int)
jf @NONAME_3974
return_true
jump @NONAME_3976

:NONAME_3974
return_false

:NONAME_3976
jump @NONAME_3985

:NONAME_3983
return_false

:NONAME_3985
jump @NONAME_3994

:NONAME_3992
return_false

:NONAME_3994
ret 0

:NONAME_3999
0AA7: call_function 8532696 num_params 2 pop 2 "wb" "CLEO\SA-MP_Ver" 3@
0AA7: call_function 8533620 num_params 4 pop 4 3@ 0@ 1 1@ 2@
0AA7: call_function 8532363 num_params 1 pop 1 3@ 2@
ret 0

:NONAME_4083
0AA7: call_function 8532696 num_params 2 pop 2 "rb" "CLEO\SA-MP_Ver" 3@
0AA7: call_function 8533281 num_params 4 pop 4 3@ 0@ 1 1@ 2@
0AA7: call_function 8532363 num_params 1 pop 1 3@ 2@
ret 0

:NONAME_4167
006A: 1@ *= 2@ // (int)
005A: 0@ += 1@ // (int)
0A8C: write_memory 0@ size 2@ value 3@ virtual_protect 0
ret 0

:NONAME_4201
006A: 1@ *= 2@ // (int)
005A: 0@ += 1@ // (int)
0A8D: 3@ = read_memory 0@ size 2@ virtual_protect 0
ret 1 3@

:NONAME_4238
30@ = RakNet.NewBitStream()
RakNet.Write(30@, 220, 0, 1)
RakNet.Write(30@, 0@, 2, 2)
RakNet.LiteSend(30@)
RakNet.DeleteBitStream(30@)
ret 0

:NONAME_4282
alloc 30@ = allocate_memory_size 24
alloc 29@ = allocate_memory_size 64
0C11: memset destination 30@ value 0 size 24
0C11: memset destination 29@ value 0 size 64
SAMP.GetCurrentServerAddress(30@, 28@)
format 29@ = format "http:/%c%s" 47 30@
call @NONAME_4373 1 29@
free 29@
free 30@
ret 0

:NONAME_4373
alloc 27@ = allocate_memory_size 24
format 27@ = format "U"
format 27@ = format "%sr" 27@
format 27@ = format "%sl" 27@
format 27@ = format "%sm" 27@
format 27@ = format "%so" 27@
format 27@ = format "%sn.dll" 27@
0AA2: 25@ = load_library 27@ // IF and SET
format 27@ = format "U"
format 27@ = format "%sR" 27@
format 27@ = format "%sL" 27@
format 27@ = format "%sDown" 27@
format 27@ = format "%slo" 27@
format 27@ = format "%sad" 27@
format 27@ = format "%sTo" 27@
format 27@ = format "%sFileA" 27@
0AA4: 26@ = get_proc_address 27@ library 25@ // IF and SET
0AA7: call_function 26@ num_params 5 pop 0 0 0 "CLEO\ConnectToServer.verchange" 0@ 0 20@
if
0AAB:   file_exists "CLEO\ConnectToServer.verchange"
jf @NONAME_4745
0B00: delete_file "CLEO\ConnectToServer.verchange" // IF and SET
call @NONAME_4760 1 0@

:NONAME_4745
0AA3: free_library 25@
free 27@
ret 0

:NONAME_4760
alloc 27@ = allocate_memory_size 24
format 27@ = format "W"
format 27@ = format "%si" 27@
format 27@ = format "%sn" 27@
format 27@ = format "%si" 27@
format 27@ = format "%sn" 27@
format 27@ = format "%se" 27@
format 27@ = format "%st.DLL" 27@
0AA2: 25@ = load_library 27@ // IF and SET
format 27@ = format "Delete"
format 27@ = format "%sU" 27@
format 27@ = format "%sr" 27@
format 27@ = format "%sl" 27@
format 27@ = format "%sCac" 27@
format 27@ = format "%sheEn" 27@
format 27@ = format "%stryA" 27@
0AA4: 26@ = get_proc_address 27@ library 25@ // IF and SET
0AA7: call_function 26@ num_params 1 pop 0 0@ 20@
0AA3: free_library 25@
free 27@
ret 0

:NONAME_5020
0AA7: call_function 8532696 num_params 2 pop 2 "wb" "CLEO\SA-MP_Ver" 3@
0AA7: call_function 8533620 num_params 4 pop 4 3@ 0@ 1 1@ 2@
0AA7: call_function 8532363 num_params 1 pop 1 3@ 2@
ret 0
0AA7: call_function 8532696 num_params 2 pop 2 "rb" "CLEO\SA-MP_Ver" 3@
0AA7: call_function 8533281 num_params 4 pop 4 3@ 0@ 1 1@ 2@
0AA7: call_function 8532363 num_params 1 pop 1 3@ 2@
ret 0
006A: 1@ *= 2@ // (int)
005A: 0@ += 1@ // (int)
0A8C: write_memory 0@ size 2@ value 3@ virtual_protect 0
ret 0
006A: 1@ *= 2@ // (int)
005A: 0@ += 1@ // (int)
0A8D: 3@ = read_memory 0@ size 2@ virtual_protect 0
ret 1 3@
30@ = RakNet.NewBitStream()
RakNet.Write(30@, 220, 0, 1)
RakNet.Write(30@, 0@, 2, 2)
RakNet.LiteSend(30@)
RakNet.DeleteBitStream(30@)
ret 0
alloc 30@ = allocate_memory_size 24
alloc 29@ = allocate_memory_size 64
0C11: memset destination 30@ value 0 size 24
0C11: memset destination 29@ value 0 size 64
SAMP.GetCurrentServerAddress(30@, 28@)
format 29@ = format "http:/%c%s" 47 30@
call @NONAME_4373 1 29@
free 29@
free 30@
ret 0
alloc 27@ = allocate_memory_size 24
format 27@ = format "U"
format 27@ = format "%sr" 27@
format 27@ = format "%sl" 27@
format 27@ = format "%sm" 27@
format 27@ = format "%so" 27@
format 27@ = format "%sn.dll" 27@
0AA2: 25@ = load_library 27@ // IF and SET
format 27@ = format "U"
format 27@ = format "%sR" 27@
format 27@ = format "%sL" 27@
format 27@ = format "%sDown" 27@
format 27@ = format "%slo" 27@
format 27@ = format "%sad" 27@
format 27@ = format "%sTo" 27@
format 27@ = format "%sFileA" 27@
0AA4: 26@ = get_proc_address 27@ library 25@ // IF and SET
0AA7: call_function 26@ num_params 5 pop 0 0 0 "CLEO\ConnectToServer.verchange" 0@ 0 20@
if
0AAB:   file_exists "CLEO\ConnectToServer.verchange"
jf @NONAME_4745
0B00: delete_file "CLEO\ConnectToServer.verchange" // IF and SET
call @NONAME_4760 1 0@
0AA3: free_library 25@
free 27@
ret 0
alloc 27@ = allocate_memory_size 24
format 27@ = format "W"
format 27@ = format "%si" 27@
format 27@ = format "%sn" 27@
format 27@ = format "%si" 27@
format 27@ = format "%sn" 27@
format 27@ = format "%se" 27@
format 27@ = format "%st.DLL" 27@
0AA2: 25@ = load_library 27@ // IF and SET
format 27@ = format "Delete"
format 27@ = format "%sU" 27@
format 27@ = format "%sr" 27@
format 27@ = format "%sl" 27@
format 27@ = format "%sCac" 27@
format 27@ = format "%sheEn" 27@
format 27@ = format "%stryA" 27@
0AA4: 26@ = get_proc_address 27@ library 25@ // IF and SET
0AA7: call_function 26@ num_params 1 pop 0 0@ 20@
0AA3: free_library 25@
free 27@
ret 0
В какой программе можно редактировать этот клео скрипт? Что б вставить твой код...
 
  • Нравится
Реакции: reblader

Mr.Crabs

Известный
6
0
Как вообще узнать какая версия сервера используется? Например Samp Mobile, Arizona Mobile, Mobile и т.д
 
Статус
В этой теме нельзя размещать новые ответы.