|
[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
|
|
|
|
|
| Кoт |
Дата: Воскресенье, 06.09.2015, 03:47 | Сообщение # 2611
|
Сообщений: 1074
Статус: Offline
|
Цитата Olegman10 (  ) Кoт, я не хаусчекер делаю, ибо он мне не нужен совсем... У меня своя задумка
Нормально робит? 
|
|
|
|
|
| Olegman10 |
Дата: Воскресенье, 06.09.2015, 03:47 | Сообщение # 2612
|
Мактавишка :3
Статус: Offline
|
Кoт, позже опробую. Свои доработки внесу  Добавлено (21.10.2014, 19:32)
---------------------------------------------
Код {$CLEO .cs}
0000:
if
8AF7: get_samp_base_to 33@
then
0A93: end_custom_thread
end
repeat
wait 400
until 0AFA: is_samp_structures_available
0AF8: samp add_message_to_chat "GribBot by Olegman10 Started" color 16750899
0AF8: samp add_message_to_chat "/bot_help - ïîìîùü" color 16750899
0B34: samp register_client_command "bot_help" to_label @help
0B34: samp register_client_command "bot_on" to_label @activate
0B34: samp register_client_command "bot_of" to_label @deactive
WHILE TRUE
wait 0
if 0@ == true
then
repeat
wait 0
Actor.StorePos($PLAYER_ACTOR 1@ 2@ 3@)
0AE3: 0@ = random_object_near_point 1@ 2@ 3@ in_radius 150.0 find_next 1
0B52: samp 4@ = object_id_by_handle 0@
if 4@ == 1603
then
Object.StorePos(0@ 4@ 5@ 6@)
Actor.PutAt($PLAYER_ACTOR 4@ 5@ 6@)
print "Grib found" 1500
wait 20
Actor.LockInCurrentPosition($PLAYER_ACTOR) = False
end
until 0@ = false
end
END
:activate
if 0@ == false
then
0@ = true
print "GribBot ~g~activated" 1500
end
Samp.CmdRet()
:deactive
if 0@ == true
then
0@ = false
print "GribBot ~r~deactivated" 1500
end
Samp.CmdRet()
:help
0AF8: samp add_message_to_chat "Àêòèâàöèÿ áîòà: /bot_on" color 16750899
0AF8: samp add_message_to_chat "Äåàêòèâàöèÿ áîòà: /bot_off" color 16750899
Samp.CmdRet()
ne robit, не чекает, хотя активирует все...
Russian Ice Gang - GTA Online
 
 
Cheater CM с 16.10.2014 по **.**.****
|
|
|
|
|
| Кoт |
Дата: Воскресенье, 06.09.2015, 03:47 | Сообщение # 2613
|
Сообщений: 1074
Статус: Offline
|
Ну,может потому,что ты попросил меня сделать поиск по ид объекту,а не по иду модели 
И я тебе нормальную активацию сделал,зачем ты разбил на две команды,когда и одной достаточно,либо сделал бы,вот так: /bot on\off,не начинай говнокодить 
|
|
|
|
|
|
|
| Кoт |
Дата: Воскресенье, 06.09.2015, 03:48 | Сообщение # 2615
|
Сообщений: 1074
Статус: Offline
|
Цитата Olegman10 ( ) Кoт, я ток и умею, что говнокодить
Добавлено (21.10.2014, 20:56)
---------------------------------------------
Помог бы лучше...
В данном случае помочь - это сделать за тебя клео.Основую функу написал я,теперь ты хочешь,что бы я исправил твои ошибки,вывод,что ты ничего не понял,как сделать.Лучше бы изучил бы еще справку,составил бы сам пару алгоритмов и потом принялся за более сложный клео 
|
|
|
|
|
|
|
| Кoт |
Дата: Воскресенье, 06.09.2015, 03:48 | Сообщение # 2617
|
Сообщений: 1074
Статус: Offline
|
Цитата Olegman10 ( ) Кoт, да я лучше уберу while true и на обычные метки перейду... Ибо с эндами у меня вечные проблемы
дело твое
Раз не можешь построить алгоритм
Сообщение отредактировал Кoт - Вторник, 21.10.2014, 21:40 |
|
|
|
|
| Bri |
Дата: Воскресенье, 06.09.2015, 03:48 | Сообщение # 2618
|
Briтва
Сообщений: 231
Статус: Offline
|
Olegman10, запятые уже не нужны?
Код Actor.StorePos($PLAYER_ACTOR 1@ 2@ 3@)
Object.StorePos(0@ 4@ 5@ 6@)
Actor.PutAt($PLAYER_ACTOR 4@ 5@ 6@)
Если что правильно:
Код Actor.StorePos($PLAYER_ACTOR, 1@, 2@, 3@)
Object.StorePos(0@, 4@, 5@, 6@)
Actor.PutAt($PLAYER_ACTOR, 4@, 5@, 6@)
и вообще поправил код(не проверял):
Код
{$CLEO .cs}
0000:
wait 228
0AF8: samp add_message_to_chat "GribBot by Olegman10 Started" color 16750899
0AF8: samp add_message_to_chat "/bot_grib - on/off" color 16750899
0B34: samp register_client_command "bot_grib" to_label @activate
WHILE TRUE
wait 0
if 0@ == true
then
repeat
wait 0
Actor.StorePos($PLAYER_ACTOR, 1@, 2@, 3@)
0AE3: 0@ = random_object_near_point 1@ 2@ 3@ in_radius 150.0 find_next 1
0B52: samp 4@ = object_id_by_handle 0@
if 4@ == 1603
then
Object.StorePos(0@, 4@, 5@, 6@)
0AB1: @PutAt 3 4@ 5@ 6@
print "Grib found" 1500
wait 20
Actor.LockInCurrentPosition($PLAYER_ACTOR) = False
until 0@ = false
end
end
END
:activate
if 0@ == false
then
0@ = true
print "GribBot ~g~activated" 1500
else
0@ = false
print "GribBot ~r~deactivated" 1500
end
Samp.CmdRet()
:PutAt
if 00DF: actor $PLAYER_ACTOR driving
then
00D9: 3@ = actor $PLAYER_ACTOR car
0A97: 3@ = car 3@ struct
else
0A96: 3@ = actor $PLAYER_ACTOR struct
end
000A: 3@ += 20
0A8D: 3@ = read_memory 3@ size 4 virtual_protect 0
000A: 3@ += 48
0A8C: write_memory 3@ size 4 value 0@ virtual_protect 0
000A: 3@ += 4
0A8C: write_memory 3@ size 4 value 1@ virtual_protect 0
000A: 3@ += 4
0A8C: write_memory 3@ size 4 value 2@ virtual_protect 0
ret 0
Сообщение отредактировал Bri - Вторник, 21.10.2014, 23:09 |
|
|
|
|
| Кoт |
Дата: Воскресенье, 06.09.2015, 03:48 | Сообщение # 2619
|
Сообщений: 1074
Статус: Offline
|
Цитата Bri ( ) Olegman10, запятые уже не нужны?
рак? достаточно указать параметры и все,запятые это тоже самое,что будет вот так
Actor.StorePos($PLAYER_ACTOR 1@ X 2@ Y 3@ Z) . Все равно не обрабатывает и поэтому разницы нет,есть запятые или нет.
Цитата Кoт ( ) ты попросил меня сделать поиск по ид объекту,а не по иду модели
Во-вторых,вы оба понимаете разницу между идом объекта и идом модели объекта?Наверно нет.Потому что,как слизали поиск по иду объекта,так и делаете,молодцы. 
Добавлено (22.10.2014, 12:50)
---------------------------------------------
Связи с проблемами интернета меня часто кикало,но все же мне удалось собрать пару грибов
Код {$CLEO .cs}
{$INCLUDE SF}
0000:
wait 1500 // time for loading
newcmd "bot" @activate
WHILE TRUE
wait 0
if 10@ == true
then
repeat
wait 0
print "~b~Searching..." 1500
astorepos $player_actor 1@ 2@ 3@
if 0AE3: 0@ = random_object_near_point 1@ 2@ 3@ in_radius 150.0 find_next 1
then
0984: 15@ = object 0@ model
if 15@ == 1603 // the if of the model object
then
01BB: store_object 0@ position_to 4@ 5@ 6@
0509: 13@ = distance_between_XY 4@ 5@ and_XY 1@ 2@
if 13@ <= 60.0
then
00A1: put_actor $PLAYER_ACTOR at 4@ 5@ 6@
print "Your are found object" 1500
14@++
0ACF: show_formatted_styled_text "~g~+1. Total: %d" time 2000 style 2 14@
wait 2000
end
end
end
until 10@ == false
mess "Fungi collected: {dd0000}%d" -1 14@
end
END
:activate
if 10@ == false
then
10@ = true
print "Cleo ~g~activated" 1500
else
10@ = false
print "Cleo ~r~deactivated" 1500
end
cmdret
Сообщение отредактировал Кoт - Среда, 22.10.2014, 14:47 |
|
|
|
|
| Olegman10 |
Дата: Воскресенье, 06.09.2015, 03:48 | Сообщение # 2620
|
Мактавишка :3
Статус: Offline
|
Кoт, Цитата Bri ( ) Olegman10, запятые уже не нужны?
Никогда не юзал зпт, все робило 
Цитата Кoт ( ) 0509: 13@ = distance_between_XY 4@ 5@ and_XY 1@ 2@
if 13@ <= 60.0
then
00A1: put_actor $PLAYER_ACTOR at 4@ 5@ 6@
Единственное, что взял в свой скрипт. Остальное понял. С моделью вчера разобрался...
Russian Ice Gang - GTA Online
Cheater CM с 16.10.2014 по **.**.****
|
|
|
|
|
| Моя_Сестрёнка_Задрот |
Дата: Воскресенье, 06.09.2015, 03:49 | Сообщение # 2621
|
Бывалый
Сообщений: 467
Статус: Offline
|
Восможно узнать название модели, (скина) своего персонажа, с помощью cleo, есть ли опкод на проверку?
|
|
|
|
|
| Кoт |
Дата: Воскресенье, 06.09.2015, 03:49 | Сообщение # 2622
|
Сообщений: 1074
Статус: Offline
|
Цитата Моя_Сестрёнка_Задрот ( ) Восможно узнать название модели, (скина) своего персонажа, с помощью cleo, есть ли опкод на проверку?
Вроде этот
0665: get_actor 88@ model_to 94@
и сверяешь модель в переменной с каким-нибудь идом,например 94@ == 1052
|
|
|
|
|
| Olegman10 |
Дата: Воскресенье, 06.09.2015, 03:49 | Сообщение # 2623
|
Мактавишка :3
Статус: Offline
|
Моя_Сестрёнка_Задрот, Код
33@ = Actor.Model($PLAYER_ACTOR)
if
33@ == *модель в виде #dmb1*
Russian Ice Gang - GTA Online
Cheater CM с 16.10.2014 по **.**.****
|
|
|
|
|
| Кoт |
Дата: Воскресенье, 06.09.2015, 03:49 | Сообщение # 2624
|
Сообщений: 1074
Статус: Offline
|
Цитата Olegman10 ( ) Моя_Сестрёнка_Задрот,
Код
33@ = Actor.Model($PLAYER_ACTOR)
if
33@ == *модель в виде #dmb1*
Ответ уже дан,зачем еще раз отвечать,только в другой форме?  И разницы нет в том,как он укажет модель,по иду модели или её имени
|
|
|
|
|
| helix |
Дата: Воскресенье, 06.09.2015, 03:49 | Сообщение # 2625
|
Боец
Сообщений: 89
Статус: Offline
|
Вопрос: Вот я скачал "Full gm by gc0de",там клавиша автивации Num*,мне это неудобно.Хочу изменить активацию на капс.Нашел код клавиши (20),изменяю pressed_key,комплирую,сохраняю,выхожу.
Захожу заново и ничего не изменилось.Почему?
Пробовал и просто сохранить,без комплирования и наоборот.
|
|
|
|
|
