Anasayfa
UO Sunucular
Forumlar
Profilim
tamamen otomatik bir sistemdir. serverinizde kimsenin ellemyecegi bir yere .add i_topukyapici koydugunuzda 23 saatte bir otomatik gm topuk etkinligi yapar birinciye ödülü otomatik verir. Gereken tek şey koordinatları ayarlamanızdır.. Scriptin icinde binek bankaya atılması icin bir kod var bu alıntıdır sisteme atla girilmesin diye bu scpte eklemiştim.Fakat bu sistemde ayarlamanız gerekn birkaç başka şey daha var.
[itemdef i_topukyapici]
defname i_topukyapici
id i_crystal_ball
name Oto topukcu

on=@create
timer 79200
attr=010
color 1150

on=@timer
topukgatesikoy
TIMER = 79200

on=@click
message @045a,,1 <eval (<timer>%86400)/3600> saat <eval ((<timer>%86400)%3600)/60> dakika sonra başlatacak.
message @1150,,1 Oto topuk.
return 1

//////////////////////////---------------***************-------------/////////////////////

[function topukgatesikoy]
serv.newitem i_topukgatesi
new.p 6018,857,5

//////////////////////////---------------***************-------------/////////////////////

[itemdef i_topukgatesi]
defname i_topukgatesi
id i_moongate_black
name Topuk gatesi.

on=@create
color 0455
serv.allclients sysmessage @07b7,,1 Gm topuk kapıları safe bölgeden açılmıştır.
attr=attr_decay|attr_static
timer 120

on=@click
message @1155,,1 Kapanmasina <timer> saniye.
Message @1150,,1 Toplam Katilim : <eval <var0.playertopuk>>
message @1151,,1 Gm Topuk
return 1

on=@dclick
src.sysmessage @07b7,,1 Üzerinden geçiniz.
return 1

on=@step
src.binegibankayaat
src.go topuk alani
var0.playertopuk ++

on=@timer
if (<var0.playertopuk> >= 2)
topukvortexinikoy
remove
serv.allclients sysmessage @07b7,,1 Gm topuk katılımları bitmiştir.
else
topukiptaledermisin
src.allclients sysmessage @07b1,,1 Yetersiz katılım olduğu için etkinlik iptal edilmiştir.
remove
endif

//////////////////////////---------------***************-------------/////////////////////


[function topukiptaledermisin]
forchars 65000
if (<isevent.e_gmtopuk>)
go safe town
var0.playertopuk =0
endif
endfor

//////////////////////////---------------***************-------------/////////////////////

[function topukvortexinikoy]
serv.newnpc c_vortex
new.p 5654,1006
new.name Killer
new.color 07b1
new.stone 1
new.timerf 5,stone
new.message @07a1,,1 I want see death peoples...!
serv.allclients sysmessage @07b7,,1 Gm topuk turnuvası başladı.

//////////////////////////---------------***************-------------/////////////////////

[function topukvortexinisil]
Forchars 65000
if (<id> == c_elem_air)
remove
endif
endfor

//////////////////////////---------------***************-------------/////////////////////

[itemdef i_topukodulu]
defname i_topukodulu
name topuk
id i_crystal_ball

on=@create
color 0489

on=@click
message @07b7,,1 Gm topuk ödülünüz.
message @1150,,1 Tebrikler.
return 1

on=@dclick
if (<topobj.uid> != <src.uid>)
src.sysmessage @0845,1,1 Bunu kullanabilmeniz icin cantanizda olmalidir!
return 1
else
serv.newitem i_gold,60000
new.bounce
serv.newitem i_gold,60000
new.bounce
serv.newitem i_pet_horse_brown_dk
new.bounce
new.more c_m_must
new.name Mustang
new.color 0455
remove
endif

//////////////////////////---------------***************-------------/////////////////////

[function binegibankayaat]

if (<findlayer.25>)
tag.binekid <findlayer.25.more1>
tag.binekkarma <uid.<findlayer.25.more2>.karma>
tag.binekfame <uid.<findlayer.25.more2>.fame>
tag.binekfood <uid.<findlayer.25.more2>.food>
tag.binekcolor <uid.<findlayer.25.more2>.color>
tag.binekname <findlayer.25.name>

