Другое Help with script

WtfDude

WtfDude

Участник
Автор темы
39
2
Hi then i go to server and write /aimas or /aimcf does not show anything but the script loads.
CLEO: 
// 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
thread 'AIMAS'
:Label000015
wait 0
   SAMP.Available
jf @Label000015
0B34: samp register_client_command "aimas" to_label @Label000BE9
0B34: samp register_client_command "aimcf" to_label @Label0014B6
0B34: samp register_client_command "gs" to_label @Label000FE7
0B34: samp register_client_command "tb" to_label @Label00105C
0B34: samp register_client_command "imm" to_label @Label0010D0
0B34: samp register_client_command "cn" to_label @Label001142
0B34: samp register_client_command "soff" to_label @Label0011B7
0B34: samp register_client_command "sinfo" to_label @Label00120A
18@ = 0
31@ = 0
20@ = -1
21@ = -1
22@ = -1
23@ = -1
24@ = 3
chatmsg "Aim'as V3 BY = {55FF7F}Airidas_Krc{FF0000} | Daugiau informacijos:{55FF7F} /sinfo" 268369920
if
0AA2: 28@ = load_library "kernel32.dll" // IF and SET
jf @Label000199
if
0AA4: 29@ = get_proc_address "GetVolumeInformationA" library 28@ // IF and SET
jf @Label000199
0AC7: 30@ = var 30@ offset
0AA5: call 29@ num_params 8 pop 0 0 0 0 0 30@ 0 0 0
if
  30@ == 580444520
jf @Label000199
31@ = 1

:Label000199
Dialog.Create(25@, "{FFFFFF}AimBot V3")
Dialog.SetRECT(25@, 925, 346, 370, 230)
Dialog.AddCheckBox(25@, 1, "{14B4B6}Galva", 10, 10, 200, 20)
Dialog.AddCheckBox(25@, 2, "{14B4B6}Lupos", 210, 10, 200, 20)
Dialog.AddCheckBox(25@, 3, "{14B4B6}Kaklas", 10, 30, 200, 20)
Dialog.AddCheckBox(25@, 4, "{14B4B6}Krutine", 210, 30, 200, 20)
Dialog.AddCheckBox(25@, 5, "{14B4B6}Kairys petys", 10, 50, 200, 20)
Dialog.AddCheckBox(25@, 6, "{14B4B6}Desinys petys", 210, 50, 200, 20)
Dialog.AddCheckBox(25@, 7, "{14B4B6}Centras", 10, 70, 200, 20)
Dialog.AddCheckBox(25@, 8, "{14B4B6}Pilvas", 210, 70, 200, 20)
Dialog.AddCheckBox(25@, 9, "{14B4B6}Kairys kelienis", 10, 90, 200, 20)
Dialog.AddCheckBox(25@, 10, "{14B4B6}Desinys kelienis", 210, 90, 200, 20)
Dialog.AddStatic(25@, 11, "{FF00F3}___________________________", 10, 105, 200, 20)
Dialog.AddStatic(25@, 12, "{FF00F3}___________________", 210, 105, 200, 20)
Dialog.AddCheckBox(25@, 13, "{14B4B6}Targ.Nusitaikius", 110, 135, 200, 20)
Dialog.AddButton(25@, 14, "{FFFFFF}Gerai", 144, 165, 70, 35)
Dialog.SetBackgroundColor(25@, -268435456)
Dialog.SetVisible(25@, 0)

:Label0003F5
wait 0
0AA3: free_library 28@
0A9F: $4 = current_thread_pointer
$4 += 16
0A8D: $4 = read_memory $4 size 4 virtual_protect 0
$4 -= -4056
if
  31@ == 1
jf @Label000BE2
if
   Dialog.IsVisible(25@)
jf @Label000A7A
SAMP.ToggleCursor(1)
if and
   Dialog.IsVisible(25@)
   SAMP.IsCursorActive
   not Dialog.IsMinimized(25@)
key_down 2
jf @Label00047A
0B5E: get_cursor_pos $5 $6
Dialog.SetRECT(25@, $5, $6, 370, 230)

:Label00047A
if
   Dialog.PopEvent(25@, 1025, 26@)
jf @Label000A7A
if
  26@ == 1
jf @Label000512
if
   Dialog.CheckBoxIsChecked(25@, 26@)
jf @Label0004E5
24@ = 6
print "~W~PASIRINKTA - ~G~GALVA~W~" 2000
goto @Label000512

:Label0004E5
24@ = -1
print "~W~PASIRINKIMAS ~R~ATSAUKTAS~W~" 1000

:Label000512
if
  26@ == 2
jf @Label000594
if
   Dialog.CheckBoxIsChecked(25@, 26@)
jf @Label000567
24@ = 8
print "~W~PASIRINKTA - ~G~LUPOS~W~" 2000
goto @Label000594

