//Modified by Rudenid

//**Script built by Amlaruil, aka GM Dalzhim**//
//**Hoping anyone who makes use of this script gives credit to it's real author**//

//First of all, I want to say thanks to Trunks for hosting this website :)

//To use this script, all you have to do, is to put this file inside your script folder.
//Make sure you do not have another housemenu system in your scripts at the same moment..
//I have no idea oh what could happend if you did so ;)
//I recommend a complete restart of the server before using this.
//All you have to do to get this menu working, is to dclick the house sign from now on!

//Please do not remove this header..

//Enjoy!

[DIALOG new_sign]
0,0
gumppic 100 110 100
text 115 150 955 0 // first line is line 0 !!!!!!!!

[DIALOG new_sign text]
<NAME>

[DIALOG statichouse_menu]
0,0
resizepic 0 0 2600 500 400
gumppic 175 20 100
text 190 60 955 0
text 20 40 955 1
text 20 60 955 2
text 20 80 955 3
text 20 100 955 4
text 100 120 955 5
text 220 120 955 6
text 100 360 955 7
text 50 160 955 8
text 50 180 955 9
text 50 200 955 10
text 50 220 955 11
text 50 240 955 12
text 50 260 955 13
text 50 280 955 14
button 250 360 210 211 1 0 1
button 30 165 2104 2103 1 0 2
button 30 185 2104 2103 1 0 3
button 30 205 2104 2103 1 0 4
button 30 225 2104 2103 1 0 5
button 30 245 2104 2103 1 0 6
button 30 265 2104 2103 1 0 7
button 30 285 2104 2103 1 0 8

[DIALOG statichouse_menu TEXT]
<NAME>
Owner:
<TAG.OWNERNAME>
Co-Owner:
<TAG.COOWNERNAME>
Approval Status:
//<EVAL (<TIMER>/(24*60*60))>
<TAG.APPROVED>
Approve this house
Change house name
Remove house crystals from your pack
Transfer house ownership
Place a secure chest
Remove a secure chest
Co-Owner and Friends options
Change house sign

[DIALOG statichouse_menu BUTTON]

ON=1

IF (<SRC.ACCOUNT.PLEVEL> > 4)
TAG.APPROVED=Approved
TAG.APPROVAL=1
TIMER=-1
SRC.MESSAGE This house has been approved
DIALOG STATICHOUSE_MENU
ELSE
SRC.SYSMESSAGE Only a Priv 5 or higher GM can approve a house. Please page to get it approved.
DIALOG STATICHOUSE_MENU
ENDIF

ON=2

IF (<SRC.UID>==<SRC.TAG.OWNER>) || (<SRC.ISGM>)
//SRC.NEWITEM=i_housename
//SRC.ACT.BOUNCE
//SRC.ACT.ATTR=010
//SRC.ACT.LINK=<SRC.TAG.MYHOUSE>
//SRC.TAG.HOUSENAME=
//SRC.ACT.TRIGGER=@DCLICK
DIALOG d_house_rename
ELSE
SRC.MESSAGE Only the owner can choose of his house name.
ENDIF

ON=3

SRC.FINDLAYER(layer_pack).FINDID(i_housename).REMOVE
SRC.FINDLAYER(layer_pack).FINDID(i_newowner).REMOVE
SRC.FINDLAYER(layer_pack).FINDID(i_ejecthouse).REMOVE
SRC.FINDLAYER(layer_pack).FINDID(i_place_securechest).REMOVE
SRC.FINDLAYER(layer_pack).FINDID(i_remove_securechest).REMOVE
SRC.FINDLAYER(layer_pack).FINDID(i_house_co_owner).REMOVE
SRC.FINDLAYER(layer_pack).FINDID(i_removecoowner).REMOVE
SRC.FINDLAYER(layer_pack).FINDID(i_friend1).REMOVE
SRC.FINDLAYER(layer_pack).FINDID(i_removefriend1).REMOVE
SRC.FINDLAYER(layer_pack).FINDID(i_friend2).REMOVE
SRC.FINDLAYER(layer_pack).FINDID(i_removefriend2).REMOVE
SRC.FINDLAYER(layer_pack).FINDID(i_friend3).REMOVE
SRC.FINDLAYER(layer_pack).FINDID(i_removefriend3).REMOVE
SRC.FINDLAYER(layer_pack).FINDID(i_friend4).REMOVE
SRC.FINDLAYER(layer_pack).FINDID(i_removefriend4).REMOVE
SRC.FINDLAYER(layer_pack).FINDID(i_friend5).REMOVE
SRC.FINDLAYER(layer_pack).FINDID(i_removefriend5).REMOVE

ON=4
IF (<SRC.UID>==<SRC.TAG.OWNER>) || (<SRC.ISGM>)
SRC.NEWITEM=i_newowner
SRC.ACT.BOUNCE
SRC.ACT.ATTR=010
SRC.ACT.LINK=<SRC.TAG.MYSIGN>
SRC.ACT.MORE1=<SRC.TAG.MYHOUSE>
SRC.ACT.TRIGGER=@DCLICK
ELSE
SRC.MESSAGE Only the owner can transfer his house.
ENDIF

ON=5
SRC.SYSMESSAGE Secure chests do not work with static houses yet. They either will soon, or will be removed from the menu.
RETURN 1

