* 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