:Label000567
24@ = -1
print "~W~PASIRINKIMAS ~R~ATSAUKTAS~W~" 1000

:Label000594
if
  26@ == 3
jf @Label000617
if
   Dialog.CheckBoxIsChecked(25@, 26@)
jf @Label0005EA
24@ = 4
print "~W~PASIRINKTA - ~G~KAKLAS~W~" 2000
goto @Label000617

:Label0005EA
24@ = -1
print "~W~PASIRINKIMAS ~R~ATSAUKTAS~W~" 1000

:Label000617
if
  26@ == 4
jf @Label00069B
if
   Dialog.CheckBoxIsChecked(25@, 26@)
jf @Label00066E
24@ = 21
print "~W~PASIRINKTA - ~G~KRUTINE~W~" 2000
goto @Label00069B

:Label00066E
24@ = -1
print "~W~PASIRINKIMAS ~R~ATSAUKTAS~W~" 1000

:Label00069B
if
  26@ == 5
jf @Label000724
if
   Dialog.CheckBoxIsChecked(25@, 26@)
jf @Label0006F7
24@ = 22
print "~W~PASIRINKTA - ~G~KAIRYS PETYS~W~" 2000
goto @Label000724

:Label0006F7
24@ = -1
print "~W~PASIRINKIMAS ~R~ATSAUKTAS~W~" 1000

:Label000724
if
  26@ == 6
jf @Label0007AE
if
   Dialog.CheckBoxIsChecked(25@, 26@)
jf @Label000781
24@ = 32
print "~W~PASIRINKTA - ~G~DESINYS PETYS~W~" 2000
goto @Label0007AE

:Label000781
24@ = -1
print "~W~PASIRINKIMAS ~R~ATSAUKTAS~W~" 1000

:Label0007AE
if
  26@ == 7
jf @Label000832
if
   Dialog.CheckBoxIsChecked(25@, 26@)
jf @Label000805
24@ = 3
print "~W~PASIRINKTA - ~G~CENTRAS~W~" 2000
goto @Label000832

:Label000805
24@ = -1
print "~W~PASIRINKIMAS ~R~ATSAUKTAS~W~" 1000

:Label000832
if
  26@ == 8
jf @Label0008B5
if
   Dialog.CheckBoxIsChecked(25@, 26@)
jf @Label000888
24@ = 2
print "~W~PASIRINKTA - ~G~PILVAS~W~" 2000
goto @Label0008B5

:Label000888
24@ = -1
print "~W~PASIRINKIMAS ~R~ATSAUKTAS~W~" 1000

:Label0008B5
if
  26@ == 9
jf @Label000941
if
   Dialog.CheckBoxIsChecked(25@, 26@)
jf @Label000914
24@ = 52
print "~W~PASIRINKTA - ~G~KAIRYS KELIENIS~W~" 2000
goto @Label000941

:Label000914
24@ = -1
print "~W~PASIRINKIMAS ~R~ATSAUKTAS~W~" 1000

:Label000941
if
  26@ == 10
jf @Label0009CE
if
   Dialog.CheckBoxIsChecked(25@, 26@)
jf @Label0009A1
24@ = 42
print "~W~PASIRINKTA - ~G~DESINYS KELIENIS~W~" 2000
goto @Label0009CE

:Label0009A1
24@ = -1
print "~W~PASIRINKIMAS ~R~ATSAUKTAS~W~" 1000

:Label0009CE
if
  26@ == 13
jf @Label000A5D
if
   Dialog.CheckBoxIsChecked(25@, 26@)
jf @Label000A27
$7 = 1
print "~W~TARGINTI - ~G~NUSITAIKIUS~W~" 2000
goto @Label000A5D

:Label000A27
$7 = 0
27@ = -1
print "~W~TARGINTI - ~R~NENUSITAIKIUS~W~" 1000

:Label000A5D
if
  26@ == 14
jf @Label000A7A
Dialog.SetVisible(25@, 0)
SAMP.ToggleCursor(0)

:Label000A7A
if
  $7 == 1
jf @Label000A9A
27@ = 2
27@ = 20

:Label000A9A
if
  18@ == 1
jf @Label000BE2
if and
0AD2: 0@ = player $PLAYER_CHAR targeted_actor //IF and SET
key_down 1
jf @Label000B3C
if and
056D:   actor 0@ defined
   not Actor.Dead(0@)
02CB:   actor 0@ bounding_sphere_visible
jf @Label000B3C
0665: get_actor 0@ model_to 19@
if and
803B:   not  19@ == 20@ // (int)
803B:   not  19@ == 21@ // (int)
803B:   not  19@ == 22@ // (int)
803B:   not  19@ == 23@ // (int)
jf @Label000B3C
call @Label000C85 2 0@ 24@ 1@ 2@ 3@
call @Label000D8F 3 1@ 2@ 3@

