@prog subway-staff-lock.muf
1 999 d
1 i
: main
	me @ true-royalty? if pop 1 exit then
	prog "_staff" getpropstr atoi dbref
	"_staff-" me @ int intostr strcat getpropstr "" strcmp
;
.
c
q