/////////////////////////////////////////////////////\|
////Gm Topuk Sistemi
////Yazılma Tarihi : 19.02.2008 / 19:00
////Son Güncelleyen; KadhraS
////Yazma Nedeni; Canım istedi
/////////////////////////////////////////////////////\|
[function binekolmazsaolmaz]
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_zeka //<serv.name> Kargo'da onay formunu alıyoruz
new.tag.name <tag.binekname> //Kargoya verilen 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_zeka]
id i_deed
type t_normal
weight 20.0
name Kargo
on=@click
if (<more2>
message @0481,1 <name> - <tag.name>
return 1
else
message @0481,1 <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>
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
link.message @1156 Iyi oyunlar..
remove
return 1
else
return1
endif
//////////////////////////////////
[function topukduyuruluyor]
serv.newitem i_topukduyur
new.equip
[itemdef i_topukduyuruyom]
name Topuk Duyuruyorum
type t_eq_script
weight 0
on=@equip
src.dialog d_topuktime
//////////////////////////////////
[function topukmenu]
if <var.radio1>
dialog d_topukmenu
else
var.radio1 2510
var.radio2 2511
dialog d_topukmenu
endif
[function topukduyur]
src.sysmessage @1156,9 <serv.name> - Gm Topuk Duyurusu [Saat]: <var.saat> [Ucret]: <var.ucret>
src.sysmessage @1156,9 [Stone]: <var.stone> - [En fazla <eval <var.maxplayer>> player] - [Npc Oto]: <var.npc>
//////////////////////////////////
[dialog d_topukinfo]
0,0
nomove
noclose
page 0
button 10 10 30 30 1 0 1
text 80 10 100 0
[dialog d_topukinfo text]
<-- Topuk Hakkinda Bilgiler..
[dialog d_topukinfo button]
onbutton 1
dialog d_topukinfodetay
//////////////////////////////////
[dialog d_topukinfodetay]
0,0
nomove
noclose
page 0
gumppic 10 10 39
dhtmlgump 40 15 200 20 0 0 Gm Topuk
dhtmlgump 30 40 200 20 0 0 Baslangic: <var.saat>
dhtmlgump 30 65 200 20 0 0 Oto Stone?: <var.stone>
dhtmlgump 30 90 200 20 0 0 MaxPlayer: <eval <var.maxplayer>>
dhtmlgump 30 115 200 20 0 0 Oto Npc ?: <var.npc>
dhtmlgump 30 140 200 20 0 0 Ucret: <var.ucret>
dhtmlgump 30 190 200 20 0 0 Suan Katilan: <eval <var.katilanlar>> kisi var.
dhtmlgump 30 215 200 20 0 0 Reddeden: <eval <var.reddedenler>> kisi var.
dhtmlgump 180 275 30 20 0 0 KATIL
dhtmlgump 50 275 50 20 0 0 KAPAT
button 216 277 1209 1210 1 0 1
button 30 277 1209 1210 1 0 2
[dialog d_topukinfodetay text]
[dialog d_topukinfodetay button]
onbutton 1
if (<eval <var.katilanlar>> == <eval <var.maxplayer>>)
src.sysmessage @0481,1 Syn.<name> Cok Gec Kaldiniz, Kusura Bakmayin Bir Dahaki Sefere In$.
else
serv.allclients sysmessage @0785,1,1 <src.name> Yarismaya Katilidi.
src.sysmessage @0481,1 Topuk'a katildiniz..
src.events +e_topuk
src.go 5426,1174
src.binekolmazsaolmaz
var.katilanlar (<eval <var.katilanlar>> + 1)
endif
onbutton 2
var.reddedenler (<eval <var.reddedenler>> + 1)
src.sysmessage @0481,1 Topuk'a katilmadiniz..
[dialog d_topukmenu]
0,0
page 0
gumppic 48 10 5151 //üst1
gumppic 218 10 5151 //üst2
gumppic 370 10 5151 //üst3
gumppic 10 48 5153 //sol
gumppic 540 48 5155 //sağ
gumppic 48 48 5154 //orta1
gumppic 218 48 5154 //orta2
gumppic 370 48 5154 //orta3
gumppic 10 10 5170 //solüst
gumppic 540 10 5172 //sağüst
gumppic 10 150 5176 //solalt
gumppic 540 150 5178 //sağalt
gumppic 48 150 5157 //alt1
gumppic 218 150 5157 //alt2
gumppic 370 150 5157 //alt3
gumppic 123 250 5154 //duyuruorta1
gumppic 293 250 5154 //duyuruorta2
gumppic 123 352 5157 //alt1
gumppic 293 352 5157 //alt2
gumppic 123 212 5151 //üst1
gumppic 293 212 5151 //üst2
gumppic 85 212 5170 //solüst
gumppic 85 352 5176 //solalt
gumppic 463 212 5172 //sağüst
gumppic 463 352 5178 //sağalt
gumppic 85 250 5153 //sol
gumppic 463 250 5155 //sağ
gumppic 97 153 59
gumppic 175 153 57
dhtmlgump 210 13 200 20 0 0 Gm Topuk Sistemi By KadhraS
dhtmlgump 250 245 200 20 0 0 Duyuru Onizleme
dhtmlgump 125 275 999 20 0 0 <serv.name> - Gm Topuk [Saat]: <var.saat> [Ucret]: <var.ucret>
dhtmlgump 125 300 999 20 0 0 - [En fazla <eval <var.maxplayer>> player] -
dhtmlgump 30 40 60 20 0 0 Stone
dhtmlgump 120 40 60 20 0 0 Oto
dhtmlgump 213 40 60 20 0 0 Degil
dhtmlgump 30 60 60 20 0 0 Oto Npc
dhtmlgump 120 60 60 20 0 0 Var
dhtmlgump 213 60 60 20 0 0 Yok
dhtmlgump 30 80 60 20 0 0 MaxPlayer
dhtmlgump 120 80 60 20 0 0 16
dhtmlgump 213 80 60 20 0 0 32
dhtmlgump 306 80 60 20 0 0 64
dhtmlgump 30 100 60 20 0 0 Ucret
dhtmlgump 120 100 60 20 0 0 25k
dhtmlgump 213 100 60 20 0 0 50k
dhtmlgump 306 100 60 20 0 0 75k
dhtmlgump 399 100 60 20 0 0 100k
dhtmlgump 30 120 60 20 0 0 XxX
dhtmlgump 120 120 60 20 0 0 XxX
dhtmlgump 213 120 60 20 0 0 XxX
dhtmlgump 306 120 60 20 0 0 XxX
dhtmlgump 399 120 60 20 0 0 XxX
dhtmlgump 492 120 60 20 0 0 XxX
dhtmlgump 34 152 60 20 0 0 Topuk Saat
gumppic 120 150 2444 //saatgirişi
dtextentry 123 150 50 20 0 1 00:00
button 525 152 1209 1210 1 0 1
dhtmlgump 475 150 50 20 0 0 Kaydet
button 450 352 1209 1210 1 0 5
dhtmlgump 400 350 60 20 0 0 Duyur!
button 500 35 2225 2225 1 0 2
button 519 35 2226 2226 1 0 3
button 537 35 2227 2227 1 0 4
group 0 //
radio 100 40 <eval <var.radio1>> <eval <var.radio2>> <eval <var.otostoneacilsin>> 1
radio 190 40 <eval <var.radio1>> <eval <var.radio2>> <eval <var.otostoneacilsin>> 2
group 1 //
radio 100 80 <eval <var.radio1>> <eval <var.radio2>> <eval <var.max16secildi>> 3
radio 190 80 <eval <var.radio1>> <eval <var.radio2>> <eval <var.max32secildi>> 4
radio 280 80 <eval <var.radio1>> <eval <var.radio2>> <eval <var.max64secildi>> 5
group 3//
radio 100 60 <eval <var.radio1>> <eval <var.radio2>> <eval <var.npcotociksin>> 11
radio 190 60 <eval <var.radio1>> <eval <var.radio2>> <eval <var.npcotociksin>> 12
group 4//Ucret
radio 100 100 <eval <var.radio1>> <eval <var.radio2>> <eval <var.ucret25ksecildi>> 13
radio 190 100 <eval <var.radio1>> <eval <var.radio2>> <eval <var.ucret50ksecildi>> 14
radio 280 100 <eval <var.radio1>> <eval <var.radio2>> <eval <var.ucret75ksecildi>> 15
radio 370 100 <eval <var.radio1>> <eval <var.radio2>> <eval <var.ucret100ksecildi>> 16
onbutton 1
if (<argchk[1]> == 1)
var.npcotociksin Var
endif
if (<argchk[2]> == 1)
var.npcotociksin Yok
endif
if (<argchk[3]> == 1)
var.maxplayer 16
endif
if (<argchk[4]> == 1)
var.maxplayer 32
endif
if (<argchk[5]> == 1)
var.maxplayer 64
endif
if (<argchk[6]> == 1)
var.XxX
endif
if (<argchk[7]> == 1)
var.XxX
endif
if (<argchk[8]> == 1)
var.XxX
endif
if (<argchk[9]> == 1)
var.XxX
endif
if (<argchk[10]> == 1)
var.XxX
endif
if (<argchk[11]> == 1)
var.otostoneacilsin Acilmayacak
endif
if (<argchk[12]> == 1)
var.otostoneacilsin Acilmayacak
endif
if (<argchk[13]> == 1)
var.ucret 25k
endif
if (<argchk[14]> == 1)
var.ucret 50k
endif
if (<argchk[15]> == 1)
var.ucret 75k
endif
if (<argchk[16]> == 1)
var.ucret 100k
endif
////Radio secilmisler////
if (strmatch(<var.npcotociksin>,Var))
var.npcotociksinsecildi 1
else
var.npcotociksinsecildi 0
endif
if (strmatch(<var.loot>,Yok))
var.npcotociksinyok secildi 1
else
var.npcotociksintyoksecildi 0
endif
if (<eval <var.maxplayer>>=16)
var.max16secildi 1
else
var.max16secildi 0
endif
if (<eval <var.maxplayer>>=32)
var.max32secildi 1
else
var.max32secildi 0
endif
if (<eval <var.maxplayer>>=64)
var.max64secildi 1
else
var.max64secildi 0
endif
if (strmatch(<var.XxX>,XxX))
var.XxX
else
var.XxX
endif
if (strmatch(<var.XxX>,XxX))
var.XxX
else
var.XxX
endif
if (strmatch(<var.XxX>,XxX))
var.XxX
else
var.XxX
endif
if (strmatch(<var.XxX>,XxX))
var.XxX
else
var.XxX
endif
if (strmatch(<var.XxX>,XxX))
var.XxX
else
var.XxX
endif
if (strmatch(<var.npcotociksin>,Cikacak))
var.npcotociksin 1
else
var.npcotociksinsecildi 0
endif
if (strmatch(<var.itemler>,Sizden))
var.npcotociksinsecildi 1
else
var.npcotociksinsecildi 0
endif
if (strmatch(<var.ucret>,25k))
var.ucret25ksecildi 1
else
var.ucret25ksecildi 0
endif
if (strmatch(<var.ucret>,50k))
var.ucret50ksecildi 1
else
var.ucret50ksecildi 0
endif
if (strmatch(<var.ucret>,75k))
var.ucret75ksecildi 1
else
var.ucret75ksecildi 0
endif
if (strmatch(<var.ucret>,100k))
var.ucret100ksecildi 1
else
var.ucret100ksecildi 0
endif
var.saat <argtxt[1]>
src.sysmessage @1156,9 Duyuru Kaydedildi. Duyurulmaya Hazir...
topukmenu
onbutton 2
var.radio1 56
var.radio2 55
sysmessage @1156,9 Skin 1
topukmenu
onbutton 3
var.radio1 2360
var.radio2 2361
sysmessage @1156,9 Skin 2
topukmenu
onbutton 4
var.radio1 2510
var.radio2 2511
sysmessage @1156,9 Skin 3
topukmenu
[function topukbitti]
var.katilanlar 0
var.reddedenler 0
serv.allclients sysmessage @0481,1 MinaX : Gm Topuk Bitirilmi$tir.Katilan Herkeze Tesekkurler..
[plevel 5]
topukdavet
[function topukdavet]
serv.allclients dialog d_topukinfo
src.sysmessage @0481,1 Topuk Davetiyesi Geldi.
src.sysmessage @0481,,1 Lutfen Altinizda Binek Olmadan Onay Veriniz
////////////////////////////////////////////////////
[itemdef i_topukbitiriorum]
id i_moongate_red
name Btirici
type t_telepad
on=@create
color 0455
attr 010
on=@step
src.newitem=i_gold
src.act.amount 65000
src.act.bounce
src.newitem=i_gold
src.act.amount 65000
src.act.bounce
src.go 1908,2098
src.newitem=i_boots_calf
src.act.name @0785,1,1 Nike [Gm Topuk Odul]
src.act.color=0995
src.act.bounce
src.act.equip
src.act.attr 06
src.go 1908,2098
remove
var.gmtopuk <src.name>
src.events -e_topuk
serv.allclients sysmessage @0785,1,1 GM Topuk Yarismasini Kazanan "<var.gmtopuk>" Olmustur kendisini Tebrik ederiz.
serv.allclients events -e_topuk
[events e_topuk]
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
sysmessage @38,6,1,1 Yarismadan elendiniz.
events -e_topuker
hits 100
go ( KOORDİNATLARI YAZINIZ )
Total votes: 0
Ultima Online 4 gün önce
Sunucular 1 hafta önce
Duyurular 3 hafta önce
Sphere Scripting 3 hafta önce
Ultima Online 3 hafta önce
Sunucular 4 hafta önce
Diğer Oyunlar 1 ay önce
Sunucular 1 ay önce
Ultima Online 1 ay önce
Sunucular 1 ay önce
Ultima Online 1 ay önce
Ultima Online 2 ay önce
2024-10-31 22:47
2024-10-14 17:45
2024-09-26 14:21
2024-07-08 22:50
2024-07-08 22:34
2024-06-19 22:05
2024-06-01 02:19
2024-05-31 21:17
Yorumlar (0)