Üye ol    Giriş
  1. Forumlar
  2. Oyunlar
  3. Ultima Online
  4. House Script acil

House Script acil

ZoLLy
ZoLLy
Banned
-1 
// ################################
//   F U N C T I O N Z
// ################################

[function opendialog]
sextant
if !(<link.morey>)
	dialog d_house_private
else
	dialog d_house_public
endif
var.coordinate

[function sextant]
var.y <eval ((((<p.y> - 1624) * 360) * 60) / 4096)>
if (<var.y> < 0)
	var.ns K
	var.y2 <eval (<var.y> +- (<var.y> * 2))>
else
	var.ns G
	var.y2 <var.y>
endif
var.ydeg <eval (<var.y2> / 60)>
var.ymin <eval (<var.y2> +- (60 * <var.ydeg>))> // (amelece modulus)

var.x <eval ((((<p.x> - 1323) * 360) * 60) / 5120)>
if (<var.x> < 0)
	var.we B
	var.x2 <eval (<var.x> +- (<var.x> * 2))>
else
	var.we D
	var.x2 <var.x>
endif
var.xdeg <eval (<var.x2> / 60)>
var.xmin <eval (<var.x2> +- (60 * <var.xdeg>))>
var.coordinate <eval <var.ydeg>>o<eval <var.ymin>>'<var.ns>, <eval <var.xdeg>>o<eval <var.xmin>>'<var.we>
var.ydeg
var.ymin
var.xdeg
var.xmin
var.we
var.ns
if (<ischar>)
	sysmessage @0 <var.coordinate>
endif

[function hdclick]
if !(<link.baseid>) // player house deilse salla
	return 0
elseif (<eval <more2>> == 2)
	link.remove
	remove
