new: simp 1 30 5677 "blnk" 1 1 1000
attr 18
mvsf 1222 9177

scrp 1 30 5677 9
	inst
	esee 4 0 0
		doif targ ne null
			doif movs eq 0
				mvsf 1500 9200
			else
				rpas carr targ
			endi
		endi
	next
endm

rscr
inst
enum 1 30 5677
	kill targ
next