scrp 3 3 11 256
	setv ov00 0
	reps 5
		enum 2 9 28
			rndv var0 0 1
			doif var0 eq 0
				snde lap1
			else
				snde lap2
			endi
		next
		mvto _p1_ _p2_
		bbd: emit 1
		wait 20
		mvto 4300 640
		wait 20
		addv ov00 1
	repe
endm