elseif !((<src.targ.tag0.orcolcam> == 1) || (<src.account.plevel> > 1) || !((<src.uid> == <link.more>) .
link.sdialog d_kaldircanmi
elseif ((<src.uid> == <link.more>) || (<link.tag0.f1uid> == <src.uid>) || (<link.tag0.f2uid> == <src.uid>) || (<link.tag0.f3uid> == <src.uid>) || (<link.tag0.f4uid> == <src.uid>) || (<link.tag0.f5uid> == <src.uid>) || (<link.tag0.f6uid> == <src.uid>) || (<link.tag0.f7uid> == <src.uid>) || (<link.tag0.f8uid> == <src.uid>) || (<link.tag0.f9uid> == <src.uid>) || (<link.tag0.f10uid> == <src.uid>) || (<link.tag0.f11uid> == <src.uid>) || (<link.tag0.f12uid> == <src.uid>) || (<link.tag0.f13uid> == <src.uid>) || (<link.tag0.f14uid> == <src.uid>) || (<link.tag0.f15uid> == <src.uid>) || (<link.tag0.f16uid> == <src.uid>) || (<link.tag0.f17uid> == <src.uid>) || (<link.tag0.f18uid> == <src.uid>) || (<link.tag0.f19uid> == <src.uid>) || (<link.tag0.f20uid> == <src.uid>) || (<link.tag0.co1uid> == <src.uid>) || (<link.tag0.co2uid> == <src.uid>) || (<link.tag0.co3uid> == <src.uid>) || (<link.tag0.co4uid> == <src.uid>) || (<link.tag0.co5uid> == <src.uid>) || (<link.tag0.co6uid> == <src.uid>) || (<link.tag0.co7uid> == <src.uid>) || (<link.tag0.co8uid> == <src.uid>))
	if !(strmatch('<link.link.color>','0480'))
		if (<link.timer> < 864800)
			link.timer 1036800 // buda 2. REFRESH olayi
			src.sysmessage @0793,,1 Evinizi yenilediniz.
		endif
	else
		src.sysmessage @066d,,1 Hata : Eviniz hatalı olduğu için yenilenmedi,en kısa zamanda evinizi kaldırın.
	endif
	sextant
	link.sdialog d_house_public
	var.coordinate
elseif (<src.account.plevel> > 1) // polis mi geldi?
	sextant
	link.dialog d_house_staff
	var.coordinate
endif

[function hclick]
if (<eval <link.tag0.hataliev>> == 1)
	if (<link.timer> > 100000)
		message @100,,1 <name>
		message @38,,1 [Dökülüyor]
		message @39,,1 [Hatali Ev]
		return 1
	elif (<link.timer> < 100000)
		if (<link.timer><650)
		link.timer 8000
		endif
		message @0 <name>
		message @38,,1 [Yıkılacak Durumda]
		message @39,,1 [Hatali Ev]
		return 1
	endif
endif

if !(<link.baseid>)
	message <name>
	return 1
elif (<link.timer> > 1000800)
	message @44,,1 <name>
	message @60,,1 [Yepyeni]
	return 1
elif (<link.timer> > 892800)
	message @44,,1 <name>
	message @60,,1 [Yeni]
	return 1
elif (<link.timer> > 620800)
	message @44,,1 <name>
	message @50,,1 [Bakımsız]
	return 1
elif (<link.timer> > 448800)
	message @44,,1 <name>
	message @50,,1 [Eskimiş]
	return 1
elif (<link.timer> > 300000)
	message @44,,1 <name>
	message @38,,1 [Dökülüyor]
	return 1
elif (<link.timer> < 200000)
	if (<link.timer><650)
		link.timer 8000
	endif
	message @44,,1 <name>
	message @38,,1 [Yıkılacak Durumda]
	return 1
endif

[function checkdoor]
obj=<argo.link>
if !(<serv.itemdef.<obj.baseid>> == 0)
	return 0
elif (<obj.link.morey>)
	targ.type t_door
elif (<findid.i_key_copper>)
	if ((<findid.i_key_copper.more> == <targ.more>) || (<findid.i_key_copper.more2> == <targ.more>)) // evin anahatari mi?
		if ((<uid> == <obj.more>) || (<eval <obj.tag0.co1uid>> == <uid>) || (<eval <obj.tag0.co2uid>> == <uid>) || (<eval <obj.tag0.co3uid>> == <uid>) || (<eval <obj.tag0.co4uid>> == <uid>) || (<eval <obj.tag0.co5uid>> == <uid>) || (<eval <obj.tag0.co6uid>> == <uid>) || (<eval <obj.tag0.co7uid>> == <uid>) || (<eval <obj.tag0.co8uid>> == <uid>))
			if (<obj.timer> < 964800)
				if !(<eval <tag0.hataliev>> == 1)
				obj.timer 1400800
				src.sysmessage @60,,1 Evinizi yenilediniz.
				else
				src.sysmessage @38,,1 Hata: Eviniz hatalı iken refresh yapamazsınız.
			endif
		endif
	endif
endif

[function htimer]
if (<link.baseid> == 0)
	return 1
elif ((<link.timer> > 1) && (<link.timer> < 650))
		link.timer 8000
elif !(<more2>)
	more2 1
	timer {120 500}
	type t_sign_gump
	name <link.name>
	more <link.uid>
	move 0 0 -1
	link.move 0 0 -1
	link.link <uid>
	link.region.flags 0892
	link.region.events r_house_private
	link.region.tag0.owner <link.more1>
	link.tag0.build duzgun
	link.tag0.buildcheck 1
	link.tag0.time <serv.time>
	link.tag0.trashcan 0
	link.tag0.vendnumber 0
	link.tag0.locknumber 0
	link.tag0.secnumber 0
	link.tag0.strongbox1 0
	link.tag0.strongbox2 0
	link.tag0.strongbox3 0
	link.tag0.vendor1 0
	link.tag0.vendor2 0
	link.tag0.vendor3 0
	for 1 20
		link.tag0.f<dlocal._for>uid 0
	endfor
	for 1 8
		link.tag0.co<dlocal._for>uid 0
	endfor
	hcycle
else 
	timer {150 450}
	if !(strmatch('<link.tag0.vendornum>','')
		link.tag0.vendnumber <link.tag0.vendornum>
		link.tag0.vendornum
	endif
	if !(strmatch('<link.tag0.strongbox>','')
		link.tag0.secnumber <link.tag0.strongbox>
		link.tag0.strongbox
	endif
	hcycle
endif

[function hcycle]
if (<morey>)
	link.region.events +r_house_public
	link.region.events -r_house_private
else
	link.region.events +r_house_private
	link.region.events -r_house_public
endif
link.region.flags 0892
link.link <uid>
link.region.tag0.signp <p>
link.region.tag0.build <link.tag0.buildcheck>
link.region.tag0.owner <link.more1>
for 1 20
	link.region.tag0.f<dlocal._for>uid <link.tag0.f<dlocal._for>uid>
endfor
for 1 8
	link.region.tag0.co<dlocal._for>uid <link.tag0.co<dlocal._for>uid>
endfor

[function htargitem]
if ((<morex> == 5) || (<morex> == 6) || (<morex> == 7) || (<morex> == 8) || (<morex> == 9))
	return 1
elif !(<src.targ.region.uid> == <uid>)
	src.sysmessage @38,,1 Hata: Evinizde olmayan eşyalara müdahale edemezsiniz.
elif (<morex> == 1) // I wish to lock this down
	if (<src.targ.type> == t_weapon_mace_staff)
		src.sysmessage @38,,1 Hata: Bunu sabitleyemezsiniz.
return 1
endif
	if ((<src.targ.type> == t_stone_guild) || (<src.targ.type> == t_spell) || (<src.targ.baseid> == i_corpse) || (<src.targ.type> == t_blood) || (<src.targ.type> == t_ingot) || (<src.targ.type> == t_log) || (<src.targ.type> == t_reagent) || (<src.targ.baseid> == i_clockwork_assembly) || (<src.targ.baseid> == i_power_crystal) || (<src.targ.baseid> == i_clockwork_assembly) || (<src.targ.type> == t_cloth) || (<src.targ.baseid> == i_axel_and_gears) || (<src.targ.baseid> == i_sticks)
		src.sysmessage @38,,1 Hata: Bunu evinize sabitleyemezsiniz.
	elif (<src.targ.type> == t_secure)
		src.sysmessage @38,,1 Hata: Kilitli bir kasayı sadece sabit hale getirmek için önce kilidini açmalısınız.
	elif (<src.targ.cont>)
		src.sysmessage @38,,1 Hata: Sabitlemek istediğiniz eşya yerde durmalı.
	elif (<src.targ.attr>&attr_move_never)
		src.sysmessage @38,,1 Hata: Bu eşya zaten sabitlenmiş.
	elif !(<src.targ.link> == 04fffffff)
		src.sysmessage @38,,1 Hata: Bunu sabitleyemezsiniz.
	elif (<eval <tag0.locknumber>> >= <morey>)
		src.sysmessage @38,,1 Hata: Evinizin sabitlenebilir eşya limiti dolmuş. (gereken: 1)
	else	
		tag0.locknumber <eval (<tag0.locknumber> + 1)>
		src.targ.link <uid>
		src.targ.attr <src.targ.attr>&~attr_decay
		src.targ.attr <src.targ.attr>|attr_move_never
if !(<src.targ.baseid>==i_ostard_egg_kulucka)
		src.targ.timer -1
endif
		src.targ.message @100,,1 Sabit     
		if (<src.targ.type>) == t_book)
			src.targ.more 1
		endif
		src.targ.update
	endif
elif (<morex> == 2) // I wish to release this
	if ((<src.targ.attr>&attr_move_never) && (<src.targ.link> != <uid>))
		src.sysmessage @38,,1 Hata: Bu eşya sizin evinizde değil.
	elif ((<src.targ.type> == t_door) || (<src.targ.type> == t_door_locked) || (<src.targ.type> == t_sign_gump) || (<src.targ.type> == t_stone_guild))
		src.sysmessage @38,,1 Hata: Bunun sabitliğini kaldıramazsınız.
	elif ((<src.targ.baseid> == i_copkutu) || (<src.targ.baseid> == i_strong_box))
		src.sysmessage @38,,1 Hata: Bu eşyayı 'i wish to remove this' komutuyla kaldırabilirsiniz.
	elif (<src.targ.baseid> == i_forge)
		tag0.locknumber <eval (<tag0.locknumber> - 1)>
		src.targ.remove
		src.newitem i_deed_forge
		new.bounce
	elif (<src.targ.baseid> == i_anvil)
		tag0.locknumber <eval (<tag0.locknumber> - 1)>
		src.targ.remove
		src.newitem i_deed_anvil
		new.bounce
	elif (<src.targ.baseid> == i_training_dummy)
		tag0.locknumber <eval (<tag0.locknumber> - 1)>
		src.targ.remove
		src.newitem i_deed_dummyn
		new.bounce
	elif (<src.targ.baseid> == i_pickpocket_dip)
		tag0.locknumber <eval (<tag0.locknumber> - 1)>
		src.targ.remove
		src.newitem i_deed_pickpockn
		new.bounce
	elif (<src.targ.baseid> == i_spinning_wheel)
		tag0.locknumber <eval (<tag0.locknumber> - 1)>
		src.targ.remove
		src.newitem i_deed_wheel_n
		new.bounce
	elif (<src.targ.baseid> == i_loom_upright)
		var.p <src.p>
		var.act <src.targ.uid>
		src.p <p>
		try tag0.locknumber <eval (<tag0.locknumber> - 1)>
		try src.uid.<tag0.<var.act>part>.remove
		try src.uid.<tag0.<tag0.<var.act>part>part>.remove
		try tag0.<var.act>part
		try tag0.<tag0.<var.act>part>part
		try src.newitem i_deed_loom_n
		try new.bounce
		src.p <var.p>
		var.p
		var.act
	elif (<src.targ.baseid> == i_pentagram)
		if !(<src.targ.dispid> == 0fea)
			morex 2
			target @0790,,1 Pentagramı kaldırmak için lütfen tam ortasına tıklayınız.
		else
			var.p <src.p>
			var.act <src.targ.uid>
			src.p <p>
			try tag0.locknumber <eval (<tag0.locknumber> - 1)>
			try src.targ.remove
			try src.uid.<tag0.<var.act>part1>.remove
			try src.uid.<tag0.<var.act>part2>.remove
			try src.uid.<tag0.<var.act>part3>.remove
			try src.uid.<tag0.<var.act>part4>.remove
			try src.uid.<tag0.<var.act>part5>.remove
			try src.uid.<tag0.<var.act>part6>.remove
			try src.uid.<tag0.<var.act>part7>.remove
			try src.uid.<tag0.<var.act>part8>.remove
			try tag0.<var.act>part1
			try tag0.<var.act>part2
			try tag0.<var.act>part3
			try tag0.<var.act>part4
			try tag0.<var.act>part5
			try tag0.<var.act>part6
			try tag0.<var.act>part7
			try tag0.<var.act>part8
			try src.newitem i_deed_pentagram
			try new.bounce
			src.p <var.p>
			var.p
			var.act
		endif
elif (<src.targ.dispid> == 0a44)
		if !(<src.targ.dispid> == 0a44)
			morex 2
			target @0790,,1 Dresser kaldırmak için lütfen tam ortasına tıklayınız.
		else
			var.p <src.p>
			var.act <src.targ.uid>
			src.p <p>
			try tag0.locknumber <eval (<tag0.locknumber> - 1)>
			try src.targ.remove
			try src.uid.<tag0.<var.act>part1>.remove
			try src.uid.<tag0.<var.act>part2>.remove
			try tag0.<var.act>part1
			try tag0.<var.act>part2
			try src.newitem i_deed_dresser
			try new.bounce
			src.p <var.p>
			var.p
			var.act
		endif
elif (<src.targ.dispid> == i_dresser)
		if !(<src.targ.dispid> == i_dresser)
			morex 2
			target @0790,,1 Dresser kaldırmak için lütfen tam ortasına tıklayınız.
		else
			var.p <src.p>
			var.act <src.targ.uid>
			src.p <p>
			try tag0.locknumber <eval (<tag0.locknumber> - 1)>
			try src.targ.remove
			try src.uid.<tag0.<var.act>part1>.remove
			try src.uid.<tag0.<var.act>part2>.remove
			try tag0.<var.act>part1
			try tag0.<var.act>part2
			try src.newitem i_deed_dresser2
			try new.bounce
			src.p <var.p>
			var.p
			var.act
		endif
elif (<src.targ.baseid> == i_bed_5)
		if !(<src.targ.dispid> == i_bed_5)
			morex 2
			target @0790,,1 Bed kaldırmak için lütfen tam ortasına tıklayınız.
		else
			var.p <src.p>
			var.act <src.targ.uid>
			src.p <p>
			try tag0.locknumber <eval (<tag0.locknumber> - 1)>
			try src.targ.remove
			try src.uid.<tag0.<var.act>part1>.remove
			try src.uid.<tag0.<var.act>part2>.remove
			try tag0.<var.act>part1
			try tag0.<var.act>part2
			try src.newitem i_deed_twinbed
			try new.bounce
			src.p <var.p>
			var.p
			var.act
		endif
elif (<src.targ.baseid> == i_bed_2)
		if !(<src.targ.dispid> == i_bed_2)
			morex 2
			target @0790,,1 Bed kaldırmak için lütfen tam ortasına tıklayınız.
		else
			var.p <src.p>
			var.act <src.targ.uid>
			src.p <p>
			try tag0.locknumber <eval (<tag0.locknumber> - 1)>
			try src.targ.remove
			try src.uid.<tag0.<var.act>part1>.remove
			try src.uid.<tag0.<var.act>part2>.remove
			try tag0.<var.act>part1
			try tag0.<var.act>part2
			try src.newitem i_deed_twinbed2
			try new.bounce
			src.p <var.p>
			var.p
			var.act
		endif

elif (<src.targ.baseid> == i_bed_20)
		if !(<src.targ.dispid> == i_bed_20)
			morex 2
			target @0790,,1 Bed kaldırmak için lütfen tam ortasına tıklayınız.
		else
			var.p <src.p>
			var.act <src.targ.uid>
			src.p <p>
			try tag0.locknumber <eval (<tag0.locknumber> - 1)>
			try src.targ.remove
			try src.uid.<tag0.<var.act>part1>.remove
			try src.uid.<tag0.<var.act>part2>.remove
			try src.uid.<tag0.<var.act>part3>.remove
			try src.uid.<tag0.<var.act>part4>.remove
			try tag0.<var.act>part1
			try tag0.<var.act>part2
			try tag0.<var.act>part3
			try tag0.<var.act>part4
			try src.newitem i_deed_bed
			try new.bounce
			src.p <var.p>
			var.p
			var.act
		endif
elif (<src.targ.baseid> == i_bed_26)
		if !(<src.targ.dispid> == i_bed_26)
			morex 2
			target @0790,,1 Bed kaldırmak için lütfen tam ortasına tıklayınız.
		else
			var.p <src.p>
			var.act <src.targ.uid>
			src.p <p>
			try tag0.locknumber <eval (<tag0.locknumber> - 1)>
			try src.targ.remove
			try src.uid.<tag0.<var.act>part1>.remove
			try src.uid.<tag0.<var.act>part2>.remove
			try src.uid.<tag0.<var.act>part3>.remove
			try src.uid.<tag0.<var.act>part4>.remove
			try tag0.<var.act>part1
			try tag0.<var.act>part2
			try tag0.<var.act>part3
			try tag0.<var.act>part4
			try src.newitem i_deed_bed
			try new.bounce
			src.p <var.p>
			var.p
			var.act
		endif
elif (<src.targ.dispid> == 01e4d)
		if !(<src.targ.dispid> == 01e4d)
			morex 2
			target @0790,,1 Polar bear rud kaldırmak için lütfen tam ortasına tıklayınız.
		else
			var.p <src.p>
			var.act <src.targ.uid>
			src.p <p>
			try tag0.locknumber <eval (<tag0.locknumber> - 1)>
			try src.targ.remove
			try src.uid.<tag0.<var.act>part1>.remove
			try src.uid.<tag0.<var.act>part2>.remove
			try src.uid.<tag0.<var.act>part3>.remove
			try src.uid.<tag0.<var.act>part4>.remove
			try src.uid.<tag0.<var.act>part5>.remove
			try src.uid.<tag0.<var.act>part6>.remove
			try src.uid.<tag0.<var.act>part7>.remove
			try src.uid.<tag0.<var.act>part8>.remove
			try src.uid.<tag0.<var.act>part9>.remove
			try tag0.<var.act>part1
			try tag0.<var.act>part2
			try tag0.<var.act>part3
			try tag0.<var.act>part4
			try tag0.<var.act>part5
			try tag0.<var.act>part6
			try tag0.<var.act>part7
			try tag0.<var.act>part8
			try tag0.<var.act>part9
			try src.newitem i_deed_polar
			try new.bounce
			src.p <var.p>
			var.p
			var.act
		endif
elif (<src.targ.dispid> == 01e57)
		if !(<src.targ.dispid> == 01e57)
			morex 2
			target @0790,,1 Polar bear rud kaldırmak için lütfen tam ortasına tıklayınız.
		else
			var.p <src.p>
			var.act <src.targ.uid>
			src.p <p>
			try tag0.locknumber <eval (<tag0.locknumber> - 1)>
			try src.targ.remove
			try src.uid.<tag0.<var.act>part1>.remove
			try src.uid.<tag0.<var.act>part2>.remove
			try src.uid.<tag0.<var.act>part3>.remove
			try src.uid.<tag0.<var.act>part4>.remove
			try src.uid.<tag0.<var.act>part5>.remove
			try src.uid.<tag0.<var.act>part6>.remove
			try src.uid.<tag0.<var.act>part7>.remove
			try src.uid.<tag0.<var.act>part8>.remove
			try src.uid.<tag0.<var.act>part9>.remove
			try tag0.<var.act>part1
			try tag0.<var.act>part2
			try tag0.<var.act>part3
			try tag0.<var.act>part4
			try tag0.<var.act>part5
			try tag0.<var.act>part6
			try tag0.<var.act>part7
			try tag0.<var.act>part8
			try tag0.<var.act>part9
			try src.newitem i_deed_polar2
			try new.bounce
			src.p <var.p>
			var.p
			var.act
		endif
elif (<src.targ.dispid> == 0938)
		if !(<src.targ.dispid> == 0938)
			morex 2
			target @0790,,1 Fireplace kaldırmak için lütfen tam ortasına tıklayınız.
		else
			var.p <src.p>
			var.act <src.targ.uid>
			src.p <p>
			try tag0.locknumber <eval (<tag0.locknumber> - 1)>
			try src.targ.remove
			try src.uid.<tag0.<var.act>part1>.remove
			try src.uid.<tag0.<var.act>part2>.remove
			try tag0.<var.act>part1
			try tag0.<var.act>part2
			try src.newitem i_deed_fireplace
			try new.bounce
			src.p <var.p>
			var.p
			var.act
		endif
elif (<src.targ.dispid> == 0945)
		if !(<src.targ.dispid> == 0945)
			morex 2
			target @0790,,1 Fireplace kaldırmak için lütfen tam ortasına tıklayınız.
		else
			var.p <src.p>
			var.act <src.targ.uid>
			src.p <p>
			try tag0.locknumber <eval (<tag0.locknumber> - 1)>
			try src.targ.remove
			try src.uid.<tag0.<var.act>part1>.remove
			try src.uid.<tag0.<var.act>part2>.remove
			try tag0.<var.act>part1
			try tag0.<var.act>part2
			try src.newitem i_deed_fireplace2
			try new.bounce
			src.p <var.p>
			var.p
			var.act
		endif
elif (<src.targ.dispid> == i_trough_water)
		if !(<src.targ.dispid> == i_trough_water)
			morex 2
			target @0790,,1 Water Trough kaldırmak için lütfen tam ortasına tıklayınız.
		else
			var.p <src.p>
			var.act <src.targ.uid>
			src.p <p>
			try tag0.locknumber <eval (<tag0.locknumber> - 1)>
			try src.targ.remove
			try src.uid.<tag0.<var.act>part1>.remove
			try src.uid.<tag0.<var.act>part2>.remove
			try tag0.<var.act>part1
			try tag0.<var.act>part2
			try src.newitem i_deed_water_w
			try new.bounce
			src.p <var.p>
			var.p
			var.act
		endif
elif (<src.targ.dispid> == 0b43)
		if !(<src.targ.dispid> == 0b43)
			morex 2
			target @0790,,1 Water Trough kaldırmak için lütfen tam ortasına tıklayınız.
		else
			var.p <src.p>
			var.act <src.targ.uid>
			src.p <p>
			try tag0.locknumber <eval (<tag0.locknumber> - 1)>
			try src.targ.remove
			try src.uid.<tag0.<var.act>part1>.remove
			try src.uid.<tag0.<var.act>part2>.remove
			try tag0.<var.act>part1
			try tag0.<var.act>part2
			try src.newitem i_deed_water_n
			try new.bounce
			src.p <var.p>
			var.p
			var.act
		endif
	elif (<src.targ.baseid>==i_ostard_egg_kulucka)
		src.sysmessage @03c1,6,1,1 Koyulan yumurtalara tekrardan mudahale edemezsiniz !

	elif (<src.targ.attr>&attr_move_never)
		tag0.locknumber <eval (<tag0.locknumber> - 1)>
		src.targ.link 04fffffff
		if (<src.targ.attr> == 04018)
			src.targ.attr attr_decay
		else
			src.targ.attr <src.targ.attr>&~attr_move_never
			src.targ.attr <src.targ.attr>|attr_decay
		endif

		src.targ.timer <eval (<serv.decaytimer> * 60)>


		if (<src.targ.type> == t_secure)
			src.targ.type t_container
			src.targ.message @100,,1 Kilitli değil
			tag0.locknumber <eval (<tag0.locknumber> - 124)>
			tag0.secnumber <eval (<tag0.secnumber> - 1)>
		else
			src.targ.message @100,,1 Sabit değil
			if (<src.targ.type> == t_book)
				src.targ.more 0
			endif
		endif
		src.targ.update
	else
		src.sysmessage @38,,1 Hata: Bu eşya kilitli veya sabit değil.
	endif
elif (<morex> == 3) // I wish to remove this
	if ((<src.targ.attr>&attr_move_never) && (<src.targ.link> != <uid>))
		src.sysmessage @38,,1 Hata: Bu eşya sizin evinizde değil.
	elif (<src.targ.baseid> == i_strong_box)
		if !((<src.targ.more2> == <src.uid>) || (<src.targ.link.more1> == <src.uid>))
			src.sysmessage @38,,1 Hata: Bu strongbox sadece sahibi veya evin sahibi kaldırabilir.
		else
			tag0.secnumber <eval (<tag0.secnumber> - 1)>
			if (<src.targ.morem> == 1)
				tag0.strongbox1 0
			elif (<src.targ.morem> == 2)
				tag0.strongbox2 0
			elif (<src.targ.morem> == 3)
				tag0.strongbox3 0
			endif
			src.targ.remove
			src.sysmessage @50,,1 Strongbox kaldırıldı.
		endif
	elif (<src.targ.baseid> == i_copkutu)
		src.targ.remove
		tag0.trashcan 0
		tag0.locknumber <eval (<tag0.locknumber> - 1)>
	else
		src.sysmessage @50,,1 Hata: Bu komutla sadece gerekli bazı şeyleri kaldırabilirsiniz.
	endif
elif (<morex> == 4) // I wish to secure this
	if ((<src.targ.type> == t_secure) || (<src.targ.baseid> == i_strong_box))
		src.sysmessage @50,,1 Hata: Bu eşya zaten kilitlenmiş.
	elif (<src.targ.cont>)
		src.sysmessage @38,,1 Hata: Kilitlemek istediğiniz eşya yerde durmalı.
	elif (<src.targ.baseid> == i_corpse)
		src.sysmessage @38,,1 Hata: Cesetleri kilitleyemezsiniz.
	elif !(<src.targ.type> == t_container)
		src.sysmessage @38,,1 Hata: Sadece çanta veya sandıkları kilitleyebilirsiniz.
	elif (<eval <tag0.locknumber>> > <eval (<morey> - 125)>)
		src.sysmessage @38,,1 Hata: Evinizin sabitlenebilir eşya limiti dolmuş. (gereken: 125)
	elif (<eval <tag0.secnumber>> >= <morez>)
		src.sysmessage @38,,1 Hata: Evinizin kilitlenebilir kasa limiti dolmuş. (gereken: 1)
	elif (<src.targ.attr>&attr_move_never)
		src.sysmessage @38,,1 Hata: Sabitlenmiş bir kasayı kilitli hale getirmek için önce sabitliğini kaldırmalısınız.
	elif !(<src.targ.link> == 04fffffff)
		src.sysmessage @38,,1 Hata: Bu eşyayı kilitleyemezsiniz.
	else
		src.targ.type t_secure
		tag0.locknumber <eval (<tag0.locknumber> + 125)>
		tag0.secnumber <eval (<tag0.secnumber> + 1)>
		src.targ.link <uid>
		src.targ.attr <src.targ.attr>&~attr_decay
		src.targ.attr <src.targ.attr>|attr_move_never
		src.targ.timer -1
		src.targ.update
		src.targ.message @100,,1 Kilitlendi
	endif
elif (<morex> == 10) // item up
	if ((<src.targ.attr>&attr_move_never) && (<src.targ.link> != <uid>))
		src.sysmessage @38,,1 Hata: Bu eşya sizin evinizde değil.
	elif ((<src.targ.baseid> == i_copkutu) || (<src.targ.baseid> == i_strong_box) || (<src.targ.type> == t_spell) || (<src.targ.baseid> == i_corpse) || (<src.targ.type> == t_blood) || (<src.targ.type> == t_door) || (<src.targ.type> == t_door_locked) || (<src.targ.type> == t_sign_gump) || (<src.targ.type> == t_stone_guild) || (<src.targ.baseid> == i_forge) || (<src.targ.baseid> == i_anvil) || (<src.targ.baseid> == i_training_dummy) || (<src.targ.baseid> == i_pickpocket_dip) || (<src.targ.baseid> == i_spinning_wheel) || (<src.targ.baseid> == i_loom_upright) || (<src.targ.baseid> == i_pentagram) || (strmatch('<src.targ.name>','carpet'))
		src.sysmessage @38,,1 Hata: Bu eşyanın pozisyonuyla oynayamazsınız.
	elif !(<src.targ.attr>&attr_move_never)
		src.sysmessage @38,,1 Hata: Esyayi once sabitlemelisiniz.
	elif ((<baseid> == i_multi_house_3room) || (<baseid> == i_multi_house_stone_plaster_small) || (<baseid> == i_multi_house_stone_small) || (<baseid> == i_multi_house_stone_brick_small) || (<baseid> == i_multi_house_stone_wood_small) || (<baseid> == i_multi_house_wood_plaster_small) || (<baseid> == i_multi_house_wood_thatched_small))
		if (<src.targ.p.z> >= <eval (<p.z> + 25)>)
			src.sysmessage @38,,1 Hata: Bu eşyayı daha fazla yükseltemezsiniz.
		else
			src.targ.nudgeup
		endif
	elif ((<baseid> == i_multi_keep) || (<baseid> == i_multi_castle) || (<baseid> == i_multi_house_patio_sand) || (<baseid> == i_multi_villa_2story) || (<baseid> == i_multi_cabin_log_2story) || (<baseid> == i_multi_house_wood_plaster_2story) || (<baseid> == i_multi_house_stone_plaster_2story))
		if (<src.targ.p.z> >= <eval (<p.z> + 45)>)
			src.sysmessage @38,,1 Hata: Bu eşyayı daha fazla yükseltemezsiniz.
		else
			src.targ.nudgeup
		endif
	elif ((<baseid> == i_multi_shop_stone_small) || (<baseid> == i_multi_shop_marble_small) || (<baseid> == i_multi_house_patio_marble) || (<baseid> == i_multi_tower_wizard))
		if (<src.targ.p.z> >= <eval (<p.z> + 65)>)
			src.sysmessage @38,,1 Hata: Bu eşyayı daha fazla yükseltemezsiniz.
		else
			src.targ.nudgeup
		endif
	elif (<baseid> == i_multi_tower)
		if (<src.targ.p.z> >= <eval (<p.z> + 85)>)
			src.sysmessage @38,,1 Hata: Bu eşyayı daha fazla yükseltemezsiniz.
		else
			src.targ.nudgeup
		endif
	else
		src.sysmessage @38,,1 Hata: Evinizin tipi bu komutu desteklemiyor.
	endif
elif (<morex> == 11) // item down
	if ((<src.targ.attr>&attr_move_never) && (<src.targ.link> != <uid>))
		src.sysmessage @38,,1 Hata: Bu eşya sizin evinizde değil.
	elif ((<src.targ.baseid> == i_copkutu) || (<src.targ.baseid> == i_strong_box) || (<src.targ.type> == t_spell) || (<src.targ.baseid> == i_corpse) || (<src.targ.type> == t_blood) || (<src.targ.type> == t_door) || (<src.targ.type> == t_door_locked) || (<src.targ.type> == t_sign_gump) || (<src.targ.type> == t_stone_guild) || (<src.targ.baseid> == i_forge) || (<src.targ.baseid> == i_anvil) || (<src.targ.baseid> == i_training_dummy) || (<src.targ.baseid> == i_pickpocket_dip) || (<src.targ.baseid> == i_spinning_wheel) || (<src.targ.baseid> == i_loom_upright) || (<src.targ.baseid> == i_pentagram))
		src.sysmessage @38,,1 Hata: Bu eşyanın pozisyonuyla oynayamazsınız.
	elif !(<src.targ.attr>&attr_move_never)
		src.sysmessage @38,,1 Hata: Esyayi once sabitlemelisiniz.
	elif (<src.targ.p.z> <= <eval (<p.z> + 7)>)
		src.sysmessage @38,,1 Hata: Bu eşyayı daha fazla alçaltamazsınız.
	else
		src.targ.nudgedown
	endif
endif

[function htargchar]
if ((<morex> == 1) || (<morex> == 2) || (<morex> == 3) || (<morex> == 4) || (<morex> == 10) || (<morex> == 11))
	return 1
elif !(<src.targ.region.uid> == <uid>)
	src.sysmessage @38,,1 Hata: <src.targ.name> şuanda evinizde değil.
elif (<morex> == 5) // I ban thee
	if (<src.targ.isgm>)
		src.sysmessage @38,,1 Hata: Yetkilileri evinizden atamazsınız.
	elif (<src.targ.id> == c_pv)
		src.sysmessage @38,,1 Hata: Tezgahtarları evden atamazsınız.
	elif (<src.targ.isonline> == 0)
		src.sysmessage @38,,1 Hata: Hedef şuan oyunda değil.	
	elif (<src.targ.uid> == <src.uid>)
		src.sysmessage @38,,1 Hata: Kendi kendinizi evden atamazsınız.
	elif (<src.targ.uid> == <more>) || (<tag0.co1uid> == <src.targ.uid>) || (<tag0.co2uid> == <src.targ.uid>) || (<tag0.co3uid> == <src.targ.uid>) || (<tag0.co4uid> == <src.targ.uid>) || (<tag0.co5uid> == <src.targ.uid>) || (<tag0.co6uid> == <src.targ.uid>) || (<tag0.co7uid> == <src.targ.uid>) || (<tag0.co8uid> == <src.targ.uid>) || (<tag0.f1uid> == <src.targ.uid>) || (<tag0.f2uid> == <src.targ.uid>) || (<tag0.f3uid> == <src.targ.uid>) || (<tag0.f4uid> == <src.targ.uid>) || (<tag0.f5uid> == <src.targ.uid>) || (<tag0.f6uid> == <src.targ.uid>) || (<tag0.f7uid> == <src.targ.uid>) || (<tag0.f8uid> == <src.targ.uid>) || (<tag0.f9uid> == <src.targ.uid>) || (<tag0.f10uid> == <src.targ.uid>) || (<tag0.f11uid> == <src.targ.uid>) || (<tag0.f12uid> == <src.targ.uid>) || (<tag0.f13uid> == <src.targ.uid>) || (<tag0.f14uid> == <src.targ.uid>) || (<tag0.f15uid> == <src.targ.uid>) || (<tag0.f16uid> == <src.targ.uid>) || (<tag0.f17uid> == <src.targ.uid>) || (<tag0.f18uid> == <src.targ.uid>) || (<tag0.f19uid> == <src.targ.uid>) || (<tag0.f20uid> == <src.targ.uid>)
		src.sysmessage @38,,1 Hata: Evin sahibini, ortaklarını veya dostlarını evden atamazsınız. 
	else
		src.targ.go <link.p>
		src.targ.move 0 2
		src.targ.sysmessage @100,,1 Evden kovuldunuz!
		src.sysmessage @100,,1 <src.targ.name> evden kovuldu.
	endif
elif (<morex> == 6) // Remove thyself
	if (0<src.targ.isgm>)
		src.sysmessage @38,,1 Hata: Yetkilileri evinizden atamazsınız.
	elif (<src.targ.id> == c_pv)
		src.sysmessage @38,,1 Hata: Tezgahtarları evden atamazsınız.
	elif (<src.targ.id> == c_vortex) || (<src.targ.id> == c_blade_spirit) || (<src.targ.findid.i_rune_summon_creature>)
		src.sysmessage @38,,1 Hata: Summon yaratık olduğu için büyünün etkisi kayboldu.
		src.targ.remove
	elif (<src.targ.uid> == <src.uid>)
		src.sysmessage @38,,1 Hata: Kendi kendinizi evden atamazsınız.
	elif (<src.targ.uid> == <more>) || (<tag0.co1uid> == <src.targ.uid>) || (<tag0.co2uid> == <src.targ.uid>) || (<tag0.co3uid> == <src.targ.uid>) || (<tag0.co4uid> == <src.targ.uid>) || (<tag0.co5uid> == <src.targ.uid>) || (<tag0.co6uid> == <src.targ.uid>) || (<tag0.co7uid> == <src.targ.uid>) || (<tag0.co8uid> == <src.targ.uid>) || (<tag0.f1uid> == <src.targ.uid>) || (<tag0.f2uid> == <src.targ.uid>) || (<tag0.f3uid> == <src.targ.uid>) || (<tag0.f4uid> == <src.targ.uid>) || (<tag0.f5uid> == <src.targ.uid>) || (<tag0.f6uid> == <src.targ.uid>) || (<tag0.f7uid> == <src.targ.uid>) || (<tag0.f8uid> == <src.targ.uid>) || (<tag0.f9uid> == <src.targ.uid>) || (<tag0.f10uid> == <src.targ.uid>) || (<tag0.f11uid> == <src.targ.uid>) || (<tag0.f12uid> == <src.targ.uid>) || (<tag0.f13uid> == <src.targ.uid>) || (<tag0.f14uid> == <src.targ.uid>) || (<tag0.f15uid> == <src.targ.uid>) || (<tag0.f16uid> == <src.targ.uid>) || (<tag0.f17uid> == <src.targ.uid>) || (<tag0.f18uid> == <src.targ.uid>) || (<tag0.f19uid> == <src.targ.uid>) || (<tag0.f20uid> == <src.targ.uid>)
		src.sysmessage @38,,1 Hata: Evin sahibini, ortaklarını veya dostlarını evden atamazsınız. 
	else
		src.targ.go <link.p>
		src.targ.move 0 2
		src.targ.sysmessage @100,,1 Evden kovuldunuz!
		src.sysmessage @100,,1 <src.targ.name> evden kovuldu.
	endif
elif (<morex> == 7) // Transfer
	if (<src.targ.uid> == <src.uid>)
		src.sysmessage @38,,1 Hata: Bu ev zaten sizin.
	elif (<src.targ.npc>) || (<src.targ.isgm>)
		src.sysmessage @38,,1 Hata: Evi sadece oyunculara transfer edebilirsiniz.
	else
		if (<src.targ.memoryfindtype.memory_guard>)
			if !(<src.targ.memoryfindtype.memory_guard.link.type> == t_ship)
				src.sysmessage @38,,1 Hata: <src.targ.name> isimli şahsın zaten bir evi mevcut.
				src.targ.sysmessage @03b2,,1, Bu evi üstünüze alabilmek için diğer evinizi kaldırmalısınız.
				return 1
			endif
		endif
		if (<src.memoryfindtype.memory_guard>)
			if (<src.memoryfindtype.memory_guard.link> == <uid>)
				src.memoryfindtype.memory_guard.remove
			endif
		endif
		src.targ.newitem i_memory
		src.targ.act.attr 04
		src.targ.act.color 0100
		src.targ.act.link <uid>
		src.targ.act.cont <src.targ.uid>
		src.targ.newitem i_key_copper
		src.targ.act.more <uid>
		src.targ.act.link <uid>
		src.targ.act.attr 04
		src.targ.act.cont <src.targ.findlayer(layer_bankbox).uid>
		src.targ.newitem i_key_copper
		src.targ.act.more <uid>
		src.targ.act.more2 <uid>
		src.targ.act.attr 04
		src.targ.act.cont <src.targ.findlayer(layer_pack).uid> // anahtarlari verdik
		more1 <src.targ.uid> // eve yeni sahibin uidini girdik
		for 1 20
			tag0.f<dlocal._for>uid 0
			tag0.f<dlocal._for>name
		endfor
		for 1 8
			tag0.co<dlocal._for>uid 0
			tag0.co<dlocal._for>name
		endfor
		link.hcycle // region.tag lara da gecirelim bunnari
		src.sysmessage @60,,1 Evinizi başarıyla transfer ettiniz.
		src.sysmessage @65,,1 Evin yeni sahibi <src.targ.name> olarak değisti.
		src.targ.sysmessage @100,,1 Evin yeni sahibi artık sizsiniz.
		src.targ.sysmessage @96,,1 Evin tüm ortak, dost ve yasaklı listesi sıfırlandı.
		src.targ.sysmessage @100,,1 Evin anahtarları hem çantanıza hem de bankanıza yerleştirildi.
	endif
elif (<morex> == 8) // Add co-own
	if ((<src.targ.npc>) || (<src.targ.isgm>))
		src.sysmessage @0481,1,1 Sadece oyuncular ortaklar listesinde yer alabilir.
	elseif ((<tag0.f1uid> == <src.targ.uid>) || (<tag0.f2uid> == <src.targ.uid>) || (<tag0.f3uid> == <src.targ.uid>) || (<tag0.f4uid> == <src.targ.uid>) || (<tag0.f5uid> == <src.targ.uid>) || (<tag0.f6uid> == <src.targ.uid>) || (<tag0.f7uid> == <src.targ.uid>) || (<tag0.f8uid> == <src.targ.uid>) || (<tag0.f9uid> == <src.targ.uid>) || (<tag0.f10uid> == <src.targ.uid>) || (<tag0.f11uid> == <src.targ.uid>) || (<tag0.f12uid> == <src.targ.uid>) || (<tag0.f13uid> == <src.targ.uid>) || (<tag0.f14uid> == <src.targ.uid>) || (<tag0.f15uid> == <src.targ.uid>) || (<tag0.f16uid> == <src.targ.uid>) || (<tag0.f17uid> == <src.targ.uid>) || (<tag0.f18uid> == <src.targ.uid>) || (<tag0.f19uid> == <src.targ.uid>) || (<tag0.f20uid> == <src.targ.uid>))
		src.sysmessage @0481,1,1 <src.targ.name> evin dost listesinde yer aldigindan dolayi ortak olamaz.
	elseif ((<tag0.co1uid> == <src.targ.uid>) || (<tag0.co2uid> == <src.targ.uid>) || (<tag0.co3uid> == <src.targ.uid>) || (<tag0.co4uid> == <src.targ.uid>) || (<tag0.co5uid> == <src.targ.uid>) || (<tag0.co6uid> == <src.targ.uid>) || (<tag0.co7uid> == <src.targ.uid>) || (<tag0.co8uid> == <src.targ.uid>))
		src.sysmessage @0481,1,1 <src.targ.name> zaten evin ortaklari arasinda yer aliyor.
	elseif (<src.targ.uid> == <more>)
		src.sysmessage @0481,1,1 <src.targ.name> evin sahibi oldugundan dolayi evin ortaklar listesinde yer alamaz.
	else
src.newitem i_ortakolak
src.new.more1 <src.uid>
src.new.more2 <uid>
src.new.cont <src.targ.uid>
src.new.timer 1
endif
elif (<morex> == 9) // dost ekle lan asura
	if ((<src.targ.npc>) || (<src.targ.isgm>))
		src.sysmessage @0481,1,1 Sadece oyuncular evin dost listesinde yer alabilirler.
	elseif ((<tag0.f1uid> == <src.targ.uid>) || (<tag0.f2uid> == <src.targ.uid>) || (<tag0.f3uid> == <src.targ.uid>) || (<tag0.f4uid> == <src.targ.uid>) || (<tag0.f5uid> == <src.targ.uid>) || (<tag0.f6uid> == <src.targ.uid>) || (<tag0.f7uid> == <src.targ.uid>) || (<tag0.f8uid> == <src.targ.uid>) || (<tag0.f9uid> == <src.targ.uid>) || (<tag0.f10uid> == <src.targ.uid>) || (<tag0.f11uid> == <src.targ.uid>) || (<tag0.f12uid> == <src.targ.uid>) || (<tag0.f13uid> == <src.targ.uid>) || (<tag0.f14uid> == <src.targ.uid>) || (<tag0.f15uid> == <src.targ.uid>) || (<tag0.f16uid> == <src.targ.uid>) || (<tag0.f17uid> == <src.targ.uid>) || (<tag0.f18uid> == <src.targ.uid>) || (<tag0.f19uid> == <src.targ.uid>) || (<tag0.f20uid> == <src.targ.uid>))
		src.sysmessage @0481,1,1 <src.targ.name> zaten evin dost listesinde yer aliyor.
	elseif ((<tag0.co1uid> == <src.targ.uid>) || (<tag0.co2uid> == <src.targ.uid>) || (<tag0.co3uid> == <src.targ.uid>) || (<tag0.co4uid> == <src.targ.uid>) || (<tag0.co5uid> == <src.targ.uid>) || (<tag0.co6uid> == <src.targ.uid>) || (<tag0.co7uid> == <src.targ.uid>) || (<tag0.co8uid> == <src.targ.uid>))
		src.sysmessage @0481,1,1 <src.targ.name> evin ortaklarindan biri oldugundan dolayi dost listesine eklenemez.
	elseif (<src.targ.uid> == <more>)
		src.sysmessage @0481,1,1 <src.targ.name> evin sahibi oldugundan dolayi dost listesine eklenemez.
	else
src.newitem i_dostolak
src.new.more1 <src.uid>
src.new.more2 <uid>
src.new.cont <src.targ.uid>
src.new.timer 1
endif
endif

// ################################
//   I T E M Z
// ################################



[itemdef 0bcf] // wooden sign
type t_script
dupelist 0bd0,0bcf,0bd1,0ba4,0ba6,0ba8,0baa,0bac,0bae,0bb0,0bb2,0bb4,0bb6,0bb8,0bba,0bbc,0bbe,0bc0,0bc2,0bc4,0bc6,0bc8,0bca,0bcc,0bce,0bd0,0bd2,0bd4,0bd6,0bd8,0bda,0bdc,0bde,0be0,0be2,0be4,0be6,0be8,0bea,0bec,0bee,0bf0,0bf2,0bf4,0bf6,0bf8,0bfa,0bfc,0bfe,0c00,0c02,0c04,0c06,0c08,0c0a,0c0c

On=@Create
timer 0

On=@Timer
htimer
return 1

On=@Click
hclick
return 1

On=@DClick
hdclick
return 1

[itemdef 0bd0] // wooden sign
dupeitem 0bcf

[itemdef 0bd1]
defname i_sign_brass
type t_script
dupelist 0bd0,0bcf,0bd1,0ba4,0ba6,0ba8,0baa,0bac,0bae,0bb0,0bb2,0bb4,0bb6,0bb8,0bba,0bbc,0bbe,0bc0,0bc2,0bc4,0bc6,0bc8,0bca,0bcc,0bce,0bd0,0bd2,0bd4,0bd6,0bd8,0bda,0bdc,0bde,0be0,0be2,0be4,0be6,0be8,0bea,0bec,0bee,0bf0,0bf2,0bf4,0bf6,0bf8,0bfa,0bfc,0bfe,0c00,0c02,0c04,0c06,0c08,0c0a,0c0c

On=@Create
timer 0

On=@Timer
htimer
return 1

On=@Click
hclick
return 1

On=@DClick
hdclick
return 1

[itemdef 0675]
defname i_door_metal
type t_door
dupelist 0676

On=@DClick
if !((<eval <src.p.z>-<p.z>> >14) || (<eval <src.p.z>-<p.z>> < -14))
	if (<distance> < 4)
		obj <uid>
		src.checkdoor
	elseif (<distance> < 5)
		src.sysmessage @066d,,1 Hata : Kapıya ulaşamıyorsunuz.
		return 1
	else
		return 1
	endif
else
		return 1
endif

[itemdef 0676]
type t_door_open
dupelist 0675

[itemdef 0677]
dupelist 0678

On=@DClick

if !((<eval <src.p.z>-<p.z>> >14) || (<eval <src.p.z>-<p.z>> < -14))
	if (<distance> < 4)
		obj <uid>
		src.checkdoor
	elseif (<distance> < 5)
		src.sysmessage @066d,,1 Hata :Kapıya ulaşamıyorsunuz.
		return 1
	else
		return 1
	endif
else
		return 1
endif

[itemdef 0678]
dupeitem 0677

[itemdef 0679]
dupeitem 0675

[itemdef 067a]
dupeitem 0676

[itemdef 067b]
dupeitem 0675

[itemdef 067c]
dupeitem 0676

[itemdef 067d]
dupelist 067e

On=@DClick
if !((<eval <src.p.z>-<p.z>> >14) || (<eval <src.p.z>-<p.z>> < -14))
	if (<distance> < 4)
		obj <uid>
		src.checkdoor
	elseif (<distance> < 5)
		src.sysmessage @066d,,1 Hata : Kapıya ulaşamıyorsunuz.
		return 1
	else
		return 1
	endif
else
		return 1
endif

[itemdef 067e]
dupeitem 067d

[itemdef 067f]
dupeitem 0675

[itemdef 0680]
dupeitem 0676

[itemdef 0681]
dupeitem 0675

[itemdef 0682]
dupeitem 0676

[itemdef 0683]
dupeitem 0675

[itemdef 0684]
dupeitem 0676

[itemdef 06a5]
defname i_door_wood
type t_door
dupelist 06a6

On=@DClick
if !((<eval <src.p.z>-<p.z>> >14) || (<eval <src.p.z>-<p.z>> < -14))
	if (<distance> < 4)
		obj <uid>
		src.checkdoor
	elseif (<distance> < 5)
		src.sysmessage @066d,,1 Hata : Kapıya ulaşamıyorsunuz.
		return 1
	else
		return 1
	endif
else
		return 1
endif

[itemdef 06a6]
type t_door_open
dupeitem 06a5

[itemdef 06a7]
type t_door
dupelist 06a8

On=@DClick
if !((<eval <src.p.z>-<p.z>> >14) || (<eval <src.p.z>-<p.z>> < -14))
	if (<distance> < 4)
		obj <uid>
		src.checkdoor
	elseif (<distance> < 5)
		src.sysmessage @066d,,1 Hata : Kapıya ulaşamıyorsunuz.
		return 1
	else
		return 1
	endif
else
		return 1
endif

[itemdef 06a8]
type t_door_open
dupeitem 06a7

[itemdef 06a9]
dupeitem 06a5

[itemdef 06aa]
dupeitem 06a6

[itemdef 06ab]
dupeitem 06a5

[itemdef 06ac]
dupeitem 06a6

[itemdef 06ad]
type t_door
dupelist 06ae

On=@DClick
if !((<eval <src.p.z>-<p.z>> >14) || (<eval <src.p.z>-<p.z>> < -14))
	if (<distance> < 4)
		obj <uid>
		src.checkdoor
	elseif (<distance> < 5)
		src.sysmessage @066d,,1 Hata : Kapıya ulaşamıyorsunuz.
		return 1
	else
		return 1
	endif
else
		return 1
endif

[itemdef 06ae]
type t_door_open
dupeitem 06ad

[itemdef 06af]
dupeitem 06a5

[itemdef 06b0]
dupeitem 06a6

[itemdef 06b1]
dupeitem 06a5

[itemdef 06b2]
dupeitem 06a6

[itemdef 06b3]
dupeitem 06a5

[itemdef 06b4]
dupeitem 06a6

[itemdef 06b5]
defname i_door_wood_4
type t_door
dupelist 06b6

On=@DClick
if !((<eval <src.p.z>-<p.z>> >14) || (<eval <src.p.z>-<p.z>> < -14))
	if (<distance> < 4)
		obj <uid>
		src.checkdoor
	elseif (<distance> < 5)
		src.sysmessage @066d,,1 Hata : Kapıya ulaşamıyorsunuz.
		return 1
	else
		return 1
	endif
else
		return 1
endif

[itemdef 06b6]
type t_door_open
dupeitem 06b5

[itemdef 06b7]
dupeitem 06b5

[itemdef 06b8]
dupeitem 06b6

[itemdef 06b9]
dupeitem 06b5

[itemdef 06ba]
dupeitem 06b6

[itemdef 06bb]
dupeitem 06b5

[itemdef 06bc]
dupeitem 06b6

[itemdef 06bd]
dupeitem 06b5

[itemdef 06be]
dupeitem 06b6

[itemdef 06bf]
dupeitem 06b5

[itemdef 06c0]
dupeitem 06b6

[itemdef 06c1]
dupeitem 06b5

[itemdef 06c2]
dupeitem 06b6

[itemdef 06c3]
dupeitem 06b5

[itemdef 06c4]
dupeitem 06b6

[itemdef 06c5]
defname i_door_metal_2
type t_door
dupelist 06c7,06c9,06cb,06cd,06cf,06d1,06d3

On=@DClick
if !((<eval <src.p.z>-<p.z>> >14) || (<eval <src.p.z>-<p.z>> < -14))
	if (<distance> < 4)
		obj <uid>
		src.checkdoor
	elseif (<distance> < 5)
		src.sysmessage @066d,,1 Hata : Kapıya ulaşamıyorsunuz.
		return 1
	else
		return 1
	endif
else
		return 1
endif

[itemdef 06d5]
defname i_door_wood_2
type t_door
dupelist 06d6

On=@DClick
if !((<eval <src.p.z>-<p.z>> >14) || (<eval <src.p.z>-<p.z>> < -14))
	if (<distance> < 4)
		obj <uid>
		src.checkdoor
	elseif (<distance> < 5)
		src.sysmessage @066d,,1 Hata : Kapıya ulaşamıyorsunuz.
		return 1
	else
		return 1
	endif
else
		return 1
endif

[itemdef 06d6]
type t_door_open
dupeitem 06d5

[itemdef 06d7]
dupeitem 06d5

[itemdef 06d8]
dupeitem 06d6

[itemdef 06d9]
dupeitem 06d5

[itemdef 06da]
dupeitem 06d6

[itemdef 06db]
dupeitem 06d5

[itemdef 06dc]
dupeitem 06d6

[itemdef 06dd]
dupeitem 06d5

[itemdef 06de]
dupeitem 06d6

[itemdef 06df]
dupeitem 06d5

[itemdef 06e0]
dupeitem 06d6

[itemdef 06e1]
dupeitem 06d5

[itemdef 06e2]
dupeitem 06d6

[itemdef 06e3]
dupeitem 06d5

[itemdef 06e4]
dupeitem 06d6

[itemdef 06e5]
defname i_door_wood_3
type t_door
dupelist 06e7,06e9,06eb,06ed,06ef,06f1,06f3

On=@DClick
if !((<eval <src.p.z>-<p.z>> >14) || (<eval <src.p.z>-<p.z>> < -14))
	if (<distance> < 4)
		obj <uid>
		src.checkdoor
	elseif (<distance> < 5)
		src.sysmessage @066d,,1 Hata : Kapıya ulaşamıyorsunuz.
		return 1
	else
		return 1
	endif
else
		return 1
endif


[typedef t_secure]
On=@Click
if (<src.region.uid> == <link.uid>)
	message [sabit, kilitli]
endif
if (<rescount> > 0)
	message <typedef.name> [<rescount>,<eval ((<weight> / 10) - <typedef.weight>)>]
else
	message <typedef.name>
endif
return 1

On=@DClick
if (<src.uid> == <link.more>) || (<link.tag0.co1uid> == <src.uid>) || (<link.tag0.co2uid> == <src.uid>) || (<link.tag0.co3uid> == <src.uid>) || (<link.tag0.co4uid> == <src.uid>) || (<link.tag0.co5uid> == <src.uid>) || (<link.tag0.co6uid> == <src.uid>) || (<link.tag0.co7uid> == <src.uid>) || (<link.tag0.co8uid> == <src.uid>))
	type t_container
	use
	type t_secure
else
	return 1
endif

On=@PickUp_Ground
return 1

Bunların house functionlar fakat tabelaya tıklayınca dialog açılmıyor acil yardım :S hdclick ile açılması lazım sizce sorun nerdedir ??
  • 2008-06-27 06:17
  • #1
berkancık
berkancık
Expert
4.6
çok konu açılmıştı tabel scriptini indir ben öyle yapatım en azından :)
  • 2008-06-27 11:35
  • #2
ZoLLy
ZoLLy
Banned
-1
Ben bu scripti düzeltmek istiyorum başkasını kullanmak istemiyorum.. :) Tabela var ztn.
  • 2008-06-27 11:37
  • #3
berkancık
berkancık
Expert
4.6
benim tabelam bu bunu hdclicke eklerisn yada ek bi scp çıkar o hdclicki sil biraz düzeltirsen güzel olur ben daha uğraşmadım


//home system
//01 ocak 2008

[ITEMDEF 0bd1]
//brass sign
DEFNAME=i_sign_brass
TYPE=t_script
TDATA2=064
FLIP=1
RESOURCES=2 I_BOARD, 1 i_ingot_iron
CATEGORY=Decoration - Signs
SUBSECTION=Blank
DESCRIPTION=Brass Blank
DUPELIST=0bd2

on=@Click
message <name>
return 1

On=@DClick
f_housemenu

[ITEMDEF 0bd2]
//brass sign
DEFNAME=i_sign_brass_2
DUPEITEM=0bd1
TDATA2=03D 

[function f_eqhmkeylayer] 
if (<findlayer.101>=0) 
src.newitem i_memory_keyring 
equip <src.act> 
endif 

[ITEMDEF i_memory_keyring]//used as key 
id i_pouch
layer=101 
name=Key layer 


[function f_housemenu] 
src.f_eqhmkeylayer 
link.region.events +r_house_public
link.region.tag.signp <p>
link.region.tag.homesign <uid>
TIMER=60*60*24*60 
if (!<more2>)//not yet used, launching the basic setting 
if (<link.isitem>=0)//its not a multi 
src.newitem i_worldgem_bit 
link=<src.act> 
link.attr=0b0 
link.p=<p> 
link.type=t_multi 
link.more1=<src.uid> 
endif 
link.more2=<uid>//refresh 
link.region.tag.menu=<link> 
src.try uid.<uid>.tag.lockit<uid>=1//sets the basic usability of the menu for friends and above 

src.newitem i_pouch//friends 
src.act.attr=attr_invis|attr_move_never 
src.act.P=<P.x> <P.y> <eval <p.z>+22> 
src.act.more1=1 
more1=<src.act.UID> 
src.act.link=<uid> 
src.act.name=dost 

src.newitem i_pouch//coowners 
src.act.attr=attr_invis|attr_move_never 
src.act.P=<P.x> <P.y> <eval <p.z>+20> 
src.act.more1=2 
more2=<src.act.UID> 
src.act.link=<uid> 
src.act.name=ortak

src.newitem i_key_gold//memory owner 
src.act.cont=<src.findlayer.101.uid> 
src.act.more1=<link> 
src.act.more2=3 
src.act.link=<link> 
src.act.name=owner:<name> 
tag.ownermemUID=<src.act> 
src.sysmessage @55 Ev kurulumu tamamlandi. Ev sahibi <uid.<link.more1>.name>
return 1 
endif 

var.itemlevel=<eval 0<tag.lockit<uid>>> 
f_findrank <src.uid> 
f_namelevel <var.phrank> 
var.phranks=<var.namestr> 

if (<var.itemlevel> <= <var.phrank>) 
sDIALOG house_menu 
else 
sDIALOG dialog_sign
endif 
return 1 

[function f_namelevel] 
if (<argn>=0) 
var.namestr=misafir
elseif (<argn>=1) 
var.namestr=dost 
elseif (<argn>=2) 
var.namestr=ortak 
elseif (<argn>=3) 
var.namestr=sahip 
elseif (<argn>=4) 
var.namestr=bee :)
endif 

[DIALOG house_menu] 
6,5

resizepic 0 0 3500 185 340
gumppic 20 20 100 
dhtmlgump 40 40 100 60 0 0 <name>
dhtmlgump 40 70 150 20 0 0 Ev Sahibi:
dhtmlgump 40 85 150 20 0 0 <uid.<link.more1>.name>

dhtmlgump 40 140 150 20 0 0 <qval <tag.bankactivated> ? banka ac : Bankayi Aktif Et[500k] (500.000gp)> 
dhtmlgump 40 160 150 20 0 0 Ev Ismini Degistir.
dhtmlgump 40 180 150 20 0 0 **************************
dhtmlgump 40 200 160 30 0 0 Dost Ekle
dhtmlgump 40 220 160 20 0 0 Dost Listesi
dhtmlgump 40 240 160 20 0 0 Ortak Ekle 
dhtmlgump 40 260 160 20 0 0 Ortak Listesi
dhtmlgump 40 280 160 20 0 0 Evi Kaldir
dhtmlgump 40 300 160 20 0 0 Evi Devret

button 20 140 56 55 1 0 1 
button 20 160 56 55 1 0 2
button 20 200 56 55 1 0 4
button 20 220 56 55 1 0 5
button 20 240 56 55 1 0 6
button 20 260 56 55 1 0 7
button 20 280 56 55 1 0 8
button 20 300 56 55 1 0 9

[DIALOG house_menu TEXT] 

[DIALOG house_menu BUTTON] 
on=0
dialogclose d_house_rename
dialogclose d_hmlist
on=1
if (0<tag.bankactivated>) 
src.bankself 
else 
src.pay 500000//Use you own 
if (<var.enough>) 
tag.bankactivated=1 
src.sysmessage @55 Banka aktif edildi.
endif 
endif 

on=2//rename
f_checkrights 2
if <var.rights> 
sdialog d_house_rename 
dialogclose d_hmlist
endif 


on=4//target friend 
f_checkrights 1 
if <var.rights> 
src.newitem i_target_house 
src.act.name=dost olarak ekle
src.act.link=<uid> 
src.act.more1=1 
src.act.equip 
endif 
on=5//friend list 
f_checkrights 0 
if <var.rights> 
f_hmlist <more1> 
endif 

on=6//add coowner 
f_checkrights 2 
if <var.rights> 
src.newitem i_target_house 
src.act.name=ortak olarak ekle
src.act.link=<uid> 
src.act.more1=2 
src.act.equip 
endif 

on=7//coowner list 
f_checkrights 0 
if <var.rights> 
f_hmlist <more2> 
endif 

on=8//redeed
f_checkrights 2
if <var.rights>
src.newitem=i_deed 
src.act.more=<link.baseid> 
src.act.name=<link.name> 
src.act.bounce 
src.newitem=i_redeed 
src.act.link=<link.uid>
src.act.tag.friend=<more1>
src.act.tag.coowner=<more2>
src.act.equip
endif

on=9 //transfer ownership 
f_checkrights 2 
if <var.rights> 
src.newitem i_target_house 
src.act.name owner
src.act.link <uid> 
src.act.more1 3
src.act.equip 
endif 

[function f_checkrights] 
var.rights=
f_findrank <src.uid>

if (<var.phrank> > <argn>)
var.rights=1 
else 
src.sysmessage @55 Bunu yapmaya yetkiniz yok. 
endif 

[function f_findrank] 
var.phrank=0 
if (<src.uid.<argn>.isgm>) 
var.phrank=4 
elseif (<link.more1>=<argn>) 
src.try uid.<tag.ownermemUID>.more1=<link> 
src.try uid.<tag.ownermemUID>.morep=<p> 
src.try uid.<tag.ownermemUID>.name=owner:<name> 
var.phrank=3 
else
var.theperson=<argn>
morey=<src.uid.<more1>.rescount> 
morex=0 
f_findrankloop <more1> 
morey=<src.uid.<more2>.rescount> 
morex=0 
f_findrankloop <more2> 
endif 

[function f_findrankloop] 
if (<morex> < <morey>) 
src.try uid.<args>.findcont.<morex>.name=<src.uid.<args>.findcont.<morex>.link.topobj.name> 
if (<src.uid.<argn>.findcont.<morex>.link.topobj.uid>=<var.theperson>) 
var.phrank=<src.uid.<argn>.more1> 
endif 
morex=<morex>+1 
f_findrankloop <args> 
endif 
endif 

[regiontype r_house_public]
On=@Enter
if (<src.ischar>)
src.events +e_house
src.tag.homesign <tag.homesign>
endif

On=@Exit
src.events -e_house

[events e_house]
On=@Login
try uid.<region.tag.homesign>.f_findrank <src.uid>
if !(<var.phrank>)
src.p <region.tag.signp>
src.update
endif

On=@ItemClick
if (<act.region.uid> == <region.uid>)
if !(<act.cont>)
if (<act.attr>&attr_move_never)
if !((<act.baseid> == i_strong_box) || (<act.type> == t_door) || (<act.type> == t_door_locked) || (<act.type> == t_sign_gump) || (<act.type> == t_stone_guild))
act.message [sabit]
endif
endif
endif
endif

[itemdef i_target_house] 
id=i_memory 
type=t_eq_script 

on=@timer 
remove 
return 0 

on=@equip 
if (<more1> < 3) 
target @55 Kimi <name>mek istiyorsunuz? 
elseif (<more1> = 3) 
target @55 Evi kime devretmek istiyorsunuz?
elseif (<more1> = 4) 
target @55 Kimi kovmak istiyorsunuz?
elseif (<more1> = 5) 
target @55 Sileceginiz kutuyu secin.
elseif (<more1> = 6) 
target @55 Yukari kaldiracaginiz sabit esyayi secin.
elseif (<more1> = 7) 
target @55 Asagi indireceginiz sabit esyayi secin.
elseif (<more1> = 8) 
target @55 Sabitleyeceginiz esyayi secin.
elseif (<more1> = 9) 
target @55 Sabitligini kaldiracaginiz esyayi secin.
endif 
timer 60 
return 1 

on=@targon_item
if (<src.targ.region.uid>=<link.region.uid>)
if ((<src.targ.type> == t_stone_guild) || (<src.targ.type> == t_spell) || (<src.targ.baseid> == i_corpse) || (<src.targ.type> == t_blood) || (<src.targ.type> == t_door) || (<src.targ.type> == t_door_locked) ||  (<src.targ.baseid> == i_pouch) || (<src.targ.baseid> == i_sign_brass))
src.sysmessage @55 Buna dokunamazsınız.
else
if  (<more1> = 5) && (<src.targ.attr>&attr_move_never) && (<src.targ.baseid> = i_strong_box)
if (<src.targ.more2> == <src.uid>) || (<src.targ.link.more1> == <src.uid>)
try src.targ.link.tag.strongbox<src.targ.more2>
src.targ.remove
else
src.sysmessage @55 Bu kutu sizin degil.
endif
elseif  (<more1> = 6) && (<src.targ.attr>&attr_move_never)
if (0<src.targ.tag.updown> > 9)
src.sysmessage @55 Daha fazla kaldiramazsiniz.
else
src.targ.nudgeup 1
src.targ.tag.updown 0<src.targ.tag.updown>
src.targ.tag.updown <eval <src.targ.tag.updown> +1>
endif
elseif  (<more1> = 7) && (<src.targ.attr>&attr_move_never)
if (0<src.targ.tag.updown> < 1)
src.sysmessage @55 Daha fazla indiremezsiniz.
else
src.targ.nudgedown 1
src.targ.tag.updown 0<src.targ.tag.updown>
src.targ.tag.updown <eval <src.targ.tag.updown> -1>
endif
elseif  (<more1> = 8) && !(<src.targ.attr>&attr_move_never)
if (<src.targ.cont>)
src.sysmessage @55 Sabitleyeceginiz esya yerde durmali.
elseif !(<src.targ.link> == 04fffffff)
src.sysmessage @55 Buna dokunamazsınız.
else
src.targ.link <link.uid>
src.targ.attr <src.targ.attr>&~attr_decay
src.targ.attr <src.targ.attr>|attr_move_never
src.targ.timer -1
src.targ.message [sabit]
if (<src.targ.type>) == t_book)
src.targ.more 1
endif
src.targ.update
endif
elseif  (<more1> = 9) && (<src.targ.attr>&attr_move_never)
if (<src.targ.baseid> == i_strong_box)
src.sysmessage @55 Buna dokunamazsınız.
else
src.targ.link 04fffffff
if (<src.targ.attr> == 04018)
src.targ.attr attr_decay
else
src.targ.attr <src.targ.attr>&~attr_move_never
src.targ.attr <src.targ.attr>|attr_decay
endif
src.targ.timer <eval (<serv.decaytimer> * 60)>
src.targ.message [sabit degil]
if (<src.targ.type> == t_book)
src.targ.more 0
endif
src.targ.update
endif
endif
endif
else
src.sysmessage @55 Esya evde degil.
return 1
endif
remove
return 1

