|
[CLEO] Помощь по редактированию скриптов
|
|
| garden |
Дата: Суббота, 05.09.2015, 22:37 | Сообщение # 871
|
Бывалый
Сообщений: 348
Статус: Offline
|
Цитата Crycher (  ) Анансики, я уже не один форум перерыл по клео, но нигде толково не рассказывают как же правильно сделать эмуляцию нажатия клавиш (да, код из топика в чаво не работает)
Вот собственно два кода, оба не работают. Не знаю почему.
если это игровая клавиша, то через опкод 0B56
Не покупаю, не обмениваю, только продаю!
  
|
|
|
|
|
| Kevinoso |
Дата: Суббота, 05.09.2015, 22:37 | Сообщение # 872
|
Новичок
Сообщений: 11
Статус: Offline
|
Помогите, сделал простенький дган на дигл. При нажатии на J через 1 секунду выдаётся дигл с 100 патронами и всё робит, но потом через 10 секунд он должен удалится, но чё то не удаляется. Срочно помощь! Код {$CLEO}
thread "Dgun"
0662: NOP "Dgun"
:WEAP_1_11
wait 0
if and
Player.Defined($PLAYER_CHAR)
not Actor.Driving($PLAYER_ACTOR)
jf @WEAP_1_11
wait 0
if and
0AB0: key_pressed 74
Player.Controllable($PLAYER_CHAR)
jf @WEAP_1_11
if
Model.Load(#desert_eagle)
if
wait 1000
Model.Available(#desert_eagle)
01B2: give_actor $PLAYER_ACTOR weapon 24 ammo 100
wait 10000
Model.Destroy(#desert_eagle)
jump @WEAP_1_11
кек
|
|
|
|
|
| Crycher |
Дата: Суббота, 05.09.2015, 22:37 | Сообщение # 873
|
Любитель
Сообщений: 35
Статус: Offline
|
Цитата garden ( ) то через опкод 0B56
Код {$CLEO}
0000:
wait 0
if and
0AB0: key_pressed 0 49
:AAFK
wait 1500
0B56: set_game_key 57 state 255
wait 1500
0B56: set_game_key 57 state -255
jump @AAFK
Ровным счетом ничего не происходит в игре.
Сообщение отредактировал Crycher - Среда, 22.07.2015, 14:32 |
|
|
|
|
| ♦Gromble♦ |
Дата: Суббота, 05.09.2015, 22:37 | Сообщение # 874
|
Бывалый
Сообщений: 488
Статус: Offline
|
Цитата [CM]228papirosim ( ) Поменяйте пожалуйста активацию на Num.(110), буду благодарен.Ссылка
Click
Цитата garden ( ) Ребят, как сделать чтобы, кнопка была зажата неск. секунд?
Код
0B56: set_game_key 16 state 255 // как тут проставить время на которое она зажата?
wait 0
0B56: set_game_key 16 state 0
wait 0
0B56: set_game_key 14 state 255
wait 0
0B56: set_game_key 14 state 0
0B56: set_game_key 16 state 255
wait 1000 // Тут ставишь на сколько секунд клавиша будет зажата (в данном случае 1 секунда)
0B56: set_game_key 16 state 0
Цитата Crycher ( ) Анансики, я уже не один форум перерыл по клео, но нигде толково не рассказывают как же правильно сделать эмуляцию нажатия клавиш (да, код из топика в чаво не работает)
Вот собственно два кода, оба не работают. Не знаю почему.
Используй 0B56: set_game_key 1 state 255 // Первый параметр - ид клавиши, второй статус [255 - нажата, 0 отжата]
Цитата Kevinoso ( ) Помогите, сделал простенький дган на дигл. При нажатии на J через 1 секунду выдаётся дигл с 100 патронами и всё робит, но потом через 10 секунд он должен удалится, но чё то не удаляется. Срочно помощь!
Код
{$CLEO}
thread "Dgun"
0662: NOP "Dgun"
:WEAP_1_11
wait 0
if and
Player.Defined($PLAYER_CHAR)
not Actor.Driving($PLAYER_ACTOR)
jf @WEAP_1_11
wait 0
if and
0AB0: key_pressed 74
Player.Controllable($PLAYER_CHAR)
jf @WEAP_1_11
if
Model.Load(#desert_eagle)
if
wait 1000
Model.Available(#desert_eagle)
01B2: give_actor $PLAYER_ACTOR weapon 24 ammo 100
wait 10000
Model.Destroy(#desert_eagle)
jump @WEAP_1_11
Он и не должен удалится. Удаляется модель оружия из памяти игры, а не само оружие.
-------------------------------------------------------------------
 
[New] CC Pack by Gromble
Сслылка на скачивание: *Click
|
|
|
|
|
| Tosoti |
Дата: Суббота, 05.09.2015, 22:37 | Сообщение # 875
|
Боец
Сообщений: 150
Статус: Offline
|
Код Actor.PutAt($PLAYER_ACTOR, 0.0, 0.0, 30.0)
wait 500
0AFD: samp set_special_action 4
Но после тп у меня игрок не вылазит из кара, почему? Не могу закончить бота, надо чтобы он вылазил из кара. Как сделать?
|
|
|
|
|
| [CM]Vovich |
Дата: Суббота, 05.09.2015, 22:38 | Сообщение # 876
|
Знаток
Сообщений: 556
Статус: Offline
|
Цитата Tosoti ( ) Но после тп у меня игрок не вылазит из кара, почему? Не могу закончить бота, надо чтобы он вылазил из кара. Как сделать?
Используй:
Код
0B31: samp send_exit_vehicle 1@
Где 1@ - ID машины.
Пишу CLEO на заказ, мой Вконтакте - http://vk.com/garyachy
|
|
|
|
|
| Tosoti |
Дата: Суббота, 05.09.2015, 22:38 | Сообщение # 877
|
Боец
Сообщений: 150
Статус: Offline
|
Код {$CLEO .cs}
0000: NOP
:2
repeat
wait 0
if and
Actor.Driving($PLAYER_ACTOR)
0AB0: 56
then
while 0AB0: 56
wait 0
03C0: $Car = actor $PLAYER_ACTOR car
end
if or
0B4C: samp is_dialog_active -1
0B21: samp is_chat_opened
then
jf @2
else
wait 0
end
Actor.PutAt($PLAYER_ACTOR, 0.0, 0.0, 30.0)
wait 500
0B31: samp send_exit_vehicle $Car
jf @2
else
jf @2
end
Как сделать, чтобы перс вылазил из кара? Что в скрипте не так?
|
|
|
|
|
| [CM]KYRLYK |
Дата: Суббота, 05.09.2015, 22:38 | Сообщение # 878
|
Любитель
Сообщений: 33
Статус: Offline
|
Цитата Tosoti ( ) Как сделать, чтобы перс вылазил из кара? Что в скрипте не так?
0B31: samp send_exit_vehicle 1@
Отправляет пакет выхода из транспорта
Если не ошибаюсь, там еще заместо 1@ должно быть id машины, а не "$Car"
Сообщение отредактировал [CM]KYRLYK - Понедельник, 27.07.2015, 17:43 |
|
|
|
|
| Tosoti |
Дата: Суббота, 05.09.2015, 22:38 | Сообщение # 879
|
Боец
Сообщений: 150
Статус: Offline
|
Мне нужно для скрипта ещё тп на метку, не подскажете, что там быть должно? Т.е. как считывать координаты с метки и как на них тп? Отблагодарю.
|
|
|
|
|
| DubStep_ |
Дата: Суббота, 05.09.2015, 22:38 | Сообщение # 880
|
{ }
Сообщений: 1406
Статус: Offline
|
Цитата Tosoti ( ) Как сделать, чтобы перс вылазил из кара?
05CD: AS_actor $3 exit_car $car
|
|
|
|
|
| ♦Gromble♦ |
Дата: Суббота, 05.09.2015, 22:38 | Сообщение # 881
|
Бывалый
Сообщений: 488
Статус: Offline
|
Цитата [CM]Mirolla ( ) end
then
chatmsg "{FFFF00}При компиляции - Ошибка!!!!" 16768685
0@ = 1
end
then ставится после оператора условия 
-------------------------------------------------------------------
[New] CC Pack by Gromble
Сслылка на скачивание: *Click
|
|
|
|
|
| karate13 |
Дата: Суббота, 05.09.2015, 22:39 | Сообщение # 882
|
Новичок
Сообщений: 5
Статус: Offline
|
Всем привет,помогите мне пожалуйста.
Я хотел изменить кнопку активации скрипта,когда я компилирую все нормально закидываю в cleo и у меня крашит,помогите пожалуйста буду очень благодарен. Кнопку активации нужно сделать F3
Вот код:
Код
hex
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
end
{$cleo .cs}
{$I SF}
0000:
if not 32@ = SAMP.Base()
then 0A93: end_custom_thread
end
while not SAMP.Available()
wait 100
end
wait 4000
0AF8: samp add_message_to_chat "{1E90FF}P1cador: {FFFFFF} HZ.BY WallHack. {1E90FF}Activation: {FFFFFF}P" color 0xFFFF00
//wait 0
:1
if and
wait 0
0ab0: 80//Pp
jf @1
alloc 14@ 48
0C11: memset destination 14@ value 0 size 48
0B6D: render 25@ = create_font "Tahoma" height 9 flags 0x4
while true
wait 0
0A8D: 29@ = read_memory 0xB74490 size 4 virtual_protect 0
000A: 29@ += 0x4
0A8D: 29@ = read_memory 29@ size 4 virtual_protect 0
for 30@ = 0 to 35584 step 0x100
0A8D: 31@ = read_memory 29@ size 1 virtual_protect 0
000A: 29@ += 0x1
if and
0029: 31@ >= 0x00
001B: 0x80 > 31@
then
005A: 31@ += 30@
if and
056D: actor 31@ defined
803C: $PLAYER_ACTOR <> 31@
then
0B2B: samp 28@ = get_player_id_by_actor_handle 31@
0B36: samp 27@ = get_player_nickname 28@
21@ = SAMP.GetPlayerHealthByActorHandle(28@)
Actor.StorePos(31@, 1@, 2@, 3@)
if 00C2: sphere_onscreen 1@ 2@ 3@ radius 0.0
then
0B55: convert_3D_coords 1@ 2@ 3@ to_screen 4@ 5@
//22@ = Samp.GetPlayerArmorByActorHandle(28@)
if not SAMP.IsPlayerPaused(28@)
then
format 14@ "%s [%d] - {ff0000}%d HP" 27@ 28@ 21@
else
format 14@ "%s [%d] - {ffffff}AFK" 27@ 28@
end
0B6F: render font 25@ draw_text 14@ pos 4@ 5@ color 0xFF1E90FF
end
if 0ab0: 80//Pp
then
free 14@
jump @1
end
/*
0B2B: samp 28@ = get_player_id_by_actor_handle 31@
0B36: samp 27@ = get_player_nickname 28@
Actor.StorePos(31@, 1@, 2@, 3@)
0B55: convert_3D_coords 1@ 2@ 3@ to_screen 4@ 5@
0B6F: render font 25@ draw_text 27@ pos 4@ 5@ color 0xFF1E90FF
*/
//0AF8: samp add_message_to_chat "P1cador: %s [%d]" color 0xFFF0FF 27@ 28@
end
end
end
end
wait 100
jump @1 |
|
|
|
|
| [CM]KYRLYK |
Дата: Суббота, 05.09.2015, 22:39 | Сообщение # 883
|
Любитель
Сообщений: 33
Статус: Offline
|
Цитата karate13 ( ) {$I SF}
{$INCLUDE SF}
|
|
|
|
|
| MishkaCala[CM] |
Дата: Суббота, 05.09.2015, 22:39 | Сообщение # 884
|
Новичок
Сообщений: 1
Статус: Offline
|
Сделайте пожалуйста для 0.3.7 время и дата cleo script,вот скрипт а то , настройки не идут у меня папка не создается timedata.ini вот сайт http://cheat-master.ru/forum/129-288782-1 скачайте там-а и дайте код пожалуйста!Спасибо!
|
|
|
|
|
| Bakur |
Дата: Суббота, 05.09.2015, 22:39 | Сообщение # 885
|
Новичок
Сообщений: 6
Статус: Offline
|
У меня вопрос.Если я хочу чтобы после нажатия на капс(активация скрипта) проигрывалась какая либо мелодия или звук.Я где-то читал что есть (018C: play_sound 1053 at 0.0 0.0 0.0),но не знаю куда воткнуть :D.Помогите пожалуйста.
Вот код
Код {$CLEO .cs}
0000: NOP
:Noname_44
0001: wait 0
SAMP.Available
0002: jf @Noname_44
0AF8: samp add_message_to_chat "Активация гма на капс" color 16711680
0001: wait 0
:Noname_178
0001: wait 0
if
0AB0: key_pressed 20
jf @Noname_309
if
13@ == 0
jf @Noname_258
13@ = 1
SAMP.WriteSAMPMemory(34944, 12715008, 3)
Actor.SetImmunities($PLAYER_ACTOR, 1, 0, 0, 0, 0)
jump @Noname_294
:Noname_258
13@ = 0
SAMP.WriteSAMPMemory(34944, 7012200, 3)
Actor.SetImmunities($PLAYER_ACTOR, 0, 0, 0, 0, 0)
:Noname_294
wait 0
0AB0: not key_pressed 20
jf @Noname_294
:Noname_309
jump @Noname_178
Сообщение отредактировал Bakur - Понедельник, 10.08.2015, 23:15 |
|
|
|
|
