|
[CLEO] Вопрос - Ответ
|
|
| [CM]Рафаэль |
Дата: Суббота, 05.09.2015, 20:19 | Сообщение # 1
|
Cheat-Master
Сообщений: 3080
Статус: Offline
|
 В этой теме задаются вопросы по CLEO, конкретным опкодам (например, назначение того или иного опкода) и т.д.
Форма вопроса:
Код [color=#1E90FF][b]Вопрос:[/b][/color] text
Форма ответа:
Код [color=#1E90FF][b]Ответ:[/b][/color] text
Мой Shop
Официальный гарант
Контактные данные:
VK: vk.com/ali_benua
Skype: lvinyipen
Telegram: @AliBenua
ICQ: 552-090-283
|
|
|
|
|
| Jugis |
Дата: Воскресенье, 06.09.2015, 02:03 | Сообщение # 2011
|
Новичок
Сообщений: 8
Статус: Offline
|
Код {$CLEO .cs}
0000: NOP
repeat
wait 400
until 0AFA: is_samp_structures_available
0B34: samp register_client_command "atp1" to_label @atp1
while true
wait 0
end
:atp1
wait 0
0AF8: samp add_message_to_chat "Телепортация начата!" color 0xFF4500
wait 1000
Samp.Spawn()
0AF8: samp add_message_to_chat "Не двигайтесь!" color 0xFF4500
wait 3500
Actor.PutAt($PLAYER_ACTOR, -212.46, -1365.36, 6.67)
0AF8: samp add_message_to_chat "Телепортация выполнена!" color 0xFF4500
Samp.CmdRet()
А это как перевести на gosub?
|
|
|
|
|
| Кoт |
Дата: Воскресенье, 06.09.2015, 02:03 | Сообщение # 2012
|
Сообщений: 1074
Статус: Offline
|
Цитата Jugis (  ) А это как перевести на gosub?
можно даже через jump,выбирай любой
Код {$CLEO .cs}
0000: NOP
0B34: samp register_client_command "atp1" to_label @atp1
while true
wait 0
end
:atp1
gosub @tp
Samp.CmdRet()
:tp
wait 0
0AF8: samp add_message_to_chat "Телепортация начата!" color 0xFF4500
wait 1000
Samp.Spawn()
0AF8: samp add_message_to_chat "Не двигайтесь!" color 0xFF4500
wait 3500
Actor.PutAt($PLAYER_ACTOR, -212.46, -1365.36, 6.67)
0AF8: samp add_message_to_chat "Телепортация выполнена!" color 0xFF4500
return
Код {$CLEO .cs}
0000: NOP
:cmd
0B34: samp register_client_command "atp1" to_label @atp1
while true
wait 0
end
:atp1
jump @tp
Samp.CmdRet()
:tp
wait 0
0AF8: samp add_message_to_chat "Телепортация начата!" color 0xFF4500
wait 1000
Samp.Spawn()
0AF8: samp add_message_to_chat "Не двигайтесь!" color 0xFF4500
wait 3500
Actor.PutAt($PLAYER_ACTOR, -212.46, -1365.36, 6.67)
0AF8: samp add_message_to_chat "Телепортация выполнена!" color 0xFF4500
jump @cmd
так же,судя по активации "atp1",телепорт у тебя не один.И я уверен,что ты начнешь пихать кучу команд,хотя можно сделать проще.Вот один из примеров
Код {$CLEO .cs}
0000:
0B34: samp register_client_command "tp" to_label @cmd
while true
wait 0
end
:cmd
0B35: samp 0@ = get_last_command_params
0AD4: 3@ = scan_string 0@ format "%d" 5@
if 3@ > 0
then
if
5@ == 1
then
gosub @tp1
else
if
5@ == 2
then
gosub @tp2
end
end
end
0B43: samp cmd_ret
:tp1
wait 0
0AF8: samp add_message_to_chat "Телепортация начата!" color 0xFF4500
wait 1000
Samp.Spawn()
0AF8: samp add_message_to_chat "Не двигайтесь!" color 0xFF4500
wait 3500
Actor.PutAt($PLAYER_ACTOR, -2442.46, -1365.36, 6.67)
0AF8: samp add_message_to_chat "Телепортация выполнена!" color 0xFF4500
return
:tp2
wait 0
0AF8: samp add_message_to_chat "Телепортация начата!" color 0xFF4500
wait 1000
Samp.Spawn()
0AF8: samp add_message_to_chat "Не двигайтесь!" color 0xFF4500
wait 3500
Actor.PutAt($PLAYER_ACTOR, -212.46, -1365.36, 6.67)
0AF8: samp add_message_to_chat "Телепортация выполнена!" color 0xFF4500
return
так же можно сделать один телепорт,то есть actor.put(...),но изменять только координаты,и клео будет на много быстрей.Так же можно сделать вот так
/tp meria и он тебя тп на мэрию,куча вариантов
если хочешь,могу помочь в скайпе.bik__bik (два тире)
|
|
|
|
|
| Jugis |
Дата: Воскресенье, 06.09.2015, 02:04 | Сообщение # 2013
|
Новичок
Сообщений: 8
Статус: Offline
|
Кoт, ух. Ты немного не понял меня 
Нужно как-то сделать задержку, ведь wait не работает..
|
|
|
|
|
| RAKSHA1337 |
Дата: Воскресенье, 06.09.2015, 02:04 | Сообщение # 2014
|
Советник
Сообщений: 784
Статус: Offline
|
Jugis, попробуй сделать тоже самое, но с другой активацией.
В казино рандом. Но рандом в программах - это генератор псевдослучайных чисел, который написан ручками человека. А значит есть формула! Есть алгоритм! Есть тактика!
Кто не согласен - ставьте минус, после того как докажете обратное. https://habrahabr.ru/post/196442/
|
|
|
|
|
| Nikemmi |
Дата: Воскресенье, 06.09.2015, 02:04 | Сообщение # 2015
|
Хороший))0
Сообщений: 475
Статус: Offline
|
Вопрос: Возможно ли записать значение адреса в 8 байт?
Delphi программирование
[Delphi]Узнаем координаты перса
BunnyHop для Steam/Non steam
 