on=@targon_char  
if (<src.targ.npc> > 0) && (<more1> < 4)
src.sysmessage @55 Sadece oyuncular icindir.
return 1
else 
link.f_findrank <src.targ.uid> 
if (<var.phrank>)//&&(<var.phrank> < 4) 
src.sysmessage @55 <src.targ.name> evin uyesi.
return 1
elseif (<more1> = 1)||(<more1> = 2)
if (<src.targ.region.uid>=<link.link.region.UID>)
src.newitem i_key_gold 
var.memoryuid=<src.targ.act> 
src.act.cont=<src.targ.findlayer.101.uid> 
src.act.more1=<link.link> //as code for doors 
src.act.more2=<more1> //rank 
src.newitem i_relating_crystal 
src.act.more1=<src.UID> 
src.act.cont=<link.more<eval <more1>>> 
src.act.link=<src.targ.uid>
src.sysmessage @55 <src.targ.name> evinize <name>ndi. 
src.targ.sysmessage @55 Eve <name>ndiniz. 
else
src.sysmessage @55 <src.targ.name> evinizde degil.
return 1
endif
elseif (<more1>=3)//transfer of ownership, if the owner has been removed from the game,a new memory item must be created and set as tag.ownermemuid on the brass sign 
src.try uid.<link.tag.ownermemUID>.cont=<src.targ.findlayer.101.UID> 
link.link.more1=<src.targ.uid> 
src.sysmessage @55 Devretme islemi tamamlandi. 
src.targ.sysmessage @55 Evin yeni sahibi sizsiniz.
elseif (<more1> = 4)
if (<src.targ.region.uid>=<link.region.UID>)
src.targ.go <link.P> 
src.targ.sysmessage @55 <src.name> sizi banladi. 
else
src.sysmessage @55 <src.targ.name> evinizde degil.
return 1
endif
endif 
endif 
remove 
return 1

