[function katil]
if (<tag.birvs> == 0) || (<tag.secvar> == 0) || (<tag.ikivs> == 0) || (<tag.topukvar> == 0) || (<tag.engelvar> == 0) || (<tag.zarvar> == 0) || (<isevent.e_yarismada>) || (<tag.questvar> == 0)
src.sdialog d_katil
else
src.sysmessage @38,,1 Su anda bir yarisma yok veya Hala yarismadasiniz.
return 1
endif
[events e_yarismada]
on=@death
src.go pazar
src.sysmessage @38,,1 Yenildiniz.
src.resurrect
on=@logout
src.go pazar
src.sysmessage @38,,1 Oyundan Ciktiniz Yarismadan elendiniz.
on=@click
if (<account.plevel> == 1)
message @07a1,1 [Yarismada]
endif
[DIALOG d_katil]
0,0
PAGE 0
resizepic 0 6 3000 150 200
text 36 28 100 0
text 36 51 100 1
text 36 74 120 2
text 36 99 130 3
text 36 123 140 4
text 36 165 160 6
text 36 140 160 7
button 13 32 2117 2118 1 0 1
button 13 55 2117 2118 1 0 2
button 13 79 2117 2118 1 0 3
button 13 101 2117 2118 1 0 4
button 13 126 2117 2118 1 0 5
button 13 148 2117 2118 1 0 6
button 13 168 2117 2118 1 0 7
[DIALOG d_katil TEXT]
1vs1
2vs2
Topuk
Engelli Kosu
Zar
Sec Bakalim
Sec Bakalim
Quest
[DIALOG d_katil BUTTON]
on=1
if (<tag.birvs> == 1)
src.go 5314,1069
src.stone 1
src.events +e_yarismada
else
src.sysmessage @38,,1 Su anda bir yarisma yok veya Hala yarismadasiniz.
return 1
endif
on=2
if (<tag.ikivs> == 1)
src.go 5350,1069
src.stone 1
src.events +e_yarismada
else
src.sysmessage @38,,1 Su anda bir yarisma yok veya Hala yarismadasiniz.
return 1
endif
on=3
if (<tag.topukvar> == 1)
src.go 5331,2008
src.stone 1
src.events +e_yarismada
else
src.sysmessage @38,,1 Su anda bir yarisma yok veya Hala yarismadasiniz.
return 1
endif
on=4
if (<tag.engelvar> == 1)
src.go 5315,2233
src.events +e_yarismada
else
src.sysmessage @38,,1 Su anda bir yarisma yok veya Hala yarismadasiniz.
return 1
endif
on=5
if (<tag.zarvar> == 1)
src.go 5220,2097
src.stone 1
src.events +e_yarismada
else
src.sysmessage @38,,1 Su anda bir yarisma yok veya Hala yarismadasiniz.
return 1
endif
[plevel 1]
etkinlik
[function etkinlik]
if (<src.account.plevel> > 2)
src.sdialog d_gm_yarisma
src.smy Staff Etkinlik Menusu
return 1
endif
if (<src.account.plevel> == 1)
src.katil
return 1
endif
[DIALOG d_gm_yarisma]
300,100
PAGE 0
resizepic 0 6 3500 200 250
text 36 28 0 0
text 36 51 0 1
text 36 74 0 2
text 36 99 0 3
text 36 123 0 4
text 36 145 0 5
text 36 220 0 6
text 36 170 0 7
button 13 32 2117 2118 1 0 1
button 13 55 2117 2118 1 0 2
button 13 79 2117 2118 1 0 3
button 13 101 2117 2118 1 0 4
button 13 126 2117 2118 1 0 5
button 13 148 2117 2118 1 0 6
button 13 170 2117 2118 1 0 7
button 13 220 2117 2118 1 0 8
[DIALOG d_gm_yarisma TEXT]
1vs1
2vs
Topuk
Engelli Kosu
Zar
Sec Bakalim
Bitir
Quest
[DIALOG d_gm_yarisma BUTTON]
on=1
src.birvs
on=2
src.ikivs
on=3
src.topukvar
serv.newnpc c_vortex
new.p 5331,2008
new.name Cabbar
new.color 09d2
new.dex 6000
serv.allclients sysmessage @0785,,1 Gm Topuk Yarismasi Vortexin Cikmasi Ile Baslamistir.
on=4
src.engelvar
on=5
src.zarvar
on=6
src.secvar
on=7
src.questvar
on=8
src.bitir
[FUNCTION bitir]
src.smy Nova World Uzerindeki Butun Yarismada Bitmistir.
serv.allclients tag.birvs 0
serv.allclients tag.ikivs 0
serv.allclients tag.topukvar 0
serv.allclients tag.engelvar 0
serv.allclients events -e_yarismada
serv.allclients tag.zarvar 0
serv.allclients tag.questvar 0
serv.allclients tag.secvar 0
endif
return 1
[FUNCTION birvs]
serv.allclients sound 0fe
serv.allclients tag.birvs 1
serv.allclients sysmessage @044,,1 1vs1 Pvp Turnuvasi Vardir.
serv.allclients sysmessage @38,,1 Katilmak icin .Katil Yaziniz.
return 1
[FUNCTION ikivs]
serv.allclients sound 0fe
serv.allclients tag.ikivs 1
serv.allclients sysmessage @044,,1 2vs2 Pvp Turnuvasi Vardir.
serv.allclients sysmessage @025,,1 Katilmak icin .Katil Yaziniz.
return 1
[FUNCTION topukvar]
serv.allclients sound 0fe
serv.allclients tag.topukvar 1
serv.allclients sysmessage @044,,1 Gm Topuk Yarismasi Vardir.
serv.allclients sysmessage @38,,1 Katilmak icin .Katil Yaziniz.
return 1
[FUNCTION engelvar]
serv.allclients sound 0fe
serv.allclients tag.engelvar 1
serv.allclients sysmessage @044,,1 Engelli Kosu Vardir.
serv.allclients sysmessage @38,,1 Katilmak icin .Katil Yaziniz.
return 1
[FUNCTION zarvar]
serv.allclients sound 0fe
serv.allclients tag.zarvar 1
serv.allclients sysmessage @044,,1 Altin Zar Yarismasi vardir.
serv.allclients sysmessage @38,,1 Katilmak icin .Katil Yaziniz.
return 1
[FUNCTION secvar]
serv.allclients sound 0fe
serv.allclients tag.secvar 1
serv.allclients sysmessage @044,,1 Sec bakalim yarismasi vardir.
serv.allclients sysmessage @38,,1 Katilmak icin .Katil Yaziniz.
return 1
[FUNCTION questvar]
serv.allclients sound 0fe
serv.allclients tag.questvar 1
serv.allclients sysmessage @044,,1 Quest Baslamistir.
serv.allclients sysmessage @38,,1 Katilmak icin .Katil Yaziniz.
return 1
[FUNCTION topukvar]
serv.allclients sound 0fe
serv.allclients tag.topukvar 1
serv.allclients sysmessage @044,,1 Gm Topuk Yarismasi Vardir.
serv.allclients sysmessage @38,,1 Katilmak icin .Katil Yaziniz.
return 1
[FUNCTION bitir]
src.smy Nova World Uzerindeki Butun Yarismada Bitmistir.
serv.allclients tag.birvs 0
serv.allclients tag.ikivs 0
serv.allclients tag.topukvar 0
serv.allclients tag.engelvar 0
serv.allclients events -e_yarismada // burda 15 katana verio galiba ?
serv.allclients tag.zarvar 0
serv.allclients tag.questvar 0
serv.allclients tag.secvar 0
endif
return 1
[events e_yarismada] // Event
on=@death // Oyuncu Öldüğünde
src.go pazar // Pazar Alanina Atiyor..
src.sysmessage @38,,1 Yenildiniz. // Mesaj veriyor..
src.resurrect // Hayata döndürüyor..
on=@logout // Oyundan çıktığında
src.go pazar // Pazar Alanina Atiyor..
src.sysmessage @38,,1 Oyundan Ciktiniz Yarismadan elendiniz. // Mesaj veriyor..
on=@click // Events'e sahip olan oyuncuya tiklandiginda ;
if (<account.plevel> == 1) // Oyuncu ise ;
message @07a1,1 [Yarismada] // Mesaj veriyor..
endif// Bitiriyor..
[FUNCTION bitir]
src.smy Nova World Uzerindeki Butun Yarismada Bitmistir.
serv.allclients tag.birvs 0
serv.allclients tag.ikivs 0
serv.allclients tag.topukvar 0
serv.allclients tag.engelvar 0
serv.allclients events -e_yarismada // burda 15 katana verio galiba ?
serv.allclients tag.zarvar 0
serv.allclients tag.questvar 0
serv.allclients tag.secvar 0
endif
return 1
[function katil]
if (<tag.birvs> == 0) || (<tag.secvar> == 0) || (<tag.ikivs> == 0) || (<tag.topukvar> == 0) || (<tag.engelvar> == 0) || (<tag.zarvar> == 0) || (<isevent.e_yarismada>) || (<tag.questvar> == 0)
src.sdialog d_katil
else
src.sysmessage @38,,1 Su anda bir yarisma yok veya Hala yarismadasiniz.
return 1
endif
[function baslat]
var.yarisma = 1
[function gir]
if !(<var0.yarisma>==1)
src.go xx
return 1
endif
[function bitir]
if (<var0.yarisma>==1)
var.yarisma = 0
return 1
else
src.sysmessage @38,,1 Yarışma yapılmıyor..
return 1
endif
on=@logout
src.events -e_xx
on=@death
src.events -e_xx
/ /
/ Bu Script BY REXNORT /
/ Tarafından /
/ Yazılmıştır.! /
/ /
/_________________________________/
*******************************************************************************************
Not * Arkadaşlar Eğer Harfler Türkçe Çıkmıyorsa Klasörü Farklı Kaydet Yapıp UTF-8 i Seçin *
*******************************************************************************************
[Plevel 4]
Yazi
Topukduyuru
Topukduyuru2
[Function Yazi]
Var.Oldact <Act>
Var.Blah=<P>
Newitem=I_Colored_Speech
Act.P=5190 1150
Var.Old_Flags=<Act.Region.Flags>
Var.Old_Events=<Region.Events>
Act.Region.Flags=<Region.Flags>
Act.Cont=<Uid>
Region.Events -0
P=5190 1150
Act.Cont=<Uid>
Tag.Sua_Color=0808,3
Act.Sayua <Eval <Tag.Sua_Color>>,0,0,1 <ARGS>
P=<Var.Blah>
Region.Events <Var.Old_Events>
Act.P=5190 1150
Act.Region.Flags=<Var.Old_Flags>
Act.Remove
Act <Var.Oldact>
Tag.Sua_Color=
[Function Topukduyuru]
If (<account.plevel> > 1)
Serv.Allclients SysMessage @07e5,3 [ <Serv.Name> ]
Serv.Allclients Yazi <Args>
Serv.Allclients Sound 0f7
Return 1
Endif
[Function Topukduyuru2]
If (<account.plevel> > 1)
Serv.Allclients Yazi <Args>
Serv.Allclients Sound 0f7
Return 1
Endif
[Function Topukyap]
Src.Topukduyuru Topuk Turnuvasi Vardır
Src.Topukduyuru2 Katılmak Isteyenler Safedeki Gateden Geçebilirler.
Src.Invis 1
Src.Newitem i_topuk_gate
Src.Act.P 5418,1168,10
Src.Act.Timer 300
Src.Go 5451,1235
Src.Invis 1
Src.Newnpc C_vortex
Src.Act.P 5456,1235
Src.Act.Name Topuk Vortex
Src.Act.Color 0455
Src.Newitem i_rex_duvar2
Src.Act.P 5448,1227
Src.Act.Timer 300
Src.Newitem i_rex_duvar2
Src.Act.P 5449,1227
Src.Act.Timer 300
Src.Newitem i_rex_duvar2
Src.Act.P 5450,1227
Src.Act.Timer 300
Src.Newitem i_rex_duvar1
Src.Act.P 5450,1227
Src.Act.Timer 300
Src.Newitem i_rex_duvar1
Src.Act.P 5450,1226
Src.Act.Timer 300
Src.Newitem i_rex_duvar2
Src.Act.P 5463,1227
Src.Act.Timer 300
Src.Newitem i_rex_duvar1
Src.Act.P 5462,1227
Src.Act.Timer 300
Src.Newitem i_rex_duvar1
Src.Act.P 5462,1226
Src.Act.Timer 300
Src.Newitem i_rex_duvar2
Src.Act.P 5464,1227
Src.Act.Timer 300
Src.Newitem i_rex_duvar2
Src.Act.P 5463,1243
Src.Act.Timer 300
Src.Newitem i_rex_duvar2
Src.Act.P 5464,1243
Src.Act.Timer 300
Src.Newitem i_rex_duvar1
Src.Act.P 5462,1244
Src.Act.Timer 300
Src.Newitem i_rex_duvar3
Src.Act.P 5462,1243
Src.Act.Timer 300
Src.Newitem i_rex_duvar2
Src.Act.P 5456,1234
Src.Act.Timer 300
Src.Newitem i_rex_duvar2
Src.Act.P 5457,1234
Src.Act.Timer 300
Src.Newitem i_rex_duvar1
Src.Act.P 5457,1235
Src.Act.Timer 300
Src.Newitem i_rex_duvar1
Src.Act.P 5457,1236
Src.Act.Timer 300
Src.Newitem i_rex_duvar2
Src.Act.P 5457,1236
Src.Act.Timer 300
Src.Newitem i_rex_duvar2
Src.Act.P 5456,1236
Src.Act.Timer 300
Src.Newitem i_rex_duvar1
Src.Act.P 5455,1236
Src.Act.Timer 300
Src.Newitem i_rex_duvar1
Src.Act.P 5455,1235
Src.Act.Timer 300
Src.Newitem i_rex_duvar3
Src.Act.P 5455,1234
Src.Act.Timer 300
Src.Newitem i_rex_duvar1
Src.Act.P 5462,1245
Src.Act.Timer 300
Src.Newitem i_rex_duvar2
Src.Act.P 5448,1243
Src.Act.Timer 300
Src.Newitem i_rex_duvar2
Src.Act.P 5449,1243
Src.Act.Timer 300
Src.Newitem i_rex_duvar2
Src.Act.P 5450,1243
Src.Act.Timer 300
Src.Newitem i_rex_duvar1
Src.Act.P 5450,1244
Src.Act.Timer 300
Src.Newitem i_rex_duvar1
Src.Act.P 5450,1245
Src.Act.Timer 300
[Itemdef I_Topuk_Gate]
Id I_Moongate_Red
Name Topuk Alani
On=@Create
Color 080a
Attr 08002
Timer 300
On=@Click
Message @0808,5 [ Topuk Alani ]
Message @07a1 [ Son <Timer> Saniye]
Return 1
On=@Dclick
Src.BankaSalla
Src.BinekOlmasin
Src.Go 5449,1226
Src.Hits <Src.Str>
Src.Mana <Src.Int>
Src.Stam <Src.Dex>
Src.Events +e_topuk
Src.Tag.Topuk 1
Src.Yazi Topuk Turnuvasına Katıldınız.
Return 1
On=@Step
Src.Yazi Lütfen Çift Tıklayınız.
Return 1
On=@Timer
Serv.Allclients Yazi Katılımlar Bitmiştir İyi Oyunlar
Serv.Allclients Stone 0
Remove 1
[Events E_Topuk]
On=@Click
Message @0808,5 [ Topuk Etkinligi ]
Message @07a1 <Name>
Return 1
On=@Skillstart
If (<Action> == id(skill_hiding)) || (<action> == skill_hiding) || (<action> == id(skill_stealth)) || (<action> == skill_stealth)
Src.Yazi Topukta Hiding Olmak Yasaktır.
Skill Fail
Return 1
On=@Spellcast
Src.Yazi Topukta Büyü Kullanmak Yasaktır.
F_Fizzle
Return 1
On=@ItemDclick
If (<Targ.Type> == T_Potion)
Targ.Remove
Src.Yazi opukta Potion Türü Şeyler Kullanmak Yasaktır.
Return 1
On=@Hit
Src.Yazi Topukda Kimseye Vuramazsın.
Return 1
On=@Death
Src.Go 5446,1228
Src.Hits <Src.Str>
Src.Stam <Src.Dex>
Src.Int <Src.Mana>
Src.Events -E_Topuk
Src.Tag.Topuk 0
Src.SysMessage @0803 Etkinlikten Elendiniz.
Src.SysMessage @07a1,3 Iyi Oyunlar
If (<Src.Hits> =0)
Src.Resurrect
Endif
Return 1
[Function Vortex_Kitle]
Newitem=i_rex_duvar3
Act.Type=T_Normal
Act.P=<P>
Act.Move -1,-1
Act.Attr=00002
Act.Timer=300
Newitem=i_rex_duvar1
Act.Type=T_Normal
Act.P=<P>
Act.Move 1,0
Act.Attr=00002
Act.Timer=300
Newitem=i_rex_duvar1
Act.Type=T_Normal
Act.P=<P>
Act.Move -1,0
Act.Attr=00002
Act.Timer=300
Newitem=i_rex_duvar1
Act.Type=T_Normal
Act.P=<P>
Act.Move 1,1
Act.Attr=00002 ||Attr_Static
Act.Timer=300
Newitem=i_rex_duvar1
Act.Type=T_Normal
Act.P=<P>
Act.Move -1,1
Act.Attr=00002 ||Attr_Static
Act.Timer=300
Newitem=i_rex_duvar2
Act.Type=T_Normal
Act.P=<P>
Act.Move 1,1
Act.Attr=00002 ||Attr_Static
Act.Timer=300
Newitem=i_rex_duvar2
Act.Type=T_Normal
Act.P=<P>
Act.Move 0,1
Act.Attr=00002 ||Attr_Static
Act.Timer=300
Newitem=i_rex_duvar2
Act.Type=T_Normal
Act.P=<P>
Act.Move 0,-1
Act.Attr=00002 ||Attr_Static
Act.Timer=300
Newitem=i_rex_duvar2
Act.Type=T_Normal
Act.P=<P>
Act.Move 1,-1
Act.Attr=00002 ||Attr_Static
Act.Timer=300
[Itemdef i_rex_duvar1]
Defname i_rex_duvar1
ID 02fb
Name Rex Duvar
On=@Create
Color 0455
Attr 00002|090|Attr_Static
[Itemdef i_rex_duvar2]
Defname i_rex_duvar2
ID 02fa
Name Rex Duvar
On=@Create
Color 0455
Attr 00002|090|Attr_Static
[Itemdef i_rex_duvar3]
Defname i_rex_duvar3
ID 02fc
Name Rex Duvar
On=@Create
Color 0455
Attr 00002|090|Attr_Static
[Function Bankasalla] //////////////////// Alıntı
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 080a
Findlayer(layer_pack).cont <findlayer(layer_bankbox)>
Findlayer(layer_pack).empty
Findlayer(layer_pack).dclick
Bank
Update
Return 1
[function binekolmasin] ////////////// Alıntı
if (<findlayer.25>)
tag.binekid <findlayer.25.more1> //binegin id'ini tagladık
tag.binekkarma <uid.<findlayer.25.more2>.karma> //karmayı tagladık
tag.binekfame <uid.<findlayer.25.more2>.fame> //famei tagladık
tag.binekfood <uid.<findlayer.25.more2>.food> //kargoda beslemiyoruz
tag.binekcolor <uid.<findlayer.25.more2>.color> //bunuda alalım bari
tag.binekname <findlayer.25.name> //isimini bi kenara not aldık
serv.newitem i_binek_hafiza //Onay formunu alıyoruz
new.tag.name <tag.binekname> //Hayvanın kayıtlarını
new.tag.fame <tag.binekfame> //forma
new.tag.karma <tag.binekkarma> //eksiksiz
new.tag.food <tag.binekfood> //dolduruyoruz
new.tag.binekid <tag.binekid> //Kargo ise ucret almadan
new.color <tag.binekcolor>
new.cont <findlayer(29).uid> //adrese yolluyor
new.more2 1
findlayer.25.remove
else
return 1
endif
[itemdef i_binek_hafiza]
id i_deed
type t_normal
weight 20.0
Name Kargo
on=@click
if (<more2>
message @0803 <tag.name>
return 1
else
message <name>
return 1
endif
on=@dclick
if (<more2>)
try src.newnpc <tag.binekid> //Taze binek
link <src.act.uid> //linkleyelimki kaybolmasın
link.name <tag.name> //
link.karma <tag.karma> //Genel ayarlar
link.fame <tag.fame> //
link.food <tag.food>
link.color <color>
//burdan sonrası binegin sahibi olmanız için.
//animal deed den alıntıdır.
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
return 1
else
return1
endif
[Function Vazcaydim]
If (<ISEvent.E_Topuk>)
Src.Events -E_Topuk
Src.Go Pazar Alani
Src.Sysmessage @38 Tamam Sen Cik
Else
Src.Sysmessage @07a1 Topukda Degilsinkine
Return 1
Endif
[plevel 1]
etkinlik
[function etkinlik]
if (<src.account.plevel> > 2)
src.sdialog d_gm_yarisma
src.smy Staff Etkinlik Menusu
return 1
endif
if (<src.account.plevel> == 1)
src.katil
return 1
endif
if (<src.account.plevel> > 2)
axuare : Nexiel'in Ben Sahsen En Son Kisi Olacagini Düsünmüyorum.Sahsen Bilgili Sphere Scripting Konusunda..
Ayrica
[plevel 1] etkinlik [function etkinlik] if (<src.account.plevel> > 2) src.sdialog d_gm_yarisma src.smy Staff Etkinlik Menusu return 1 endif if (<src.account.plevel> == 1) src.katil return 1 endif
[Plevel 3]
Olsa Cünkü
if (<src.account.plevel> > 2)
Plevel 2'den Yüksek Demisiz.
[plevel 1]
etkinlik
[function etkinlik]
if (<src.account.plevel> > 2) //burada plevel 3 veya daha fazla ise
src.sdialog d_gm_yarisma //menu aç
src.smy Staff Etkinlik Menusu
return 1
endif
if (<src.account.plevel> == 1)//burada pevel 1 ise
src.katil//yarışmaya katılıyor
return 1
endif