|
[CLEO] Помощь по редактированию скриптов
|
|
| fleimos |
Дата: Суббота, 05.09.2015, 21:36 | Сообщение # 511
|
Новичок
Сообщений: 8
Статус: Offline
|
странно,сделал клео а запустить не могу
ВЕЛИКИЙ И УЖАСНЫЙ ЛОХ(
|
|
|
|
|
| Edmo |
Дата: Суббота, 05.09.2015, 21:36 | Сообщение # 512
|
Новичок
Сообщений: 1
Статус: Offline
|
Парни я решил создать клео но оно не робит помогите мне плиз.
Лалалай
Сообщение отредактировал Edmo - Понедельник, 24.02.2014, 21:51 |
|
|
|
|
| RAKSHA1337 |
Дата: Суббота, 05.09.2015, 21:37 | Сообщение # 513
|
Советник
Сообщений: 784
Статус: Offline
|
Edmo, ты сам то понял что написал?
Так ок давай разберёмся.
1.
Цитата Edmo (  )
:HEALTH_48
wait 0
if and
0AB0: key_pressed 72
0AB0: key_pressed 96
jf @HEALTH_48
Actor.Health($PLAYER_ACTOR) = 5
jump @HEALTH_48
Нормально, не чё пойдёт идём дальше.
Цитата Edmo ( )
jf @HEALTH_302
8AF7: not get_samp_base_to 29@
:2 wait 400
0AFA: is_samp_structures_available
jf @2
Вот тут у тебя какой-то набор слов пошёл, разберись с этим. (И ещё это должно быть в начале скрипта.)
Дальше
Цитата Edmo ( )
:1
wait 0
if and
0AB0: key_pressed 72
0AB0: key_pressed 96
jf @1
wait 1000
0AF9: samp say_msg "/me Выпил(а) стакан содовой"
jump @1
вот это наверно лишнее.
В казино рандом. Но рандом в программах - это генератор псевдослучайных чисел, который написан ручками человека. А значит есть формула! Есть алгоритм! Есть тактика!
Кто не согласен - ставьте минус, после того как докажете обратное. https://habrahabr.ru/post/196442/
Сообщение отредактировал RAKSHA1337 - Вторник, 25.02.2014, 02:49 |
|
|
|
|
| Crime_Streets_Teal |
Дата: Суббота, 05.09.2015, 21:37 | Сообщение # 514
|
Новичок
Сообщений: 5
Статус: Offline
|
Цитата RAKSHA1337 ( ) Edmo, ты сам то понял что написал?
Так ок давай разберёмся.
1.
Цитата Edmo ()
:HEALTH_48
wait 0
if and
0AB0: key_pressed 72
0AB0: key_pressed 96
jf @HEALTH_48
Actor.Health($PLAYER_ACTOR) = 5
jump @HEALTH_48
Нормально, не чё пойдёт идём дальше.
Цитата Edmo ()
jf @HEALTH_302
8AF7: not get_samp_base_to 29@
:2 wait 400
0AFA: is_samp_structures_available
jf @2
Вот тут у тебя какой-то набор слов пошёл, разберись с этим. (И ещё это должно быть в начале скрипта.)
Дальше
Цитата Edmo ()
:1
wait 0
if and
0AB0: key_pressed 72
0AB0: key_pressed 96
jf @1
wait 1000
0AF9: samp say_msg "/me Выпил(а) стакан содовой"
jump @1
вот это наверно лишнее.
Срорее всего он хотел что бы когда ему прибавлялось 5 хп в чат Писало: /me Выпил(а) стакан содовой
Помогите ему я лично не знаю как сделать так
|
|
|
|
|
| [CM]Skand1k |
Дата: Суббота, 05.09.2015, 21:37 | Сообщение # 515
|
Боец
Сообщений: 81
Статус: Offline
|
Crime_Streets_Teal, на крайме такое работать не будет, можете забыть об этой идеи
|
|
|
|
|
| Sano |
Дата: Суббота, 05.09.2015, 21:37 | Сообщение # 516
|
Любитель
Сообщений: 48
Статус: Offline
|
Цитата Edmo ( ) 662: printstring "FOR CHEAT-MASTER.RU BY Crime_Streets_Teal" thread "HEALTH" :HEALTH_48 wait 0 if and 0AB0: key_pressed 72 0AB0: key_pressed 96 jf @HEALTH_48 Actor.Health($PLAYER_ACTOR) = 5 jump @HEALTH_48 jf @HEALTH_302 8AF7: not get_samp_base_to 29@ :2 wait 400 0AFA: is_samp_structures_available jf @2 :1 wait 0 if 0AB0: key_pressed 72 0AB0: key_pressed 96 jf @1 wait 1000 0AF9: samp say_msg "/me Выпил(а) стакан содовой" jump @1
Чисто подарочек 
Код {$CLEO}
if
not 29@ = samp.Base()
then
end_thread
else
while not samp.Available()
wait 0
end
end
while true
wait 0
if and
0AB0: key_pressed 72
0AB0: key_pressed 96
then
1@ = Actor.Health($PLAYER_ACTOR)
1@ += 5
0B2E: 2@ = read_module_memory "samp.dll" offset 0x5530 size 2
0B2D: write_module_memory "samp.dll" offset 0x141D0 value 0xC390 size 2
Actor.Health($PLAYER_ACTOR) = 1@
wait 1000
0AF9: samp say_msg "/me Выпил(а) стакан содовой"
0B2D: write_module_memory "samp.dll" offset 0x141D0 value 2@ size 2
end
end
/*============RAMPAGE=============*/
Сообщение отредактировал Sano - Четверг, 27.02.2014, 18:22 |
|
|
|
|
| Karlik_B |
Дата: Суббота, 05.09.2015, 21:37 | Сообщение # 517
|
Боец
Сообщений: 158
Статус: Offline
|
Нужна ваша помощь. Хочу создать фейковый чат, к примеру бан. Мне нужно, чтобы при вводе /fban высвечивался диалог, в него бы вписывал ник админа, затем след. диалог, там бы нужно было вписать ник забаненного, а в 3 диалоге причину, а после появлялся бы фейковый чат со всем тем, что ввел изначально. Буду рад помощи, с меня "+" 
___________________________________________
Fake Chat на заказ.
|
|
|
|
|
| Sano |
Дата: Суббота, 05.09.2015, 21:37 | Сообщение # 518
|
Любитель
Сообщений: 48
Статус: Offline
|
Цитата Karlik_B ( ) Нужна ваша помощь. Хочу создать фейковый чат, к примеру бан. Мне нужно, чтобы при вводе /fban высвечивался диалог, в него бы вписывал ник админа, затем след. диалог, там бы нужно было вписать ник забаненного, а в 3 диалоге причину, а после появлялся бы фейковый чат со всем тем, что ввел изначально. Буду рад помощи, с меня "+"
http://cheat-master.ru/forum/116-70566-1
Здесь тебе помогут, но за тебя делать не будут
Хотя за платно сделаю :P
/*============RAMPAGE=============*/
|
|
|
|
|
| RAKSHA1337 |
Дата: Суббота, 05.09.2015, 21:38 | Сообщение # 519
|
Советник
Сообщений: 784
Статус: Offline
|
Цитата Sano ( ) за платно сделаю
За сколько?
В казино рандом. Но рандом в программах - это генератор псевдослучайных чисел, который написан ручками человека. А значит есть формула! Есть алгоритм! Есть тактика!
Кто не согласен - ставьте минус, после того как докажете обратное. https://habrahabr.ru/post/196442/
|
|
|
|
|
| Sano |
Дата: Суббота, 05.09.2015, 21:38 | Сообщение # 520
|
Любитель
Сообщений: 48
Статус: Offline
|
Цитата RAKSHA1337 ( ) За сколько?
Я имел ввиду показать что за тебя никто ничего делать не будет. А стоить хз, рубасей за 20, делаю прежде всего для себя.
/*============RAMPAGE=============*/
|
|
|
|
|
| Karlik_B |
Дата: Суббота, 05.09.2015, 21:38 | Сообщение # 521
|
Боец
Сообщений: 158
Статус: Offline
|
Неизвестная команда file.Open | file.Close, прошу помощи
___________________________________________
Fake Chat на заказ.
|
|
|
|
|
| JJJJJ |
Дата: Суббота, 05.09.2015, 21:38 | Сообщение # 522
|
Бывалый
Сообщений: 392
Статус: Offline
|
Цитата Karlik_B ( ) Неизвестная команда file.Open | file.Close, прошу помощи
0A9A: 0@ = openfile "settings.ini" mode "rt" // IF and SET
0A9B: closefile 0@
SAMP 0.3z: http://yadi.sk/d/8ljsLu7m3Iitb
CLEO 4.1: http://clck.ru/978nn
CLEO 4.3: http://cleo.li/cleo4/CLEO4_setup.exe
GTA:SA 1.0 us: http://yadi.sk/d/pJNaahj92MlQD
[CLEO] Админ-чекер на худе: http://cheat-master.ru/forum/129-220729-1
|
|
|
|
|
| bis |
Дата: Суббота, 05.09.2015, 21:38 | Сообщение # 523
|
Любитель
Сообщений: 30
Статус: Offline
|
Нужна помощь, не могу разобраться как изменить в этом коде активацию на автоматическую, при спавне(т.е. получаешь этот дигл сразу после спавна, а не при нажатии клавиш)
0000: NOP
wait 10
Model.Available(#DESERT_EAGLE)
038B: load_requested_models
:NONAME_13
wait 10
if and
$ONMISSION == 0
Model.Load(#DESERT_EAGLE)
jf @NONAME_13
:NONAME_40
wait 10
if and
$ONMISSION == 0
not Actor.Driving($PLAYER_ACTOR)
0AB0: key_pressed 74
0AB0: key_pressed 17
jf @NONAME_40
018C: play_sound 1058 at 0.0 0.0 0.0
01B2: give_actor $PLAYER_ACTOR weapon 24 ammo 1000
wait 100
Model.Available(#DESERT_EAGLE)
wait 2900
jump @NONAME_40Добавлено (12.03.2014, 04:57)
---------------------------------------------
Разобрался сам, в помощи не нуждаюсь.
|
|
|
|
|
| Karlik_B |
Дата: Суббота, 05.09.2015, 21:39 | Сообщение # 524
|
Боец
Сообщений: 158
Статус: Offline
|
Цитата makara0077 ( ) Помогите пожалуйста вот я скачал sanny builder вот скопировал коды ввел и сохранил но у меня он просто читается а как создать клео с кодами?и что не простой читающий cleo был а просто типо файлик cleo.cs как сделать .cs?а не просто блокнотом?помогите я хочу стать скриптером писать свои cleo если поможете я буду ващим учеником пожалуйста помогите!
Нажми F6 и в папке CLEO в игре создастся файл.Добавлено (12.03.2014, 15:22)
---------------------------------------------
Создал фейковую статистику на SRP, но последняя строчка не выводится, как исправить?
___________________________________________
Fake Chat на заказ.
|
|
|
|
|
| kodak123 |
Дата: Суббота, 05.09.2015, 21:39 | Сообщение # 525
|
Новичок
Сообщений: 23
Статус: Offline
|
Код // 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_46
:NONAME_18
not SAMP.Available
else_jump @NONAME_39
wait 500
jump @NONAME_18
:NONAME_39
jump @NONAME_48
:NONAME_46
end_thread
:NONAME_48
0@ = 0
:NONAME_55
wait 0
if
0@ == 0
else_jump @NONAME_202
if
key_down 74
else_jump @NONAME_195
0@ = 1
0AF8: samp add_message_to_chat "[FASTBOT] БОТ ВКЛЮЧЕН, ЧТОБЫ ВЫКЛЮЧИТЬ ЗАЖМИТЕ КЛАВИШУ \"5\"." color 6736947
print "~Y~CLEO ~G~ACTIVATED" 1500
:NONAME_195
jump @NONAME_348
:NONAME_202
Actor.StorePos($PLAYER_ACTOR, 1@, 2@, 3@)
call @NONAME_355 3 2230.781 -2285.63 14.3751
call @NONAME_355 3 1@ 2@ 3@
wait 1
wait 1
key_down 53
else_jump @NONAME_202
0AF8: samp add_message_to_chat "[FASTBOT] БОТ ОТКЛЮЧЕН." color 13382400
print "~Y~CLEO ~R~DEACTIVATED" 1500
0@ = 0
:NONAME_348
jump @NONAME_55
:NONAME_355
3@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
3@ = SAMP.GetPlayerStruct(3@)
3@ += 109
alloc 4@ 68
call @NONAME_523 3 4@ 3@ 68
0085: 5@ = 4@ // (int)
5@ += 6
0A8C: write_memory 5@ size 4 value 0@ virtual_protect 0
5@ += 4
0A8C: write_memory 5@ size 4 value 1@ virtual_protect 0
5@ += 4
0A8C: write_memory 5@ size 4 value 2@ virtual_protect 0
5@ = RakNet.NewBitStream()
RakNet.Write(5@, 212, BS_TYPE_BYTE, 1)
RakNet.Write(5@, 4@, BS_TYPE_ARRAY, 68)
RakNet.Send(5@, 1, 1, 0)
RakNet.DeleteBitStream(5@)
free 4@
ret 0
:NONAME_523
2@ -= 1
3@ = 0
:NONAME_537
0A8D: 4@ = read_memory 1@ size 1 virtual_protect 0
0A8C: write_memory 0@ size 1 value 4@ virtual_protect 0
1@ += 1
0@ += 1
3@ += 1
001D: 3@ > 2@ // (int)
else_jump @NONAME_537
ret 0
Помогите перевести на 0.3z
|
|
|
|
|