[speech spk_house_cmds]
on=place a strongbox
try uid.<more2>.f_checkrights 1
if <var.rights> 
if !(0<tag.strongbox<src.uid>>)
src.newitem i_strong_box
src.act.p <src.p>
src.act.link <uid>
src.act.more2 <src.uid>
try tag.strongbox<src.uid> <src.act.uid>
else
src.sysmessage @55 Zaten kutunuz var.
endif
return 1
endif

on=remove this
try uid.<more2>.f_checkrights 1
if <var.rights> 
src.newitem i_target_house 
src.act.name remove this
src.act.link <uid> 
src.act.more1 5
src.act.equip 
endif 

on=item up
try uid.<more2>.f_checkrights 1
if <var.rights> 
src.newitem i_target_house 
src.act.name item up
src.act.link <uid> 
src.act.more1 6
src.act.equip 
endif 

on=item down
try uid.<more2>.f_checkrights 1
if <var.rights> 
src.newitem i_target_house 
src.act.name item down
src.act.link <uid> 
src.act.more1 7
src.act.equip 
endif 

on=lock this down
try uid.<more2>.f_checkrights 1
if <var.rights> 
src.newitem i_target_house 
src.act.name lock this down
src.act.link <uid> 
src.act.more1 8
src.act.equip 
endif 