|
|
|
|
|
| Кoт |
Дата: Воскресенье, 06.09.2015, 02:04 | Сообщение # 2016
|
Сообщений: 1074
Статус: Offline
|
Цитата Jugis ( ) Кoт, ух. Ты немного не понял меня
Нужно как-то сделать задержку, ведь wait не работает..
я тебя все правильно понял,ты по коду не можешь увидеть то,что я вывел основную часть функции за предел
:atp1
jump @tp
Samp.CmdRet()
:tp
wait 0
0AF8: samp add_message_to_chat "Телепортация начата!" color 0xFF4500
wait 1000
Samp.Spawn()
0AF8: samp add_message_to_chat "Не двигайтесь!" color 0xFF4500
wait 3500
Actor.PutAt($PLAYER_ACTOR, -212.46, -1365.36, 6.67)
0AF8: samp add_message_to_chat "Телепортация выполнена!" color 0xFF4500
jump @cmd
Я лично проверял,задержка есть и все отлично работает,а то что я предложил свои идеи,чтобы у тебя такого не было
0B34: samp register_client_command "atp1" to_label @atp1
0B34: samp register_client_command "atp2" to_label @atp2
0B34: samp register_client_command "atp3" to_label @atp3
0B34: samp register_client_command "atp4" to_label @atp4
0B34: samp register_client_command "atp5" to_label @atp5
0B34: samp register_client_command "atp6" to_label @atp6
я предлагаю использовать одну команду и один телепорт,так и код меньше,быстрей будет,нагрузки меньше и вообще,потому что так лучше
|
|
|
|
|
| BronxxQWE |
Дата: Воскресенье, 06.09.2015, 02:04 | Сообщение # 2017
|
Боец
Сообщений: 222
Статус: Offline
|
Цитата Nikemmi ( ) Вопрос: Возможно ли записать значение адреса в 8 байт?
Вроде как нет, но я точно не уверен.
 
