* Script  1 Activate(1)
scrp 2 20 4 1
	setv ov00 3
	tick 2
	stim writ from 0 255 0 0 42 100 0 0 0 0 0 0
endm

* Script  4 Picked up
scrp 2 20 4 4
	tick 0
	stim writ from 0 255 0 0 42 100 0 0 0 0 0 0
	doif ov00 ne 0
		doif pose ne 0
			loop
				setv var0 pose
				subv var0 1
				pose var0
			untl pose eq 0
		else
			setv ov00 0
		endi
	endi
endm

* Script  5 Dropped
scrp 2 20 4 5
	rndv var0 10 40
	tick var0
endm

* Script  9 TIMER
scrp 2 20 4 9
	doif ov00 eq 0
		tick 5
		setv ov00 1
	endi
	doif rtyp ne 2
		setv ov00 3
	endi
	doif ov00 eq 1
		doif pose lt 8
			setv var0 pose
			addv var0 1
			pose var0
		else
			setv ov00 2
			tick 10
		endi
	endi
	doif ov00 eq 2
		doif pose lt 19
			rndv var9 5 20
			tick var9
			setv var0 pose
			addv var0 1
			pose var0
		else
			pose 9
		endi
	endi
	doif ov00 eq 3
		doif pose gt 0
			setv var0 pose
			subv var0 1
			pose var0
		else
			setv ov00 0
			tick 30
			setv actv 0
		endi
	endi
endm
