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

ShadowBroker · 26 Мар 2018

Регулярки в sscanf работают?

Qsany · 26 Мар 2018

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

:Noname_2
wait 400
   SAMP.Available
jf @Noname_2
0661: NOP "ANTI AFK ON DIALOGS"
0661: NOP "by MogAika"
0661: NOP "BlastHack.net"
0661: NOP "Version 2.0"
Dialog.Create(0@, "AFK Master by MogAika")
Dialog.SetRECT(0@, 0, 0, 360, 152)
call @Noname_911 1 0@
Dialog.AddCheckBox(0@, 1, "Ðàáîòà ñêðèïòîâ â îêîííîì ðåæèìå", 8, 8, 356, 24)
Dialog.AddCheckBox(0@, 2, "Ðàáîòà ñêðèïòîâ â ñâåðíóòîì ðåæèìå", 8, 32, 356, 24)
Dialog.AddCheckBox(0@, 3, "Çàöèêëèòü ïîêàç ìûøè", 8, 56, 316, 24)
Dialog.AddCheckBox(0@, 4, "Îòêëþ÷èòü öåíòðèðîâàíèå ìûøè", 8, 80, 316, 24)
Dialog.AddButton(0@, 255, "Çàêðûòü îêíî", 8, 104, 316, 24)
Dialog.SetControlVisible(0@, 2, 0)
Dialog.SetCheckBoxChecked(0@, 4, 1)
Dialog.SetVisible(0@, 0)
0ADC:   test_cheat "zz" to_label @Noname_898
0C11: memset destination 7623723 value 144 size 8
20@ = 0

:Noname_415
wait 0
call @Noname_911 1 0@
if
  20@ == 1
jf @Noname_454
SAMP.SetCursorMode(2)

:Noname_454
   Dialog.PopEvent(0@, 1@, 2@)
jf @Noname_889
wait 0
if
  2@ == 1
jf @Noname_641
if
   Dialog.CheckBoxIsChecked(0@, 1)
jf @Noname_584
Dialog.SetControlVisible(0@, 2, 1)
0A8C: write_memory 7634870 size 1 value 1 virtual_protect 1
0A8C: write_memory 7635034 size 1 value 1 virtual_protect 1
if
   Dialog.CheckBoxIsChecked(0@, 2)
jf @Noname_577
0C11: memset destination 5499528 value 144 size 6

:Noname_577
goto @Noname_641

:Noname_584
Dialog.SetControlVisible(0@, 2, 0)
0A8C: write_memory 7634870 size 1 value 0 virtual_protect 1
0A8C: write_memory 7635034 size 1 value 0 virtual_protect 1
0AC6: 3@ = label @Noname_1006 offset
0C10: memcpy destination 5499528 source 3@ size 6

:Noname_641
if
  2@ == 2
jf @Noname_718
if
   Dialog.CheckBoxIsChecked(0@, 2)
jf @Noname_696
0C11: memset destination 5499528 value 144 size 6
goto @Noname_718

:Noname_696
0AC6: 3@ = label @Noname_1006 offset
0C10: memcpy destination 5499528 source 3@ size 6

:Noname_718
if
  2@ == 3
jf @Noname_775
if
   Dialog.CheckBoxIsChecked(0@, 3)
jf @Noname_768
20@ = 1
goto @Noname_775

:Noname_768
20@ = 0

:Noname_775
if
  2@ == 4
jf @Noname_852
if
   Dialog.CheckBoxIsChecked(0@, 4)
jf @Noname_830
0C11: memset destination 7623723 value 144 size 8
goto @Noname_852

:Noname_830
0AC6: 3@ = label @Noname_1012 offset
0C10: memcpy destination 7623723 source 3@ size 8

:Noname_852
if
  2@ == 255
jf @Noname_882
Dialog.SetVisible(0@, 0)
SAMP.ToggleCursor(0)

:Noname_882
goto @Noname_454

:Noname_889
goto @Noname_415
0A93: end_custom_thread

:Noname_898                                      
Dialog.SetVisible(0@, 1)
SAMP.ToggleCursor(1)
SAMP.CmdRet

:Noname_911
Dialog.GetRECT(0@, 1@, 2@, 3@, 4@)
SAMP.GetScreenResolution(5@, 6@)
0062: 5@ -= 3@ // (int)
5@ /= 2
0062: 6@ -= 4@ // (int)
Dialog.SetRECT(0@, 5@, 6@, 3@, 4@)
ret 0
0@ += 338
0A8C: write_memory 0@ size 1 value 1@ virtual_protect 1
ret 0

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

D3.Pheonix · 26 Мар 2018

Kristyan написал(а):

Crash...

CLEO:

:cmd
alloc 3@ 50
samp.IsCommandTyped(2@)
0AD4: 0@ = scan_string 2@ format "%d %s" 5@ 3@
if    
  0C14: strcmp string1 3@ string2 "Infernus"
then
chatmsg "ID: %d" -1 5@
chatmsg "Car: %s " -1 3@
free 3@
end
SAMP.CmdRet()

Короче делай то что дарк написал

hnnssy · 27 Мар 2018

Qsany написал(а):
CLEO:

0ADC: test_cheat "zz" to_label @Noname_898

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

какую школу клео-программистов заканчивал?

D3.Pheonix · 27 Мар 2018

