@prog tess-record-loc.muf
1 999 d
1 i
: main
	trigger @ "holder" getpropstr atoi dbref
	"prior-loc" loc @ int intostr 0 addprop
	1
;
.
c
q