@prog override-msg.muf
1 999 d
1 i
: say-or-run
	dup "@" 1 strncmp if
		me @ swap notify
	else
		1 strcut swap pop atoi dbref call
	then
;
: main
	trigger @ location
	loc @
	do
		dup "_override_msg" getpropstr dup if
			swap pop swap pop say-or-run exit
		then
		pop
		over over dbcmp if pop pop exit then
		location
	loop
;
.
c
q