Вот написал менюшку как на ДРВ, правда некоторые гампы нетакие же и ещё кое что не так как на ДРВ, но если нужна такая берите и переделайте как вам хочется
Код
//by Palich 28.08.2006 21:30
[DIALOG house_menu_sell]
150,150
resizepic 0 0 2600 410 310
resizepic 33 22 5054 345 25
resizepic 33 165 5054 330 15
gumppic 33 55 100
button 305 270 0f7 0f8 1 0 0
button 45 270 0f2 0f3 1 0 3
button 305 160 0ef 0f0 1 0 4
button 40 20 0867 0868 1 0 3
button 160 20 0867 0868 1 0 1
button 270 20 0867 0868 1 0 2
dtext 70 25 0 General
dtext 190 25 0 Friends
dtext 300 25 0 Payment
dtext 190 55 1152 Warning! Your house will
dtext 190 75 1152 be DESTROYED and house
dtext 190 95 1152 ballance will be returned to
dtext 190 115 1152 your bank account.
dtext 35 185 020 House and all locked items will be destroyed!
dtext 25 225 1152 Are you sure to do this? Click APPLY to proceed.
dtextentry 50 95 105 20 55 1001 <TAG.HOUSETYPE>
dtextentry 155 95 10 20 55 1002 ...
[DIALOG house_menu_sell BUTTON]
ON=0
ON=1
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=2
f_house_days
DIALOG house_menu_payment
ON=3
DIALOG house_menu_general
ON=4
var.gold=<tag.balance>/2
f_house_sell
link.remove
[function f_house_sell]
if (<var.gold>>50000)
src.newitem=i_gold
src.act.amount=50000
src.act.bounce
var.gold=<var.gold>-50000
f_house_sell
else
src.newitem=i_gold
src.act.amount=<var.gold>
src.act.bounce
[DIALOG house_menu_general]
150,150
resizepic 0 0 2600 410 310
resizepic 33 22 5054 345 25
resizepic 33 165 5054 345 15
gumppic 33 55 100
button 305 270 0f7 0f8 1 0 0
gumppic 40 20 0869
button 160 20 0867 0868 1 0 1
button 270 20 0867 0868 1 0 2
button 190 135 0a9a 0a9b 1 0 4
button 190 185 0a9a 0a9b 1 0 5
button 190 215 0a9a 0a9b 1 0 6
button 33 185 0a9a 0a9b 1 0 3
button 33 215 0a9a 0a9b 1 0 7
button 33 245 0a9a 0a9b 1 0 8
dtext 70 25 0 General
dtext 190 25 0 Friends
dtext 300 25 0 Payment
dtext 190 65 1152 Owned by:
dtext 190 85 1152 Locked items:
dtext 190 105 1152 House type:
dtext 215 135 1152 Owner bankbox access
dtext 215 185 1152 Lock/Unlock item
dtext 215 215 020 Sell this house
dtext 55 185 1152 Set enter type
dtext 55 215 1152 Change locks
dtext 55 245 1152 Transfer house
dtext 295 65 0 <tag.ownername>
dtext 295 85 0 0/100
dtext 295 105 0 Regular
dtextentry 50 95 105 20 55 1001 <TAG.HOUSETYPE>
dtextentry 155 95 10 20 55 1002 ...
[DIALOG house_menu_general BUTTON]
ON=0
ON=1
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=2
f_house_days
DIALOG house_menu_payment
ON=3
if (<region.tag.sosh>=0)
var.sosh01=0d2
var.sosh11=0d2
var.sosh21=0d2
var.sosh31=0d3
var.sosh02=0d3
var.sosh12=0d3
var.sosh22=0d3
var.sosh32=0d2
DIALOG house_menu_enter_type
else
if (<region.tag.sosh>=1)
var.sosh01=0d3
var.sosh11=0d2
var.sosh21=0d2
var.sosh31=0d2
var.sosh02=0d2
var.sosh12=0d3
var.sosh22=0d3
var.sosh32=0d3
DIALOG house_menu_enter_type
else
if (<region.tag.sosh>=2)
var.sosh01=0d2
var.sosh11=0d2
var.sosh21=0d3
var.sosh31=0d2
var.sosh02=0d3
var.sosh12=0d3
var.sosh22=0d2
var.sosh32=0d3
DIALOG house_menu_enter_type
else
if (<region.tag.sosh>=3)
var.sosh01=0d2
var.sosh11=0d3
var.sosh21=0d2
var.sosh31=0d2
var.sosh02=0d3
var.sosh12=0d2
var.sosh22=0d3
var.sosh32=0d3
DIALOG house_menu_enter_type
ON=4
SRC.BANKSELF
ON=5
var.type=<src.findtype.t_key.link>
if !<src.findtype.t_key>
src.sysmessage @021 You cant use this!
else
if (<var.type>=<link>)
src.findtype.t_key.dclick
ON=6
DIALOG house_menu_sell
ON=7
if (<src.restest i_gold 2000>)
src.newitem=i_door_lock
src.act.bounce
src.act.tag.home=<region.tag.house>
else
src.sysmessage @021 You eed have 2000 gold coins from your backpack!
ON=8
src.newitem=i_transfer_house
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
[function f_friendremove]
var.friendremove1=0d2
var.friendremove2=0d2
var.friendremove3=0d2
var.friendremove4=0d2
var.friendremove5=0d2
if (0<tag.friendremove1>=1)
var.friendremove1=0d3
var.friendremove2=0d2
var.friendremove3=0d2
var.friendremove4=0d2
var.friendremove5=0d2
endif
if (0<tag.friendremove2>=1)
var.friendremove1=0d2
var.friendremove2=0d3
var.friendremove3=0d2
var.friendremove4=0d2
var.friendremove5=0d2
endif
if (0<tag.friendremove3>=1)
var.friendremove1=0d2
var.friendremove2=0d2
var.friendremove3=0d3
var.friendremove4=0d2
var.friendremove5=0d2
endif
if (0<tag.friendremove4>=1)
var.friendremove1=0d2
var.friendremove2=0d2
var.friendremove3=0d2
var.friendremove4=0d3
var.friendremove5=0d2
endif
if (0<tag.friendremove5>=1)
var.friendremove1=0d2
var.friendremove2=0d2
var.friendremove3=0d2
var.friendremove4=0d2
var.friendremove5=0d3
endif
[function f_friendlist]
var.friend11=0fa5
var.friend21=0fa5
var.friend31=0fa5
var.friend41=0fa5
var.friend51=0fa5
var.friend12=0fa6
var.friend22=0fa6
var.friend32=0fa6
var.friend42=0fa6
var.friend52=0fa6
if (<tag.friend1>!=0)
var.friend11=0fa2
var.friend12=0fa3
endif
if (<tag.friend2>!=0)
var.friend21=0fa2
var.friend22=0fa3
endif
if (<tag.friend3>!=0)
var.friend31=0fa2
var.friend32=0fa3
endif
if (<tag.friend4>!=0)
var.friend41=0fa2
var.friend42=0fa3
endif
if (<tag.friend5>!=0)
var.friend51=0fa2
var.friend52=0fa3
endif
[itemdef i_transfer_house]
id=i_gold
type=t_eq_script
name=Transfer
on=@equip
target Select a new owner...
return 1
ON=@TIMER
REMOVE
RETURN 1
on=@targon_char
if (<src.region.tag.house>=<link.region.tag.house>)
LINK.MORE2=<SRC.TARG.UID>
LINK.TAG.OWNERNAME=<SRC.TARG.NAME>
LINK.MORE1=0
LINK.TAG.FRIEND1=0
LINK.TAG.FRIEND2=0
LINK.TAG.FRIEND3=0
LINK.TAG.FRIEND4=0
LINK.TAG.FRIEND5=0
LINK.TAG.FRIENDNAME1=Empty
LINK.TAG.FRIENDNAME2=Empty
LINK.TAG.FRIENDNAME3=Empty
LINK.TAG.FRIENDNAME4=Empty
LINK.TAG.FRIENDNAME5=Empty
LINK=<MORE1>
LINK.TAG.OWNER=<SRC.TARG.UID>
LINK.TAG.COOWNER=0
LINK.TAG.FRIEND1=0
LINK.TAG.FRIEND2=0
LINK.TAG.FRIEND3=0
LINK.TAG.FRIEND4=0
LINK.TAG.FRIEND5=0
region.TAG.OWNER=<SRC.TARG.UID>
region.TAG.COOWNER=0
region.TAG.FRIEND1=0
region.TAG.FRIEND2=0
region.TAG.FRIEND3=0
region.TAG.FRIEND4=0
region.TAG.FRIEND5=0
region.TAG.FRIENDNAME1=Empty
region.TAG.FRIENDNAME2=Empty
region.TAG.FRIENDNAME3=Empty
region.TAG.FRIENDNAME4=Empty
region.TAG.FRIENDNAME5=Empty
REMOVE
return 1
else
remove
src.sysmessage @021 You dont use this!
return 1
[itemdef i_door_lock]
id=i_bag
type=t_eq_script
name=Door Changer
on=@dclick
target Select a door...
return 1
on=@targon_item
if (<src.targ.region.tag.house>=<tag.home>) && ((<src.targ.type>=t_door_locked) || (<src.targ.type>=t_door))
var.rand1={0 10000}
var.rand2=<eval <var.rand1>>
var.link=10000+<var.rand2>
src.newitem=i_key_copper
src.act.bounce
src.act.attr=04
src.act.link=<var.link>
src.act.more1=<var.link>
src.act.name=Copper Key of the Door
src.targ.link=<var.link>
src.targ.more1=<var.link>
remove
return 1
else
src.sysmessage @021 You dont use this!
return 1
[DIALOG house_menu_enter_type]
150,150
resizepic 0 0 2600 410 310
resizepic 33 22 5054 345 25
resizepic 33 165 5054 330 15
gumppic 33 55 100
button 305 270 0f7 0f8 1 0 0
button 45 270 0f2 0f3 1 0 3
button 305 160 0ef 0f0 1 0 8
button 40 20 0867 0868 1 0 3
button 160 20 0867 0868 1 0 1
button 270 20 0867 0868 1 0 2
button 190 135 <var.sosh31> <var.sosh32> 1 0 7
button 190 115 <var.sosh21> <var.sosh22> 1 0 6
button 190 95 <var.sosh11> <var.sosh12> 1 0 5
button 190 75 <var.sosh01> <var.sosh02> 1 0 4
dtext 70 25 0 General
dtext 190 25 0 Friends
dtext 300 25 0 Payment
dtext 190 55 1152 Declare enter type:
dtext 215 75 0 Only Owner
dtext 215 95 0 Owner and friends
dtext 215 115 0 People with key
dtext 215 135 0 Public house
dtext 35 185 1152 Warning! If ypu declare your house as a publick
dtext 35 205 1152 house, everybody will be allowed to enter in
dtext 35 225 1152 independently of key presence.
dtextentry 50 95 105 20 55 1001 <TAG.HOUSETYPE>
dtextentry 155 95 10 20 55 1002 ...
[DIALOG house_menu_enter_type BUTTON]
ON=0
region.tag.sosh=<region.tag.sosh>
ON=1
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=2
f_house_days
DIALOG house_menu_payment
ON=3
DIALOG house_menu_general
ON=4
tag.sosh=1
var.sosh01=0d3
var.sosh11=0d2
var.sosh21=0d2
var.sosh31=0d2
var.sosh02=0d2
var.sosh12=0d3
var.sosh22=0d3
var.sosh32=0d3
DIALOG house_menu_enter_type
src.sysmessage @021 Only owner of this house may goes here!
ON=5
tag.sosh=3
var.sosh01=0d2
var.sosh11=0d3
var.sosh21=0d2
var.sosh31=0d2
var.sosh02=0d3
var.sosh12=0d3
var.sosh22=0d2
var.sosh32=0d3
DIALOG house_menu_enter_type
src.sysmessage @021 Only owner of this house and friends of this house may goes here!
ON=6
tag.sosh=2
var.sosh01=0d2
var.sosh11=0d2
var.sosh21=0d3
var.sosh31=0d2
var.sosh02=0d3
var.sosh12=0d3
var.sosh22=0d2
var.sosh32=0d3
DIALOG house_menu_enter_type
src.sysmessage @021 Only with key of this house may goes here!
ON=7
tag.sosh=0
var.sosh01=0d2
var.sosh11=0d2
var.sosh21=0d2
var.sosh31=0d3
var.sosh02=0d3
var.sosh12=0d3
var.sosh22=0d3
var.sosh32=0d2
DIALOG house_menu_enter_type
src.sysmessage @021 All players may goes here!
ON=8
region.tag.sosh=<tag.sosh>
DIALOG house_menu_general
src.sysmessage @021 System of safety has been saved!
[DIALOG house_menu_friends]
150,150
resizepic 0 0 2600 410 310
resizepic 33 22 5054 345 25
resizepic 33 165 5054 345 15
gumppic 33 55 100
button 305 270 0f7 0f8 1 0 0
gumppic 160 20 0869
button 40 20 0867 0868 1 0 1
button 270 20 0867 0868 1 0 2
button 190 55 <var.friend11> <var.friend12> 1 0 4
button 190 75 <var.friend21> <var.friend22> 1 0 5
button 190 95 <var.friend31> <var.friend32> 1 0 6
button 190 115 <var.friend41> <var.friend42> 1 0 7
button 190 135 <var.friend51> <var.friend52> 1 0 8
button 220 55 <var.friendremove1> <var.friendremove1> 1 0 13
button 220 75 <var.friendremove2> <var.friendremove2> 1 0 14
button 220 95 <var.friendremove3> <var.friendremove3> 1 0 15
button 220 115 <var.friendremove4> <var.friendremove4> 1 0 16
button 220 135 <var.friendremove5> <var.friendremove5> 1 0 17
button 190 185 0fa8 0fa9 1 0 12
button 33 185 0a9a 0a9b 1 0 9
button 33 215 0a9a 0a9b 1 0 10
button 33 245 0a9a 0a9b 1 0 11
dtext 70 25 0 General
dtext 190 25 0 Friends
dtext 300 25 0 Payment
dtext 55 185 1152 Add a friend
dtext 55 215 1152 Add entrie guild
dtext 55 245 1152 Remove a friend
dtextentry 50 95 105 20 55 1001 <TAG.HOUSETYPE>
dtextentry 155 95 10 20 55 1002 ...
dtext 225 185 1152 Remove all friends
dtext 250 55 0 <tag.friendname1>
dtext 250 75 0 <tag.friendname2>
dtext 250 95 0 <tag.friendname3>
dtext 250 115 0 <tag.friendname4>
dtext 250 135 0 <tag.friendname5>
[DIALOG house_menu_friends BUTTON]
ON=0
ON=1
DIALOG house_menu_general
ON=2
f_house_days
DIALOG house_menu_payment
ON=3
ON=4
if (<tag.friend1>=0)
src.newitem=i_friend_1
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
else
TAG.FRIEND1=0
TAG.FRIENDNAME1=Empty
region.TAG.FRIEND1=0
region.TAG.FRIENDNAME1=Empty
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=5
if (<tag.friend2>=0)
src.newitem=i_friend_2
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
else
TAG.FRIEND2=0
TAG.FRIENDNAME2=Empty
region.TAG.FRIEND2=0
region.TAG.FRIENDNAME2=Empty
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=6
if (<tag.friend3>=0)
src.newitem=i_friend_3
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
else
TAG.FRIEND3=0
TAG.FRIENDNAME3=Empty
region.TAG.FRIEND3=0
region.TAG.FRIENDNAME3=Empty
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=7
if (<tag.friend4>=0)
src.newitem=i_friend_4
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
else
TAG.FRIEND4=0
TAG.FRIENDNAME4=Empty
region.TAG.FRIEND4=0
region.TAG.FRIENDNAME4=Empty
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=8
if (<tag.friend5>=0)
src.newitem=i_friend_5
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
else
TAG.FRIEND5=0
TAG.FRIENDNAME5=Empty
region.TAG.FRIEND5=0
region.TAG.FRIENDNAME5=Empty
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=9
if (<tag.friend1>=0)
src.newitem=i_friend_1
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
else
if (<tag.friend2>=0)
src.newitem=i_friend_2
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
else
if (<tag.friend3>=0)
src.newitem=i_friend_3
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
else
if (<tag.friend4>=0)
src.newitem=i_friend_4
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
else
if (<tag.friend5>=0)
src.newitem=i_friend_5
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
else
src.sysmessage @021 You dont use this!
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=10
if (<tag.friend1>=0)
src.newitem=i_friend_guild_1
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
else
if (<tag.friend2>=0)
src.newitem=i_friend_guild_2
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
else
if (<tag.friend3>=0)
src.newitem=i_friend_guild_3
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
else
if (<tag.friend4>=0)
src.newitem=i_friend_guild_4
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
else
if (<tag.friend5>=0)
src.newitem=i_friend_guild_5
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
else
src.sysmessage @021 You dont use this!
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=11
if (<tag.friendremove1>=1)
src.sysmessage @021 You are remove <TAG.FRIENDNAME1> from house friend list!
TAG.FRIEND1=0
TAG.FRIENDNAME1=Empty
region.TAG.FRIENDNAME1=Empty
region.TAG.FRIEND1=0
tag.friendremove0=1
tag.friendremove1=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
else
if (<tag.friendremove2>=1)
src.sysmessage @021 You are remove <TAG.FRIENDNAME1> from house friend list!
TAG.FRIEND1=0
TAG.FRIENDNAME1=Empty
region.TAG.FRIENDNAME1=Empty
region.TAG.FRIEND1=0
tag.friendremove0=1
tag.friendremove1=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
else
if (<tag.friendremove3>=1)
src.sysmessage @021 You are remove <TAG.FRIENDNAME1> from house friend list!
TAG.FRIEND1=0
TAG.FRIENDNAME1=Empty
region.TAG.FRIENDNAME1=Empty
region.TAG.FRIEND1=0
tag.friendremove0=1
tag.friendremove1=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
else
if (<tag.friendremove4>=1)
src.sysmessage @021 You are remove <TAG.FRIENDNAME1> from house friend list!
TAG.FRIEND1=0
TAG.FRIENDNAME1=Empty
region.TAG.FRIENDNAME1=Empty
region.TAG.FRIEND1=0
tag.friendremove0=1
tag.friendremove1=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
else
if (<tag.friendremove5>=1)
src.sysmessage @021 You are remove <TAG.FRIENDNAME1> from house friend list!
TAG.FRIEND1=0
TAG.FRIENDNAME1=Empty
region.TAG.FRIENDNAME1=Empty
region.TAG.FRIEND1=0
tag.friendremove0=1
tag.friendremove1=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
else
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=12
TAG.FRIEND1=0
TAG.FRIEND2=0
TAG.FRIEND3=0
TAG.FRIEND4=0
TAG.FRIEND5=0
TAG.FRIENDNAME1=Empty
TAG.FRIENDNAME2=Empty
TAG.FRIENDNAME3=Empty
TAG.FRIENDNAME4=Empty
TAG.FRIENDNAME5=Empty
region.TAG.FRIENDNAME1=Empty
region.TAG.FRIENDNAME2=Empty
region.TAG.FRIENDNAME3=Empty
region.TAG.FRIENDNAME4=Empty
region.TAG.FRIENDNAME5=Empty
region.TAG.FRIEND1=0
region.TAG.FRIEND2=0
region.TAG.FRIEND3=0
region.TAG.FRIEND4=0
region.TAG.FRIEND5=0
src.sysmessage @021 All friends has been removed!
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=13
tag.friendremove1=1
tag.friendremove2=0
tag.friendremove3=0
tag.friendremove4=0
tag.friendremove5=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=14
tag.friendremove1=0
tag.friendremove2=1
tag.friendremove3=0
tag.friendremove4=0
tag.friendremove5=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=15
tag.friendremove1=0
tag.friendremove2=0
tag.friendremove3=1
tag.friendremove4=0
tag.friendremove5=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=16
tag.friendremove1=0
tag.friendremove2=0
tag.friendremove3=0
tag.friendremove4=1
tag.friendremove5=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=17
tag.friendremove1=0
tag.friendremove2=0
tag.friendremove3=0
tag.friendremove4=0
tag.friendremove5=1
f_friendlist
f_friendremove
DIALOG house_menu_friends
[ITEMDEF i_friend_1]
ID=i_gold
NAME=Friend 1
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND1>!=0)
SRC.MESSAGE @021 You already chose friend 1, try removing him before having a new one.
REMOVE
ELSE
TARGET @043 Select a friend 1...
ENDIF
RETURN 1
ON=@TARGON_CHAR
if (<src.region.tag.house>!=<link.region.tag.house>)
src.sysmessage @021 You dont use this!
remove
return 1
else
if (<src.targ.memoryfindtype.memory_guild>!=0)
LINK.TAG.FRIEND1=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME1=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND1=<SRC.TARG.UID>
region.TAG.FRIENDNAME1=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
else
LINK.TAG.FRIEND1=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME1=<SRC.TARG.NAME>
region.TAG.FRIEND1=<SRC.TARG.UID>
region.TAG.FRIENDNAME1=<SRC.TARG.NAME>
LINK=<MORE1>
REMOVE
return 1
[ITEMDEF i_friend_2]
ID=i_gold
NAME=Friend 2
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND2>!=0)
SRC.MESSAGE @021 You already chose friend 2, try removing him before having a new one.
REMOVE
ELSE
TARGET @043 Select a friend 2...
ENDIF
RETURN 1
ON=@TARGON_CHAR
if (<src.region.tag.house>!=<link.region.tag.house>)
src.sysmessage @021 You dont use this!
remove
return 1
else
if (<src.targ.memoryfindtype.memory_guild>!=0)
LINK.TAG.FRIEND2=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME2=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND2=<SRC.TARG.UID>
region.TAG.FRIENDNAME2=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
else
LINK.TAG.FRIEND2=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME2=<SRC.TARG.NAME>
region.TAG.FRIEND2=<SRC.TARG.UID>
region.TAG.FRIENDNAME2=<SRC.TARG.NAME>
LINK=<MORE1>
REMOVE
return 1
[ITEMDEF i_friend_3]
ID=i_gold
NAME=Friend 3
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND3>!=0)
SRC.MESSAGE @021 You already chose friend 3, try removing him before having a new one.
REMOVE
ELSE
TARGET @043 Select a friend 3...
ENDIF
RETURN 1
ON=@TARGON_CHAR
if (<src.region.tag.house>!=<link.region.tag.house>)
src.sysmessage @021 You dont use this!
remove
return 1
else
if (<src.targ.memoryfindtype.memory_guild>!=0)
LINK.TAG.FRIEND3=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME3=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND3=<SRC.TARG.UID>
region.TAG.FRIENDNAME3=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
else
LINK.TAG.FRIEND3=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME3=<SRC.TARG.NAME>
region.TAG.FRIEND3=<SRC.TARG.UID>
region.TAG.FRIENDNAME3=<SRC.TARG.NAME>
LINK=<MORE1>
REMOVE
return 1
[ITEMDEF i_friend_4]
ID=i_gold
NAME=Friend 4
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND4>!=0)
SRC.MESSAGE @021 You already chose friend 4, try removing him before having a new one.
REMOVE
ELSE
TARGET @043 Select a friend 4...
ENDIF
RETURN 1
ON=@TARGON_CHAR
if (<src.region.tag.house>!=<link.region.tag.house>)
src.sysmessage @021 You dont use this!
remove
return 1
else
if (<src.targ.memoryfindtype.memory_guild>!=0)
LINK.TAG.FRIEND4=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME4=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND4=<SRC.TARG.UID>
region.TAG.FRIENDNAME4=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
else
LINK.TAG.FRIEND4=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME4=<SRC.TARG.NAME>
region.TAG.FRIEND4=<SRC.TARG.UID>
region.TAG.FRIENDNAME4=<SRC.TARG.NAME>
LINK=<MORE1>
REMOVE
return 1
[ITEMDEF i_friend_5]
ID=i_gold
NAME=Friend 5
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND5>!=0)
SRC.MESSAGE @021 You already chose friend 5, try removing him before having a new one.
REMOVE
ELSE
TARGET @043 Select a friend 5...
ENDIF
RETURN 1
ON=@TARGON_CHAR
if (<src.region.tag.house>!=<link.region.tag.house>)
src.sysmessage @021 You dont use this!
remove
return 1
else
if (<src.targ.memoryfindtype.memory_guild>!=0)
LINK.TAG.FRIEND5=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME5=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND5=<SRC.TARG.UID>
region.TAG.FRIENDNAME5=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
else
LINK.TAG.FRIEND5=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME5=<SRC.TARG.NAME>
region.TAG.FRIEND5=<SRC.TARG.UID>
region.TAG.FRIENDNAME5=<SRC.TARG.NAME>
LINK=<MORE1>
REMOVE
return 1
[ITEMDEF i_friend_guild_1]
ID=i_gold
NAME=Friend 1
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND1>!=0)
SRC.MESSAGE @021 You already chose friend 1, try removing him before having a new one.
REMOVE
ELSE
TARGET @043 Select a friend 1...
ENDIF
RETURN 1
ON=@TARGON_CHAR
if (<src.targ.memoryfindtype.memory_guild>=0)
src.sysmessage @021 Your target no in guild!
remove
return 1
else
if (<src.region.tag.house>=<link.region.tag.house>)
LINK.TAG.FRIEND1=<src.targ.memoryfindtype.memory_guild.link>
LINK.TAG.FRIENDNAME1=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND1=<src.targ.memoryfindtype.memory_guild.link>
region.TAG.FRIENDNAME1=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
else
remove
src.sysmessage @021 You dont use this!
return 1
[ITEMDEF i_friend_guild_2]
ID=i_gold
NAME=Friend 2
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND2>!=0)
SRC.MESSAGE @021 You already chose friend 2, try removing him before having a new one.
REMOVE
ELSE
TARGET @043 Select a friend 2...
ENDIF
RETURN 1
ON=@TARGON_CHAR
if (<src.targ.memoryfindtype.memory_guild>=0)
src.sysmessage @021 Your target no in guild!
remove
return 1
else
if (<src.region.tag.house>=<link.region.tag.house>)
LINK.TAG.FRIEND2=<src.targ.memoryfindtype.memory_guild.link>
LINK.TAG.FRIENDNAME2=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND2=<src.targ.memoryfindtype.memory_guild.link>
region.TAG.FRIENDNAME2=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
else
remove
src.sysmessage @021 You dont use this!
return 1
[ITEMDEF i_friend_guild_3]
ID=i_gold
NAME=Friend 3
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND3>!=0)
SRC.MESSAGE @021 You already chose friend 3, try removing him before having a new one.
REMOVE
ELSE
TARGET @043 Select a friend 3...
ENDIF
RETURN 1
ON=@TARGON_CHAR
if (<src.targ.memoryfindtype.memory_guild>=0)
src.sysmessage @021 Your target no in guild!
remove
return 1
else
if (<src.region.tag.house>=<link.region.tag.house>)
LINK.TAG.FRIEND3=<src.targ.memoryfindtype.memory_guild.link>
LINK.TAG.FRIENDNAME3=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND3=<src.targ.memoryfindtype.memory_guild.link>
region.TAG.FRIENDNAME3=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
else
remove
src.sysmessage @021 You dont use this!
return 1
[ITEMDEF i_friend_guild_4]
ID=i_gold
NAME=Friend 4
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND4>!=0)
SRC.MESSAGE @021 You already chose friend 4, try removing him before having a new one.
REMOVE
ELSE
TARGET @043 Select a friend 4...
ENDIF
RETURN 1
ON=@TARGON_CHAR
if (<src.targ.memoryfindtype.memory_guild>=0)
src.sysmessage @021 Your target no in guild!
remove
return 1
else
if (<src.region.tag.house>=<link.region.tag.house>)
LINK.TAG.FRIEND4=<src.targ.memoryfindtype.memory_guild.link>
LINK.TAG.FRIENDNAME4=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND4=<src.targ.memoryfindtype.memory_guild.link>
region.TAG.FRIENDNAME4=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
else
remove
src.sysmessage @021 You dont use this!
return 1
[ITEMDEF i_friend_guild_5]
ID=i_gold
NAME=Friend 5
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND5>!=0)
SRC.MESSAGE @021 You already chose friend 5, try removing him before having a new one.
REMOVE
ELSE
TARGET @043 Select a friend 5...
ENDIF
RETURN 1
ON=@TARGON_CHAR
if (<src.targ.memoryfindtype.memory_guild>=0)
src.sysmessage @021 Your target no in guild!
remove
return 1
else
if (<src.region.tag.house>=<link.region.tag.house>)
LINK.TAG.FRIEND5=<src.targ.memoryfindtype.memory_guild.link>
LINK.TAG.FRIENDNAME5=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND5=<src.targ.memoryfindtype.memory_guild.link>
region.TAG.FRIENDNAME5=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
else
remove
src.sysmessage @021 You dont use this!
return 1
[DIALOG house_menu_payment]
150,150
resizepic 0 0 2600 410 310
resizepic 33 22 5054 345 25
resizepic 33 165 5054 345 15
resizepic 300 65 3000 90 20
gumppic 33 55 100
button 305 270 0f7 0f8 1 0 0
gumppic 270 20 0869
button 40 20 0867 0868 1 0 1
button 160 20 0867 0868 1 0 2
button 33 185 0a9a 0a9b 1 0 3
dtext 70 25 0 General
dtext 190 25 0 Friends
dtext 300 25 0 Payment
dtext 190 65 1152 House balance:
dtext 190 85 1152 Cost per day:
dtext 190 105 1152 Days paid:
dtext 190 135 1152 Status:
dtext 55 185 1152 Add gold
dtext 305 65 0 <eval <tag.balance>> //<eval <timer>/60>
dtext 305 85 0 <eval <tag.days>> //<eval <timer>/(60*60)>
dtext 305 105 0 <eval <tag.day_pay>> //<eval <timer>/(60*60*24)>
dtext 305 135 0 active
dtextentry 50 95 105 20 55 1001 <TAG.HOUSETYPE>
dtextentry 155 95 10 20 55 1002 ...
[DIALOG house_menu_payment BUTTON]
ON=0
ON=1
DIALOG house_menu_general
ON=2
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=3
src.newitem=i_gold_coster
src.ACT.LINK=<uid>
src.act.equip
[DIALOG house_menu_general_friend]
150,150
resizepic 0 0 2600 410 200
resizepic 33 22 5054 345 25
gumppic 33 55 100
button 305 160 0f7 0f8 1 0 0
gumppic 40 20 0869
button 160 20 0867 0868 1 0 1
button 270 20 0867 0868 1 0 2
dtext 70 25 0 General
dtext 190 25 0 Friends
dtext 300 25 0 Payment
dtext 190 65 1152 Owned by:
dtext 190 85 1152 Locked items:
dtext 190 105 1152 House type:
dtext 295 65 0 <tag.ownername>
dtext 295 85 0 0/100
dtext 295 105 0 Regular
dtextentry 50 95 105 20 55 1001 <TAG.HOUSETYPE>
dtextentry 155 95 10 20 55 1002 ...
[DIALOG house_menu_general_friend BUTTON]
ON=0
ON=1
DIALOG house_menu_friends_friend
ON=2
f_house_days
DIALOG house_menu_payment_friend
[DIALOG house_menu_friends_friend]
150,150
resizepic 0 0 2600 410 200
resizepic 33 22 5054 345 25
gumppic 33 55 100
button 305 160 0f7 0f8 1 0 0
gumppic 160 20 0869
button 40 20 0867 0868 1 0 1
button 270 20 0867 0868 1 0 2
dtext 70 25 0 General
dtext 190 25 0 Friends
dtext 300 25 0 Payment
dtextentry 50 95 105 20 55 1001 <TAG.HOUSETYPE>
dtextentry 155 95 10 20 55 1002 ...
dtext 190 55 0 <tag.friendname1>
dtext 190 75 0 <tag.friendname2>
dtext 190 95 0 <tag.friendname3>
dtext 190 115 0 <tag.friendname4>
dtext 190 135 0 <tag.friendname5>
[DIALOG house_menu_friends_friend BUTTON]
ON=0
ON=1
DIALOG house_menu_general_friend
ON=2
f_house_days
DIALOG house_menu_payment_friend
[DIALOG house_menu_payment_friend]
150,150
resizepic 0 0 2600 410 200
resizepic 33 22 5054 345 25
resizepic 300 65 3000 90 20
gumppic 33 55 100
button 305 160 0f7 0f8 1 0 0
gumppic 270 20 0869
button 40 20 0867 0868 1 0 1
button 160 20 0867 0868 1 0 2
button 190 135 0a9a 0a9b 1 0 3
dtext 70 25 0 General
dtext 190 25 0 Friends
dtext 300 25 0 Payment
dtext 190 65 1152 House balance:
dtext 190 85 1152 Cost per day:
dtext 190 105 1152 Days paid:
dtext 220 135 1152 Add gold
dtext 305 65 0 <eval <timer>/60>
dtext 305 85 0 <eval <timer>/(60*60)>
dtext 305 105 0 <eval <timer>/(60*60*24)>
dtextentry 50 95 105 20 55 1001 <TAG.HOUSETYPE>
dtextentry 155 95 10 20 55 1002 ...
[DIALOG house_menu_payment_friend BUTTON]
ON=0
ON=1
DIALOG house_menu_general_friend
ON=2
DIALOG house_menu_friends_friend
ON=3
src.newitem=i_gold_coster
src.ACT.LINK=<uid>
src.act.equip
[itemdef i_gold_coster]
id=i_gold
type=t_eq_script
name=Golden Coster
on=@equip
TARGET Select a money to pay on this house...
timer=30
return 1
on=@targon_item
if (<src.targ.type>=t_gold)
link.tag.balance=(<link.tag.balance>+<src.targ.amount>)
src.targ.remove
remove
src.sysmessage You pay <eval <src.targ.amount>> gold coins.
return 1
else
remove
RETURN 1
on=@timer
remove
return 1
[ITEMDEF 0bd1]
DEFNAME=i_sign_brass
TYPE=t_eq_script
CATEGORY=Decoration - Signs
SUBSECTION=Blank
DESCRIPTION=Brass Blank
DUPELIST=0bd2
ON=@CREATE
ATTR=010
ON=@DCLICK
IF !(<LINK>==04FFFFFFF)
IF (<MORE2>==0)
f_house_pay
tag.day_pay=<var.pay>
f_house_balance
tag.balance=<var.balance>
tag.days=30
TAG.MYHOUSE=<LINK>
TAG.MYSIGN=<UID>
TAG.NAME=<NAME>
TAG.HOUSETYPE=<LINK.NAME>
MORE2=<SRC.UID>
TIMER=24*60*60
tag.destroy=0
tag.friendremove1=1
tag.friendremove2=0
tag.friendremove3=0
tag.friendremove4=0
tag.friendremove5=0
tag.owner=<src.uid>
tag.ownername=<src.name>
tag.friend1=0
tag.friend2=0
tag.friend3=0
tag.friend4=0
tag.friend5=0
tag.friendname1=Empty
tag.friendname2=Empty
tag.friendname3=Empty
tag.friendname4=Empty
tag.friendname5=Empty
region.tag.house=<LINK>
REGION.EVENTS=+r_house_control
region.tag.sosh=1
region.tag.owner=<src.uid>
region.tag.FRIEND1=0
region.tag.FRIEND2=0
region.tag.FRIEND3=0
region.tag.FRIEND4=0
region.tag.FRIEND5=0
region.tag.key=<LINK>
LINK.TAG.OWNER=<SRC.UID>
DIALOG HOUSE_MENU_general
RETURN 1
ELSE
if (<tag.owner>=<src.uid>)
DIALOG HOUSE_MENU_general
RETURN 1
ELSE
if (<tag.friend1>=<src.uid>) || (<tag.friend2>=<src.uid>) || (<tag.friend3>=<src.uid>) || (<tag.friend4>=<src.uid>) || (<tag.friend5>=<src.uid>)
DIALOG HOUSE_MENU_general_friend
RETURN 1
ELSE
src.sysmessage This is not your house!
RETURN 1
on=@timer
if (<tag.balance>><tag.day_pay>)
timer=24*60*60
color=0
tag.balance=<tag.balance>-<tag.day_pay>
return 1
else
if (<tag.balance><<tag.day_pay>) && (<tag.destroy>=0)
timer=12*60*60
color=021
tag.balance=0
tag.destroy=1
return 1
else
link.remove
return 1
[function f_house_balance]
var.balance=<var.pay>*30
[function f_house_days]
tag.days=<tag.balance>/<tag.day_pay>
[function f_house_pay]
if (<link.baseid>=i_multi_house_stone_plaster_small) || (<link.baseid>=i_multi_house_stone_small) || (<link.baseid>=i_multi_house_stone_brick_small) || (<link.baseid>=i_multi_house_stone_wood_small) || (<link.baseid>=i_multi_house_wood_plaster_small) || (<link.baseid>=i_multi_house_wood_thatched_small) || (<link.baseid>=i_multi_shop_stone_small) || (<link.baseid>=i_multi_shop_marble_small)
var.pay=3759
else
if (<link.baseid>=i_multi_house_3room) || (<link.baseid>=i_multi_house_wood_plaster_2story) || (<link.baseid>=i_multi_house_stone_plaster_2story) || (<link.baseid>=i_multi_shop_blacksmithy_large_2) || (<link.baseid>=i_multi_shop_blacksmithy_large) || (<link.baseid>=i_multi_house_patio_marble) || (<link.baseid>=i_multi_villa_2story) || (<link.baseid>=i_multi_house_patio_sand) || (<link.baseid>=i_multi_cabin_log_2story)
var.pay=7983
else
var.pay=17273
[EOF]
А это в sphereregion.scp
Код
[REGIONTYPE r_house_control]
ON=@step
src.f_house_detect_friends
return 1
[function f_house_detect_friends]
if (<src.npc>!=0)
f_house_attacked
else
if (<region.tag.sosh>=0)
else
if (<region.tag.sosh>=1) && (<src.uid>=<region.tag.owner>)
else
if (<region.tag.sosh>=2) && (<src.findtype.t_key.link>=<region.tag.key>)
else
if (<region.tag.sosh>=3) && ((<src.uid>=<region.tag.owner>) || ((<src.uid>=<region.tag.FRIEND1>) || (<src.memoryfindtype.memory_guild.link>=<region.tag.FRIEND1>)) || ((<src.uid>=<region.tag.FRIEND2>) || (<src.memoryfindtype.memory_guild.link>=<region.tag.FRIEND2>)) || ((<src.uid>=<region.tag.FRIEND3>) || (<src.memoryfindtype.memory_guild.link>=<region.tag.FRIEND3>)) || ((<src.uid>=<region.tag.FRIEND4>) || (<src.memoryfindtype.memory_guild.link>=<region.tag.FRIEND4>)) || ((<src.uid>=<region.tag.FRIEND5>) || (<src.memoryfindtype.memory_guild.link>=<region.tag.FRIEND5>)))
else
f_house_attacked
[function f_house_attacked]
if (<src.dir>=0)
src.p=<eval <src.p.x>>,<eval <src.p.y>+1>,<eval <src.p.z>> //,<eval <src.map>>
src.update
endif
if (<src.dir>=1)
src.p=<eval <src.p.x>-1>,<eval <src.p.y>+1>,<eval <src.p.z>> //,<eval <src.map>>
src.update
endif
if (<src.dir>=2)
src.p=<eval <src.p.x>-1>,<eval <src.p.y>>,<eval <src.p.z>> //,<eval <src.map>>
src.update
endif
if (<src.dir>=3)
src.p=<eval <src.p.x>-1>,<eval <src.p.y>-1>,<eval <src.p.z>> //,<eval <src.map>>
src.update
endif
if (<src.dir>=4)
src.p=<eval <src.p.x>>,<eval <src.p.y>-1>,<eval <src.p.z>> //,<eval <src.map>>
src.update
endif
if (<src.dir>=5)
src.p=<eval <src.p.x>+1>,<eval <src.p.y>-1>,<eval <src.p.z>> //,<eval <src.map>>
src.update
endif
if (<src.dir>=6)
src.p=<eval <src.p.x>+1>,<eval <src.p.y>>,<eval <src.p.z>> //,<eval <src.map>>
src.update
endif
if (<src.dir>=7)
src.p=<eval <src.p.x>+1>,<eval <src.p.y>+1>,<eval <src.p.z>> //,<eval <src.map>>
src.update
endif
Воть...
Щас немножко подправил, фикс багов, плата за дом, ещё что-то)
Цитата(Frog @ 28.8.2006, 22:35)
Вот написал менюшку как на ДРВ, правда некоторые гампы нетакие же и ещё кое что не так как на ДРВ, но если нужна такая берите и переделайте как вам хочется
Код
//by Palich 28.08.2006 21:30
[DIALOG house_menu_sell]
150,150
resizepic 0 0 2600 410 310
resizepic 33 22 5054 345 25
resizepic 33 165 5054 330 15
gumppic 33 55 100
button 305 270 0f7 0f8 1 0 0
button 45 270 0f2 0f3 1 0 3
button 305 160 0ef 0f0 1 0 4
button 40 20 0867 0868 1 0 3
button 160 20 0867 0868 1 0 1
button 270 20 0867 0868 1 0 2
dtext 70 25 0 General
dtext 190 25 0 Friends
dtext 300 25 0 Payment
dtext 190 55 1152 Warning! Your house will
dtext 190 75 1152 be DESTROYED and house
dtext 190 95 1152 ballance will be returned to
dtext 190 115 1152 your bank account.
dtext 35 185 020 House and all locked items will be destroyed!
dtext 25 225 1152 Are you sure to do this? Click APPLY to proceed.
dtextentry 50 95 105 20 55 1001 <TAG.HOUSETYPE>
dtextentry 155 95 10 20 55 1002 ...
[DIALOG house_menu_sell BUTTON]
ON=0
ON=1
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=2
f_house_days
DIALOG house_menu_payment
ON=3
DIALOG house_menu_general
ON=4
var.gold=<tag.balance>/2
f_house_sell
link.remove
[function f_house_sell]
if (<var.gold>>50000)
src.newitem=i_gold
src.act.amount=50000
src.act.bounce
var.gold=<var.gold>-50000
f_house_sell
else
src.newitem=i_gold
src.act.amount=<var.gold>
src.act.bounce
[DIALOG house_menu_general]
150,150
resizepic 0 0 2600 410 310
resizepic 33 22 5054 345 25
resizepic 33 165 5054 345 15
gumppic 33 55 100
button 305 270 0f7 0f8 1 0 0
gumppic 40 20 0869
button 160 20 0867 0868 1 0 1
button 270 20 0867 0868 1 0 2
button 190 135 0a9a 0a9b 1 0 4
button 190 185 0a9a 0a9b 1 0 5
button 190 215 0a9a 0a9b 1 0 6
button 33 185 0a9a 0a9b 1 0 3
button 33 215 0a9a 0a9b 1 0 7
button 33 245 0a9a 0a9b 1 0 8
dtext 70 25 0 General
dtext 190 25 0 Friends
dtext 300 25 0 Payment
dtext 190 65 1152 Owned by:
dtext 190 85 1152 Locked items:
dtext 190 105 1152 House type:
dtext 215 135 1152 Owner bankbox access
dtext 215 185 1152 Lock/Unlock item
dtext 215 215 020 Sell this house
dtext 55 185 1152 Set enter type
dtext 55 215 1152 Change locks
dtext 55 245 1152 Transfer house
dtext 295 65 0 <tag.ownername>
dtext 295 85 0 0/100
dtext 295 105 0 Regular
dtextentry 50 95 105 20 55 1001 <TAG.HOUSETYPE>
dtextentry 155 95 10 20 55 1002 ...
[DIALOG house_menu_general BUTTON]
ON=0
ON=1
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=2
f_house_days
DIALOG house_menu_payment
ON=3
if (<region.tag.sosh>=0)
var.sosh01=0d2
var.sosh11=0d2
var.sosh21=0d2
var.sosh31=0d3
var.sosh02=0d3
var.sosh12=0d3
var.sosh22=0d3
var.sosh32=0d2
DIALOG house_menu_enter_type
else
if (<region.tag.sosh>=1)
var.sosh01=0d3
var.sosh11=0d2
var.sosh21=0d2
var.sosh31=0d2
var.sosh02=0d2
var.sosh12=0d3
var.sosh22=0d3
var.sosh32=0d3
DIALOG house_menu_enter_type
else
if (<region.tag.sosh>=2)
var.sosh01=0d2
var.sosh11=0d2
var.sosh21=0d3
var.sosh31=0d2
var.sosh02=0d3
var.sosh12=0d3
var.sosh22=0d2
var.sosh32=0d3
DIALOG house_menu_enter_type
else
if (<region.tag.sosh>=3)
var.sosh01=0d2
var.sosh11=0d3
var.sosh21=0d2
var.sosh31=0d2
var.sosh02=0d3
var.sosh12=0d2
var.sosh22=0d3
var.sosh32=0d3
DIALOG house_menu_enter_type
ON=4
SRC.BANKSELF
ON=5
var.type=<src.findtype.t_key.link>
if !<src.findtype.t_key>
src.sysmessage @021 You cant use this!
else
if (<var.type>=<link>)
src.findtype.t_key.dclick
ON=6
DIALOG house_menu_sell
ON=7
if (<src.restest i_gold 2000>)
src.newitem=i_door_lock
src.act.bounce
src.act.tag.home=<region.tag.house>
else
src.sysmessage @021 You eed have 2000 gold coins from your backpack!
ON=8
src.newitem=i_transfer_house
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
[function f_friendremove]
var.friendremove1=0d2
var.friendremove2=0d2
var.friendremove3=0d2
var.friendremove4=0d2
var.friendremove5=0d2
if (0<tag.friendremove1>=1)
var.friendremove1=0d3
var.friendremove2=0d2
var.friendremove3=0d2
var.friendremove4=0d2
var.friendremove5=0d2
endif
if (0<tag.friendremove2>=1)
var.friendremove1=0d2
var.friendremove2=0d3
var.friendremove3=0d2
var.friendremove4=0d2
var.friendremove5=0d2
endif
if (0<tag.friendremove3>=1)
var.friendremove1=0d2
var.friendremove2=0d2
var.friendremove3=0d3
var.friendremove4=0d2
var.friendremove5=0d2
endif
if (0<tag.friendremove4>=1)
var.friendremove1=0d2
var.friendremove2=0d2
var.friendremove3=0d2
var.friendremove4=0d3
var.friendremove5=0d2
endif
if (0<tag.friendremove5>=1)
var.friendremove1=0d2
var.friendremove2=0d2
var.friendremove3=0d2
var.friendremove4=0d2
var.friendremove5=0d3
endif
[function f_friendlist]
var.friend11=0fa5
var.friend21=0fa5
var.friend31=0fa5
var.friend41=0fa5
var.friend51=0fa5
var.friend12=0fa6
var.friend22=0fa6
var.friend32=0fa6
var.friend42=0fa6
var.friend52=0fa6
if (<tag.friend1>!=0)
var.friend11=0fa2
var.friend12=0fa3
endif
if (<tag.friend2>!=0)
var.friend21=0fa2
var.friend22=0fa3
endif
if (<tag.friend3>!=0)
var.friend31=0fa2
var.friend32=0fa3
endif
if (<tag.friend4>!=0)
var.friend41=0fa2
var.friend42=0fa3
endif
if (<tag.friend5>!=0)
var.friend51=0fa2
var.friend52=0fa3
endif
[itemdef i_transfer_house]
id=i_gold
type=t_eq_script
name=Transfer
on=@equip
target Select a new owner...
return 1
ON=@TIMER
REMOVE
RETURN 1
on=@targon_char
if (<src.region.tag.house>=<link.region.tag.house>)
LINK.MORE2=<SRC.TARG.UID>
LINK.TAG.OWNERNAME=<SRC.TARG.NAME>
LINK.MORE1=0
LINK.TAG.FRIEND1=0
LINK.TAG.FRIEND2=0
LINK.TAG.FRIEND3=0
LINK.TAG.FRIEND4=0
LINK.TAG.FRIEND5=0
LINK.TAG.FRIENDNAME1=Empty
LINK.TAG.FRIENDNAME2=Empty
LINK.TAG.FRIENDNAME3=Empty
LINK.TAG.FRIENDNAME4=Empty
LINK.TAG.FRIENDNAME5=Empty
LINK=<MORE1>
LINK.TAG.OWNER=<SRC.TARG.UID>
LINK.TAG.COOWNER=0
LINK.TAG.FRIEND1=0
LINK.TAG.FRIEND2=0
LINK.TAG.FRIEND3=0
LINK.TAG.FRIEND4=0
LINK.TAG.FRIEND5=0
region.TAG.OWNER=<SRC.TARG.UID>
region.TAG.COOWNER=0
region.TAG.FRIEND1=0
region.TAG.FRIEND2=0
region.TAG.FRIEND3=0
region.TAG.FRIEND4=0
region.TAG.FRIEND5=0
region.TAG.FRIENDNAME1=Empty
region.TAG.FRIENDNAME2=Empty
region.TAG.FRIENDNAME3=Empty
region.TAG.FRIENDNAME4=Empty
region.TAG.FRIENDNAME5=Empty
REMOVE
return 1
else
remove
src.sysmessage @021 You dont use this!
return 1
[itemdef i_door_lock]
id=i_bag
type=t_eq_script
name=Door Changer
on=@dclick
target Select a door...
return 1
on=@targon_item
if (<src.targ.region.tag.house>=<tag.home>) && ((<src.targ.type>=t_door_locked) || (<src.targ.type>=t_door))
var.rand1={0 10000}
var.rand2=<eval <var.rand1>>
var.link=10000+<var.rand2>
src.newitem=i_key_copper
src.act.bounce
src.act.attr=04
src.act.link=<var.link>
src.act.more1=<var.link>
src.act.name=Copper Key of the Door
src.targ.link=<var.link>
src.targ.more1=<var.link>
remove
return 1
else
src.sysmessage @021 You dont use this!
return 1
[DIALOG house_menu_enter_type]
150,150
resizepic 0 0 2600 410 310
resizepic 33 22 5054 345 25
resizepic 33 165 5054 330 15
gumppic 33 55 100
button 305 270 0f7 0f8 1 0 0
button 45 270 0f2 0f3 1 0 3
button 305 160 0ef 0f0 1 0 8
button 40 20 0867 0868 1 0 3
button 160 20 0867 0868 1 0 1
button 270 20 0867 0868 1 0 2
button 190 135 <var.sosh31> <var.sosh32> 1 0 7
button 190 115 <var.sosh21> <var.sosh22> 1 0 6
button 190 95 <var.sosh11> <var.sosh12> 1 0 5
button 190 75 <var.sosh01> <var.sosh02> 1 0 4
dtext 70 25 0 General
dtext 190 25 0 Friends
dtext 300 25 0 Payment
dtext 190 55 1152 Declare enter type:
dtext 215 75 0 Only Owner
dtext 215 95 0 Owner and friends
dtext 215 115 0 People with key
dtext 215 135 0 Public house
dtext 35 185 1152 Warning! If ypu declare your house as a publick
dtext 35 205 1152 house, everybody will be allowed to enter in
dtext 35 225 1152 independently of key presence.
dtextentry 50 95 105 20 55 1001 <TAG.HOUSETYPE>
dtextentry 155 95 10 20 55 1002 ...
[DIALOG house_menu_enter_type BUTTON]
ON=0
region.tag.sosh=<region.tag.sosh>
ON=1
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=2
f_house_days
DIALOG house_menu_payment
ON=3
DIALOG house_menu_general
ON=4
tag.sosh=1
var.sosh01=0d3
var.sosh11=0d2
var.sosh21=0d2
var.sosh31=0d2
var.sosh02=0d2
var.sosh12=0d3
var.sosh22=0d3
var.sosh32=0d3
DIALOG house_menu_enter_type
src.sysmessage @021 Only owner of this house may goes here!
ON=5
tag.sosh=3
var.sosh01=0d2
var.sosh11=0d3
var.sosh21=0d2
var.sosh31=0d2
var.sosh02=0d3
var.sosh12=0d3
var.sosh22=0d2
var.sosh32=0d3
DIALOG house_menu_enter_type
src.sysmessage @021 Only owner of this house and friends of this house may goes here!
ON=6
tag.sosh=2
var.sosh01=0d2
var.sosh11=0d2
var.sosh21=0d3
var.sosh31=0d2
var.sosh02=0d3
var.sosh12=0d3
var.sosh22=0d2
var.sosh32=0d3
DIALOG house_menu_enter_type
src.sysmessage @021 Only with key of this house may goes here!
ON=7
tag.sosh=0
var.sosh01=0d2
var.sosh11=0d2
var.sosh21=0d2
var.sosh31=0d3
var.sosh02=0d3
var.sosh12=0d3
var.sosh22=0d3
var.sosh32=0d2
DIALOG house_menu_enter_type
src.sysmessage @021 All players may goes here!
ON=8
region.tag.sosh=<tag.sosh>
DIALOG house_menu_general
src.sysmessage @021 System of safety has been saved!
[DIALOG house_menu_friends]
150,150
resizepic 0 0 2600 410 310
resizepic 33 22 5054 345 25
resizepic 33 165 5054 345 15
gumppic 33 55 100
button 305 270 0f7 0f8 1 0 0
gumppic 160 20 0869
button 40 20 0867 0868 1 0 1
button 270 20 0867 0868 1 0 2
button 190 55 <var.friend11> <var.friend12> 1 0 4
button 190 75 <var.friend21> <var.friend22> 1 0 5
button 190 95 <var.friend31> <var.friend32> 1 0 6
button 190 115 <var.friend41> <var.friend42> 1 0 7
button 190 135 <var.friend51> <var.friend52> 1 0 8
button 220 55 <var.friendremove1> <var.friendremove1> 1 0 13
button 220 75 <var.friendremove2> <var.friendremove2> 1 0 14
button 220 95 <var.friendremove3> <var.friendremove3> 1 0 15
button 220 115 <var.friendremove4> <var.friendremove4> 1 0 16
button 220 135 <var.friendremove5> <var.friendremove5> 1 0 17
button 190 185 0fa8 0fa9 1 0 12
button 33 185 0a9a 0a9b 1 0 9
button 33 215 0a9a 0a9b 1 0 10
button 33 245 0a9a 0a9b 1 0 11
dtext 70 25 0 General
dtext 190 25 0 Friends
dtext 300 25 0 Payment
dtext 55 185 1152 Add a friend
dtext 55 215 1152 Add entrie guild
dtext 55 245 1152 Remove a friend
dtextentry 50 95 105 20 55 1001 <TAG.HOUSETYPE>
dtextentry 155 95 10 20 55 1002 ...
dtext 225 185 1152 Remove all friends
dtext 250 55 0 <tag.friendname1>
dtext 250 75 0 <tag.friendname2>
dtext 250 95 0 <tag.friendname3>
dtext 250 115 0 <tag.friendname4>
dtext 250 135 0 <tag.friendname5>
[DIALOG house_menu_friends BUTTON]
ON=0
ON=1
DIALOG house_menu_general
ON=2
f_house_days
DIALOG house_menu_payment
ON=3
ON=4
if (<tag.friend1>=0)
src.newitem=i_friend_1
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
else
TAG.FRIEND1=0
TAG.FRIENDNAME1=Empty
region.TAG.FRIEND1=0
region.TAG.FRIENDNAME1=Empty
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=5
if (<tag.friend2>=0)
src.newitem=i_friend_2
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
else
TAG.FRIEND2=0
TAG.FRIENDNAME2=Empty
region.TAG.FRIEND2=0
region.TAG.FRIENDNAME2=Empty
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=6
if (<tag.friend3>=0)
src.newitem=i_friend_3
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
else
TAG.FRIEND3=0
TAG.FRIENDNAME3=Empty
region.TAG.FRIEND3=0
region.TAG.FRIENDNAME3=Empty
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=7
if (<tag.friend4>=0)
src.newitem=i_friend_4
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
else
TAG.FRIEND4=0
TAG.FRIENDNAME4=Empty
region.TAG.FRIEND4=0
region.TAG.FRIENDNAME4=Empty
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=8
if (<tag.friend5>=0)
src.newitem=i_friend_5
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
else
TAG.FRIEND5=0
TAG.FRIENDNAME5=Empty
region.TAG.FRIEND5=0
region.TAG.FRIENDNAME5=Empty
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=9
if (<tag.friend1>=0)
src.newitem=i_friend_1
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
else
if (<tag.friend2>=0)
src.newitem=i_friend_2
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
else
if (<tag.friend3>=0)
src.newitem=i_friend_3
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
else
if (<tag.friend4>=0)
src.newitem=i_friend_4
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
else
if (<tag.friend5>=0)
src.newitem=i_friend_5
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
else
src.sysmessage @021 You dont use this!
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=10
if (<tag.friend1>=0)
src.newitem=i_friend_guild_1
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
else
if (<tag.friend2>=0)
src.newitem=i_friend_guild_2
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
else
if (<tag.friend3>=0)
src.newitem=i_friend_guild_3
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
else
if (<tag.friend4>=0)
src.newitem=i_friend_guild_4
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
else
if (<tag.friend5>=0)
src.newitem=i_friend_guild_5
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
else
src.sysmessage @021 You dont use this!
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=11
if (<tag.friendremove1>=1)
src.sysmessage @021 You are remove <TAG.FRIENDNAME1> from house friend list!
TAG.FRIEND1=0
TAG.FRIENDNAME1=Empty
region.TAG.FRIENDNAME1=Empty
region.TAG.FRIEND1=0
tag.friendremove0=1
tag.friendremove1=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
else
if (<tag.friendremove2>=1)
src.sysmessage @021 You are remove <TAG.FRIENDNAME1> from house friend list!
TAG.FRIEND1=0
TAG.FRIENDNAME1=Empty
region.TAG.FRIENDNAME1=Empty
region.TAG.FRIEND1=0
tag.friendremove0=1
tag.friendremove1=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
else
if (<tag.friendremove3>=1)
src.sysmessage @021 You are remove <TAG.FRIENDNAME1> from house friend list!
TAG.FRIEND1=0
TAG.FRIENDNAME1=Empty
region.TAG.FRIENDNAME1=Empty
region.TAG.FRIEND1=0
tag.friendremove0=1
tag.friendremove1=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
else
if (<tag.friendremove4>=1)
src.sysmessage @021 You are remove <TAG.FRIENDNAME1> from house friend list!
TAG.FRIEND1=0
TAG.FRIENDNAME1=Empty
region.TAG.FRIENDNAME1=Empty
region.TAG.FRIEND1=0
tag.friendremove0=1
tag.friendremove1=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
else
if (<tag.friendremove5>=1)
src.sysmessage @021 You are remove <TAG.FRIENDNAME1> from house friend list!
TAG.FRIEND1=0
TAG.FRIENDNAME1=Empty
region.TAG.FRIENDNAME1=Empty
region.TAG.FRIEND1=0
tag.friendremove0=1
tag.friendremove1=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
else
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=12
TAG.FRIEND1=0
TAG.FRIEND2=0
TAG.FRIEND3=0
TAG.FRIEND4=0
TAG.FRIEND5=0
TAG.FRIENDNAME1=Empty
TAG.FRIENDNAME2=Empty
TAG.FRIENDNAME3=Empty
TAG.FRIENDNAME4=Empty
TAG.FRIENDNAME5=Empty
region.TAG.FRIENDNAME1=Empty
region.TAG.FRIENDNAME2=Empty
region.TAG.FRIENDNAME3=Empty
region.TAG.FRIENDNAME4=Empty
region.TAG.FRIENDNAME5=Empty
region.TAG.FRIEND1=0
region.TAG.FRIEND2=0
region.TAG.FRIEND3=0
region.TAG.FRIEND4=0
region.TAG.FRIEND5=0
src.sysmessage @021 All friends has been removed!
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=13
tag.friendremove1=1
tag.friendremove2=0
tag.friendremove3=0
tag.friendremove4=0
tag.friendremove5=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=14
tag.friendremove1=0
tag.friendremove2=1
tag.friendremove3=0
tag.friendremove4=0
tag.friendremove5=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=15
tag.friendremove1=0
tag.friendremove2=0
tag.friendremove3=1
tag.friendremove4=0
tag.friendremove5=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=16
tag.friendremove1=0
tag.friendremove2=0
tag.friendremove3=0
tag.friendremove4=1
tag.friendremove5=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=17
tag.friendremove1=0
tag.friendremove2=0
tag.friendremove3=0
tag.friendremove4=0
tag.friendremove5=1
f_friendlist
f_friendremove
DIALOG house_menu_friends
[ITEMDEF i_friend_1]
ID=i_gold
NAME=Friend 1
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND1>!=0)
SRC.MESSAGE @021 You already chose friend 1, try removing him before having a new one.
REMOVE
ELSE
TARGET @043 Select a friend 1...
ENDIF
RETURN 1
ON=@TARGON_CHAR
if (<src.region.tag.house>!=<link.region.tag.house>)
src.sysmessage @021 You dont use this!
remove
return 1
else
if (<src.targ.memoryfindtype.memory_guild>!=0)
LINK.TAG.FRIEND1=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME1=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND1=<SRC.TARG.UID>
region.TAG.FRIENDNAME1=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
else
LINK.TAG.FRIEND1=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME1=<SRC.TARG.NAME>
region.TAG.FRIEND1=<SRC.TARG.UID>
region.TAG.FRIENDNAME1=<SRC.TARG.NAME>
LINK=<MORE1>
REMOVE
return 1
[ITEMDEF i_friend_2]
ID=i_gold
NAME=Friend 2
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND2>!=0)
SRC.MESSAGE @021 You already chose friend 2, try removing him before having a new one.
REMOVE
ELSE
TARGET @043 Select a friend 2...
ENDIF
RETURN 1
ON=@TARGON_CHAR
if (<src.region.tag.house>!=<link.region.tag.house>)
src.sysmessage @021 You dont use this!
remove
return 1
else
if (<src.targ.memoryfindtype.memory_guild>!=0)
LINK.TAG.FRIEND2=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME2=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND2=<SRC.TARG.UID>
region.TAG.FRIENDNAME2=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
else
LINK.TAG.FRIEND2=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME2=<SRC.TARG.NAME>
region.TAG.FRIEND2=<SRC.TARG.UID>
region.TAG.FRIENDNAME2=<SRC.TARG.NAME>
LINK=<MORE1>
REMOVE
return 1
[ITEMDEF i_friend_3]
ID=i_gold
NAME=Friend 3
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND3>!=0)
SRC.MESSAGE @021 You already chose friend 3, try removing him before having a new one.
REMOVE
ELSE
TARGET @043 Select a friend 3...
ENDIF
RETURN 1
ON=@TARGON_CHAR
if (<src.region.tag.house>!=<link.region.tag.house>)
src.sysmessage @021 You dont use this!
remove
return 1
else
if (<src.targ.memoryfindtype.memory_guild>!=0)
LINK.TAG.FRIEND3=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME3=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND3=<SRC.TARG.UID>
region.TAG.FRIENDNAME3=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
else
LINK.TAG.FRIEND3=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME3=<SRC.TARG.NAME>
region.TAG.FRIEND3=<SRC.TARG.UID>
region.TAG.FRIENDNAME3=<SRC.TARG.NAME>
LINK=<MORE1>
REMOVE
return 1
[ITEMDEF i_friend_4]
ID=i_gold
NAME=Friend 4
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND4>!=0)
SRC.MESSAGE @021 You already chose friend 4, try removing him before having a new one.
REMOVE
ELSE
TARGET @043 Select a friend 4...
ENDIF
RETURN 1
ON=@TARGON_CHAR
if (<src.region.tag.house>!=<link.region.tag.house>)
src.sysmessage @021 You dont use this!
remove
return 1
else
if (<src.targ.memoryfindtype.memory_guild>!=0)
LINK.TAG.FRIEND4=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME4=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND4=<SRC.TARG.UID>
region.TAG.FRIENDNAME4=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
else
LINK.TAG.FRIEND4=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME4=<SRC.TARG.NAME>
region.TAG.FRIEND4=<SRC.TARG.UID>
region.TAG.FRIENDNAME4=<SRC.TARG.NAME>
LINK=<MORE1>
REMOVE
return 1
[ITEMDEF i_friend_5]
ID=i_gold
NAME=Friend 5
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND5>!=0)
SRC.MESSAGE @021 You already chose friend 5, try removing him before having a new one.
REMOVE
ELSE
TARGET @043 Select a friend 5...
ENDIF
RETURN 1
ON=@TARGON_CHAR
if (<src.region.tag.house>!=<link.region.tag.house>)
src.sysmessage @021 You dont use this!
remove
return 1
else
if (<src.targ.memoryfindtype.memory_guild>!=0)
LINK.TAG.FRIEND5=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME5=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND5=<SRC.TARG.UID>
region.TAG.FRIENDNAME5=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
else
LINK.TAG.FRIEND5=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME5=<SRC.TARG.NAME>
region.TAG.FRIEND5=<SRC.TARG.UID>
region.TAG.FRIENDNAME5=<SRC.TARG.NAME>
LINK=<MORE1>
REMOVE
return 1
[ITEMDEF i_friend_guild_1]
ID=i_gold
NAME=Friend 1
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND1>!=0)
SRC.MESSAGE @021 You already chose friend 1, try removing him before having a new one.
REMOVE
ELSE
TARGET @043 Select a friend 1...
ENDIF
RETURN 1
ON=@TARGON_CHAR
if (<src.targ.memoryfindtype.memory_guild>=0)
src.sysmessage @021 Your target no in guild!
remove
return 1
else
if (<src.region.tag.house>=<link.region.tag.house>)
LINK.TAG.FRIEND1=<src.targ.memoryfindtype.memory_guild.link>
LINK.TAG.FRIENDNAME1=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND1=<src.targ.memoryfindtype.memory_guild.link>
region.TAG.FRIENDNAME1=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
else
remove
src.sysmessage @021 You dont use this!
return 1
[ITEMDEF i_friend_guild_2]
ID=i_gold
NAME=Friend 2
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND2>!=0)
SRC.MESSAGE @021 You already chose friend 2, try removing him before having a new one.
REMOVE
ELSE
TARGET @043 Select a friend 2...
ENDIF
RETURN 1
ON=@TARGON_CHAR
if (<src.targ.memoryfindtype.memory_guild>=0)
src.sysmessage @021 Your target no in guild!
remove
return 1
else
if (<src.region.tag.house>=<link.region.tag.house>)
LINK.TAG.FRIEND2=<src.targ.memoryfindtype.memory_guild.link>
LINK.TAG.FRIENDNAME2=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND2=<src.targ.memoryfindtype.memory_guild.link>
region.TAG.FRIENDNAME2=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
else
remove
src.sysmessage @021 You dont use this!
return 1
[ITEMDEF i_friend_guild_3]
ID=i_gold
NAME=Friend 3
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND3>!=0)
SRC.MESSAGE @021 You already chose friend 3, try removing him before having a new one.
REMOVE
ELSE
TARGET @043 Select a friend 3...
ENDIF
RETURN 1
ON=@TARGON_CHAR
if (<src.targ.memoryfindtype.memory_guild>=0)
src.sysmessage @021 Your target no in guild!
remove
return 1
else
if (<src.region.tag.house>=<link.region.tag.house>)
LINK.TAG.FRIEND3=<src.targ.memoryfindtype.memory_guild.link>
LINK.TAG.FRIENDNAME3=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND3=<src.targ.memoryfindtype.memory_guild.link>
region.TAG.FRIENDNAME3=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
else
remove
src.sysmessage @021 You dont use this!
return 1
[ITEMDEF i_friend_guild_4]
ID=i_gold
NAME=Friend 4
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND4>!=0)
SRC.MESSAGE @021 You already chose friend 4, try removing him before having a new one.
REMOVE
ELSE
TARGET @043 Select a friend 4...
ENDIF
RETURN 1
ON=@TARGON_CHAR
if (<src.targ.memoryfindtype.memory_guild>=0)
src.sysmessage @021 Your target no in guild!
remove
return 1
else
if (<src.region.tag.house>=<link.region.tag.house>)
LINK.TAG.FRIEND4=<src.targ.memoryfindtype.memory_guild.link>
LINK.TAG.FRIENDNAME4=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND4=<src.targ.memoryfindtype.memory_guild.link>
region.TAG.FRIENDNAME4=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
else
remove
src.sysmessage @021 You dont use this!
return 1
[ITEMDEF i_friend_guild_5]
ID=i_gold
NAME=Friend 5
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND5>!=0)
SRC.MESSAGE @021 You already chose friend 5, try removing him before having a new one.
REMOVE
ELSE
TARGET @043 Select a friend 5...
ENDIF
RETURN 1
ON=@TARGON_CHAR
if (<src.targ.memoryfindtype.memory_guild>=0)
src.sysmessage @021 Your target no in guild!
remove
return 1
else
if (<src.region.tag.house>=<link.region.tag.house>)
LINK.TAG.FRIEND5=<src.targ.memoryfindtype.memory_guild.link>
LINK.TAG.FRIENDNAME5=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND5=<src.targ.memoryfindtype.memory_guild.link>
region.TAG.FRIENDNAME5=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
else
remove
src.sysmessage @021 You dont use this!
return 1
[DIALOG house_menu_payment]
150,150
resizepic 0 0 2600 410 310
resizepic 33 22 5054 345 25
resizepic 33 165 5054 345 15
resizepic 300 65 3000 90 20
gumppic 33 55 100
button 305 270 0f7 0f8 1 0 0
gumppic 270 20 0869
button 40 20 0867 0868 1 0 1
button 160 20 0867 0868 1 0 2
button 33 185 0a9a 0a9b 1 0 3
dtext 70 25 0 General
dtext 190 25 0 Friends
dtext 300 25 0 Payment
dtext 190 65 1152 House balance:
dtext 190 85 1152 Cost per day:
dtext 190 105 1152 Days paid:
dtext 190 135 1152 Status:
dtext 55 185 1152 Add gold
dtext 305 65 0 <eval <tag.balance>> //<eval <timer>/60>
dtext 305 85 0 <eval <tag.days>> //<eval <timer>/(60*60)>
dtext 305 105 0 <eval <tag.day_pay>> //<eval <timer>/(60*60*24)>
dtext 305 135 0 active
dtextentry 50 95 105 20 55 1001 <TAG.HOUSETYPE>
dtextentry 155 95 10 20 55 1002 ...
[DIALOG house_menu_payment BUTTON]
ON=0
ON=1
DIALOG house_menu_general
ON=2
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=3
src.newitem=i_gold_coster
src.ACT.LINK=<uid>
src.act.equip
[DIALOG house_menu_general_friend]
150,150
resizepic 0 0 2600 410 200
resizepic 33 22 5054 345 25
gumppic 33 55 100
button 305 160 0f7 0f8 1 0 0
gumppic 40 20 0869
button 160 20 0867 0868 1 0 1
button 270 20 0867 0868 1 0 2
dtext 70 25 0 General
dtext 190 25 0 Friends
dtext 300 25 0 Payment
dtext 190 65 1152 Owned by:
dtext 190 85 1152 Locked items:
dtext 190 105 1152 House type:
dtext 295 65 0 <tag.ownername>
dtext 295 85 0 0/100
dtext 295 105 0 Regular
dtextentry 50 95 105 20 55 1001 <TAG.HOUSETYPE>
dtextentry 155 95 10 20 55 1002 ...
[DIALOG house_menu_general_friend BUTTON]
ON=0
ON=1
DIALOG house_menu_friends_friend
ON=2
f_house_days
DIALOG house_menu_payment_friend
[DIALOG house_menu_friends_friend]
150,150
resizepic 0 0 2600 410 200
resizepic 33 22 5054 345 25
gumppic 33 55 100
button 305 160 0f7 0f8 1 0 0
gumppic 160 20 0869
button 40 20 0867 0868 1 0 1
button 270 20 0867 0868 1 0 2
dtext 70 25 0 General
dtext 190 25 0 Friends
dtext 300 25 0 Payment
dtextentry 50 95 105 20 55 1001 <TAG.HOUSETYPE>
dtextentry 155 95 10 20 55 1002 ...
dtext 190 55 0 <tag.friendname1>
dtext 190 75 0 <tag.friendname2>
dtext 190 95 0 <tag.friendname3>
dtext 190 115 0 <tag.friendname4>
dtext 190 135 0 <tag.friendname5>
[DIALOG house_menu_friends_friend BUTTON]
ON=0
ON=1
DIALOG house_menu_general_friend
ON=2
f_house_days
DIALOG house_menu_payment_friend
[DIALOG house_menu_payment_friend]
150,150
resizepic 0 0 2600 410 200
resizepic 33 22 5054 345 25
resizepic 300 65 3000 90 20
gumppic 33 55 100
button 305 160 0f7 0f8 1 0 0
gumppic 270 20 0869
button 40 20 0867 0868 1 0 1
button 160 20 0867 0868 1 0 2
button 190 135 0a9a 0a9b 1 0 3
dtext 70 25 0 General
dtext 190 25 0 Friends
dtext 300 25 0 Payment
dtext 190 65 1152 House balance:
dtext 190 85 1152 Cost per day:
dtext 190 105 1152 Days paid:
dtext 220 135 1152 Add gold
dtext 305 65 0 <eval <timer>/60>
dtext 305 85 0 <eval <timer>/(60*60)>
dtext 305 105 0 <eval <timer>/(60*60*24)>
dtextentry 50 95 105 20 55 1001 <TAG.HOUSETYPE>
dtextentry 155 95 10 20 55 1002 ...
[DIALOG house_menu_payment_friend BUTTON]
ON=0
ON=1
DIALOG house_menu_general_friend
ON=2
DIALOG house_menu_friends_friend
ON=3
src.newitem=i_gold_coster
src.ACT.LINK=<uid>
src.act.equip
[itemdef i_gold_coster]
id=i_gold
type=t_eq_script
name=Golden Coster
on=@equip
TARGET Select a money to pay on this house...
timer=30
return 1
on=@targon_item
if (<src.targ.type>=t_gold)
link.tag.balance=(<link.tag.balance>+<src.targ.amount>)
src.targ.remove
remove
src.sysmessage You pay <eval <src.targ.amount>> gold coins.
return 1
else
remove
RETURN 1
on=@timer
remove
return 1
[ITEMDEF 0bd1]
DEFNAME=i_sign_brass
TYPE=t_eq_script
CATEGORY=Decoration - Signs
SUBSECTION=Blank
DESCRIPTION=Brass Blank
DUPELIST=0bd2
ON=@CREATE
ATTR=010
ON=@DCLICK
IF !(<LINK>==04FFFFFFF)
IF (<MORE2>==0)
f_house_pay
tag.day_pay=<var.pay>
f_house_balance
tag.balance=<var.balance>
tag.days=30
TAG.MYHOUSE=<LINK>
TAG.MYSIGN=<UID>
TAG.NAME=<NAME>
TAG.HOUSETYPE=<LINK.NAME>
MORE2=<SRC.UID>
TIMER=24*60*60
tag.destroy=0
tag.friendremove1=1
tag.friendremove2=0
tag.friendremove3=0
tag.friendremove4=0
tag.friendremove5=0
tag.owner=<src.uid>
tag.ownername=<src.name>
tag.friend1=0
tag.friend2=0
tag.friend3=0
tag.friend4=0
tag.friend5=0
tag.friendname1=Empty
tag.friendname2=Empty
tag.friendname3=Empty
tag.friendname4=Empty
tag.friendname5=Empty
region.tag.house=<LINK>
REGION.EVENTS=+r_house_control
region.tag.sosh=1
region.tag.owner=<src.uid>
region.tag.FRIEND1=0
region.tag.FRIEND2=0
region.tag.FRIEND3=0
region.tag.FRIEND4=0
region.tag.FRIEND5=0
region.tag.key=<LINK>
LINK.TAG.OWNER=<SRC.UID>
DIALOG HOUSE_MENU_general
RETURN 1
ELSE
if (<tag.owner>=<src.uid>)
DIALOG HOUSE_MENU_general
RETURN 1
ELSE
if (<tag.friend1>=<src.uid>) || (<tag.friend2>=<src.uid>) || (<tag.friend3>=<src.uid>) || (<tag.friend4>=<src.uid>) || (<tag.friend5>=<src.uid>)
DIALOG HOUSE_MENU_general_friend
RETURN 1
ELSE
src.sysmessage This is not your house!
RETURN 1
on=@timer
if (<tag.balance>><tag.day_pay>)
timer=24*60*60
color=0
tag.balance=<tag.balance>-<tag.day_pay>
return 1
else
if (<tag.balance><<tag.day_pay>) && (<tag.destroy>=0)
timer=12*60*60
color=021
tag.balance=0
tag.destroy=1
return 1
else
link.remove
return 1
[function f_house_balance]
var.balance=<var.pay>*30
[function f_house_days]
tag.days=<tag.balance>/<tag.day_pay>
[function f_house_pay]
if (<link.baseid>=i_multi_house_stone_plaster_small) || (<link.baseid>=i_multi_house_stone_small) || (<link.baseid>=i_multi_house_stone_brick_small) || (<link.baseid>=i_multi_house_stone_wood_small) || (<link.baseid>=i_multi_house_wood_plaster_small) || (<link.baseid>=i_multi_house_wood_thatched_small) || (<link.baseid>=i_multi_shop_stone_small) || (<link.baseid>=i_multi_shop_marble_small)
var.pay=3759
else
if (<link.baseid>=i_multi_house_3room) || (<link.baseid>=i_multi_house_wood_plaster_2story) || (<link.baseid>=i_multi_house_stone_plaster_2story) || (<link.baseid>=i_multi_shop_blacksmithy_large_2) || (<link.baseid>=i_multi_shop_blacksmithy_large) || (<link.baseid>=i_multi_house_patio_marble) || (<link.baseid>=i_multi_villa_2story) || (<link.baseid>=i_multi_house_patio_sand) || (<link.baseid>=i_multi_cabin_log_2story)
var.pay=7983
else
var.pay=17273
[EOF]
А это в sphereregion.scp
Код
[REGIONTYPE r_house_control]
ON=@step
src.f_house_detect_friends
return 1
[function f_house_detect_friends]
if (<src.npc>!=0)
f_house_attacked
else
if (<region.tag.sosh>=0)
else
if (<region.tag.sosh>=1) && (<src.uid>=<region.tag.owner>)
else
if (<region.tag.sosh>=2) && (<src.findtype.t_key.link>=<region.tag.key>)
else
if (<region.tag.sosh>=3) && ((<src.uid>=<region.tag.owner>) || ((<src.uid>=<region.tag.FRIEND1>) || (<src.memoryfindtype.memory_guild.link>=<region.tag.FRIEND1>)) || ((<src.uid>=<region.tag.FRIEND2>) || (<src.memoryfindtype.memory_guild.link>=<region.tag.FRIEND2>)) || ((<src.uid>=<region.tag.FRIEND3>) || (<src.memoryfindtype.memory_guild.link>=<region.tag.FRIEND3>)) || ((<src.uid>=<region.tag.FRIEND4>) || (<src.memoryfindtype.memory_guild.link>=<region.tag.FRIEND4>)) || ((<src.uid>=<region.tag.FRIEND5>) || (<src.memoryfindtype.memory_guild.link>=<region.tag.FRIEND5>)))
else
f_house_attacked
[function f_house_attacked]
if (<src.dir>=0)
src.p=<eval <src.p.x>>,<eval <src.p.y>+1>,<eval <src.p.z>> //,<eval <src.map>>
src.update
endif
if (<src.dir>=1)
src.p=<eval <src.p.x>-1>,<eval <src.p.y>+1>,<eval <src.p.z>> //,<eval <src.map>>
src.update
endif
if (<src.dir>=2)
src.p=<eval <src.p.x>-1>,<eval <src.p.y>>,<eval <src.p.z>> //,<eval <src.map>>
src.update
endif
if (<src.dir>=3)
src.p=<eval <src.p.x>-1>,<eval <src.p.y>-1>,<eval <src.p.z>> //,<eval <src.map>>
src.update
endif
if (<src.dir>=4)
src.p=<eval <src.p.x>>,<eval <src.p.y>-1>,<eval <src.p.z>> //,<eval <src.map>>
src.update
endif
if (<src.dir>=5)
src.p=<eval <src.p.x>+1>,<eval <src.p.y>-1>,<eval <src.p.z>> //,<eval <src.map>>
src.update
endif
if (<src.dir>=6)
src.p=<eval <src.p.x>+1>,<eval <src.p.y>>,<eval <src.p.z>> //,<eval <src.map>>
src.update
endif
if (<src.dir>=7)
src.p=<eval <src.p.x>+1>,<eval <src.p.y>+1>,<eval <src.p.z>> //,<eval <src.map>>
src.update
endif
Воть...
Щас немножко подправил, фикс багов, плата за дом, ещё что-то)
И так теперь смотри на 56b получаеться такой баг, ставишь дом, залезаешь в меню, а через час хозяин не может зайти в меню дома
Так я это писал для 55 R4.0.2 А не для 56b...
Код
[defname daypay]
house1 3759 //Цена маленького дома
house2 7983 //Цена большого дома
house3 17273 //Цена Keep, Castle, Tower...
[DIALOG house_menu_guest]
150,150
gumppic 0 0 100
dcroppedtext 20 25 105 20 55 Owner: <tag.ownername>
dcroppedtext 20 55 105 20 55 <TAG.HOUSETYPE>
[DIALOG house_menu_guest BUTTON]
[DIALOG house_menu_sell]
150,150
resizepic 0 0 2600 410 310
resizepic 35 20 5100 330 30
resizepic 33 165 5100 330 10
gumppic 33 55 100
button 305 270 0f7 0f8 1 0 0
button 45 270 0f2 0f3 1 0 3
button 305 160 0ef 0f0 1 0 4
button 40 20 0867 0868 1 0 3
button 160 20 0867 0868 1 0 1
button 270 20 0867 0868 1 0 2
dtext 70 25 0 General
dtext 190 25 0 Friends
dtext 300 25 0 Payment
dtext 190 55 1000 Warning! Your house will
dtext 190 75 1000 be DESTROYED and house
dtext 190 95 1000 ballance will be returned to
dtext 190 115 1000 your bank account.
dtext 35 185 020 House and all locked items will be destroyed!
dtext 25 225 1000 Are you sure to do this? Click APPLY to proceed.
dcroppedtext 50 95 105 20 55 <TAG.HOUSETYPE>
[DIALOG house_menu_sell BUTTON]
ON=0
ON=1
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=2
f_house_days
DIALOG house_menu_payment
ON=3
DIALOG house_menu_general
ON=4
var.gold=<tag.balance>/2
f_house_sell
link.remove
[function f_house_sell]
if (<var.gold>>50000)
src.newitem=i_gold
src.act.amount=50000
src.act.bounce
var.gold=<var.gold>-50000
f_house_sell
return 1
endif
if (<var.gold>>0)
src.newitem=i_gold
src.act.amount=<var.gold>
src.act.bounce
endif
[DIALOG house_menu_general]
150,150
resizepic 0 0 2600 410 310
resizepic 35 20 5100 330 30
resizepic 33 165 5100 330 10
gumppic 33 55 100
button 305 270 0f7 0f8 1 0 0
gumppic 40 20 0869
button 160 20 0867 0868 1 0 1
button 270 20 0867 0868 1 0 2
button 190 135 0a9a 0a9b 1 0 4
button 190 185 0a9a 0a9b 1 0 5
button 190 215 0a9a 0a9b 1 0 6
button 33 185 0a9a 0a9b 1 0 3
button 33 215 0a9a 0a9b 1 0 7
button 33 245 0a9a 0a9b 1 0 8
dtext 70 25 0 General
dtext 190 25 0 Friends
dtext 300 25 0 Payment
dtext 190 65 1000 Owned by:
dtext 190 85 1000 Locked items:
dtext 190 105 1000 House type:
dtext 215 135 1000 Owner bankbox access
dtext 215 185 1000 Lock/Unlock item
dtext 215 215 020 Sell this house
dtext 55 185 1000 Set enter type
dtext 55 215 1000 Change locks
dtext 55 245 1000 Transfer house
dtext 295 65 0 <tag.ownername>
dtext 295 85 0 0/100
dtext 295 105 0 Regular
dcroppedtext 50 95 105 20 55 <TAG.HOUSETYPE>
[DIALOG house_menu_general BUTTON]
ON=0
ON=1
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=2
f_house_days
DIALOG house_menu_payment
ON=3
if (<region.tag.sosh>=0)
var.sosh01=0d2
var.sosh11=0d2
var.sosh21=0d2
var.sosh31=0d3
var.sosh02=0d3
var.sosh12=0d3
var.sosh22=0d3
var.sosh32=0d2
DIALOG house_menu_enter_type
endif
if (<region.tag.sosh>=1)
var.sosh01=0d3
var.sosh11=0d2
var.sosh21=0d2
var.sosh31=0d2
var.sosh02=0d2
var.sosh12=0d3
var.sosh22=0d3
var.sosh32=0d3
DIALOG house_menu_enter_type
endif
if (<region.tag.sosh>=2)
var.sosh01=0d2
var.sosh11=0d2
var.sosh21=0d3
var.sosh31=0d2
var.sosh02=0d3
var.sosh12=0d3
var.sosh22=0d2
var.sosh32=0d3
DIALOG house_menu_enter_type
endif
if (<region.tag.sosh>=3)
var.sosh01=0d2
var.sosh11=0d3
var.sosh21=0d2
var.sosh31=0d2
var.sosh02=0d3
var.sosh12=0d2
var.sosh22=0d3
var.sosh32=0d3
DIALOG house_menu_enter_type
endif
ON=4
SRC.BANKSELF
ON=5
var.type=<src.findtype.t_key.link>
if !<src.findtype.t_key>
src.sysmessage You cant use this!
return 1
endif
if (<var.type>=<link>)
src.findtype.t_key.dclick
return 1
endif
src.sysmessage You cant use this!
ON=6
DIALOG house_menu_sell
ON=7
if (<src.restest i_gold 2000>)
src.consume=2000 i_gold
src.newitem=i_lock_change
src.act.bounce
//src.act.tag.home=<region.tag.house>
return 1
endif
src.sysmessage You need have 2000 gold coins from your backpack!
ON=8
src.newitem=i_transfer_house
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
return 1
[function f_friendremove]
var.friendremove1=0d2
var.friendremove2=0d2
var.friendremove3=0d2
var.friendremove4=0d2
var.friendremove5=0d2
if (0<tag.friendremove1>=1)
var.friendremove1=0d3
endif
if (0<tag.friendremove2>=1)
var.friendremove2=0d3
endif
if (0<tag.friendremove3>=1)
var.friendremove3=0d3
endif
if (0<tag.friendremove4>=1)
var.friendremove4=0d3
endif
if (0<tag.friendremove5>=1)
var.friendremove5=0d3
endif
[function f_friendlist]
var.friend11=0fa5
var.friend21=0fa5
var.friend31=0fa5
var.friend41=0fa5
var.friend51=0fa5
var.friend12=0fa6
var.friend22=0fa6
var.friend32=0fa6
var.friend42=0fa6
var.friend52=0fa6
if (<tag.friend1>!=0)
var.friend11=0fa2
var.friend12=0fa3
endif
if (<tag.friend2>!=0)
var.friend21=0fa2
var.friend22=0fa3
endif
if (<tag.friend3>!=0)
var.friend31=0fa2
var.friend32=0fa3
endif
if (<tag.friend4>!=0)
var.friend41=0fa2
var.friend42=0fa3
endif
if (<tag.friend5>!=0)
var.friend51=0fa2
var.friend52=0fa3
endif
[itemdef i_transfer_house]
id=i_gold
type=t_eq_script
name=Transfer
on=@equip
target Select a new owner...
return 1
ON=@TIMER
REMOVE
RETURN 1
on=@targon_char
if !<region.tag.house>
src.sysmessage You cant use in this region, only in your house!
return 1
endif
if (0<src.region.tag.house>=0<region.tag.house>)
LINK.MORE2=<SRC.TARG.UID>
LINK.TAG.OWNERNAME=<SRC.TARG.NAME>
LINK.MORE1=0
LINK.TAG.FRIEND1=0
LINK.TAG.FRIEND2=0
LINK.TAG.FRIEND3=0
LINK.TAG.FRIEND4=0
LINK.TAG.FRIEND5=0
LINK.TAG.FRIENDNAME1=Empty
LINK.TAG.FRIENDNAME2=Empty
LINK.TAG.FRIENDNAME3=Empty
LINK.TAG.FRIENDNAME4=Empty
LINK.TAG.FRIENDNAME5=Empty
LINK.TAG.OWNER=<SRC.TARG.UID>
LINK.TAG.FRIEND1=0
LINK.TAG.FRIEND2=0
LINK.TAG.FRIEND3=0
LINK.TAG.FRIEND4=0
LINK.TAG.FRIEND5=0
region.TAG.OWNER=<SRC.TARG.UID>
region.TAG.FRIEND1=0
region.TAG.FRIEND2=0
region.TAG.FRIEND3=0
region.TAG.FRIEND4=0
region.TAG.FRIEND5=0
region.TAG.OWNERNAME=<SRC.TARG.NAME>
region.TAG.FRIENDNAME1=Empty
region.TAG.FRIENDNAME2=Empty
region.TAG.FRIENDNAME3=Empty
region.TAG.FRIENDNAME4=Empty
region.TAG.FRIENDNAME5=Empty
src.sysmessage You change onwer on <src.targ.name>!
REMOVE
return 1
endif
remove
src.sysmessage You dont use this!
return 1
[ITEMDEF i_lock_change]
NAME=Lock/door Change Kit
ID=01eb9
TYPE=t_eq_script
ON=@DCLICK
IF (<SRC.REGION.FLAGS>==01192) || (<SRC.REGION.FLAGS>==01092) || <SRC.ISGM>
TARGET Select a locked door...
return 1
ENDIF
SRC.SYSMESSAGE Try using this at home!
RETURN 1
ON=@TARGON_ITEM
IF !(<SRC.TARG.TYPE>==t_door_locked)
SRC.MESSAGE Try using this on a DOOR!
RETURN 1
ENDIF
IF (<SRC.TARG.DISTANCE>>=4) &! <SRC.ISGM>
SRC.SYSMESSAGE Your to far away.
RETURN 1
ENDIF
VAR.x=<SRC.TARG.MORE1>
//IF (<SRC.MEMORYFINDTYPE.0100.LINK>==<VAR.x> || <SRC.ISGM>
if (<src.targ.region.tag.owner>=<src.uid>)
VAR.y=<SRC.TARG.MORE2>
VAR.z=<SRC.TARG.ID>
SRC.ANIM 13
SRC.SOUND 573
SRC.NEWITEM=<SRC.TARG.ID>//<VAR.z>
SRC.ACT.P=<SRC.TARG.P>
SRC.ACT.MORE1=<SRC.TARG.LINK>
SRC.ACT.LINK=<SRC.TARG.LINK>
SRC.ACT.MORE2=<SRC.TARG.MORE2>
SRC.ACT.TYPE=t_door_locked
SRC.NEWITEM=0100e
SRC.ACT.MORE1=<VAR.x>
SRC.ACT.LINK=<VAR.x>
SRC.ACT.BOUNCE
SRC.TARG.REMOVE
REMOVE
RETURN 1
endif
SRC.MESSAGE This is not your house!
RETURN 1
ENDIF
[itemdef i_door_lock]
id=i_bag
type=t_eq_script
name=Door Changer
on=@dclick
target Select a door...
return 1
on=@targon_item
if (<src.targ.region.tag.house>=<tag.home>) && ((<src.targ.type>=t_door_locked) || (<src.targ.type>=t_door))
var.rand1={0 10000}
var.rand2=<eval <var.rand1>>
var.link=10000+<var.rand2>
src.newitem=i_key_copper
src.act.bounce
src.act.attr=04
src.act.link=<var.link>
src.act.more1=<var.link>
src.act.name=Copper Key of the Door
src.targ.link=<var.link>
src.targ.more1=<var.link>
remove
return 1
endif
src.sysmessage You dont use this!
return 1
[DIALOG house_menu_enter_type]
150,150
resizepic 0 0 2600 410 310
resizepic 35 20 5100 330 30
resizepic 33 165 5100 330 10
gumppic 33 55 100
button 305 270 0f7 0f8 1 0 0
button 45 270 0f2 0f3 1 0 3
button 305 160 0ef 0f0 1 0 8
button 40 20 0867 0868 1 0 3
button 160 20 0867 0868 1 0 1
button 270 20 0867 0868 1 0 2
button 190 75 <var.sosh01> <var.sosh02> 1 0 4
button 190 95 <var.sosh11> <var.sosh12> 1 0 5
button 190 115 <var.sosh21> <var.sosh22> 1 0 6
button 190 135 <var.sosh31> <var.sosh32> 1 0 7
dtext 70 25 0 General
dtext 190 25 0 Friends
dtext 300 25 0 Payment
dtext 190 55 1000 Declare enter type:
dtext 215 75 0 Only Owner
dtext 215 95 0 Owner and friends
dtext 215 115 0 People with key
dtext 215 135 0 Public house
dtext 35 185 1000 Warning! If ypu declare your house as a publick
dtext 35 205 1000 house, everybody will be allowed to enter in
dtext 35 225 1000 independently of key presence.
dcroppedtext 50 95 105 20 55 <TAG.HOUSETYPE>
[DIALOG house_menu_enter_type BUTTON]
ON=0
region.tag.sosh=<region.tag.sosh>
ON=1
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=2
f_house_days
DIALOG house_menu_payment
ON=3
DIALOG house_menu_general
ON=4
tag.sosh=1
var.sosh01=0d3
var.sosh11=0d2
var.sosh21=0d2
var.sosh31=0d2
var.sosh02=0d2
var.sosh12=0d3
var.sosh22=0d3
var.sosh32=0d3
DIALOG house_menu_enter_type
src.sysmessage Only owner of this house may goes here!
ON=5
tag.sosh=3
var.sosh01=0d2
var.sosh11=0d3
var.sosh21=0d2
var.sosh31=0d2
var.sosh02=0d3
var.sosh12=0d3
var.sosh22=0d2
var.sosh32=0d3
DIALOG house_menu_enter_type
src.sysmessage Only owner of this house and friends of this house may goes here!
ON=6
tag.sosh=2
var.sosh01=0d2
var.sosh11=0d2
var.sosh21=0d3
var.sosh31=0d2
var.sosh02=0d3
var.sosh12=0d3
var.sosh22=0d2
var.sosh32=0d3
DIALOG house_menu_enter_type
src.sysmessage Only with key of this house may goes here!
ON=7
tag.sosh=0
var.sosh01=0d2
var.sosh11=0d2
var.sosh21=0d2
var.sosh31=0d3
var.sosh02=0d3
var.sosh12=0d3
var.sosh22=0d3
var.sosh32=0d2
DIALOG house_menu_enter_type
src.sysmessage All players may goes here!
ON=8
region.tag.sosh=<tag.sosh>
DIALOG house_menu_general
src.sysmessage System of safety has been saved!
[DIALOG house_menu_friends]
150,150
resizepic 0 0 2600 410 310
resizepic 35 20 5100 330 30
resizepic 33 165 5100 330 10
gumppic 33 55 100
button 305 270 0f7 0f8 1 0 0
gumppic 160 20 0869
button 40 20 0867 0868 1 0 1
button 270 20 0867 0868 1 0 2
button 190 55 <var.friend11> <var.friend12> 1 0 4
button 190 75 <var.friend21> <var.friend22> 1 0 5
button 190 95 <var.friend31> <var.friend32> 1 0 6
button 190 115 <var.friend41> <var.friend42> 1 0 7
button 190 135 <var.friend51> <var.friend52> 1 0 8
button 220 55 <var.friendremove1> <var.friendremove1> 1 0 13
button 220 75 <var.friendremove2> <var.friendremove2> 1 0 14
button 220 95 <var.friendremove3> <var.friendremove3> 1 0 15
button 220 115 <var.friendremove4> <var.friendremove4> 1 0 16
button 220 135 <var.friendremove5> <var.friendremove5> 1 0 17
button 190 185 0fa8 0fa9 1 0 12
button 33 185 0a9a 0a9b 1 0 9
button 33 215 0a9a 0a9b 1 0 10
button 33 245 0a9a 0a9b 1 0 11
dtext 70 25 0 General
dtext 190 25 0 Friends
dtext 300 25 0 Payment
dtext 55 185 1000 Add a friend
dtext 55 215 1000 Add entrie guild
dtext 55 245 1000 Remove a friend
dcroppedtext 50 95 105 20 55 <TAG.HOUSETYPE>
dtext 225 185 1000 Remove all friends
dtext 250 55 0 <tag.friendname1>
dtext 250 75 0 <tag.friendname2>
dtext 250 95 0 <tag.friendname3>
dtext 250 115 0 <tag.friendname4>
dtext 250 135 0 <tag.friendname5>
[DIALOG house_menu_friends BUTTON]
ON=0
ON=1
DIALOG house_menu_general
ON=2
f_house_days
DIALOG house_menu_payment
ON=3
ON=4
if (<tag.friend1>=0)
src.newitem=i_friend_1
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
return 1
endif
TAG.FRIEND1=0
TAG.FRIENDNAME1=Empty
region.TAG.FRIEND1=0
region.TAG.FRIENDNAME1=Empty
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=5
if (<tag.friend2>=0)
src.newitem=i_friend_2
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
return 1
endif
TAG.FRIEND2=0
TAG.FRIENDNAME2=Empty
region.TAG.FRIEND2=0
region.TAG.FRIENDNAME2=Empty
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=6
if (<tag.friend3>=0)
src.newitem=i_friend_3
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
return 1
endif
TAG.FRIEND3=0
TAG.FRIENDNAME3=Empty
region.TAG.FRIEND3=0
region.TAG.FRIENDNAME3=Empty
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=7
if (<tag.friend4>=0)
src.newitem=i_friend_4
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
return 1
endif
TAG.FRIEND4=0
TAG.FRIENDNAME4=Empty
region.TAG.FRIEND4=0
region.TAG.FRIENDNAME4=Empty
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=8
if (<tag.friend5>=0)
src.newitem=i_friend_5
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
return 1
endif
TAG.FRIEND5=0
TAG.FRIENDNAME5=Empty
region.TAG.FRIEND5=0
region.TAG.FRIENDNAME5=Empty
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=9
if (<tag.friend1>=0)
src.newitem=i_friend_1
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
return 1
endif
if (<tag.friend2>=0)
src.newitem=i_friend_2
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
return 1
endif
if (<tag.friend3>=0)
src.newitem=i_friend_3
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
return 1
endif
if (<tag.friend4>=0)
src.newitem=i_friend_4
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
return 1
endif
if (<tag.friend5>=0)
src.newitem=i_friend_5
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
return 1
endif
src.sysmessage You dont use this!
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=10
if (<tag.friend1>=0)
src.newitem=i_friend_guild_1
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
return 1
endif
if (<tag.friend2>=0)
src.newitem=i_friend_guild_2
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
return 1
endif
if (<tag.friend3>=0)
src.newitem=i_friend_guild_3
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
return 1
endif
if (<tag.friend4>=0)
src.newitem=i_friend_guild_4
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
return 1
endif
if (<tag.friend5>=0)
src.newitem=i_friend_guild_5
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
return 1
endif
src.sysmessage You dont use this!
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=11
if (<tag.friendremove1>=1)
src.sysmessage You are remove <TAG.FRIENDNAME1> from house friend list!
TAG.FRIEND1=0
TAG.FRIENDNAME1=Empty
region.TAG.FRIENDNAME1=Empty
region.TAG.FRIEND1=0
tag.friendremove0=1
tag.friendremove1=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
return 1
endif
if (<tag.friendremove2>=1)
src.sysmessage You are remove <TAG.FRIENDNAME1> from house friend list!
TAG.FRIEND1=0
TAG.FRIENDNAME1=Empty
region.TAG.FRIENDNAME1=Empty
region.TAG.FRIEND1=0
tag.friendremove0=1
tag.friendremove1=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
return 1
endif
if (<tag.friendremove3>=1)
src.sysmessage You are remove <TAG.FRIENDNAME1> from house friend list!
TAG.FRIEND1=0
TAG.FRIENDNAME1=Empty
region.TAG.FRIENDNAME1=Empty
region.TAG.FRIEND1=0
tag.friendremove0=1
tag.friendremove1=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
return 1
endif
if (<tag.friendremove4>=1)
src.sysmessage You are remove <TAG.FRIENDNAME1> from house friend list!
TAG.FRIEND1=0
TAG.FRIENDNAME1=Empty
region.TAG.FRIENDNAME1=Empty
region.TAG.FRIEND1=0
tag.friendremove0=1
tag.friendremove1=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
return 1
endif
if (<tag.friendremove5>=1)
src.sysmessage You are remove <TAG.FRIENDNAME1> from house friend list!
TAG.FRIEND1=0
TAG.FRIENDNAME1=Empty
region.TAG.FRIENDNAME1=Empty
region.TAG.FRIEND1=0
tag.friendremove0=1
tag.friendremove1=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
return 1
endif
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=12
TAG.FRIEND1=0
TAG.FRIEND2=0
TAG.FRIEND3=0
TAG.FRIEND4=0
TAG.FRIEND5=0
TAG.FRIENDNAME1=Empty
TAG.FRIENDNAME2=Empty
TAG.FRIENDNAME3=Empty
TAG.FRIENDNAME4=Empty
TAG.FRIENDNAME5=Empty
region.TAG.FRIENDNAME1=Empty
region.TAG.FRIENDNAME2=Empty
region.TAG.FRIENDNAME3=Empty
region.TAG.FRIENDNAME4=Empty
region.TAG.FRIENDNAME5=Empty
region.TAG.FRIEND1=0
region.TAG.FRIEND2=0
region.TAG.FRIEND3=0
region.TAG.FRIEND4=0
region.TAG.FRIEND5=0
src.sysmessage All friends has been removed!
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=13
tag.friendremove1=1
tag.friendremove2=0
tag.friendremove3=0
tag.friendremove4=0
tag.friendremove5=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=14
tag.friendremove1=0
tag.friendremove2=1
tag.friendremove3=0
tag.friendremove4=0
tag.friendremove5=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=15
tag.friendremove1=0
tag.friendremove2=0
tag.friendremove3=1
tag.friendremove4=0
tag.friendremove5=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=16
tag.friendremove1=0
tag.friendremove2=0
tag.friendremove3=0
tag.friendremove4=1
tag.friendremove5=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=17
tag.friendremove1=0
tag.friendremove2=0
tag.friendremove3=0
tag.friendremove4=0
tag.friendremove5=1
f_friendlist
f_friendremove
DIALOG house_menu_friends
[ITEMDEF i_friend_1]
ID=i_gold
NAME=Friend 1
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND1>!=0)
SRC.MESSAGE You already chose friend 1, try removing him before having a new one.
REMOVE
return 1
endif
TARGET Select a friend 1...
RETURN 1
ON=@TARGON_CHAR
if (<src.region.tag.house>!=<link.region.tag.house>)
src.sysmessage You dont use this!
remove
return 1
endif
if (<src.targ.memoryfindtype.memory_guild>!=0)
LINK.TAG.FRIEND1=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME1=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND1=<SRC.TARG.UID>
region.TAG.FRIENDNAME1=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
endif
LINK.TAG.FRIEND1=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME1=<SRC.TARG.NAME>
region.TAG.FRIEND1=<SRC.TARG.UID>
region.TAG.FRIENDNAME1=<SRC.TARG.NAME>
LINK=<MORE1>
REMOVE
return 1
[ITEMDEF i_friend_2]
ID=i_gold
NAME=Friend 2
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND2>!=0)
SRC.MESSAGE You already chose friend 2, try removing him before having a new one.
REMOVE
return 1
endif
TARGET Select a friend 2...
RETURN 1
ON=@TARGON_CHAR
if (<src.region.tag.house>!=<link.region.tag.house>)
src.sysmessage You dont use this!
remove
return 1
endif
if (<src.targ.memoryfindtype.memory_guild>!=0)
LINK.TAG.FRIEND2=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME2=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND2=<SRC.TARG.UID>
region.TAG.FRIENDNAME2=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
endif
LINK.TAG.FRIEND2=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME2=<SRC.TARG.NAME>
region.TAG.FRIEND2=<SRC.TARG.UID>
region.TAG.FRIENDNAME2=<SRC.TARG.NAME>
LINK=<MORE1>
REMOVE
return 1
[ITEMDEF i_friend_3]
ID=i_gold
NAME=Friend 3
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND3>!=0)
SRC.MESSAGE You already chose friend 3, try removing him before having a new one.
REMOVE
return 1
endif
TARGET Select a friend 3...
RETURN 1
ON=@TARGON_CHAR
if (<src.region.tag.house>!=<link.region.tag.house>)
src.sysmessage You dont use this!
remove
return 1
endif
if (<src.targ.memoryfindtype.memory_guild>!=0)
LINK.TAG.FRIEND3=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME3=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND3=<SRC.TARG.UID>
region.TAG.FRIENDNAME3=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
endif
LINK.TAG.FRIEND3=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME3=<SRC.TARG.NAME>
region.TAG.FRIEND3=<SRC.TARG.UID>
region.TAG.FRIENDNAME3=<SRC.TARG.NAME>
LINK=<MORE1>
REMOVE
return 1
[ITEMDEF i_friend_4]
ID=i_gold
NAME=Friend 4
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND4>!=0)
SRC.MESSAGE You already chose friend 4, try removing him before having a new one.
REMOVE
return 1
endif
TARGET Select a friend 4...
RETURN 1
ON=@TARGON_CHAR
if (<src.region.tag.house>!=<link.region.tag.house>)
src.sysmessage You dont use this!
remove
return 1
endif
if (<src.targ.memoryfindtype.memory_guild>!=0)
LINK.TAG.FRIEND4=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME4=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND4=<SRC.TARG.UID>
region.TAG.FRIENDNAME4=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
endif
LINK.TAG.FRIEND4=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME4=<SRC.TARG.NAME>
region.TAG.FRIEND4=<SRC.TARG.UID>
region.TAG.FRIENDNAME4=<SRC.TARG.NAME>
LINK=<MORE1>
REMOVE
return 1
[ITEMDEF i_friend_5]
ID=i_gold
NAME=Friend 5
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND5>!=0)
SRC.MESSAGE You already chose friend 5, try removing him before having a new one.
REMOVE
return 1
endif
TARGET Select a friend 5...
RETURN 1
ON=@TARGON_CHAR
if (<src.region.tag.house>!=<link.region.tag.house>)
src.sysmessage You dont use this!
remove
return 1
endif
if (<src.targ.memoryfindtype.memory_guild>!=0)
LINK.TAG.FRIEND5=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME5=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND5=<SRC.TARG.UID>
region.TAG.FRIENDNAME5=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
endif
LINK.TAG.FRIEND5=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME5=<SRC.TARG.NAME>
region.TAG.FRIEND5=<SRC.TARG.UID>
region.TAG.FRIENDNAME5=<SRC.TARG.NAME>
LINK=<MORE1>
REMOVE
return 1
[ITEMDEF i_friend_guild_1]
ID=i_gold
NAME=Friend 1
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND1>!=0)
SRC.MESSAGE You already chose friend 1, try removing him before having a new one.
REMOVE
return 1
endif
TARGET Select a friend 1...
RETURN 1
ON=@TARGON_CHAR
if (<src.targ.memoryfindtype.memory_guild>=0)
src.sysmessage Your target no in guild!
remove
return 1
endif
if (<src.region.tag.house>=<region.tag.house>)
LINK.TAG.FRIEND1=<src.targ.memoryfindtype.memory_guild.link>
LINK.TAG.FRIENDNAME1=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND1=<src.targ.memoryfindtype.memory_guild.link>
region.TAG.FRIENDNAME1=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
endif
remove
src.sysmessage You dont use this!
return 1
[ITEMDEF i_friend_guild_2]
ID=i_gold
NAME=Friend 2
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND2>!=0)
SRC.MESSAGE You already chose friend 2, try removing him before having a new one.
REMOVE
return 1
endif
TARGET Select a friend 2...
RETURN 1
ON=@TARGON_CHAR
if (<src.targ.memoryfindtype.memory_guild>=0)
src.sysmessage Your target no in guild!
remove
return 1
endif
if (<src.region.tag.house>=<region.tag.house>)
LINK.TAG.FRIEND2=<src.targ.memoryfindtype.memory_guild.link>
LINK.TAG.FRIENDNAME2=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND2=<src.targ.memoryfindtype.memory_guild.link>
region.TAG.FRIENDNAME2=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
endif
remove
src.sysmessage You dont use this!
return 1
[ITEMDEF i_friend_guild_3]
ID=i_gold
NAME=Friend 3
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND3>!=0)
SRC.MESSAGE You already chose friend 3, try removing him before having a new one.
REMOVE
return 1
endif
TARGET Select a friend 3...
RETURN 1
ON=@TARGON_CHAR
if (<src.targ.memoryfindtype.memory_guild>=0)
src.sysmessage Your target no in guild!
remove
return 1
endif
if (<src.region.tag.house>=<region.tag.house>)
LINK.TAG.FRIEND3=<src.targ.memoryfindtype.memory_guild.link>
LINK.TAG.FRIENDNAME3=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND3=<src.targ.memoryfindtype.memory_guild.link>
region.TAG.FRIENDNAME3=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
endif
remove
src.sysmessage You dont use this!
return 1
[ITEMDEF i_friend_guild_4]
ID=i_gold
NAME=Friend 4
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND4>!=0)
SRC.MESSAGE You already chose friend 4, try removing him before having a new one.
REMOVE
return 1
endif
TARGET Select a friend 4...
RETURN 1
ON=@TARGON_CHAR
if (<src.targ.memoryfindtype.memory_guild>=0)
src.sysmessage Your target no in guild!
remove
return 1
endif
if (<src.region.tag.house>=<region.tag.house>)
LINK.TAG.FRIEND4=<src.targ.memoryfindtype.memory_guild.link>
LINK.TAG.FRIENDNAME4=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND4=<src.targ.memoryfindtype.memory_guild.link>
region.TAG.FRIENDNAME4=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
endif
remove
src.sysmessage You dont use this!
return 1
[ITEMDEF i_friend_guild_5]
ID=i_gold
NAME=Friend 5
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND5>!=0)
SRC.MESSAGE You already chose friend 5, try removing him before having a new one.
REMOVE
return 1
endif
TARGET Select a friend 5...
RETURN 1
ON=@TARGON_CHAR
if (<src.targ.memoryfindtype.memory_guild>=0)
src.sysmessage Your target no in guild!
remove
return 1
endif
if (<src.region.tag.house>=<region.tag.house>)
LINK.TAG.FRIEND5=<src.targ.memoryfindtype.memory_guild.link>
LINK.TAG.FRIENDNAME5=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND5=<src.targ.memoryfindtype.memory_guild.link>
region.TAG.FRIENDNAME5=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
endif
remove
src.sysmessage You dont use this!
return 1
[DIALOG house_menu_payment]
150,150
resizepic 0 0 2600 410 310
resizepic 35 20 5100 330 30
resizepic 33 165 5100 330 10
resizepic 300 65 3000 90 20
gumppic 33 55 100
button 305 270 0f7 0f8 1 0 0
gumppic 270 20 0869
button 40 20 0867 0868 1 0 1
button 160 20 0867 0868 1 0 2
button 33 185 0a9a 0a9b 1 0 3
dtext 70 25 0 General
dtext 190 25 0 Friends
dtext 300 25 0 Payment
dtext 190 65 1000 House balance:
dtext 190 85 1000 Cost per day:
dtext 190 105 1000 Days paid:
dtext 190 135 1000 Status:
dtext 55 185 1000 Add gold
dtext 305 65 0 <eval <tag.balance>>
dtext 305 85 0 <eval <tag.days>>
dtext 305 105 0 <eval <tag.day_pay>>
dtext 305 135 0 active
dcroppedtext 50 95 105 20 55 <TAG.HOUSETYPE>
[DIALOG house_menu_payment BUTTON]
ON=0
ON=1
DIALOG house_menu_general
ON=2
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=3
src.newitem=i_gold_coster
src.ACT.LINK=<uid>
src.act.equip
[DIALOG house_menu_general_friend]
150,150
resizepic 0 0 2600 410 200
resizepic 35 20 5100 330 30
gumppic 33 55 100
button 305 160 0f7 0f8 1 0 0
gumppic 40 20 0869
button 160 20 0867 0868 1 0 1
button 270 20 0867 0868 1 0 2
dtext 70 25 0 General
dtext 190 25 0 Friends
dtext 300 25 0 Payment
dtext 190 65 1000 Owned by:
dtext 190 85 1000 Locked items:
dtext 190 105 1000 House type:
dtext 295 65 0 <tag.ownername>
dtext 295 85 0 0/100
dtext 295 105 0 Regular
dcroppedtext 50 95 105 20 55 <TAG.HOUSETYPE>
[DIALOG house_menu_general_friend BUTTON]
ON=0
ON=1
DIALOG house_menu_friends_friend
ON=2
f_house_days
DIALOG house_menu_payment_friend
[DIALOG house_menu_friends_friend]
150,150
resizepic 0 0 2600 410 200
resizepic 35 20 5100 330 30
gumppic 33 55 100
button 305 160 0f7 0f8 1 0 0
gumppic 160 20 0869
button 40 20 0867 0868 1 0 1
button 270 20 0867 0868 1 0 2
dtext 70 25 0 General
dtext 190 25 0 Friends
dtext 300 25 0 Payment
dcroppedtext 50 95 105 20 55 <TAG.HOUSETYPE>
dtext 190 55 0 <tag.friendname1>
dtext 190 75 0 <tag.friendname2>
dtext 190 95 0 <tag.friendname3>
dtext 190 115 0 <tag.friendname4>
dtext 190 135 0 <tag.friendname5>
[DIALOG house_menu_friends_friend BUTTON]
ON=0
ON=1
DIALOG house_menu_general_friend
ON=2
f_house_days
DIALOG house_menu_payment_friend
[DIALOG house_menu_payment_friend]
150,150
resizepic 0 0 2600 410 200
resizepic 35 20 5100 330 30
resizepic 300 65 3000 90 20
gumppic 33 55 100
button 305 160 0f7 0f8 1 0 0
gumppic 270 20 0869
button 40 20 0867 0868 1 0 1
button 160 20 0867 0868 1 0 2
button 190 135 0a9a 0a9b 1 0 3
dtext 70 25 0 General
dtext 190 25 0 Friends
dtext 300 25 0 Payment
dtext 190 65 1000 House balance:
dtext 190 85 1000 Cost per day:
dtext 190 105 1000 Days paid:
dtext 220 135 1000 Add gold
dtext 305 65 0 <eval <tag.balance>>
dtext 305 85 0 <eval <tag.days>>
dtext 305 105 0 <eval <tag.day_pay>>
dcroppedtext 50 95 105 20 55 <TAG.HOUSETYPE>
[DIALOG house_menu_payment_friend BUTTON]
ON=0
ON=1
DIALOG house_menu_general_friend
ON=2
DIALOG house_menu_friends_friend
ON=3
src.newitem=i_gold_coster
src.ACT.LINK=<uid>
src.act.equip
[itemdef i_gold_coster]
id=i_gold
type=t_eq_script
name=Golden Coster
on=@equip
TARGET Select a money to pay on this house...
timer=30
return 1
on=@targon_item
if (<src.targ.type>=t_gold)
link.tag.balance=(<link.tag.balance>+<src.targ.amount>)
src.targ.remove
remove
src.sysmessage You pay <eval <src.targ.amount>> gold coins.
return 1
endif
if (<src.targ.baseid>=i_plate_ingot)
var.balance=<src.targ.amount>*25000
link.tag.balance=<eval (<link.tag.balance>+<var.balance>)>
src.targ.remove
remove
src.sysmessage You pay <eval <var.balance>> gold coins.
return 1
endif
remove
RETURN 1
on=@timer
remove
return 1
[ITEMDEF 0bd1]
DEFNAME=i_sign_brass
TYPE=t_eq_script
CATEGORY=Decoration - Signs
SUBSECTION=Blank
DESCRIPTION=Brass Blank
DUPELIST=0bd2
ON=@CREATE
ATTR=010
ON=@DCLICK
IF !(<LINK>=04FFFFFFF)
IF (<MORE2>=0)
f_house_pay
tag.day_pay=<var.pay>
f_house_balance
tag.balance=<var.balance>
tag.days=30
TAG.MYHOUSE=<LINK>
TAG.MYSIGN=<UID>
TAG.NAME=<NAME>
TAG.HOUSETYPE=<LINK.NAME>
MORE2=<SRC.UID>
TIMER=24*60*60
tag.destroy=0
tag.friendremove1=1
tag.friendremove2=0
tag.friendremove3=0
tag.friendremove4=0
tag.friendremove5=0
tag.owner=<src.uid>
tag.ownername=<src.name>
tag.friend1=0
tag.friend2=0
tag.friend3=0
tag.friend4=0
tag.friend5=0
tag.friendname1=Empty
tag.friendname2=Empty
tag.friendname3=Empty
tag.friendname4=Empty
tag.friendname5=Empty
region.tag.house=<LINK>
REGION.EVENTS=+r_house_control
region.tag.sosh=1
region.tag.owner=<src.uid>
region.tag.FRIEND1=0
region.tag.FRIEND2=0
region.tag.FRIEND3=0
region.tag.FRIEND4=0
region.tag.FRIEND5=0
region.tag.key=<LINK>
LINK.TAG.OWNER=<SRC.UID>
DIALOG HOUSE_MENU_general
RETURN 1
endif
endif
if (0<tag.owner>=<src.uid>)
DIALOG HOUSE_MENU_general
RETURN 1
endif
if <src.memoryfindtype.memory_guild.link>
if ((0<tag.friend1>=<src.uid>) || (<src.memoryfindtype.memory_guild.link>=<tag.FRIEND1>)) || ((0<tag.friend2>=<src.uid>) || (<src.memoryfindtype.memory_guild.link>=<tag.FRIEND2>)) || ((0<tag.friend3>=<src.uid>) || (<src.memoryfindtype.memory_guild.link>=<tag.FRIEND3>)) || ((0<tag.friend4>=<src.uid>) || (<src.memoryfindtype.memory_guild.link>=<tag.FRIEND4>)) || ((0<tag.friend5>=<src.uid>) || (<src.memoryfindtype.memory_guild.link>=<tag.FRIEND5>))
DIALOG HOUSE_MENU_general_friend
RETURN 1
endif
endif
if (0<tag.friend1>=<src.uid>) || (0<tag.friend2>=<src.uid>) || (0<tag.friend3>=<src.uid>)|| (0<tag.friend4>=<src.uid>) || (0<tag.friend5>=<src.uid>)
DIALOG HOUSE_MENU_general_friend
RETURN 1
endif
DIALOG house_menu_guest
RETURN 1
on=@timer
if (0<tag.balance>><tag.day_pay>) || (0<tag.balance>=<tag.day_pay>)
timer=24*60*60
color=0
tag.balance=<tag.balance>-<tag.day_pay>
tag.destroy=0
return 1
endif
if (0<tag.balance><<tag.day_pay>) && (0<tag.destroy>=0)
timer=12*60*60
color=021
tag.balance=0
tag.destroy=1
return 1
endif
if (0<tag.balance><<tag.day_pay>) && (0<tag.destroy>=1)
link.remove
return 1
endif
link.remove
return 1
[function f_house_balance]
var.balance=<var.pay>*30
[function f_house_days]
tag.days=<tag.balance>/<tag.day_pay>
[function f_house_pay]
if (<link.baseid>=i_multi_house_stone_plaster_small) || (<link.baseid>=i_multi_house_stone_small) || (<link.baseid>=i_multi_house_stone_brick_small) || (<link.baseid>=i_multi_house_stone_wood_small) || (<link.baseid>=i_multi_house_wood_plaster_small) || (<link.baseid>=i_multi_house_wood_thatched_small) || (<link.baseid>=i_multi_shop_stone_small) || (<link.baseid>=i_multi_shop_marble_small)
var.pay=<eval house1>
else
if (<link.baseid>=i_multi_house_3room) || (<link.baseid>=i_multi_house_wood_plaster_2story) || (<link.baseid>=i_multi_house_stone_plaster_2story) || (<link.baseid>=i_multi_shop_blacksmithy_large_2) || (<link.baseid>=i_multi_shop_blacksmithy_large) || (<link.baseid>=i_multi_house_patio_marble) || (<link.baseid>=i_multi_villa_2story) || (<link.baseid>=i_multi_house_patio_sand) || (<link.baseid>=i_multi_cabin_log_2story)
var.pay=<eval house2>
else
if (<link.baseid>=i_multi_tower) || (<link.baseid>=i_multi_keep) || (<link.baseid>=i_multi_castle) || (<link.baseid>=i_multi_tower_wizard)
var.pay=<eval house3>
endif
endif
endif
[REGIONTYPE r_house_control]
ON=@step
src.f_house_detect_friends
return 1
[function f_house_detect_friends]
if (<src.npc>!=0)
f_house_attacked
return 1
endif
if (<region.tag.sosh>=0)
return 1
endif
if (<region.tag.sosh>=1) && (<src.uid>=<region.tag.owner>)
return 1
endif
if (<region.tag.sosh>=2) && (<src.findtype.t_key>)
if (<src.findtype.t_key.link>=<region.tag.key>)
return 1
endif
f_house_attacked
endif
if (<region.tag.sosh>=3) && ((<src.uid>=<region.tag.owner>) || ((<src.uid>=<region.tag.FRIEND1>) || (<src.memoryfindtype.memory_guild.link>=<region.tag.FRIEND1>)) || ((<src.uid>=<region.tag.FRIEND2>) || (<src.memoryfindtype.memory_guild.link>=<region.tag.FRIEND2>)) || ((<src.uid>=<region.tag.FRIEND3>) || (<src.memoryfindtype.memory_guild.link>=<region.tag.FRIEND3>)) || ((<src.uid>=<region.tag.FRIEND4>) || (<src.memoryfindtype.memory_guild.link>=<region.tag.FRIEND4>)) || ((<src.uid>=<region.tag.FRIEND5>) || (<src.memoryfindtype.memory_guild.link>=<region.tag.FRIEND5>)))
return 1
endif
f_house_attacked
[function f_house_attacked]
if (<src.dir>=0)
src.p=<eval <src.p.x>>,<eval <src.p.y>+1>,<eval <src.p.z>>
src.update
endif
if (<src.dir>=1)
src.p=<eval <src.p.x>-1>,<eval <src.p.y>+1>,<eval <src.p.z>>
src.update
endif
if (<src.dir>=2)
src.p=<eval <src.p.x>-1>,<eval <src.p.y>>,<eval <src.p.z>>
src.update
endif
if (<src.dir>=3)
src.p=<eval <src.p.x>-1>,<eval <src.p.y>-1>,<eval <src.p.z>>
src.update
endif
if (<src.dir>=4)
src.p=<eval <src.p.x>>,<eval <src.p.y>-1>,<eval <src.p.z>>
src.update
endif
if (<src.dir>=5)
src.p=<eval <src.p.x>+1>,<eval <src.p.y>-1>,<eval <src.p.z>>
src.update
endif
if (<src.dir>=6)
src.p=<eval <src.p.x>+1>,<eval <src.p.y>>,<eval <src.p.z>>
src.update
endif
if (<src.dir>=7)
src.p=<eval <src.p.x>+1>,<eval <src.p.y>+1>,<eval <src.p.z>>
src.update
endif
[EOF]
Всё, окончательно дописал, терь все гампы и цвета такиеже как и на ДРВ, и багов скока тестил нету
А тут есть плата за дом в день?
Код
[defname daypay]
house1 3759 //Цена маленького дома
house2 7983 //Цена большого дома
house3 17273 //Цена Keep, Castle, Tower...
Это для трёх видов домов, если нужно сделать как-то подругому то изменяй ещё и тут:
Код
[function f_house_pay]
if (<link.baseid>=i_multi_house_stone_plaster_small) || (<link.baseid>=i_multi_house_stone_small) || (<link.baseid>=i_multi_house_stone_brick_small) || (<link.baseid>=i_multi_house_stone_wood_small) || (<link.baseid>=i_multi_house_wood_plaster_small) || (<link.baseid>=i_multi_house_wood_thatched_small) || (<link.baseid>=i_multi_shop_stone_small) || (<link.baseid>=i_multi_shop_marble_small)
var.pay=<eval house1>
else
if (<link.baseid>=i_multi_house_3room) || (<link.baseid>=i_multi_house_wood_plaster_2story) || (<link.baseid>=i_multi_house_stone_plaster_2story) || (<link.baseid>=i_multi_shop_blacksmithy_large_2) || (<link.baseid>=i_multi_shop_blacksmithy_large) || (<link.baseid>=i_multi_house_patio_marble) || (<link.baseid>=i_multi_villa_2story) || (<link.baseid>=i_multi_house_patio_sand) || (<link.baseid>=i_multi_cabin_log_2story)
var.pay=<eval house2>
else
if (<link.baseid>=i_multi_tower) || (<link.baseid>=i_multi_keep) || (<link.baseid>=i_multi_castle) || (<link.baseid>=i_multi_tower_wizard)
var.pay=<eval house3>
endif
endif
endif
народ , у меня проблема на 55i пишет ошибки на 84-99 строках пишет ошибку при попытке открытия меню дома .... СОС ....
На 55i вроди бы нету dtext а скрипт этот написан для 55r4.0.2, если хочешь перепиши его полностью или перейди не эту версию сферы.
народ а может ктонить помочь с переводом под 55i етого скрипта ? пожалста ...
А не легче ли тебе перенести сферу на 55r4.0.2? На 55i он даже если переписать может и неработать, но точно непомню, давно писал немного на 55i
просто у меня скрипты некоторые начинают глючить и куча скилов работать перестаёт =(
Незнаю-незнаю, у мя почти всё норм было после перехода с 55i HA 55r4.0.2... Да их и переписать несложно, просто в консоли сферы смотришь где ошибка и поправляешь...
Frog помоги плиз ......
С чем? Со скриптом? Нее, у мя своих забот хватает...
всё испраил , только не работают гампы в меню Friends , Set enter type , и нет щётчика лоченых итемов ... если можешь хотяб намекни как ето починить ....
Упс, про щетчик я забыл, я просто так написал его, для вида, када руки дойдут сделаю...
А с гампами незнаю почему проблемма, проверь ещё раз скрипт, мож что-то нетак сделал...
если надо я могу выложить исправленое под 55i меню твоё ...но вот проблема с гампами ( checkbox ) в паре менюшек мну уже раздрожает я хз как поправить ....
) У мя там не checkbox а var.* и tag.* через checkbox чёт у мя чёт глючило, или я чёт нетак делал и сдалел так...
Спасибо... Я новичок, скажите плз куда его вставлять? (Скрипт)
Frog если напишешь щётчик выложи плыз ....
[defname daypay]
house1 3759 //Цена маленького дома
house2 7983 //Цена большого дома
house3 17273 //Цена Keep, Castle, Tower...
[DIALOG house_menu_guest]
150,150
gumppic 0 0 100
textentry 20 25 105 20 55
textentry 20 55 105 20 55
[DIALOG house_menu_guest TEXT]
Owner: <tag.ownername>
<TAG.HOUSETYPE>
[DIALOG house_menu_guest BUTTON]
[DIALOG house_menu_sell]
150,150
resizepic 0 0 2600 410 310
resizepic 35 20 5100 330 30
resizepic 33 165 5100 330 10
gumppic 33 55 100
button 305 270 0f7 0f8 1 0 0
button 45 270 0f2 0f3 1 0 3
button 305 160 0ef 0f0 1 0 4
button 40 20 0867 0868 1 0 3
button 160 20 0867 0868 1 0 1
button 270 20 0867 0868 1 0 2
text 70 25 0
text 190 25 0
text 300 25 0
text 190 55 1000
text 190 75 1000
text 190 95 1000
text 190 115 1000
text 35 185 020
text 25 225 1000
textentry 50 95 105 20 55
[DIALOG house_menu_sell TEXT]
General
Friends
Payment
Warning! Your house will
be DESTROYED and house
ballance will be returned to
your bank account.
House and all locked items will be destroyed!
Are you sure to do this? Click APPLY to proceed.
<TAG.HOUSETYPE>
[DIALOG house_menu_sell BUTTON]
ON=0
ON=1
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=2
f_house_days
DIALOG house_menu_payment
ON=3
DIALOG house_menu_general
ON=4
var.gold=<tag.balance>/2
f_house_sell
link.remove
[function f_house_sell]
if (<var.gold>>50000)
src.newitem=i_gold
src.act.amount=50000
src.act.bounce
var.gold=<var.gold>-50000
f_house_sell
return 1
endif
if (<var.gold>>0)
src.newitem=i_gold
src.act.amount=<var.gold>
src.act.bounce
endif
[DIALOG house_menu_general]
150,150
resizepic 0 0 2600 410 310
resizepic 35 20 5100 330 30
resizepic 33 165 5100 330 10
gumppic 33 55 100
button 305 270 0f7 0f8 1 0 0
gumppic 40 20 0869
button 160 20 0867 0868 1 0 1
button 270 20 0867 0868 1 0 2
button 190 135 0a9a 0a9b 1 0 4
button 190 185 0a9a 0a9b 1 0 5
button 190 215 0a9a 0a9b 1 0 6
button 33 185 0a9a 0a9b 1 0 3
button 33 215 0a9a 0a9b 1 0 7
button 33 245 0a9a 0a9b 1 0 8
text 70 25 0
text 190 25 0
text 300 25 0
text 190 65 1000
text 190 85 1000
text 190 105 1000
text 215 135 1000
text 215 185 1000
text 215 215 020
text 55 185 1000
text 55 215 1000
text 55 245 1000
text 295 65 0
text 295 85 0
text 295 105 0
textentry 50 95 105 20 55
DIALOG house_menu_general TEXT]
General
Friends
Payment
Owned by:
Locked items:
House type:
Owner bankbox access
Lock/Unlock item
Sell this house
Set enter type
Change locks
Transfer house
<tag.ownername>
0/100
Regular
<TAG.HOUSETYPE>
[DIALOG house_menu_general BUTTON]
ON=0
ON=1
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=2
f_house_days
DIALOG house_menu_payment
ON=3
if (<region.tag.sosh>=0)
var.sosh01=0d2
var.sosh11=0d2
var.sosh21=0d2
var.sosh31=0d3
var.sosh02=0d3
var.sosh12=0d3
var.sosh22=0d3
var.sosh32=0d2
DIALOG house_menu_enter_type
endif
if (<region.tag.sosh>=1)
var.sosh01=0d3
var.sosh11=0d2
var.sosh21=0d2
var.sosh31=0d2
var.sosh02=0d2
var.sosh12=0d3
var.sosh22=0d3
var.sosh32=0d3
DIALOG house_menu_enter_type
endif
if (<region.tag.sosh>=2)
var.sosh01=0d2
var.sosh11=0d2
var.sosh21=0d3
var.sosh31=0d2
var.sosh02=0d3
var.sosh12=0d3
var.sosh22=0d2
var.sosh32=0d3
DIALOG house_menu_enter_type
endif
if (<region.tag.sosh>=3)
var.sosh01=0d2
var.sosh11=0d3
var.sosh21=0d2
var.sosh31=0d2
var.sosh02=0d3
var.sosh12=0d2
var.sosh22=0d3
var.sosh32=0d3
DIALOG house_menu_enter_type
endif
ON=4
SRC.BANKSELF
ON=5
var.type=<src.findtype.t_key.link>
if !<src.findtype.t_key>
src.sysmessage You cant use this!
return 1
endif
if (<var.type>=<link>)
src.findtype.t_key.dclick
return 1
endif
src.sysmessage You cant use this!
ON=6
DIALOG house_menu_sell
ON=7
if (<src.restest i_gold 2000>)
src.consume=2000 i_gold
src.newitem=i_lock_change
src.act.bounce
//src.act.tag.home=<region.tag.house>
return 1
endif
src.sysmessage You need have 2000 gold coins from your backpack!
ON=8
src.newitem=i_transfer_house
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
return 1
[function f_friendremove]
var.friendremove1=0d2
var.friendremove2=0d2
var.friendremove3=0d2
var.friendremove4=0d2
var.friendremove5=0d2
if (0<tag.friendremove1>=1)
var.friendremove1=0d3
endif
if (0<tag.friendremove2>=1)
var.friendremove2=0d3
endif
if (0<tag.friendremove3>=1)
var.friendremove3=0d3
endif
if (0<tag.friendremove4>=1)
var.friendremove4=0d3
endif
if (0<tag.friendremove5>=1)
var.friendremove5=0d3
endif
[function f_friendlist]
var.friend11=0fa5
var.friend21=0fa5
var.friend31=0fa5
var.friend41=0fa5
var.friend51=0fa5
var.friend12=0fa6
var.friend22=0fa6
var.friend32=0fa6
var.friend42=0fa6
var.friend52=0fa6
if (<tag.friend1>!=0)
var.friend11=0fa2
var.friend12=0fa3
endif
if (<tag.friend2>!=0)
var.friend21=0fa2
var.friend22=0fa3
endif
if (<tag.friend3>!=0)
var.friend31=0fa2
var.friend32=0fa3
endif
if (<tag.friend4>!=0)
var.friend41=0fa2
var.friend42=0fa3
endif
if (<tag.friend5>!=0)
var.friend51=0fa2
var.friend52=0fa3
endif
[itemdef i_transfer_house]
id=i_gold
type=t_eq_script
name=Transfer
on=@equip
target Select a new owner...
return 1
ON=@TIMER
REMOVE
RETURN 1
on=@targon_char
if !<region.tag.house>
src.sysmessage You cant use in this region, only in your house!
return 1
endif
if (0<src.region.tag.house>=0<region.tag.house>)
LINK.MORE2=<SRC.TARG.UID>
LINK.TAG.OWNERNAME=<SRC.TARG.NAME>
LINK.MORE1=0
LINK.TAG.FRIEND1=0
LINK.TAG.FRIEND2=0
LINK.TAG.FRIEND3=0
LINK.TAG.FRIEND4=0
LINK.TAG.FRIEND5=0
LINK.TAG.FRIENDNAME1=Empty
LINK.TAG.FRIENDNAME2=Empty
LINK.TAG.FRIENDNAME3=Empty
LINK.TAG.FRIENDNAME4=Empty
LINK.TAG.FRIENDNAME5=Empty
LINK.TAG.OWNER=<SRC.TARG.UID>
LINK.TAG.FRIEND1=0
LINK.TAG.FRIEND2=0
LINK.TAG.FRIEND3=0
LINK.TAG.FRIEND4=0
LINK.TAG.FRIEND5=0
region.TAG.OWNER=<SRC.TARG.UID>
region.TAG.FRIEND1=0
region.TAG.FRIEND2=0
region.TAG.FRIEND3=0
region.TAG.FRIEND4=0
region.TAG.FRIEND5=0
region.TAG.OWNERNAME=<SRC.TARG.NAME>
region.TAG.FRIENDNAME1=Empty
region.TAG.FRIENDNAME2=Empty
region.TAG.FRIENDNAME3=Empty
region.TAG.FRIENDNAME4=Empty
region.TAG.FRIENDNAME5=Empty
src.sysmessage You change onwer on <src.targ.name>!
REMOVE
return 1
endif
remove
src.sysmessage You dont use this!
return 1
[ITEMDEF i_lock_change]
NAME=Lock/door Change Kit
ID=01eb9
TYPE=t_eq_script
ON=@DCLICK
IF (<SRC.REGION.FLAGS>==01192) || (<SRC.REGION.FLAGS>==01092) || <SRC.ISGM>
TARGET Select a locked door...
return 1
ENDIF
SRC.SYSMESSAGE Try using this at home!
RETURN 1
ON=@TARGON_ITEM
IF !(<SRC.TARG.TYPE>==t_door_locked)
SRC.MESSAGE Try using this on a DOOR!
RETURN 1
ENDIF
IF (<SRC.TARG.DISTANCE>>=4) &! <SRC.ISGM>
SRC.SYSMESSAGE Your to far away.
RETURN 1
ENDIF
VAR.x=<SRC.TARG.MORE1>
//IF (<SRC.MEMORYFINDTYPE.0100.LINK>==<VAR.x> || <SRC.ISGM>
if (<src.targ.region.tag.owner>=<src.uid>)
VAR.y=<SRC.TARG.MORE2>
VAR.z=<SRC.TARG.ID>
SRC.ANIM 13
SRC.SOUND 573
SRC.NEWITEM=<SRC.TARG.ID>//<VAR.z>
SRC.ACT.P=<SRC.TARG.P>
SRC.ACT.MORE1=<SRC.TARG.LINK>
SRC.ACT.LINK=<SRC.TARG.LINK>
SRC.ACT.MORE2=<SRC.TARG.MORE2>
SRC.ACT.TYPE=t_door_locked
SRC.NEWITEM=0100e
SRC.ACT.MORE1=<VAR.x>
SRC.ACT.LINK=<VAR.x>
SRC.ACT.BOUNCE
SRC.TARG.REMOVE
REMOVE
RETURN 1
endif
SRC.MESSAGE This is not your house!
RETURN 1
ENDIF
[itemdef i_door_lock]
id=i_bag
type=t_eq_script
name=Door Changer
on=@dclick
target Select a door...
return 1
on=@targon_item
if (<src.targ.region.tag.house>=<tag.home>) && ((<src.targ.type>=t_door_locked) || (<src.targ.type>=t_door))
var.rand1={0 10000}
var.rand2=<eval <var.rand1>>
var.link=10000+<var.rand2>
src.newitem=i_key_copper
src.act.bounce
src.act.attr=04
src.act.link=<var.link>
src.act.more1=<var.link>
src.act.name=Copper Key of the Door
src.targ.link=<var.link>
src.targ.more1=<var.link>
remove
return 1
endif
src.sysmessage You dont use this!
return 1
[DIALOG house_menu_enter_type]
150,150
resizepic 0 0 2600 410 310
resizepic 35 20 5100 330 30
resizepic 33 165 5100 330 10
gumppic 33 55 100
button 305 270 0f7 0f8 1 0 0
button 45 270 0f2 0f3 1 0 3
button 305 160 0ef 0f0 1 0 8
button 40 20 0867 0868 1 0 3
button 160 20 0867 0868 1 0 1
button 270 20 0867 0868 1 0 2
button 190 75 <var.sosh01> <var.sosh02> 1 0 4
button 190 95 <var.sosh11> <var.sosh12> 1 0 5
button 190 115 <var.sosh21> <var.sosh22> 1 0 6
button 190 135 <var.sosh31> <var.sosh32> 1 0 7
text 70 25 0
text 190 25 0
text 300 25 0
text 190 55 1000
text 215 75 0
text 215 95 0
text 215 115 0
text 215 135 0
text 35 185 1000
text 35 205 1000
text 35 225 1000
textentry 50 95 105 20 55
[DIALOG house_menu_enter_type TEXT]
General
Friends
Payment
Declare enter type:
Only Owner
Owner and friends
People with key
Public house
Warning! If ypu declare your house as a publick
house, everybody will be allowed to enter in
independently of key presence.
<TAG.HOUSETYPE>
[DIALOG house_menu_enter_type BUTTON]
ON=0
region.tag.sosh=<region.tag.sosh>
ON=1
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=2
f_house_days
DIALOG house_menu_payment
ON=3
DIALOG house_menu_general
ON=4
tag.sosh=1
var.sosh01=0d3
var.sosh11=0d2
var.sosh21=0d2
var.sosh31=0d2
var.sosh02=0d2
var.sosh12=0d3
var.sosh22=0d3
var.sosh32=0d3
DIALOG house_menu_enter_type
src.sysmessage Only owner of this house may goes here!
ON=5
tag.sosh=3
var.sosh01=0d2
var.sosh11=0d3
var.sosh21=0d2
var.sosh31=0d2
var.sosh02=0d3
var.sosh12=0d3
var.sosh22=0d2
var.sosh32=0d3
DIALOG house_menu_enter_type
src.sysmessage Only owner of this house and friends of this house may goes here!
ON=6
tag.sosh=2
var.sosh01=0d2
var.sosh11=0d2
var.sosh21=0d3
var.sosh31=0d2
var.sosh02=0d3
var.sosh12=0d3
var.sosh22=0d2
var.sosh32=0d3
DIALOG house_menu_enter_type
src.sysmessage Only with key of this house may goes here!
ON=7
tag.sosh=0
var.sosh01=0d2
var.sosh11=0d2
var.sosh21=0d2
var.sosh31=0d3
var.sosh02=0d3
var.sosh12=0d3
var.sosh22=0d3
var.sosh32=0d2
DIALOG house_menu_enter_type
src.sysmessage All players may goes here!
ON=8
region.tag.sosh=<tag.sosh>
DIALOG house_menu_general
src.sysmessage System of safety has been saved!
[DIALOG house_menu_friends]
150,150
resizepic 0 0 2600 410 310
resizepic 35 20 5100 330 30
resizepic 33 165 5100 330 10
gumppic 33 55 100
button 305 270 0f7 0f8 1 0 0
gumppic 160 20 0869
button 40 20 0867 0868 1 0 1
button 270 20 0867 0868 1 0 2
button 190 55 <var.friend11> <var.friend12> 1 0 4
button 190 75 <var.friend21> <var.friend22> 1 0 5
button 190 95 <var.friend31> <var.friend32> 1 0 6
button 190 115 <var.friend41> <var.friend42> 1 0 7
button 190 135 <var.friend51> <var.friend52> 1 0 8
button 220 55 <var.friendremove1> <var.friendremove1> 1 0 13
button 220 75 <var.friendremove2> <var.friendremove2> 1 0 14
button 220 95 <var.friendremove3> <var.friendremove3> 1 0 15
button 220 115 <var.friendremove4> <var.friendremove4> 1 0 16
button 220 135 <var.friendremove5> <var.friendremove5> 1 0 17
button 190 185 0fa8 0fa9 1 0 12
button 33 185 0a9a 0a9b 1 0 9
button 33 215 0a9a 0a9b 1 0 10
button 33 245 0a9a 0a9b 1 0 11
text 70 25 0
text 190 25 0
text 300 25 0
text 55 185 1000
text 55 215 1000
text 55 245 1000
textentry 50 95 105 20 55
text 225 185 1000
text 250 55 0
text 250 75 0
text 250 95 0
text 250 115 0
text 250 135 0
[DIALOG house_menu_friends TEXT]
General
Friends
Payment
Add a friend
Add entrie guild
Remove a friend
<TAG.HOUSETYPE>
Remove all friends
<tag.friendname1>
<tag.friendname2>
<tag.friendname3>
<tag.friendname4>
<tag.friendname5>
[DIALOG house_menu_friends BUTTON]
ON=0
ON=1
DIALOG house_menu_general
ON=2
f_house_days
DIALOG house_menu_payment
ON=3
ON=4
if (<tag.friend1>=0)
src.newitem=i_friend_1
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
return 1
endif
TAG.FRIEND1=0
TAG.FRIENDNAME1=Empty
region.TAG.FRIEND1=0
region.TAG.FRIENDNAME1=Empty
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=5
if (<tag.friend2>=0)
src.newitem=i_friend_2
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
return 1
endif
TAG.FRIEND2=0
TAG.FRIENDNAME2=Empty
region.TAG.FRIEND2=0
region.TAG.FRIENDNAME2=Empty
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=6
if (<tag.friend3>=0)
src.newitem=i_friend_3
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
return 1
endif
TAG.FRIEND3=0
TAG.FRIENDNAME3=Empty
region.TAG.FRIEND3=0
region.TAG.FRIENDNAME3=Empty
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=7
if (<tag.friend4>=0)
src.newitem=i_friend_4
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
return 1
endif
TAG.FRIEND4=0
TAG.FRIENDNAME4=Empty
region.TAG.FRIEND4=0
region.TAG.FRIENDNAME4=Empty
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=8
if (<tag.friend5>=0)
src.newitem=i_friend_5
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
return 1
endif
TAG.FRIEND5=0
TAG.FRIENDNAME5=Empty
region.TAG.FRIEND5=0
region.TAG.FRIENDNAME5=Empty
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=9
if (<tag.friend1>=0)
src.newitem=i_friend_1
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
return 1
endif
if (<tag.friend2>=0)
src.newitem=i_friend_2
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
return 1
endif
if (<tag.friend3>=0)
src.newitem=i_friend_3
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
return 1
endif
if (<tag.friend4>=0)
src.newitem=i_friend_4
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
return 1
endif
if (<tag.friend5>=0)
src.newitem=i_friend_5
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
return 1
endif
src.sysmessage You dont use this!
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=10
if (<tag.friend1>=0)
src.newitem=i_friend_guild_1
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
return 1
endif
if (<tag.friend2>=0)
src.newitem=i_friend_guild_2
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
return 1
endif
if (<tag.friend3>=0)
src.newitem=i_friend_guild_3
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
return 1
endif
if (<tag.friend4>=0)
src.newitem=i_friend_guild_4
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
return 1
endif
if (<tag.friend5>=0)
src.newitem=i_friend_guild_5
src.act.equip
src.act.timer=30
SRC.ACT.LINK=<TAG.MYSIGN>
SRC.ACT.MORE1=<TAG.MYHOUSE>
return 1
endif
src.sysmessage You dont use this!
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=11
if (<tag.friendremove1>=1)
src.sysmessage You are remove <TAG.FRIENDNAME1> from house friend list!
TAG.FRIEND1=0
TAG.FRIENDNAME1=Empty
region.TAG.FRIENDNAME1=Empty
region.TAG.FRIEND1=0
tag.friendremove0=1
tag.friendremove1=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
return 1
endif
if (<tag.friendremove2>=1)
src.sysmessage You are remove <TAG.FRIENDNAME1> from house friend list!
TAG.FRIEND1=0
TAG.FRIENDNAME1=Empty
region.TAG.FRIENDNAME1=Empty
region.TAG.FRIEND1=0
tag.friendremove0=1
tag.friendremove1=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
return 1
endif
if (<tag.friendremove3>=1)
src.sysmessage You are remove <TAG.FRIENDNAME1> from house friend list!
TAG.FRIEND1=0
TAG.FRIENDNAME1=Empty
region.TAG.FRIENDNAME1=Empty
region.TAG.FRIEND1=0
tag.friendremove0=1
tag.friendremove1=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
return 1
endif
if (<tag.friendremove4>=1)
src.sysmessage You are remove <TAG.FRIENDNAME1> from house friend list!
TAG.FRIEND1=0
TAG.FRIENDNAME1=Empty
region.TAG.FRIENDNAME1=Empty
region.TAG.FRIEND1=0
tag.friendremove0=1
tag.friendremove1=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
return 1
endif
if (<tag.friendremove5>=1)
src.sysmessage You are remove <TAG.FRIENDNAME1> from house friend list!
TAG.FRIEND1=0
TAG.FRIENDNAME1=Empty
region.TAG.FRIENDNAME1=Empty
region.TAG.FRIEND1=0
tag.friendremove0=1
tag.friendremove1=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
return 1
endif
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=12
TAG.FRIEND1=0
TAG.FRIEND2=0
TAG.FRIEND3=0
TAG.FRIEND4=0
TAG.FRIEND5=0
TAG.FRIENDNAME1=Empty
TAG.FRIENDNAME2=Empty
TAG.FRIENDNAME3=Empty
TAG.FRIENDNAME4=Empty
TAG.FRIENDNAME5=Empty
region.TAG.FRIENDNAME1=Empty
region.TAG.FRIENDNAME2=Empty
region.TAG.FRIENDNAME3=Empty
region.TAG.FRIENDNAME4=Empty
region.TAG.FRIENDNAME5=Empty
region.TAG.FRIEND1=0
region.TAG.FRIEND2=0
region.TAG.FRIEND3=0
region.TAG.FRIEND4=0
region.TAG.FRIEND5=0
src.sysmessage All friends has been removed!
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=13
tag.friendremove1=1
tag.friendremove2=0
tag.friendremove3=0
tag.friendremove4=0
tag.friendremove5=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=14
tag.friendremove1=0
tag.friendremove2=1
tag.friendremove3=0
tag.friendremove4=0
tag.friendremove5=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=15
tag.friendremove1=0
tag.friendremove2=0
tag.friendremove3=1
tag.friendremove4=0
tag.friendremove5=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=16
tag.friendremove1=0
tag.friendremove2=0
tag.friendremove3=0
tag.friendremove4=1
tag.friendremove5=0
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=17
tag.friendremove1=0
tag.friendremove2=0
tag.friendremove3=0
tag.friendremove4=0
tag.friendremove5=1
f_friendlist
f_friendremove
DIALOG house_menu_friends
[ITEMDEF i_friend_1]
ID=i_gold
NAME=Friend 1
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND1>!=0)
SRC.MESSAGE You already chose friend 1, try removing him before having a new one.
REMOVE
return 1
endif
TARGET Select a friend 1...
RETURN 1
ON=@TARGON_CHAR
if (<src.region.tag.house>!=<link.region.tag.house>)
src.sysmessage You dont use this!
remove
return 1
endif
if (<src.targ.memoryfindtype.memory_guild>!=0)
LINK.TAG.FRIEND1=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME1=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND1=<SRC.TARG.UID>
region.TAG.FRIENDNAME1=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
endif
LINK.TAG.FRIEND1=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME1=<SRC.TARG.NAME>
region.TAG.FRIEND1=<SRC.TARG.UID>
region.TAG.FRIENDNAME1=<SRC.TARG.NAME>
LINK=<MORE1>
REMOVE
return 1
[ITEMDEF i_friend_2]
ID=i_gold
NAME=Friend 2
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND2>!=0)
SRC.MESSAGE You already chose friend 2, try removing him before having a new one.
REMOVE
return 1
endif
TARGET Select a friend 2...
RETURN 1
ON=@TARGON_CHAR
if (<src.region.tag.house>!=<link.region.tag.house>)
src.sysmessage You dont use this!
remove
return 1
endif
if (<src.targ.memoryfindtype.memory_guild>!=0)
LINK.TAG.FRIEND2=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME2=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND2=<SRC.TARG.UID>
region.TAG.FRIENDNAME2=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
endif
LINK.TAG.FRIEND2=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME2=<SRC.TARG.NAME>
region.TAG.FRIEND2=<SRC.TARG.UID>
region.TAG.FRIENDNAME2=<SRC.TARG.NAME>
LINK=<MORE1>
REMOVE
return 1
[ITEMDEF i_friend_3]
ID=i_gold
NAME=Friend 3
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND3>!=0)
SRC.MESSAGE You already chose friend 3, try removing him before having a new one.
REMOVE
return 1
endif
TARGET Select a friend 3...
RETURN 1
ON=@TARGON_CHAR
if (<src.region.tag.house>!=<link.region.tag.house>)
src.sysmessage You dont use this!
remove
return 1
endif
if (<src.targ.memoryfindtype.memory_guild>!=0)
LINK.TAG.FRIEND3=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME3=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND3=<SRC.TARG.UID>
region.TAG.FRIENDNAME3=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
endif
LINK.TAG.FRIEND3=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME3=<SRC.TARG.NAME>
region.TAG.FRIEND3=<SRC.TARG.UID>
region.TAG.FRIENDNAME3=<SRC.TARG.NAME>
LINK=<MORE1>
REMOVE
return 1
[ITEMDEF i_friend_4]
ID=i_gold
NAME=Friend 4
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND4>!=0)
SRC.MESSAGE You already chose friend 4, try removing him before having a new one.
REMOVE
return 1
endif
TARGET Select a friend 4...
RETURN 1
ON=@TARGON_CHAR
if (<src.region.tag.house>!=<link.region.tag.house>)
src.sysmessage You dont use this!
remove
return 1
endif
if (<src.targ.memoryfindtype.memory_guild>!=0)
LINK.TAG.FRIEND4=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME4=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND4=<SRC.TARG.UID>
region.TAG.FRIENDNAME4=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
endif
LINK.TAG.FRIEND4=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME4=<SRC.TARG.NAME>
region.TAG.FRIEND4=<SRC.TARG.UID>
region.TAG.FRIENDNAME4=<SRC.TARG.NAME>
LINK=<MORE1>
REMOVE
return 1
[ITEMDEF i_friend_5]
ID=i_gold
NAME=Friend 5
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND5>!=0)
SRC.MESSAGE You already chose friend 5, try removing him before having a new one.
REMOVE
return 1
endif
TARGET Select a friend 5...
RETURN 1
ON=@TARGON_CHAR
if (<src.region.tag.house>!=<link.region.tag.house>)
src.sysmessage You dont use this!
remove
return 1
endif
if (<src.targ.memoryfindtype.memory_guild>!=0)
LINK.TAG.FRIEND5=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME5=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND5=<SRC.TARG.UID>
region.TAG.FRIENDNAME5=<SRC.TARG.NAME> [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
endif
LINK.TAG.FRIEND5=<SRC.TARG.UID>
LINK.TAG.FRIENDNAME5=<SRC.TARG.NAME>
region.TAG.FRIEND5=<SRC.TARG.UID>
region.TAG.FRIENDNAME5=<SRC.TARG.NAME>
LINK=<MORE1>
REMOVE
return 1
[ITEMDEF i_friend_guild_1]
ID=i_gold
NAME=Friend 1
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND1>!=0)
SRC.MESSAGE You already chose friend 1, try removing him before having a new one.
REMOVE
return 1
endif
TARGET Select a friend 1...
RETURN 1
ON=@TARGON_CHAR
if (<src.targ.memoryfindtype.memory_guild>=0)
src.sysmessage Your target no in guild!
remove
return 1
endif
if (<src.region.tag.house>=<region.tag.house>)
LINK.TAG.FRIEND1=<src.targ.memoryfindtype.memory_guild.link>
LINK.TAG.FRIENDNAME1=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND1=<src.targ.memoryfindtype.memory_guild.link>
region.TAG.FRIENDNAME1=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
endif
remove
src.sysmessage You dont use this!
return 1
[ITEMDEF i_friend_guild_2]
ID=i_gold
NAME=Friend 2
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND2>!=0)
SRC.MESSAGE You already chose friend 2, try removing him before having a new one.
REMOVE
return 1
endif
TARGET Select a friend 2...
RETURN 1
ON=@TARGON_CHAR
if (<src.targ.memoryfindtype.memory_guild>=0)
src.sysmessage Your target no in guild!
remove
return 1
endif
if (<src.region.tag.house>=<region.tag.house>)
LINK.TAG.FRIEND2=<src.targ.memoryfindtype.memory_guild.link>
LINK.TAG.FRIENDNAME2=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND2=<src.targ.memoryfindtype.memory_guild.link>
region.TAG.FRIENDNAME2=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
endif
remove
src.sysmessage You dont use this!
return 1
[ITEMDEF i_friend_guild_3]
ID=i_gold
NAME=Friend 3
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND3>!=0)
SRC.MESSAGE You already chose friend 3, try removing him before having a new one.
REMOVE
return 1
endif
TARGET Select a friend 3...
RETURN 1
ON=@TARGON_CHAR
if (<src.targ.memoryfindtype.memory_guild>=0)
src.sysmessage Your target no in guild!
remove
return 1
endif
if (<src.region.tag.house>=<region.tag.house>)
LINK.TAG.FRIEND3=<src.targ.memoryfindtype.memory_guild.link>
LINK.TAG.FRIENDNAME3=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND3=<src.targ.memoryfindtype.memory_guild.link>
region.TAG.FRIENDNAME3=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
endif
remove
src.sysmessage You dont use this!
return 1
[ITEMDEF i_friend_guild_4]
ID=i_gold
NAME=Friend 4
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND4>!=0)
SRC.MESSAGE You already chose friend 4, try removing him before having a new one.
REMOVE
return 1
endif
TARGET Select a friend 4...
RETURN 1
ON=@TARGON_CHAR
if (<src.targ.memoryfindtype.memory_guild>=0)
src.sysmessage Your target no in guild!
remove
return 1
endif
if (<src.region.tag.house>=<region.tag.house>)
LINK.TAG.FRIEND4=<src.targ.memoryfindtype.memory_guild.link>
LINK.TAG.FRIENDNAME4=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND4=<src.targ.memoryfindtype.memory_guild.link>
region.TAG.FRIENDNAME4=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
endif
remove
src.sysmessage You dont use this!
return 1
[ITEMDEF i_friend_guild_5]
ID=i_gold
NAME=Friend 5
TYPE=t_eq_script
ON=@TIMER
REMOVE
RETURN 1
ON=@equip
IF (<LINK.TAG.FRIEND5>!=0)
SRC.MESSAGE You already chose friend 5, try removing him before having a new one.
REMOVE
return 1
endif
TARGET Select a friend 5...
RETURN 1
ON=@TARGON_CHAR
if (<src.targ.memoryfindtype.memory_guild>=0)
src.sysmessage Your target no in guild!
remove
return 1
endif
if (<src.region.tag.house>=<region.tag.house>)
LINK.TAG.FRIEND5=<src.targ.memoryfindtype.memory_guild.link>
LINK.TAG.FRIENDNAME5=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
region.TAG.FRIEND5=<src.targ.memoryfindtype.memory_guild.link>
region.TAG.FRIENDNAME5=Guild [<SRC.TARG.memoryfindtype.memory_guild.NAME>]
LINK=<MORE1>
REMOVE
return 1
endif
remove
src.sysmessage You dont use this!
return 1
[DIALOG house_menu_payment]
150,150
resizepic 0 0 2600 410 310
resizepic 35 20 5100 330 30
resizepic 33 165 5100 330 10
resizepic 300 65 3000 90 20
gumppic 33 55 100
button 305 270 0f7 0f8 1 0 0
gumppic 270 20 0869
button 40 20 0867 0868 1 0 1
button 160 20 0867 0868 1 0 2
button 33 185 0a9a 0a9b 1 0 3
text 70 25 0
text 190 25 0
text 300 25 0
text 190 65 1000
text 190 85 1000
text 190 105 1000
text 190 135 1000
text 55 185 1000
text 305 65 0
text 305 85 0
text 305 105 0
text 305 135 0
textentry 50 95 105 20 55
[DIALOG house_menu_payment TEXT]
General
Friends
Payment
House balance:
Cost per day:
Days paid:
Status:
Add gold
<eval <tag.balance>>
<eval <tag.days>>
<eval <tag.day_pay>>
active
<TAG.HOUSETYPE>
[DIALOG house_menu_payment BUTTON]
ON=0
ON=1
DIALOG house_menu_general
ON=2
f_friendlist
f_friendremove
DIALOG house_menu_friends
ON=3
src.newitem=i_gold_coster
src.ACT.LINK=<uid>
src.act.equip
[DIALOG house_menu_general_friend]
150,150
resizepic 0 0 2600 410 200
resizepic 35 20 5100 330 30
gumppic 33 55 100
button 305 160 0f7 0f8 1 0 0
gumppic 40 20 0869
button 160 20 0867 0868 1 0 1
button 270 20 0867 0868 1 0 2
text 70 25 0
text 190 25 0
text 300 25 0
text 190 65 1000
text 190 85 1000
text 190 105 1000
text 295 65 0
text 295 85 0
text 295 105 0
textentry 50 95 105 20 55
[DIALOG house_menu_general_friend TEXT]
General
Friends
Payment
Owned by:
Locked items:
House type:
<tag.ownername>
0/100
Regular
<TAG.HOUSETYPE>
[DIALOG house_menu_general_friend BUTTON]
ON=0
ON=1
DIALOG house_menu_friends_friend
ON=2
f_house_days
DIALOG house_menu_payment_friend
[DIALOG house_menu_friends_friend]
150,150
resizepic 0 0 2600 410 200
resizepic 35 20 5100 330 30
gumppic 33 55 100
button 305 160 0f7 0f8 1 0 0
gumppic 160 20 0869
button 40 20 0867 0868 1 0 1
button 270 20 0867 0868 1 0 2
text 70 25 0
text 190 25 0
text 300 25 0
textentry 50 95 105 20 55
text 190 55 0
text 190 75 0
text 190 95 0
text 190 115 0
text 190 135 0
[DIALOG house_menu_friends_friend TEXT]
General
Friends
Payment
<TAG.HOUSETYPE>
<tag.friendname1>
<tag.friendname2>
<tag.friendname3>
<tag.friendname4>
<tag.friendname5>
[DIALOG house_menu_friends_friend BUTTON]
ON=0
ON=1
DIALOG house_menu_general_friend
ON=2
f_house_days
DIALOG house_menu_payment_friend
[DIALOG house_menu_payment_friend]
150,150
resizepic 0 0 2600 410 200
resizepic 35 20 5100 330 30
resizepic 300 65 3000 90 20
gumppic 33 55 100
button 305 160 0f7 0f8 1 0 0
gumppic 270 20 0869
button 40 20 0867 0868 1 0 1
button 160 20 0867 0868 1 0 2
button 190 135 0a9a 0a9b 1 0 3
text 70 25 0
text 190 25 0
text 300 25 0
text 190 65 1000
text 190 85 1000
text 190 105 1000
text 220 135 1000
text 305 65 0
text 305 85 0
text 305 105 0
textentry 50 95 105 20 55
[DIALOG house_menu_payment_friend TEXT]
General
Friends
Payment
House balance:
Cost per day:
Days paid:
Add gold
<eval <tag.balance>>
<eval <tag.days>>
<eval <tag.day_pay>>
<TAG.HOUSETYPE>
[DIALOG house_menu_payment_friend BUTTON]
ON=0
ON=1
DIALOG house_menu_general_friend
ON=2
DIALOG house_menu_friends_friend
ON=3
src.newitem=i_gold_coster
src.ACT.LINK=<uid>
src.act.equip
[itemdef i_gold_coster]
id=i_gold
type=t_eq_script
name=Golden Coster
on=@equip
TARGET Select a money to pay on this house...
timer=30
return 1
on=@targon_item
if (<src.targ.type>=t_gold)
link.tag.balance=(<link.tag.balance>+<src.targ.amount>)
src.targ.remove
remove
src.sysmessage You pay <eval <src.targ.amount>> gold coins.
return 1
endif
if (<src.targ.baseid>=i_plate_ingot)
var.balance=<src.targ.amount>*25000
link.tag.balance=<eval (<link.tag.balance>+<var.balance>)>
src.targ.remove
remove
src.sysmessage You pay <eval <var.balance>> gold coins.
return 1
endif
remove
RETURN 1
on=@timer
remove
return 1
[ITEMDEF 0bd1]
DEFNAME=i_sign_brass
TYPE=t_eq_script
CATEGORY=Decoration - Signs
SUBSECTION=Blank
DESCRIPTION=Brass Blank
DUPELIST=0bd2
ON=@CREATE
ATTR=010
ON=@DCLICK
IF !(<LINK>=04FFFFFFF)
IF (<MORE2>=0)
f_house_pay
tag.day_pay=<var.pay>
f_house_balance
tag.balance=<var.balance>
tag.days=30
TAG.MYHOUSE=<LINK>
TAG.MYSIGN=<UID>
TAG.NAME=<NAME>
TAG.HOUSETYPE=<LINK.NAME>
MORE2=<SRC.UID>
TIMER=24*60*60
tag.destroy=0
tag.friendremove1=1
tag.friendremove2=0
tag.friendremove3=0
tag.friendremove4=0
tag.friendremove5=0
tag.owner=<src.uid>
tag.ownername=<src.name>
tag.friend1=0
tag.friend2=0
tag.friend3=0
tag.friend4=0
tag.friend5=0
tag.friendname1=Empty
tag.friendname2=Empty
tag.friendname3=Empty
tag.friendname4=Empty
tag.friendname5=Empty
region.tag.house=<LINK>
REGION.EVENTS=+r_house_control
region.tag.sosh=1
region.tag.owner=<src.uid>
region.tag.FRIEND1=0
region.tag.FRIEND2=0
region.tag.FRIEND3=0
region.tag.FRIEND4=0
region.tag.FRIEND5=0
region.tag.key=<LINK>
LINK.TAG.OWNER=<SRC.UID>
DIALOG HOUSE_MENU_general
RETURN 1
endif
endif
if (0<tag.owner>=<src.uid>)
DIALOG HOUSE_MENU_general
RETURN 1
endif
if <src.memoryfindtype.memory_guild.link>
if ((0<tag.friend1>=<src.uid>) || (<src.memoryfindtype.memory_guild.link>=<tag.FRIEND1>)) || ((0<tag.friend2>=<src.uid>) || (<src.memoryfindtype.memory_guild.link>=<tag.FRIEND2>)) || ((0<tag.friend3>=<src.uid>) || (<src.memoryfindtype.memory_guild.link>=<tag.FRIEND3>)) || ((0<tag.friend4>=<src.uid>) || (<src.memoryfindtype.memory_guild.link>=<tag.FRIEND4>)) || ((0<tag.friend5>=<src.uid>) || (<src.memoryfindtype.memory_guild.link>=<tag.FRIEND5>))
DIALOG HOUSE_MENU_general_friend
RETURN 1
endif
endif
if (0<tag.friend1>=<src.uid>) || (0<tag.friend2>=<src.uid>) || (0<tag.friend3>=<src.uid>)|| (0<tag.friend4>=<src.uid>) || (0<tag.friend5>=<src.uid>)
DIALOG HOUSE_MENU_general_friend
RETURN 1
endif
DIALOG house_menu_guest
RETURN 1
on=@timer
if (0<tag.balance>><tag.day_pay>) || (0<tag.balance>=<tag.day_pay>)
timer=24*60*60
color=0
tag.balance=<tag.balance>-<tag.day_pay>
tag.destroy=0
return 1
endif
if (0<tag.balance><<tag.day_pay>) && (0<tag.destroy>=0)
timer=12*60*60
color=021
tag.balance=0
tag.destroy=1
return 1
endif
if (0<tag.balance><<tag.day_pay>) && (0<tag.destroy>=1)
link.remove
return 1
endif
link.remove
return 1
[function f_house_balance]
var.balance=<var.pay>*30
[function f_house_days]
tag.days=<tag.balance>/<tag.day_pay>
[function f_house_pay]
if (<link.baseid>=i_multi_house_stone_plaster_small) || (<link.baseid>=i_multi_house_stone_small) || (<link.baseid>=i_multi_house_stone_brick_small) || (<link.baseid>=i_multi_house_stone_wood_small) || (<link.baseid>=i_multi_house_wood_plaster_small) || (<link.baseid>=i_multi_house_wood_thatched_small) || (<link.baseid>=i_multi_shop_stone_small) || (<link.baseid>=i_multi_shop_marble_small)
var.pay=<eval house1>
else
if (<link.baseid>=i_multi_house_3room) || (<link.baseid>=i_multi_house_wood_plaster_2story) || (<link.baseid>=i_multi_house_stone_plaster_2story) || (<link.baseid>=i_multi_shop_blacksmithy_large_2) || (<link.baseid>=i_multi_shop_blacksmithy_large) || (<link.baseid>=i_multi_house_patio_marble) || (<link.baseid>=i_multi_villa_2story) || (<link.baseid>=i_multi_house_patio_sand) || (<link.baseid>=i_multi_cabin_log_2story)
var.pay=<eval house2>
else
if (<link.baseid>=i_multi_tower) || (<link.baseid>=i_multi_keep) || (<link.baseid>=i_multi_castle) || (<link.baseid>=i_multi_tower_wizard)
var.pay=<eval house3>
endif
endif
endif
[REGIONTYPE r_house_control]
ON=@step
src.f_house_detect_friends
return 1
[function f_house_detect_friends]
if (<src.npc>!=0)
f_house_attacked
return 1
endif
if (<region.tag.sosh>=0)
return 1
endif
if (<region.tag.sosh>=1) && (<src.uid>=<region.tag.owner>)
return 1
endif
if (<region.tag.sosh>=2) && (<src.findtype.t_key>)
if (<src.findtype.t_key.link>=<region.tag.key>)
return 1
endif
f_house_attacked
endif
if (<region.tag.sosh>=3) && ((<src.uid>=<region.tag.owner>) || ((<src.uid>=<region.tag.FRIEND1>) || (<src.memoryfindtype.memory_guild.link>=<region.tag.FRIEND1>)) || ((<src.uid>=<region.tag.FRIEND2>) || (<src.memoryfindtype.memory_guild.link>=<region.tag.FRIEND2>)) || ((<src.uid>=<region.tag.FRIEND3>) || (<src.memoryfindtype.memory_guild.link>=<region.tag.FRIEND3>)) || ((<src.uid>=<region.tag.FRIEND4>) || (<src.memoryfindtype.memory_guild.link>=<region.tag.FRIEND4>)) || ((<src.uid>=<region.tag.FRIEND5>) || (<src.memoryfindtype.memory_guild.link>=<region.tag.FRIEND5>)))
return 1
endif
f_house_attacked
[function f_house_attacked]
if (<src.dir>=0)
src.p=<eval <src.p.x>>,<eval <src.p.y>+1>,<eval <src.p.z>>
src.update
endif
if (<src.dir>=1)
src.p=<eval <src.p.x>-1>,<eval <src.p.y>+1>,<eval <src.p.z>>
src.update
endif
if (<src.dir>=2)
src.p=<eval <src.p.x>-1>,<eval <src.p.y>>,<eval <src.p.z>>
src.update
endif
if (<src.dir>=3)
src.p=<eval <src.p.x>-1>,<eval <src.p.y>-1>,<eval <src.p.z>>
src.update
endif
if (<src.dir>=4)
src.p=<eval <src.p.x>>,<eval <src.p.y>-1>,<eval <src.p.z>>
src.update
endif
if (<src.dir>=5)
src.p=<eval <src.p.x>+1>,<eval <src.p.y>-1>,<eval <src.p.z>>
src.update
endif
if (<src.dir>=6)
src.p=<eval <src.p.x>+1>,<eval <src.p.y>>,<eval <src.p.z>>
src.update
endif
if (<src.dir>=7)
src.p=<eval <src.p.x>+1>,<eval <src.p.y>+1>,<eval <src.p.z>>
src.update
endif
[EOF]
-----------------------------------------------------------------------------------------------------------------------------
analyse_scripts.exe
====================================================================
Home_menu_DRW.scp
----------------------------
348: ON=@TARGON_ITEM
-------------
382: IF: to much ENDIF's (-1)
люди помогите он ваше не запускается но ошибку при загрузке не пишет
кто может плиз помогите периделать его на 55i
ImProV1zator
6.11.2010, 0:48
при смене ентер тайпа ничего не меняется, любой прохожий может зайти
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста,
нажмите сюда.
