Kayıt ol!             
Şifremi unuttum ?
   


Alternative content

Get Adobe Flash player

 

Karakter Boyutu:  



Yazar Mesaj

Gilbertt

U-Ser

Online durumu

Nereden: Turkey Denizli
Meslek: Ogrenci
Yaş: 1
U-S Puan: 0
  0  

#360896   2009-09-24 14:00 GMT      


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ı :
Kod:
||//////////////////////////////////||
||                                  ||
|| 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


Ardor UO Level Shard..

ardoruo.com

[Nores]

U-Ser

Online durumu

Nereden: Turkey Konya#
Meslek: #Müzisyen[$]
Yaş: 19
U-S Puan: 0
  1  

#360905   2009-09-24 14:24 GMT      


Eline sağlık çıtı pıtı bi sistem


Myspace Profil;
www.myspace.com/noresgreatboss

berkancık

Expert

Online durumu

Nereden: Turkey Britain
Meslek: Yakında pilot öğrencisi..
Yaş: 19
U-S Puan: 209
  4  

#360906   2009-09-24 14:46 GMT      


2 yerde 1 if var 2 endif var bende hep bu if endife bakıyorum tebrikler..


Almanya'da 70 bin Saglik Kurumu... 8 bin kilise,

Fransa'da ise 60 bin saglik kurumu... 9 bin kilise

Türkiye'de 7 bin saglik kurumu...70 bin cami


olduğunu biliyormuydunuz?

Gilbertt

U-Ser

Online durumu

Nereden: Turkey Denizli
Meslek: Ogrenci
Yaş: 1
U-S Puan: 0
  0  

#360916   2009-09-24 16:49 GMT      


Of önceki başlıkta söledik cevabını bi de ileri düzeyde scriptingsin he.

@Static
teşekkürler.


Ardor UO Level Shard..

ardoruo.com

berkancık

Expert

Online durumu

Nereden: Turkey Britain
Meslek: Yakında pilot öğrencisi..
Yaş: 19
U-S Puan: 209
  4  

#360917   2009-09-24 16:54 GMT      


Ben önceki başlıktan anlamam burada hata var söyledim yanlış yapabilirsin niye ofluyorsun?


Almanya'da 70 bin Saglik Kurumu... 8 bin kilise,

Fransa'da ise 60 bin saglik kurumu... 9 bin kilise

Türkiye'de 7 bin saglik kurumu...70 bin cami


olduğunu biliyormuydunuz?

Gilbertt

U-Ser

Online durumu

Nereden: Turkey Denizli
Meslek: Ogrenci
Yaş: 1
U-S Puan: 0
  0  

#360918   2009-09-24 17:17 GMT      


Ya diğer başlıkta söledim cevabı scriptingden anladığın yok gelmiş beni yargılıyorsun


Ardor UO Level Shard..

ardoruo.com

berkancık

Expert

Online durumu

Nereden: Turkey Britain
Meslek: Yakında pilot öğrencisi..
Yaş: 19
U-S Puan: 209
  4  

#360921   2009-09-24 17:33 GMT      


Ben mi anlamıyorum sana sadece birşey söyleyeceğim ama sadece incele..

http://www.ultima-strike.com/i-2653-script-dersi--if-sorgusu.html

önceki cevabın:bi ifde arada && var

Kod:
foritems 10
if ((<baseid>==i_worldgem_bit) && (<more1>==c_rarewolf))
dclick
return 1
endif
endif
endfor


bu herşeyi gösteriyor neyse yinede uğraşmışsın tebrikler..


Almanya'da 70 bin Saglik Kurumu... 8 bin kilise,

Fransa'da ise 60 bin saglik kurumu... 9 bin kilise

Türkiye'de 7 bin saglik kurumu...70 bin cami


olduğunu biliyormuydunuz?

Gilbertt

U-Ser

Online durumu

Nereden: Turkey Denizli
Meslek: Ogrenci
Yaş: 1
U-S Puan: 0
  0  

#360923   2009-09-24 17:43 GMT      


Yok ben anlatamıyorum bak kardeşim arada && yi önce çift if sorgusu olur
if <baseid> == asdasd
if <more1> == asdasd
ben böyle yaptım başta o zaman 2 endif geçerliydi sonra && ye geçirdim anlamışındır inş.a


Ardor UO Level Shard..

ardoruo.com

berkancık

Expert

Online durumu

Nereden: Turkey Britain
Meslek: Yakında pilot öğrencisi..
Yaş: 19
U-S Puan: 209
  4  

#360924   2009-09-24 17:51 GMT      


tamam bende aynısını söyledim sonuç olarak orada yanlışık var düzeltsen iyi olurdu bunu söyledim ayrıca dediğinide anladım ..


Almanya'da 70 bin Saglik Kurumu... 8 bin kilise,

Fransa'da ise 60 bin saglik kurumu... 9 bin kilise

Türkiye'de 7 bin saglik kurumu...70 bin cami


olduğunu biliyormuydunuz?



İlgili Başlıklar:

BaşlıklarBaşlık Yazarı
System: Rare Flower [v.0.6]Gilbertt
System: Rare Flower [v.1.0] ( Diğer başlıklar silinsin. )Gilbertt

Keywords:

  Online:
  10 site üyesi, 210 misafir
    toplam 220 kişi  
Giris sayfan olarak ayarla Sik Kullanilanlara Ekle Yenile Burdan bize ulasabilirsiniz

Alternative content

Get Adobe Flash player

ANASAYFA | FORUMLAR | DÖKÜMANLAR | DOSYALAR | SCRIPTLER | SUNUCULAR | İLETİŞİM
Copyright (c) 2004-09 Ultima-Strike. All rights reserved.
Tasarım / Programlama: Uğur GÖK

Sistem Yapısı Seditio
Sayfa açılma süresi 0.287 sn.
SQL toplam zamanı: 0.115 sn. - SQL sorgusu: 44 - Ortalama SQL zamanı: 0.00262 sn.
Hosting Hizmetleri