programmed by Mark Bentivegna
Lakeview School
Denville New Jersey

 

to goback?
page1
end

 

 

to Swans
hidetext
tto [ t1 t12 t13 ]
seth 90
repeat 500 [ fd 20 wait 1 ]
repeat 4 [ hidetext
showtext wait 5 ]
end

to join?
tto [ t1 t2 t3 t4 t5 t7 t8 t9 t10 t17 ]
st
tto [ t18 ]
ht
tto [ t7 ] setpos [ -105 -164 ]
setsh [ 44 ]
tto [ t1 ] setpos [ 28 -164 ]
seth 270
repeat 9 [ fd 10 wait 2 ]
tto [ t7 ]
setsh [ 46 ]
seth 180
repeat 4 [ fd 10 wait 2 ]
tto [ t6 ]
st
tto [ t7 ]
ht
tto [ t6 ] setpos [ -70 84 ]
seth 225
repeat 22 [ fd 10 wait 2 ]
tto [ t1 t2 t3 t4 t5 t7 t8 t9 t10 t17 ]
ht
tto [ t6 ]
ht
tto [ t18 ]
st setsize 160 wait 20
page3
end

to leave?
page2
end

to ka-bam!
page6
end

to B.O.B.
page4
end

to Boston
hidetext
tto [ t6 t23 ]
st
tto [ t2 ]
ht
tto [ t26 ]
ht
tto [ t6 ]
st
tto [ t19 t20 t21 t22 ]
ht
tto [ t4 ] setpos [ -167 -71 ]

tto [t24] setsh [ white ]
tto [ t25 t3 t4 t24]
st
tto [ t15 t16 t17 t18 ]
st
tto [ t23 ] setpos [ -238 -200 ]
seth 90
repeat 9 [ fd 25 wait 5 ]
tto [ t6 ]
ht
tto [ t26 ]
st wait 5
tto [ t6 t23 t26 ]
ht
tto [ t19 ] setpos [ 14 51 ]
tto [ t20 ] setpos [ 77 46 ]
tto [ t21 ] setpos [ 126 51 ]
tto [ t22 ] setpos [ 173 52 ]
tto [ t4 ]
st
seth 270
repeat 10 [ fd 10 wait 5 ]
tto [ t25 t3 t4 ]
ht
tto [ t15 t16 t17 t18 ]
ht
tto [ t24 ]
ht

tto [ t19 t20 t21 t22 ]
st
seth 180
repeat 5 [ fd 50 wait 5 ]
ht

repeat 4 [hidetext wait 5
showtext wait 5]

tto [ t2 ]
st
setsize 85 wait 15
page13
end

to LOSR
tto [ t1 t3 ]
st
tto [ t2 ] setpos [ -19 -117 ]
tto [ t3 ] setpos [ 201 -148 ]
tto [ t2 t3 ]
seth 270
repeat 25 [ fd 15 wait 1 ]
page7
tto [ t5 ]
st
tto [ t4 ] setpos [ 163 -61 ]
tto [ t5 ] setpos [ 362 -101]
tto [ t4 t5 ]
seth 270
tto [ t5 ]
seth 315
repeat 14 [ fd 10 wait 1 ]
fd 150 wait 2
seth 225
fd 275 wait 2
ht
tto [ t1 ]
ht
tto [ t2 t3 ]
st
tto [ t2 ] setpos [ -286 135 ]
tto [ t3 ] setpos [ 81 137 ]
tto [ t2 ]
seth 90
repeat 3 [ fd 55 wait 5 ]
tto [ t3 ]
seth 270
repeat 3 [ fd 50 wait 5 ]
tto [ t2 t3 ]
ht
tto [ t1 ]
st
setsize 160 wait 5
tto [ t1 ]
ht
page5

end

to bonus
page9
end

to action
page12
end

to Dogs
tto [ t1 t2 t3 t4 t5 t6 t7 t8 ]
st
tto [ t8 ] setpos [ 358 -48 ]
tto [ t7 ] setpos [ -347 -7 ]
tto [ t1 ] setpos [ -218 -47 ]
tto [ t2 ] setpos [ -103 -46 ]
tto [ t3 ] setpos [ 13 -40 ]
tto [ t4 ] setpos [ 180 -46 ]
tto [ t5 ] setpos [ 293 -46 ]
tto [ t6 ] setpos [ 103 -44 ]
tto [ t1 t2 t3 t4 t5 t6 t7 t8 ]
seth 90
repeat 5 [ fd 1 wait 1 ]
tto [ t8 ]
ht
repeat 5 [ fd 2 wait 1 ]
tto [ t1 t2 t3 t4 t5 t6 t7 ]
seth 90
repeat 5 [ fd 12 wait 2 ]
tto [ t5 ]
ht
tto [ t1 t2 t3 t4 t5 t6 t7 t8 ]
repeat 10 [ fd 12 wait 2 ]
tto [ t4 ]
ht
tto [ t1 t2 t3 t4 t5 t6 t7 t8 ]
repeat 10 [ fd 8 wait 2]
tto [ t6 ]
ht
tto [ t1 t2 t3 t7 ]
repeat 10 [ fd 8 wait 2 ]
tto [ t3 ]
ht
tto [ t1 t2 t7 ]
repeat 10 [ fd 11 wait 2 ]
tto [ t2 ]
ht
tto [ t1 t7 ]
repeat 10 [ fd 12 wait 2 ]
tto [ t1 ]
ht
tto [ t7 ]
repeat 10 [ fd 13 wait 2 ]
tto [ t7 ]
ht
page14
end

