[ITEMDEF i_atm_stone]

NAME=ATM

ID=0edc 

SUBSECTION=Stones

CATEGORY=Other

DESCRIPTION=ATM Stone 



ON=@CREATE

COLOR=0481

ATTR=0010 



ON=@DCLICK

IF <SRC.RESTEST 1 i_atm_card>

SRC.BANKSELF

SRC.SYSMESSAGE You have accessed your bank box using your ATM card!

Return 1

ELSE

SRC.SYSMESSAGE You must have an ATM Card to access the ATM!

Return 1 



[ITEMDEF i_atm_card]

ID=01f14

NAME=ATM Card 

SUBSECTION=Stones

CATEGORY=Other

DESCRIPTION=ATM Stone



ON=@CREATE

COLOR=0481 



ON=@DCLICK

SRC.SYSMESSAGE You can only use this at an ATM!

Return 1 



[EOF]