* Script  1 Activate(1)
scrp 3 1 2 1
	subv attr 4
	part 2
	anim [0101010]
	over
	sndl sub4
	doif ov00 eq 0
		gpas
		part 5
		anim [012321R]
		part 4
		anim [012321R]
		setv vely 10
		snde sub1
		rtar 2 9 8
		subv attr 4
		rtar 2 9 7
		subv attr 4
		doif ov00 eq 1
			mesg writ targ 0
		endi
		targ ownr
		snde sub2
		loop
			wait 1
		untl posb ge 1300
		setv vely 5
		snde sub3
		loop
			wait 1
		untl posb ge 1420
		part 4
		pose 0
		setv vely 0
		setv velx 10
		snde sub1
		loop
			wait 1
		untl posr ge 6500
		setv velx 5
		loop
			wait 1
		untl posr ge 6685
		setv velx 0
		part 5
		pose 0
		setv ov00 1
		rtar 2 9 7
		addv attr 4
		rtar 2 9 8
		addv attr 4
		mesg writ targ 0
		targ ownr
		fade
		reps 5
			mvby 0 4
		repe
		dps2 0
		addv attr 4
		setv actv 0
		stop
	endi
	doif ov00 eq 1
		gpas
		rtar 2 9 8
		subv attr 4
		rtar 2 9 7
		subv attr 4
		doif ov00 eq 1
			mesg writ targ 0
			wait 10
		endi
		targ ownr
		reps 5
			mvby 0 -4
		repe
		part 4
		anim [012321R]
		snde sub1
		setv velx -5
		loop
			wait 1
		untl posl le 6100
		snde sub2
		part 5
		anim [012321R]
		setv velx 0
		setv vely -10
		loop
			wait 1
		untl posb le 1150
		setv vely -5
		snde sub3
		loop
			wait 1
		untl posb le 1090
		setv vely 0
		setv velx 10
		snde sub2
		part 4
		pose 0
		loop
			wait 1
		untl posr ge 7200
		setv velx 5
		snde sub1
		loop
			wait 1
		untl posr ge 7368
		setv velx 0
		part 4
		anim [012321R]
		setv vely -5
		snde sub3
		loop
			wait 1
		untl posb le 990
		setv vely 0
		part 5
		pose 0
		part 4
		pose 0
		fade
		setv ov00 2
		rtar 2 9 7
		addv attr 4
		rtar 2 9 8
		addv attr 4
		targ ownr
		dps2 0
		addv attr 4
		setv actv 0
		etch 4 0 0
		setv vely -70
	next
	stop
endi
doif ov00 eq 2
	gpas
	part 5
	anim [012321R]
	part 4
	anim [012321R]
	setv vely 5
	snde sub1
	loop
		wait 1
	untl posb ge 1100
	setv vely 0
	part 5
	pose 0
	setv velx -10
	snde sub2
	loop
		wait 1
	untl posl le 6200
	snde sub2
	setv velx -5
	loop
		wait 1
	untl posl le 6066
	setv velx 0
	part 5
	anim [012321R]
	setv vely -5
	snde sub3
	loop
		wait 1
	untl posb le 960
	setv vely 0
	fade
	part 5
	pose 0
	part 4
	pose 0
	targ ownr
	dps2 0
	setv ov00 0
	addv attr 4
	setv actv 0
	etch 4 0 0
	setv vely -40
next
stop
endi
endm

* Script  2 Activate(2)
scrp 3 1 2 2
	subv attr 4
	part 3
	anim [0101010]
	over
	sndl sub4
	doif ov00 eq 0
		gpas
		part 5
		anim [012321R]
		part 4
		anim [012321R]
		setv vely 5
		snde sub3
		loop
			wait 1
		untl posb ge 1100
		setv vely 0
		part 4
		pose 0
		setv velx 10
		snde sub1
		loop
			wait 1
		untl posr ge 7200
		setv velx 5
		snde sub2
		loop
			wait 1
		untl posr ge 7380
		setv velx 0
		part 5
		anim [012321R]
		setv vely -5
		snde sub3
		loop
			wait 1
		untl posb le 980
		setv vely 0
		fade
		part 5
		pose 0
		part 4
		pose 0
		targ ownr
		dps2 0
		setv ov00 2
		addv attr 4
		setv actv 0
		etch 4 0 0
		setv vely -70
	next
	stop
endi
doif ov00 eq 2
	gpas
	rtar 2 9 8
	subv attr 4
	rtar 2 9 7
	subv attr 4
	doif ov00 eq 1
		mesg writ targ 0
		wait 10
	endi
	targ ownr
	part 4
	anim [012321R]
	part 5
	anim [012321R]
	setv vely 5
	snde sub1
	loop
		wait 1
	untl posb ge 1100
	setv vely 0
	part 4
	pose 0
	setv velx -10
	snde sub3
	loop
		wait 1
	untl posl le 6200
	setv velx -5
	snde sub2
	loop
		wait 1
	untl posl le 6100
	setv velx 0
	part 4
	anim [012321R]
	setv vely 5
	snde sub3
	loop
		wait 1
	untl posb ge 1430
	setv vely 0
	part 4
	pose 0
	setv velx 10
	snde sub1
	loop
		wait 1
	untl posr ge 6500
	setv velx 5
	snde sub3
	loop
		wait 1
	untl posr ge 6685
	setv velx 0
	part 5
	pose 0
	setv ov00 1
	rtar 2 9 7
	addv attr 4
	rtar 2 9 8
	addv attr 4
	mesg writ targ 0
	targ ownr
	fade
	reps 5
		mvby 0 4
	repe
	dps2 0
	addv attr 4
	setv ov00 1
	setv actv 0
	stop
endi
doif ov00 eq 1
	gpas
	rtar 2 9 8
	subv attr 4
	rtar 2 9 7
	subv attr 4
	doif ov00 eq 1
		mesg writ targ 0
		wait 10
	endi
	targ ownr
	gpas
	reps 5
		mvby 0 -4
	repe
	part 4
	anim [012321R]
	setv velx -5
	snde sub1
	loop
		wait 1
		gpas
	untl posl le 6100
	setv velx 0
	rtar 2 9 8
	addv attr 4
	rtar 2 9 7
	addv attr 4
	targ ownr
	part 5
	anim [012321R]
	setv vely -10
	snde sub2
	loop
		wait 1
	untl posb le 1100
	setv vely -5
	snde sub3
	loop
		wait 1
	untl posb le 990
	fade
	part 4
	pose 0
	part 5
	pose 0
	etch 4 0 0
	reps 5
		mvby 0 -2
	repe
next
targ ownr
dps2 0
setv vely 0
setv ov00 0
setv actv 0
addv attr 4
etch 4 0 0
setv vely -50
next
stop
endi
endm