on=release this
try uid.<more2>.f_checkrights 1
if <var.rights> 
src.newitem i_target_house 
src.act.name release this
src.act.link <uid> 
src.act.more1 9
src.act.equip 
endif 

on=i ban thee
try uid.<more2>.f_checkrights 0
if <var.rights> 
src.newitem i_target_house 
src.act.name i ban thee
src.act.link <uid.<more2>.uid> 
src.act.more1 4
src.act.equip 
endif 

on=*help*
try uid.<more2>.f_checkrights 0
if <var.rights> 
try uid.<more2>.sDIALOG house_help
endif

on=*menu*
try uid.<more2>.f_checkrights 0
if <var.rights> 
try uid.<more2>.sDIALOG house_menu
endif

[itemdef i_strong_box]
defname i_strong_box
type t_container
id i_box_brass
name strongbox
tdata2 04b

On=@Create
timer -1
attr attr_move_never

On=@Click
if (<src.region.uid> == <link.uid>)
message <src.uid.<more2>.name>
endif
if (<rescount> > 0)
message a <name> [<rescount>,<eval ((<weight> / 10) - <typedef.weight>)>]
else
message a strongbox [esya yok]
endif
return 1

On=@DClick
if ((<link.more> == <src.uid>) || (<more> == <src.uid>))  || (<src.account.plevel> > 6) // evin veya kasanin sahibi acabilir
return 0
else
return 1
endif

