* Script  1 Activate(1)
scrp 2 9 5 1
	doif carr eq 0
		doif grav eq 0
			subv attr 3
			setv var8 posl
			setv var9 post
			subv var8 3
			addv var9 6
			loop
				setv var0 pose
				addv var0 1
				pose var0
			untl pose eq 17
			inst
			new: simp trul 1 18 4100 0
			setv cls2 2 21 5
			setv attr 195
			setv accg 3
			mvto var8 var9
			slim
			rndv var0 -5 5
			mulv var0 5
			setv velx var0
			setv vely -20
			snde boin
			tick 100
			targ ownr
			pose 0
			addv attr 3
		endi
	endi
	setv actv 0
endm