||//////////////////////////////////||
|| ||
|| 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 <dvar0.cicekalim> == 1
src.sysmessage @1153 Su an cicegi baskasi aliyor.
return 1
endif
if <src.targ.baseid>==i_rareflower
var0.cicekalim 1
timerf 5,var0.cicekalim 0
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
[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
Sistemin temeli bitti sayılır fakat daha bitmedi şu ana kadar olan kısmı sadece çantana rare flower verene kadar olan bölüm henüz rare dye yapma kısmı bitmedi biraz işim olduğu için onu akşam gibi devam edicem.
Sistemin amacı: Worldde random bulunan ( defnameden siz ayarlıcaksınız ) 5 rare spawneri playerlar bs vendordan alıcağı flower dagger ile kökleyebilirler fakat her spawnı koruyan güçlendirilmiş bekçi kurtu vardır worldgembit halinde olduğu için çiçeği bırakıp gitmez 
Playerlar flower dagger ile çiçeği kökledikten sonra çiçek filiz haline döner 1 saat sonra filizden tekrar çiçek çıkar playerlar kökledikten 5 saniye sonra çantasına bir adet rare flower verir sistemi şuanlık burda bitirdim gelince rare floweri rare dye yapımına kadar devam ettircem.
Kullanım:
Defnameden koordinatları ayarlayın.Sonra plevel 7 bir charla ".floweryerlestir" yazın gerisi playerlara kalmış
Sistem henüz bitmedi o yüzden hemen eleştri yapmayın aklımda orda değiştirceğim çok şey var fakat şu an fazla zamanım yok daha sonra sistemi tamamen bitircem.
Not:Henüz 5 spawn vardır ve 5 çeşit rare flower vardır çiçeği köklemek için "flower dagger(i_flower_dagger)" gerekmektedir.Çiçek bi kere köklendikten sonra 1 saat sonra tekrar aktif olur.
Bu konu Gilbertt tarafından düzenlendi(2010-03-19 21:37, 14 yıl önce)