On=@PickUp_Ground
return 1
endif


[ITEMDEF i_relating_crystal]
id=i_crystal_red 
type=t_script 

[DIALOG dialog_sign] 
0,0 
gumppic 100 100 100 
dhtmlgump 120 120 100 60 0 0 <name>

[DIALOG dialog_sign TEXT] 

[DIALOG d_hmlist] 
-185,0 

resizepic 190 5 3500 200 210 

dhtmlgump 220 170 80 20 0 0 sil
dhtmlgump 240 50 160 20 0 0 <QVAL <morex> <morey> ? <src.uid.<tag.what>.findcont.<morey>.link.name> : > 
dhtmlgump 240 70 160 20 0 0 <QVAL <morex> <eval <morey>+1> ? <src.uid.<tag.what>.findcont.<eval <morey>+1>.link.name> : > 
dhtmlgump 240 90 160 20 0 0 <QVAL <morex> <eval <morey>+2> ? <src.uid.<tag.what>.findcont.<eval <morey>+2>.link.name> : > 
dhtmlgump 240 110 160 20 0 0 <QVAL <morex> <eval <morey>+3> ? <src.uid.<tag.what>.findcont.<eval <morey>+3>.link.name> : > 
dhtmlgump 240 130 160 20 0 0 <QVAL <morex> <eval <morey>+4> ? <src.uid.<tag.what>.findcont.<eval <morey>+4>.link.name> : > 
dhtmlgump 240 150 160 20 0 0 <QVAL <morex> <eval <morey>+5> ? <src.uid.<tag.what>.findcont.<eval <morey>+5>.link.name> : > 
dhtmlgump 265 20 70 20 0 0 <src.uid.<tag.what>.name>: <morex> 