to escape
tto [ t6 ] setpos [ 352 -152 ]
st
seth 315
repeat 5 [ fd 100 wait 5 ]
tto [ t6 ] setsh [ dude ] wait 5
tto [ t6 ] setsh [ 32 ]
tto [ t6 ]
seth 225
repeat 5 [ fd 100 wait 5 ]
tto [ t6 ]
ht
tto [ t1 ] setpos [ -187 -169 ]
tto [ t4 ] setpos [ -163 -200 ]
tto [ t5 ] setpos [ -203 -194 ]
tto [ t1 t4 t5 ]
st
tto [ t1 t4 t5 ]
seth 270
repeat 10 [ fd 20 wait 2 ]
tto [ t1 t4 t5 ]
ht
page11
end

to go
page16
end

to cheat
page19
end

to Spain
page10
end

to Berlin
page16
end

to Australia
page18
end

to Nawlins
page17
end

to Mark
tto [ t1 ]setpos [ -206 -89 ]
tto [ t5 ] setpos [ -170 -169 ]
tto [ t3 ] setpos [ -214 -90 ]
tto [ t1 t2 t3 t4 t5 ]
st
tto [ t6 t7 ]
ht
tto [ t4 ]
setsh [ jeep ]
tto [ t7 ] setpos [ -177 123 ]
tto [ t6 ] setpos [ 154 170 ]
tto [ t5 ]
seth 90
repeat 5 [ fd 20 wait 2 ]
tto [ t4 ]
setsh [ 48 ]
tto [ t5 ]
seth 90
repeat 10 [ fd 50 wait 2 ]
tto [ t6 ]
st
tto [ t6 ]
seth 270
repeat 30 [ fd 10 wait 2 ]
tto [ t1 ]
seth 360
repeat 25 [ fd 10 wait 2 ]
tto [ t6 ]
ht
tto [ t7 t1 ]
st
seth 180
repeat 5 [ fd 50 wait 2 ]
tto [ t1 t2 t3 t4 t5 ]
ht
page15
end

to charge
tto [ t5 ]
ht
tto [ t7 t8 ]
ht
tto [ t7 ] setpos [ -145 197 ]
tto [ t8 ] setpos [ -207 198 ]
tto [ t6 ]
st
tto [ t2 ] setpos [ -286 -166 ]
tto [ t3 ] setpos [ -280 -184 ]
tto [ t2 t3 ]
seth 90
repeat 13 [ fd 15 wait 2 ]
tto [ t6 ]
ht
tto [ t5 ]
st
tto [ t7 t8 ]
st
tto [ t7 t8 ]
seth 180
repeat 13 [ fd 30 wait 2 ]
ht
page20
end

to lpark
page18
end

to Skatopia
page18
end

to paulie
tto [ t2 ]
setsh [ 34 ]
tto [ t1 t3 t4 ]
st
tto [ t1 ]
setsh [ 16 ]
tto [ t5 ] setpos [ 189 -59 ]
st
seth 315
repeat 28 [ fd 10 wait 2 ]
tto [ t5 ]
setsh [ 23 ] wait 2
tto [ t5 ]
setsh [ 35 ] wait 2
tto [ t5 ]
setsh [ 42 ] wait 2
tto [ t5 ]
setsh [ 24 ] wait 2
tto [ t5 ]
seth 270
repeat 20 [ fd 10 wait 2 ]
tto [ t5 ]
seth 235
repeat 17 [ fd 10 wait 2 ]
tto [ t5 ]
ht
tto [ t1 ]
setsh [ 16 ]
st
tto [ t2 ]
setsh [ 34 ]
tto [ t1 ] setpos [ 274 -9 ]
tto [ t4 ] setpos [ 241 -72 ]
tto [ t3 ] setpos [ 238 -86 ]
tto [ t1 ]
seth 270
repeat 2 [ fd 20 wait 2 ]

 

tto [ t4 ]
seth 270
repeat 7 [ fd 10 wait 2 ]
tto [ t2 ]
setsh [ 6 ]
tto [ t1 ]
setsh [ 11 ]
ht wait 15
page17
end

to yes
page1
end

to no
page8
end