[PLEVEL 5]
expyap
[function Expyap]
var0.Explosion_count 0
newitem i_Explosion_gate
new.p <def.yarismagate>
new.morez <args>
serv.allclients sysmessage @0785,1,1 Yarışma Duyuru :
serv.allclients sysmessage @07a1,1,1 Explosion gate'i Safe Alan'da açılmıştır.
if !(0<args>)
serv.allclients sysmessage @07a1,1,1 Gate 5 dakika sonra kapanacaktır..
serv.allclients sysmessage @07a1,1,1 Yarışma 5 dakika sonra veya 20 kişi girince otomatik olarak başlayacaktır..
serv.allclients sysmessage @0785,1,1 Mod : [ Otomatik ]
serv.allclients sound 0100
serv.allclients sound 0102
serv.allclients sound 0103
return 1
[itemdef i_Explosion_gate]
id i_moongate_blue
name Explosion yarismasi
on=@create
Timer 300
var.otoExplosiongeytid <uid>
color 0815
attr attr_static
for x 1 50
tag.girenuid<dlocal.x>
endfor
on=@click
if (<timer> > 59)
message @07e5,1,1 <eval <timer>/60> Dakika sonra kapanacak
else
message @07e5,1,1 <timer> Saniye sonra kapanacak
endif
message @07a1,1,1 Explosion Yarışması
return 1
on=@dclick
if !(<src.npc> == 0)
return 1
endif
if (<src.findtype.t_eq_trade_window>)
src.smsx trade menüsü açıken yarışmaya giremesiniz..
return 1
endif
Explosionyarismasi
on=@step
src.sysmessage @07a1,1,1 Gate'ye 2 kere tıkla <name>.
return 1
endif
on=@timer
serv.allclients sysmessage @07a1,1,1 Explosion yarışması 10 saniye sonra başlıyor
serv.allclients sound 256
try uid.<var.Explosionstoneacicistoneuid>.timer 10
remove
return 1
[function Explosionyarismasi]
if (<src.isgm>)
src.go 5284,1118 /// buraya gmlerin gidicegi yeri yaz
return 1
endif
if (<distance> > 2)
src.sysmessage @07a1,1,1 Gate'e ulaşamıyorsunuz.
return 1
endif
if !(0<tag.girenuid20> == 0)
src.sysmessage @07a1,1,1 Yarışmaya maximum kişi olan 20 kişi zaten girmiş..
timer 1
return 1
endif
src.resurrect
var0.Explosion_count ++
src.dialogclose d_helpstuck
DIALOGclose d_helpmurat
src.binekolmasin
//src.blesslerisil
//src.memorylerisil
src.bankayolla
src.hits <src.str>
src.stam <src.dex>
src.inlor
src.events e_Explosionyap
src.sysmessage @07a1,1,1 Çantanız bankanıza atıldı.
serv.newITEM i_robe
new.color=0868
src.new.equip
new.attr=00010
serv.newITEM i_boots_calf
new.color=0455
src.new.equip
new.attr=00010
serv.newITEM i_bandana
new.color=0455
src.new.equip
new.attr=00010
serv.newITEM i_potion_Explosion,40
src.new.equip
dorand 8
src.go 5454,1187
src.go 5450,1179
src.go 5450,1173
src.go 5460,1171
src.go 5466,1172
src.go 5466,1181
src.go 5466,1188
src.go 5458,1188
enddo
src.flags <src.flags>|statf_freeze
for x 1 50
if (<tag.girenuid<eval <local.x>>> == 0)
serv.allclients sysmessage @0785,1,1 <dlocal.x>. Kişi Explosion yarışmasına girdi..
serv.allclients sysmessage @07a1,1,1 Explosion yarışmasının girişin kapanması ve yarışmanın başlaması için son <eval <timer>/60> dakika veya <eval 20-<local.x>> kişi.
tag.girenuid<eval <local.x>> <src.uid>
return 1
endif
endfor
[events e_Explosionyap]
on=@attack
sysmessage @07a1,1,1 Burada dalmak yasak.
return 1
on=@skillstart
src.sysmessage @07a1,1,1 Yarışmada Skill Kullanamasınız <name>.
return 1
on=@itemdclick
if (<act.type> == t_figurine) || (<act.baseid> == i_deed_animal) || (<act.baseid> == i_runebook2) || (<act.baseid> == i_deed_animal) || (<act.baseid> == i_runebook2)
src.sysmessage @07a1,1,1 Bu bölgede kullanılmaz.
return 1
endif
on=@spellcast
src.skill fail
return 1
on=@mount
src.smsx bineğe binemesin çakall..
horsesil
on=@click
message @0850,,1 [ Explosion ]
message @07a1,1,1 <name>
return 1
on=@hit
if (<src.npc> == 0)
sysmessage @07a1,1,1 Burada dalmak yasak.
return 1
endif
on=@DEATH
if <dvar.Explosion_count> == 2
events -e_Explosionyap
Explosionodulumuverlanamk
Explosionsilicilanbenamk
src.go safealan
src.hits <src.str>
src.UPDATE
src.findid.i_robe.remove
src.findid.i_boots_calf.remove
src.findid.i_bandana.remove
RETURN 1
endif
var0.Explosion_count --
serv.allclients sysmessage @0785,1,1 Explosion kalan kişi :<eval <var0.Explosion_count>>
src.events -e_Explosionyap
src.go safealan
Explosionsilicilanbenamk
src.hits <src.str>
src.UPDATE
RETURN 1
on=@login
var0.Explosion_count --
src.go safealan
src.events -e_Explosionyap
flags <flags>&~statf_freeze
Explosionsilicilanbenamk
on=@logout
var0.Explosion_count --
src.events -e_Explosionyap
flags <flags>&~statf_freeze
src.go safealan
Explosionsilicilanbenamk
[itemdef i_Explosion_stone_acici]
id i_paver_stone
name stone atici
on=@create
var.Explosionstoneacicistoneuid <uid>
color 1957
attr attr_invis
tag.vipitem 1
on=@timer
region.allclients yarismagenelflagsil_
region.allclients sysmessage @07a1,1,1 Yarışma Başladı.
return 1
on=@pickup_ground
return 1
[function Explosionodulumuverlanamk]
forchars 64000
if (<isevent.e_Explosionyap>)
src.newitem i_deed_animal
src.new.tag.trade Frendized Ostard
src.new.tag.trade_id c_ostard_zostrich
src.new.tag.trade_name Frenzied Ostard
src.new.tag.trade_str 170
src.new.tag.trade_dex 300
src.new.tag.trade_int 50
src.new.tag.trade_karma 3000
src.new.tag.trade_fame 0
src.new.tag.trade_food 15000
src.new.name Filled pet trading contract
src.new.attr 00
src.new.more2 1
dorand 7
src.new.color 0455
src.new.color 00
src.new.color 07d1
src.new.color 080a
src.new.color 04c2
src.new.color 0796
src.new.color 0794
enddo
serv.newitem i_deed_exp
bounce <new>
serv.newitem i_deed_exp
bounce <new>
serv.newitem i_deed_exp
bounce <new>
serv.newitem i_check6
bounce <new>
serv.allclients sysmessage @0785,1,1 <serv.name> Yarışma:
serv.allclients sysmessage @07a1,1,1 Explosion yarışması <name> kazanmıştır, kendisini tebrik ediyoruz..
serv.allclients sound 0100
serv.allclients sound 0102
serv.allclients sound 0103
go safealan
hits <str>
events -e_Explosionyap
Explosionsilicilanbenamk
endif
endfor
[function Explosionsilicilanbenamk]
findid.i_robe.remove
findid.i_boots_calf.remove
findid.i_bandana.remove
findid.i_potion_explosion.remove
findid.i_bag.remove
[eof]