IF (<SRC.UID>==<SRC.TAG.OWNER>) || ((<SRC.UID>==<SRC.TAG.COOWNER>) || (<SRC.ISGM>)
SRC.NEWITEM=i_place_securechest
SRC.ACT.BOUNCE
SRC.ACT.ATTR=010
SRC.ACT.MORE1=<SRC.TAG.MYHOUSE>
SRC.ACT.LINK=<SRC.TAG.MYSIGN>
ELSE
SRC.MESSAGE Only the owner and the co-owner can place secure chests.
ENDIF

ON=6
SRC.SYSMESSAGE Secure chests do not work with static houses yet. They either will soon, or will be removed from the menu.
RETURN 1

IF (<SRC.UID>==<SRC.TAG.OWNER>) || ((<SRC.UID>==<SRC.TAG.COOWNER>) || (<SRC.ISGM>)
SRC.NEWITEM=i_remove_securechest
SRC.ACT.BOUNCE
SRC.ACT.ATTR=010
SRC.ACT.LINK=<SRC.TAG.MYSIGN>
SRC.ACT.TRIGGER=@DCLICK
ELSE
SRC.MESSAGE Only the owner and the co-owner can remove secure chests.
ENDIF

ON=7
IF (<SRC.UID>==<SRC.TAG.OWNER>) || (<SRC.ISGM>)
DIALOG HOUSE_MENU_2
ELSE
SRC.MESSAGE Only the owner can choose his co-owner and his friends.
ENDIF

ON=8
IF (<SRC.UID>==<SRC.TAG.OWNER>) || (<SRC.ISGM>)
DIALOG HOUSE_MENU_SIGN_1
ELSE
SRC.MESSAGE Only the owner can choose his sign.
ENDIF

[DIALOG house_menu]
0,0
resizepic 0 0 2600 500 400
gumppic 175 20 100
text 190 60 955 0
text 20 40 955 1
text 20 60 955 2
text 20 80 955 3
text 20 100 955 4
text 100 120 955 5
text 220 120 955 6
text 50 160 955 8
button 30 165 2104 2103 1 0 2
text 50 180 955 9
button 30 185 2104 2103 1 0 3
text 50 200 955 10
button 30 205 2104 2103 1 0 4
text 50 220 955 11
button 30 225 2104 2103 1 0 5
text 50 240 955 12
button 30 245 2104 2103 1 0 6
text 50 260 955 13
button 30 265 2104 2103 1 0 7
text 50 280 955 14
button 30 285 2104 2103 1 0 8
text 50 300 955 15
button 30 305 2104 2103 1 0 9
text 50 320 955 16
button 30 325 2104 2103 1 0 10
text 50 340 955 17
button 30 345 2104 2103 1 0 11
text 100 360 955 7
button 250 360 210 211 1 0 1

[DIALOG house_menu TEXT]
<NAME>
Owner:
<TAG.OWNERNAME>
Co-Owner:
<TAG.COOWNERNAME>
Approval Status:
//<EVAL (<TIMER>/(24*60*60))>
<TAG.APPROVED>
Approve this house
Create a newbified key
Change locks / Create special key
Change house name
Remove house crystals from your pack
Transfer house ownership
Place a secure chest
Remove a secure chest
Co-Owner and Friends options
Re-Deed
//Days
Change house sign

[DIALOG house_menu BUTTON]
ON=1

IF (<SRC.ACCOUNT.PLEVEL> > 4)
TAG.APPROVED=Approved
TAG.APPROVAL=1
TIMER=-1
SRC.MESSAGE This house has been approved

IF (<LINK.TYPE> == t_door)
DIALOG STATICHOUSE_MENU
ELSEIF (<LINK.TYPE> == t_door_locked)
DIALOG STATICHOUSE_MENU
ELSE
DIALOG HOUSE_MENU
ENDIF

ELSE
SRC.SYSMESSAGE Only a Priv 5 or higher GM can approve a house. Please page to get it approved.

IF (<LINK.TYPE> == t_door)
DIALOG STATICHOUSE_MENU
ELSEIF (<LINK.TYPE> == t_door_locked)
DIALOG STATICHOUSE_MENU
ELSE
DIALOG HOUSE_MENU
ENDIF

ENDIF

//IF (<SRC.UID>==<SRC.TAG.OWNER>) || ((<SRC.UID>==<SRC.TAG.COOWNER>) || (<SRC.NAME>==<SRC.TAG.FRIEND1NAME>) || (<SRC.NAME>==<SRC.TAG.FRIEND2NAME>) || (<SRC.NAME>==<SRC.TAG.FRIEND3NAME>) || (<SRC.NAME>==<SRC.TAG.FRIEND4NAME>) || (<SRC.NAME>==<SRC.TAG.FRIEND5NAME>) || (<SRC.ISGM>)
//TIMER=<EVAL ((30*24*60*60)+60)>
//DIALOG HOUSE_MENU
//ELSE
//SRC.MESSAGE This is not your house!
//ENDIF

ON=2
IF (<SRC.UID>==<SRC.TAG.OWNER>) || ((<SRC.UID>==<SRC.TAG.COOWNER>) || (<SRC.ISGM>)
SRC.NEWITEM=i_key_todoor
src.ACT.BOUNCE
SRC.ACT.ATTR=06
SRC.ACT.LINK=<SRC.TAG.MYHOUSE>
SRC.ACT.TRIGGER=@DCLICK
ELSE
SRC.MESSAGE Only the owner and the co-owner can create new keys.
ENDIF

ON=3
IF (<SRC.UID>==<SRC.TAG.OWNER>) || (<SRC.ISGM>)
SRC.NEWITEM=i_selectdoor
src.ACT.BOUNCE
SRC.ACT.ATTR=06
src.ACT.LINK=<SRC.TAG.MYHOUSE>
SRC.ACT.TRIGGER=@DCLICK
ELSE
SRC.MESSAGE Only the owner can change house locks or create special keys.
ENDIF

ON=4
IF (<SRC.UID>==<SRC.TAG.OWNER>) || (<SRC.ISGM>)
//SRC.NEWITEM=i_housename
//SRC.ACT.BOUNCE
//SRC.ACT.ATTR=010
//SRC.ACT.LINK=<SRC.TAG.MYHOUSE>
//SRC.TAG.HOUSENAME=
//SRC.ACT.TRIGGER=@DCLICK
DIALOG d_house_rename
ELSE
SRC.MESSAGE Only the owner can choose of his house name.
ENDIF

ON=5
SRC.FINDLAYER(layer_pack).FINDID(i_housename).REMOVE
SRC.FINDLAYER(layer_pack).FINDID(i_newowner).REMOVE
SRC.FINDLAYER(layer_pack).FINDID(i_ejecthouse).REMOVE
SRC.FINDLAYER(layer_pack).FINDID(i_place_securechest).REMOVE
SRC.FINDLAYER(layer_pack).FINDID(i_remove_securechest).REMOVE
SRC.FINDLAYER(layer_pack).FINDID(i_house_co_owner).REMOVE
SRC.FINDLAYER(layer_pack).FINDID(i_removecoowner).REMOVE
SRC.FINDLAYER(layer_pack).FINDID(i_friend1).REMOVE
SRC.FINDLAYER(layer_pack).FINDID(i_removefriend1).REMOVE
SRC.FINDLAYER(layer_pack).FINDID(i_friend2).REMOVE
SRC.FINDLAYER(layer_pack).FINDID(i_removefriend2).REMOVE
SRC.FINDLAYER(layer_pack).FINDID(i_friend3).REMOVE
SRC.FINDLAYER(layer_pack).FINDID(i_removefriend3).REMOVE
SRC.FINDLAYER(layer_pack).FINDID(i_friend4).REMOVE
SRC.FINDLAYER(layer_pack).FINDID(i_removefriend4).REMOVE
SRC.FINDLAYER(layer_pack).FINDID(i_friend5).REMOVE
SRC.FINDLAYER(layer_pack).FINDID(i_removefriend5).REMOVE

ON=6
IF (<SRC.UID>==<SRC.TAG.OWNER>) || (<SRC.ISGM>)
SRC.NEWITEM=i_newowner
SRC.ACT.BOUNCE
SRC.ACT.ATTR=010
SRC.ACT.LINK=<SRC.TAG.MYSIGN>
SRC.ACT.MORE1=<SRC.TAG.MYHOUSE>
SRC.ACT.TRIGGER=@DCLICK
ELSE
SRC.MESSAGE Only the owner can transfer his house.
ENDIF

ON=7
IF (<SRC.UID>==<SRC.TAG.OWNER>) || ((<SRC.UID>==<SRC.TAG.COOWNER>) || (<SRC.ISGM>)
SRC.NEWITEM=i_place_securechest
SRC.ACT.BOUNCE
SRC.ACT.ATTR=010
SRC.ACT.MORE1=<SRC.TAG.MYHOUSE>
SRC.ACT.LINK=<SRC.TAG.MYSIGN>
ELSE
SRC.MESSAGE Only the owner and the co-owner can place secure chests.
ENDIF

ON=8
IF (<SRC.UID>==<SRC.TAG.OWNER>) || ((<SRC.UID>==<SRC.TAG.COOWNER>) || (<SRC.ISGM>)
SRC.NEWITEM=i_remove_securechest
SRC.ACT.BOUNCE
SRC.ACT.ATTR=010
SRC.ACT.LINK=<SRC.TAG.MYSIGN>
SRC.ACT.TRIGGER=@DCLICK
ELSE
SRC.MESSAGE Only the owner and the co-owner can remove secure chests.
ENDIF

ON=9
IF (<SRC.UID>==<SRC.TAG.OWNER>) || (<SRC.ISGM>)
DIALOG HOUSE_MENU_2
ELSE
SRC.MESSAGE Only the owner can choose his co-owner and his friends.
ENDIF

ON=10
IF (<SRC.UID>==<SRC.TAG.OWNER>) || (<SRC.ISGM>)
VAR.TOTALGOLD=<SRC.findlayer(layer_bankbox).rescount i_gold>+<SRC.findlayer(layer_pack).rescount i_gold>

//if (<var.totalgold><5000)
//SRC.MESSAGE You do not have enough gold to re-deed your house.
//return 1
//else
//SRC.consumebank 5000 i_gold

IF ((<EVAL <TAG.APPROVAL>> == 0)&&(<TIMER> < 1728000))
SRC.SYSMESSAGE You cannot redeed an unapproved house with <20 days left on it.
RETURN 1
ENDIF

SRC.NEWITEM=i_deed
SRC.ACT.MORE=<LINK.BASEID>
SRC.ACT.NAME=a deed to a <LINK.NAME>
SRC.ACT.BOUNCE
//SRC.NEWITEM=i_redeed
//SRC.ACT.LINK=<UID>
//SRC.ACT.BOUNCE
//SRC.ACT.TRIGGER=@DCLICK
LINK.REMOVE
//ENDIF
ELSE
SRC.MESSAGE Only the owner can re-deed his house.
ENDIF

ON=11
IF (<SRC.UID>==<SRC.TAG.OWNER>) || (<SRC.ISGM>)
DIALOG HOUSE_MENU_SIGN_1
ELSE
SRC.MESSAGE Only the owner can choose his sign.
ENDIF

[DIALOG house_menu_2]
0,0
resizepic 0 0 2600 500 400
gumppic 175 20 100
text 190 60 955 0
text 20 40 955 1
text 20 60 955 2
text 20 80 955 3
text 20 100 955 4
text 150 120 955 5
text 290 120 955 6
text 50 160 955 8
button 30 165 2104 2103 1 0 2
text 310 160 955 9
button 460 165 2104 2103 1 0 3
text 50 180 955 10
button 30 185 2104 2103 1 0 4
text 320 180 955 15
button 460 185 2104 2103 1 0 5
text 50 200 955 11
button 30 205 2104 2103 1 0 6
text 315 200 955 16
button 460 205 2104 2103 1 0 7
text 50 220 955 12
button 30 225 2104 2103 1 0 8
text 315 220 955 17
button 460 223 2104 2103 1 0 9
text 50 240 955 13
button 30 245 2104 2103 1 0 10
text 315 240 955 18
button 460 245 2104 2103 1 0 11
text 50 260 955 14
button 30 265 2104 2103 1 0 12
text 315 260 955 19
button 460 265 2104 2103 1 0 13
text 185 280 955 20
button 165 285 2104 2103 1 0 14
text 210 300 955 21
button 190 305 2104 2103 1 0 15
text 100 360 955 7
button 250 360 210 211 1 0 1

[DIALOG house_menu_2 TEXT]
<NAME>
Owner:
<TAG.OWNERNAME>
Co-Owner:
<TAG.COOWNERNAME>
Time before decay:     Days
//<EVAL (<TIMER>/(24*60*60))>
N/A
Approve this house
Add a co-owner
Remove the co-owner
Choose Friend #1!
Choose Friend #2!
Choose Friend #3!
Choose Friend #4!
Choose Friend #5!
Remove Friend #1!
Remove Friend #2!
Remove Friend #3!
Remove Friend #4!
Remove Friend #5!
See current Friends
Main Menu

[DIALOG house_menu_2 BUTTON]
ON=1

IF (<SRC.ACCOUNT.PLEVEL> > 4)
TAG.APPROVED=Approved
TAG.APPROVAL=1
TIMER=-1
SRC.MESSAGE This house has been approved
DIALOG HOUSE_MENU_2
ELSE
SRC.SYSMESSAGE Only a Priv 5 or higher GM can approve a house. Please page to get it approved.
DIALOG HOUSE_MENU_2
ENDIF


//TIMER=<EVAL ((30*24*60*60)+60)>
//DIALOG HOUSE_MENU_2

ON=2
IF (<SRC.UID>==<SRC.TAG.OWNER>) || (<SRC.ISGM>)
SRC.NEWITEM=i_house_co_owner
SRC.ACT.BOUNCE
SRC.ACT.ATTR=010
SRC.ACT.LINK=<SRC.TAG.MYSIGN>
SRC.ACT.MORE1=<SRC.TAG.MYHOUSE>
SRC.ACT.TRIGGER=@DCLICK
ELSE
SRC.MESSAGE Only the owner can change his co-owner.
ENDIF

ON=3
SRC.NEWITEM=i_removecoowner
SRC.ACT.P=<SRC.P>
SRC.ACT.ATTR=010
SRC.ACT.LINK=<SRC.TAG.MYSIGN>
SRC.ACT.MORE1=<SRC.TAG.MYHOUSE>
SRC.ACT.TRIGGER=@DCLICK

ON=4
SRC.NEWITEM=i_friend1
SRC.ACT.BOUNCE
SRC.ACT.ATTR=010
SRC.ACT.LINK=<SRC.TAG.MYSIGN>
SRC.ACT.MORE1=<SRC.TAG.MYHOUSE>
SRC.ACT.TRIGGER=@DCLICK

ON=5
SRC.NEWITEM=i_removefriend1
SRC.ACT.P=<SRC.P>
SRC.ACT.ATTR=010
SRC.ACT.LINK=<SRC.TAG.MYSIGN>
SRC.ACT.MORE1=<SRC.TAG.MYHOUSE>
SRC.ACT.TRIGGER=@DCLICK

ON=6
SRC.NEWITEM=i_friend2
SRC.ACT.BOUNCE
SRC.ACT.ATTR=010
SRC.ACT.LINK=<SRC.TAG.MYSIGN>
SRC.ACT.MORE1=<SRC.TAG.MYHOUSE>
SRC.ACT.TRIGGER=@DCLICK

ON=7
SRC.NEWITEM=i_removefriend2
SRC.ACT.P=<SRC.P>
SRC.ACT.ATTR=010
SRC.ACT.LINK=<SRC.TAG.MYSIGN>
SRC.ACT.MORE1=<SRC.TAG.MYHOUSE>
SRC.ACT.TRIGGER=@DCLICK

ON=8
SRC.NEWITEM=i_friend3
SRC.ACT.BOUNCE
SRC.ACT.ATTR=010
SRC.ACT.LINK=<SRC.TAG.MYSIGN>
SRC.ACT.MORE1=<SRC.TAG.MYHOUSE>
SRC.ACT.TRIGGER=@DCLICK

ON=9
SRC.NEWITEM=i_removefriend3
SRC.ACT.P=<SRC.P>
SRC.ACT.ATTR=010
SRC.ACT.LINK=<SRC.TAG.MYSIGN>
SRC.ACT.MORE1=<SRC.TAG.MYHOUSE>
SRC.ACT.TRIGGER=@DCLICK

ON=10
SRC.NEWITEM=i_friend4
SRC.ACT.BOUNCE
SRC.ACT.ATTR=010
SRC.ACT.LINK=<SRC.TAG.MYSIGN>
SRC.ACT.MORE1=<SRC.TAG.MYHOUSE>
SRC.ACT.TRIGGER=@DCLICK

ON=11
SRC.NEWITEM=i_removefriend4
SRC.ACT.P=<SRC.P>
SRC.ACT.ATTR=010
SRC.ACT.LINK=<SRC.TAG.MYSIGN>
SRC.ACT.MORE1=<SRC.TAG.MYHOUSE>
SRC.ACT.TRIGGER=@DCLICK

ON=12
SRC.NEWITEM=i_friend5
SRC.ACT.BOUNCE
SRC.ACT.ATTR=010
SRC.ACT.LINK=<SRC.TAG.MYSIGN>
SRC.ACT.MORE1=<SRC.TAG.MYHOUSE>
SRC.ACT.TRIGGER=@DCLICK

ON=13
SRC.NEWITEM=i_removefriend5
SRC.ACT.P=<SRC.P>
SRC.ACT.ATTR=010
SRC.ACT.LINK=<SRC.TAG.MYSIGN>
SRC.ACT.MORE1=<SRC.TAG.MYHOUSE>
SRC.ACT.TRIGGER=@DCLICK

ON=14
DIALOG HOUSE_MENU_3

ON=15
IF (<LINK.TYPE> == t_door)
DIALOG STATICHOUSE_MENU
ELSEIF (<LINK.TYPE> == t_door_locked)
DIALOG STATICHOUSE_MENU
ELSE
DIALOG HOUSE_MENU
ENDIF

[DIALOG house_menu_3]
0,0
resizepic 0 0 2600 500 400
gumppic 175 20 100
text 190 60 955 0
text 20 40 955 1
text 20 60 955 2
text 20 80 955 3
text 20 100 955 4
text 150 120 955 5
text 290 120 955 6
text 20 160 955 8
text 80 160 955 9
text 20 180 955 10
text 80 180 955 11
text 20 200 955 12
text 80 200 955 13
text 20 220 955 14
text 80 220 955 15
text 20 240 955 16
text 80 240 955 17
text 210 260 955 18
button 190 265 2104 2103 1 0 2
text 100 360 955 7
button 250 360 210 211 1 0 1

[DIALOG house_menu_3 TEXT]
<NAME>
Owner:
<TAG.OWNERNAME>
Co-Owner:
<TAG.COOWNERNAME>
Time before decay:     Days
//<EVAL (<TIMER>/(24*60*60))>
N/A
Approve this house
Friend1:
<SRC.TAG.FRIEND1NAME>
Friend2:
<SRC.TAG.FRIEND2NAME>
Friend3:
<SRC.TAG.FRIEND3NAME>
Friend4:
<SRC.TAG.FRIEND4NAME>
Friend5:
<SRC.TAG.FRIEND5NAME>
Previous Menu

[DIALOG house_menu_3 BUTTON]
ON=1

IF (<SRC.ACCOUNT.PLEVEL> > 4)
TAG.APPROVED=Approved
TAG.APPROVAL=1
TIMER=-1
SRC.MESSAGE This house has been approved
DIALOG HOUSE_MENU_3
ELSE
SRC.SYSMESSAGE Only a Priv 5 or higher GM can approve a house. Please page to get it approved.
DIALOG HOUSE_MENU_3
ENDIF


//TIMER=<EVAL ((30*24*60*60)+60)>
//DIALOG HOUSE_MENU_3

ON=2
DIALOG HOUSE_MENU_2

[DIALOG HOUSE_MENU_SIGN_1]
0,0
resizepic 0 0 2600 500 400
gumppic 175 20 100
text 190 60 955 0
text 20 40 955 1
text 20 60 955 2
text 20 80 955 3
text 20 100 955 4
text 150 120 955 5
text 290 120 955 6
button 40 155 2103 2104 1 0 2
tilepic 50 150 2979
button 40 180 2103 2104 1 0 3
tilepic 50 175 2981
button 40 205 2103 2104 1 0 4
tilepic 50 200 2983
button 40 230 2103 2104 1 0 5
tilepic 50 225 2985
button 40 255 2103 2104 1 0 6
tilepic 50 250 2987
button 40 280 2103 2104 1 0 7
tilepic 50 275 2989
button 40 305 2103 2104 1 0 8
tilepic 50 300 2991
button 115 155 2103 2104 1 0 9
tilepic 75 150 2980
button 115 180 2103 2104 1 0 10
tilepic 75 175 2982
button 115 205 2103 2104 1 0 11
tilepic 75 200 2984
button 115 230 2103 2104 1 0 12
tilepic 75 225 2986
button 115 255 2103 2104 1 0 13
tilepic 75 250 2988
button 115 280 2103 2104 1 0 14
tilepic 75 275 2990
button 115 305 2103 2104 1 0 15
tilepic 75 300 2992
button 210 155 2103 2104 1 0 16
tilepic 220 150 2993
button 210 180 2103 2104 1 0 17
tilepic 220 175 2995
button 210 205 2103 2104 1 0 18
tilepic 220 200 2997
button 210 230 2103 2104 1 0 19
tilepic 220 225 2999
button 210 255 2103 2104 1 0 20
tilepic 220 250 3001
button 210 280 2103 2104 1 0 21
tilepic 220 275 3003
button 210 305 2103 2104 1 0 22
tilepic 220 300 3005
button 285 155 2103 2104 1 0 23
tilepic 245 150 2994
button 285 180 2103 2104 1 0 24
tilepic 245 175 2996
button 285 205 2103 2104 1 0 25
tilepic 245 200 2998
button 285 230 2103 2104 1 0 26
tilepic 245 225 3000
button 285 255 2103 2104 1 0 27
tilepic 245 250 3002
button 285 280 2103 2104 1 0 28
tilepic 245 275 3004
button 285 305 2103 2104 1 0 29
tilepic 245 300 3006
button 380 155 2103 2104 1 0 30
tilepic 390 150 3007
button 380 180 2103 2104 1 0 31
tilepic 390 175 3009
button 380 205 2103 2104 1 0 32
tilepic 390 200 3011
button 380 230 2103 2104 1 0 33
tilepic 390 225 3013
button 380 255 2103 2104 1 0 34
tilepic 390 250 3015
button 380 280 2103 2104 1 0 35
tilepic 390 275 3017
button 380 305 2103 2104 1 0 36
tilepic 390 300 3019
button 455 155 2103 2104 1 0 37
tilepic 415 150 3008
button 455 180 2103 2104 1 0 38
tilepic 415 175 3010
button 455 205 2103 2104 1 0 39
tilepic 415 200 3012
button 455 230 2103 2104 1 0 40
tilepic 415 225 3014
button 455 255 2103 2104 1 0 41
tilepic 415 250 3016
button 455 280 2103 2104 1 0 42
tilepic 415 275 3018
button 455 305 2103 2104 1 0 43
tilepic 415 300 3020
button 175 340 2466 2467 1 0 44
button 260 340 2469 2470 1 0 45
text 100 360 955 7
button 250 360 210 211 1 0 1

[DIALOG HOUSE_MENU_SIGN_1 TEXT]
<NAME>
Owner:
<TAG.OWNERNAME>
Co-Owner:
<TAG.COOWNERNAME>
Time before decay:     Days
//<EVAL (<TIMER>/(24*60*60))>
N/A
Approve this house

[DIALOG HOUSE_MENU_SIGN_1 BUTTON]
ON=1

IF (<SRC.ACCOUNT.PLEVEL> > 4)
TAG.APPROVED=Approved
TAG.APPROVAL=1
TIMER=-1
SRC.MESSAGE This house has been approved
DIALOG HOUSE_MENU_SIGN_1
ELSE
SRC.SYSMESSAGE Only a Priv 5 or higher GM can approve a house. Please page to get it approved.
DIALOG HOUSE_MENU_SIGN_1
ENDIF


//TIMER=<EVAL ((30*24*60*60)+60)>
//DIALOG HOUSE_MENU_SIGN_1

ON=2
DISPID=0BA3
SRC.RESEND

ON=3
DISPID=0BA5
SRC.RESEND

ON=4
DISPID=0BA7
SRC.RESEND

ON=5
DISPID=0BA9
SRC.RESEND

ON=6
DISPID=0BAB
SRC.RESEND

ON=7
DISPID=0BAD
SRC.RESEND

ON=8
DISPID=0BAF
SRC.RESEND

ON=9
DISPID=0BA4
SRC.RESEND

ON=10
DISPID=0BA6
SRC.RESEND

ON=11
DISPID=0BA8
SRC.RESEND

ON=12
DISPID=0BAA
SRC.RESEND

ON=13
DISPID=0BAC
SRC.RESEND

ON=14
DISPID=0BAE
SRC.RESEND

ON=15
DISPID=0BB0
SRC.RESEND

ON=16
DISPID=0BB1
SRC.RESEND

ON=17
DISPID=0BB3
SRC.RESEND

ON=18
DISPID=0BB5
SRC.RESEND

ON=19
DISPID=0BB7
SRC.RESEND

ON=20
DISPID=0BB9
SRC.RESEND

ON=21
DISPID=0BBB
SRC.RESEND

ON=22
DISPID=0BBD
SRC.RESEND

ON=23
DISPID=0BB2
SRC.RESEND

ON=24
DISPID=0BB4
SRC.RESEND

ON=25
DISPID=0BB6
SRC.RESEND

ON=26
DISPID=0BB8
SRC.RESEND

ON=27
DISPID=0BBA
SRC.RESEND

ON=28
DISPID=0BBC
SRC.RESEND

ON=29
DISPID=0BBE
SRC.RESEND

ON=30
DISPID=0BBF
SRC.RESEND

ON=31
DISPID=0BC1
SRC.RESEND

ON=32
DISPID=0BC3
SRC.RESEND

ON=33
DISPID=0BC5
SRC.RESEND

ON=34
DISPID=0BC7
SRC.RESEND

ON=35
DISPID=0BC9
SRC.RESEND

ON=36
DISPID=0BCB
SRC.RESEND

ON=37
DISPID=0BC0
SRC.RESEND

ON=38
DISPID=0BC2
SRC.RESEND

ON=39
DISPID=0BC4
SRC.RESEND

ON=40
DISPID=0BC6
SRC.RESEND

ON=41
DISPID=0BC8
SRC.RESEND

ON=42
DISPID=0BCA
SRC.RESEND

ON=43
DISPID=0BCC
SRC.RESEND

ON=44
IF (<LINK.TYPE> == t_door)
DIALOG STATICHOUSE_MENU
ELSEIF (<LINK.TYPE> == t_door_locked)
DIALOG STATICHOUSE_MENU
ELSE
DIALOG HOUSE_MENU
ENDIF

ON=45
DIALOG HOUSE_MENU_SIGN_2

[DIALOG HOUSE_MENU_SIGN_2]
0,0
resizepic 0 0 2600 500 400
gumppic 175 20 100
text 190 60 955 0
text 20 40 955 1
text 20 60 955 2
text 20 80 955 3
text 20 100 955 4
text 150 120 955 5
text 290 120 955 6
button 40 155 2103 2104 1 0 2
tilepic 50 150 3021
button 40 180 2103 2104 1 0 3
tilepic 50 175 3023
button 40 205 2103 2104 1 0 4
tilepic 50 200 3025
button 40 230 2103 2104 1 0 5
tilepic 50 225 3027
button 40 255 2103 2104 1 0 6
tilepic 50 250 3029
button 40 280 2103 2104 1 0 7
tilepic 50 275 3031
button 40 305 2103 2104 1 0 8
tilepic 50 300 3033
button 115 155 2103 2104 1 0 9
tilepic 75 150 3022
button 115 180 2103 2104 1 0 10
tilepic 75 175 3024
button 115 205 2103 2104 1 0 11
tilepic 75 200 3026
button 115 230 2103 2104 1 0 12
tilepic 75 225 3028
button 115 255 2103 2104 1 0 13
tilepic 75 250 3030
button 115 280 2103 2104 1 0 14
tilepic 75 275 3032
button 115 305 2103 2104 1 0 15
tilepic 75 300 3034
button 210 155 2103 2104 1 0 16
tilepic 220 150 3035
button 210 180 2103 2104 1 0 17
tilepic 220 175 3037
button 210 205 2103 2104 1 0 18
tilepic 220 200 3039
button 210 230 2103 2104 1 0 19
tilepic 220 225 3041
button 210 255 2103 2104 1 0 20
tilepic 220 250 3043
button 210 280 2103 2104 1 0 21
tilepic 220 275 3045
button 210 305 2103 2104 1 0 22
tilepic 220 300 3047
button 285 155 2103 2104 1 0 23
tilepic 245 150 3036
button 285 180 2103 2104 1 0 24
tilepic 245 175 3038
button 285 205 2103 2104 1 0 25
tilepic 245 200 3040
button 285 230 2103 2104 1 0 26
tilepic 245 225 3042
button 285 255 2103 2104 1 0 27
tilepic 245 250 3044
button 285 280 2103 2104 1 0 28
tilepic 245 275 3046
button 285 305 2103 2104 1 0 29
tilepic 245 300 3048
button 380 155 2103 2104 1 0 30
tilepic 390 150 3049
button 380 180 2103 2104 1 0 31
tilepic 390 175 3051
button 380 205 2103 2104 1 0 32
tilepic 390 200 3053
button 380 230 2103 2104 1 0 33
tilepic 390 225 3055
button 380 255 2103 2104 1 0 34
tilepic 390 250 3057
button 380 280 2103 2104 1 0 35
tilepic 390 275 3059
button 380 305 2103 2104 1 0 36
tilepic 390 300 3061
button 455 155 2103 2104 1 0 37
tilepic 415 150 3050
button 455 180 2103 2104 1 0 38
tilepic 415 175 3052
button 455 205 2103 2104 1 0 39
tilepic 415 200 3054
button 455 230 2103 2104 1 0 40
tilepic 415 225 3056
button 455 255 2103 2104 1 0 41
tilepic 415 250 3058
button 455 280 2103 2104 1 0 42
tilepic 415 275 3060
button 455 305 2103 2104 1 0 43
tilepic 415 300 3062
button 175 340 2466 2467 1 0 44
button 260 340 2469 2470 1 0 45
text 100 360 955 7
button 250 360 210 211 1 0 1

[DIALOG house_menu_sign_2 TEXT]
<NAME>
Owner:
<TAG.OWNERNAME>
Co-Owner:
<TAG.COOWNERNAME>
Time before decay:     Days
//<EVAL (<TIMER>/(24*60*60))>
N/A
Approve this house

[DIALOG house_menu_sign_2 BUTTON]
ON=1

IF (<SRC.ACCOUNT.PLEVEL> > 4)
TAG.APPROVED=Approved
TAG.APPROVAL=1
TIMER=-1
SRC.MESSAGE This house has been approved
DIALOG HOUSE_MENU_SIGN_2
ELSE
SRC.SYSMESSAGE Only a Priv 5 or higher GM can approve a house. Please page to get it approved.
DIALOG HOUSE_MENU_SIGN_2
ENDIF


//TIMER=<EVAL ((30*24*60*60)+60)>
//DIALOG HOUSE_MENU_SIGN_2

ON=2
DISPID=0BCD
SRC.RESEND

ON=3
DISPID=0BCF
SRC.RESEND

ON=4
DISPID=0BD1
SRC.RESEND

ON=5
DISPID=0BD3
SRC.RESEND

ON=6
DISPID=0BD5
SRC.RESEND

ON=7
DISPID=0BD7
SRC.RESEND

ON=8
DISPID=0BD9
SRC.RESEND

ON=9
DISPID=0BCE
SRC.RESEND

ON=10
DISPID=0BD0
SRC.RESEND

ON=11
DISPID=0BD2
SRC.RESEND

ON=12
DISPID=0BD4
SRC.RESEND

ON=13
DISPID=0BD6
SRC.RESEND

ON=14
DISPID=0BD8
SRC.RESEND

ON=15
DISPID=0BDA
SRC.RESEND

ON=16
DISPID=0BDB
SRC.RESEND

ON=17
DISPID=0BDD
SRC.RESEND

ON=18
DISPID=0BDF
SRC.RESEND

ON=19
DISPID=0BE1
SRC.RESEND

ON=20
DISPID=0BE3
SRC.RESEND

ON=21
DISPID=0BE5
SRC.RESEND

ON=22
DISPID=0BE7
SRC.RESEND

ON=23
DISPID=0BDC
SRC.RESEND

ON=24
DISPID=0BDE
SRC.RESEND

ON=25
DISPID=0BE0
SRC.RESEND

ON=26
DISPID=0BE2
SRC.RESEND

ON=27
DISPID=0BE4
SRC.RESEND

ON=28
DISPID=0BE6
SRC.RESEND

ON=29
DISPID=0BE8
SRC.RESEND

ON=30
DISPID=0BE9
SRC.RESEND

ON=31
DISPID=0BEB
SRC.RESEND

ON=32
DISPID=0BED
SRC.RESEND

ON=33
DISPID=0BEF
SRC.RESEND

ON=34
DISPID=0BF1
SRC.RESEND

ON=35
DISPID=0BF3
SRC.RESEND

ON=36
DISPID=0BF5
SRC.RESEND

ON=37
DISPID=0BEA
SRC.RESEND

ON=38
DISPID=0BEC
SRC.RESEND

ON=39
DISPID=0BEE
SRC.RESEND

ON=40
DISPID=0BF0
SRC.RESEND

ON=41
DISPID=0BF2
SRC.RESEND

ON=42
DISPID=0BF4
SRC.RESEND

ON=43
DISPID=0BF6
SRC.RESEND

ON=44
DIALOG HOUSE_MENU_SIGN_1

ON=45
DIALOG HOUSE_MENU_SIGN_3

[DIALOG HOUSE_MENU_SIGN_3]
0,0
resizepic 0 0 2600 500 400
gumppic 175 20 100
text 190 60 955 0
text 20 40 955 1
text 20 60 955 2
text 20 80 955 3
text 20 100 955 4
text 150 120 955 5
text 290 120 955 6
button 40 155 2103 2104 1 0 2
tilepic 50 150 3063
button 40 180 2103 2104 1 0 3
tilepic 50 175 3065
button 40 205 2103 2104 1 0 4
tilepic 50 200 3067
button 40 230 2103 2104 1 0 5
tilepic 50 225 3069
button 40 255 2103 2104 1 0 6
tilepic 50 250 3071
button 40 280 2103 2104 1 0 7
tilepic 50 275 3073
button 115 155 2103 2104 1 0 8
tilepic 75 150 3064
button 115 180 2103 2104 1 0 9
tilepic 75 175 3066
button 115 205 2103 2104 1 0 10
tilepic 75 200 3068
button 115 230 2103 2104 1 0 11
tilepic 75 225 3070
button 115 255 2103 2104 1 0 12
tilepic 75 250 3072
button 115 280 2103 2104 1 0 13
tilepic 75 275 3074
button 380 155 2103 2104 1 0 14
tilepic 390 150 3075
button 380 180 2103 2104 1 0 15
tilepic 390 175 3077
button 380 205 2103 2104 1 0 16
tilepic 390 200 3079
button 380 230 2103 2104 1 0 17
tilepic 390 225 3081
button 380 255 2103 2104 1 0 18
tilepic 390 250 3083
button 380 280 2103 2104 1 0 19
tilepic 390 275 3085
button 455 155 2103 2104 1 0 20
tilepic 415 150 3076
button 455 180 2103 2104 1 0 21
tilepic 415 175 3078
button 455 205 2103 2104 1 0 22
tilepic 415 200 3080
button 455 230 2103 2104 1 0 23
tilepic 415 225 3082
button 455 255 2103 2104 1 0 24
tilepic 415 250 3084
button 455 280 2103 2104 1 0 25
tilepic 415 275 3086
button 175 340 2466 2467 1 0 26
button 260 340 2469 2470 1 0 27
text 100 360 955 7
button 250 360 210 211 1 0 1

[DIALOG house_menu_sign_3 TEXT]
<NAME>
Owner:
<TAG.OWNERNAME>
Co-Owner:
<TAG.COOWNERNAME>
Time before decay:     Days
//<EVAL (<TIMER>/(24*60*60))>
N/A
Approve this house

[DIALOG house_menu_sign_3 BUTTON]
ON=1

IF (<SRC.ACCOUNT.PLEVEL> > 4)
TAG.APPROVED=Approved
TAG.APPROVAL=1
TIMER=-1
SRC.MESSAGE This house has been approved
DIALOG HOUSE_MENU_SIGN_3
ELSE
SRC.SYSMESSAGE Only a Priv 5 or higher GM can approve a house. Please page to get it approved.
DIALOG HOUSE_MENU_SIGN_3
ENDIF


//TIMER=<EVAL ((30*24*60*60)+60)>
//DIALOG HOUSE_MENU_SIGN_3

ON=2
DISPID=0BF7
SRC.RESEND

ON=3
DISPID=0BF9
SRC.RESEND

ON=4
DISPID=0BFB
SRC.RESEND

ON=5
DISPID=0BFD
SRC.RESEND

ON=6
DISPID=0BFF
SRC.RESEND

ON=7
DISPID=0C01
SRC.RESEND

ON=8
DISPID=0BF8
SRC.RESEND

ON=9
DISPID=0BFA
SRC.RESEND

ON=10
DISPID=0BFC
SRC.RESEND

ON=11
DISPID=0BFE
SRC.RESEND

ON=12
DISPID=0C00
SRC.RESEND

ON=13
DISPID=0C02
SRC.RESEND

ON=14
DISPID=0C03
SRC.RESEND

ON=15
DISPID=0C05
SRC.RESEND

ON=16
DISPID=0C07
SRC.RESEND

ON=17
DISPID=0C09
SRC.RESEND

ON=18
DISPID=0C0B
SRC.RESEND

ON=19
DISPID=0C0D
SRC.RESEND

ON=20
DISPID=0C04
SRC.RESEND

ON=21
DISPID=0C06
SRC.RESEND

ON=22
DISPID=0C08
SRC.RESEND

ON=23
DISPID=0C0A
SRC.RESEND

ON=24
DISPID=0C0C
SRC.RESEND

ON=25
DISPID=0C0E
SRC.RESEND

ON=26
DIALOG HOUSE_MENU_SIGN_2

ON=27
DIALOG HOUSE_MENU_SIGN_3

[DIALOG d_house_rename] // Main
0,0 // Position
resizepic 190 175 2600 335 150 // Curved Grey background
resizepic 220 235 3000 270 22 // Curved White background
text 215 215 995 0 // Place House Text
text 255 275 0000 1 // Continue Text
button 240 280 2104 2103 1 0 1 // Opens Continue
text 435 275 0000 2 // Cancel Text
button 420 280 2104 2103 1 0 0 // Opens Cancel
textentry 225 237 253 25 0 0 3 // Text Input

[DIALOG d_house_rename TEXT]
What do you wish to name your house?
Continue
Cancel
<NAME>

[DIALOG d_house_rename BUTTON]
ONBUTTON=0
SRC.SYSMESSAGE House name stays the same.
ONBUTTON=1
NAME <ARGTXT[0]>
RETURN 1

[ITEMDEF i_key_todoor]
DEFNAME=i_locks
ID=i_key_copper

ON=@DCLICK
TARGET Target the door you wish to have access to.  Or target the sign to be able to lockdown.
RETURN 1

ON=@TARGON_ITEM
IF (<MORE1>==0)
IF (<SRC.TARG.TYPE>==t_door_locked) && (<SRC.TARG.REGION.TYPE>==<LINK>)
MORE1=<SRC.TARG.MORE1>
RETURN 1
ELSEIF (<SRC.TARG.BASEID>==i_sign_brass) && (<SRC.TARG.REGION.TYPE>==<LINK>)
MORE1=<SRC.TARG.LINK.UID>
RETURN 1
ELSE
SRC.MESSAGE This isn't a door or it is not inside your house.
RETURN 1
ENDIF
ENDIF

[ITEMDEF i_selectdoor]
DEFNAME=i_locks
ID=i_key_copper

ON=@DCLICK
IF (<MORE1>==0)
TARGET Target the door to change locks or target another key to copy it.
RETURN 1
ENDIF

ON=@TARGON_ITEM
IF (<MORE1>==0)
IF (<SRC.TARG.TYPE>==t_door_locked) && (<SRC.TARG.REGION.TYPE>==<LINK>)
SRC.TARG.MORE1=<UID>
MORE1=<UID>
MORE2=1
ELSEIF (<SRC.TARG.TYPE>==t_key)
MORE1=<SRC.TARG.MORE1>
MORE2=1
ELSE
SRC.MESSAGE The target isn't a door, or it is not inside your house.
ENDIF
RETURN 1
ENDIF

[ITEMDEF i_housename]
DEFNAME=i_housename
ID=i_crystal_green
NAME=Change House Name Crystal

ON=@DCLICK
IF (<MORE2>==0)
TRYP 1 INPDLG=NAME 30
MORE2=1
ELSE
TARGET Target your house sign.
ENDIF
RETURN 1

ON=@TARGON_ITEM
IF (<SRC.TARG.BASEID>=i_sign_brass) && (<SRC.TARG.REGION.TYPE>==<LINK>)
SRC.TARG.NAME=<NAME>
REMOVE
ELSE
SRC.MESSAGE This is not your house sign.
ENDIF
RETURN 1

[ITEMDEF i_newowner]
DEFNAME=i_newowner
ID=i_crystal_green
NAME=Transfer Ownership Crystal

ON=@DCLICK
TARGET Target the new owner.
RETURN 1

ON=@TARGON_CHAR
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.FRIEND1NAME=
LINK.TAG.FRIEND2NAME=
LINK.TAG.FRIEND3NAME=
LINK.TAG.FRIEND4NAME=
LINK.TAG.FRIEND5NAME=
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
REMOVE

[ITEMDEF i_house_co_owner]
DEFNAME=i_house_co_owner
ID=i_crystal_green
NAME=Co-Owner Crystal

ON=@DCLICK
IF !(<LINK.MORE1>==0)
SRC.MESSAGE You already have a co-owner, try removing him before having a new one.
REMOVE
RETURN 1
ELSE
TARGET Target your new Co-owner
RETURN 1
ENDIF

ON=@TARGON_CHAR
LINK.MORE1=<SRC.TARG.UID>
LINK.TAG.COOWNERNAME=<SRC.TARG.NAME>
LINK=<MORE1>
LINK.TAG.COOWNER=<SRC.TARG.UID>
REMOVE

[ITEMDEF i_removecoowner]
DEFNAME=i_removecoowner
ID=i_crystal_green
NAME=Remove Co-owner crystal

ON=@DCLICK
LINK.MORE1=0
LINK.TAG.COOWNERNAME=
LINK=<MORE1>
LINK.TAG.COOWNER=0
REMOVE
RETURN 1

[ITEMDEF i_ejecthouse]
DEFNAME=i_ejecthouse
ID=i_crystal_green
NAME=Eject Crystal

ON=@DCLICK
TARGET Who do you wish to eject from the house?
SRC.SAY Get out of here!
RETURN 1

ON=@TARGON_CHAR
IF (<SRC.TARG.REGION.TYPE>==<MORE1>) && !(<SRC.TARG.UID>==<SRC.TAG.OWNER>)
SRC.TARG.P=<SRC.TAG.EJECT>
SRC.RESEND
SRC.TARG.FIX
REMOVE
ELSE
SRC.MESSAGE He's not inside your house!
REMOVE
ENDIF
RETURN 1

ON=@TARGON_ITEM
IF (<SRC.TARG.REGION.TYPE>==<MORE1>)
SRC.TARG.P=<SRC.TAG.EJECT>
SRC.RESEND
SRC.TARG.FIX
REMOVE
ELSE
SRC.MESSAGE It's not inside your house!
REMOVE
ENDIF
RETURN 1

[ITEMDEF i_place_securechest]
DEFNAME=i_place_securechest
ID=i_crystal_green
NAME=Secure Chest Crystal

ON=@DCLICK
TARGET Where do you wish to place the secure chest?  (target yourself on that location)
RETURN 1

ON=@TARGON_CHAR
IF (<LINK.TAG.SECURE>==5)
SRC.MESSAGE You already have 5 secure chests!
REMOVE
ELSEIF (<SRC.REGION.TYPE>==<SRC.TAG.MYHOUSE>) && (<link.tag.secure>!=5)
SRC.NEWITEM=i_SecureChest
SRC.ACT.P=<SRC.TARG.P>
SRC.ACT.MORE1=<MORE1>
SRC.ACT.LINK=<MORE1>
LINK.TAG.SECURE=<LINK.TAG.SECURE>+01
REMOVE
ELSEIF !(<SRC.REGION.TYPE>==<SRC.TAG.MYHOUSE>)
SRC.MESSAGE You can't place secure chests outside of your house.
REMOVE
ENDIF
RETURN 1

[ITEMDEF i_SecureChest]
DEFNAME=i_Secure_Chest
ID=i_chest_metal
DUPELIST=0e7c
NAME=Secure Chest

ON=@CREATE
TYPE=t_container

ON=@DCLICK
IF (<SRC.UID>==<LINK.TAG.OWNER>)
RETURN 0
ELSEIF (<SRC.UID>==<LINK.TAG.COOWNER>)
RETURN 0
ELSEIF (<SRC.UID>==<LINK.TAG.FRIEND1>)
RETURN 0
ELSEIF (<SRC.UID>==<LINK.TAG.FRIEND2>)
RETURN 0
ELSEIF (<SRC.UID>==<LINK.TAG.FRIEND3>)
RETURN 0
ELSEIF (<SRC.UID>==<LINK.TAG.FRIEND4>)
RETURN 0
ELSEIF (<SRC.UID>==<LINK.TAG.FRIEND5>)
RETURN 0
ELSEIF (<SRC.ISGM>)
RETURN 0
ELSE
RETURN 1
ENDIF

[ITEMDEF i_remove_securechest]
DEFNAME=i_remove_securechest
ID=i_crystal_green
NAME=Remove Secure Chest Crystal

ON=@DLCICK
TARGET Target the secure chest you wish to remove.
RETURN 1

ON=@TARGON_ITEM
IF (<SRC.TARG.REGION.TYPE>==<SRC.TAG.MYHOUSE>) && (<SRC.TARG.BASEID>==i_SecureChest)
SRC.TARG.REMOVE
LINK.TAG.SECURE=<LINK.TAG.SECURE>+-01
REMOVE
ELSE
SRC.MESSAGE This isn't a secure chest or it is not inside your house.
REMOVE
ENDIF

[ITEMDEF i_friend1]
DEFNAME=i_friend1
ID=i_crystal_green
NAME=Friend1 Crystal

ON=@DCLICK
IF !(<LINK.TAG.FRIEND1>==0)
SRC.MESSAGE You already chose friend #1, try removing him before having a new one.
REMOVE
ELSE
TARGET Target the person who will be Friend #1!
ENDIF
RETURN 1

ON=@TARGON_CHAR
LINK.TAG.FRIEND1=<SRC.TARG.UID>
LINK.TAG.FRIEND1NAME=<SRC.TARG.NAME>
LINK=<MORE1>
LINK.TAG.FRIEND1=<SRC.TARG.UID>
REMOVE

[ITEMDEF i_removefriend1]
DEFNAME=i_removefriend1
ID=i_crystal_green
NAME=Remove Friend1 Crystal

ON=@DCLICK
LINK.TAG.FRIEND1=0
LINK.TAG.FRIEND1NAME=
LINK=<MORE1>
LINK.TAG.FRIEND1=0
REMOVE
RETURN 1

[ITEMDEF i_friend2]
DEFNAME=i_friend2
ID=i_crystal_green
NAME=Friend2 Crystal

ON=@DCLICK
IF !(<LINK.TAG.FRIEND2>==0)
SRC.MESSAGE You already chose friend #1, try removing him before having a new one.
REMOVE
ELSE
TARGET Target the person who will be Friend #2!
ENDIF
RETURN 1

ON=@TARGON_CHAR
LINK.TAG.FRIEND2=<SRC.TARG.UID>
LINK.TAG.FRIEND2NAME=<SRC.TARG.NAME>
LINK=<MORE1>
LINK.TAG.FRIEND2=<SRC.TARG.UID>
REMOVE

[ITEMDEF i_removefriend2]
DEFNAME=i_removefriend2
ID=i_crystal_green
NAME=Remove Friend1 Crystal

ON=@DCLICK
SRC.TAG.REMOVEF2=<LINK.TAG.FRIEND2>
LINK.TAG.FRIEND2=0
LINK.TAG.FRIEND2NAME=
LINK=<MORE1>
LINK.TAG.FRIEND2=0
REMOVE
RETURN 1

[ITEMDEF i_friend3]
DEFNAME=i_friend3
ID=i_crystal_green
NAME=Friend3 Crystal

ON=@DCLICK
IF !(<LINK.TAG.FRIEND3>==0)
SRC.MESSAGE You already chose friend #1, try removing him before having a new one.
REMOVE
ELSE
TARGET Target the person who will be Friend #3!
ENDIF
RETURN 1

ON=@TARGON_CHAR
LINK.TAG.FRIEND3=<SRC.TARG.UID>
LINK.TAG.FRIEND3NAME=<SRC.TARG.NAME>
LINK=<MORE1>
LINK.TAG.FRIEND3=<SRC.TARG.UID>
REMOVE

[ITEMDEF i_removefriend3]
DEFNAME=i_removefriend3
ID=i_crystal_green
NAME=Remove Friend3 Crystal

ON=@DCLICK
SRC.TAG.REMOVEF3=<LINK.TAG.FRIEND3>
LINK.TAG.FRIEND3=0
LINK.TAG.FRIEND3NAME=
LINK=<MORE1>
LINK.TAG.FRIEND3=0
REMOVE
RETURN 1

[ITEMDEF i_friend4]
DEFNAME=i_friend4
ID=i_crystal_green
NAME=Friend4 Crystal

ON=@DCLICK
IF !(<LINK.TAG.FRIEND4>==0)
SRC.MESSAGE You already chose friend #1, try removing him before having a new one.
REMOVE
ELSE
TARGET Target the person who will be Friend #4!
ENDIF
RETURN 1

ON=@TARGON_CHAR
LINK.TAG.FRIEND4=<SRC.TARG.UID>
LINK.TAG.FRIEND4NAME=<SRC.TARG.NAME>
LINK=<MORE1>
LINK.TAG.FRIEND4=<SRC.TARG.UID>
REMOVE

[ITEMDEF i_removefriend4]
DEFNAME=i_removefriend4
ID=i_crystal_green
NAME=Remove Friend4 Crystal

ON=@DCLICK
SRC.TAG.REMOVEF4=<LINK.TAG.FRIEND4>
LINK.TAG.FRIEND4=0
LINK.TAG.FRIEND4NAME=
LINK=<MORE1>
LINK.TAG.FRIEND4=0
REMOVE
RETURN 1

[ITEMDEF i_friend5]
DEFNAME=i_friend5
ID=i_crystal_green
NAME=Friend5 Crystal

ON=@DCLICK
IF !(<LINK.TAG.FRIEND5>==0)
SRC.MESSAGE You already chose friend #1, try removing him before having a new one.
ELSE
TARGET Target the person who will be Friend #5!
ENDIF
RETURN 1

ON=@TARGON_CHAR
LINK.TAG.FRIEND5=<SRC.TARG.UID>
LINK.TAG.FRIEND5NAME=<SRC.TARG.NAME>
LINK=<MORE1>
LINK.TAG.FRIEND5=<SRC.TARG.UID>
REMOVE

[ITEMDEF i_removefriend5]
DEFNAME=i_removefriend5
ID=i_crystal_green
NAME=Remove Friend5 Crystal

ON=@DCLICK
SRC.TAG.REMOVEF5=<LINK.TAG.FRIEND5>
LINK.TAG.FRIEND5=0
LINK.TAG.FRIEND5NAME=
LINK=<MORE1>
LINK.TAG.FRIEND5=0
REMOVE
RETURN 1

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

ON=@DCLICK
LINK.REMOVE
REMOVE
RETURN 1

[ITEMDEF i_changesign]
ID=i_crystal_green
DEFNAME=i_changesign

ON=@CREATE
ATTR=04

ON=@DCLICK
TARGET Target the sign to change.

ON=@TARGON_ITEM
IF (<SRC.TARG.BASEID>==i_sign_brass) && (<SRC.TARG.UID>==<SRC.TAG.MYSIGN>)
SRC.TARG.DISPID=<ARGS>
ELSE
SRC.MESSAGE You must target your house sign!
ENDIF
REMOVE

[ITEMDEF 0bd1]
//brass sign
DEFNAME=i_sign_brass
TYPE=t_script
CATEGORY=Decoration - Signs
SUBSECTION=Blank
DESCRIPTION=Brass Blank
DUPELIST=0bd2

ON=@CREATE
TAG.FRIEND1=0
TAG.FRIEND2=0
TAG.FRIEND3=0
TAG.FRIEND4=0
TAG.FRIEND5=0
TAG.SECURE=0

ON=@DCLICK
IF !(<LINK>==04FFFFFFF)
IF (<MORE2>==0)
MORE2=<SRC.UID>
TIMER=30*24*60*60
SRC.MESSAGE This is now your house!
SRC.SYSMESSAGE Please note that you have 30 days to get the approval of a staff member for the placement of this house.
TAG.APPROVAL=0
TAG.APPROVED=Not Approved, 30 days remaining
SRC.TAG.MYHOUSE=<LINK>
SRC.TAG.MYSIGN=<UID>
SRC.TAG.OWNER=<MORE2>
SRC.TAG.COOWNER=<MORE1>
SRC.TAG.EJECT=<P>
SRC.TAG.NAME=<NAME>
TAG.OWNERNAME=<SRC.NAME>
SRC.TAG.OWNERNAME=<SRC.NAME>
SRC.TAG.HOUSETYPE=<LINK.NAME>
LINK.TAG.OWNER=<SRC.UID>
IF (<LINK.TYPE> == t_door)
DIALOG STATICHOUSE_MENU
ELSEIF (<LINK.TYPE> == t_door_locked)
DIALOG STATICHOUSE_MENU
ELSE
DIALOG HOUSE_MENU
ENDIF

RETURN 1
ELSE

IF (<eval <TAG.APPROVAL>>=0)
TAG.APPROVED=Not Approved, <EVAL (<TIMER>/(24*60*60))> days remaining
ENDIF

SRC.TAG.MYHOUSE=<LINK>
SRC.TAG.MYSIGN=<UID>
SRC.TAG.OWNER=<MORE2>
SRC.TAG.OWNERNAME=<TAG.OWNERNAME>
SRC.TAG.COOWNER=<MORE1>
SRC.TAG.COOWNERNAME=<TAG.COOWNERNAME>
SRC.TAG.FRIEND1=<TAG.FRIEND1>
SRC.TAG.FRIEND1NAME=<TAG.FRIEND1NAME>
SRC.TAG.FRIEND2=<TAG.FRIEND2>
SRC.TAG.FRIEND2NAME=<TAG.FRIEND2NAME>
SRC.TAG.FRIEND3=<TAG.FRIEND3>
SRC.TAG.FRIEND3NAME=<TAG.FRIEND3NAME>
SRC.TAG.FRIEND4=<TAG.FRIEND4>
SRC.TAG.FRIEND4NAME=<TAG.FRIEND4NAME>
SRC.TAG.FRIEND5=<TAG.FRIEND5>
SRC.TAG.FRIEND5NAME=<TAG.FRIEND5NAME>
SRC.TAG.EJECT=<P>
SRC.TAG.NAME=<NAME>
SRC.TAG.HOUSETYPE=<LINK.NAME>

IF (<LINK.TYPE> == t_door)
DIALOG STATICHOUSE_MENU
ELSEIF (<LINK.TYPE> == t_door_locked)
DIALOG STATICHOUSE_MENU
ELSE

IF (<MAPPLANE> = 250)
//It's in the gallery, let them buy it rather than displaying the sign.
DIALOG d_buyhouseyesno
ELSE
DIALOG HOUSE_MENU
ENDIF

ENDIF

RETURN 1
ELSE

RETURN 1

ENDIF
ENDIF
DIALOG new_sign
RETURN 1

ON=@TIMER
IF (<eval <TAG.APPROVAL>>=0)
LINK.REMOVE
ENDIF
RETURN 1

[FUNCTION consumebank]
act=<SRC.FINDLAYER(layer_bankbox).uid>
act.layer=layer_pack
act.type=t_container
act.equip

src.consume <args>

act.layer=layer_bankbox
act.type=t_eq_bank_box
act.equip

[SPEECH lockdown]
ON=*I wish to lock this down*
IF ((<LINK.MORE2>=<SRC.UID>)||(<LINK.MORE1>=<SRC.UID>)||(<SRC.ISGM>)||(<SRC.UID>=<EVAL <LINK.TAG.FRIEND1>>)||(<SRC.UID>=<EVAL <LINK.TAG.FRIEND2>>)||(<SRC.UID>=<EVAL <LINK.TAG.FRIEND3>>)||(<SRC.UID>=<EVAL <LINK.TAG.FRIEND4>>)||(<SRC.UID>=<EVAL <LINK.TAG.FRIEND5>>))
IF (<DISTANCE> < 15)
SRC.TAG.LOCKMODE=1
TARGET What do you wish to lock down?
ENDIF
ENDIF

ON=*I wish to release this*
IF ((<LINK.MORE2>=<SRC.UID>)||(<LINK.MORE1>=<SRC.UID>)||(<SRC.ISGM>)||(<SRC.UID>=<EVAL <LINK.TAG.FRIEND1>>)||(<SRC.UID>=<EVAL <LINK.TAG.FRIEND2>>)||(<SRC.UID>=<EVAL <LINK.TAG.FRIEND3>>)||(<SRC.UID>=<EVAL <LINK.TAG.FRIEND4>>)||(<SRC.UID>=<EVAL <LINK.TAG.FRIEND5>>))
IF (<DISTANCE> < 15)
SRC.TAG.LOCKMODE=0
TARGET What do you wish to release?
ENDIF
ENDIF

ON=*I wish to raise this*
IF ((<LINK.MORE2>=<SRC.UID>)||(<LINK.MORE1>=<SRC.UID>)||(<SRC.ISGM>)||(<SRC.UID>=<EVAL <LINK.TAG.FRIEND1>>)||(<SRC.UID>=<EVAL <LINK.TAG.FRIEND2>>)||(<SRC.UID>=<EVAL <LINK.TAG.FRIEND3>>)||(<SRC.UID>=<EVAL <LINK.TAG.FRIEND4>>)||(<SRC.UID>=<EVAL <LINK.TAG.FRIEND5>>))
IF (<DISTANCE> < 15)
SRC.TAG.LOCKMODE=2
TARGET What do you wish to nudge up?
ENDIF
ENDIF

ON=*I wish to lower this*
IF ((<LINK.MORE2>=<SRC.UID>)||(<LINK.MORE1>=<SRC.UID>)||(<SRC.ISGM>)||(<SRC.UID>=<EVAL <LINK.TAG.FRIEND1>>)||(<SRC.UID>=<EVAL <LINK.TAG.FRIEND2>>)||(<SRC.UID>=<EVAL <LINK.TAG.FRIEND3>>)||(<SRC.UID>=<EVAL <LINK.TAG.FRIEND4>>)||(<SRC.UID>=<EVAL <LINK.TAG.FRIEND5>>))
IF (<DISTANCE> < 15)
SRC.TAG.LOCKMODE=3
TARGET What do you wish to nudge down?
ENDIF
ENDIF

[ITEMDEF i_lockdown_static]
ID=01ea7
TYPE=t_comm_crystal
NAME=Static House Lockdown

ON=@Create
ATTR=attr_move_never|attr_invis
SPEECH=lockdown

ON=@DClick
RETURN 1

ON=@Targon_Item

IF (<SRC.TARG.TYPE> == t_door)||(<SRC.TARG.TYPE> == t_door_locked)||(<SRC.TARG.TYPE> == t_script)||(<SRC.TARG.TYPE> == t_eq_script)
SRC.SYSMESSAGE You cannot lock this down.
RETURN 1
ENDIF

IF ((<LINK.MORE2>=<SRC.UID>)||(<LINK.MORE1>=<SRC.UID>)||(<SRC.ISGM>)||(<SRC.UID>=<EVAL <LINK.TAG.FRIEND1>>)||(<SRC.UID>=<EVAL <LINK.TAG.FRIEND2>>)||(<SRC.UID>=<EVAL <LINK.TAG.FRIEND3>>)||(<SRC.UID>=<EVAL <LINK.TAG.FRIEND4>>)||(<SRC.UID>=<EVAL <LINK.TAG.FRIEND5>>))

SRC.TAG.OLDP=<SRC.P>
SRC.P=<P>
IF ((<MOREZ> > 0)&&(<SRC.TARG.DISTANCE> > <MOREZ>))
	SRC.SYSMESSAGE This item is too far from your house
	SRC.P=<SRC.TAG.OLDP>
	SRC.TAG.OLDP=
	RETURN 1
ENDIF

SRC.P=<SRC.TAG.OLDP>
SRC.TAG.OLDP=

DOSWITCH (<eval <SRC.TAG.LOCKMODE>>)
BEGIN
	SRC.TARG.ATTR=<SRC.TARG.ATTR> &~ 010
	SRC.TARG.ATTR=<SRC.TARG.ATTR>|02
	SRC.TARG.SAY *Released*
END
BEGIN
	SRC.TARG.ATTR=<SRC.TARG.ATTR> &~ attr_move_always
	SRC.TARG.ATTR=<SRC.TARG.ATTR>|010
	SRC.TARG.ATTR=<SRC.TARG.ATTR> &~ 02
	SRC.TARG.SAY *Locked*
END
SRC.TARG.Z=<EVAL <SRC.TARG.Z>+1>
SRC.TARG.Z=<EVAL <SRC.TARG.Z>+(-1)>
ENDDO

SRC.TAG.LOCKMODE=
SRC.RESEND
ELSE
//How? I don't know... but best to be safe
RETURN 1
ENDIF

RETURN 1


[FUNCTION safeconsume]

act=<FINDLAYER(layer_bankbox).uid>
act.layer=layer_pack
act.type=t_container
act.equip

if (<EVAL <ARGN>> > 65000)
consume 65000 i_gold

act.layer=layer_bankbox
act.type=t_eq_bank_box
act.equip

safeconsume <EVAL <ARGN>+(-65000)>
else
consume <ARGN> i_gold
act.layer=layer_bankbox
act.type=t_eq_bank_box
act.equip
endif

[DIALOG d_buyhouseyesno]
0, 0
PAGE 0
resizepic 100 130 2620 500 150
text 125 170 1152 1
text 125 191 1152 2
text 125 212 1152 3
text 160 244 1152 4
button 123 241 2151 2154 1 0 5

[DIALOG d_buyhouseyesno TEXT]
Nothing
House name: <NAME>
Price: <EVAL <EVAL <LINK.VALUE> * 115> / 100> gold
You have: <EVAL <SRC.findlayer(layer_bankbox).rescount i_gold>+<SRC.findlayer(layer_pack).rescount i_gold>> gold
Buy one

[DIALOG d_buyhouseyesno BUTTON]
ONBUTTON=5
IF (<EVAL <SRC.findlayer(layer_bankbox).rescount i_gold>+<SRC.findlayer(layer_pack).rescount i_gold>> < <EVAL <EVAL <LINK.VALUE> * 115> / 100>)
SRC.SYSMESSAGE You do not have enough gold to purchase this house.
RETURN 1
ENDIF

SRC.SAFECONSUME <EVAL <EVAL <LINK.VALUE> * 115> / 100>
SRC.NEWITEM=i_deed
SRC.ACT.MORE=<LINK.BASEID>
SRC.ACT.NAME=a deed to a <LINK.NAME>
SRC.ACT.BOUNCE