[Function gmtopuk]
src.anons Gm Topuk Yarismasi Baslamistir.Katilim Ucreti [<args> Gp]
src.anons Katilmak Isteyenler Safe Alandaki Gateden Gecebilirler..!
src.anons Katilim Suresi 5 Dk'dir.!
src.newitem i_gate_topuk
src.act.p 4290,987,21
[Function topukbasla]
src.newnpc c_vortex
src.act.p 5542,1230,1
[itemdef i_gate_topuk]
id i_moongate_red
name GM Topuk Giris Gate
on=@create
color 0bb7
attr 010
timerf 201,topukbasla
timerf 200,remove
timerf 199,serv.allclients sysmessage @38,1,1 Gate silinmistir!
timerf 1,serv.allclients sysmessage @38,1,1 Topuk Gatesi birit bankaya konulmustur!
timerf 30,serv.allclients sysmessage @38,1,1 Gm topua katilmak icin 10k geremektedir!
timerf 60,serv.allclients sysmessage @38,1,1 Gm topua katilmak icin gateden geciniz!
timerf 120,serv.allclients sysmessage @38,1,1 Odul toplanan paradir!!
timerf 140,serv.allclients sysmessage @38,1,1 GAtenin kapanmasina son 60 saniye
timerf 190,serv.allclients sysmessage @38,1,1 GAtenin kapanmasina son 10 saniye
timerf 191,serv.allclients sysmessage @38,1,1 GAtenin kapanmasina son 9 saniye
timerf 192,serv.allclients sysmessage @38,1,1 GAtenin kapanmasina son 8 saniye
timerf 193,serv.allclients sysmessage @38,1,1 GAtenin kapanmasina son 7 saniye
timerf 194,serv.allclients sysmessage @38,1,1 GAtenin kapanmasina son 6 saniye
timerf 195,serv.allclients sysmessage @38,1,1 GAtenin kapanmasina son 5 saniye
timerf 196,serv.allclients sysmessage @38,1,1 GAtenin kapanmasina son 4 saniye
timerf 197,serv.allclients sysmessage @38,1,1 GAtenin kapanmasina son 3 saniye
timerf 198,serv.allclients sysmessage @38,1,1 GAtenin kapanmasina son 2 saniye
return 1
on=@click
message @07a1 [Giris Ucreti 10000 Sp ]
message @07a1 [Konulduktan 200 sn sonra kapanacaktir]
return 1
on=@dclick
src.sysmessage @07a1 Lutfen Ustunden Geciniz..!
return 1
on=@step
if <src.restest 10000 i_gold>
src.consume 10000 i_gold
src.events +e_gm_topuk
src.f_banka
src.hits <src.str>
src.stam <src.dex>
src.go 5542,1215,1
else
src.sysmessage @0481,1,1 10k gold yaninizda olmali!
return 1
on=@timer
remove 1
[events e_topuk]
on=@logout
src.stone
return 1
on=@death
src.go Britain
src.events -e_gm_topuk
src.resurrect
return 1
endif
on=@click
message @033 [ Gm Topuk ]
message @07a1 <name>
return 1
on=@attack
if (<src.act.isevent.e_topuk>)
src.sysmessage @07a1 Yarismadayken bunu yapamassiniz!
action -1
attack -1
return 1
endif
on=@itemdclick
src.sysmessage @07a1 Yarismadayken bunu yapamassiniz!
action -1
return 1
on=@itempickup_ground
src.sysmessage @07a1 Yarismadayken bunu yapamassiniz!
action -1
return 1
on=@skillstart
if (<action> == id(skill_hiding)) || (<action> == skill_hiding) || (<action> == id(skill_stealth)) || (<action> == skill_stealth)
src.sysmessage @07a1 Yarismadayken bunu yapamassiniz!
skill fail
return 1
on=@spellcast
if (<src.account.plevel> == 1)
src.sysmessage @07a1 Yarismadayken bunu yapamassiniz!
f_fizzle
return 1
[EOF]
[FUNCTION f_bankitem]
findlayer(1).cont=<findlayer.layer_pack.uid>
findlayer(2).cont=<findlayer.layer_pack.uid>
findlayer(3).cont=<findlayer.layer_pack.uid>
findlayer(4).cont=<findlayer.layer_pack.uid>
findlayer(5).cont=<findlayer.layer_pack.uid>
findlayer(6).cont=<findlayer.layer_pack.uid>
findlayer(7).cont=<findlayer.layer_pack.uid>
findlayer(8).cont=<findlayer.layer_pack.uid>
findlayer(10).cont=<findlayer.layer_pack.uid>
findlayer(12).cont=<findlayer.layer_pack.uid>
findlayer(13).cont=<findlayer.layer_pack.uid>
findlayer(14).cont=<findlayer.layer_pack.uid>
findlayer(17).cont=<findlayer.layer_pack.uid>
findlayer(18).cont=<findlayer.layer_pack.uid>
findlayer(19).cont=<findlayer.layer_pack.uid>
findlayer(20).cont=<findlayer.layer_pack.uid>
findlayer(22).cont=<findlayer.layer_pack.uid>
findlayer(23).cont=<findlayer.layer_pack.uid>
findlayer(24).cont=<findlayer.layer_pack.uid>
findlayer(layer_pack).attr 0
findlayer(layer_pack).color 0794
findlayer(layer_pack).cont <findlayer(layer_bankbox)>
findlayer(layer_pack).empty
findlayer(layer_pack).dclick
bank
update
src.sysmessage @0481 Cantandaki itemler bankaya yerlestirildi.
return 1
[itemdef i_topuk_gate]
id i_moongate_blue
name GM Topuk Katilim
type t_normal
on=@create
var0.topukda=0
color 07cc
on=@step
if (<src.restest <eval <var0.ndg>> i_gold>)
src.consume <eval <var0.ndg>> i_gold
src.go 5337,2007
src.events +e_topuker
src.sysmessage @38,6,1,1 GM topuk eventine hosgeldiniz.
src.binekolmasin
src.f_bankitem
var0.topukda += 1
else
src.sysmessage @38,6,1,1 Yaninizda <eval <var0.ndg>> altin yok.
endif
[chardef c_topuk]
name Serial - Killer
id c_cow_brown
can mt_walk|mt_run
moverate 40
armor 13
dam 200,300
on=@create
color 0bb7
npc=brain_berserk
str=1500
dex=1500
int=5234
karma -10000
[events e_topuker]
on=@SkillStart
src.sysmessage @38,6,1,1 Burada skill kullanmak yasaktir.
return 1
on=@Attack
src.sysmessage @38,6,1,1 Saldirmak yasaktir.
return 1
on=@Death
var0.topukda -= 1
sysmessage @38,6,1,1 Yarismadan elendiniz.
if (<var0.topukda>==1)
try uid.<var0.cowuid>.stone
forclients 50
if !(<uid>==<src.uid>)
events -e_topuker
serv.newitem i_gold,<var0.og>
new.cont <uid>
hits 100
go pazar
src.events -e_topuker
src.go pazar
var.topukda=0
return 1
endif
endfor
else
src.events -e_topuker
src.go pazar
src.hits=100
serv.allclients topukd Kalan kisi : <eval <var0.topukda>>
return 1
endif
[function topukd]
if <isevent.e_topuker> || <isgm>
sysmessage @38,6,1,1 <args>
endif
[itemdef i_tpk_ayar]
id i_grave_stone
name GM Topuk ayarlari
type t_normal
on=@create
color=07cc
on=@dclick
if (<src.account.plevel> >= 5)
sdialog d_tpk_ayar
return 1
else
src.sysmessage @38,6,1 Bu stoneye sadece plevel 5 ve ustu ellesebilir.
return 1
endif
[dialog d_tpk_ayar]
150,0
page 0
resizepic 10 10 5054 400 440
resizepic 290 30 2620 60 30
resizepic 290 70 2620 60 30
resizepic 290 110 2620 60 30
resizepic 290 150 2620 60 30
resizepic 290 190 2620 60 30
resizepic 290 230 2620 60 30
resizepic 290 270 2620 90 30
resizepic 290 310 2620 90 30
resizepic 290 350 2620 90 30
dtextentry 297 35 50 21 55 0 <var0.cowuid>
dtextentry 297 75 50 21 55 1 <eval <var0.og>>
dtextentry 297 115 50 21 55 2 <eval <var0.ndg>>
dtext 15 33 1152 Topuk uid :
dtext 15 73 1152 Odul (gold) :
dtext 15 113 1152 Giris icin gereken para :
dtext 15 410 1152 Oyunu boyle kaydet :
button 200 410 2074 2075 1 0 1
button 260 410 2071 2072 2 0 2
[dialog d_tpk_ayar button]
on=1
var.cowuid=<argtxt[0]>
var.ndg=<argtxt[2]>
var.og=<argtxt[1]>
src.sysmessage @38,6,1,1 Oyun boyle kaydedildi.
emreguney5 : Dayı O İlk Mesajdaki Function 'un Üstüne [Plevel] Şeklinde Belirtmediğin Zaman Playerlar Bile Başlatabilir Yarışmayı Ozmana Öyle Değilmi ? Bilmiyorum da Sorıyım Dedim, Yada Plevel Belirtmeyince Sadece Owner Kullanmıyomuydu ? Yani Sadece Ownermı Yapıcak Yarışmaları
cekoxmurto : Şöyle Bişey Yapsak;yayınlamayı kesseniz artık scriptlerimi ?
[FUNCTION f_bankitem] findlayer(1).cont=<findlayer.layer_pack.uid> findlayer(2).cont=<findlayer.layer_pack.uid> findlayer(3).cont=<findlayer.layer_pack.uid> findlayer(4).cont=<findlayer.layer_pack.uid> findlayer(5).cont=<findlayer.layer_pack.uid> findlayer(6).cont=<findlayer.layer_pack.uid> findlayer(7).cont=<findlayer.layer_pack.uid> findlayer(8).cont=<findlayer.layer_pack.uid> findlayer(10).cont=<findlayer.layer_pack.uid> findlayer(12).cont=<findlayer.layer_pack.uid> findlayer(13).cont=<findlayer.layer_pack.uid> findlayer(14).cont=<findlayer.layer_pack.uid> findlayer(17).cont=<findlayer.layer_pack.uid> findlayer(18).cont=<findlayer.layer_pack.uid> findlayer(19).cont=<findlayer.layer_pack.uid> findlayer(20).cont=<findlayer.layer_pack.uid> findlayer(22).cont=<findlayer.layer_pack.uid> findlayer(23).cont=<findlayer.layer_pack.uid> findlayer(24).cont=<findlayer.layer_pack.uid> findlayer(layer_pack).attr 0 findlayer(layer_pack).color 0794 findlayer(layer_pack).cont <findlayer(layer_bankbox)> findlayer(layer_pack).empty findlayer(layer_pack).dclick bank update src.sysmessage @0481 Cantandaki itemler bankaya yerlestirildi. return 1 [itemdef i_topuk_gate] id i_moongate_blue name GM Topuk Katilim type t_normal on=@create var0.topukda=0 color 07cc on=@step if (<src.restest <eval <var0.ndg>> i_gold>) src.consume <eval <var0.ndg>> i_gold src.go 5337,2007 src.events +e_topuker src.sysmessage @38,6,1,1 GM topuk eventine hosgeldiniz. src.binekolmasin src.f_bankitem var0.topukda += 1 else src.sysmessage @38,6,1,1 Yaninizda <eval <var0.ndg>> altin yok. endif [chardef c_topuk] name Serial - Killer id c_cow_brown can mt_walk|mt_run moverate 40 armor 13 dam 200,300 on=@create color 0bb7 npc=brain_berserk str=1500 dex=1500 int=5234 karma -10000 [events e_topuker] on=@SkillStart src.sysmessage @38,6,1,1 Burada skill kullanmak yasaktir. return 1 on=@Attack src.sysmessage @38,6,1,1 Saldirmak yasaktir. return 1 on=@Death var0.topukda -= 1 sysmessage @38,6,1,1 Yarismadan elendiniz. if (<var0.topukda>==1) try uid.<var0.cowuid>.stone forclients 50 if !(<uid>==<src.uid>) events -e_topuker serv.newitem i_gold,<var0.og> new.cont <uid> hits 100 go pazar src.events -e_topuker src.go pazar var.topukda=0 return 1 endif endfor else src.events -e_topuker src.go pazar src.hits=100 serv.allclients topukd Kalan kisi : <eval <var0.topukda>> return 1 endif [function topukd] if <isevent.e_topuker> || <isgm> sysmessage @38,6,1,1 <args> endif [itemdef i_tpk_ayar] id i_grave_stone name GM Topuk ayarlari type t_normal on=@create color=07cc on=@dclick if (<src.account.plevel> >= 5) sdialog d_tpk_ayar return 1 else src.sysmessage @38,6,1 Bu stoneye sadece plevel 5 ve ustu ellesebilir. return 1 endif [dialog d_tpk_ayar] 150,0 page 0 resizepic 10 10 5054 400 440 resizepic 290 30 2620 60 30 resizepic 290 70 2620 60 30 resizepic 290 110 2620 60 30 resizepic 290 150 2620 60 30 resizepic 290 190 2620 60 30 resizepic 290 230 2620 60 30 resizepic 290 270 2620 90 30 resizepic 290 310 2620 90 30 resizepic 290 350 2620 90 30 dtextentry 297 35 50 21 55 0 <var0.cowuid> dtextentry 297 75 50 21 55 1 <eval <var0.og>> dtextentry 297 115 50 21 55 2 <eval <var0.ndg>> dtext 15 33 1152 Topuk uid : dtext 15 73 1152 Odul (gold) : dtext 15 113 1152 Giris icin gereken para : dtext 15 410 1152 Oyunu boyle kaydet : button 200 410 2074 2075 1 0 1 button 260 410 2071 2072 2 0 2 [dialog d_tpk_ayar button] on=1 var.cowuid=<argtxt[0]> var.ndg=<argtxt[2]> var.og=<argtxt[1]> src.sysmessage @38,6,1,1 Oyun boyle kaydedildi.
[FUNCTION f_bankitem]
findlayer(1).cont=<findlayer.layer_pack.uid>
findlayer(2).cont=<findlayer.layer_pack.uid>
findlayer(3).cont=<findlayer.layer_pack.uid>
findlayer(4).cont=<findlayer.layer_pack.uid>
findlayer(5).cont=<findlayer.layer_pack.uid>
findlayer(6).cont=<findlayer.layer_pack.uid>
findlayer(7).cont=<findlayer.layer_pack.uid>
findlayer(8).cont=<findlayer.layer_pack.uid>
findlayer(10).cont=<findlayer.layer_pack.uid>
findlayer(12).cont=<findlayer.layer_pack.uid>
findlayer(13).cont=<findlayer.layer_pack.uid>
findlayer(14).cont=<findlayer.layer_pack.uid>
findlayer(17).cont=<findlayer.layer_pack.uid>
findlayer(18).cont=<findlayer.layer_pack.uid>
findlayer(19).cont=<findlayer.layer_pack.uid>
findlayer(20).cont=<findlayer.layer_pack.uid>
findlayer(22).cont=<findlayer.layer_pack.uid>
findlayer(23).cont=<findlayer.layer_pack.uid>
findlayer(24).cont=<findlayer.layer_pack.uid>
findlayer(layer_pack).attr 0
findlayer(layer_pack).color 0794
findlayer(layer_pack).cont <findlayer(layer_bankbox)>
findlayer(layer_pack).empty
findlayer(layer_pack).dclick
bank
update
src.sysmessage @0481 Cantandaki itemler bankaya yerlestirildi.
return 1
[itemdef i_topuk_gate]
id i_moongate_blue
name GM Topuk Katilim
type t_normal
on=@create
var0.topukda=0
color 07cc
on=@step
if (<src.restest <eval <var0.ndg>> i_gold>)
src.consume <eval <var0.ndg>> i_gold
src.go 5337,2007
src.events +e_topuker
src.sysmessage @38,6,1,1 GM topuk eventine hosgeldiniz.
src.binekolmasin
src.f_bankitem
var0.topukda += 1
else
src.sysmessage @38,6,1,1 Yaninizda <eval <var0.ndg>> altin yok.
endif
[chardef c_topuk]
name Serial - Killer
id c_cow_brown
can mt_walk|mt_run
moverate 40
armor 13
dam 200,300
on=@create
color 0bb7
npc=brain_berserk
str=1500
dex=1500
int=5234
karma -10000
[events e_topuker]
on=@SkillStart
src.sysmessage @38,6,1,1 Burada skill kullanmak yasaktir.
return 1
on=@Attack
src.sysmessage @38,6,1,1 Saldirmak yasaktir.
return 1
on=@Death
var0.topukda -= 1
sysmessage @38,6,1,1 Yarismadan elendiniz.
if (<var0.topukda>==1)
try uid.<var0.cowuid>.stone
forclients 50
if !(<uid>==<src.uid>)
events -e_topuker
serv.newitem i_gold,<var0.og>
new.cont <uid>
hits 100
go pazar
src.events -e_topuker
src.go pazar
var.topukda=0
return 1
endif
endfor
else
src.events -e_topuker
src.go pazar
src.hits=100
serv.allclients topukd Kalan kisi : <eval <var0.topukda>>
return 1
endif
[function topukd]
if <isevent.e_topuker> || <isgm>
sysmessage @38,6,1,1 <args>
endif
[itemdef i_tpk_ayar]
id i_grave_stone
name GM Topuk ayarlari
type t_normal
on=@create
color=07cc
on=@dclick
if (<src.account.plevel> >= 5)
sdialog d_tpk_ayar
return 1
else
src.sysmessage @38,6,1 Bu stoneye sadece plevel 5 ve ustu ellesebilir.
return 1
endif
[dialog d_tpk_ayar]
150,0
page 0
resizepic 10 10 5054 400 440
resizepic 290 30 2620 60 30
resizepic 290 70 2620 60 30
resizepic 290 110 2620 60 30
resizepic 290 150 2620 60 30
resizepic 290 190 2620 60 30
resizepic 290 230 2620 60 30
resizepic 290 270 2620 90 30
resizepic 290 310 2620 90 30
resizepic 290 350 2620 90 30
dtextentry 297 35 50 21 55 0 <var0.cowuid>
dtextentry 297 75 50 21 55 1 <eval <var0.og>>
dtextentry 297 115 50 21 55 2 <eval <var0.ndg>>
dtext 15 33 1152 Topuk uid :
dtext 15 73 1152 Odul (gold) :
dtext 15 113 1152 Giris icin gereken para :
dtext 15 410 1152 Oyunu boyle kaydet :
button 200 410 2074 2075 1 0 1
button 260 410 2071 2072 2 0 2
[dialog d_tpk_ayar button]
on=1
var.cowuid=<argtxt[0]>
var.ndg=<argtxt[2]>
var.og=<argtxt[1]>
src.sysmessage @38,6,1,1 Oyun boyle kaydedildi.
[Function odulgate]
var.odulgate=<args>
src.newitem i_odulgate
src.act.p 5532,2232,1
[Itemdef i_odulgate]
Defname i_odulgate
name Odulgate
id i_moongate_Red
on=@create
color 080a
attr 010
on=@step
src.var.odulgate
src.go britain
return 1