|
Делаем пульсатор
|
|
| Kl1m |
Дата: Среда, 26.09.2012, 20:15 | Сообщение # 1
|
ЗИ БЛУЗ БЛУЗ СИЛА!1!1
Сообщений: 51
Статус: 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--------------- thread "PULSE" 0662: NOP "PULSATOR
:PULSE_38 wait 0 if and 0AB0: key_pressed 80 0AB0: key_pressed 49 jf @PULSE_38 wait 0 018C: play_sound 1058 at 0.0 0.0 0.0 00BC: show_text_highpriority GXT 'CHEAT1' time 2000 flag 1 // Cheat activated Actor.SetImmunities($PLAYER_ACTOR, 1, 1, 1, 1, 1) jump @PULSE_123
:PULSE_123 wait 20 Actor.Health($PLAYER_ACTOR) = 100 Actor.Armour($PLAYER_ACTOR) = 0 wait 0 Actor.Health($PLAYER_ACTOR) = 90 Actor.Armour($PLAYER_ACTOR) = 10 wait 0 Actor.Health($PLAYER_ACTOR) = 80 Actor.Armour($PLAYER_ACTOR) = 10 wait 0 Actor.Health($PLAYER_ACTOR) = 70 Actor.Armour($PLAYER_ACTOR) = 10 wait 0 Actor.Health($PLAYER_ACTOR) = 60 Actor.Armour($PLAYER_ACTOR) = 10 wait 0 Actor.Health($PLAYER_ACTOR) = 50 Actor.Armour($PLAYER_ACTOR) = 10 wait 0 Actor.Health($PLAYER_ACTOR) = 40 Actor.Armour($PLAYER_ACTOR) = 10 wait 0 Actor.Health($PLAYER_ACTOR) = 30 Actor.Armour($PLAYER_ACTOR) = 10 wait 0 Actor.Health($PLAYER_ACTOR) = 20 Actor.Armour($PLAYER_ACTOR) = 10 wait 0 Actor.Health($PLAYER_ACTOR) = 10 Actor.Armour($PLAYER_ACTOR) = 10 wait 0 Actor.Health($PLAYER_ACTOR) = 1 Actor.Armour($PLAYER_ACTOR) = 10 wait 0 Actor.Health($PLAYER_ACTOR) = 10 Actor.Armour($PLAYER_ACTOR) = -10 wait 0 Actor.Health($PLAYER_ACTOR) = 20 Actor.Armour($PLAYER_ACTOR) = -10 wait 0 Actor.Health($PLAYER_ACTOR) = 30 Actor.Armour($PLAYER_ACTOR) = -10 wait 0 Actor.Health($PLAYER_ACTOR) = 40 Actor.Armour($PLAYER_ACTOR) = -10 wait 0 Actor.Health($PLAYER_ACTOR) = 50 Actor.Armour($PLAYER_ACTOR) = -10 wait 0 Actor.Health($PLAYER_ACTOR) = 60 Actor.Armour($PLAYER_ACTOR) = -10 wait 0 Actor.Health($PLAYER_ACTOR) = 70 Actor.Armour($PLAYER_ACTOR) = -10 wait 0 Actor.Health($PLAYER_ACTOR) = 80 Actor.Armour($PLAYER_ACTOR) = -10 wait 0 Actor.Health($PLAYER_ACTOR) = 90 Actor.Armour($PLAYER_ACTOR) = -10 wait 0 Actor.Health($PLAYER_ACTOR) = 100 Actor.Armour($PLAYER_ACTOR) = -10 wait 0 jump @PULSE_512
:PULSE_512 wait 0 if and 0AB0: key_pressed 80 0AB0: key_pressed 49 jf @PULSE_123 jump @PULSE_542
:PULSE_542 wait 0 if and 8AB0: not key_pressed 80 8AB0: not key_pressed 49 jf @PULSE_542 018C: play_sound 1057 at 0.0 0.0 0.0 00BC: show_text_highpriority GXT 'CHEAT8' time 2000 flag 1 // Cheat deactivated Actor.Health($PLAYER_ACTOR) = 100 Actor.SetImmunities($PLAYER_ACTOR, 0, 0, 0, 0, 0) wait 0 jump @PULSE_38
Разжуем код:
:PULSE_38 wait 0 if and 0AB0: key_pressed 80 0AB0: key_pressed 49 jf @PULSE_38 wait 0 018C: play_sound 1058 at 0.0 0.0 0.0 00BC: show_text_highpriority GXT 'CHEAT1' time 2000 flag 1 // Cheat activated Actor.SetImmunities($PLAYER_ACTOR, 1, 1, 1, 1, 1) jump @PULSE_123
0AB0: key_pressed 80 0AB0: key_pressed 49 Это мы прописали кнопки.
018C: play_sound 1058 at 0.0 0.0 0.0 Делаем музыку при активации
Actor.SetImmunities($PLAYER_ACTOR, 1, 1, 1, 1, 1) Это GM игроку
00BC: show_text_highpriority GXT 'CHEAT1' time 2000 flag 1 // Cheat activated Пишем на экране "Чит активирован"
:PULSE_123 wait 20 Actor.Health($PLAYER_ACTOR) = 100 Actor.Armour($PLAYER_ACTOR) = 0 wait 0 Actor.Health($PLAYER_ACTOR) = 90 Actor.Armour($PLAYER_ACTOR) = 10 wait 0 Actor.Health($PLAYER_ACTOR) = 80 Actor.Armour($PLAYER_ACTOR) = 10 wait 0 Actor.Health($PLAYER_ACTOR) = 70 Actor.Armour($PLAYER_ACTOR) = 10 wait 0 Actor.Health($PLAYER_ACTOR) = 60 Actor.Armour($PLAYER_ACTOR) = 10 wait 0 Actor.Health($PLAYER_ACTOR) = 50 Actor.Armour($PLAYER_ACTOR) = 10 wait 0 Actor.Health($PLAYER_ACTOR) = 40 Actor.Armour($PLAYER_ACTOR) = 10 wait 0 Actor.Health($PLAYER_ACTOR) = 30 Actor.Armour($PLAYER_ACTOR) = 10 wait 0 Actor.Health($PLAYER_ACTOR) = 20 Actor.Armour($PLAYER_ACTOR) = 10 wait 0 Actor.Health($PLAYER_ACTOR) = 10 Actor.Armour($PLAYER_ACTOR) = 10 wait 0 Actor.Health($PLAYER_ACTOR) = 1 Actor.Armour($PLAYER_ACTOR) = 10 wait 0 Actor.Health($PLAYER_ACTOR) = 10 Actor.Armour($PLAYER_ACTOR) = -10 wait 0 Actor.Health($PLAYER_ACTOR) = 20 Actor.Armour($PLAYER_ACTOR) = -10 wait 0 Actor.Health($PLAYER_ACTOR) = 30 Actor.Armour($PLAYER_ACTOR) = -10 wait 0 Actor.Health($PLAYER_ACTOR) = 40 Actor.Armour($PLAYER_ACTOR) = -10 wait 0 Actor.Health($PLAYER_ACTOR) = 50 Actor.Armour($PLAYER_ACTOR) = -10 wait 0 Actor.Health($PLAYER_ACTOR) = 60 Actor.Armour($PLAYER_ACTOR) = -10 wait 0 Actor.Health($PLAYER_ACTOR) = 70 Actor.Armour($PLAYER_ACTOR) = -10 wait 0 Actor.Health($PLAYER_ACTOR) = 80 Actor.Armour($PLAYER_ACTOR) = -10 wait 0 Actor.Health($PLAYER_ACTOR) = 90 Actor.Armour($PLAYER_ACTOR) = -10 wait 0 Actor.Health($PLAYER_ACTOR) = 100 Actor.Armour($PLAYER_ACTOR) = -10 wait 0 jump @PULSE_512
Это естественно сама функция пульсатора.
:PULSE_512 wait 0 if and 0AB0: key_pressed 80 0AB0: key_pressed 49 jf @PULSE_123 jump @PULSE_542
Пока мы не нажмём кнопки 70 и 49 пульсатор будет работать
:PULSE_542 wait 0 if and 8AB0: not key_pressed 80 8AB0: not key_pressed 49 jf @PULSE_542 018C: play_sound 1057 at 0.0 0.0 0.0 00BC: show_text_highpriority GXT 'CHEAT8' time 2000 flag 1 // Cheat deactivated Actor.Health($PLAYER_ACTOR) = 100 Actor.SetImmunities($PLAYER_ACTOR, 0, 0, 0, 0, 0) wait 0 jump @PULSE_634
Это деактивация. Собственно всё!
Не судите строго!
|
|
|
|
|
| sualex |
Дата: Среда, 26.09.2012, 20:18 | Сообщение # 2
|
Боец
Сообщений: 61
Статус: Offline
|
1.Автор урока ты? 2.Скрипт твой? Если да, то молодец
|
|
|
|
|
| Kl1m |
Дата: Среда, 26.09.2012, 20:22 | Сообщение # 3
|
ЗИ БЛУЗ БЛУЗ СИЛА!1!1
Сообщений: 51
Статус: Offline
|
Автор я Скрипт сам писал,пульсатор не сложно написать!
|
|
|
|
|
| [Cm]Killa |
Дата: Четверг, 27.09.2012, 16:09 | Сообщение # 4
|
Боец
Сообщений: 59
Статус: Offline
|
Твое говоришь? Могу сылку скинуть в Лс
читерский ник: Gavnari
Да ну все
|
|
|
|
|
| cooles |
Дата: Четверг, 27.09.2012, 16:11 | Сообщение # 5
|
|
|
О боже, зачем столько строк?
Ещё раз повторюсь для тебя - сначала учись делать клео, потом учи других.
|
|
|
|
|