:Label000B3C
if and
  $7 == 1
0AD2: 0@ = player $PLAYER_CHAR targeted_actor //IF and SET
jf @Label000BE2
if or
key_down 2
key_down 20
jf @Label000BE2
if and
056D:   actor 0@ defined
   not Actor.Dead(0@)
02CB:   actor 0@ bounding_sphere_visible
jf @Label000BE2
0665: get_actor 0@ model_to 19@
if and
803B:   not  19@ == 20@ // (int)
803B:   not  19@ == 21@ // (int)
803B:   not  19@ == 22@ // (int)
803B:   not  19@ == 23@ // (int)
jf @Label000BE2
call @Label000C85 2 0@ 24@ 1@ 2@ 3@
call @Label000D8F 3 1@ 2@ 3@

:Label000BE2
goto @Label0003F5

:Label000BE9
if
  31@ == 1
jf @Label000C83
0B12: 18@ = 18@ XOR 1
if
  18@ == 1
jf @Label000C50
print "~W~AIM BY KRC: ~G~ON~W~" 1000
018C: play_sound 1083 at 0.0 0 0.0
goto @Label000C83

:Label000C50
print "~W~AIM BY KRC: ~R~OFF~W~" 1000
018C: play_sound 1058 at 0.0 0 0.0

:Label000C83
SAMP.CmdRet

:Label000C85
0085: 10@ = 0@ // (int)
0085: 15@ = 1@ // (int)
1@ = 0.0
2@ = 0
3@ = 0.0
0A96: 0@ = actor 10@ struct
0AC7: 4@ = var 1@ offset
0AA6: call_method 6160832 struct 0@ num_params 3 pop 0 1 15@ 4@
ret 3 1@ 2@ 3@
0AC7: 14@ = var 0@ offset
0AC7: 15@ = var 3@ offset
0AC7: 16@ = var 6@ offset
0AC7: 17@ = var 9@ offset
0AA5: call 7392816 num_params 6 pop 6 0 0 17@ 16@ 15@ 14@
12@ = 640.0
13@ = 448.0
0A8D: 14@ = read_memory 12677188 size 4 virtual_protect 0
0A8D: 15@ = read_memory 12677192 size 4 virtual_protect 0
0093: 14@ = integer 14@ to_float
0093: 15@ = integer 15@ to_float
0073: 12@ /= 14@ // (float)
0073: 13@ /= 15@ // (float)
006B: 3@ *= 12@ // (float)
006B: 4@ *= 13@ // (float)
ret 2 3@ 4@

:Label000D8F
068D: get_camera_position_to 3@ 4@ 5@
0509: 11@ = distance_between_XY 0@ 1@ and_XY 3@ 4@
0063: 3@ -= 0@ // (float)
0063: 4@ -= 1@ // (float)
0063: 5@ -= 2@ // (float)
0A8D: 6@ = read_memory 11989416 size 2 virtual_protect 0
if or
  6@ == 53
  6@ == 55
jf @Label000F31
0A8D: 7@ = read_memory 9261112 size 4 virtual_protect 0
6@ = 0.5
006B: 7@ *= 6@ // (float)
02F6: 6@ = sine 7@ // (float)
02F7: 8@ = cosine 7@ // (float)
0073: 6@ /= 8@ // (float)
0A8D: 9@ = read_memory 11987984 size 4 virtual_protect 0
8@ = 0.5
0063: 8@ -= 9@ // (float)
8@ += 0.5
0063: 8@ -= 9@ // (float)
0A8D: 9@ = read_memory 12840868 size 4 virtual_protect 0
7@ = 1.0
0073: 7@ /= 9@ // (float)
006B: 8@ *= 7@ // (float)
006B: 8@ *= 6@ // (float)
0AA5: call 4327360 num_params 2 pop 2 8@ 1.0
0AA7: call_function $4 num_params 0 pop 0 8@
7@ = 3.141593
0063: 7@ -= 8@ // (float)
0A8D: 10@ = read_memory 11987988 size 4 virtual_protect 0
0087: 9@ = 10@ // (float)
8@ = 0.5
0063: 9@ -= 8@ // (float)
005B: 9@ += 10@ // (float)
0063: 9@ -= 8@ // (float)
006B: 9@ *= 6@ // (float)
0AA5: call 4327360 num_params 2 pop 2 9@ 1.0
0AA7: call_function $4 num_params 0 pop 0 9@
8@ = 3.141593
0063: 8@ -= 9@ // (float)
goto @Label000F4D

:Label000F31
7@ = 3.141593
7@ /= 2.0
0087: 8@ = 7@ // (float)

