|
[ITEMDEF 04230]
defname i_deed_guildstones
NAME=guildstone deed
ID=i_deed
type t_script
VALUE=879500
RESOURCES=i_deed,i_guildstone
CATEGORY=Provisions - Deeds
SUBSECTION=Guild and Town Stones
DESCRIPTION=Guild Stone
ON=@Create
ATTR=attr_newbie
color=0798
on=@Dclick
if !<uid.<region.uid>.isitem>
src.sysmessage @0845,1,1 Buraya guild kuramazsınız!
return 1
elseif ((<src.flags>&statf_stone)) || (<src.flags>&statf_freeze))
Src.sysmessage @0845,1,1 Şuan da guild kuramazsınız!
return 1
elseif !(<uid.<region.uid>.baseid>==i_multi_tower) && !(<uid.<region.uid>.baseid>==i_multi_castle) && !(<uid.<region.uid>.baseid>==i_multi_keep)
src.sysmessage @0845,1,1 Guild Stone'u sadece Castle'lara yerleştirebilirsiniz!
return 1
elseif !(<src.region.tag.owner> == <src.uid>
src.sysmessage @0845,1,1 Guild Stone'u yerleştirebilmek için castle'ın sahibi olmalısınız!
RETURN 1
elseif !(<src.isneartype t_sign_gump 2> && !(<src.p.z> < 2)
src.sysmessage @0845,1,1 Guild Stone'u sadece tabelanın yakınına koyabilirisiniz!
return 1
elseIF (<src.memoryfindtype.memory_guild.uid>
src.sysmessage @0845,1,1 Zaten <src.memoryfindtype.memory_guild.link.name> guildine üyesiniz!
return 1
ELSE
src.guildimiver
remove
return 1
endif
[function guildimiver]
serv.newitem i_guildstone
new.bounce
new.drop
new.dclick
src.sysmessage @00482,1,1 Guildiniz başarıyla kurulmuştur!
return 1
[ITEMDEF 0edc]
//gravestone
DUPEITEM=0edb
[ITEMDEF 0edb]
//gravestone = Guildstone
DEFNAME=i_guildstone
TYPE=T_STONE_GUILD
VALUE=896000
On=@Create
attr 010
dispid 0ed4
color 0798
name *
On=@Click
message a guild stone
if !(strmatch('<abbrev>','')
msgua <name> [<abbrev>]
else
msgua <name>
endif
if (<more1> == 1)
msgua [Order]
elseif (<more1> == 2)
msgua [Chaos]
elseif (<link> != 04fffffff)
msgua [<link.name>]
endif
return 1
On=@TargOn_Char
if (<morex> == 1)
if (<src.targ.npc>
src.sysmessage @0845,1,1 Sadece oyuncular guild üyesi olabilir!
elseif (<src.targ.distance> > 3)
src.sysmessage @0845,1,1 <src.targ.name> bu işlem için stone'a yeterince yakın değil!
elseif (<src.targ.memoryfindtype.memory_guild>
if (<src.targ.memoryfindtype.memory_guild.link> != <uid>
src.sysmessage @0845,1,1 <src.targ.name> üye olabilmesi için öncelikle <src.targ.memoryfindtype.memory_guild.link.name> üyeliğinden çıkmalıdır!
elseif (<src.targ.memoryfindtype.memory_guild.link> == <uid>
src.sysmessage @0845,1,1 <src.targ.name> zaten bir <name> üyesidir!
endif
elseif (<src.targ.memoryfindtype.memory_town> && (<src.targ.memoryfindtype.memory_town.link> != <link>
src.sysmessage @0845,1,1 <src.targ.name> guildin desteklemediği <src.targ.memoryfindtype.memory_town.link.name> faction'ında. Bir <name> üyesi olamaz.
elseif (<src.targ.findid.i_gs_recruit>
src.sysmessage @666,1,1 <src.targ.name> Şuan düşünme aşamasındadır.
else
src.newitem i_gs_recruit
src.act.cont <src.targ.uid>
src.act.more1 <src.uid>
src.act.more2 <uid>
src.act.timer 1
endif
elseif (<morex> == 2)
if (<src.targ.memoryfindtype.memory_guild.link> != <uid>
src.sysmessage @0845,1,1 Ünvan vermeye çalıştığınız kişi bir <name> üyesi değildir!
menu menu_guild_masterfunc
elseif (<src.targ.distance> > 3)
src.sysmessage @0845,1,1 <src.targ.name> bu işlem için stone'a yeterince yakın değil!
else
src.act <src.targ.uid>
dialog d_gs_title
endif
endif
return 1
On=@TargOn_Ground
return 1
On=@TargOn_Item
return 1
On=@Timer
if (<morey> == 1)
if (<link> != 04fffffff)
link.morex <eval (<link.morex> - 1)>
endif
morey 0
more1 1
link 04fffffff
src.sysmessage @00482,1,1 Yeni destek yönü: Order.
elseif (<morey> == 2)
if (<link> != 04fffffff)
link.morex <eval (<link.morex> - 1)>
endif
morey 0
more1 2
link 04fffffff
src.sysmessage @00482,1,1 Yeni destek yönü: Chaos.
elseif (<morey> == 3)
if (<link> != 04fffffff)
link.morex <eval (<link.morex> - 1)>
endif
morey 0
more1 0
link 04fffffff
src.sysmessage @00482,1,1 Yeni destek yönü: Tarafsız.
elseif (<morey> == 4)
if (<link> != 04fffffff)
link.morex <eval (<link.morex> - 1)>
endif
morey 0
more1 0
link 04009163d
link.morex <eval (<link.morex> + 1)>
src.sysmessage @00482,1,1 Yeni destek yönü: <link.name>.
elseif (<morey> == 5)
if (<link> != 04fffffff)
link.morex <eval (<link.morex> - 1)>
endif
morey 0
more1 0
link 04009149f
link.morex <eval (<link.morex> + 1)>
src.sysmessage @00482,1,1 Yeni destek yönü: <link.name>.
elseif (<morey> == 6)
if (<link> != 04fffffff)
link.morex <eval (<link.morex> - 1)>
endif
morey 0
more1 0
link 040091450
link.morex <eval (<link.morex> + 1)>
src.sysmessage @00482,1,1 Yeni destek yönü: <link.name>.
elseif (<morey> == 7)
if (<link> != 04fffffff)
link.morex <eval (<link.morex> - 1)>
endif
morey 0
more1 0
link 04009139c
link.morex <eval (<link.morex> + 1)>
src.sysmessage @00482,1,1 Yeni destek yönü: <link.name>.
endif
return 1
[dialog d_gs_title]
100,50
resizepic 190 175 3600 350 133
text 220 200 790 0
text 255 277 790 1
button 220 275 4006 4007 1 0 1
text 435 277 100 790 2
button 400 275 4018 4019 1 0 0
textentry 225 237 253 25 0564 0 3
[dialog d_gs_title TEXT]
Vermek istediğiniz ünvanı giriniz. (14 karakter)
Tamam
Vazgeç
Buraya yazınız_
[dialog d_gs_title BUTTON]
On=0
if (<distance> < 4)
menu menu_guild_masterfunc
endif
On=1
if (<distance> > 3)
src.sysmessage @0845,1,1 Bu işlem için Guildstone'a yeterince yakın değilsiniz!
elseif (<src.act.distance> > 3)
src.sysmessage @0845,1,1 <src.act.name> bu işlem için size yeterince yakın değil!
elseif ((strlen(<argtxt[0]>) > 14)
src.sysmessage @0845,1,1 Bir ünvan en fazla 14 karakterden oluşabilir!
dialog d_gs_title
elseif (strmatch('<argtxt[0]>','')
src.act.tag.gs_title
src.act.sysmessage @666,1,1 Ünvanınız silinmiştir.
if (<src.uid> != <src.act.uid>
src.sysmessage @666,1,1 <src.act.name>: ünvanı silinmiştir.
endif
menu menu_guild_masterfunc
else
src.act.tag.gs_title <argtxt[0]>
src.act.sysmessage @666,1,1 Yeni ünvan: <src.act.tag.gs_title>.
if (<src.uid> != <src.act.uid>
src.sysmessage @666,1,1 <src.act.name> yeni ünvan: <src.act.tag.gs_title>.
endif
menu menu_guild_masterfunc
endif
[itemdef i_gs_recruit]
name guild recruiter
weight 0
id i_gold
type t_eq_script
layer layer_special
On=@UnEquip
try src.act <more2>
try src.dialog d_gs_recruit
return 1
On=@Timer
remove
return 1
[dialog d_gs_alignment]
-100,-100
nomove
resizepic 190 165 3600 275 275
text 220 185 38 0
text 215 208 38 1
text 258 277 1152 2
text 258 297 1152 3
text 258 317 1152 4
text 258 337 1152 5
text 258 357 1152 6
text 258 377 1152 7
text 258 397 1152 8
button 225 275 4006 4007 1 0 1
button 225 295 4006 4007 1 0 2
button 225 315 4006 4007 1 0 3
button 225 335 4006 4007 1 0 4
button 225 355 4006 4007 1 0 5
button 225 375 4006 4007 1 0 6
button 225 395 4006 4007 1 0 7
[dialog d_gs_alignment text]
<name>: <var.gs_align>
Dikkat! guild'in destek yonunu degistirdiginiz takdirde, eger tarafsiz bir guild degilse 24 saat boyunca bu menuyu kullanamayacak ve eski destek tarafinizda kalmaya devam edeceksiniz, 24 saat sonunda otomatik olarak desteginiz degisecektir. Tarafsiz guild'ler menuden islem yapildigi anda taraf degistirebilirler. Destek yonunuzu Order veya Chaos'a cevirdiginizde, tum guild uyeleri (candidate'ler haric) O/C'ye dahil olacaktir. Fakat destek yonunuzu faction'lardan bir tanesine cevirirseniz sadece faction savaslarinda bulunmak isteyen guild uyeleri ilgili faction stone'dan faction'a kayit olarak bu olusuma dahil olabileceklerdir.
British: Order
Blackthorn: Chaos
Tarafsiz
Faction: Shamino
Faction: Jakama
Faction: Daxantec
Faction: Arcanum
[dialog d_gs_alignment button]
On=0
menu menu_guild_masterfunc
On=1
if (<more1> == 1)
src.sysmessage @0845,1,1 <name> zaten bir Order guildi !
else
morey 1
if (<more1> == 0) && (<link> == 04fffffff)
timer 1
else
sayua Taraf değiştirme süreci başlamıştır!
timer 86400
endif
endif
menu menu_guild_masterfunc
On=2
if (<more1> == 2)
src.sysmessage @0845,1,1 <name> zaten bir Chaos guildi.
else
morey 2
if (<more1> == 0) && (<link> == 04fffffff)
timer 1
else
sayua Taraf değiştirme süreci başlamıştır!
timer 86400
endif
endif
menu menu_guild_masterfunc
On=3
if (<more1> == 0) && (<link> == 04fffffff)
src.sysmessage @0845,1,1 <name> zaten tarafsız bir guild.
else
morey 3
sayua Taraf değiştirme süreci başlamıştır !
timer 86400
endif
menu menu_guild_masterfunc
On=4
if (<link> == 04009163d)
src.sysmessage <name> zaten bir Shamino guildi.
else
morey 4
if (<more1> == 0) && (<link> == 04fffffff)
timer 1
else
sayua Taraf degistirme sureci baslamistir.
timer 86400
endif
endif
menu menu_guild_masterfunc
On=5
if (<link> == 04009149f)
src.sysmessage <name> zaten bir Jakama guildi.
else
morey 5
if (<more1> == 0) && (<link> == 04fffffff)
timer 1
else
sayu Taraf degistirme sureci baslamistir.
timer 86400
endif
endif
menu menu_guild_masterfunc
On=6
if (<link> == 040091450)
src.sysmessage <name> zaten bir Daxantec guildi.
else
morey 6
if (<more1> == 0) && (<link> == 04fffffff)
timer 1
else
sayu Taraf degistirme sureci baslamistir.
timer 86400
endif
endif
menu menu_guild_masterfunc
On=7
if (<link> == 04009139c)
src.sysmessage <name> zaten bir Arcanum guildi.
else
morey 7
if (<more1> == 0) && (<link> == 04fffffff)
timer 1
else
sayu Taraf degistirme sureci baslamistir.
timer 86400
endif
endif
menu menu_guild_masterfunc
[dialog d_gs_recruit]
-100,-100
nomove
resizepic 190 165 3600 275 155
text 215 188 38 1
text 258 257 1152 2
text 258 277 1152 3
button 225 255 4006 4007 1 0 1
button 225 275 4018 4019 1 0 0
[dialog d_gs_recruit text]
<uid.<findid.i_gs_recruit.more1>.name> tarafından <act.name> guild'ine davet edildiniz. Bu guild'e katılmak istiyor musunuz?
Evet
Hayır
[dialog d_gs_recruit button]
On=1
if (<act.distance> > 3)
sysmessage @0845,1,1 Guild stone'a yeterince yakın değilsiniz!
else
try tag.gs_title
try uid.<act.uid>.applytojoin
endif
[ITEMDEF 0ede]
//gravestone
DUPEITEM=0edd
[MENU MENU_GUILD_MASTER]
<Name> (<MasterTitle> <Master>
ON=0 Guilde Al
RECRUIT
ON=0 Guild Uyeleri
VIEWROSTER
ON=0 Guildden ayril
RESIGN
ON=0 Guild Uyelik Adaylari
VIEWCANDIDATES
ON=0 <Name> savas ilan ettigi guildler
VIEWENEMYS
ON=0 <Name> guildine savas ilan eden guildler
VIEWTHREATS
ON=0 Guild Kalkani al
if (<src.targ.more> == 1)
if (0<src.tag.sho> == 1)
src.sysmessage @666,1,1 Lord British size daha önce kalkan vermiş!
return 1
endif
src.tag.sho 1
src.newitem i_shield_order
src.act.bounce
elseif (<src.targ.more> == 2)
if (0<src.tag.shc> == 1)
src.sysmessage @666,1,1 Lord Blackthorne size daha önce kalkan vermiş!
return 1
endif
src.tag.shc 1
src.newitem i_shield_chaos
src.act.bounce
else
src.sysmessage @0845,1,1 Sadece Order ve Chaos guildleri kalkan alabilir!
endif
ON=0 Guild <MasterGenderTitle> Menusu
src.tag.gs_title 1
MASTERMENU
[MENU MENU_GUILD_MEMBER]
<Name> (<MasterTitle> <Master>
ON=0 Guild Uyeleri
VIEWROSTER
ON=0 Guildden ayril
src.tag.gs_title
RESIGN
On=0 Unvanı Reddet
src.sysmessage @666,1,1 Ünvanı Reddettiniz.
src.tag.gs_title
src.tag.gunvan
src.tag.unvanvar
ON=0 Guild Üyelik Adayları
VIEWCANDIDATES
ON=0 <Name> savas ilan ettigi guildler
VIEWENEMYS
ON=0 <Name> guildine savas ilan eden guildler
VIEWTHREATS
ON=0 Guild Kalkani al
if (<src.targ.more> == 1)
if (0<src.tag.sho> == 1)
src.sysmessage @0845,1,1 Lord British size daha önce kalkan vermiş!
return 1
endif
src.tag.sho 1
src.newitem i_shield_order
src.act.bounce
elseif (<src.targ.more> == 2)
if (0<src.tag.shc> == 1)
src.sysmessage @0845,1,1 Lord Blackthorne size daha önce kalkan vermiş!
return 1
endif
src.tag.shc 1
src.newitem i_shield_chaos
src.act.bounce
else
src.sysmessage @0845,1,1 Sadece Order ve Chaos guildleri kalkan alabilir.
endif
// Guild master functions.
[MENU MENU_GUILD_MASTERFUNC]
<Name> Master Menu
ON=0 Guildin adini degistir
dialog d_gs_rename
ON=0 Guildin kisa adini degistir
dialog d_gs_abbrev
ON=0 Guild destegi
if (<src.findid.i_changerfixer>
src.sysmessage @0845,1,1 Guild desteğini değistirebilmeniz için gerekli zaman :
src.sysmessage @00482,1,1 <eval <src.findid.i_changerfixer.timer> / 60> dakika [ <eval <src.findid.i_changerfixer.timer> / 3600> saat]
return 1
else
CHANGEALIGN
endif
//ON=0 Guild Posteri Ayarla
//SETCHARTER
ON=0 Guildden Uye At
DISMISSMEMBER
ON=0 Savas Ilan Et
DECLAREWAR
ON=0 Baris Ilan Et
DECLAREPEACE
ON=0 Guild adayligini kabul et
ACCEPTCANDIDATE
ON=0 Guild adayligini red et
REFUSECANDIDATE
ON=0 Guildmaster'a title ekle
SETGMTITLE
ON=0 Bir uyeye title ekle
GRANTTITLE
On=0 Bir uyeye unvan ekle
src.dialog d_unvanver
on=0 Bir uyenin unvanini sil
src.newitem i_unvansilerim
src.act.equip
ON=0 Guildi kaldir
if (<link> != 04fffffff)
link.morex <eval (<link.morex> - 1)>
endif
src.findid.i_changerfixer.remove
src.tag.gs_title
src.sysmessage @666,1,1 Guildinizi kaldırdınız.
REMOVE
src.newitem i_deed_guildstone
src.act.bounce
ON=0 Ana menuye geri don
RETURNMAINMENU
//ON=0 Issue Chaos Shields
//NEWITEM=i_shield_chaos
//SRC.ACT.LINK=<SERIAL>
//ON=0 Issue Order Shields
//NEWITEM=I_SHIELD_ORDER
//SRC.ACT.LINK=<SERIAL>
// Non-member view.
// Non-member view.
[MENU MENU_GUILD_NON]
<Name> Guild Master : (<Master>
ON=0 Guild Uyeleri
VIEWROSTER
ON=0 Guild Uye Adaylari
VIEWCANDIDATES
ON=0 <Name> Guildinin Dusmanlari
VIEWENEMYS
ON=0 <Name> Guildine Savas Acanlar
VIEWTHREATS
[MENU MENU_GUILD_ALIGN]
Guild destegini degistir (Su anda <AlignType> )
ON=0 Chaos
CHANGEALIGN 2
src.newitem i_changerfixer
src.act.equip
ON=0 Tarafsiz
src.newitem i_changerfixer
src.act.equip
CHANGEALIGN 0
ON=0 Order
src.newitem i_changerfixer
src.act.equip
CHANGEALIGN 1
[dialog d_unvanver]
100,50
resizepic 200 185 3600 350 133
text 220 200 1152 0
text 255 277 1152 1
button 220 275 4006 4007 1 0 1
text 435 277 1152 2
button 400 275 4018 4019 1 0 0
textentry 225 237 253 25 0564 0 3
[dialog d_unvanver TEXT]
Üyenin Ünvanını giriniz. (14 karakter)
Tamam
Vazgeç
Buraya yazınız_
[dialog d_unvanver BUTTON]
On=0
if (<distance> < 4)
menu menu_guild_masterfunc
endif
On=1
if (<distance> > 3)
src.sysmessage @0845,1,1 Bu işlem için guildstone'a yeterince yakın değilsiniz!
elseif ((strlen(<argtxt[0]>) > 14)
src.sysmessage @0845,1,1 Ünvan en fazla 14 karakterden oluşabilir!
dialog d_unvanver
elseif (strmatch('<argtxt[0]>','')
src.sysmessage @0845,1,1 Bir ünvan girmediniz!
dialog d_unvanver
else
tag.unvan <argtxt[0]>
src.newitem i_unvanvercem
src.act.equip
return 1
endif
[itemdef i_unvanvercem]
id i_gold
type t_eq_script
weight 0
name unvan ver
on=@create
attr attr_invis || attr_decay || attr_newbie
on=@equip
target
src.sysmessage @666,1,1 Ünvan vermek istiyorsunuz?
timer 5
on=@targon_item
src.sysmessage @0845,1,1 Buna ünvan veremezsiniz!
return 1
on=@targon_char
if (<src.uid> == <src.targ.uid>
src.sysmessage @0845,1,1 Guildmasterın zaten ünvanı var.
return 1
elseif !(strmatch('<src.memoryfindtype.memory_guild.link.name>','<src.targ.memoryfindtype.memory_guild.link.name>'
src.sysmessage @0845,1,1 Bu kişi guildinize üye değildir!
return 1
elseif (strmatch('<src.tag.unvan>','Guildmaster'
src.sysmessage @0845,1,1 Böyle bir ünvan veremezsiniz!
return 1
elseif (strmatch('<src.tag.unvan>','sikici'
src.sysmessage @0845,1,1 Böyle bir ünvan veremezsiniz!
return 1
elseif (strmatch('<src.tag.unvan>','Fahise'
src.sysmessage @0845,1,1 Böyle bir ünvan veremezsiniz!
return 1
elseif (strmatch('<src.tag.unvan>','Fahi$e'
src.sysmessage @0845,1,1 Böyle bir ünvan veremezsiniz!
return 1
elseif (strmatch('<src.tag.unvan>','Orospu'
src.sysmessage @0845,1,1 Böyle bir ünvan veremezsiniz!
return 1
elseif (strmatch('<src.tag.unvan>','Pezevenk'
src.sysmessage @0845,1,1 Böyle bir ünvan veremezsiniz!
return 1
elseif (strmatch('<src.tag.unvan>','Pezewenk'
src.sysmessage @0845,1,1 Böyle bir ünvan veremezsiniz!
return 1
elseif (strmatch('<src.tag.unvan>','Pezewenq'
src.sysmessage @0845,1,1 Böyle bir ünvan veremezsiniz!
return 1
elseif (strmatch('<src.tag.unvan>','Pezevenq'
src.sysmessage @0845,1,1 Böyle bir ünvan veremezsiniz!
return 1
elseif (strmatch('<src.tag.unvan>','Amele'
src.sysmessage @0845,1,1 Böyle bir ünvan veremezsiniz!
return 1
else
src.gc <src.targ.name> <src.tag.unvan> ünvanını aldı.
src.targ.tag.gunvan <src.tag.unvan>
src.targ.tag.unvanvar 1
return 1
endif
on=@timer
remove
return 1
[itemdef i_unvansilerim]
id i_gold
weight 0
name Unvan silici
type t_eq_script
on=@create
attr attr_invis || attr_decay || attr_newbie
on=@equip
target
src.sysmessage @666,1,1 Kimin ünvanı silinsin?
timer 5
on=@targon_item
return 1
on=@targon_char
if (<src.uid> == <src.targ.uid>
src.sysmessage @666,1,1 Guildmaster ünvanı silinemez.
return 1
elseif !(strmatch('<src.memoryfindtype.memory_guild.link.name>','<src.targ.memoryfindtype.memory_guild.link.name>'
src.sysmessage @0845,1,1 Bu kişi guildinize üye değildir!
return 1
else
src.gc <src.targ.name> isimli üyenin ünvani silinmiştir.
src.targ.tag.gunvan
src.targ.tag.unvanvar
return 1
endif
on=@timer
remove
return 1
[dialog d_gs_abbrev]
100,50
resizepic 200 185 3600 350 133
text 220 200 38 0
text 255 277 1152 1
button 220 275 4006 4007 1 0 1
text 435 277 1152 2
button 400 275 4018 4019 1 0 0
textentry 225 237 253 25 0564 0 3
[dialog d_gs_abbrev TEXT]
Yeni guild kısaltması giriniz. (3 karakter)
Tamam
Vazgeç
Buraya yazınız_
[dialog d_gs_abbrev BUTTON]
On=0
if (<distance> < 4)
menu menu_guild_masterfunc
endif
On=1
if (<distance> > 3)
src.sysmessage @0845,1,1 Bu işlem için guildstone'a yeterince yakın değilsiniz!
elseif ((strlen(<argtxt[0]>) > 3)
src.sysmessage @0845,1,1 Guild kisaltması en fazla 3 karakterden oluşabilir!
dialog d_gs_abbrev
elseif (strmatch('<argtxt[0]>','')
src.sysmessage @0845,1,1 Bir kısaltma girmediniz!
dialog d_gs_abbrev
else
abbrev <argtxt[0]>
src.sysmessage @00482,1,1 Yeni kısaltma: <abbrev>
menu menu_guild_masterfunc
endif
[dialog d_gs_rename]
100,50
resizepic 200 185 3600 340 133
text 220 200 38 0
text 255 277 1152 1
button 220 275 4006 4007 1 0 1
text 435 277 1152 2
button 400 275 4018 4019 1 0 0
textentry 225 237 253 25 0564 0 3
[dialog d_gs_rename TEXT]
Yeni guild adını giriniz. (16 karakter)
Tamam
Vazgeç
Buraya yazınız_
[dialog d_gs_rename BUTTON]
On=0
if (<distance> < 4)
menu menu_guild_masterfunc
endif
On=1
if (<distance> > 3)
src.sysmessage @0845,1,1 Bu işlem için guildstone'a yeterince yakın değilsiniz!
elseif ((strlen(<argtxt[0]>) > 16)
src.sysmessage @666,1,1 Guild ismi en fazla 16 karakterden oluşabilir.
dialog d_gs_rename
elseif (strmatch('<argtxt[0]>','')
src.sysmessage @666,1,1 Bir isim girmediniz?
dialog d_gs_rename
else
name <argtxt[0]>
src.sysmessage @00482,1,1 Yeni isim: <name>
menu menu_guild_masterfunc
endif
[itemdef i_changerfixer]
name GuildFixByNoxier
id i_memory
type t_eq_script
weight 0
on=@create
attr attr_decay || attr_invis || attr_newbie
color 0810
on=@equip
timer 43200
return 1
on=@timer
cont.sysmessage @00482,1,1 Artık Guild desteğini değiştirebilirsiniz.
remove
return 1
[ITEMDEF 01bc4]
DEFNAME=i_shield_order
name=Order Shield
TYPE=t_shield
FLIP=1
VALUE=1
WEIGHT=1
ARMOR=30
REQSTR=60
CATEGORY=Provisions - Armor
SUBSECTION=Shields
DESCRIPTION=Order Shield
ON=@Create
hitpoints 100
attr 04
On=@Equip
if (<src.isgm>
return 0
elseif !(<src.memoryfindtype.memory_guild>
src.sysmessage @666,1,1 Bunu kullanmak için Order guildlerden birine üye olmalısınız.
unequip
return 1
elseif !(<src.memoryfindtype.memory_guild.link.align> == 1)
src.sysmessage @666,1,1 Chaos Guildleri Order kalkanı kullanamaz.
unequip
return 1
endif
[ITEMDEF 01bc3]
DEFNAME=i_shield_chaos
TYPE=t_shield
name=Chaos Shield
FLIP=1
VALUE=1
WEIGHT=1
ARMOR=30
REQSTR=60
CATEGORY=Provisions - Armor
SUBSECTION=Shields
DESCRIPTION=Chaos Shield
ON=@Create
hitpoints 100
attr 04
On=@Equip
if (<src.isgm>
return 0
elseif !(<src.memoryfindtype.memory_guild>
src.sysmessage @0845,1,1 Bunu kullanmak için Chaos guildlerden birine üye olmalısınız.
unequip
return 1
elseif !(<src.memoryfindtype.memory_guild.link.align> == 2)
src.sysmessage @0845,1,1 Order Guildleri Chaos kalkanı kullanamaz.
unequip
return 1
endif
[plevel 1]
gc
[function gc]
if <memoryfindtype.memory_guild.link.uid>
serv.allclients smsGc <name> :: <args>
else
src.sysmessage @0845,1,1 Herhangi bir guild'e üye değilsiniz.
endif
[FUNCTION smsGc]
IF <MEMORYFINDTYPE.MEMORY_GUILD.LINK.UID>==<SRC.MEMORYFINDTYPE.MEMORY_GUILD.LINK.UID>
var.sysmessage @90,1,1 61
src.sysmessage @90,1,1 <args>
endif
[FUNCTION guildonline]
IF <SRC.MEMORYFINDTYPE.MEMORY_GUILD.LINK.UID>!=0
SRC.NEWITEM i_guild_online
SRC.ACT.EQUIP
SERV.Allclients goncheck
SRC.DIALOG d_guild_online
SRC.ACT.REMOVE
else
src.sysmessage @0845,1,1 Herhangi bir guild'e üye değilsiniz.
endif
[FUNCTION goncheck]
IF <MEMORYFINDTYPE.MEMORY_GUILD.LINK.UID>==<SRC.MEMORYFINDTYPE.MEMORY_GUILD.LINK.UID>
else
return 1
endif
if <src.findid.i_guild_online.tag.p1>==0
src.findid.i_guild_online.tag.player1=<name>
src.findid.i_guild_online.tag.player119=<region.name>
src.findid.i_guild_online.tag.p1=1
elseif <src.findid.i_guild_online.tag.p2>==0
src.findid.i_guild_online.tag.player2=<name>
src.findid.i_guild_online.tag.player22=<region.name>
src.findid.i_guild_online.tag.p2=1
elseif <src.findid.i_guild_online.tag.p3>==0
src.findid.i_guild_online.tag.player3=<name>
src.findid.i_guild_online.tag.player33=<region.name>
src.findid.i_guild_online.tag.p3=1
elseif <src.findid.i_guild_online.tag.p4>==0
src.findid.i_guild_online.tag.player4=<name>
src.findid.i_guild_online.tag.player44=<region.name>
src.findid.i_guild_online.tag.p4=1
elseif <src.findid.i_guild_online.tag.p5>==0
src.findid.i_guild_online.tag.player5=<name>
src.findid.i_guild_online.tag.player55=<region.name>
src.findid.i_guild_online.tag.p5=1
elseif <src.findid.i_guild_online.tag.p6>==0
src.findid.i_guild_online.tag.player6=<name>
src.findid.i_guild_online.tag.player66=<region.name>
src.findid.i_guild_online.tag.p6=1
elseif <src.findid.i_guild_online.tag.p7>==0
src.findid.i_guild_online.tag.player7=<name>
src.findid.i_guild_online.tag.player77=<region.name>
src.findid.i_guild_online.tag.p7=1
elseif <src.findid.i_guild_online.tag.p8>==0
src.findid.i_guild_online.tag.player8=<name>
src.findid.i_guild_online.tag.player88=<region.name>
src.findid.i_guild_online.tag.p8=1
elseif <src.findid.i_guild_online.tag.p9>==0
src.findid.i_guild_online.tag.player9=<name>
src.findid.i_guild_online.tag.player99=<region.name>
src.findid.i_guild_online.tag.p9=1
elseif <src.findid.i_guild_online.tag.p10>==0
src.findid.i_guild_online.tag.player10=<name>
src.findid.i_guild_online.tag.player100=<region.name>
src.findid.i_guild_online.tag.p10=1
elseif <src.findid.i_guild_online.tag.p11>==0
src.findid.i_guild_online.tag.player11=<name>
src.findid.i_guild_online.tag.player110=<region.name>
src.findid.i_guild_online.tag.p11=1
elseif <src.findid.i_guild_online.tag.p12>==0
src.findid.i_guild_online.tag.player12=<name>
src.findid.i_guild_online.tag.player120=<region.name>
src.findid.i_guild_online.tag.p12=1
elseif <src.findid.i_guild_online.tag.p13>==0
src.findid.i_guild_online.tag.player13=<name>
src.findid.i_guild_online.tag.player130=<region.name>
src.findid.i_guild_online.tag.p13=1
elseif <src.findid.i_guild_online.tag.p14>==0
src.findid.i_guild_online.tag.player14=<name>
src.findid.i_guild_online.tag.player150=<region.name>
src.findid.i_guild_online.tag.p14=1
elseif <src.findid.i_guild_online.tag.p15>==0
src.findid.i_guild_online.tag.player15=<name>
src.findid.i_guild_online.tag.player150=<region.name>
src.findid.i_guild_online.tag.p15=1
endif
[DIALOG d_guild_online]
60,0
resizepic 0 30 3500 400 500
resizepic 0 30 3600 400 500
dtext 26 50 1153 Guildinizdeki Online Oyuncular;
dtext 26 80 1153 -<SRC.FINDID.i_guild_online.tag.player1>
dtext 26 110 1153 -<SRC.FINDID.i_guild_online.tag.player2>
dtext 26 140 1153 -<SRC.FINDID.i_guild_online.tag.player3>
dtext 26 170 1153 -<SRC.FINDID.i_guild_online.tag.player4>
dtext 26 200 1153 -<SRC.FINDID.i_guild_online.tag.player5>
dtext 26 230 1153 -<SRC.FINDID.i_guild_online.tag.player6>
dtext 26 260 1153 -<SRC.FINDID.i_guild_online.tag.player7>
dtext 26 290 1153 -<SRC.FINDID.i_guild_online.tag.player8>
dtext 26 320 1153 -<SRC.FINDID.i_guild_online.tag.player9>
dtext 26 350 1153 -<SRC.FINDID.i_guild_online.tag.player10>
dtext 26 380 1153 -<SRC.FINDID.i_guild_online.tag.player11>
dtext 26 410 1153 -<SRC.FINDID.i_guild_online.tag.player12>
dtext 26 440 1153 -<SRC.FINDID.i_guild_online.tag.player13>
dtext 26 470 1153 -<SRC.FINDID.i_guild_online.tag.player14>
dtext 26 500 1153 -<SRC.FINDID.i_guild_online.tag.player15>
dtext 230 80 0455 -<SRC.FINDID.i_guild_online.tag.player119>
dtext 230 110 0455 -<SRC.FINDID.i_guild_online.tag.player22>
dtext 230 140 0455 -<SRC.FINDID.i_guild_online.tag.player33>
dtext 230 170 0455 -<SRC.FINDID.i_guild_online.tag.player44>
dtext 230 200 0455 -<SRC.FINDID.i_guild_online.tag.player55>
dtext 230 230 0455 -<SRC.FINDID.i_guild_online.tag.player66>
dtext 230 260 0455 -<SRC.FINDID.i_guild_online.tag.player77>
dtext 230 290 0455 -<SRC.FINDID.i_guild_online.tag.player88>
dtext 230 320 0455 -<SRC.FINDID.i_guild_online.tag.player99>
dtext 230 350 0455 -<SRC.FINDID.i_guild_online.tag.player100>
dtext 230 380 0455 -<SRC.FINDID.i_guild_online.tag.player110>
dtext 230 410 0455 -<SRC.FINDID.i_guild_online.tag.player120>
dtext 230 440 0455 -<SRC.FINDID.i_guild_online.tag.player130>
dtext 230 470 0455 -<SRC.FINDID.i_guild_online.tag.player140>
dtext 230 500 0455 -<SRC.FINDID.i_guild_online.tag.player150>
[DIALOG d_guild_online BUTTON]
[ITEMDEF i_guild_online]
Name=Gg
Id=i_memory
type=t_eq_script
ON=@Create
TAG.P1=0
TAG.P2=0
TAG.P3=0
TAG.P4=0
TAG.P5=0
TAG.P6=0
TAG.P7=0
TAG.P8=0
TAG.P9=0
TAG.P10=0
TAG.P11=0
TAG.P12=0
TAG.P13=0
TAG.P14=0
TAG.P15=0
[plevel 1]
gc
guildonline
[EOF]
on=@Dclick
if !<uid.<region.uid>.isitem>
src.sysmessage @0845,1,1 Buraya guild kuramazsınız!
return 1
elseif ((<src.flags>&statf_stone)) || (<src.flags>&statf_freeze))
Src.sysmessage @0845,1,1 Şuan da guild kuramazsınız!
return 1
elseif !(<uid.<region.uid>.baseid>==i_multi_tower) && !(<uid.<region.uid>.baseid>==i_multi_castle) && !(<uid.<region.uid>.baseid>==i_multi_keep)
src.sysmessage @0845,1,1 Guild Stone'u sadece Castle'lara yerleştirebilirsiniz!
return 1
elseif !(<src.region.tag.owner> == <src.uid>
src.sysmessage @0845,1,1 Guild Stone'u yerleştirebilmek için castle'ın sahibi olmalısınız!
RETURN 1
elseif !(<src.isneartype t_sign_gump 2> && !(<src.p.z> < 2)
src.sysmessage @0845,1,1 Guild Stone'u sadece tabelanın yakınına koyabilirisiniz!
return 1
elseIF (<src.memoryfindtype.memory_guild.uid>
src.sysmessage @0845,1,1 Zaten <src.memoryfindtype.memory_guild.link.name> guildine üyesiniz!
return 1
ELSE
src.guildimiver
remove
return 1
endifelseif !(<src.isneartype t_sign_gump 2> && !(<src.p.z> < 2)
src.sysmessage @0845,1,1 Guild Stone'u sadece tabelanın yakınına koyabilirisiniz!
return 1
[PLEVEL 1]
gon
[FUNCTION gon]
IF (<MEMORYFINDTYPE.memory_guild.LINK.UID>)
guild_clear 1
TRYP 0 VAR.GUILD.<UID>.COUNT 0
SERV.ALLCLIENTS guild_all <MEMORYFINDTYPE.memory_guild.LINK.UID>
TAG.GUILD 0
sDIALOG d_guild
ENDIF
[FUNCTION guild_clear]
IF (0<VAR.GUILD.<UID>.<ARGN>>)
TRYP 0 VAR.GUILD.<UID>.<ARGN>
guild_clear <ARGN> + 1
ENDIF
[FUNCTION guild_all]
IF (<MEMORYFINDTYPE.memory_guild.LINK.UID> == <ARGN>)
SRC.TRYP 0 VAR.GUILD.<SRC.UID>.COUNT <VAR.GUILD.<SRC.UID>.COUNT> + 1
SRC.TRYP 0 VAR.GUILD.<SRC.UID>.<EVAL <VAR.GUILD.<SRC.UID>.COUNT>> <UID>
ENDIF
[DIALOG d_guild]
205,100
resizepic 0 0 5120 290 400
resizepic 5 5 3000 280 390
text <EVAL (291 / 2) - ((STRLEN(<MEMORYFINDTYPE.memory_guild.NAME>) * 8) / 2)> 20 482 0
button <EVAL 0 + 20> <EVAL 405 - 50> 4014 4016 1 0 1
button <EVAL 291 - 50> <EVAL 405 - 50> 4005 4007 1 0 2
page <EVAL <UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 1>>.ISCHAR> - 1>
text 23 45 1152 1
croppedtext 145 45 110 20 1152 16
page <EVAL <UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 2>>.ISCHAR> - 1>
text 23 65 1152 2
croppedtext 145 65 110 20 1152 17
page <EVAL <UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 3>>.ISCHAR> - 1>
text 23 85 1152 3
croppedtext 145 85 110 20 1152 18
page <EVAL <UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 4>>.ISCHAR> - 1>
text 23 105 1152 4
croppedtext 145 105 110 20 1152 19
page <EVAL <UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 5>>.ISCHAR> - 1>
text 23 125 1152 5
croppedtext 145 125 110 20 1152 20
page <EVAL <UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 6>>.ISCHAR> - 1>
text 23 145 1152 6
croppedtext 145 145 110 20 1152 21
page <EVAL <UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 7>>.ISCHAR> - 1>
text 23 165 1152 7
croppedtext 145 165 110 20 1152 22
page <EVAL <UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 8>>.ISCHAR> - 1>
text 23 185 1152 8
croppedtext 145 185 110 20 1152 23
page <EVAL <UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 9>>.ISCHAR> - 1>
text 23 205 1152 9
croppedtext 145 205 110 20 1152 24
page <EVAL <UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 10>>.ISCHAR> - 1>
text 23 225 1152 10
croppedtext 145 225 110 20 1152 25
page <EVAL <UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 11>>.ISCHAR> - 1>
text 23 245 1152 11
croppedtext 145 245 110 20 1152 26
page <EVAL <UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 12>>.ISCHAR> - 1>
text 23 265 1152 12
croppedtext 145 265 110 20 1152 27
page <EVAL <UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 13>>.ISCHAR> - 1>
text 23 285 1152 13
croppedtext 145 285 110 20 1152 28
page <EVAL <UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 14>>.ISCHAR> - 1>
text 23 305 1152 14
croppedtext 145 305 110 20 1152 29
page <EVAL <UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 15>>.ISCHAR> - 1>
text 23 325 1152 15
croppedtext 145 325 110 20 1152 30
[DIALOG d_guild BUTTON]
ONBUTTON 1
TAG.GUILD 0<TAG.GUILD> - 15
IF (<TAG.GUILD> < 0)
TAG.GUILD 0
ENDIF
DIALOG d_guild
ONBUTTON 2
VAR.ACT <ACT>
ACT <VAR.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 16>>
IF (<ACT.UID>)
TAG.GUILD 0<TAG.GUILD> + 15
ENDIF
ACT <VAR.ACT>
DIALOG d_guild
[DIALOG d_guild TEXT]
<MEMORYFINDTYPE.memory_guild.NAME>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 1>>.NAME>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 2>>.NAME>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 3>>.NAME>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 4>>.NAME>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 5>>.NAME>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 6>>.NAME>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 7>>.NAME>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 8>>.NAME>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 9>>.NAME>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 10>>.NAME>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 11>>.NAME>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 12>>.NAME>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 13>>.NAME>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 14>>.NAME>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 15>>.NAME>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 1>>.REGION.NAME>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 2>>.REGION.NAME>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 3>>.REGION.NAME>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 4>>.REGION.NAME>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 5>>.REGION.NAME>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 6>>.REGION.NAME>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 7>>.REGION.NAME>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 8>>.REGION.NAME>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 9>>.REGION.NAME>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 10>>.REGION.NAME>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 11>>.REGION.NAME>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 12>>.REGION.NAME>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 13>>.REGION.NAME>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 14>>.REGION.NAME>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 15>>.REGION.NAME>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 1>>.P>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 2>>.P>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 3>>.P>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 4>>.P>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 5>>.P>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 6>>.P>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 7>>.P>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 8>>.P>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 9>>.P>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 10>>.P>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 11>>.P>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 12>>.P>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 13>>.P>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 14>>.P>
<UID.<VAR0.GUILD.<UID>.<EVAL 0<TAG.GUILD> + 15>>.P>
[function gc]
if <memoryfindtype.memory_guild.link.uid>
if (strmatch("<args>",""))
sysmessageua 048,0,0,trk Bos mesaj yollayamazsiniz.
elseif (strmatch("<args>","<tag.lastchat>"))
sysmessageua 048,0,0,trk Lutfen flood yapmayiniz.
else
tag.lastchat <args>
serv.allclients guild_c <args>
endif
else
sysmessageua 048,0,0,trk Guild ici konusma sistemini kullanmak icin bir guilde uye olmalisiniz.
endif
return 1
[function guild_c]
if <memoryfindtype.memory_guild.link.uid> == <src.memoryfindtype.memory_guild.link.uid>
sysmessageua 048,0,0,trk (<src.name>): <args>
endif
return 1
[function ac]
if (<memoryfindtype.memory_guild.link.align> < 1)
sysmessageua 048,0,0,trk Sadece Order veya Chaos guildler kullanabilir.
elseif !(<memoryfindtype.memory_guild.link.uid>)
sysmessageua 048,0,0,trk Guild ici konusma sistemini kullanmak icin bir guilde uye olmalisiniz.
else
if (strmatch("<args>",""))
sysmessageua 048,0,0,trk Bos mesaj yollayamazsiniz.
elseif (strmatch("<args>","<tag.lastchat>"))
sysmessageua 048,0,0,trk Lutfen flood yapmayiniz.
else
tag.lastchat <args>
serv.allclients guild_ac <args>
endif
endif
return 1
[function guild_ac]
if <memoryfindtype.memory_guild.link.align> == <src.memoryfindtype.memory_guild.link.align>
sysmessageua 55,0,0,trk <src.memoryfindtype.memory_guild.link.name>
sysmessageua 048,0,0,trk (<src.name>): <args>
endif
return 1
[ITEMDEF 04520]
// Guild Stone
DEFNAME=i_guild_stone_xxx
ID=i_guildstone
NAME=guildstone
TYPE=T_STONE_GUILD
CATEGORY=Provisions - Deeds
SUBSECTION=Guild and Town Stones
DESCRIPTION=Guild Stone
On=@Create
type t_normal
color 066d
name sil beni, hataliyim ben. dogru id 'i_guildstone' olacakti.
attr attr_move_never
[ITEMDEF 0ede]
//gravestone
DUPEITEM=0edd
[ITEMDEF 0edd]
//gravestone = Guildstone
DEFNAME=i_guildstone
TYPE=T_STONE_GUILD
VALUE=15000
//RESOURCES=4 i_rock_plain
FLIP=1
CATEGORY=Decoration - Dungeons and The Dead
SUBSECTION=Graves & Gravestones
DESCRIPTION=GraveStone (Guildstone)
DUPELIST=0ede
On=@Create
attr attr_move_never
dispid 0ede
name *
On=@Dclick
dispid 0ede
update
On=@Click
if !(strmatch('<abbrev>',''))
message @0481 <name> [<abbrev>]
else
message @0481 <name>
endif
if (<more1> == 1)
message @100 [Order]
elseif (<more1> == 2)
message @33 [Chaos]
elseif (<link> != 04fffffff)
message @55 [<link.name>]
endif
return 1
On=@TargOn_Char
if (<morex> == 1) // recruiting
if (<src.targ.npc>)
src.sysmessage @55 Sadece oyuncular guild uyesi olabilir.
elseif (<src.targ.distance> > 3)
src.sysmessage @55 <src.targ.name> bu islem icin stone'a yeterince yakin degil.
elseif (<src.targ.memoryfindtype.memory_guild>)
if (<src.targ.memoryfindtype.memory_guild.link> != <uid>)
src.sysmessage @55 <src.targ.name> uye olabilmek icin oncelikle <src.targ.memoryfindtype.memory_guild.link.name> uyeliginden cikmali.
elseif (<src.targ.memoryfindtype.memory_guild.link> == <uid>)
src.sysmessage @55 <src.targ.name> zaten bir <name> uyesi.
endif
elseif (<src.targ.memoryfindtype.memory_town>) && (<src.targ.memoryfindtype.memory_town.link> != <link>)
src.sysmessage @55 <src.targ.name> guild'in desteklemedigi <src.targ.memoryfindtype.memory_town.link.name> faction'inda. Bir <name> uyesi olamaz.
elseif (<src.targ.findid.i_gs_recruit>)
src.sysmessage @55 <src.targ.name> su an dusunme asamasinda.
else
src.newitem i_gs_recruit
src.act.cont <src.targ.uid>
src.act.more1 <src.uid>
src.act.more2 <uid>
src.act.timer 1
endif
elseif (<morex> == 2) // titling
if (<src.targ.memoryfindtype.memory_guild.link> != <uid>)
src.sysmessage @55 Unvan vermeye calistiginiz kisi bir <name> uyesi degil.
menu menu_guild_masterfunc
elseif (<src.targ.distance> > 3)
src.sysmessage @55 <src.targ.name> bu islem icin stone'a yeterince yakin degil.
else
src.act <src.targ.uid>
dialog d_gs_title
endif
endif
return 1
On=@TargOn_Ground
return 1
On=@TargOn_Item
return 1
On=@Timer
if (<morey> == 1)
if (<link> != 04fffffff)
link.morex <eval (<link.morex> - 1)>
endif
morey 0
more1 1
link 04fffffff
sayu Yeni destek yonu: Order.
elseif (<morey> == 2)
if (<link> != 04fffffff)
link.morex <eval (<link.morex> - 1)>
endif
morey 0
more1 2
link 04fffffff
sayu Yeni destek yonu: Chaos.
elseif (<morey> == 3)
if (<link> != 04fffffff)
link.morex <eval (<link.morex> - 1)>
endif
morey 0
more1 0
link 04fffffff
sayu <name> artik tarafsiz.
elseif (<morey> == 4)
if (<link> != 04fffffff)
link.morex <eval (<link.morex> - 1)>
endif
morey 0
more1 0
link 04009163d
link.morex <eval (<link.morex> + 1)>
sayu Yeni destek yonu: <link.name>.
elseif (<morey> == 5)
if (<link> != 04fffffff)
link.morex <eval (<link.morex> - 1)>
endif
morey 0
more1 0
link 04009149f
link.morex <eval (<link.morex> + 1)>
sayu Yeni destek yonu: <link.name>.
elseif (<morey> == 6)
if (<link> != 04fffffff)
link.morex <eval (<link.morex> - 1)>
endif
morey 0
more1 0
link 040091450
link.morex <eval (<link.morex> + 1)>
sayu Yeni destek yonu: <link.name>.
elseif (<morey> == 7)
if (<link> != 04fffffff)
link.morex <eval (<link.morex> - 1)>
endif
morey 0
more1 0
link 04009139c
link.morex <eval (<link.morex> + 1)>
sayu Yeni destek yonu: <link.name>.
endif
return 1
[dialog d_gs_title]
100,50
resizepic 190 175 5120 335 150
resizepic 200 185 3000 315 130
resizepic 220 235 3000 270 22
htmlgump 220 200 290 20 0 0 0 // ba$lik
htmlgump 255 277 100 20 1 0 0 // ok
button 220 275 4006 4007 1 0 1 // ok b
htmlgump 435 277 100 20 2 0 0 // cancel
button 400 275 4018 4019 1 0 0 // cancel b
textentry 225 237 253 25 0 0 3 // isim buraya
[dialog d_gs_title TEXT]
Vermek istediginiz unvani giriniz. (14 karakter)
Tamam
Vazgec
<src.act.tag.gs_title>
[dialog d_gs_title BUTTON]
On=0
if (<distance> < 4)
menu menu_guild_masterfunc
endif
On=1
if (<distance> > 3)
src.sysmessage @55 Bu islem icin guildstone'a yeterince yakin degilsiniz.
elseif (<src.act.distance> > 3)
src.sysmessage @55 <src.act.name> bu islem icin size yeterince yakin degil.
elseif ((strlen(<argtxt[0]>)) > 14)
src.sysmessage @55 Bir unvan en fazla 14 karakterden olusabilir.
dialog d_gs_title
elseif (strmatch('<argtxt[0]>',''))
src.act.tag.gs_title
src.act.sysmessage @55 Unvaniniz silindi.
if (<src.uid> != <src.act.uid>)
src.sysmessage @55 <src.act.name>: Unvan silindi.
endif
menu menu_guild_masterfunc
else
src.act.tag.gs_title <argtxt[0]>
src.act.message @55 Yeni unvan: <src.act.tag.gs_title>.
if (<src.uid> != <src.act.uid>)
src.sysmessage @55 <src.act.name> yeni unvan: <src.act.tag.gs_title>.
endif
menu menu_guild_masterfunc
endif
[itemdef i_gs_recruit]
name guild recruiter
weight 0
id i_gold
type t_eq_script
layer layer_special
On=@UnEquip
try src.act <more2>
try src.dialog d_gs_recruit
return 1
On=@Timer
remove
return 1
[dialog d_gs_alignment]
-100,-100
nomove
resizepic 190 165 5120 275 275
resizepic 200 175 3000 255 255
text 220 185 2100 0
htmlgump 215 208 223 120 1 1 1
htmlgump 258 347 140 20 2 0 0
htmlgump 258 367 150 20 3 0 0
htmlgump 258 387 150 20 4 0 0
//htmlgump 258 337 150 20 5 0 0
//htmlgump 258 357 150 20 6 0 0
//htmlgump 258 377 150 20 7 0 0
//htmlgump 258 397 150 20 8 0 0
button 225 345 4006 4007 1 0 1
button 225 365 4006 4007 1 0 2
button 225 385 4006 4007 1 0 3
//button 225 335 4006 4007 1 0 4
//button 225 355 4006 4007 1 0 5
//button 225 375 4006 4007 1 0 6
//button 225 395 4006 4007 1 0 7
[dialog d_gs_alignment text]
<name>: <var.gs_align>
Dikkat! guild'in destek yonunu degistirdiginiz takdirde, eger tarafsiz bir guild degilse 24 saat boyunca bu menuyu kullanamayacak ve eski destek tarafinizda kalmaya devam edeceksiniz, 24 saat sonunda otomatik olarak desteginiz degisecektir. Tarafsiz guild'ler menuden islem yapildigi anda taraf degistirebilirler. Destek yonunuzu Order veya Chaos'a cevirdiginizde, tum guild uyeleri (uye adaylari haric) O/C'ye dahil olacaktir.
British: Order
Blackthorn: Chaos
Tarafsiz: Neutral
Faction: Shamino
Faction: Jakama
Faction: Daxantec
Faction: Arcanum
[dialog d_gs_alignment button]
On=0
menu menu_guild_masterfunc
On=1
if (<more1> == 1)
src.sysmessage @55 <name> zaten bir Order guildi.
else
morey 1
if (<more1> == 0) && (<link> == 04fffffff)
timer 1
else
say @55 Taraf degistirme sureci baslamistir.
timer 86400
endif
endif
menu menu_guild_masterfunc
On=2
if (<more1> == 2)
src.sysmessage @55 <name> zaten bir Chaos guildi.
else
morey 2
if (<more1> == 0) && (<link> == 04fffffff)
timer 1
else
say @55 Taraf degistirme sureci baslamistir.
timer 86400
endif
endif
menu menu_guild_masterfunc
On=3
if (<more1> == 0) && (<link> == 04fffffff)
src.sysmessage @55 <name> zaten tarafsiz bir guild.
else
morey 3
say @55 Tarafsizlik sureci baslamistir.
timer 86400
endif
menu menu_guild_masterfunc
[dialog d_gs_recruit]
-100,-100
nomove
resizepic 190 165 5120 275 155
resizepic 200 175 3000 255 135
htmlgump 215 188 223 60 0 1 1
htmlgump 258 257 140 20 1 0 0
htmlgump 258 277 150 20 2 0 0
button 225 255 4006 4007 1 0 1
button 225 275 4018 4019 1 0 0
[dialog d_gs_recruit text]
<uid.<findid.i_gs_recruit.more1>.name> tarafindan <act.name> guild'ine davet edildiniz. Bu guild'e katilmak istiyor musunuz?
Evet
Hayir
[dialog d_gs_recruit button]
On=1
if (<act.distance> > 3)
sysmessage @55 Guild stone'a yeterince yakin degilsiniz.
else
try tag.gs_title
try uid.<act.uid>.applytojoin
endif
// This is the guildmaster initial selection screen for guildstones
[MENU MENU_GUILD_MASTER]
<Name> (<Master>)
ON=0 Birini Guilde Al
morex 1
target Guild'e almak istediginiz kisiyi seciniz
ON=0 Guild Uyeleri
VIEWROSTER
ON=0 Guild Uye Adaylari
VIEWCANDIDATES
ON=0 <Name> Guildinin Savas Ilan Ettigi Guildler
VIEWENEMYS
ON=0 <Name> Guildine Savas Ilan Eden Guildler
VIEWTHREATS
ON=0 Guild Master Oylamasi.Su anda (<LoyalTo>)
DECLAREFEALTY
ON=0 Guild'den Ayril
SAY @55 <SRC.NAME> <NAME> guildinden ayrildi.
RESIGN
ON=0 Guild Kalkani Ver
if (<src.targ.more> == 1)
if (0<src.tag.sho> == 1)
src.sysmessage @55 Daha onceden kalkan almissiniz.
return 1
endif
src.tag.sho 1
src.newitem i_shield_order
src.act.bounce
elseif (<src.targ.more> == 2)
if (0<src.tag.shc> == 1)
src.sysmessage @55 Daha onceden kalkan almissiniz.
return 1
endif
src.tag.shc 1
src.newitem i_shield_chaos
src.act.bounce
else
src.sysmessage @55 Sadece Order ve Chaos guildleri kalkan alabilir.
endif
ON=0 GuildMaster Islemleri
MASTERMENU
// This is the NON-guildmaster initial selection screen for guildstones
[MENU MENU_GUILD_MEMBER]
<Name> (<Master>)
ON=0 Guild Uyeleri
VIEWROSTER
ON=0 <Name> Guildinin Savas Ilan Ettigi Guildler
VIEWENEMYS
ON=0 <Name> Guildine Savas Ilan Eden Guildler
VIEWTHREATS
ON=0 Declare your fealty. (loyal to <LoyalTo>)
DECLAREFEALTY
ON=0 Guild'den Ayril
SAY @55 <SRC.NAME> <NAME> guildinden ayrildi.
RESIGN
ON=0 Guild Kalkani Ver
if (<src.targ.more> == 1)
if (0<src.tag.sho> == 1)
src.sysmessage @55 Daha onceden kalkan almissiniz.
return 1
endif
src.tag.sho 1
src.newitem i_shield_order
src.act.bounce
elseif (<src.targ.more> == 2)
if (0<src.tag.shc> == 1)
src.sysmessage @55 Daha onceden kalkan almissiniz.
return 1
endif
src.tag.shc 1
src.newitem i_shield_chaos
src.act.bounce
else
src.sysmessage @55 Sadece Order ve Chaos guildleri kalkan alabilir.
endif
[dialog d_gs_abbrev]
100,50
resizepic 190 175 5120 335 150
resizepic 200 185 3000 315 130
resizepic 220 235 3000 270 22
htmlgump 220 200 250 20 0 0 0 // ba$lik
htmlgump 255 277 100 20 1 0 0 // ok
button 220 275 4006 4007 1 0 1 // ok b
htmlgump 435 277 100 20 2 0 0 // cancel
button 400 275 4018 4019 1 0 0 // cancel b
textentry 225 237 253 25 0 0 3 // isim buraya
[dialog d_gs_abbrev TEXT]
Yeni guild kisaltmasi giriniz. (3 karakter)
Tamam
Vazgec
<abbrev>
[dialog d_gs_abbrev BUTTON]
On=0
if (<distance> < 4)
menu menu_guild_masterfunc
endif
On=1
if (<distance> > 3)
src.sysmessage @55 Bu islem icin guildstone'a yeterince yakin degilsiniz.
elseif ((strlen(<argtxt[0]>)) > 3)
src.sysmessage @55 Guild kisaltmasi en fazla 3 karakterden olusabilir.
dialog d_gs_abbrev
elseif (strmatch('<argtxt[0]>',''))
src.sysmessage @55 Herhangi birsey yazmadiniz.
dialog d_gs_abbrev
else
abbrev <argtxt[0]>
src.sysmessage @55 Yeni kisaltma: <abbrev>
menu menu_guild_masterfunc
endif
[dialog d_gs_rename]
100,50
resizepic 190 175 5120 335 150
resizepic 200 185 3000 315 130
resizepic 220 235 3000 270 22
htmlgump 220 200 250 20 0 0 0 // ba$lik
htmlgump 255 277 100 20 1 0 0 // ok
button 220 275 4006 4007 1 0 1 // ok b
htmlgump 435 277 100 20 2 0 0 // cancel
button 400 275 4018 4019 1 0 0 // cancel b
textentry 225 237 253 25 0 0 3 // isim buraya
[dialog d_gs_rename TEXT]
Yeni guild ismini giriniz. (16 karakter)
Tamam
Vazgec
<name>
[dialog d_gs_rename BUTTON]
On=0
if (<distance> < 4)
menu menu_guild_masterfunc
endif
On=1
if (<distance> > 3)
src.sysmessage @55 Bu islem icin guildstone'a yeterince yakin degilsiniz.
elseif ((strlen(<argtxt[0]>)) > 16)
src.sysmessage @55 Guild ismi en fazla 16 karakterden olusabilir.
dialog d_gs_rename
elseif (strmatch('<argtxt[0]>',''))
src.sysmessage @55 Herhangi birsey yazmadiniz.
dialog d_gs_rename
else
name <argtxt[0]>
src.sysmessage @55 Yeni isim: <name>
menu menu_guild_masterfunc
endif
// Guild master functions.
[MENU MENU_GUILD_MASTERFUNC]
GuildMaster Islemiri
ON=0 Guild Ismini Degistir
dialog d_gs_rename
ON=0 Guild Kisaltmasini Degistir
dialog d_gs_abbrev
ON=0 Taraf Degistir
if (<timer> > 0) && (<morey>)
if (<eval (<timer> / 3600)> < 1)
src.sysmessage @55 Taraf degistirme surecindeyken bu menuyu kullanamazsiniz. (<eval (<timer> / 60)> dakika)
else
src.sysmessage @55 Taraf degistirme surecindeyken bu menuyu kullanamazsiniz. (<eval (<timer> / 3600)> saat)
endif
menu menu_guild_masterfunc
return 1
endif
if (<more1> == 0) && (<link> == 04fffffff)
var.gs_align Tarafsiz
elseif (<more1> == 1)
var.gs_align Order
elseif (<more1> == 2)
var.gs_align Chaos
endif
dialog d_gs_alignment
ON=0 Birine Unvan Ver
if (strmatch('<abbrev>',''))
src.sysmessage @55 Bir uyeye unvan verebilmek icin once guild kisaltmasi belirlemelisiniz.
menu menu_guild_masterfunc
else
morex 2
target Unvan vermek istediginiz guild uyesini seciniz.
endif
ON=0 Birini Guild'den At
DISMISSMEMBER
ON=0 Savas Ilan Et
DECLAREWAR
ON=0 Baris Ilan Et
DECLAREPEACE
ON=0 Uye Aday Istegi Kabul
ACCEPTCANDIDATE
ON=0 Uye Aday Istegi Red
REFUSECANDIDATE
ON=0 Guildi YIK! (50.000gp)
if (<link> != 04fffffff)
link.morex <eval (<link.morex> - 1)>
endif
REMOVE
SRC.NEWITEM i_gold
SRC.ACT.AMOUNT=50000
SRC.ACT.BOUNCE
SERV.ALLCLIENTS SYSMESSAGE @0481,2 <Name> guild'i YIKILMISTIR..
ON=0 < Onceki Sayfa
RETURNMAINMENU
//ON=0 Issue Chaos Shields
//NEWITEM=i_shield_chaos
//SRC.ACT.LINK=<SERIAL>
//ON=0 Issue Order Shields
//NEWITEM=I_SHIELD_ORDER
//SRC.ACT.LINK=<SERIAL>
// Non-member view.|
|
| Konu | Kategori | Son cevap | Son yazan | Mesaj | Görüntüleme | |
|---|---|---|---|---|---|---|
|
Ev duvarları ve deed sorunu
Son cevap: 12-08 20:07 · Son yazan: Eren19944 · Mesaj: 5 · Görüntü: 2643
|
Script Yardımı | 12-08 20:07 | Eren19944 |
5 | 2643 |
|
Sphere hata debugg
Son cevap: 04-10 11:12 · Son yazan: venezuela · Mesaj: 2 · Görüntü: 1584
|
Konsol Hataları | 04-10 11:12 |  venezuela |
2 | 1584 |
|
SphereX ve Animal deed
Son cevap: 14-02 22:28 · Son yazan: UOListe · Mesaj: 7 · Görüntü: 3109
|
Script Yardımı | 14-02 22:28 |  UOListe |
7 | 3109 |
|
tiledata maximum index hata kodu
Son cevap: 12-11 03:02 · Son yazan: B3LyRsy2 · Mesaj: 9 · Görüntü: 3990
|
Muls ve Mul Editing | 12-11 03:02 |  B3LyRsy2 |
9 | 3990 |
|
|
Region Deed'e yaklaşınca event vermek
Son cevap: 04-05 14:19 · Son yazan: xwerswoodx · Mesaj: 4 · Görüntü: 3151
|
ITEM Script Yardımı | 04-05 14:19 |  xwerswoodx |
4 | 3151 |