serv.newitem i_binek_zeka
new.tag.name <tag.binekname>
new.tag.fame <tag.binekfame>
new.tag.karma <tag.binekkarma>
new.tag.food <tag.binekfood>
new.tag.binekid <tag.binekid>
new.color <tag.binekcolor>
new.cont <findlayer(29).uid>
new.more2 1
findlayer.25.remove
else
return 1
endif

//////////////////////////---------------***************-------------/////////////////////

[itemdef i_binek_zeka]
id i_deed
type t_normal
weight 20.0
name Bineginiz

on=@click
if (<more2>
message  @07a1,,1 <tag.name>
return 1
else
message @0481,1 <name>
return 1
endif

on=@dclick
if (<more2>)
try src.newnpc <tag.binekid>
link <src.act.uid>
link.name <tag.name>
link.karma <tag.karma>
link.fame <tag.fame>
link.food <tag.food>
link.color <color>
link.memorydel <src.uid>
link.newitem i_memory
link.act.attr 04
link.act.more1 04
link.act.more2 <serv.time>
link.act.morep <link.p>
link.act.color memory_ipet
link.act.timer -1
link.act.link <src.uid>
link.act.cont <link.uid>
link.flags <link.flags>&statf_pet
link.update
link.anim 5
link.bark 3
remove
endif

//////////////////////////---------------***************-------------/////////////////////

[function topukplayerkontrol]
if (<var0.playertopuk> = 1)
timerf 1,topukbirincisisensin
return 1
endif

[function topukbirincisisensin]
forchars 65000
if (<isevent.e_gmtopuk>)
topukvortexinisil
go safe town
serv.newitem i_topukodulu,1,<uid>
var0.playertopuk 0
serv.allclients sysmessage @07b1,,1 <name> Gm topuk etkinliğini kazandı.
endif
endfor
Bu Gm topgun event kısmı bunuda eklersiniz.
[events e_gmtopuk]

On=@Itempickup_pack
src.sysmessage @07b1,,1 Burada olmaz.
return 1

On=@ItemDClick
src.sysmessage @07b1,,1 Burada kullanamazsın.
return 1


on=@spellselect
src.sysmessage @07b1,,1 Burada kullanamazsın.
action -1
return 1


on=@skillselect
src.sysmessage @07b1,,1 Burada kullanamazsın.
return 1
action -1
endif

on=@attack
src.sysmessage @07b1,,1 Burada saldıramazsın.
return 1
action -1
endif

on=@hittry
src.sysmessage @07b1,,1 Burada saldıramazsın.
return 1
action -1
endif

on=@Click
message @07b1,,1 Runner
return 1

on=@logout
go safe town
hits <str>
var0.playertopuk -=1
serv.allclients sysmessage @07b1,,1 <name> Gm topuktan elendi.Kalan yarışmacı : <eval <var0.playertopuk>>
timerf 1,topukplayerkontrol
return 1

on=@death
go safe town
hits <str>
var0.playertopuk -=1
serv.allclients sysmessage @07b1,,1 <name> Gm topuktan elendi.Kalan yarışmacı : <eval <var0.playertopuk>>
timerf 1,topukplayerkontrol
return 1
Ve son olarak bir region type olusturmalısınız.Ben genelde eventi region üzerinden veririm daha saglıklı oluyor üzerinde event kalma derdi yok
[regiontype r_events_gmtopuk]

on=@enter
if (<src.isplayer>)
if (strmatch('<src.account.plevel>','1')
serv.allclients sysmessage @045a,,1 <src.name>,<region.name> bölgesine geçti.
src.events +e_gmtopuk
src.esyalarcantaya
endif
endif

on=@exit
src.events -e_gmtopuk

UO-Dev SPONSOR

UO-Dev SPONSOR

Henüz yorum yapılmamış. Yorum yazabilmek için giriş yapmanız gerekir.

Üyelerin oylama ortalaması (10 dışında) :

7.00

Oylar: 2 den itibaren 18-06-2012 23:26