@prog pose.muf
1 999 d
1 i
: main
	dup if prog "_nospace" getpropstr over 1 strcut pop instr if "" else " " then else "" then
	me @ name swap strcat swap strcat
	loc @ swap #-1 swap notify_except
;
.
c
q