Allex994 написал(а):
Hello i have problem!
I use this code to search the string "Enter the number %d and earn 5000$"
Example: "Enter the number 22 and earn 5000$" - /answer 22
Why the string "Enter the number 22 and earn 5000$ - /answer 22" it was not found,as if he did not show up ?
This text is sent by the server in blue!!
ChatLog: [23:02:01] Enter the number 22 and earn 5000$

CLEO:

:SampChat IF 0AA2: 1@ = "samp.dll" THEN 1@ += 0x21A0E4 0A8D: 1@ readMem 1@ sz 4 vp 0 1@ += 0x132 0@ *= 0xFC 005A: 1@ += 0@ 1@ += 0x20 0AA3: 1@ END 0AB2: ret 1 1@ :AutoSyS wait 0 0AC8: 15@ = allocate_memory_size 145 0AB1: call @SampChat 1 id 99 to 15@ if 0AD4: 30@ = scan_string 15@ format "Enter the number %d and earn 5000$" 8@ then wait 0 0AF9: samp say_msg "/answer %d" 8@ end else_jump @AutoSyS 0AC9: free_allocated_memory 15@ jump @AutoCMDSyS_1

CLEO:

{$CLEO}
0000:

repeat
wait 0
until samp.Available()

while true
wait 0
alloc 15@ 145
call @SampChat 1 id 99 to 15@
    if
    0AD4: 30@ = scan_string 15@ format "Enter the number %d and earn 5000$" 8@
    then
    say "/answer %d" 8@
    chatmsg " " -1 // empty 0AF8 string to prevent multiple triggering
    end
free 15@
end

:SampChat
IF 0AA2: 1@ = "samp.dll"
THEN
    1@ += 0x21A0E4
    0A8D: 1@ readMem 1@ sz 4 vp 0
    1@ += 0x132
    0@ *= 0xFC
    005A: 1@ += 0@
    1@ += 0x20
    0AA3: 1@
END
0AB2: ret 1 1@

Qsany · 27 Мар 2018

hnnssy написал(а):
какую школу клео-программистов заканчивал?

"клео кодер за 10 минут"

Forse1 · 27 Мар 2018

Помогите плес,пытаюсь исправить ошибку в других Клео через Санни билдер ,отрелачит другое клео,а после выдаёт ошибку типо неверный опкод или же неверное количество условий,можно это как-то поыиксить?

grandpafromghetto · 27 Мар 2018

Forse1 написал(а):
Помогите плес,пытаюсь исправить ошибку в других Клео через Санни билдер ,отрелачит другое клео,а после выдаёт ошибку типо неверный опкод или же неверное количество условий,можно это как-то поыиксить?

код кинь

Forse1 · 28 Мар 2018

old_ghetto_ написал(а):
код кинь

Да допустим тот же аир брейк,при кемпелировании вылазил ошибка неизвестная команда,не верный опкод,неверное количсьво,то почти со всеми клео

DarkL1ght · 28 Мар 2018

Forse1 написал(а):
Да допустим тот же аир брейк,при кемпелировании вылазил ошибка неизвестная команда,не верный опкод,неверное количсьво,то почти со всеми клео

Установи опкоды в Sanny Builder
Избранное - Софт - SAMPFUNCS^{(https://blast.hk/threads/17/)}

grandpafromghetto · 29 Мар 2018

iPhoneSeven написал(а):
Вот я выдаю тепловизор дганом и он появляется в руках, а как сделать, чтобы когда я его выдавал себе он уже был надет на меня

проверяешь, есть ли он у тебя, если есть, то эмулируешь нажатие лкм

Qsany · 30 Мар 2018

сложно помогите плззз

CLEO:

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

//-------------MAIN---------------
0000: NOP

:Label00FF_15
0001: wait 0 ms
0AFA:  is_samp_available
004D: jump_if_false @Label00FF_15
0AC6: 1@ = label @Label00FF_117 offset
0C8C: render 0@ = load_texture_from_file_in_memory 1@ size 766
0001: wait 2000 ms
03E3: set_texture_to_be_drawn_antialiased 1
0B5A: get_screen_resolution 2@ 3@
000E: 2@ -= 128
000E: 3@ -= 145

:Label00FF_82
0001: wait 0 ms
0B73: render draw_texture 0@ pos 2@ 3@ size 64 64 rotation 0.0 color -1
0002: jump @Label00FF_82

:Label00FF_117
hex
89 50 4E 47 0D 0A
end[/B]

D3.Pheonix · 30 Мар 2018

@Qsany
Не пиши сюда больше пожалуйста.
Тебе в лицо программа тычет ответом. Когда копипастил лишнее захватил [b][/b]

SiTrak · 30 Мар 2018

как сделать бег к определённому объекту?

D3.Pheonix · 30 Мар 2018

Уася1337 написал(а):
как сделать бег к определённому объекту?

Так же как и к любым другим кордам, ты выше спрашивал
А на счёт объектов покопай тут
Там всё нужное есть

Поиск

Поиск

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

ShadowBroker

Известный

Qsany

Потрачен

D3.Pheonix

🎹

hnnssy

Известный

D3.Pheonix

🎹

Qsany

Потрачен

Forse1

Потрачен

grandpafromghetto

НАСТАЯЩИЙ ДАГИСТАНИЦ

Forse1

Потрачен

DarkL1ght

Новичок

grandpafromghetto

НАСТАЯЩИЙ ДАГИСТАНИЦ

Qsany

Потрачен

D3.Pheonix

🎹

SiTrak

Известный

D3.Pheonix

🎹

Похожие темы