|
[Plevel 1]
Firewall
[function firewall]
serv.newitem i_fx_field_fire
new.p <src.p>
new.attr attr_decay
new.timer 5
serv.newitem 080
new.p <src.p>
new.attr attr_decay
new.timer 4
return 1+EFFECTLOCATION X, Y, Z, 2, i_fx_field_fire, 6, 15, 1+[FUNCTION SPELL99]
TARGETF SPELLAT
SRC.SYSMESSAGE @07A1,1,1 Lütfen hedefi seçin??
RETURN 1
[FUNCTION SPELLAT]
IF !(<ARGO.ISPLAYER>)
SRC.SYSMESSAGE @38,1,1 Sadece playerları hedef alabilirsiniz.
RETURN 1
ENDIF
ARGO.DUVARAT
SRC.SYSMESSAGE @07A1,1,1 <ARGO.NAME> İsimli oyuncuyu Başarılı bir şekillde duvarladınız.
[ITEMDEF I_SPELL_WALL]
ID=080
NAME=WALL
TYPE=T_SPELL
ON=@CREATE
COLOR 0455
TIMER=10
ATTR=010
ON=@TIMER
REMOVE
RETURN 1
[ITEMDEF I_SPELL_FIRE]
ID=I_FX_FIELD_FIRE
NAME=FIRE
TYPE=T_SPELL
ON=@CREATE
TIMER=10
ATTR=010
ON=@TIMER
REMOVE
RETURN 1
ON=@STEP
SRC.DAMAGE 10
RETURN 1
[FUNCTION DUVARAT]
SERV.NEWITEM I_SPELL_FIRE
NEW.P=<P>
NEW.TIMER=10
SERV.NEWITEM I_SPELL_FIRE
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE E 1
SERV.NEWITEM I_SPELL_FIRE
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE E 2
SERV.NEWITEM I_SPELL_FIRE
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE E 3
SERV.NEWITEM I_SPELL_FIRE
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE W 1
SERV.NEWITEM I_SPELL_FIRE
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE W 2
SERV.NEWITEM I_SPELL_FIRE
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE W 3
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE W 1
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE W 2
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE W 3
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE N 1
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE N 2
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE N 3
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE S 1
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE S 2
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE S 3
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE E 1
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE E 2
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE E 3TABİ BUNU KENDINE GÖRE FİXLEMEN LAZM ÖRNEK GUARD ZONEDE ATILMAMSI VEYA PAZAR ALANI GIBI YERLERDE ATILMAMSI. TELEFON İLE BAGLANIYORM ORDAN YAZDIM DENEMEDEN BUKADAR OLDU KENDİNE GÖRE SÜSLERSİN
abi süpersin aklımı okumuşsun [plevel 1]
SPELL99
[FUNCTION SPELL99]
TARGETF SPELLAT
SRC.SYSMESSAGE @07A1,1,1 Lütfen hedefi seçin??
RETURN 1
[FUNCTION SPELLAT]
IF !(<ARGO.ISPLAYER>)
SRC.SYSMESSAGE @38,1,1 Sadece playerları hedef alabilirsiniz.
RETURN 1
ENDIF
IF (<SRC.MANA> <15)
SRC.SYSMESSAGE @07A1,1,1 YETERLİ MANA SAHİP DEİLSİNİZ
RETURN 1
ENDIF
IF (<ARGO.REGION.SAFE>)
SRC.SYSMESSAGE BU BÖLGEDE BUNU ATAMAZSINIZ
RETURN 1
ENDIF
ARGO.DUVARAT
SRC.SYSMESSAGE @07A1,1,1 <ARGO.NAME> İsimli oyuncuyu Başarılı bir şekillde duvarladınız.
SRC.EMOTE In Sanct Ylem
SRC.MANA -=15
SRC.SD 1 // SPELL DELEY ITEMİNİ NASIL VERİYORSAN O SEKİL DUZELTEBİLİRSN..
[ITEMDEF I_SPELL_WALL]
ID=080
NAME=WALL
TYPE=T_SPELL
ON=@CREATE
COLOR 0455
TIMER=10
ATTR=010
ON=@TIMER
REMOVE
RETURN 1
[ITEMDEF I_SPELL_FIRE]
ID=I_FX_FIELD_FIRE
NAME=FIRE
TYPE=T_SPELL
ON=@CREATE
TIMER=10
ATTR=010
ON=@TIMER
REMOVE
RETURN 1
ON=@STEP
SRC.DAMAGE 10
RETURN 1
[FUNCTION DUVARAT]
SERV.NEWITEM I_SPELL_FIRE
NEW.P=<P>
NEW.TIMER=10
SERV.NEWITEM I_SPELL_FIRE
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE E 1
SERV.NEWITEM I_SPELL_FIRE
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE E 2
SERV.NEWITEM I_SPELL_FIRE
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE E 3
SERV.NEWITEM I_SPELL_FIRE
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE W 1
SERV.NEWITEM I_SPELL_FIRE
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE W 2
SERV.NEWITEM I_SPELL_FIRE
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE W 3
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE W 1
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE W 2
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE W 3
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE N 1
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE N 2
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE N 3
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE S 1
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE S 2
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE S 3
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE E 1
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE E 2
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE E 3
[ITEMDEF I_SPELL_WALL]
ID=080
NAME=WALL
TYPE=T_SPELL
CAST_TIME=2.0
[FUNCTION SDNEW]
IF !(<SRC.FINDID.I_DUVAR_BEKLE>)
SERV.NEWITEM I_DUVAR_BEKLE,1,<UID>,1
RETURN 1
ENDIF
[ITEMDEF I_DUVAR_BEKLE]
NAME=DUVAR BEKLEME SURESI
ID=I_GOLD
TYPE T_EQ_SCRIPT
WEIGHT 0
LAYER LAYER_SPECIAL
ON=@CREATE
ATTR ATTR_INVIS|ATTR_NEWBIE
ON=@EQUİP
TIMER=2
SRC.FLAGS=<SRC.FLAGS>|STATF_FREEZE
ON=@TIMER
CONT.FLAGS=<CONT.FLAGS>&~STATF_FREEZE
CONT.SYSMESSAGE @07a1,1,1 ARTIK BUYU ATABILIRSINIZ.
REMOVE
RETURN 1
[plevel 1]
SPELL99
[FUNCTION SPELL99]
TARGETF SPELLAT
SRC.SYSMESSAGE @07A1,1,1 Lütfen hedefi seçin??
RETURN 1
[FUNCTION SPELLAT]
IF !(<ARGO.ISPLAYER>)
SRC.SYSMESSAGE @38,1,1 Sadece playerları hedef alabilirsiniz.
RETURN 1
ENDIF
IF (<SRC.MANA> <15)
SRC.SYSMESSAGE @07A1,1,1 YETERLİ MANA SAHİP DEİLSİNİZ
RETURN 1
ENDIF
IF (<ARGO.REGION.SAFE>)
SRC.SYSMESSAGE BU BÖLGEDE BUNU ATAMAZSINIZ
RETURN 1
ENDIF
ARGO.DUVARAT
SRC.SYSMESSAGE @07A1,1,1 <ARGO.NAME> İsimli oyuncuyu Başarılı bir şekillde duvarladınız.
SRC.EMOTE In Sanct Ylem
SRC.MANA -=15
SRC.SDNEW // SPELL DELEY ITEMİNİ NASIL VERİYORSAN O SEKİL DUZELTEBİLİRSN..
[ITEMDEF I_SPELL_WALL]
ID=080
NAME=WALL
TYPE=T_SPELL
ON=@CREATE
COLOR 0455
TIMER=10
ATTR=010
ON=@TIMER
REMOVE
RETURN 1
[ITEMDEF I_SPELL_FIRE]
ID=I_FX_FIELD_FIRE
NAME=FIRE
TYPE=T_SPELL
ON=@CREATE
TIMER=10
ATTR=010
ON=@TIMER
REMOVE
RETURN 1
ON=@STEP
SRC.DAMAGE 10
RETURN 1
[FUNCTION DUVARAT]
SERV.NEWITEM I_SPELL_FIRE
NEW.P=<P>
NEW.TIMER=10
SERV.NEWITEM I_SPELL_FIRE
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE E 1
SERV.NEWITEM I_SPELL_FIRE
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE E 2
SERV.NEWITEM I_SPELL_FIRE
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE E 3
SERV.NEWITEM I_SPELL_FIRE
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE W 1
SERV.NEWITEM I_SPELL_FIRE
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE W 2
SERV.NEWITEM I_SPELL_FIRE
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE W 3
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE W 1
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE W 2
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE W 3
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE N 1
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE N 2
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE N 3
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE S 1
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE S 2
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE S 3
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE E 1
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE E 2
SERV.NEWITEM I_SPELL_WALL
NEW.P=<P>
NEW.TIMER=10
NEW.MOVE E 3
|
|
| Konu | Kategori | Son cevap | Son yazan | Mesaj | Görüntüleme | |
|---|---|---|---|---|---|---|
|
|
Spell 24,spell 28 Büyüleri
Son cevap: 15-01 18:51 · Son yazan: piedra_lara · Mesaj: 3 · Görüntü: 1956
|
Script Yardımı | 15-01 18:51 | 3 | 1956 | |
|
|
Dragonun Ortam büyüsü atması
Son cevap: 23-05 12:46 · Son yazan: Slothere · Mesaj: 11 · Görüntü: 7953
|
NPC Script Yardımı | 23-05 12:46 | 11 | 7953 | |
|
|
Ortam Büyüsü atan npc
Son cevap: 10-05 20:40 · Son yazan: paris16 · Mesaj: 3 · Görüntü: 4430
|
NPC Script Yardımı | 10-05 20:40 | 3 | 4430 | |
|
|
Teleport Büyüsü Armor İstisnası Yaratmak
Son cevap: 27-07 01:30 · Son yazan: 4s3d3 · Mesaj: 5 · Görüntü: 4980
|
Script Yardımı | 27-07 01:30 | 5 | 4980 | |
|
|
Increase Spell Damage
Son cevap: 01-11 12:04 · Son yazan: Wasabi-san · Mesaj: 7 · Görüntü: 6347
|
Script Yardımı | 01-11 12:04 | 7 | 6347 |