@create Memo Board=10
@Desc Memo Board=A simple memo board. It listens for people to arrive, then records the time they visited. If you have a suggestion for what this place should be for us, type 'memo (whatever, blah blah)'
@VB Memo Board=<_>
@VC Memo Board=@switch strlen(v(va))=3,{},{"People have visited.};@switch strlen(v(vb))=3,{},{"You have messages.}
@VD Memo Board=NOTES: the commands to use this machine are 'show guests', 'play messages', 'clear guests', 'memo <message>', and 'clear messages'. These commands do exactly what you would expect them to. The AHEAR on the machine makes it so when the owner of the machine arrives, his/her name is not recorded(to save space). The AHEAR will trigger VC when the owner arrives. VC checks to see if anyone has visited, or if there are any messages, and will notify the owner of such facts. If there are no visitors, nor any messages, the answering machine will do nothing when the owner arrives.
@VE Memo Board=CREDITS: This exhibit appears courtesy of Stranger.
@VU Memo Board=$memo *:@edit me/vb={<_>},{"[v(0)]" - [name(owner(v(n)))]...<_>};"I'll give [name(owner(me))] the message.
@VV Memo Board=$show messages:"Here are the messages:;"[v(vb)]
@VW Memo Board=$clear messages:@switch name(owner(v(n)))=[name(owner(me))],{"Messages cleared.;@vb me=<_>},{"Only [name(owner(me))] can clear the messages.}
@VY Memo Board=$show guests:"Here's who has visted:;"[v(va)]
@VZ Memo Board=@switch name(owner(v(n)))=[name(owner(me))],{"Guest register cleared.;@va me=<+>},{"Only [name(owner(me))] can clear the guest register.}
@Listen Memo Board=* has arrived.
@Ahear Memo Board=@switch name(owner(v(n)))=[name(owner(me))],{@trigger me/vc},{@edit me/va={<+>},{%N stopped by [time()]...<+>}
@rxlevel Memo Board= Real
@txlevel Memo Board= Real



I'd name it something else, of course. Maybe make a poster for a lost dog or something.