[plevel 1]
duzenle
[function duzenle]
foritems 12
if <type>==t_bitki
if !<tag0.duzeled>
tag0.duzeled=1
nudgeup 2
endif
endif
endfor
[function duzenle]
foritems 12
if <type>==t_bitki
if !<tag0.duzeled>
tag0.duzeled=1
nudgeup 2
endif
endif
endfor
[itemdef i_farm_teach]
id i_book_open
name Farming book
type t_eq_script
value=23500
on=@dclick
if (<src.tag0.farm>==1)
src.sysmessage @38,6,1 Siz zaten farming biliyorsunuz.
return 1
else
src.sysmessage @38,6,1 Farming hakkinda bi nebze bilgi edindiniz !
src.tag.farm=1
remove
return 1
endif
[itemdef i_bos_varil]
id 3703
name Bos varil
type t_eq_Script
skillmake carpentry 75.0
resources 20 i_log
on=@click
message @1153,,1 <name>
return 1
on=@dclick
if (<src.isneartype t_water 4>)
serv.newitem i_dolu_varil
if <cont>
src.new.bounce
else
new.p <p>
endif
new.update
src.sysmessage Suyu doldurdunuz
remove
return 1
else
src.sysmessage @38,6,1 Suyu doldurmak için herhangi bir suya 4 kare yakinda olmalisiniz
return 1
endif
[itemdef i_dolu_varil]
id 5453
name Dolu varil
type t_eq_Script
on=@create
tag.su=10
on=@click
message @1153,,1 <name>
return 1
[itemdef i_dolu_sise]
id 4090
name Dolu kova
type t_normal
skillmake carpentry 52.5
resources 4 i_log
on=@create
tag.dolu=0
on=@click
if (<tag.dolu>==1)
message @38,6,1 [Dolu]
else
message @38,6,1 [Bos]
endif
message @38,6,1 Su kovasi
return 1
on=@dclick
if (<tag0.dolu>==0)
target @38,6,1 Kova bos suyu doldurucaginiz su varilini seçiniz.
return 1
else
target @38,6,1 Hangi bitkiyi suluyucaksin ?
return 1
endif
on=@targon_item
//********************
if (<src.targ.baseid>==i_dolu_varil)
//************************
if (<tag.dolu>==0)
tag.dolu=1
src.sysmessage @38,6,1 Kovayi doldurdun.
//******************
if (<src.targ.distance> < 2)
//**********************
if (<src.targ.tag.su> > 0)
//**********************
src.targ.tag.su -= 1
return 1
else
serv.newitem i_Bos_Varil
new.p <src.targ.p>
src.targ.remove
src.sysmessage @38,6,1 Kovanin son suyunu doldurdun. Varil bosaldi
return 1
endif
endif
else
src.sysmessage @38,6,1 Bu kova zaten dolu.
return 1
endif
endif
if <tag0.dolu>==1
if (<src.targ.type>==t_bitki)
if (<src.targ.distance> < 2)
if (<src.targ.tag0.susa>)
tag.dolu=0
src.targ.tag0.susa=0
src.targ.timer <src.targ.tag0.bitkitime>
src.sysmessage @38,6,1 Suyu bosalttiniz. Yaklasik <eval <src.targ.dtag.bitkitime>/60> dakika süre sonra tekrardan su veriniz.
src.targ.tag0.mahsul += 1
return 1
else
src.sysmessage @38,6,1 Bunun suya ihtiyaci suanda yok.
return 1
endif
else
src.sysmessage @38,6,1 Lütfen 2 kare yaklasin
return 1
endif
endif
else
src.sysmessage @38,6,1 Bu kova bos.
endif
return 1
[itemdef i_toprak_koyucu]
id 4153
name toprak
type t_normal
value 3500
on=@create
tag.toprak=15
on=@dclick
if !(<src.tag0.farm>)
src.sysmessage @38,6,1 Farming hakkinda bilginiz yok.
return 1
endif
if !((0<src.uid> == <region.tag0.owner>) || (0<src.uid> == <region.tag0.co1uid>) || (0<src.uid> == <region.tag0.co2uid>) || (0<src.uid> == <region.tag0.co3uid>) || (0<src.uid> == <region.tag0.co4uid>) || (0<src.uid> == <region.tag0.co5uid>) || (0<src.uid> == <region.tag0.co6uid>) || (0<src.uid> == <region.tag0.co7uid>) || (0<src.uid> == <region.tag0.co8uid>))
src.sysmessage @38,6,1 Bunu kendi evinizde olmadan kuramazsiniz (ortaklar ve dostlar dahil).
return 1
endif
if (<tag0.toprak> > 0)
serv.newitem i_toprak
new.link <src.uid>
new.p <src.p>
//new.nudgedown 1
update
tag.toprak -= 1
src.sysmessage @38,6,1 Topragi yerlestirdin. Geriye <dtag0.toprak> karelik toprak kaldi.
return 1
else
src.sysmessage @38,6,1 Toprak bitmis
remove
return 1
endif
[function toprakfix]
serv.allclients sysmessage @38,6,1,1 Topraklar duzeltiliyor. Merak etmeyiniz bu fonksiyon 1 kac dakika lag yaratabilir.
foritems 65000
if <baseid>==i_toprak
timer=60*60*24*7
endif
endfor
[itemdef i_toprak]
id 12792
name toprak
type t_normal
on=@create
tag0.dolu=0
tag.verimsiz=1
timer=60*60*24*7
attr attr_move_Never
update
dclick
on=@dclick
LINK <src.UID>
src.sys_normal İşlem Tamam.
update
return 1
on=@timer
remove
return 1
//**Memoryler
[itemdef i_flower_link]
id i_gold
name link
type t_normal
on=@create
attr attr_invis
on=@timer
link.remove
remove
return 1
//**Tohumlar
//***********************************
[itemdef i_tohum_baharatkoy]
id i_Reag_black_pearl
type t_normal
name Kabak Tohumu (dikilmemis)
value=4350
on=@create
color 0481
on=@click
message @044,,1 <amount> <name>
return 1
on=@dclick
if !(<src.tag0.farm>)
src.sysmessage @38,6,1 Farming hakkinda bilginiz yok.
return 1
endif
target @38,6,1 Tohumu hangi topraga yerlestiriceksiniz ?
return 1
on=@targon_item
if (<src.targ.baseid>==i_toprak)
if (<src.targ.tag0.dolu>==0)
if (<src.targ.link>==<src.uid>)
if (<src.targ.tag0.verimsiz>==0)
serv.newitem i_tohum_baharat
new.link <src.uid>
new.p <src.targ.p>
new.update
src.targ.tag0.verimsiz=1
src.sysmessage @38,6,1 Tohumu yerlestirip ayni zamanda suyunu verdiniz. Ancak 5 saat sonra tohum bitki olucak ve suyunu sizin düzenli olarak vermeniz gerekicek.
consume
return 1
else
src.sysmessage @38,6,1 Bu toprak verimsiz olmus.
return 1
endif
else
src.sysmessage @38,6,1 Bu toprak size ait degil.
return 1
endif
else
src.sysmessage @38,6,1 Bu toprak zaten dolu.
return 1
endif
else
src.sysmessage @38,6,1 Bu bir toprak degil.
return 1
else
endif
[itemdef i_tohum_baharat]
id i_reag_black_pearl
name renkli tohum
type t_bitki
on=@create
timer=18000
color 045c
attr=attr_move_Never
on=@dclick
update
return 1
on=@click
message @044,,1 <name>
message @044,,1 Sulanması için <eval (<timer>/3600)> saat kalmış !
return 1
on=@timer
serv.newitem i_baharat_flower
new.p <p>
new.tag.owner=<link.uid>
new.link=<link.uid>
new.update
remove
return 1
[itemdef i_baharat_flower]
id i_fruit_pumpkin
name sus
type t_bitki
on=@Create
tag.mahsul =0
tag.bitkitime=18000
attr=attr_move_never
timer 18000
update
on=@click
message @38,6,1 [Level <dtag0.mahsul>]
message @38,6,1 Kabak
return 1
on=@dclick
//if (<link> != 04fffffff)
if (<tag0.susa>)
src.sysmessage @38,6,1 Bitki sulanmamis. Sulanmasi lazim.
return 1
endif
if (<timer> > 0) && (<tag0.mahsul> < 2)
src.sysmessage @38,6,1 Bitki su anda gayet iyi görünüyor.
return 1
endif
if (<tag0.mahsul> >= 2)
if (<tag.owner> != <src.uid>)
src.sysmessage @38,6,1 Bu sizin bitkiniz degil.
return 1
endif
src.sysmessage @03c1,6,1 Bitkiden kabak çikarttiniz.
src.newitem i_baharat
src.new.bounce
tag.mahsul=0
remove
return 1
endif
on=@Timer
if (<tag0.susa>==1)
remove
return 1
else
if (<tag0.mahsul> < 2)
tag.susa=1
timer=600
return 1
endif
endif
[itemdef i_baharat]
id i_fruit_pumpkin
value=40000
name baharat
type t_eq_script
on=@click
message @044,,1 <amount> Satışa Hazır Kabak
return 1
on=@dclick
src.sys_normal Tüccar vendoruna satabilirsiniz.
return 1
//*******************************
[itemdef i_tohum_morkoy]
id i_Reag_black_pearl
type t_normal
name Karpuz tohumu (dikilmemis)
value=6525
on=@create
color=0481
on=@click
message @044,,1 <amount> <name>
return 1
on=@dclick
if !(<src.tag0.farm>)
src.sysmessage @38,6,1 Farming hakkinda bilginiz yok.
return 1
endif
target @38,6,1 Tohumu hangi topraga yerlestiriceksiniz ?
return 1
on=@targon_item
if (<src.targ.baseid>==i_toprak)
if (<src.targ.tag0.dolu>==0)
if (<src.targ.link>==<src.uid>)
if (<src.targ.tag0.verimsiz>==0)
serv.newitem i_tohum_mor
new.link <src.uid>
new.p <src.targ.p>
new.update
src.targ.tag0.verimsiz=1
src.sysmessage @38,6,1 Tohumu yerlestirip ayni zamanda suyunu verdiniz. Ancak 5 saat sonra tohum bitki olucak ve suyunu sizin düzenli olarak vermeniz gerekicek.
consume
return 1
else
src.sysmessage @38,6,1 Bu toprak verimsiz olmus.
return 1
endif
else
src.sysmessage @38,6,1 Bu toprak size ait degil.
return 1
endif
else
src.sysmessage @38,6,1 Bu toprak zaten dolu.
return 1
endif
else
src.sysmessage @38,6,1 Bu bir toprak degil.
return 1
else
endif
[itemdef i_tohum_mor]
id i_reag_black_pearl
name Karpuz tohumu
type t_bitki
on=@create
timer=18000
color 38
attr=attr_move_Never
dclick
on=@dclick
update
return 1
on=@click
message @044,,1 <name>
message @044,,1 Sulanması için <eval (<timer>/3600)> saat kalmış !
return 1
on=@timer
serv.newitem i_mor_Bitki
new.p <p>
new.link=<link.uid>
new.tag.owner=<link.uid>
new.update
remove
return 1
[itemdef i_mor_bitki]
id i_fruit_watermelon
name Karpuz
type t_bitki
on=@Create
tag.bitkitime=18000
tag.mahsul =0
timer 18000
attr=attr_move_never
on=@click
message @38,6,1 [Level <dtag0.mahsul>]
message @38,6,1 Karpuz
return 1
on=@dclick
//if (<link> != 04fffffff)
if (<tag0.susa>)
src.sysmessage @38,6,1 Bitki sulanmamis. Sulanmasi lazim.
return 1
endif
if (<timer> > 0) && (<tag0.mahsul> < 3)
src.sysmessage @38,6,1 Bitki su anda gayet iyi görünüyor.
return 1
endif
if (<tag0.mahsul> >= 3)
if (<tag.owner> != <src.uid>)
src.sysmessage @38,6,1 Bu sizin bitkiniz degil.
return 1
endif
src.sysmessage @03c1,6,1 Bitkiden kabak çikarttiniz.
src.newitem i_karpuzsat
src.new.bounce
tag.mahsul=0
remove
return 1
endif
on=@Timer
if (<tag0.susa>==1)
remove
return 1
else
if (<tag0.mahsul> < 3)
tag.susa=1
timer=600
return 1
endif
endif
[itemdef i_karpuzsat]
id i_fruit_watermelon
value=65000
name Karpuz
type t_eq_script
on=@click
message @044,,1 <amount> Satışa Hazır Karpuz
return 1
on=@dclick
src.sys_normal Tüccar vendoruna satabilirsiniz.
return 1
///*******************************************************************
[itemdef i_tohum_suskoy]
id i_Reag_black_pearl
type t_normal
value=8717
name Muz tohumu (dikilmemis)
on=@create
color 0480
on=@click
message @044,,1 <amount> <name>
return 1
on=@dclick
if !(<src.tag0.farm>)
src.sysmessage @38,6,1 Farming hakkinda bilginiz yok.
return 1
endif
target @38,6,1 Tohumu hangi topraga yerlestiriceksiniz ?
return 1
on=@targon_item
if (<src.targ.baseid>==i_toprak)
if (<src.targ.tag0.dolu>==0)
if (<src.targ.link>==<src.uid>)
if (<src.targ.tag0.verimsiz>==0)
serv.newitem i_tohum_sus
new.link <src.uid>
new.p <src.targ.p>
new.update
src.targ.tag0.verimsiz=1
src.sysmessage @38,6,1 Tohumu yerlestirip ayni zamanda suyunu verdiniz. Ancak 5 saat sonra tohum bitki olucak ve suyunu sizin düzenli olarak vermeniz gerekicek.
consume
return 1
else
src.sysmessage @38,6,1 Bu toprak verimsiz olmus.
return 1
endif
else
src.sysmessage @38,6,1 Bu toprak size ait degil.
return 1
endif
else
src.sysmessage @38,6,1 Bu toprak zaten dolu.
return 1
endif
else
src.sysmessage @38,6,1 Bu bir toprak degil.
return 1
else
endif
[itemdef i_tohum_sus]
id i_reag_black_pearl
name Muz tohumu
type t_bitki
on=@create
timer=18000
color 0480
attr=attr_move_Never
on=@dclick
update
return 1
on=@click
message @044,,1 <name>
message @044,,1 Sulanması için <eval (<timer>/3600)> saat kalmış !
return 1
on=@timer
serv.newitem i_bitki_sus
new.p <p>
new.link=<link.uid>
new.tag.owner=<link.uid>
new.update
remove
return 1
//**Bitkiler (dikilmis)
[itemdef i_bitki_sus]
id i_fruit_banana
name Muz
type t_bitki
on=@Create
tag.mahsul =0
tag.bitkitime=18000
timer 18000
attr=attr_move_never
on=@click
message @38,6,1 [Level <dtag0.mahsul>]
message @38,6,1 Muz bitkisi
return 1
on=@dclick
//if (<link> != 04fffffff)
if (<tag0.susa>)
src.sysmessage @38,6,1 Bitki sulanmamis. Sulanmasi lazim.
return 1
endif
if (<timer> > 0) && (<tag0.mahsul> < 4)
src.sysmessage @38,6,1 Bitki su anda gayet iyi görünüyor.
return 1
endif
if (<tag0.mahsul> >= 4)
if (<tag.owner> != <src.uid>)
src.sysmessage @38,6,1 Bu sizin bitkiniz degil.
return 1
endif
src.sysmessage @03c1,6,1 Bitkiden kabak çikarttiniz.
src.newitem i_muzsat
src.new.bounce
tag.mahsul=0
remove
return 1
endif
on=@Timer
if (<tag0.susa>==4)
remove
return 1
else
if (<tag0.mahsul> < 4)
tag.susa=1
timer=600
return 1
endif
endif
[itemdef i_muzsat]
id i_fruit_banana
value=100000
name Muz
type t_eq_script
on=@click
message @044,,1 <amount> Satışa Hazır Muz
return 1
on=@dclick
src.sys_normal Tüccar vendoruna satabilirsiniz.
[typedef t_bitki]
on=@create
on=@dclick
if <tag0.susa>==0
src.sysmessage @0ad,6,1,1 Bitkiyi henüz su istemiyor <eval (<timer>/60)> dakika kalmış !
else
src.sysmessage @0ad,6,1,1 Bitkinin <eval (<timer>/60)> dakika icinde sulanmasi lazim ! Bitki susamış !
endif
if <tag0.duzelt>==0
nudgeup 2
tag0.duzelt 1
update
endif
on=@timer
if <tag0.duzelt>==0
nudgeup 2
tag0.duzelt 1
update
endif
//////////////////
[itemdef i_semer]
id 4981
name Semer
type t_normal
skillmake tailoring 62.5
resources 8 i_hides_cut
on=@create
tag.boklu=0
on=@click
message @1153,,1 <name>
return 1
on=@dclick
if !(<cont> == <src.findlayer.21.uid>)
src.sysmessage @0845,1,1 Semer'i sadece çantanızda kullanabilirsiniz.
return 1
endif
if (<tag.boklu>==1)
target @38,6,1 Verimini arttırmak istediğiniz toprağı seçiniz.
return 1
else
target @38,6,1 Dışkısını alacağınız horseyi seçiniz.
return 1
endif
on=@targon_item
if (<src.targ.baseid>==i_toprak)
if (<src.targ.link>==<src.uid>)
if (<src.targ.tag0.verimsiz>==1)
if (<tag.boklu>==1)
src.targ.tag.verimsiz = 0
tag.boklu = 0
src.sysmessage @38,6,1 Toprağın verimini arttırdınız.
return 1
else
src.sysmessage @38,6,1 Semerde at dışkısı yok.
return 1
endif
else
src.sysmessage @38,6,1 Toprak zaten verimli
return 1
endif
else
src.sysmessage @38,6,1 Toprak sizin değil
return 1
endif
else
src.sysmessage @38,6,1 Bu bir toprak değil
return 1
endif
on=@targon_char
if (<src.targ.id>==c_horse_tan) || (<src.targ.id>==c_horse_brown_Dk) || (<src.targ.id>==c_horse_gray)
if (<src.targ.ismypet>)
if (<tag.boklu>==0)
link <src.uid>
p=<src.targ.p>
attr attr_invis
timer=30
src.sysmessage @38,6,1 Semeri ata bagladiniz 30 sn. bekleyiniz.
update
return 1
else
src.sysmessage @38,6,1 Bu semerde zaten bir horse'nin dışkısı var.
return 1
endif
else
src.sysmessage @38,6,1 Bu sizin hayvaniniz degil.
return 1
endif
else
src.sysmessage @38,6,1 Bu bir horse degil.
return 1
endif
on=@timer
attr=0
tag.boklu=1
update
link.sysmessage @38,6,1 Semeri tekrardan alabilirsiniz.
return 1
0
Total votes: 0
Yorumlar (0)