* Script  4 Picked up
scrp 2 25 17 4
	setv size 101
endm

* Script  6 Colission
scrp 2 25 17 6
	snde dr10
endm

* Script  9 TIMER
scrp 2 25 17 9
	lock
	addv ov00 1
	doif carr eq 0
		doif ov00 gt 20
			addv ontr 5
			kill ownr
		else
			doif ov00 gt 15
				setv grav 1
			endi
		endi
	endi
	unlk
endm

* Script 
scrp 2 25 17 12
	snde chwp
	stim writ from 0 255 0 0 73 80 37 80 156 50 0 0
	kill ownr
endm