Я самый честный продавец на Cheat-Master 
|
|
|
|
|
| JJJJJ |
Дата: Воскресенье, 06.09.2015, 02:04 | Сообщение # 2018
|
Бывалый
Сообщений: 392
Статус: Offline
|
Цитата Nikemmi ( ) Вопрос: Возможно ли записать значение адреса в 8 байт?
А чёб и нет?Добавлено (19.05.2014, 20:00)
---------------------------------------------
Цитата Кoт ( ) :atp1
jump @tp
Samp.CmdRet()
:tp
wait 0
0AF8: samp add_message_to_chat "Телепортация начата!" color 0xFF4500
wait 1000
Samp.Spawn()
0AF8: samp add_message_to_chat "Не двигайтесь!" color 0xFF4500
wait 3500
Actor.PutAt($PLAYER_ACTOR, -212.46, -1365.36, 6.67)
0AF8: samp add_message_to_chat "Телепортация выполнена!" color 0xFF4500
jump @cmd
на SF 3.1+ этот код просто не прокатит.
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
|
|
|
|
|
| Кoт |
Дата: Воскресенье, 06.09.2015, 02:05 | Сообщение # 2019
|
Сообщений: 1074
Статус: Offline
|
Цитата JJJJJ ( ) на SF 3.1+ этот код просто не прокатит.
Я использую 3.0,ибо для меня разницы нет,что 3.1.2,что 3.0,ибо я все равно не использую\использовал массу новых опкодов.
|
|
|
|
|
| Sindako |
Дата: Воскресенье, 06.09.2015, 02:05 | Сообщение # 2020
|
Боец
Сообщений: 81
Статус: Offline
|
а как расшифровать двоичный код в скрипте?
|
|
|
|
|
| kk_kk |
Дата: Воскресенье, 06.09.2015, 02:05 | Сообщение # 2021
|
Любитель
Сообщений: 34
Статус: Offline
|
Цитата Jugis ( ) Нужно как-то сделать задержку, ведь wait не работает..
Он работает,просто нужно теперь нужно вписывать в главное тело.
Делаю скрипты/ботов на CLEO,любой сложности,с просьбами в ЛС ( бесплатно )
Сообщение отредактировал kk_kk - Понедельник, 19.05.2014, 22:53 |
|
|
|
|
| Grisha2677 |
Дата: Воскресенье, 06.09.2015, 02:05 | Сообщение # 2022
|
Боец
Сообщений: 89
Статус: Offline
|
Мне нужен бот автобсника, могу ли я сам записать маршрут бота? И что бы он не ТПшался по меткам а ездил.
|
|
|
|
|
| RAKSHA1337 |
Дата: Воскресенье, 06.09.2015, 02:05 | Сообщение # 2023
|
Советник
Сообщений: 784
Статус: Offline
|
Grisha2677, у могайки где-то был такой скрипт, поищи.
В казино рандом. Но рандом в программах - это генератор псевдослучайных чисел, который написан ручками человека. А значит есть формула! Есть алгоритм! Есть тактика!
Кто не согласен - ставьте минус, после того как докажете обратное. https://habrahabr.ru/post/196442/
|
|
|
|
|
| Axwell |
Дата: Воскресенье, 06.09.2015, 02:05 | Сообщение # 2024
|
Бывалый
Сообщений: 481
Статус: Offline
|
Код
{$CLEO .cs}
0000: NOP "by Axwell"
:Ax_1
wait 0
if and
0AB0: key_pressed 74
0AB0: key_pressed 75
jf @Ax_1
0B3D: raknet 1@ = new_bit_stream
0B40: raknet bit_stream 1@ write 1 type 1 size 1
0B40: raknet bit_stream 1@ write 2@ type 3 size 4
0B40: raknet bit_stream 1@ write 3@ type 4 size 4
0B40: raknet bit_stream 1@ write 0 type 3 size 4
0B41: raknet send_rpc 115 bit_stream 1@ priority 1 reliability 10 ordering_channel 0 shift_timestamp false
0B3E: raknet delete_bit_stream 1@
jump @Ax_1
Вот я не понимаю, что должно содержать 2@ и 3@??
И где можно найти наиболее полное описание всех RPC? Что бы у меня не возникало таких глупых вопросов.
p.s это RPC_GIVETAKEDAMAGE
Сообщение отредактировал Axwell - Среда, 21.05.2014, 00:34 |
|
|
|
|
| Рингач |
Дата: Воскресенье, 06.09.2015, 02:06 | Сообщение # 2025
|
Новичок
Сообщений: 26
Статус: Offline
|
Цитата Axwell ( ) И где можно найти наиболее полное описание всех RPC? Что бы у меня не возникало таких глупых вопросов
http://blasthack.net/sfdoc/op4.html (не реклама)
|
|
|
|
|
