|
[CLEO] Помощь по редактированию скриптов
|
|
| Chester_Master |
Дата: Суббота, 05.09.2015, 21:59 | Сообщение # 646
|
Бывалый
Сообщений: 339
Статус: Offline
|
alekceu1997, опкоды обнови,будет работать
|
|
|
|
|
| [CM]Perez[CM] |
Дата: Суббота, 05.09.2015, 21:59 | Сообщение # 647
|
Боец
Сообщений: 92
Статус: Offline
|
Вот пытаюсь создать бот который будет качать силу в спорт зале.Так вот не получается сделать деактивацию.Вроде бы при нажатии на F2 он должен отключаться но не не получается.И еще надо чтобы он работал в свернутом режиме.
Вот код Код {$CLEO}
0000:
wait 2000
while true
wait 0
if and
0ab0: 0x61
8B21: samp is_chat_closed
then
while 0ab0: 0x61
wait 0
end
while 8ab0: 0x61
0DBF: emul_key_press 0x57 is_up 0
wait 6000
0DBF: emul_key_press 0x57 is_up 1
wait 2000
end
end
end
Если нужна помощь в поиске чего либо или просто помощь пиши в ЛС.Помогу чем нибудь.
ВК-- https://vk.com/id94548022
Мои достижения:
365 дней на CM [+] 200 репутации [+] Пользователь [+]
500 дней на СМ [+] 500 репутации [+] Клан CM [-]
1000 дней на CM [+] 1000 репутации [-] Проверенный [-]
1500 дней на CM [-] 2000 репутации [-] Админ-Совет [-] Это не скоро :D
|
|
|
|
|
| [cm]loshadka |
Дата: Суббота, 05.09.2015, 21:59 | Сообщение # 648
|
Новичок
Сообщений: 1
Статус: Offline
|
Пытаюсь изменить ключевое слово dr, менял на etc и компилил, но игра начинала сильно лагать, да и скрипт не работал, помогите правильно компилировать скрипт, установлен SAMPFUNCS 3.2 на Sanny Builder и Cleo 4.1
|
|
|
|
|
| Chester_Master |
Дата: Суббота, 05.09.2015, 22:00 | Сообщение # 649
|
Бывалый
Сообщений: 339
Статус: Offline
|
[cm]loshadka, слишком много лишнего,пиши на нормальном коде
|
|
|
|
|
| DubStep_ |
Дата: Суббота, 05.09.2015, 22:00 | Сообщение # 650
|
{ }
Сообщений: 1406
Статус: Offline
|
alekceu1997, Код {$CLEO}
0000:
wait 2000
while true
wait 0
if and
0ab0: 0x61
8B21: samp is_chat_closed
then
wait 1000
repeat
0DBF: emul_key_press 0x57 is_up 0
wait 6000
0DBF: emul_key_press 0x57 is_up 1
wait 2000
until if 0ab0: 0x61
wait 1000
end
end |
|
|
|
|
| Axwell |
Дата: Суббота, 05.09.2015, 22:00 | Сообщение # 651
|
Бывалый
Сообщений: 481
Статус: Offline
|
Вот эта штучка не пашет
Код
repeat
wait 0
if Samp.IsPlayerConnected(15@)
then
16@ = Samp.GetActorHandleByPlayerID(15@)
if 056D: actor 16@ defined
then
0619: enable_actor 16@ collision_detection 0
end
end
15@ += 1
if 15@ > 1000
then
15@ = 0
end
until false
Коллизия у игроков не отключается. хотя вроде все правильно написал
|
|
|
|
|
| Narkoz74 |
Дата: Суббота, 05.09.2015, 22:00 | Сообщение # 652
|
Новичок
Сообщений: 4
Статус: Offline
|
Код
{$CLEO .cs}
03A4: script_name 'CR_CAR_SPEED'
:CR_CAR_SPEED_19
0001: wait 0
00D6: if and
00DF: is_char_in_any_car $PLAYER_ACTOR
84C8: not is_char_in_flying_vehicle $PLAYER_ACTOR
84AB: not is_char_in_any_plane $PLAYER_ACTOR
84A9: not is_char_in_any_heli $PLAYER_ACTOR
84A7: not is_char_in_any_boat $PLAYER_ACTOR
0AB0: is_key_pressed 118
004D: goto_if_false @CR_CAR_SPEED_19
00BC: print_now 'CRSC_2' time 3000 flag 1
0001: wait 400
0002: goto @CR_CAR_SPEED_91
:CR_CAR_SPEED_91
0001: wait 0
00D6: if and
0AB0: is_key_pressed 118
00DF: is_char_in_any_car $PLAYER_ACTOR
84C8: not is_char_in_flying_vehicle $PLAYER_ACTOR
84AB: not is_char_in_any_plane $PLAYER_ACTOR
84A9: not is_char_in_any_heli $PLAYER_ACTOR
84A7: not is_char_in_any_boat $PLAYER_ACTOR
004D: goto_if_false @CR_CAR_SPEED_154
:CR_CAR_SPEED_154
00D6: if and
00DF: is_char_in_any_car $PLAYER_ACTOR
84C8: not is_char_in_flying_vehicle $PLAYER_ACTOR
84AB: not is_char_in_any_plane $PLAYER_ACTOR
84A9: not is_char_in_any_heli $PLAYER_ACTOR
84A7: not is_char_in_any_boat $PLAYER_ACTOR
004D: goto_if_false @CR_CAR_SPEED_19
03C0: store_car_char_is_in_no_save $PLAYER_ACTOR store_to $P_A_C_C_1
02E3: get_car_speed $P_A_C_C_1 store_to $P_A_C_S_1
00D6: if
$P_A_C_S_1 > 5.0
004D: goto_if_false @CR_CAR_SPEED_91
04BA: set_car_forward_speed $P_A_C_C_1 to 7.0
0002: goto @CR_CAR_SPEED_19
004D: goto_if_false @CR_CAR_SPEED_154
Вообщем скрипт работает только если нажмешь 1 раз f7, а не переключается в режимах вкл и выкл. Как сделать чтобы переключался? Смысл скрипта- мне надо чтобы с помощью скрипта включалось ограничение 15 км в час и так же отключалось
Сообщение отредактировал Narkoz74 - Понедельник, 01.09.2014, 12:25 |
|
|
|
|
| Chester_Master |
Дата: Суббота, 05.09.2015, 22:00 | Сообщение # 653
|
Бывалый
Сообщений: 339
Статус: Offline
|
Narkoz74, о боже,мои глаза,что я только что увидел 
|
|
|
|
|
| Haff |
Дата: Суббота, 05.09.2015, 22:00 | Сообщение # 654
|
Новичок
Сообщений: 18
Статус: Offline
|
{$CLEO}
0000:
:START
0001: wait 0 ms
00D6: if and
0256: player $PLAYER_CHAR defined
0AB0: key_pressed 53
004D: jump_if_false @START
0A92: create_custom_thread "fph(a).my"
0A93: end_custom_thread
Помогите сделать деактивацию 
|
|
|
|
|
| DubStep_ |
Дата: Суббота, 05.09.2015, 22:01 | Сообщение # 655
|
{ }
Сообщений: 1406
Статус: Offline
|
Haff, активация есть же, клавиша 53 (5)
|
|
|
|
|
| Haff |
Дата: Суббота, 05.09.2015, 22:01 | Сообщение # 656
|
Новичок
Сообщений: 18
Статус: Offline
|
DubStep_,когда 5 нажимаю запускает fph(a).my,при втором нажатии его не отключает
|
|
|
|
|
| CoolSnesh |
Дата: Суббота, 05.09.2015, 22:01 | Сообщение # 657
|
Новичок
Сообщений: 4
Статус: Offline
|
Код // This file was decompiled using sascm.ini published by Seemann (http://sannybuilder.com/files/SASCM.rar) on 13.10.2007
{$VERSION 3.1.0027}
{$CLEO .cs}
//-------------MAIN---------------
0000: NOP
wait 10
Model.Load(#MINIGUN)
Model.Load(#SAWNOFF)
Model.Load(#MICRO_UZI)
Model.Load(#M4)
Model.Load(#SNIPER)
Model.Load(#KATANA)
038B: load_requested_models
:NONAME_38
wait 10
if and
$ONMISSION == 0
Model.Load(#MINIGUN)
Model.Load(#SAWNOFF)
Model.Load(#MICRO_UZI)
Model.Load(#M4)
Model.Load(#SNIPER)
else_jump @NONAME_38
:NONAME_85
wait 10
if and
$ONMISSION == 0
not Actor.Driving($PLAYER_ACTOR)
0AB0: key_pressed 123
else_jump @NONAME_85
00BC: show_text_highpriority GXT 'MMILL2L' time 3000 flag 1 // ~z~Xopo¥o, šep›y ®a cžo¢e.
018C: play_sound 1058 at 0.0 0.0 0.0
01B2: give_actor $PLAYER_ACTOR weapon 38 ammo 999999 // Load the weapon model before using this
01B2: give_actor $PLAYER_ACTOR weapon 26 ammo 999999 // Load the weapon model before using this
01B2: give_actor $PLAYER_ACTOR weapon 28 ammo 999999 // Load the weapon model before using this
01B2: give_actor $PLAYER_ACTOR weapon 31 ammo 999999 // Load the weapon model before using this
01B2: give_actor $PLAYER_ACTOR weapon 34 ammo 999999 // Load the weapon model before using this
wait 100
Model.Destroy(#MINIGUN)
Model.Destroy(#SAWNOFF)
Model.Destroy(#MICRO_UZI)
Model.Destroy(#M4)
Model.Destroy(#SNIPER)
wait 2900
jump @NONAME_85
Вот код, мне нужно поменять Миниган на дигл, Обрез на обычный дроб, Узи на MP5. Я пробовал сам, но увы что-то там модельки ругаются. (Я новичок в этом, помогите кому не сложно). M4 и Снайперку не трожте.
Сообщение отредактировал CoolSnesh - Вторник, 16.09.2014, 22:19 |
|
|
|
|
| HenryTeylor |
Дата: Суббота, 05.09.2015, 22:01 | Сообщение # 658
|
Новичок
Сообщений: 21
Статус: Offline
|
Цитата CoolSnesh (  ) Вот код, мне нужно поменять Миниган на дигл, Обрез на обычный дроб, Узи на MP5. Я пробовал сам, но увы что-то там модельки ругаются. (Я новичок в этом, помогите кому не сложно). M4 и Снайперку не трожте.
Код {$CLEO .cs}
//-------------MAIN---------------
0000: NOP
wait 10
Model.Load(#DESERT_EAGLE)
Model.Load(#CHROMEGUN)
Model.Load(#MP5LNG)
Model.Load(#M4)
Model.Load(#SNIPER)
038B: load_requested_models
:NONAME_38
wait 10
if and
$ONMISSION == 0
Model.Load(#DESERT_EAGLE)
Model.Load(#CHROMEGUN)
Model.Load(#MP5LNG)
Model.Load(#M4)
Model.Load(#SNIPER)
else_jump @NONAME_38
:NONAME_85
wait 10
if and
$ONMISSION == 0
not Actor.Driving($PLAYER_ACTOR)
0AB0: key_pressed 123
else_jump @NONAME_85
00BC: show_text_highpriority GXT 'MMILL2L' time 3000 flag 1 // ~z~Xopo?o, sep›y ®a czo?e.
018C: play_sound 1058 at 0.0 0.0 0.0
01B2: give_actor $PLAYER_ACTOR weapon 24 ammo 999999 // Load the weapon model before using this
01B2: give_actor $PLAYER_ACTOR weapon 25 ammo 999999 // Load the weapon model before using this
01B2: give_actor $PLAYER_ACTOR weapon 29 ammo 999999 // Load the weapon model before using this
01B2: give_actor $PLAYER_ACTOR weapon 31 ammo 999999 // Load the weapon model before using this
01B2: give_actor $PLAYER_ACTOR weapon 34 ammo 999999 // Load the weapon model before using this
wait 100
Model.Destroy(#DESERT_EAGLE)
Model.Destroy(#CHROMEGUN)
Model.Destroy(#MP5LNG)
Model.Destroy(#M4)
Model.Destroy(#SNIPER)
wait 2900
jump @NONAME_85 |
|
|
|
|
| CoolSnesh |
Дата: Суббота, 05.09.2015, 22:01 | Сообщение # 659
|
Новичок
Сообщений: 4
Статус: Offline
|
Цитата HenryTeylor ( )
Код
{$CLEO .cs}
//-------------MAIN---------------
0000: NOP
wait 10
Model.Load(#DESERT_EAGLE)
Model.Load(#CHROMEGUN)
Model.Load(#MP5LNG)
Model.Load(#M4)
Model.Load(#SNIPER)
038B: load_requested_models
:NONAME_38
wait 10
if and
$ONMISSION == 0
Model.Load(#DESERT_EAGLE)
Model.Load(#CHROMEGUN)
Model.Load(#MP5LNG)
Model.Load(#M4)
Model.Load(#SNIPER)
else_jump @NONAME_38
:NONAME_85
wait 10
if and
$ONMISSION == 0
not Actor.Driving($PLAYER_ACTOR)
0AB0: key_pressed 123
else_jump @NONAME_85
00BC: show_text_highpriority GXT 'MMILL2L' time 3000 flag 1 // ~z~Xopo?o, sep›y ®a czo?e.
018C: play_sound 1058 at 0.0 0.0 0.0
01B2: give_actor $PLAYER_ACTOR weapon 24 ammo 999999 // Load the weapon model before using this
01B2: give_actor $PLAYER_ACTOR weapon 25 ammo 999999 // Load the weapon model before using this
01B2: give_actor $PLAYER_ACTOR weapon 29 ammo 999999 // Load the weapon model before using this
01B2: give_actor $PLAYER_ACTOR weapon 31 ammo 999999 // Load the weapon model before using this
01B2: give_actor $PLAYER_ACTOR weapon 34 ammo 999999 // Load the weapon model before using this
wait 100
Model.Destroy(#DESERT_EAGLE)
Model.Destroy(#CHROMEGUN)
Model.Destroy(#MP5LNG)
Model.Destroy(#M4)
Model.Destroy(#SNIPER)
wait 2900
jump @NONAME_85
Спасибо, вот я дурак, в Model.Load вместо DESERT_EAGLE писал просто DEAGLEДобавлено (16.09.2014, 23:33)
---------------------------------------------
А где можно узнать полный список этих моделей?
|
|
|
|
|
| HenryTeylor |
Дата: Суббота, 05.09.2015, 22:01 | Сообщение # 660
|
Новичок
Сообщений: 21
Статус: Offline
|
Цитата CoolSnesh ( ) А где можно узнать полный список этих моделей?
Справка SB
|
|
|
|
|
