|
[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
|
|
|
|
|
| darkes |
Дата: Воскресенье, 06.09.2015, 04:11 | Сообщение # 2761
|
Боец
Сообщений: 188
Статус: Offline
|
Цитата Colonhack[CM] (  ) Через что ты записывал маршрут своего бота шахтера?
Скриптом сделаным на коленке или же функцией собейта
|
|
|
|
|
| Colonhack[CM] |
Дата: Воскресенье, 06.09.2015, 04:11 | Сообщение # 2762
|
ТЫЖ ПРОГРОМИСТ
Сообщений: 128
Статус: Offline
|
Что за функция собейта, и в каком собейте это можно найти?
Любой дурак сможет написать код, который поймет машина. Хорошие программисты пишут код, который сможет понять человек. ©Martin Fowler
|
|
|
|
|
| darkes |
Дата: Воскресенье, 06.09.2015, 04:11 | Сообщение # 2763
|
Боец
Сообщений: 188
Статус: Offline
|
Цитата Colonhack[CM] ( ) Что за функция собейта, и в каком собейте это можно найти?
В любом, "Write coordinates to log file" в разном
|
|
|
|
|
| Axwell |
Дата: Воскресенье, 06.09.2015, 04:11 | Сообщение # 2764
|
Бывалый
Сообщений: 481
Статус: Offline
|
/save - встроенная функа в самп. (никакие cleo/собейты не нужны)
Записывает в файл Код C:\Users\Пользователь\Documents\GTA San Andreas User Files\SAMP\savedpositions.txt
Сообщение отредактировал Axwell - Суббота, 27.12.2014, 16:11 |
|
|
|
|
| Colonhack[CM] |
Дата: Воскресенье, 06.09.2015, 04:11 | Сообщение # 2765
|
ТЫЖ ПРОГРОМИСТ
Сообщений: 128
Статус: Offline
|
Может объясните как сделать.
Например ты ввел команду /sert и число
И то число которое ты ввел выводиться в чат, т.е. скрипт использует опкод 0AF8, и выводит туда то что было введено в команде
Любой дурак сможет написать код, который поймет машина. Хорошие программисты пишут код, который сможет понять человек. ©Martin Fowler
|
|
|
|
|
| cover |
Дата: Воскресенье, 06.09.2015, 04:12 | Сообщение # 2766
|
Бывалый
Сообщений: 343
Статус: Offline
|
Colonhack[CM],
Код
{$CLEO .cs}
0000:
repeat
wait 300
until 0AFA: is_samp_available
0B34: samp register_client_command "sert" to_label @sert
while true
wait 0
end
:sert
0B35: samp 0@ = get_last_command_params
if
0AD4: 2@ = scan_string 0@ "%d" 1@
then 0AF9: samp say_msg "%d" 1@
else 0AF8: samp add_message_to_chat "Ошибка ввода. Введите /sert [число]" color -1
end
0B43: samp cmd_ret
Сообщение отредактировал cover - Суббота, 27.12.2014, 22:02 |
|
|
|
|
| Colonhack[CM] |
Дата: Воскресенье, 06.09.2015, 04:12 | Сообщение # 2767
|
ТЫЖ ПРОГРОМИСТ
Сообщений: 128
Статус: Offline
|
У меня такая вот проблема, мой код не реагирует на задержки(wait 0, wait 2000 и т.д.)
Код
0B34: samp register_client_command "dokl" to_label @kp5
:kp5
wait 0
0B35: samp 22@ = get_last_command_params
0AF9: samp say_msg "/r [ОРБ]: Докладывает: Старшина Эрнесто Реинс. Состояние: %s" 22@
wait 3000 // так же быстро флудит какое бы я число не поставил
0AF9: samp say_msg "/c 60"
0AB1: call @keyPress 2 key 119 time 300
samp.CmdRet()
Любой дурак сможет написать код, который поймет машина. Хорошие программисты пишут код, который сможет понять человек. ©Martin Fowler
Сообщение отредактировал Colonhack[CM] - Суббота, 27.12.2014, 22:54 |
|
|
|
|
| Axwell |
Дата: Воскресенье, 06.09.2015, 04:12 | Сообщение # 2768
|
Бывалый
Сообщений: 481
Статус: Offline
|
Colonhack[CM], в функции команд нельзя юзать задержки 
|
|
|
|
|
| Colonhack[CM] |
Дата: Воскресенье, 06.09.2015, 04:12 | Сообщение # 2769
|
ТЫЖ ПРОГРОМИСТ
Сообщений: 128
Статус: Offline
|
Что предложишь?
Любой дурак сможет написать код, который поймет машина. Хорошие программисты пишут код, который сможет понять человек. ©Martin Fowler
|
|
|
|
|
| ALLOWCHEATING |
Дата: Воскресенье, 06.09.2015, 04:12 | Сообщение # 2770
|
Новичок
Сообщений: 21
Статус: Offline
|
Colonhack[CM], в теле скрипта теперь только можно использовать задержки
0B34: samp register_client_command "dokl" to_label @kp5
while true
wait 0
if 0@ == true
then
0AF9: samp say_msg "/r [ОРБ]: Докладывает: Старшина Эрнесто Реинс. Состояние: %s" 22@
wait 3000 // так же быстро флудит какое бы я число не поставил
0AF9: samp say_msg "/c 60"
0AB1: call @keyPress 2 key 119 time 300
end
0@ = false
end
:kp5
0B35: samp 22@ = get_last_command_params
0@ = true
samp.CmdRet()
|
|
|
|
|
| cover |
Дата: Воскресенье, 06.09.2015, 04:12 | Сообщение # 2771
|
Бывалый
Сообщений: 343
Статус: Offline
|
Colonhack[CM], Вот тебе альтернатива, через диалог, активация на клавишу 4, вводишь в диалог состояние и оно выводится, тебе осталось сюда вставить код нажатия клавиши для скриншота.
Код
{$CLEO .cs}
0000:
repeat
wait 300
until 0AFA: is_samp_available
while true
wait 0
if
0ab0: 52
then
0AC8: 2@ = allocate_memory_size 128
SAMP.ShowDialog(21, "Доклад.", "Введите состояние:", "Ввести", "Закрыть", 1)
repeat
wait 0
until SAMP.DialogRespond(21, 1@, 0, 2@)
if
1@ == 1
then
if
not 2@ == 0
then
0AF9: samp say_msg "/r [ОРБ]: Докладывает: Старшина Эрнесто Реинс. Состояние: %s" 2@
wait 3000
0AF9: samp say_msg "/c 60"
wait 1000
{
Сюда вставляй свою отправку функции на нажатие клавиши
}
end
else 0AF8: samp add_message_to_chat "Диалог был закрыт." color -1
end
end
0AC9: free_allocated_memory 2@
end
|
|
|
|
|
| Niкo |
Дата: Воскресенье, 06.09.2015, 04:13 | Сообщение # 2772
|
Бывалый
Сообщений: 371
Статус: Offline
|
Пожалуйста подскажите что не так в этом коде, пишет что машины не найдено, хотя такая машина есть.
Код {$CLEO}
0000:
1@ = 0
if 8AF7: get_samp_base_to 0@
then 0A93: end_custom_thread
end
repeat
wait 400
until 0AFA: is_samp_structures_available
wait 1000
0af8: "{1EFF00}[CarSearch]: {FFFFFF}Успешно загружен. Автор: {1EFF00}JustNiko"
0B34: samp register_client_command "csearch" to_label @CarSearch
while true
wait 0
if 1@ = 1
then
Car.StorePos(2@, 3@ 4@ 5@)
wait 100
Actor.PutAt($player_actor, 3@ 4@ 5@) // телепорт игрока к машине
wait 100
0af8: "{1EFF00}[CarSearch]: {FFFFFF}Вы были телепортированны к машине!"
1@ = 0
end
end
:CarSearch
wait 0
0B35: samp 2@ = get_last_command_params
if
056E: car 2@ defined
jf @NoCar
1@ = 1
Samp.CmdRet()
:NoCar
0af8: "{1EFF00}[CarSearch]: {FFFFFF}Такой машины не найденно!"
Samp.CmdRet() |
|
|
|
|
| [Rorke] |
Дата: Воскресенье, 06.09.2015, 04:13 | Сообщение # 2773
|
Боец
Сообщений: 94
Статус: Offline
|
JustNiko, не сканировал последние команды на наличие в стриме машины. Т.е:
Код {$CLEO}
0000:
if 8AF7: get_samp_base_to 0@
then 0A93: end_custom_thread
end
repeat
wait 400
until 0AFA: is_samp_structures_available
wait 1000
0af8: "{1EFF00}[CarSearch]: {FFFFFF}Успешно загружен. Автор: {1EFF00}JustNiko"
0af8: "{1EFF00}[CarSearch]: {FFFFFF}Помощь: {1EFF00}[Rorke]"
0B34: samp register_client_command "csearch" to_label @CarSearch
while true
wait 0
if 1@ = 1
then
Car.StorePos(7@, 3@ 4@ 5@)
wait 100
Actor.PutAt($player_actor, 3@ 4@ 5@)
wait 100
0af8: "{1EFF00}[CarSearch]: {FFFFFF}Вы были телепортированны к машине!"
1@ = 0
end
end
:CarSearch
wait 0
0B35: samp 2@ = get_last_command_params
0AD4: 6@ = scan_string 2@ format "%d" 7@
if
056E: car 7@ defined
jf @NoCar
1@ = 1
Samp.CmdRet()
:NoCar
0af8: "{1EFF00}[CarSearch]: {FFFFFF}Такой машины не найденно!"
Samp.CmdRet()
P.S. Не пробовал, отпишись, как потестишь
|
|
|
|
|
| Niкo |
Дата: Воскресенье, 06.09.2015, 04:13 | Сообщение # 2774
|
Бывалый
Сообщений: 371
Статус: Offline
|
Цитата [Rorke] ( ) P.S. Не пробовал, отпишись, как потестишь
Проверил, не работает 
|
|
|
|
|
| DubStep_ |
Дата: Воскресенье, 06.09.2015, 04:13 | Сообщение # 2775
|
{ }
Сообщений: 1406
Статус: Offline
|
Ты проверяешь доступность машины по иду, а надо по хэндлу. Samp car handle by id опкод ищи, я с телефона.
|
|
|
|
|
