Sistem bitti.Yani v.1.0 olarak, üzerinde güncellemeler yaptıkça aynı başlık altında güncelliycem.
Not: Lütfen bu konuyla ilgili olan diğer başlığı silin.
v.1.0 ile gelen yeni özellik:
*Çantaya gelen olgun çiçeğe çift tıklayınca 10 kullanımlık rare dye menüsü gelir.Menüden istenilen itemleri bulup yapmaya başladığınızda 10 kullanımlık bi rare dyeye sahip olursunuz.
Yetkili gözünden :
Önce defname flowerarea kısmından açıklamama göre koordinatları girin sonra bi owner charla ".floweryerlestir" komutunu yazın. Tamamdır sistem hazır şimdi sadece playerların kullanması kalıyor =)
Oyuncu gözünden :
Oyuncular için world üzerinde 5 tane rare spawnı vardır ve onları koruyan güçlendirilmiş wolflar vardır.Bi player bs vendordan(vendora itemi siz ekliyceksiniz.) flower dagger alıp çiçekleri kökleyebilirler fakat önce wolfu atlatmalarını tavsiye ederim.Çiçeği kökledikten 5 saniye sonra olgun çiçek çantanıza gelir ve köklediğiniz çiçeğin altından yeni bir filiz çıkar filiz 1 saat sonra aynı yerde tekrar çiçeğe dönüşür.Player elde ettiği olgun çiçeğe çift tıklayarak gereken malzemeler ile 10 kullanımlık rare dye oluşturabilir.(Skill falan onları isteğe göre ayarlarsınız.)
Sistem Görüntüleri :
Sistem kodlaması :
||//////////////////////////////////||
|| ||
|| Script name: System: Rare Flower ||
|| Written for: UO-Dev || U-S ||
|| ||
||//////////////////////////////////||
[defname flowerarea]
/// Birinci çiçeğin world üzerindeki koordinatı:
rareflower1 5240,1076,1
/// Birinci çiçeğin korumasının çıkacağı koordinatı(Bence 1 kare yanı yapın):
rareflower1koruma 5241,1076,1
/// İkinci çiçeğin world üzerindeki koordinatı:
rareflower2 5262,1076,1
/// İkinci çiçeğin korumasının çıkacağı koordinatı(Bence 1 kare yanı yapın):
rareflower2koruma 5263,1076,1
/// Üçüncü çiçeğin world üzerindeki koordinatı:
rareflower3 5284,1076,1
/// Üçüncü çiçeğin korumasının çıkacağı koordinatı(Bence 1 kare yanı yapın):
rareflower3koruma 5285,1076,1
/// Dördüncü çiçeğin world üzerindeki koordinatı:
rareflower4 5306,1076,1
/// Dördüncü çiçeğin korumasının çıkacağı koordinatı(Bence 1 kare yanı yapın):
rareflower4koruma 5307,1076,1
/// Beşinci çiçeğin world üzerindeki koordinatı:
rareflower5 5328,1076,1
/// Beşinci çiçeğin korumasının çıkacağı koordinatı(Bence 1 kare yanı yapın):
rareflower5koruma 5329,1076,1
[function rareflow]
src.sysmessage @1153 <args>
[function cicekkoy]
new.p <def.<args>>
[function floweryerlestir]
serv.newitem i_rareflower
src.cicekkoy rareflower1
serv.newitem i_worldgem_bit
new.more1 c_rarewolf
src.cicekkoy rareflower1koruma
serv.newitem i_rareflower
src.cicekkoy rareflower2
serv.newitem i_worldgem_bit
new.more1 c_rarewolf
src.cicekkoy rareflower2koruma
serv.newitem i_rareflower
src.cicekkoy rareflower3
serv.newitem i_worldgem_bit
new.more1 c_rarewolf
src.cicekkoy rareflower3koruma
serv.newitem i_rareflower
src.cicekkoy rareflower4
serv.newitem i_worldgem_bit
new.more1 c_rarewolf
src.cicekkoy rareflower4koruma
serv.newitem i_rareflower
src.cicekkoy rareflower5
serv.newitem i_worldgem_bit
new.more1 c_rarewolf
src.cicekkoy rareflower5koruma
serv.newitem i_zehirli_mantar
src.cicekkoy rareflower1
new.move e 1
serv.newitem i_zehirli_mantar
src.cicekkoy rareflower1
new.move s 1
serv.newitem i_zehirli_mantar
src.cicekkoy rareflower1
new.move w 1
serv.newitem i_zehirli_mantar
src.cicekkoy rareflower1
new.move n 1
serv.newitem i_zehirli_mantar
src.cicekkoy rareflower2
new.move e 1
serv.newitem i_zehirli_mantar
src.cicekkoy rareflower2
new.move s 1
serv.newitem i_zehirli_mantar
src.cicekkoy rareflower2
new.move w 1
serv.newitem i_zehirli_mantar
src.cicekkoy rareflower2
new.move n 1
serv.newitem i_zehirli_mantar
src.cicekkoy rareflower3
new.move e 1
serv.newitem i_zehirli_mantar
src.cicekkoy rareflower3
new.move s 1
serv.newitem i_zehirli_mantar
src.cicekkoy rareflower3
new.move w 1
serv.newitem i_zehirli_mantar
src.cicekkoy rareflower3
new.move n 1
serv.newitem i_zehirli_mantar
src.cicekkoy rareflower4
new.move e 1
serv.newitem i_zehirli_mantar
src.cicekkoy rareflower4
new.move s 1
serv.newitem i_zehirli_mantar
src.cicekkoy rareflower4
new.move w 1
serv.newitem i_zehirli_mantar
src.cicekkoy rareflower4
new.move n 1
serv.newitem i_zehirli_mantar
src.cicekkoy rareflower5
new.move e 1
serv.newitem i_zehirli_mantar
src.cicekkoy rareflower5
new.move s 1
serv.newitem i_zehirli_mantar
src.cicekkoy rareflower5
new.move w 1
serv.newitem i_zehirli_mantar
src.cicekkoy rareflower5
new.move n 1
src.flowerkorumaaktifet
src.flowerkorumaaktifet
src.flowerkorumaaktifet
src.flowerkorumaaktifet
src.flowerkorumaaktifet
[function flowerkorumaaktifet]
foritems 6144
if ((<baseid>==i_worldgem_bit) && (<more1>==c_rarewolf))
dclick
return 1
endif
endif
endfor
[function flowerkorumaaktifet2]
foritems 10
if ((<baseid>==i_worldgem_bit) && (<more1>==c_rarewolf))
dclick
return 1
endif
endif
endfor
[Itemdef i_rareflower]
Defname=i_rareflower
ID=i_flower_orfluer
Name=Rare Flower
On=@Create
serv.allclients sysmessage @1153 World uzerinde bir adet rare flower aktif olmustur.
On=@Destroy
serv.newitem i_cicekfilizi
new.p <p>
[function vercicegi]
serv.newitem i_olguncicek
new.bounce
[Itemdef i_cicekfilizi]
Defname=i_cicekfilizi
ID=0c63
Name=Cicek filizi
ON=@Create
timerf 3600,cicegikoy
timerf 3601,remove
[function cicegikoy]
serv.newitem i_rareflower
new.p <p>
src.flowerkorumaaktifet2
[Itemdef i_flower_dagger]
Defname=i_flower_dagger
ID=i_dagger
Name=Flower dagger
ON=@Dclick
equip
target @1153 Bunu neyin uzerinde kullanmak istiyorsunuz ?
return 1
ON=@Targon_char
return 1
ON=@Targon_ground
return 1
ON=@Targon_item
if <src.targ.distance> > 1
src.rareflow Cicegi sadece 1 kare yakinindan kokleyebilirsin.
return 1
endif
if <src.targ.baseid>==i_rareflower
src.say @1153 [ Cicegi kokler ]
src.anim 13
timerf 5,src.vercicegi
src.targ.remove
return 1
endif
[Itemdef i_olguncicek]
Defname=i_olguncicek
ID=i_flower_orfluer
Name=Rare flower
ON=@Create
dorand 5
color 0796
color 0795
color 0794
color 0793
color 0791
enddo
ON=@Dclick
src.sdialog d_flower_rare
return 1
[Dialog d_flower_rare]
0,0
nomove
resizepic 20 20 3600 400 230
resizepic 30 30 3500 380 210
tilepic 78 105 <serv.itemdef.i_log.id>
tilepic 87 129 <serv.itemdef.i_cloth.id>
tilepic 83 159 <serv.itemdef.i_flower_orfluer.id>
dhtmlgump 125 45 200 20 0 0 <def.bfont_size7><def.bfont_dblue><serv.servname> Rare Yapim
dhtmlgump 60 75 400 20 0 0 <def.bfont_black> Rare dye yapimi icin gerekenler Durum
dhtmlgump 45 105 200 20 0 0 <def.bfont_white> [ ] Log ( 205 )
dhtmlgump 310 105 200 20 0 0 <qval (<src.restest 205 i_log>)? <def.bfont_green> Var : <def.bfont_red> Yok >
dhtmlgump 45 135 200 20 0 0 <def.bfont_white> [ ] Cloth ( 40 )
dhtmlgump 310 135 200 20 0 0 <qval (<src.restest 40 i_cloth>)? <def.bfont_green> Var : <def.bfont_red> Yok >
dhtmlgump 45 165 250 20 0 0 <def.bfont_white> [ ] Rare Flower
dhtmlgump 310 165 200 20 0 0 <qval (<src.restest 1 i_olguncicek>)? <def.bfont_green> Var : <def.bfont_red> Yok >
dhtmlgump 180 195 250 20 0 0 <def.bfont_blue> Rare dye yap
button 150 195 4005 4006 1 0 1
[Dialog d_flower_rare button]
on 1
if !(<src.restest 205 i_log>) || !(<src.restest 40 i_cloth>) || !(<src.restest 1 i_olguncicek>)
src.sysmessage @1153 Cantanizda gerekli malzemeler yok.
return 1
else
src.consume 205 i_log
src.consume 40 i_cloth
src.consume 1 i_olguncicek
serv.newitem i_dye_rare
new.bounce
return 1
endif
[Chardef c_rarewolf]
Defname=c_rarewolf
ID=c_wolf
Name=Wolf
on=@create
STR={700 800}
DEX={126 155}
INT={385 425}
NPC=brain_monster
FAME={100 2000}
KARMA={-5000 -5999}
[itemdef i_zehirli_mantar]
id=0d16
TYPE=t_spellicon
name=deadly mushroom
CATEGORY=Spell Icons
SUBSECTION=Third Circle
on=@create
attr 010
on=@click
message <name>
return 1
on=dclick
return 1
on=@step
if (<src.isplayer>)
if (<src.account.plevel> < 2)
if !(<src.flags> & statf_dead)
src.poison 999
serv.newitem i_fx_curse
src.new.color 00
src.new.p=<src.p>
src.new.timer 2
src.new.attr=attr_decay
src.sound=snd_SPELL_POISON
endif
endif
endif
return 1
[ITEMDEF i_dye_rare]
defname i_dye_rare
id=i_dye_tub
name Rare Dye
weight 1
TYPE=T_DYE_VAT
ON=@Create
tag0.raresarj +=10
dorand 5
color 0796
color 0795
color 0794
color 0793
color 0791
enddo
on=@timer
return 1
on=@click
message @1153 [ <eval <tag.raresarj>> kullanimlik ]
message @900 Rare Dye
return 1
On=@DClick
if <dtag0.raresarj> == 0
src.sysmessage @1153 Rare dyenin kullanim hakki bitmis.
return 1
else
target @1153 Boyamak istediginiz esyayi seciniz.
return 1
endif
On=@TargOn_Char
return 1
On=@TargOn_Item
if !(<src.targ.topobj.uid> == <src.uid>)
src.sysmessage @1153 Sadece cantanizdaki ya da ustunuzdeki itemleri boyayabilirsiniz.
elseif !((<src.targ.type> = 01f) || (<src.targ.baseid> == i_bag) || (<src.targ.type> = t_clothing))
src.sysmessage @1153 Sadece elbiseleri boyayabilirsiniz.
return 1
else
src.targ.color <color>
src.targ.update
tag0.raresarj -=1
endif
return 1
[plevel 7]
floweryerlestir
sana sadece birşey söyleyeceğim ama sadece incele..