button 220 50 56 55 1 0 1 
button 220 70 56 55 1 0 2 
button 220 90 56 55 1 0 3 
button 220 110 56 55 1 0 4 
button 220 130 56 55 1 0 5 
button 220 150 56 55 1 0 6 

button 220 20 2223 2223 1 0 7 
button 350 <QVAL <morex> (<morey>+5) ? 20 : 2000> 2224 2224 1 0 8 

[DIALOG d_hmlist TEXT] 

[DIALOG d_hmlist BUTTON] 
on=0 
tag.what= 
on=1 
f_hmremove <morey> 
on=2 
f_hmremove <eval <morey>+1> 
on=3 
f_hmremove <eval <morey>+2> 
on=4 
f_hmremove <eval <morey>+3> 
on=5 
f_hmremove <eval <morey>+4> 
on=6 
f_hmremove <eval <morey>+5> 
on=7 
if (<morey> < 5) 
sdialog house_menu 
tag.what= 
else 
morey=<eval <morey>-6> 
dialog d_hmlist 
endif 
on=8 
morey=<eval <morey>+6> 
dialog d_hmlist 

[function f_hmremove] 
if <morex> > <argn> 
f_checkrights <src.uid.<tag.what>.more> 
if <var.rights> 
//src.try uid.<tag.what>.findcont.<argn>.link.sysmessage <src.uid.<tag.what>.link.name> seni kovdu :))
src.try uid.<tag.what>.findcont.<argn>.remove 
f_hmlist <tag.what> 
endif 
else 
sdialog house_menu 
endif 

