Bu 0.55 versiyonu için heralde ondan

sizde 56b versiyonu için var mı??

bu arada scp yi code içine koyamadım özür
[SPEECH spk_house_cmds]
DEFNAME=spk_house_cmds
ON=*bank*
IF (<EVAL <SRC.UID>>==<MORE>) || (<EVAL <TAG.CO1UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F1UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F2UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F3UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F4UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F5UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F6UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F7UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F8UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F9UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F10UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F11UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F12UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F13UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F14UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F15UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F16UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F17UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F18UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F19UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F20UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4)
SRC.REGION.FLAGS = 010d2
SRC.BANKSELF
RETURN 1
ENDIF
ON=*resurrect*
IF (<EVAL <SRC.UID>>==<MORE>) || (<EVAL <TAG.CO1UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F1UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F2UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F3UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F4UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F5UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F6UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F7UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F8UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F9UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F10UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F11UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F12UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F13UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F14UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F15UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F16UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F17UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F18UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F19UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F20UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4)
SRC.REGION.FLAGS = 0
SRC.resurrect
RETURN 1
ENDIF
ON=*House help*
IF (<EVAL <SRC.UID>>==<MORE>) || (<EVAL <TAG.CO1UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F1UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F2UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F3UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F4UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F5UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F6UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F7UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F8UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F9UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F10UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F11UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F12UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F13UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F14UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F15UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F16UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F17UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F18UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F19UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F20UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4)
SRC.SYSMESSAGE To lock things down in your house, type &裟I wish to lock this down&裟
SRC.SYSMESSAGE
SRC.SYSMESSAGE To release things in your house, type &裟I wish to release this&裟
SRC.SYSMESSAGE
SRC.SYSMESSAGE To secure things down in your house, type &裟I wish to secure this&裟
SRC.SYSMESSAGE
SRC.SYSMESSAGE To ban others from your house, type &裟I ban thee&裟
SRC.SYSMESSAGE
SRC.SYSMESSAGE To eject others from your house, type &裟Remove thyself&裟
SRC.SYSMESSAGE
SRC.SYSMESSAGE To place a trash barrel your house, type &裟I wish to place a trash barrel&裟
SRC.SYSMESSAGE
SRC.SYSMESSAGE To place a strongbox your house, type &裟I wish to place a strongbox&裟. This option is for Co-owners only.
SRC.SYSMESSAGE
SRC.SYSMESSAGE To remove a strongbox or trash barrel form your house, type &裟I wish to remove this&裟
RETURN 1
ELSE
SRC.SYSMESSAGE You must be in your house to do this.
RETURN 1
ENDIF
ON=*I ban thee*
IF (<EVAL <SRC.UID>>==<MORE>) || (<EVAL <TAG.CO1UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F1UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F2UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F3UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F4UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F5UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F6UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F7UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F8UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F9UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F10UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F11UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F12UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F13UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F14UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F15UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F16UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F17UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F18UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F19UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F20UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4)
TARGET Who do you wish to ban from the house?
MOREX 4
RETURN 1
ELSE
SRC.SYSMESSAGE You must be in your house to do this.
RETURN 1
ENDIF
ON=*Remove thyself*
IF (<EVAL <SRC.UID>>==<MORE>) || (<EVAL <TAG.CO1UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F1UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F2UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F3UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F4UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F5UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F6UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F7UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F8UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F9UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F10UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F11UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F12UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F13UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F14UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F15UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F16UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F17UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F18UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F19UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F20UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4)
TARGET Who do you wish to eject from the house?
MOREX 5
RETURN 1
ELSE
SRC.SYSMESSAGE You must be in your house to do this.
RETURN 1
ENDIF
ON=*I wish to lock this down*
IF (<EVAL <SRC.UID>>==<MORE>) || (<EVAL <TAG.CO1UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4)
TARGET Lock what down?
MOREX 1
RETURN 1
ELSEIF (<EVAL <TAG.F1UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F2UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F3UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F4UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F5UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F6UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F7UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F8UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F9UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F10UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F11UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F12UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F13UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F14UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F15UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F16UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F17UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F18UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F19UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F20UID>>==<EVAL <SRC.UID>>)
SRC.SYSMESSAGE You must own the house to do this.
RETURN 1
ELSE
SRC.SYSMESSAGE You must be in your house to do this.
RETURN 1
ENDIF
ON=*I wish to secure this*
IF (<EVAL <SRC.UID>>==<MORE>) || (<EVAL <TAG.CO1UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4)
TARGET Choose the item you wish to secure.
MOREX 2
RETURN 1
ELSEIF (<EVAL <TAG.F1UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F2UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F3UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F4UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F5UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F6UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F7UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F8UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F9UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F10UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F11UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F12UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F13UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F14UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F15UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F16UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F17UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F18UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F19UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F20UID>>==<EVAL <SRC.UID>>)
SRC.MESSAGE You may only secure a container in a home of which you are a co-owner.
RETURN 1
ELSE
SRC.SYSMESSAGE You must be in your house to do this.
RETURN 1
ENDIF
ON=*I wish to unsecure this*
SRC.SYSMESSAGE Target the item you wish to unsecure.
SRC.MESSAGE Try using the &裟release&裟 command instead.
RETURN 1
ON=*I wish to release this*
IF (<EVAL <SRC.UID>>==<MORE>) || (<EVAL <TAG.CO1UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4)
TARGET Choose the item you wish to release.
MOREX 3
RETURN 1
ELSEIF (<EVAL <TAG.F1UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F2UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F3UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F4UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F5UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F6UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F7UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F8UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F9UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F10UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F11UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F12UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F13UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F14UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F15UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F16UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F17UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F18UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F19UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F20UID>>==<EVAL <SRC.UID>>)
SRC.SYSMESSAGE You must own the house to do this.
RETURN 1
ELSE
SRC.SYSMESSAGE You must be in your house to do this.
RETURN 1
ENDIF
ON=*I wish to remove this*
IF (<EVAL <SRC.UID>>==<MORE>) || (<EVAL <TAG.CO1UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4)
TARGET Choose the item you wish to remove.
MOREX 6
RETURN 1
ELSEIF (<EVAL <TAG.F1UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F2UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F3UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F4UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F5UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F6UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F7UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F8UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F9UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F10UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F11UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F12UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F13UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F14UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F15UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F16UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F17UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F18UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F19UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F20UID>>==<EVAL <SRC.UID>>)
SRC.SYSMESSAGE You must own the house to do this.
RETURN 1
ELSE
SRC.SYSMESSAGE You must be in your house to do this.
RETURN 1
ENDIF
ON=*I wish to place a strongbox*
IF (<EVAL <SRC.UID>>==<MORE>)
SRC.SYSMESSAGE Owners do not get a strongbox of their own.
RETURN 1
ELSEIF (<EVAL <TAG.STRONGBOX>==3)
SRC.SYSMESSAGE This house cannot have anymore strongboxes.
RETURN 1
ELSEIF (<EVAL <TAG.F1UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F2UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F3UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F4UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F5UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F6UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F7UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F8UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F9UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F10UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F11UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F12UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F13UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F14UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F15UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F16UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F17UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F18UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F19UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F20UID>>==<EVAL <SRC.UID>>)
SRC.SYSMESSAGE You are not a co-owner of this house.
RETURN 1
ELSEIF (<EVAL <TAG.STRONGBOX1>==<EVAL <SRC.UID>>) || (<EVAL <TAG.STRONGBOX2>==<EVAL <SRC.UID>>) || (<EVAL <TAG.STRONGBOX3>==<EVAL <SRC.UID>>)
SRC.SYSMESSAGE You already have a strongbox!
RETURN 1
ENDIF
IF (<EVAL <TAG.STRONGBOX1>>==0)
IF (<EVAL <TAG.CO1UID>>==<EVAL <SRC.UID>>)|| (<EVAL <TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4)
SRC.NEWITEM i_strong_box
SRC.ACT.P <SRC.P>
SRC.ACT.LINK <UID>
SRC.ACT.MORE2 <EVAL <SRC.UID>>
SRC.ACT.MOREM 1
TAG.STRONGBOX1 <EVAL <SRC.UID>>
TAG.STRONGBOX <EVAL <TAG.STRONGBOX>>+1
SRC.SYSMESSAGE You have a new strongbox. Only you and the owner may access this box. You may place as many items as the box can hold.
RETURN 1
ELSE
SRC.SYSMESSAGE You must be in your house to do this.
RETURN 1
ENDIF
ENDIF
IF (<EVAL <TAG.STRONGBOX2>>==0)
IF (<EVAL <TAG.CO1UID>>==<EVAL <SRC.UID>>)|| (<EVAL <TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4)
SRC.NEWITEM i_strong_box
SRC.ACT.P <SRC.P>
SRC.ACT.LINK <UID>
SRC.ACT.MORE2 <EVAL <SRC.UID>>
SRC.ACT.MOREM 2
TAG.STRONGBOX2 <EVAL <SRC.UID>>
TAG.STRONGBOX <EVAL <TAG.STRONGBOX>>+1
SRC.SYSMESSAGE You have a new strongbox. Only you and the owner may access this box. You may place as many items as the box can hold.
RETURN 1
ELSE
SRC.SYSMESSAGE You must be in your house to do this.
RETURN 1
ENDIF
ENDIF
IF (<EVAL <TAG.STRONGBOX3>>==0)
IF (<EVAL <TAG.CO1UID>>==<EVAL <SRC.UID>>)|| (<EVAL <TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4)
SRC.NEWITEM i_strong_box
SRC.ACT.P <SRC.P>
SRC.ACT.LINK <UID>
SRC.ACT.MORE2 <EVAL <SRC.UID>>
SRC.ACT.MOREM 3
TAG.STRONGBOX3 <EVAL <SRC.UID>>
TAG.STRONGBOX <EVAL <TAG.STRONGBOX>>+1
SRC.SYSMESSAGE You have a new strongbox. Only you and the owner may access this box. You may place as many items as the box can hold.
RETURN 1
ELSE
SRC.SYSMESSAGE You must be in your house to do this.
RETURN 1
ENDIF
ENDIF
ON=*I wish to place a trash barrel*
IF (<EVAL <TAG.TRASHCAN>>==1)
SRC.SYSMESSAGE You already have a trash barrel!
RETURN 1
ELSEIF (<EVAL <TAG.LOCKNUMBER>>>=<MOREY>)
SRC.MESSAGE You cannot lock anymore items down!
RETURN 1
ELSEIF (<EVAL <SRC.UID>>==<MORE>) || (<EVAL <TAG.CO1UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F1UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F2UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F3UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F4UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F5UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F6UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F7UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F8UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F9UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F10UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F11UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F12UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F13UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F14UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F15UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F16UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F17UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F18UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F19UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F20UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4)
SRC.SYSMESSAGE You have a new trash barrel. Fifteen seconds after you put something in the barrel, the trash will be emptied. Be forewarned, this is permanant!
SRC.NEWITEM i_trash_barrel
SRC.ACT.TYPE t_trash_can
SRC.ACT.P <SRC.P>
SRC.ACT.COLOR 038a
SRC.ACT.LINK <UID>
SRC.ACT.UPDATEX
TAG.TRASHCAN 1
RETURN 1
ELSE
SRC.SYSMESSAGE You must be in your house to do this.
RETURN 1
ENDIF
[ITEMDEF i_trash_barrel]
DEFNAME=i_trash_barrel
TYPE=t_trash_can
ID=i_barrel_open
NAME=trash barrel
ON=@Click
MESSAGE a trash barrel
RETURN 1
ON=@Dclick
IF (<EVAL <SRC.UID>>==<LINK.MORE>) || (<EVAL <TAG.CO1UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F1UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F2UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F3UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F4UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F5UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F6UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F7UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F8UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F9UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F10UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F11UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F12UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F13UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F14UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F15UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F16UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F17UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F18UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F19UID>>==<EVAL <SRC.UID>>) || (<EVAL <TAG.F20UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4)
RETURN 0
ELSE
MESSAGE Only a friend of the house can use me!
RETURN 1
ENDIF
[ITEMDEF i_strong_box]
DEFNAME=i_strong_box
TYPE=T_CONTAINER
ID=i_box_brass
NAME=strong box
TDATA2=04b
ON=@Click
MESSAGE [locked down & secure]
MESSAGE
RETURN 0
ON=@Dclick
IF (<EVAL <SRC.UID>>==<LINK.MORE>) || (<MORE2>==<EVAL <SRC.UID>>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4)
RETURN 0
ELSE
RETURN 1
ENDIF
[TYPEDEF t_secure]
ON=@Click
MESSAGE [locked down & secure]
MESSAGE
RETURN 0
ON=@DClick
IF (<EVAL <SRC.UID>>==<EVAL <TAG.NAME>>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4) || (<EVAL <LINK.TAG.CO1UID>>==<EVAL <SRC.UID>>) || (<EVAL <LINK.TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <LINK.TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <LINK.TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <LINK.TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <LINK.TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <LINK.TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <LINK.TAG.CO8UID>>==<EVAL <SRC.UID>>)
TYPE t_container
USE
TYPE t_secure
RETURN 0
ELSE
MESSAGE This container is secure.
RETURN 1
ENDIF
[TYPEDEF t_secure_f]
ON=@Click
MESSAGE [locked down & secure]
MESSAGE
RETURN 0
ON=@DClick
IF (<EVAL <SRC.UID>>==<EVAL <TAG.NAME>>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4) || (<EVAL <LINK.TAG.F1UID>>==<EVAL <SRC.UID>>) || (<EVAL <LINK.TAG.F2UID>>==<EVAL <SRC.UID>>) || (<EVAL <LINK.TAG.F3UID>>==<EVAL <SRC.UID>>) || (<EVAL <LINK.TAG.F4UID>>==<EVAL <SRC.UID>>) || (<EVAL <LINK.TAG.F5UID>>==<EVAL <SRC.UID>>) || (<EVAL <LINK.TAG.F6UID>>==<EVAL <SRC.UID>>) || (<EVAL <LINK.TAG.F7UID>>==<EVAL <SRC.UID>>) || (<EVAL <LINK.TAG.F8UID>>==<EVAL <SRC.UID>>) || (<EVAL <LINK.TAG.F9UID>>==<EVAL <SRC.UID>>) || (<EVAL <LINK.TAG.F10UID>>==<EVAL <SRC.UID>>) || (<EVAL <LINK.TAG.F11UID>>==<EVAL <SRC.UID>>) || (<EVAL <LINK.TAG.F12UID>>==<EVAL <SRC.UID>>) || (<EVAL <LINK.TAG.F13UID>>==<EVAL <SRC.UID>>) || (<EVAL <LINK.TAG.F14UID>>==<EVAL <SRC.UID>>) || (<EVAL <LINK.TAG.F15UID>>==<EVAL <SRC.UID>>) || (<EVAL <LINK.TAG.F16UID>>==<EVAL <SRC.UID>>) || (<EVAL <LINK.TAG.F17UID>>==<EVAL <SRC.UID>>) || (<EVAL <LINK.TAG.F18UID>>==<EVAL <SRC.UID>>) || (<EVAL <LINK.TAG.F19UID>>==<EVAL <SRC.UID>>) || (<EVAL <LINK.TAG.F20UID>>==<EVAL <SRC.UID>>)
TYPE t_container
USE
TYPE t_secure
RETURN 0
ELSE
MESSAGE This container is secure.
RETURN 1
ENDIF
[TYPEDEF t_deed_locked]
ON=@Click
MESSAGE [locked down]
MESSAGE
RETURN 0
ON=@DClick
IF (<BASEID>==i_deed_housevendor)
RETURN 0
ELSE
RETURN 1
ENDIF
[DIALOG d_guild_nonown]
150,200
page 0
gumppic 100 10 2070
button 165 85 2071 2072 1 0 0
text 143 45 0 0
button 123 45 208 209 1 0 1
[DIALOG d_guild_nonown TEXT]
Remove stone?
[DIALOG d_guild_nonown BUTTON]
ONBUTTON=0
ONBUTTON=1
REMOVE
SRC.SYSMESSAGE The guildstone has been removed from your house.
RETURN 1
[ITEMDEF i_memory_logout]
DEFNAME=i_memory_logout
TYPE=t_eq_script
ID=i_deed
NAME=[REMOVE] Logout Memory
ON=@Timer
LINK.FINDID.i_handr_1.TIMER 1
REMOVE
RETURN 1
[EVENTS e_house]
ON=@Login
RETURN 0
ON=@Logout
IF (<SRC.KILLS>><SERV.MURDERMINCOUNT>)
RETURN 0
ELSEIF (<EVAL <SRC.UID>>==<SRC.REGION.TAG.NAME>) || (<EVAL <SRC.REGION.TAG.CO1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.REGION.TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.REGION.TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.REGION.TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.REGION.TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.REGION.TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.REGION.TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.REGION.TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.REGION.TAG.F1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.REGION.TAG.F2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.REGION.TAG.F3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.REGION.TAG.F4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.REGION.TAG.F5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.REGION.TAG.F6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.REGION.TAG.F7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.REGION.TAG.F8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.REGION.TAG.F9UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.REGION.TAG.F10UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.REGION.TAG.F11UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.REGION.TAG.F12UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.REGION.TAG.F13UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.REGION.TAG.F14UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.REGION.TAG.F15UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.REGION.TAG.F16UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.REGION.TAG.F17UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.REGION.TAG.F18UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.REGION.TAG.F19UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.REGION.TAG.F20UID>>==<EVAL <SRC.UID>>)
SRC.NEWITEM i_memory_logout
SRC.ACT.ATTR attr_invis
SRC.ACT.LINK <EVAL <SRC.UID>>
SRC.ACT.P <P>
SRC.ACT.TIMER 1
SRC.ACT.Z <Z>+-(10)
RETURN 0
ELSE
SRC.GOUID <SRC.REGION.TAG.SIGNP>
SRC.Z (<SRC.Z>-5)
RETURN 0
ENDIF
ON=@SkillStart
//ON=@SpellEffect
//IF (<ARGN>==59)
//IF (<EVAL <SRC.UID>>==<SRC.TARG.REGION.TAG.NAME>) || (<EVAL <SRC.TARG.REGION.TAG.CO1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.REGION.TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.REGION.TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.REGION.TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.REGION.TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.REGION.TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.REGION.TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.REGION.TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.REGION.TAG.F1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.REGION.TAG.F2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.REGION.TAG.F3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.REGION.TAG.F4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.REGION.TAG.F5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.REGION.TAG.F6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.REGION.TAG.F7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.REGION.TAG.F8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.REGION.TAG.F9UID//>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.REGION.TAG.F10UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.REGION.TAG.F11UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.REGION.TAG.F12UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.REGION.TAG.F13UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.REGION.TAG.F14UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.REGION.TAG.F15UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.REGION.TAG.F16UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.REGION.TAG.F17UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.REGION.TAG.F18UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.REGION.TAG.F19UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.REGION.TAG.F20UID>>==<EVAL <SRC.UID>>)
//RETURN 0
//ELSEIF (<ARGN>==59)
//SYSMESSAGE You can only be resurrected if you are a friend of this house.
//SRC.SKILL FAIL
//RETURN 1
//ENDIF
//ENDIF
ON=@ItemDclick
IF !(<SRC.TARG.ATTR>=<SRC.TARG.ATTR>|attr_move_never)
RETURN 0
ELSEIF (<SRC.TARG.CONT>==<SRC.FINDLAYER(21).UID>) || (<SRC.TARG.CONT>==<EVAL <SRC.UID>>) || (<SRC.TARG.CONT>>0)
RETURN 0
ELSE
RETURN 0
ENDIF
IF (<SRC.TARG.TYPE>==t_stone_guild)
IF (<SRC.MEMORYFINDTYPE.0400.LINK>==<SRC.TARG.UID>)
RETURN 0
ELSEIF (<SRC.TARG.LINK.MORE>==<SRC.TARG.LINK.MORE>) && (<SRC.TARG.MOREX>==0)
RETURN 0
ELSEIF (<SRC.TARG.LINK.MORE>==<SRC.TARG.LINK.MORE>) && (<EVAL <SRC.UID>>==<SRC.TARG.LINK.MORE>)
SRC.TARG.DIALOG d_guild_nonown
RETURN 1
ELSE
SRC.TARG.MESSAGE You are not a member of this guild! To join, ask a current member to invite you into the guild.
SRC.TARG.MESSAGE
SRC.TARG.MESSAGE
RETURN 1
ENDIF
ENDIF
IF (<SRC.TARG.TYPE>==t_container)
IF (<EVAL <SRC.UID>>==<SRC.TARG.LINK.MORE>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4) || (<EVAL <SRC.TARG.LINK.TAG.CO1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F9UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F10UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F11UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F12UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F13UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F14UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F15UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F16UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F17UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F18UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F19UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F20UID>>==<EVAL <SRC.UID>>)
RETURN 0
ELSE
SRC.MESSAGE It appears to be locked.
RETURN 1
ENDIF
ENDIF
IF (<SRC.TARG.TYPE>==t_key)
SRC.SYSMESSAGE That key is unreachable.
RETURN 1
ELSEIF (<SRC.TARG.ID>==i_key_copper)
SRC.SYSMESSAGE That key is unreachable.
RETURN 1
ENDIF
IF (<SRC.TARG.TYPE>==t_food)
IF (<EVAL <SRC.UID>>==<SRC.TARG.LINK.MORE>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4) || (<EVAL <SRC.TARG.LINK.TAG.CO1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F9UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F10UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F11UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F12UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F13UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F14UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F15UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F16UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F17UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F18UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F19UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F20UID>>==<EVAL <SRC.UID>>)
RETURN 0
ELSE
SRC.SYSMESSAGE You cannot eat that, it belongs to someone else.
RETURN 1
ENDIF
ENDIF
IF (<SRC.TARG.TYPE>==t_food_raw)
IF (<EVAL <SRC.UID>>==<SRC.TARG.LINK.MORE>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4) || (<EVAL <SRC.TARG.LINK.TAG.CO1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F9UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F10UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F11UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F12UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F13UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F14UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F15UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F16UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F17UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F18UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F19UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F20UID>>==<EVAL <SRC.UID>>)
RETURN 1
ELSE
SRC.MESSAGE You cannot use this unless you are a friend of the house.
RETURN 1
ENDIF
ENDIF
IF (<SRC.TARG.TYPE>==t_book)
IF (<EVAL <SRC.UID>>==<SRC.TARG.LINK.MORE>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4) || (<EVAL <SRC.TARG.LINK.TAG.CO1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F9UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F10UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F11UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F12UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F13UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F14UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F15UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F16UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F17UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F18UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F19UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F20UID>>==<EVAL <SRC.UID>>)
SRC.TARG.MORE 1
RETURN 0
ELSE
SRC.TARG.MORE 1
RETURN 0
ENDIF
ENDIF
IF (<SRC.TARG.TYPE>==t_rune)
IF (<EVAL <SRC.UID>>==<SRC.TARG.LINK.MORE>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4) || (<EVAL <SRC.TARG.LINK.TAG.CO1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F9UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F10UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F11UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F12UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F13UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F14UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F15UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F16UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F17UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F18UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F19UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F20UID>>==<EVAL <SRC.UID>>)
RETURN 0
ELSE
SRC.MESSAGE You cannot use this unless you are a friend of the house.
RETURN 1
ENDIF
ENDIF
IF (<SRC.TARG.TYPE>==t_booze) && (<EVAL <SRC.UID>>==<SRC.TARG.LINK.MORE>)
IF (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4) || (<EVAL <SRC.TARG.LINK.TAG.CO1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F9UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F10UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F11UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F12UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F13UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F14UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F15UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F16UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F17UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F18UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F19UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F20UID>>==<EVAL <SRC.UID>>)
RETURN 0
ELSE
SRC.SYSMESSAGE You cannot drink that, it belongs to someone else.
RETURN 1
ENDIF
ENDIF
IF (<SRC.TARG.TYPE>==t_potion)
IF (<EVAL <SRC.UID>>==<SRC.TARG.LINK.MORE>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4) || (<EVAL <SRC.TARG.LINK.TAG.CO1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F9UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F10UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F11UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F12UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F13UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F14UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F15UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F16UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F17UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F18UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F19UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F20UID>>==<EVAL <SRC.UID>>)
RETURN 1
ELSE
SRC.MESSAGE You cannot use this unless you are a friend of the house.
RETURN 1
ENDIF
ENDIF
IF (<SRC.TARG.TYPE>==t_scroll)
IF (<EVAL <SRC.UID>>==<SRC.TARG.LINK.MORE>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4) || (<EVAL <SRC.TARG.LINK.TAG.CO1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F9UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F10UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F11UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F12UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F13UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F14UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F15UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F16UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F17UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F18UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F19UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F20UID>>==<EVAL <SRC.UID>>)
RETURN 1
ELSE
SRC.MESSAGE You cannot use this unless you are a friend of the house.
RETURN 1
ENDIF
ENDIF
IF (<SRC.TARG.TYPE>==t_ore)
IF (<EVAL <SRC.UID>>==<SRC.TARG.LINK.MORE>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4) || (<EVAL <SRC.TARG.LINK.TAG.CO1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F9UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F10UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F11UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F12UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F13UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F14UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F15UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F16UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F17UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F18UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F19UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F20UID>>==<EVAL <SRC.UID>>)
SRC.SYSMESSAGE You cannot smelt this while it is locked down.
RETURN 1
ELSE
SRC.MESSAGE You cannot use this unless you are a friend of the house.
RETURN 1
ENDIF
ENDIF
IF (<SRC.TARG.TYPE>==t_log)
IF (<EVAL <SRC.UID>>==<SRC.TARG.LINK.MORE>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4) || (<EVAL <SRC.TARG.LINK.TAG.CO1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F9UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F10UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F11UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F12UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F13UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F14UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F15UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F16UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F17UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F18UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F19UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F20UID>>==<EVAL <SRC.UID>>)
RETURN 1
ELSE
SRC.MESSAGE You cannot use this unless you are a friend of the house.
RETURN 1
ENDIF
ENDIF
IF (<SRC.TARG.TYPE>==t_reagent)
IF (<EVAL <SRC.UID>>==<SRC.TARG.LINK.MORE>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4) || (<EVAL <SRC.TARG.LINK.TAG.CO1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F9UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F10UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F11UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F12UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F13UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F14UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F15UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F16UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F17UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F18UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F19UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F20UID>>==<EVAL <SRC.UID>>)
RETURN 1
ELSE
SRC.MESSAGE You cannot use this unless you are a friend of the house.
RETURN 1
ENDIF
ENDIF
IF (<SRC.TARG.TYPE>==t_fish)
IF (<EVAL <SRC.UID>>==<SRC.TARG.LINK.MORE>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4) || (<EVAL <SRC.TARG.LINK.TAG.CO1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F9UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F10UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F11UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F12UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F13UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F14UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F15UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F16UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F17UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F18UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F19UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F20UID>>==<EVAL <SRC.UID>>)
RETURN 0
ELSE
SRC.MESSAGE You cannot use this unless you are a friend of the house.
RETURN 1
ENDIF
ENDIF
IF (<SRC.TARG.TYPE>==t_ingot)
IF (<EVAL <SRC.UID>>==<SRC.TARG.LINK.MORE>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4) || (<EVAL <SRC.TARG.LINK.TAG.CO1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F9UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F10UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F11UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F12UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F13UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F14UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F15UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F16UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F17UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F18UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F19UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F20UID>>==<EVAL <SRC.UID>>)
RETURN 1
ELSE
SRC.MESSAGE You cannot use this unless you are a friend of the house.
RETURN 1
ENDIF
ENDIF
IF (<SRC.TARG.ATTR>=<SRC.TARG.ATTR>|attr_move_never) && (<SRC.TARG.TYPE>==t_drink)
RETURN 0
ENDIF
IF (<SRC.TARG.TYPE>==t_spellbook)
IF (<EVAL <SRC.UID>>==<SRC.TARG.LINK.MORE>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4) || (<EVAL <SRC.TARG.LINK.TAG.CO1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F9UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F10UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F11UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F12UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F13UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F14UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F15UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F16UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F17UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F18UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F19UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F20UID>>==<EVAL <SRC.UID>>)
RETURN 0
ELSE
SRC.MESSAGE You cannot use this unless you are a friend of the house.
RETURN 1
ENDIF
ENDIF
IF (<SRC.TARG.TYPE>==t_bandage)
IF (<EVAL <SRC.UID>>==<SRC.TARG.LINK.MORE>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4) || (<EVAL <SRC.TARG.LINK.TAG.CO1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F9UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F10UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F11UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F12UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F13UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F14UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F15UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F16UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F17UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F18UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F19UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F20UID>>==<EVAL <SRC.UID>>)
RETURN 0
ELSE
SRC.MESSAGE You cannot use this unless you are a friend of the house.
RETURN 1
ENDIF
ENDIF
IF (<SRC.TARG.ATTR>=<SRC.TARG.ATTR>|attr_move_never) && (<SRC.TARG.TYPE>==t_pitcher)
RETURN 0
ENDIF
IF (<SRC.TARG.TYPE>==t_hair_dye)
IF (<EVAL <SRC.UID>>==<SRC.TARG.LINK.MORE>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4) || (<EVAL <SRC.TARG.LINK.TAG.CO1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F9UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F10UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F11UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F12UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F13UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F14UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F15UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F16UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F17UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F18UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F19UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F20UID>>==<EVAL <SRC.UID>>)
RETURN 1
ELSE
SRC.MESSAGE You cannot use this unless you are a friend of the house.
RETURN 1
ENDIF
ENDIF
ON=@ItemClick
IF (<ACT.TYPE>==t_door) || (<ACT.TYPE>==t_door_locked) || (<ACT.TYPE>==t_sign_gump)
RETURN 0
ELSEIF (<ACT.CONT>>0)
RETURN 0
ELSEIF (<ACT.LINK><=04ffffff)
RETURN 0
ELSEIF (<ACT.ATTR>=<ACT.ATTR>|attr_move_never) || (<ACT.TYPE>==t_deed_locked)
ACT.MESSAGE [locked down]
ACT.MESSAGE
RETURN 0
ELSE
RETURN 0
ENDIF
[ITEMDEF i_house_key]
DEFNAME=i_house_key
ID=01010
NAME=house key
TYPE=t_script
ON=@DClick
IF (<ATTR>=<ATTR>|attr_move_never)
SRC.SYSMESSAGE That key is unreachable.
RETURN 1
ELSEIF (<MOREX>==1)
MOREX 0
RETURN 1
ELSEIF (<MORE>==0)
MORE <MORE2>
TARGET
TYPE t_script
MESSAGE What shall I use this key on?
RETURN 1
ELSE
TARGET
TYPE t_script
MESSAGE What shall I use this key on?
RETURN 1
ENDIF
ON=@Targon_Char
SRC.TARG.MESSAGE You can&裟t unlock that!
RETURN 1
ON=@Targon_Item
IF (<SRC.TARG.MORE>==<MORE>) && (<SRC.TARG.TYPE>==t_sign_gump)
TYPE t_key
RETURN 0
ELSEIF (<SRC.TARG.MORE>==<MORE>) && (<SRC.TARG.TYPE>==t_door) && (<SRC.TARG.LINK.LINK.MOREY>==1)
SRC.TARG.MESSAGE Public houses are always unlocked.
SRC.TARG.TYPE t_door
RETURN 1
ELSEIF (<SRC.TARG.MORE>==<MORE>) && (<SRC.TARG.TYPE>==t_door_locked) && (<SRC.TARG.LINK.LINK.MOREY>==1)
SRC.TARG.MESSAGE Public houses are always unlocked.
SRC.TARG.TYPE t_door
RETURN 1
ELSEIF (<SRC.TARG.TYPE>==t_door) && (<SRC.TARG.LINK.MORE>==<EVAL <SRC.UID>>) && !(<SRC.TARG.MORE>==<MORE>) && (<SRC.TARG.LINK.LINK.MORE>==<MORE>)
SRC.TARG.MESSAGE You lock a <SRC.TARG.NAME>.
SRC.TARG.TYPE t_door_locked
SRC.TARG.MORE <LINK.LINK.MORE>
RETURN 1
ELSEIF (<SRC.TARG.TYPE>==t_door_locked) && (<SRC.TARG.LINK.MORE>==<EVAL <SRC.UID>>) && !(<SRC.TARG.MORE>==<MORE>) && (<SRC.TARG.LINK.LINK.MORE>==<MORE>)
SRC.TARG.MESSAGE You unlock a <SRC.TARG.NAME>.
SRC.TARG.TYPE t_door
SRC.TARG.MORE <LINK.LINK.MORE>
RETURN 1
ELSEIF (<SRC.TARG.MORE>==<MORE>) && (<SRC.TARG.TYPE>==t_door_locked) && (<SRC.TARG.LINK.LINK.MOREY>==0)
SRC.TARG.MESSAGE You unlock a <SRC.TARG.NAME>.
SRC.TARG.TYPE t_door
RETURN 1
ELSEIF (<SRC.TARG.MORE>==<MORE>) && (<SRC.TARG.TYPE>==t_door) && (<SRC.TARG.LINK.LINK.MOREY>==0)
SRC.TARG.MESSAGE You lock a <SRC.TARG.NAME>.
SRC.TARG.TYPE t_door_locked
RETURN 1
ELSEIF (<SRC.TARG.TYPE>==t_key) && (<SRC.TARG.MORE>==0)
SRC.TARG.ID i_house_key
SRC.TARG.MORE <MORE>
SRC.TARG.MORE2 <MORE2>
SRC.TARG.UPDATEX
SRC.SYSMESSAGE You have successfully copied the key.
RETURN 1
ELSEIF (<SRC.TARG.UID>==<UID>)
TYPE t_key
RETURN 0
ELSE
SRC.TARG.MESSAGE This key doesn&裟t seem to unlock that.
RETURN 1
ENDIF
[ITEMDEF i_house_open]
DEFNAME=i_house_open
ID=i_key_copper
TYPE=t_key
ON=@Create
ATTR 0090
TIMER 5
ON=@Timer
REMOVE
RETURN 1
[PLEVEL 0]
FIXZ
[FUNCTION fixZ]
IF (<SRC.REGION.FLAGS>==010d2)
FIX
RETURN 0
ELSEIF (<EVAL <SRC.UID>>==<SRC.TARG.LINK.MORE>) || (<EVAL <SRC.TARG.LINK.TAG.CO1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.CO8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F1UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F2UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F3UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F4UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F5UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F6UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F7UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F8UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F9UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F10UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F11UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F12UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F13UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F14UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F15UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F16UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F17UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F18UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F19UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.TARG.LINK.TAG.F20UID>>==<EVAL <SRC.UID>>) || (<EVAL <SRC.ACCOUNT.PLEVEL>>>=4)
FIX
RETURN 0
ELSEIF (<SRC.REGION.FLAGS>==01092) || (<SRC.REGION.FLAGS>==01192)
SRC.SYSMESSAGE You cannot use this feature in houses.
SRC.SYSMESSAGE If you are stuck, page a Game Master with the &裟Stuck&裟 option in your shard&裟s Help menu.
RETURN 1
ELSE
FIX
RETURN 0
ENDIF
[FUNCTION checkdoor]
IF (<LINK.BASEID>==0)
RETURN 0
ELSEIF ((<SRC.DIR>==3) || (<SRC.DIR>==4) || (<SRC.DIR>==5)) && (<DISPID>==i_door_wood) && (<ID>==06a5) && (<TYPE>==t_door_locked)
CHECKDOORA
SRC.MESSAGE That is locked, but is usable from the inside.
RETURN 0
ELSEIF ((<SRC.DIR>==3) || (<SRC.DIR>==4) || (<SRC.DIR>==5)) && (<DISPID>==06a6) && (<ID>==06a5) && (<TYPE>==t_door_locked)
CHECKDOORA
RETURN 0
ELSEIF ((<SRC.DIR>==3) || (<SRC.DIR>==4) || (<SRC.DIR>==5)) && (<DISPID>==06a7) && (<ID>==06a7) && (<TYPE>==t_door_locked)
CHECKDOORA
SRC.MESSAGE That is locked, but is usable from the inside.
RETURN 0
ELSEIF ((<SRC.DIR>==3) || (<SRC.DIR>==4) || (<SRC.DIR>==5)) && (<DISPID>==06a8) && (<ID>==06a7) && (<TYPE>==t_door_locked)
CHECKDOORA
RETURN 0
ELSEIF ((<SRC.DIR>==3) || (<SRC.DIR>==4) || (<SRC.DIR>==5)) && (<DISPID>==i_door_metal) && (<ID>==0675) && (<TYPE>==t_door_locked)
CHECKDOORA
SRC.MESSAGE That is locked, but is usable from the inside.
RETURN 0
ELSEIF ((<SRC.DIR>==3) || (<SRC.DIR>==4) || (<SRC.DIR>==5)) && (<DISPID>==0676) && (<ID>==0675) && (<TYPE>==t_door_locked)
CHECKDOORA
RETURN 0
ELSEIF ((<SRC.DIR>==3) || (<SRC.DIR>==4) || (<SRC.DIR>==5)) && (<DISPID>==0677) && (<ID>==0677) && (<TYPE>==t_door_locked)
CHECKDOORA
SRC.MESSAGE That is locked, but is usable from the inside.
RETURN 0
ELSEIF ((<SRC.DIR>==3) || (<SRC.DIR>==4) || (<SRC.DIR>==5)) && (<DISPID>==0678) && (<ID>==0677) && (<TYPE>==t_door_locked)
CHECKDOORA
RETURN 0
ELSEIF ((<SRC.DIR>==3) || (<SRC.DIR>==4) || (<SRC.DIR>==5)) && (<DISPID>==06ad) && (<ID>==06ad) && (<TYPE>==t_door_locked)
CHECKDOORA
SRC.MESSAGE That is locked, but is usable from the inside.
RETURN 0
ELSEIF ((<SRC.DIR>==3) || (<SRC.DIR>==4) || (<SRC.DIR>==5)) && (<DISPID>==06ae) && (<ID>==06ad) && (<TYPE>==t_door_locked)
CHECKDOORA
RETURN 0
ELSEIF ((<SRC.DIR>==5) || (<SRC.DIR>==6) || (<SRC.DIR>==7)) && (<DISPID>==067d) && (<ID>==067d) && (<TYPE>==t_door_locked)
CHECKDOORA
SRC.MESSAGE That is locked, but is usable from the inside.
RETURN 0
ELSEIF ((<SRC.DIR>==5) || (<SRC.DIR>==6) || (<SRC.DIR>==7)) && (<DISPID>==067e) && (<ID>==067d) && (<TYPE>==t_door_locked)
CHECKDOORA
RETURN 0
ELSEIF ((<SRC.DIR>==3) || (<SRC.DIR>==4) || (<SRC.DIR>==5)) && (<DISPID>==06b5) && (<ID>==06b5) && (<TYPE>==t_door_locked)
CHECKDOORA
SRC.MESSAGE That is locked, but is usable from the inside.
RETURN 0
ELSEIF ((<SRC.DIR>==3) || (<SRC.DIR>==4) || (<SRC.DIR>==5))