:Label000F4D
0AA5: call 4327360 num_params 2 pop 2 5@ 11@
0AA7: call_function $4 num_params 0 pop 0 9@
3@ *= -1.0
0AA5: call 4327360 num_params 2 pop 2 3@ 4@
0AA7: call_function $4 num_params 0 pop 0 10@
11@ = 3.141593
11@ /= 2.0
0063: 10@ -= 11@ // (float)
0063: 9@ -= 7@ // (float)
0063: 10@ -= 8@ // (float)
10@ *= -1.0
0A25: set_camera_on_players_X_angle 9@ Z_angle 10@
ret 0

// no clue what this is
:Label000FD8
hex
83 EC 04 D9 5C 24 00 8B 44 24 00 83 C4 04 C3 D6
end

:Label000FE7
if
  31@ == 1
jf @Label00105A
20@ = 65
21@ = 105
22@ = 106
23@ = 107
chatmsg "{00FF00},,Grove Street''{55557F} skinai {55FF7F}ignoruojami" 251723520

:Label00105A
SAMP.CmdRet

:Label00105C
if
  31@ == 1
jf @Label0010CE
20@ = 102
21@ = 103
22@ = 104
23@ = 195
chatmsg "{7C00BA},,The Ballas''{55557F} skinai {55FF7F}ignoruojami" 259784890

:Label0010CE
SAMP.CmdRet

:Label0010D0
if
  31@ == 1
jf @Label001140
20@ = 169
21@ = 124
22@ = 125
23@ = 126
chatmsg "{0044CE},,Immortal''{55557F} skinai {55FF7F}ignoruojami" 251675854

:Label001140
SAMP.CmdRet

:Label001142
if
  31@ == 1
jf @Label0011B5
20@ = 120
21@ = 118
22@ = 117
23@ = 263
chatmsg "{E4E400},,Cosa Nostra''{55557F} skinai {55FF7F}ignoruojami" 266658816

:Label0011B5
SAMP.CmdRet

:Label0011B7
if
  31@ == 1
jf @Label001208
20@ = -1
21@ = -1
22@ = -1
23@ = -1
chatmsg "Visi ignoravimai išjungti" 268369920

:Label001208
SAMP.CmdRet

:Label00120A
if
  31@ == 1
jf @Label0014B4
chatmsg "_____________________________________________________" 268435200
chatmsg "Aimas V3 BY = {55FF7F}Airidas_Krc" 268435200
chatmsg "Norint ignoruoti {00FF00},,Grove Street''{55557F} skinus, rašyk: {55FF7F}/gs" 257250687
chatmsg "Norint ignoruoti {7C00BA},,The Ballas''{55557F} skinus, rašyk: {55FF7F}/tb" 257250687
chatmsg "Norint ignoruoti {0044CE},,Immortal''{55557F} skinus, rašyk: {55FF7F}/imm" 257250687
chatmsg "Norint ignoruoti {E4E400},,Cosa Nostra''{55557F} skinus, rašyk: {55FF7F}/cn" 257250687
chatmsg "Išjungti ignoravimus: {55FF7F}/soff" 268369920
chatmsg "DĖMĖSIO! Galima ignoruoti tik vieną pasirinkta grupę." 268369920
chatmsg " - /aimas /on/off | /aimcf - nustatymai" 268435200
chatmsg "_____________________________________________________" 268435200

:Label0014B4
SAMP.CmdRet

:Label0014B6
if
  31@ == 1
jf @Label0014D3
Dialog.SetVisible(25@, 1)
SAMP.ToggleCursor(1)

:Label0014D3
SAMP.CmdRet
 
Войдите или зарегистрируйтесь для ответа.

Похожие темы

  1. BASS_DEVSOFTWARE
    TemptationOFF | Прочь искушение самоудовлетворения
      • Нравится
    Ответы
    30
    Просмотры
    8K
    Юмор/Креатив
    NHacker1271
    NHacker1271
  2. sosnov
    Lua Mini Help Menu | Маленькое дополнение ко всем вашим читам
      • Эм
      • Bug
      • Нравится
    Ответы
    9
    Просмотры
    3K
    Читы
    sosnov
    sosnov
  3. Fitalov
    • Решено
    Help monetloader moonmonet
      • Ха-ха
    Ответы
    8
    Просмотры
    683
    Помощь
    Lolostrek
    Lolostrek
  4. smoooth
    Lua [Evolve-RP]Вспомогательный lua-скрипт для Instructors
      • Нравится
    Ответы
    13
    Просмотры
    4K
    Биндеры
    Chromikc
    Chromikc
  5. H
    • Вопрос
    Help Me Please onSendPacket
      • Bug
      • Ха-ха
      • Нравится
    Ответы
    0
    Просмотры
    473
    Вопросы
    Hossi_Bad
    H
Сверху Снизу