[ITEMDEF i_deed_pentagram]
NAME=deed to a pentagram
ID=i_deed
RESOURCES=100 i_log,40 i_ingot_iron
SKILLMAKE=CARPENTRY 100.0, MAGERY 75.0, t_carpentry
CATEGORY=Provisions - Deeds
SUBSECTION=Item Deeds
DESCRIPTION=Pentagram
ON=@DClick
if ((<eval <src.uid>> == <eval <src.region.tag.owner>>) || (<eval <src.region.tag.co1uid>> == <eval <src.uid>>) || (<eval <src.region.tag.co2uid>> == <eval <src.uid>>) || (<eval <src.region.tag.co3uid>> == <eval <src.uid>>) || (<eval <src.region.tag.co4uid>> == <eval <src.uid>>) || (<eval <src.region.tag.co5uid>> == <eval <src.uid>>) || (<eval <src.region.tag.co6uid>> == <eval <src.uid>>) || (<eval <src.region.tag.co7uid>> == <eval <src.uid>>) || (<eval <src.region.tag.co8uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f1uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f2uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f3uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f4uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f5uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f6uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f7uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f8uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f9uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f10uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f11uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f12uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f13uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f14uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f15uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f16uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f17uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f18uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f19uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f20uid>> == <eval <src.uid>>))
serv.newitem 0fea
new.link <src.region.type>
if (<eval <new.link.tag.locknumber>> >= <new.link.morey>)
src.sysmessage @50 Bu eve daha fazla esya koyamazsiniz.
new.remove
else
new.link.tag.locknumber <eval (<new.link.tag.locknumber> + 1)>
new.p <src.p>
new.attr attr_move_never
new.update
var.mlink <new.link.uid>
var.m1 <new.uid>
serv.newitem 0fe8
new.p <src.p>
new.move 0 -1
new.attr attr_move_never
new.link <var.mlink>
new.update
var.m2 <new.uid>
if !(strmatch('<new.region.type>','<src.uid.<var.m1>.region.type>'))
src.sysmessage @50 Esyanin bir kismi bu konumda evin disina tasacagi icin buraya yerlestiremezsiniz.
try src.uid.<var.m1>.remove
try src.uid.<var.m2>.remove
var.mlink
var.m1
var.m2
return 1
endif
serv.newitem 0fe7
new.p <src.p>
new.move -1 -1
new.attr attr_move_never
new.link <var.mlink>
new.update
var.m3 <new.uid>
if !(strmatch('<new.region.type>','<src.uid.<var.m1>.region.type>'))
src.sysmessage @50 Esyanin bir kismi bu konumda evin disina tasacagi icin buraya yerlestiremezsiniz.
try src.uid.<var.m1>.remove
try src.uid.<var.m2>.remove
try src.uid.<var.m3>.remove
var.mlink
var.m1
var.m2
var.m3
return 1
endif
serv.newitem 0feb
new.p <src.p>
new.move 1 -1
new.attr attr_move_never
new.link <var.mlink>
new.update
var.m4 <new.uid>
if !(strmatch('<new.region.type>','<src.uid.<var.m1>.region.type>'))
src.sysmessage @50 Esyanin bir kismi bu konumda evin disina tasacagi icin buraya yerlestiremezsiniz.
try src.uid.<var.m1>.remove
try src.uid.<var.m2>.remove
try src.uid.<var.m3>.remove
try src.uid.<var.m4>.remove
var.mlink
var.m1
var.m2
var.m3
var.m4
return 1
endif
serv.newitem 0fee
new.p <src.p>
new.move 1
new.attr attr_move_never
new.link <var.mlink>
new.update
var.m5 <new.uid>
if !(strmatch('<new.region.type>','<src.uid.<var.m1>.region.type>'))
src.sysmessage @50 Esyanin bir kismi bu konumda evin disina tasacagi icin buraya yerlestiremezsiniz.
try src.uid.<var.m1>.remove
try src.uid.<var.m2>.remove
try src.uid.<var.m3>.remove
try src.uid.<var.m4>.remove
try src.uid.<var.m5>.remove
var.mlink
var.m1
var.m2
var.m3
var.m4
var.m5
return 1
endif
serv.newitem i_pentagram
new.p <src.p>
new.move -1
new.attr attr_move_never
new.link <var.mlink>
new.update
var.m6 <new.uid>
if !(strmatch('<new.region.type>','<src.uid.<var.m1>.region.type>'))
src.sysmessage @50 Esyanin bir kismi bu konumda evin disina tasacagi icin buraya yerlestiremezsiniz.
try src.uid.<var.m1>.remove
try src.uid.<var.m2>.remove
try src.uid.<var.m3>.remove
try src.uid.<var.m4>.remove
try src.uid.<var.m5>.remove
try src.uid.<var.m6>.remove
var.mlink
var.m1
var.m2
var.m3
var.m4
var.m5
var.m6
return 1
endif
serv.newitem 0fed
new.p <src.p>
new.move 1 1
new.attr attr_move_never
new.link <var.mlink>
new.update
var.m7 <new.uid>
if !(strmatch('<new.region.type>','<src.uid.<var.m1>.region.type>'))
src.sysmessage @50 Esyanin bir kismi bu konumda evin disina tasacagi icin buraya yerlestiremezsiniz.
try src.uid.<var.m1>.remove
try src.uid.<var.m2>.remove
try src.uid.<var.m3>.remove
try src.uid.<var.m4>.remove
try src.uid.<var.m5>.remove
try src.uid.<var.m6>.remove
try src.uid.<var.m7>.remove
var.mlink
var.m1
var.m2
var.m3
var.m4
var.m5
var.m6
var.m7
return 1
endif
serv.newitem 0fec
new.p <src.p>
new.move 0 1
new.attr attr_move_never
new.link <var.mlink>
new.update
var.m8 <new.uid>
if !(strmatch('<new.region.type>','<src.uid.<var.m1>.region.type>'))
src.sysmessage @50 Esyanin bir kismi bu konumda evin disina tasacagi icin buraya yerlestiremezsiniz.
try src.uid.<var.m1>.remove
try src.uid.<var.m2>.remove
try src.uid.<var.m3>.remove
try src.uid.<var.m4>.remove
try src.uid.<var.m5>.remove
try src.uid.<var.m6>.remove
try src.uid.<var.m7>.remove
try src.uid.<var.m8>.remove
var.mlink
var.m1
var.m2
var.m3
var.m4
var.m5
var.m6
var.m7
var.m8
return 1
endif
serv.newitem 0fe9
new.p <src.p>
new.move -1 1
new.attr attr_move_never
new.link <var.mlink>
new.update
var.m9 <new.uid>
if !(strmatch('<new.region.type>','<src.uid.<var.m1>.region.type>'))
src.sysmessage @50 Esyanin bir kismi bu konumda evin disina tasacagi icin buraya yerlestiremezsiniz.
try src.uid.<var.m1>.remove
try src.uid.<var.m2>.remove
try src.uid.<var.m3>.remove
try src.uid.<var.m4>.remove
try src.uid.<var.m5>.remove
try src.uid.<var.m6>.remove
try src.uid.<var.m7>.remove
try src.uid.<var.m8>.remove
try src.uid.<var.m9>.remove
var.mlink
var.m1
var.m2
var.m3
var.m4
var.m5
var.m6
var.m7
var.m8
var.m9
return 1
endif
try new.link.tag.<var.m1>part1 <var.m2>
try new.link.tag.<var.m1>part2 <var.m3>
try new.link.tag.<var.m1>part3 <var.m4>
try new.link.tag.<var.m1>part4 <var.m5>
try new.link.tag.<var.m1>part5 <var.m6>
try new.link.tag.<var.m1>part6 <var.m7>
try new.link.tag.<var.m1>part7 <var.m8>
try new.link.tag.<var.m1>part8 <var.m9>
var.mlink
var.m1
var.m2
var.m3
var.m4
var.m5
var.m6
var.m7
var.m8
var.m9
remove
endif
else
src.sysmessage @50 Bu esyayi sadece kendi evinize yerlestirebilirsiniz.
return 1
endif
[ITEMDEF i_deed_pentagram]
NAME=deed to a pentagram
ID=i_deed
RESOURCES=100 i_log,40 i_ingot_iron
SKILLMAKE=CARPENTRY 100.0, MAGERY 75.0, t_carpentry
CATEGORY=Provisions - Deeds
SUBSECTION=Item Deeds
DESCRIPTION=Pentagram
ON=@DClick
if (<src.region.flags> == 0202f)
src.sysmessage @38,,1 Bunu burada kullanamazsınız.
return 1
endif
if ((<src.findid.i_duellolink>) || (<src.flags>&statf_stone)) || (<src.flags>&statf_freeze))
src.sysmessage @38,,1 Şuanki durumunuzda bunu kullanamazsınız.
return 1
endif
if ((<eval <src.uid>> == <eval <src.region.tag.owner>>) || (<eval <src.region.tag.co1uid>> == <eval <src.uid>>) || (<eval <src.region.tag.co2uid>> == <eval <src.uid>>) || (<eval <src.region.tag.co3uid>> == <eval <src.uid>>) || (<eval <src.region.tag.co4uid>> == <eval <src.uid>>) || (<eval <src.region.tag.co5uid>> == <eval <src.uid>>) || (<eval <src.region.tag.co6uid>> == <eval <src.uid>>) || (<eval <src.region.tag.co7uid>> == <eval <src.uid>>) || (<eval <src.region.tag.co8uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f1uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f2uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f3uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f4uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f5uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f6uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f7uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f8uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f9uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f10uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f11uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f12uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f13uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f14uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f15uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f16uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f17uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f18uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f19uid>> == <eval <src.uid>>) || (<eval <src.region.tag.f20uid>> == <eval <src.uid>>))
src.newitem 0fea
src.act.link <src.region.uid>
if (<eval <src.act.link.tag.locknumber>> >= <src.act.link.morey>)
src.sysmessage @38,,1 Bu eve daha fazla eşya koyamazsınız.
src.act.remove
else
src.act.link.tag.locknumber <eval (<src.act.link.tag.locknumber> + 1)>
src.act.p <src.p>
src.act.attr attr_move_never
src.act.update
var.mlink <src.act.link.uid>
var.m1 <src.act.uid>
src.newitem 0fe8
src.act.p <src.p>
src.act.move 0 -1
src.act.attr attr_move_never
src.act.link <var.mlink>
src.act.update
var.m2 <src.act.uid>
if !(strmatch('<src.act.region.uid>','<src.uid.<var.m1>.region.uid>'))
src.sysmessage @38,,1 Eşyanın bir kısmı bu konumda evin dışına taşacağı için buraya yerleştiremezsiniz.
try src.uid.<var.m1>.remove
try src.uid.<var.m2>.remove
var.mlink
var.m1
var.m2
return 1
endif
src.newitem 0fe7
src.act.p <src.p>
src.act.move -1 -1
src.act.attr attr_move_never
src.act.link <var.mlink>
src.act.update
var.m3 <src.act.uid>
if !(strmatch('<src.act.region.uid>','<src.uid.<var.m1>.region.uid>'))
src.sysmessage @38,,1 Eşyanın bir kısmı bu konumda evin dışına taşacağı için buraya yerleştiremezsiniz.
try src.uid.<var.m1>.remove
try src.uid.<var.m2>.remove
try src.uid.<var.m3>.remove
var.mlink
var.m1
var.m2
var.m3
return 1
endif
src.newitem 0feb
src.act.p <src.p>
src.act.move 1 -1
src.act.attr attr_move_never
src.act.link <var.mlink>
src.act.update
var.m4 <src.act.uid>
if !(strmatch('<src.act.region.uid>','<src.uid.<var.m1>.region.uid>'))
src.sysmessage @38,,1 Eşyanın bir kısmı bu konumda evin dışına taşacağı için buraya yerleştiremezsiniz.
try src.uid.<var.m1>.remove
try src.uid.<var.m2>.remove
try src.uid.<var.m3>.remove
try src.uid.<var.m4>.remove
var.mlink
var.m1
var.m2
var.m3
var.m4
return 1
endif
src.newitem 0fee
src.act.p <src.p>
src.act.move 1
src.act.attr attr_move_never
src.act.link <var.mlink>
src.act.update
var.m5 <src.act.uid>
if !(strmatch('<src.act.region.uid>','<src.uid.<var.m1>.region.uid>'))
src.sysmessage @38,,1 Eşyanın bir kısmı bu konumda evin dışına taşacağı için buraya yerleştiremezsiniz.
try src.uid.<var.m1>.remove
try src.uid.<var.m2>.remove
try src.uid.<var.m3>.remove
try src.uid.<var.m4>.remove
try src.uid.<var.m5>.remove
var.mlink
var.m1
var.m2
var.m3
var.m4
var.m5
return 1
endif
src.newitem i_pentagram
src.act.p <src.p>
src.act.move -1
src.act.attr attr_move_never
src.act.link <var.mlink>
src.act.update
var.m6 <src.act.uid>
if !(strmatch('<src.act.region.uid>','<src.uid.<var.m1>.region.uid>'))
src.sysmessage @38,,1 Eşyanın bir kısmı bu konumda evin dışına taşacağı için buraya yerleştiremezsiniz.
try src.uid.<var.m1>.remove
try src.uid.<var.m2>.remove
try src.uid.<var.m3>.remove
try src.uid.<var.m4>.remove
try src.uid.<var.m5>.remove
try src.uid.<var.m6>.remove
var.mlink
var.m1
var.m2
var.m3
var.m4
var.m5
var.m6
return 1
endif
src.newitem 0fed
src.act.p <src.p>
src.act.move 1 1
src.act.attr attr_move_never
src.act.link <var.mlink>
src.act.update
var.m7 <src.act.uid>
if !(strmatch('<src.act.region.uid>','<src.uid.<var.m1>.region.uid>'))
src.sysmessage @38,,1 Eşyanın bir kısmı bu konumda evin dışına taşacağı için buraya yerleştiremezsiniz.
try src.uid.<var.m1>.remove
try src.uid.<var.m2>.remove
try src.uid.<var.m3>.remove
try src.uid.<var.m4>.remove
try src.uid.<var.m5>.remove
try src.uid.<var.m6>.remove
try src.uid.<var.m7>.remove
var.mlink
var.m1
var.m2
var.m3
var.m4
var.m5
var.m6
var.m7
return 1
endif
src.newitem 0fec
src.act.p <src.p>
src.act.move 0 1
src.act.attr attr_move_never
src.act.link <var.mlink>
src.act.update
var.m8 <src.act.uid>
if !(strmatch('<src.act.region.uid>','<src.uid.<var.m1>.region.uid>'))
src.sysmessage @38,,1 Eşyanın bir kısmı bu konumda evin dışına taşacağı için buraya yerleştiremezsiniz.
try src.uid.<var.m1>.remove
try src.uid.<var.m2>.remove
try src.uid.<var.m3>.remove
try src.uid.<var.m4>.remove
try src.uid.<var.m5>.remove
try src.uid.<var.m6>.remove
try src.uid.<var.m7>.remove
try src.uid.<var.m8>.remove
var.mlink
var.m1
var.m2
var.m3
var.m4
var.m5
var.m6
var.m7
var.m8
return 1
endif
src.newitem 0fe9
src.act.p <src.p>
src.act.move -1 1
src.act.attr attr_move_never
src.act.link <var.mlink>
src.act.update
var.m9 <src.act.uid>
if !(strmatch('<src.act.region.uid>','<src.uid.<var.m1>.region.uid>'))
src.sysmessage @38,,1 Eşyanın bir kısmı bu konumda evin dışına taşacağı için buraya yerleştiremezsiniz.
try src.uid.<var.m1>.remove
try src.uid.<var.m2>.remove
try src.uid.<var.m3>.remove
try src.uid.<var.m4>.remove
try src.uid.<var.m5>.remove
try src.uid.<var.m6>.remove
try src.uid.<var.m7>.remove
try src.uid.<var.m8>.remove
try src.uid.<var.m9>.remove
var.mlink
var.m1
var.m2
var.m3
var.m4
var.m5
var.m6
var.m7
var.m8
var.m9
return 1
endif
try src.act.link.tag.<var.m1>part1 <var.m2>
try src.act.link.tag.<var.m1>part2 <var.m3>
try src.act.link.tag.<var.m1>part3 <var.m4>
try src.act.link.tag.<var.m1>part4 <var.m5>
try src.act.link.tag.<var.m1>part5 <var.m6>
try src.act.link.tag.<var.m1>part6 <var.m7>
try src.act.link.tag.<var.m1>part7 <var.m8>
try src.act.link.tag.<var.m1>part8 <var.m9>
var.mlink
var.m1
var.m2
var.m3
var.m4
var.m5
var.m6
var.m7
var.m8
var.m9
remove
endif
else
src.sysmessage @38,,1 Bu eşyayı yerleştirebilemek için evin ortağı yada dostu olmalısınız.
return 1
endif