* Script  1 Activate(1)
scrp 2 9 11 1
	snde whis
	setv var0 posl
	setv var1 post
	rtar 2 20 10
	doif targ eq 0
		inst
		new: simp dbal 1 0 8000 0
		setv cls2 2 13 12
		setv attr 199
		bhvr 1 1
		setv accg 5
		setv aero 3
		setv rest 20
		mvto var0 var1
		slim
		setv grav 1
		setv var9 targ
		setv velx -15
		setv vely -20
		new: simp pitz 200 0 8050 0
		setv cls2 2 20 10
		setv attr 199
		bhvr 1 1
		setv accg 4
		setv aero 5
		setv rest 70
		mvto var0 var1
		slim
		setv grav 1
		tick 6
		setv ov00 5
		setv ov01 -1
		setv ov03 0
		setv ov10 var9
		setv puhl -1 50 40
		setv pupt 0 19 40
		setv pupt 1 18 36
		setv pupt 2 18 32
		setv pupt 3 18 30
		setv pupt 4 19 31
		setv pupt 5 18 33
		setv pupt 6 18 36
		setv pupt 7 18 38
		setv pupt 8 78 40
		setv pupt 9 78 36
		setv pupt 10 79 32
		setv pupt 11 78 31
		setv pupt 12 78 31
		setv pupt 13 79 33
		setv pupt 14 77 36
		setv pupt 15 78 39
		setv pupt 40 15 36
		setv pupt 41 14 34
		setv pupt 42 14 37
		setv pupt 43 14 37
		setv pupt 44 15 34
		setv pupt 45 16 37
		setv pupt 46 14 39
		setv pupt 47 14 39
		setv pupt 48 92 36
		setv pupt 49 93 34
		setv pupt 50 94 37
		setv pupt 51 92 37
		setv pupt 52 92 35
		setv pupt 53 92 37
		setv pupt 54 94 39
		setv pupt 55 94 39
		setv pupt 56 18 35
		setv pupt 57 18 35
		setv pupt 58 18 35
		setv pupt 59 78 35
		setv pupt 60 78 35
		setv pupt 61 78 35
		setv pupt 62 18 44
		setv pupt 63 19 53
		setv pupt 64 22 61
		setv pupt 65 28 67
		setv pupt 66 27 66
		setv pupt 67 25 65
		setv pupt 68 28 65
		setv pupt 69 32 66
		setv pupt 70 30 66
		setv pupt 71 77 44
		setv pupt 72 75 52
		setv pupt 73 71 59
		setv pupt 74 67 64
		setv pupt 75 69 63
		setv pupt 76 71 63
		setv pupt 77 68 64
		setv pupt 78 63 62
		setv pupt 79 65 63
		setv pupt 80 19 34
		setv pupt 81 18 31
		setv pupt 82 19 29
		setv pupt 83 20 28
		setv pupt 84 20 27
		setv pupt 85 21 27
		setv pupt 86 21 27
		setv pupt 87 22 28
		setv pupt 88 23 29
		setv pupt 89 24 31
		setv pupt 90 77 33
		setv pupt 91 77 31
		setv pupt 92 75 29
		setv pupt 93 74 28
		setv pupt 94 74 27
		setv pupt 95 73 27
		setv pupt 96 72 27
		setv pupt 97 71 28
		setv pupt 98 70 30
		setv pupt 99 69 32
		setv pupt 162 26 32
		setv pupt 163 26 32
		setv pupt 164 26 32
		setv pupt 165 26 32
		setv pupt 166 26 32
		setv pupt 167 71 32
		setv pupt 168 71 32
		setv pupt 169 71 32
		setv pupt 170 71 32
		setv pupt 171 71 32
		setv pupt 172 18 39
		setv pupt 173 17 42
		setv pupt 174 16 45
		setv pupt 175 16 47
		setv pupt 176 16 49
		setv pupt 177 15 49
		setv pupt 178 14 49
		setv pupt 179 16 49
		setv pupt 180 17 48
		setv pupt 181 15 45
		setv pupt 182 78 39
		setv pupt 183 78 42
		setv pupt 184 78 45
		setv pupt 185 79 47
		setv pupt 186 79 48
		setv pupt 187 80 49
		setv pupt 188 81 48
		setv pupt 189 79 48
		setv pupt 190 79 48
		setv pupt 191 81 46
	else
		doif from eq pntr
			setv var0 posx
			setv var1 posy
			sys: cmrp var0 var1
		endi
	endi
	targ ownr
	setv actv 0
endm