[function f_hmlist] 
tag.what=<argn> 
morex=<src.uid.<argn>.rescount> 
morey=0 
dialogclose d_hmlist
dialog d_hmlist 

[ITEMDEF i_redeed] 
DEFNAME=i_redeed 
ID=i_crystal_green 
NAME=Re-Deed Crystal 
TYPE=t_eq_script

ON=@Equip
try uid.<tag.friend>.remove
try uid.<tag.coowner>.remove
src.findlayer.29.findid.i_key_copper.remove
src.findid.i_key_copper.remove
LINK.REMOVE
remove
RETURN 1 

[DIALOG d_house_rename]
-185,0

resizepic 190 5 3500 250 100
resizepic 220 25 3000 200 22 
dhtmlgump 240 60 160 20 0 0 degistir
dhtmlgump 320 60 160 20 0 0 iptal
button 220 60 56 55 1 0 1 
button 300 60 56 55 1 0 2
dtextentry 225 30 185 25 0 0 <NAME> 

[DIALOG d_house_rename TEXT] 

[DIALOG d_house_rename BUTTON] 
ON=1 
NAME <ARGTXT[0]> 
sdialog house_menu
RETURN 1 
ON=2
sdialog house_menu

[function pay] 
if !(<args>) //empty command line? 
var.enough=1 
return 1 //then do nothing 
endif 
if (<src.isgm>) 
if (<src.account.plevel> < 7)
src.sysmessage @55 Yetkililer bu islemi gercekletiremez.
var.enough=0
return 1 
else
src.sysmessage @55 Gmden parami :) 
var.enough=1 
return 1
endif 
endif
var.enough=0 //if not enough gold, var.enough will be '0' 
var.totalgold=<findlayer.21.rescount i_gold> + <bankbalance> 
if (<eval <args>> > <var.totalgold>) //the amount to pay is more then you own?? 
src.sysmessage @55 Bankanizda <eval <args>> gp yok.//refuse transaction 
else //you have enough to pay 
var.enough=1 //allow you to check transaction later 
if (<argn> > <src.findlayer.21.rescount i_gold>) 
goldtopack <eval <argn>-<src.findlayer.21.rescount i_gold>> //put the needed money in the backpack 
endif 
payamount <args> //pay the needed amount 
endif 

[function goldtopack] //move enough gold so that we can pay 
//argn- amount of gold left to move 
var.found=(<argn> - <src.findlayer.29.findid.i_gold.amount>) //amount found 
if (<var.found> > 0) //pile is not big enough, so move it all 
src.findlayer.29.findid.i_gold.cont=<src.findlayer.21.uid> // transfer to backpack 
goldtopack <var.found> //get the next pile of gold 
else //not entire pile needed 
var.left=(0 - <var.found>) // get the amount of money left in this pile 
if (<var.left>) 
src.findlayer.29.findid.i_gold.amount <var.left> //set this amount 
else 
src.findlayer.29.findid.i_gold.remove 
endif 
src.newitem i_gold //create a new pile of gold 
src.act.amount <args> //the needed amount 
src.act.cont=<src.findlayer.21.uid> //place in backpack 
endif //done 

[function payamount] 
var.counter=<eval <args>> //amount left to pay 
if (<var.counter> > 65000) // more then 65000 left to pay?? 
src.consume 65000 i_gold //consume 65000 first 
var.counter=(<var.counter> - 65000) 
payamount <var.counter> //then get the rest 
else 
src.consume <args> i_gold //consume the rest of the needed amount 
endif // we are finished 


[DIALOG house_help] 
5,5

resizepic 0 0 3500 360 370 
dhtmlgump 120 40 300 60 0 0 <def.fontred>> Ev Yardim Menusu
dhtmlgump 40 70 300 20 0 0 <def.fontwhite>>i ban thee
dhtmlgump 40 85 300 20 0 0 Eve uye veya dost olmayan kişileri dişari atar.
dhtmlgump 40 105 300 20 0 0 <def.fontwhite>>i wish toplace a strongbox
dhtmlgump 40 120 300 20 0 0 Evinize kilitli bir kasa koymanıza yarar.
dhtmlgump 40 140 300 20 0 0 <def.fontwhite>>i wish to remove this
dhtmlgump 40 155 300 20 0 0 Evinizde ki kilitli kasayı silmenize yarar.
dhtmlgump 40 175 300 20 0 0 <def.fontwhite>>i wich to lock this down
dhtmlgump 40 190 300 20 0 0 Bir esyayı ev icerisinde sabitlemeye yarar.
dhtmlgump 40 210 300 20 0 0 <def.fontwhite>>item up
dhtmlgump 40 225 300 20 0 0 Bir esyayı 1 derece havaya kaldirmaniza yarar.
dhtmlgump 40 245 300 20 0 0 <def.fontgold>>Bir eşya yalnızca 10 derece yukarı kaldırılır.
dhtmlgump 40 260 300 20 0 0 <def.fontwhite>>item down
dhtmlgump 40 275 300 20 0 0 Bir eşyayı 1 derece aşağıya indirmenize yarar.
dhtmlgump 40 295 300 20 0 0 <def.fontwhite>>menu
dhtmlgump 40 310 300 20 0 0 Ev tabelasindaki menuyu gosterir.

[DIALOG house_help TEXT] 

[DIALOG house_help BUTTON] 
on=0
dialogclose house_help

[eof]
  • 2008-06-27 11:53
  • #4
HP-Nexiel
HP-Nexiel
Expert
14.3
Sign Brass script'ini şununla değiştiriyorsunuz..

[itemdef 0bd1]
defname i_sign_brass
type t_script
dupelist 0bd0,0bcf,0bd1,0ba4,0ba6,0ba8,0baa,0bac,0bae,0bb0,0bb2,0bb4,0bb6,0bb8,0bba,0bbc,0bbe,0bc0,0bc2,0bc4,0bc6,0bc8,0bca,0bcc,0bce,0bd0,0bd2,0bd4,0bd6,0bd8,0bda,0bdc,0bde,0be0,0be2,0be4,0be6,0be8,0bea,0bec,0bee,0bf0,0bf2,0bf4,0bf6,0bf8,0bfa,0bfc,0bfe,0c00,0c02,0c04,0c06,0c08,0c0a,0c0c

On=@Create
timer 0

On=@Timer
htimer
return 1

On=@Click
hclick
return 1

On=@DClick
hdclick
return 1
  • 2008-06-27 14:10
  • #5
ZoLLy
ZoLLy
Banned
-1
Nexiel benimkide aynı galiba ztn :S

upload ettim bir bakarsanız çok sevinirim beynim sulandı.

https://www.dosya.cc/housing.rar.html
  • 2008-06-27 15:15
  • #6

Üye Ol veya Giriş Yap

Bu forum başlığına mesaj atmak istiyorsanız hemen üye olun veya giriş yapın.

Discord ile Bağlan
Twitch ile Bağlan
Steam ile Bağlan
Google ile Bağlan