cContainer

<#****** / ^^^^^^ / ||||||> opstat 9029
Object 9029:
[1]: Commands [set] Keys [passcode] Type [held]
[2]: Commands [enter] Keys [passcode] Type [held]
[3]: Commands [] Keys [] Type [all]

<#****** / ^^^^^^ / ||||||> opstat 9029 1
Object 9029 Program Number 1:

opcmd 9029 1 set
opkey 9029 1 passcode
info passcode room -1 char -1 inv 9029 oval3
info lockstatus room -1 char -1 inv 9029 oval1
if (&(lockstatus)=5)
if (&(1)>0)
force -1 -1 emote taps a few numbers into *lockb's keypad.
setval room -1 char -1 inv 9029 oval3 &(1)
vstr This lockbox's code has been set to &(1).
else do
vstr The access code needs to be a numeric string.
fi done
else do
vstr This lockbox needs to be closed and unlocked to have a code set.
fi done

<#****** / ^^^^^^ / ||||||> opstat 9029 2
Object 9029 Program Number 2:

info passcode room -1 char -1 inv 9029 oval3
info lockstatus room -1 char -1 inv 9029 oval1
if (&(1)=&(passcode))
if (&(lockstatus)=5)
force -1 -1 emote taps a few buttons on *lockb and the thing seals shut.
setval room -1 char -1 inv 9029 oval1 4
else do
if (&(lockstatus)=4)
force -1 -1 emote taps a few buttons on *lockb and the thing unlocks.
setval room -1 char -1 inv 9029 oval1 5
else do
vstr The lockbox needs to either be closed and unlocked, or locked.
fi done
else do
fi done
else do
vstr Your code is wrong.
fi done