Skip to content

Redwall MUCK Site

Sections
Personal tools
You are here: Home » Programming Area » Programs Archive » Locked Box

Locked Box

Locked Object

@create box @action open;lock;unlock=box @link lock=$nothing @succ lock={lexec:{&cmd}.cmd} lsedit lock=lock.cmd {null:{store:yes,islocked}} You lock the box tightly. .end lsedit lock=unlock.cmd {null:{store:no,islocked}} You unlock the box. .end lsedit lock=open.cmd {if:{eq:{prop:islocked},no},You open the box,Sorry the box is locked.} .end @desc box=A nice box, with a small (lock) that if you (unlock) you can (open). @sdesc box=A small (box) with a lock

Created by DZeil
Last modified 2003-10-26 05:43 AM
 
 

Powered by Plone

This site conforms to the following standards: