|
[CLEO] Помощь по редактированию скриптов
|
|
| Кoт |
Дата: Суббота, 05.09.2015, 22:09 | Сообщение # 706
|
Сообщений: 1074
Статус: Offline
|
Цитата jGulliver (  ) 0AF8: samp add_message_to_chat "[CLEO AnitCrasher] Cleo AntiCrasher от ****. Приятной игры." color 0xFF66FFAA
цвет RGB,а не ARGB
|
|
|
|
|
| jGulliver |
Дата: Суббота, 05.09.2015, 22:09 | Сообщение # 707
|
Новичок
Сообщений: 3
Статус: Offline
|
Цитата Кoт ( ) цвет RGB,а не ARGB
Я не понял, впиши этот код что бы при заходе в игру в чате было написанно от кого этот антикрашер и т.д.
Код {$CLEO .cs}
0662: NOP "CLEO ANTICRASHER SA:MP 0.3Z"
wait 2000
0AF8: samp add_message_to_chat "[CLEO AnitCrasher] Cleo AntiCrasher от gCode. Приятной игры." color 0xFF66FFAA
0ab1: call @GetSampBase 0 retr_base_to 30@
30@ += 0x5AB2C
0A8C: write_memory 30@ size 4 value 0x90909090 virtual_protect 1
30@ += 4
0A8C: write_memory 30@ size 1 value 0x90 virtual_protect 1
// Занопили вывод варнингов в чат
30@ += 9
0A8C: write_memory 30@ size 4 value 0x90909090 virtual_protect 1
30@ += 4
0A8C: write_memory 30@ size 1 value 0x90 virtual_protect 1
// Занопили проверку на превышение количество варнингов
0A93: end_custom_thread
:GetSampBase
0AA2: 0@ = load_library "kernel32.dll"
0AA4: 1@ = get_proc_address "GetModuleHandleA" library 0@
0AA7: call_function 1@ num_params 1 pop 0 "samp.dll" 2@
0AA3: free_library 0@
0ab2: ret 1 2@
Сообщение отредактировал jGulliver - Воскресенье, 02.11.2014, 11:48 |
|
|
|
|
| CoolSnesh |
Дата: Суббота, 05.09.2015, 22:09 | Сообщение # 708
|
Новичок
Сообщений: 4
Статус: Offline
|
Цитата Sergey_Insanity ( ) Как открыть код клео,а то я не знаю может нужно что-то качать?
Sanny Builder
|
|
|
|
|
| _KaBoom_ |
Дата: Суббота, 05.09.2015, 22:10 | Сообщение # 709
|
Новичок
Сообщений: 240
Статус: Offline
|
Код {$CLEO .cs}
//-------------MAIN---------------
thread "GM"
wait 0
0@ = 304498
:G1
wait 0
if
0AB0: key_pressed 114
jf @G1
jump @G2
:G2
wait 0
00BC: show_text_highpriority GXT 'CHEAT1' time 2000 flag 1
018C: play_sound 1057 at 0.0 0.0 0.0
jump @G3
:G3
wait 200
if
8AB0: not key_pressed 114
jf @G10
jump @G4
:G4
if and
Actor.SetImmunities($PLAYER_ACTOR, 0, 0, 0, 0, 1)
wait 200
8AB0: not key_pressed 114
jf @G10
jump @G5
:G5
wait 150
if
8AB0: not key_pressed 114
jf @G10
jump @G4
:G10
wait 0
if
00BC: show_text_highpriority GXT 'CHEAT8' time 2000 flag 1
018C: play_sound 1055 at 0.0 0.0 0.0
Actor.SetImmunities($PLAYER_ACTOR, 0, 0, 0, 0, 0)
wait 300
jump @G1
В игре нажимаю F3 и GM от падения не робит, что делать?  Добавлено (03.11.2014, 11:28)
---------------------------------------------
Цитата jGulliver ( ) Я не понял, впиши этот код что бы при заходе в игру в чате было написанно от кого этот антикрашер и т.д.
У тебя в коде цвета ARGB, нужно RGB, погугли таблицу цветов RGB
Сообщение отредактировал _KaBoom_ - Понедельник, 03.11.2014, 11:25 |
|
|
|
|
| Olegman10 |
Дата: Суббота, 05.09.2015, 22:10 | Сообщение # 710
|
Мактавишка :3
Статус: Offline
|
Цитата _KaBoom_ ( ) Actor.SetImmunities($PLAYER_ACTOR, 0, 0, 0, 0, 1)
Код 02AB: set_actor 2@ immunities BP 0 FP 0 EP 1 CP 1 MP 0
Fail Proof - второе. Ты указываешь MP (я хз, че это). Попробуй изменить на:
Код Actor.SetImmunities($PLAYER_ACTOR, 0, 1, 0, 0, 1) Добавлено (03.11.2014, 19:15)
---------------------------------------------
И код оптимизируй:
Код {$CLEO .cs}
0000:
wait 2500
while true
if
0AB0: 114
then
00BC: show_text_highpriority GXT 'CHEAT1' time 2000 flag 1
018C: play_sound 1057 at 0.0 0.0 0.0
wait 10
Actor.SetImmunities($PLAYER_ACTOR, 0, 1, 0, 0, 1)
until
0AB0: 114
Actor.SetImmunities($PLAYER_ACTOR, 0, 0, 0, 0, 0)
00BC: show_text_highpriority GXT 'CHEAT8' time 2000 flag 1
018C: play_sound 1055 at 0.0 0.0 0.0
end
Russian Ice Gang - GTA Online
 
 
Cheater CM с 16.10.2014 по **.**.****
|
|
|
|
|
| aritentd_228 |
Дата: Суббота, 05.09.2015, 22:10 | Сообщение # 711
|
Боец
Сообщений: 81
Статус: Offline
|
Что не правильно? Помогите, пожалуйста.
Код {$CLEO}
@name
wait 2000
0B34: samp register_client_command "heal" to_label @heal
While True
wait 0
if 0@ == 1
then
1@ = Actor.Health($Player_Actor)
if 1@ <= 35
then
0af9: "/healme"
wait 200
0615: define_AS_pack_begin 18@
0605: actor -1 perform_animation "HANDSUP" IFP "PED" framedelta 4.0 loop 0 lockX 0 lockY 0 lockF 0 time 5
0618: assign_actor $PLAYER_ACTOR to_AS_pack 18@
061B: remove_references_to_AS_pack 18@
0af9: "/w ÷òà åòà áèëà?"
wait 2500
end
end
end
:heal
0B12: 0@ = 0@ XOR 1
if 0@ == 1
then
0af8: "GAEM-NE CHEAT" -1
end
SAMP.Cmdret()
✰✰✰ На Cheat - Master.ru 2945 дней ✰✰✰
|
|
|
|
|
| Sensation1 |
Дата: Суббота, 05.09.2015, 22:10 | Сообщение # 712
|
Новичок
Сообщений: 2
Статус: Offline
|
Код {$CLEO .cs}
{$Include includes\RakNetDefines.txt}
thread "NewDL"
wait 2700
msg "[IdHandle]: {FFFFFF}Author {FF4444}SR_team{FFFFFF}." 0x4444FF
cmd "dl" @Vkl
0006: 10@ = 30
29@ = Render.CreateFont("Tahoma", 7, 4)
:Label22
0001: wait 0 ms
068D: get_camera_position_to 14@ 15@ 16@
if and
31@ == 1
0AE2: 0@ = random_vehicle_near_point 14@ 15@ 16@ in_radius 3600.0 find_next 0 pass_wrecked 1
004D: jump_if_false @Label75
0227: 8@ = car 0@ health
0441: 21@ = car 0@ model
09B3: get_car_door_lock_status 0@ store_to 22@
00AA: store_car 0@ position_to 3@ 4@ 5@
0B55: convert_3D_coords 3@ 4@ 5@ to_screen 6@ 7@
0B2C: samp 2@ = get_vehicle_id_by_car_handle 0@
if and
06BD: no_obstacles_between 3@ 4@ 5@ and 14@ 15@ 16@ solid 0 car 0 actor 0 object 0 particle 0
02CA: car 0@ bounding_sphere_visible
00C2: sphere_onscreen 3@ 4@ 5@ radius 0.0
01AF: car 0@ sphere 0 in_sphere 14@ 15@ 16@ radius 25.0 25.0 12.5
then
0ac8: 17@ = 256
0ac8: 18@ = 256
0ac8: 19@ = 256
0ac8: 20@ = 256
format 17@ = "Id: {FFFFFF}%d" 2@
3@ = Render.FontDrawLength(29@, 17@)
3@ /= 2
0A8F: 12@ = 6@ - 3@
0A8F: 13@ = 7@ - 20
Render.DrawText(29@, 17@, 12@, 13@, 0xFF44FF44)
format 19@ = "Model: {888888}%d" 21@
3@ = Render.FontDrawLength(29@, 19@)
3@ /= 2
0A8F: 12@ = 6@ - 3@
0A8F: 13@ = 7@ - 10
Render.DrawText(29@, 19@, 12@, 13@, 0xFFFF44FF)
if 8@ >= 800
then format 18@ = "Health: {88FF88}%d" 8@
end
if and
8@ < 800
8@ >= 500
then format 18@ = "Health: {F0E68C}%d" 8@
end
if 8@ < 500
then format 18@ = "Health: {FF8888}%d" 8@
end
3@ = Render.FontDrawLength(29@, 18@)
3@ /= 2
0A8F: 12@ = 6@ - 3@
0A8E: 13@ = 7@ + 0
Render.DrawText(29@, 18@, 12@, 13@, 0xFFAAAAFF)
if 22@ == 0
then format 20@ = "Doors: {AAFFAA}open"
else format 20@ = "Doors: {FFAAAA}closed"
end
3@ = Render.FontDrawLength(29@, 20@)
3@ /= 2
0A8F: 12@ = 6@ - 3@
0A8E: 13@ = 7@ + 10
Render.DrawText(29@, 20@, 12@, 13@, 0xFF6655FF)
0ac9: 17@
0ac9: 18@
0ac9: 19@
0ac9: 20@
else
if and
06BD: no_obstacles_between 3@ 4@ 5@ and 14@ 15@ 16@ solid 1 car 0 actor 0 object 1 particle 0
02CA: car 0@ bounding_sphere_visible
00C2: sphere_onscreen 3@ 4@ 5@ radius 0.0
01AF: car 0@ sphere 0 in_sphere 14@ 15@ 16@ radius 100.0 100.0 50.0
then
0ac8: 17@ = 256
0ac8: 18@ = 256
0ac8: 19@ = 256
0ac8: 20@ = 256
format 17@ = "Id: {FFFFFF}%d" 2@
3@ = Render.FontDrawLength(29@, 17@)
3@ /= 2
0A8F: 12@ = 6@ - 3@
0A8F: 13@ = 7@ - 20
Render.DrawText(29@, 17@, 12@, 13@, 0xFF44FF44)
format 19@ = "Model: {888888}%d" 21@
3@ = Render.FontDrawLength(29@, 19@)
3@ /= 2
0A8F: 12@ = 6@ - 3@
0A8F: 13@ = 7@ - 10
Render.DrawText(29@, 19@, 12@, 13@, 0xFFFF44FF)
if 8@ >= 800
then format 18@ = "Health: {88FF88}%d" 8@
end
if and
8@ < 800
8@ >= 500
then format 18@ = "Health: {F0E68C}%d" 8@
end
if 8@ < 500
then format 18@ = "Health: {FF8888}%d" 8@
end
3@ = Render.FontDrawLength(29@, 18@)
3@ /= 2
0A8F: 12@ = 6@ - 3@
0A8E: 13@ = 7@ + 0
Render.DrawText(29@, 18@, 12@, 13@, 0xFFAAAAFF)
if 22@ == 0
then format 20@ = "Doors: {AAFFAA}open"
else format 20@ = "Doors: {FFAAAA}closed"
end
3@ = Render.FontDrawLength(29@, 20@)
3@ /= 2
0A8F: 12@ = 6@ - 3@
0A8E: 13@ = 7@ + 10
Render.DrawText(29@, 20@, 12@, 13@, 0xFF6655FF)
0ac9: 17@
0ac9: 18@
0ac9: 19@
0ac9: 20@
end
end
:Label75
068D: get_camera_position_to 14@ 15@ 16@
if and
31@ == 1
0AE2: 0@ = random_vehicle_near_point 14@ 15@ 16@ in_radius 3600.0 find_next 1 pass_wrecked 1
004D: jump_if_false @Label22
0227: 8@ = car 0@ health
0441: 21@ = car 0@ model
09B3: get_car_door_lock_status 0@ store_to 22@
00AA: store_car 0@ position_to 3@ 4@ 5@
0B55: convert_3D_coords 3@ 4@ 5@ to_screen 6@ 7@
0B2C: samp 2@ = get_vehicle_id_by_car_handle 0@
if and
06BD: no_obstacles_between 3@ 4@ 5@ and 14@ 15@ 16@ solid 0 car 0 actor 0 object 0 particle 0
02CA: car 0@ bounding_sphere_visible
00C2: sphere_onscreen 3@ 4@ 5@ radius 0.0
01AF: car 0@ sphere 0 in_sphere 14@ 15@ 16@ radius 25.0 25.0 12.5
then
0ac8: 17@ = 256
0ac8: 18@ = 256
0ac8: 19@ = 256
0ac8: 20@ = 256
format 17@ = "Id: {FFFFFF}%d" 2@
3@ = Render.FontDrawLength(29@, 17@)
3@ /= 2
0A8F: 12@ = 6@ - 3@
0A8F: 13@ = 7@ - 20
Render.DrawText(29@, 17@, 12@, 13@, 0xFF44FF44)
format 19@ = "Model: {888888}%d" 21@
3@ = Render.FontDrawLength(29@, 19@)
3@ /= 2
0A8F: 12@ = 6@ - 3@
0A8F: 13@ = 7@ - 10
Render.DrawText(29@, 19@, 12@, 13@, 0xFFFF44FF)
if 8@ >= 800
then format 18@ = "Health: {88FF88}%d" 8@
end
if and
8@ < 800
8@ >= 500
then format 18@ = "Health: {F0E68C}%d" 8@
end
if 8@ < 500
then format 18@ = "Health: {FF8888}%d" 8@
end
3@ = Render.FontDrawLength(29@, 18@)
3@ /= 2
0A8F: 12@ = 6@ - 3@
0A8E: 13@ = 7@ + 0
Render.DrawText(29@, 18@, 12@, 13@, 0xFFAAAAFF)
if 22@ == 0
then format 20@ = "Doors: {AAFFAA}open"
else format 20@ = "Doors: {FFAAAA}closed"
end
3@ = Render.FontDrawLength(29@, 20@)
3@ /= 2
0A8F: 12@ = 6@ - 3@
0A8E: 13@ = 7@ + 10
Render.DrawText(29@, 20@, 12@, 13@, 0xFF6655FF)
0ac9: 17@
0ac9: 18@
0ac9: 19@
0ac9: 20@
else
if and
06BD: no_obstacles_between 3@ 4@ 5@ and 14@ 15@ 16@ solid 1 car 0 actor 0 object 1 particle 0
02CA: car 0@ bounding_sphere_visible
00C2: sphere_onscreen 3@ 4@ 5@ radius 0.0
01AF: car 0@ sphere 0 in_sphere 14@ 15@ 16@ radius 100.0 100.0 50.0
then
0ac8: 17@ = 256
0ac8: 18@ = 256
0ac8: 19@ = 256
0ac8: 20@ = 256
format 17@ = "Id: {FFFFFF}%d" 2@
3@ = Render.FontDrawLength(29@, 17@)
3@ /= 2
0A8F: 12@ = 6@ - 3@
0A8F: 13@ = 7@ - 20
Render.DrawText(29@, 17@, 12@, 13@, 0xFF44FF44)
format 19@ = "Model: {888888}%d" 21@
3@ = Render.FontDrawLength(29@, 19@)
3@ /= 2
0A8F: 12@ = 6@ - 3@
0A8F: 13@ = 7@ - 10
Render.DrawText(29@, 19@, 12@, 13@, 0xFFFF44FF)
if 8@ >= 800
then format 18@ = "Health: {88FF88}%d" 8@
end
if and
8@ < 800
8@ >= 500
then format 18@ = "Health: {F0E68C}%d" 8@
end
if 8@ < 500
then format 18@ = "Health: {FF8888}%d" 8@
end
3@ = Render.FontDrawLength(29@, 18@)
3@ /= 2
0A8F: 12@ = 6@ - 3@
0A8E: 13@ = 7@ + 0
Render.DrawText(29@, 18@, 12@, 13@, 0xFFAAAAFF)
if 22@ == 0
then format 20@ = "Doors: {AAFFAA}open"
else format 20@ = "Doors: {FFAAAA}closed"
end
3@ = Render.FontDrawLength(29@, 20@)
3@ /= 2
0A8F: 12@ = 6@ - 3@
0A8E: 13@ = 7@ + 10
Render.DrawText(29@, 20@, 12@, 13@, 0xFF6655FF)
0ac9: 17@
0ac9: 18@
0ac9: 19@
0ac9: 20@
end
end
0002: jump @Label75
:Vkl
0b12: 31@ = 31@ XOR 1
if 31@ == 1
then
msg "[IdHandle]: {44FF44}Enable" 0x4444FF
0DBA: 11@ = new_cleo_thread from_label @Label11
else
msg "[IdHandle]: {FF4444}Disable" 0x4444FF
0DBD: exit_thread 11@
end
cmdret
:Label11
0001: wait 0
0006: 9@ = 0
0006: 32@ = 0
:Label29
0001: wait 0
000A: 9@ += 1
03F0: enable_text_draw 1
0349: set_text_draw_font 1
033F: set_text_draw_letter_size 0.25 1.05
0340: set_text_draw_RGBA 96 255 96 255
045A: draw_text_1number 0.75 1.0 GXT 'NUMBER' number 10@ // ~1~
00D6: if
0019: 32@ > 999
004D: jump_if_false @Label29
03F0: enable_text_draw 1
0349: set_text_draw_font 1
033F: set_text_draw_letter_size 0.25 1.05
0340: set_text_draw_RGBA 96 255 96 255
045A: draw_text_1number 0.75 1.0 GXT 'NUMBER' number 9@ // ~1~
0085: 10@ = 9@ // (int)
0002: jump @Label11
Хочу убрать показ открытых/закрытых дверей. Комментирую следующие строки:
//if 22@ == 0
//then format 20@ = "Doors: {AAFFAA}open"
//else format 20@ = "Doors: {FFAAAA}closed"
//end
Четвертая строка которая отвечает за двери начинает перебирать все надписи подряд. Чего не так делаю? Как вообще убрать показ каждой строки?
|
|
|
|
|
| CM[Mactawish] |
Дата: Суббота, 05.09.2015, 22:10 | Сообщение # 713
|
Новичок
Сообщений: 12
Статус: Offline
|
Цитата Sensation1 ( ) Хочу убрать показ открытых/закрытых дверей.
Убрать надписи, или что?Добавлено (05.11.2014, 15:52)
---------------------------------------------
Если убрать, то:
Код 09B3: get_car_door_lock_status 0@ store_to 22@
Код if 22@ == 0
then format 20@ = "Doors: {AAFFAA}open"
else format 20@ = "Doors: {FFAAAA}closed"
end
Это убирай и все строки с переменной 20@
Прошу хоть сейчас мой аккаунт не банить...
(c) Olegman10
Сообщение отредактировал CM[Mactawish] - Среда, 05.11.2014, 15:48 |
|
|
|
|
| Sensation1 |
Дата: Суббота, 05.09.2015, 22:10 | Сообщение # 714
|
Новичок
Сообщений: 2
Статус: Offline
|
Цитата CM[Mactawish ;2427505]Убрать надписи, или что?
Данный скрипт организовывает показ ID, Model, HP и doors status каждого т/с. Но мне не нужен показ Model и doors status, их и хочу убрать.
\\
Разобрался, спасибо. Ещё вопрос - как тексту выводимому различные свойства придать(жирность, курсив)?
\\
Google. 0x4 - дополнительное св-во (У нас это обводка). Какие ещё есть или же существует таблица со свойствами и их кодами?
Сообщение отредактировал Sensation1 - Среда, 05.11.2014, 17:04 |
|
|
|
|
| AGOGE |
Дата: Суббота, 05.09.2015, 22:11 | Сообщение # 715
|
Новичок
Сообщений: 7
Статус: Offline
|
{$CLEO}
0000
wait 2000
3@ = 0
32@ = 0
while 3@ == 0
wait 0
1@ = 180000 3 минуты
0062 1@ -= 32@ (int)
1@ = 1000
0085 0@ = 1@ (int)
0@ = 60
0085 2@ = 0@ (int)
2@ = 60
0062 1@ -= 2@ (int)
03F0 enable_text_draw 1
0340 set_text_draw_RGBA 168 142 51 255
033F set_text_draw_letter_size 1.0 2.0
0342 enable_text_draw_centered 1
0343 set_text_draw_linewidth 640.0
0349 set_text_draw_font 3
if
0019 1@ 9
then
045B draw_text_2numbers 320.0 390.0 GXT 'TIME' numbers 0@ 1@ ~1~~1~
else
045B draw_text_2numbers 320.0 390.0 GXT 'TIME_0' numbers 0@ 1@ ~1~~1~
end
if and
0@ == 0
1@ == 0
then
3@ = 1
end
end
0A93 end_custom_thread
Это должен был быть нарко таймер,когда юзнул нарко появляется таймер и идёт обратный отчет 2:00 - 1:59 - 58 и тд..но когда его ставлю сразу крашит объясните что делать или попробуйте редактнуть и тем самым помочь мне) буду благодарен
adasdasdasd
|
|
|
|
|
| ЛОНДЕР |
Дата: Суббота, 05.09.2015, 22:11 | Сообщение # 716
|
Новичок
Сообщений: 2
Статус: Offline
|
Ребят, помогайте) Для рядового создателя клео скриптов и миссий думаю будет легкой задачей.
Помогите сделать так, чтобы скрипт который ниже, работал лишь на BMX и MTBIKE(481 и 510 иды), а не на всем транспорте подряд. Заранее благодарю!
Код 0000: NOP
:NONAME_2
wait 10
0AB4: 1@ = var 6
if and
not 1@ == 1
0AB0: key_pressed 18
Actor.Driving($PLAYER_ACTOR)
else_jump @NONAME_2
0@ = Actor.CurrentCar($PLAYER_ACTOR)
07D5: set_car 0@ velocity_in_direction_XYZ 0.0 0.0 0.2 rotation_velocitiesXY 0.0 0.0 unk 0.0
wait 666
jump @NONAME_2
|
|
|
|
|
| Кoт |
Дата: Суббота, 05.09.2015, 22:11 | Сообщение # 717
|
Сообщений: 1074
Статус: Offline
|
00DD: actor $PLAYER_ACTOR driving_car_with_model #AMBULAN
или
0137: car 0@ model == #REMINGTN
|
|
|
|
|
| ЛОНДЕР |
Дата: Суббота, 05.09.2015, 22:11 | Сообщение # 718
|
Новичок
Сообщений: 2
Статус: Offline
|
Слушай, я то не разбираюсь совсем, куда это и как совать, могу только подставлять что-то)
Будь добр, скинь мой измененный код с 2 любыми машинами, а я там уже на велики поменяю)
Спасибо тебе огромное!Добавлено (07.11.2014, 22:17)
---------------------------------------------
О, все) Я методом тыка уже все сделал по первому способу. Все работает.
|
|
|
|
|
| Sony |
Дата: Суббота, 05.09.2015, 22:11 | Сообщение # 719
|
Любитель
Сообщений: 43
Статус: Offline
|
Как склеить 2 cleo рандом гм и простой гм но чтоб работал рандомно простой гм 
Random ( // This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}
//-------------MAIN---------------
wait 0
:NONAME_4
wait 0
if
not Actor.Stopped($PLAYER_ACTOR)
else_jump @NONAME_4
Actor.SetImmunities($PLAYER_ACTOR, 0, 0, 0, 0, 0)
wait 1000
Actor.SetImmunities($PLAYER_ACTOR, 1, 0, 0, 0, 0)
wait 1500
Actor.SetImmunities($PLAYER_ACTOR, 0, 0, 0, 0, 0)
wait 1000
Actor.SetImmunities($PLAYER_ACTOR, 1, 0, 0, 0, 0)
wait 500
jump @NONAME_4
)
Простой {$CLEO .cs}
0662: "GM SKIN by xXxenusSs and bublik"
repeat
wait 400
until 0AFA: is_samp_structures_available
0AF8: samp add_message_to_chat "[GM]: {EAEAEA}Чтобы активировать нажмите клавишу F3" 0xFF0000
0AF8: samp add_message_to_chat "[GM]: {EAEAEA}Автор xXxenusSs | Исправил байду bublik xD" 0xFF0000
repeat
wait 0
while true
wait 0
if 0AB0: 20
then
if 13@ == 0
then
13@ = 1
0B2D: write_samp_memory offset 0x8880 value 0xC20400 size 3
02AB: set_actor $PLAYER_ACTOR immunities BP 1 FP 0 EP 0 CP 0 MP 0
else
13@ = 0
0B2D: write_samp_memory offset 0x8880 value 0x6AFF68 size 3
02AB: set_actor $PLAYER_ACTOR immunities BP 0 FP 0 EP 0 CP 0 MP 0
end
repeat
wait 0
until 8AB0: not 20
end
end
)
А проще скажите как этот гм сделать рандомным {$CLEO .cs}
0662: "GM SKIN by xXxenusSs and bublik"
repeat
wait 400
until 0AFA: is_samp_structures_available
0AF8: samp add_message_to_chat "[GM]: {EAEAEA}Чтобы активировать нажмите клавишу F3" 0xFF0000
0AF8: samp add_message_to_chat "[GM]: {EAEAEA}Автор xXxenusSs | Исправил байду bublik xD" 0xFF0000
repeat
wait 0
while true
wait 0
if 0AB0: 20
then
if 13@ == 0
then
13@ = 1
0B2D: write_samp_memory offset 0x8880 value 0xC20400 size 3
02AB: set_actor $PLAYER_ACTOR immunities BP 1 FP 0 EP 0 CP 0 MP 0
else
13@ = 0
0B2D: write_samp_memory offset 0x8880 value 0x6AFF68 size 3
02AB: set_actor $PLAYER_ACTOR immunities BP 0 FP 0 EP 0 CP 0 MP 0
end
repeat
wait 0
until 8AB0: not 20
end
end
Начинающий продавец.
Сообщение отредактировал Sony - Суббота, 15.11.2014, 16:55 |
|
|
|
|
| [CM]Nikich |
Дата: Суббота, 05.09.2015, 22:11 | Сообщение # 720
|
Бывалый
Сообщений: 333
Статус: Offline
|
Sony, Чуть позже, когда приду, могу скинуть готовый в ЛС. Нужен?
|
|
|
|
|
