///////////////////////////////////////////////////
///Bu Scripts xwerswoodx tarafından yazılmıştır.///
///---------------05:46 09.06.2008--------------///
///////////////////////////////////////////////////
//.add c_hostes ///
//.add c_bilet_skeleton ///
//.add i_ucak_coin ///
//.add i_ucus_bileti ///
//.add i_ucus_bileti_2 ///
///////////////////////////////////////////////////
[itemdef i_ucus_bileti]
defname=i_ucus_bileti
id=i_scroll_blank
type=t_scroll_blank
Name=Ana Ucus Bileti
On=@Create
Color=020
attr=attr_newbie
On=@Click
Message @048 [<serv.name>]
Message @056 [Kaybolmaz]
Message @020 <Name>
return 1
On=@Dclick
if (<topobj.uid> != <src.uid>)
src.sysmessage @048 Bunu kullanabilmeniz icin cantanizda olmali.
else
sDialog d_ea
return 1
//Açmaya Eminmisin?
[dialog d_ea]
0,0
move
resizepic 10 50 3500 300 135
text 25 68 105 0 0
button 30 105 2224 2225 1 0 1
text 55 102 0481 1
button 30 130 2224 2225 1 0 2
text 55 127 0481 2
[dialog d_ea text]
Bileti Acmak Istiyormusun?
Evet...
Hayir...
[dialog d_ea button]
On=0
src.dialog d_ea
src.sysmessage @048 Seceneklerden Birini Secmelisin.
return 1
On=1
src.dialog d_ucus_aciklama
return 1
SRC.FIX
On=2
return 1
//Eminmisin Acmaya 2?
[dialog d_ea_2]
0,0
move
resizepic 10 50 3500 300 135
text 25 68 105 0 0
button 30 105 2224 2225 1 0 1
text 55 102 0481 1
button 30 130 2224 2225 1 0 2
text 55 127 0481 2
[dialog d_ea_2 text]
Bileti Acmak Istiyormusun?
Evet...
Hayir...
[dialog d_ea_2 button]
On=0
src.dialog d_ea_2
src.sysmessage @048 Seceneklerden Birini Secmelisin.
return 1
On=1
src.dialog d_ucus_bileti
return 1.
SRC.FIX
On=2
return 1
/// 2. Ucus Bileti
[itemdef i_ucus_bileti_2]
defname=i_ucus_bileti_2
id=i_scroll_blank
type=t_scroll_blank
Name=Ucus Bileti
On=@Create
Color=048
attr=attr_newbie
On=@Click
Message @048 [<serv.name>]
Message @056 [Kaybolmaz]
Message @020 <Name>
return 1
On=@Dclick
if (<topobj.uid> != <src.uid>)
src.sysmessage @048 Bunu kullanabilmeniz icin cantanizda olmali.
else
sDialog d_ea_2
return 1
///Uçuş Text Dialog
[DIALOG d_ucus_aciklama]
0,0
MOVE
resizepic 10 50 3500 440 350
text 25 68 105 0 0
text 60 100 0020 1
text 60 125 0492 2
text 60 150 0020 3
text 60 175 0492 4
text 60 200 0020 5
text 60 225 0492 6
text 60 250 0020 7
text 60 275 0492 8
text 60 300 0020 9
text 60 325 0492 10
button 360 375 2224 2225 1 0 1
text 385 371 0493 11
button 30 375 2224 2225 1 0 2
text 55 371 0493 12
[DIALOG d_ucus_aciklama TEXT]
<serv.name> Ucus Bileti Kullanimi
Ucus Biletini kullanmak icin devam tusunu kullanin.
Ucus Biletini Kullandıktan Sonra Uzerinize Yesil
Bir Bilet Gelecektir.
Bu Yesil Bilete 2 Kere Tiklayinca Sehirlerin
Oldugu Bir Menu Acilacaktir.
Bu Menuden Istediginiz Yere Gidebilirsiniz.
1 Bilet Fiyati 15k Ucak Coindir.Her Bilet 1
Kullanimliktir.2.Bir Bilet Icin Hostesimizi Bulun.
Dipnot: Iptal Ederseniz Biletiniz Yanar.
Dipnot: Bu Menuyu 1 Kere Kullanabilirsiniz.
Devam
Iptal
[Dialog d_ucus_aciklama BUTTON]
On=0
src.dialog d_ucus_aciklama
return 1
On=1
if (<src.restest 1 i_ucus_bileti>)
SRC.NEWITEM i_ucus_bileti_2
SRC.ACT.BOUNCE
return1
src.consume 1 i_ucus_bileti
src.sysmessage @080a Ucus Bileti cantaniza konulmustur. Iyi oyunlar...
return 1
else
src.sysmessage @080a Yaninizda 1 adet Ana Ucus Bileti yok.Lutfen Hostesi Ziyaret Ediniz.
return 1
endif
SRC.FIX
On=2
src.dialog d_ey
return 1
///Dialog Eminmisin Yakmaya
[dialog d_ey]
0,0
move
resizepic 10 50 3500 300 135
text 25 68 105 0 0
button 30 105 2224 2225 1 0 1
text 55 102 0481 1
button 30 130 2224 2225 1 0 2
text 55 127 0481 2
[dialog d_ey text]
Bileti Yakmak Istediginden Eminmisin?
Evet...
Hayir...
[dialog d_ey button]
On=0
src.dialog d_ey
src.sysmessage @048 Seceneklerden Birini Secmelisin.
return 1
On=1
src.consume 1 i_ucus_bileti
src.sysmessage @080a Biletiniz Yanmistir. Iyi oyunlar...
return 1.
SRC.FIX
On=2
src.dialog d_ucus_aciklama
return 1
/// Dialog d_ey_2
[dialog d_ey_2]
0,0
move
resizepic 10 50 3500 300 135
text 25 68 105 0 0
button 30 105 2224 2225 1 0 1
text 55 102 0481 1
button 30 130 2224 2225 1 0 2
text 55 127 0481 2
[dialog d_ey_2 text]
Bileti Yakmak Istediginden Eminmisin?
Evet...
Hayir...
[dialog d_ey_2 button]
On=0
src.dialog d_ey_2
src.sysmessage @048 Seceneklerden Birini Secmelisin.
return 1
On=1
src.consume 1 i_ucus_bileti_2
src.sysmessage @080a Biletiniz Yanmistir. Iyi oyunlar...
return 1.
SRC.FIX
On=2
src.dialog d_ucus_bileti
return 1
///Uçuş Dialog
[DIALOG d_ucus_bileti]
0,0
MOVE
resizepic 10 50 3500 440 350
text 25 68 105 0 0
button 30 100 2224 2225 1 0 1
text 60 100 0492 1
button 30 125 2224 2225 1 0 2
text 60 125 0492 2
button 30 150 2224 2225 1 0 3
text 60 150 0492 3
button 30 175 2224 2225 1 0 4
text 60 175 0492 4
button 30 200 2224 2225 1 0 5
text 60 200 0492 5
button 30 225 2224 2225 1 0 6
text 60 225 0492 6
button 30 250 2224 2225 1 0 7
text 60 250 0492 7
button 30 275 2224 2225 1 0 8
text 60 275 0492 8
button 30 300 2224 2225 1 0 9
text 60 300 0492 9
button 30 375 2224 2225 1 0 10
text 55 371 0493 10
[DIALOG d_ucus_bileti TEXT]
<serv.name> Ucus Bileti
Safe
Moonglow
Britain
Trinsic
Delucia
Minoc
Jhelom
Yew
Skara Brae
Iptal
[DIALOG d_ucus_bileti BUTTON]
ONBUTTON=0
src.dialog d_ucus_bileti
RETURN 1
ONBUTTON=1
src.consume 1 i_ucus_bileti_2
SRC.GO safe
src.sysmessage @056 Safe Alana Hos Geldiniz...Sayin <src.name>
return 1
SRC.FIX
ONBUTTON=2
src.consume 1 i_ucus_bileti_2
SRC.GO Moonglow
src.sysmessage @056 Moonglow'a Hos Geldiniz...Sayin <src.name>
return 1
SRC.FIX
SRC.FIX
ONBUTTON=3
src.consume 1 i_ucus_bileti_2
SRC.GO Britain
src.sysmessage @056 Britain'e Hos Geldiniz...Sayin <src.name>
return 1
SRC.FIX
ONBUTTON=4
src.consume 1 i_ucus_bileti_2
SRC.GO Trinsic
src.sysmessage @056 Trinsic'e Hos Geldiniz...Sayin <src.name>
return 1
SRC.FIX
ONBUTTON=5
src.consume 1 i_ucus_bileti_2
SRC.GO Delucia
src.sysmessage @056 Delucia'ya Hos Geldiniz...Sayin <src.name>
return 1
SRC.FIX
ONBUTTON=6
src.consume 1 i_ucus_bileti_2
SRC.GO Minoc
src.sysmessage @056 Minoc'a Hos Geldiniz...Sayin <src.name>
return 1
SRC.FIX
ONBUTTON=7
src.consume 1 i_ucus_bileti_2
SRC.GO Jhelom
src.sysmessage @056 Jhelom'a Hos Geldiniz...Sayin <src.name>
return 1
SRC.FIX
ONBUTTON=8
src.consume 1 i_ucus_bileti_2
SRC.GO Yew
src.sysmessage @056 Yew'e Hos Geldiniz...Sayin <src.name>
return 1
SRC.FIX
ONBUTTON=9
src.consume 1 i_ucus_bileti_2
SRC.GO Skara Brae
src.sysmessage @056 Skara Brae'ye Hos Geldiniz...Sayin <src.name>
return 1
SRC.FIX
ONBUTTON=10
src.dialog d_ey_2
return 1
/// Hostes
[chardef c_hostes]
defname c_hostes
NAME=Hostes
ID=C_WOMAN
DESIRES=i_gold,e_notoriety
AVERSIONS=t_TRAP,t_eerie_stuff
On=@Click
Message @048 [<serv.name>]
Message @020 <Name>
return 1
ON=@Create
NPC=brain_vendor
COLOR=colors_skin
STR={100 100}
DEX={100 100}
INT={100 100}
title Hostes
Karma={100 200}
Fame={100 200}
ITEMNEWBIE=i_mage_robe
COLOR 033
ITEMNEWBIE=i_studded_gorget
COLOR 033
ITEMNEWBIE=i_studded_gloves
COLOR 033
ITEMNEWBIE=i_studded_leggings
COLOR 033
ITEMNEWBIE=i_studded_sleeves
COLOR 033
ITEMNEWBIE=i_studded_tunic
COLOR 033
ITEMNEWBIE=i_boots_calf
COLOR 033
ON=@GETHIT
src.hits 100
return 1
ON=@DClick
if (<src.restest 15000 i_ucak_coin>)
SRC.NEWITEM i_ucus_bileti
SRC.ACT.BOUNCE
return1
src.consume 15000 i_ucak_coin
src.sysmessage @080a <name>'niz cantaniza konulmustur. Iyi oyunlar...
return 1
else
src.sysmessage @080a Yaninizda 15000 Ucak Coin yok.
return 1
endif
SRC.FIX
//Coin
[itemdef i_ucak_coin]
defname=i_ucak_coin
id=i_gold
name=Ucak Coin
On=@Create
Color=033
attr attr_newbie
On=@Click
Message @048 [<serv.name>]
Message @056 [Kaybolmaz]
Message @020 <amount> <Name>
src.sysmessage @098 Bu Bileti Sadece Hosteste Kullanabilirsiniz.
return 1
//Skeleton
[CHARDEF c_bilet_skeleton]
DEFNAME=c_bilet_skeleton
NAME=Biletli Skeleton
ID=c_skeleton
SOUND=snd_ANIMALS_skeleton3
ICON=i_pet_skeleton
DAM=1.3
ARMOR=20
RESOURCES=32 i_ribs_raw,10 i_hide
//ALIGMENT=EVIL
CAN=MT_WALK|MT_RUN
FOODTYPE=90 t_meat_raw
SHELTER=r_caves,r_dungeon
DESIRES=i_gold
AVERSIONS=r_civilization,r_water
ON=@Create
COLOR=033
STR={20 20}
DEX={1 1}
INT={0 0}
TAMING=1000.0
NPC=brain_monster a
FAME={55 150}
KARMA={-9000 -10000}
ON=@NPCRestock
ITEM=i_ucak_coin,{900 1000}
CATEGORY=xwerswoodx
SUBSECTION=Script's
DESCRIPTION=Biletli Skeleton
On=@Click
Message @048 [<serv.name>]
Message @020 <Name>
src.sysmessage @098 Beni Kes Icimden Ucak Coin Cikar.
return 1
Total votes: 0
Bulunamadı.
Ultima Online 1 gün önce
Sunucular 2 gün önce
Sunucular 2 gün önce
Ultima Online 2 hafta önce
Counter-Strike 2 hafta önce
Sunucular 1 ay önce
Sunucular 1 ay önce
Ultima Online 1 ay önce
Sunucular 1 ay önce
Sohbet & Geyik 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)