--macro constrainrepeat with x= 1 to 23set the constraint of sprite x to 1end repeat
-- macro checkspriteif the top of sprite 2 > 132 and the bottom of sprite 2 < 195 Âand the left of sprite 2 >356 and the right of sprite 2 < 419 thenspriteBox 2, 360, 137, 414, 190end ifif the top of sprite 3 > 238 and the bottom of sprite 3 < 300 Âand the left of sprite 3 >90 and the right of sprite 3 < 154 thenspriteBox 3, 95, 243, 149, 295end ifif the top of sprite 4 >78 and the bottom of sprite 4 < 195 Âand the left of sprite 4 >90 and the right of sprite 4 < 154 thenspriteBox 4, 95, 84, 149, 191end ifif the top of sprite 5 > 78 and the bottom of sprite 5 < 142 Âand the left of sprite 5 >144 and the right of sprite 5 < 207 thenspriteBox 5, 149, 83, 202, 137end ifif the top of sprite 6 > 238 and the bottom of sprite 6 < 300 Âand the left of sprite 6 >250 and the right of sprite 6 < 313 thenspriteBox 6, 254, 243, 308, 295end ifif the top of sprite 7 > 185 and the bottom of sprite 7 < 300 Âand the left of sprite 7 >144 and the right of sprite 7 < 207 thenspriteBox 7, 149, 190, 202, 296end ifif the top of sprite 8 > 185 and the bottom of sprite 8 < 248 Âand the left of sprite 8 >90 and the right of sprite 8 < 154 thenspriteBox 8, 95, 190, 149, 243end ifif the top of sprite 9 > 78 and the bottom of sprite 9 < 142 Âand the left of sprite 9 >197 and the right of sprite 9 < 260 thenspriteBox 9, 202, 83, 255, 137end ifif the top of sprite 10 >132 and the bottom of sprite 10 < 195 Âand the left of sprite 10 >197 and the right of sprite 10 < 260 thenspriteBox 10, 202, 137, 255, 190end ifif the top of sprite 11 >185 and the bottom of sprite 11 <248 Âand the left of sprite 11 >197 and the right of sprite 11 < 260 thenspriteBox 11, 201, 190, 254, 243end ifif the top of sprite 12 >238 and the bottom of sprite 12 < 300 Âand the left of sprite 12 >197 and the right of sprite 12 < 260 thenspriteBox 12, 201, 243, 255, 295end ifif the top of sprite 13 >185 and the bottom of sprite 13 < 248 Âand the left of sprite 13 >356 and the right of sprite 13 < 419 thenspriteBox 13, 360, 190, 414, 243end ifif the top of sprite 14 >78 and the bottom of sprite 14 < 142 Âand the left of sprite 14 >250 and the right of sprite 14 < 313 thenspriteBox 14, 255, 83, 308, 137end ifif the top of sprite 15 >132 and the bottom of sprite 15 < 195 Âand the left of sprite 15 >250 and the right of sprite 15 < 313 thenspriteBox 15, 254, 137, 307, 190end ifif the top of sprite 16 >165 and the bottom of sprite 16 < 248 Âand the left of sprite 16 >250 and the right of sprite 16 < 313 thenspriteBox 16, 254, 190, 307, 243end ifif the top of sprite 17 >185 and the bottom of sprite 17 < 248 Âand the left of sprite 17 >303 and the right of sprite 17 < 366 thenspriteBox 17, 306, 190, 360, 243end ifif the top of sprite 18 >78 and the bottom of sprite 18 < 142 Âand the left of sprite 18 >356 and the right of sprite 18 < 419 thenspriteBox 18, 360, 83, 414, 137end ifif the top of sprite 19 >78 and the bottom of sprite 19 < 142 Âand the left of sprite 19 >303 and the right of sprite 19 < 366 thenspriteBox 19, 307, 83, 360, 137end ifif the top of sprite 20 >238 and the bottom of sprite 20 < 300 Âand the left of sprite 20 >303 and the right of sprite 20 < 366 thenspriteBox 20, 308, 243, 361, 295end ifif the top of sprite 21 >238 and the bottom of sprite 21 < 300 Âand the left of sprite 21 >356 and the right of sprite 21 < 419 thenspriteBox 21, 360, 243, 414, 295end ifif the top of sprite 22 >132 and the bottom of sprite 22 < 195 Âand the left of sprite 22 >303 and the right of sprite 22 < 366 thenspriteBox 22, 307, 137, 360, 190end ifif the top of sprite 23 >132 and the bottom of sprite 23 < 248 Âand the left of sprite 23 >144 and the right of sprite 23 < 207 thenspriteBox 23, 149, 136, 202, 190end ifif the locH of sprite 2=387 and the locH of sprite 3=122 thenif the locH of sprite 4=122 and the locH of sprite 5=175 thenif the locH of sprite 6=281 and the locH of sprite 7=175 thenif the locH of sprite 8=122 and the locH of sprite 9=228 thenif the locH of sprite 10=228 and the locH of sprite 11=227 thenif the locH of sprite 12=228 and the locH of sprite 13=387 thenif the locH of sprite 14=281 and the locH of sprite 15=280 thenif the locH of sprite 16=280 and the locH of sprite 17=333 thenif the locH of sprite 18=387 and the locH of sprite 19=333 thenif the locH of sprite 20=334 and the locH of sprite 21=387 thenif the locH of sprite 22=333 and the locH of sprite 23=175 thenif the frame = 8 thengo to frame 10end ifif the frame = 9 thengo to frame 10end ifif the frame = 13 thengo to frame 15end ifif the frame = 14 thengo to frame 15end ifif the frame = 18 thengo to frame 20end ifif the frame = 19 thengo to frame 20end ifif the frame = 23 thengo to frame 25end ifif the frame = 24 thengo to frame 25end ifif the frame = 28 thengo to frame 30end ifif the frame = 29 thengo to frame 30end ifend ifend ifend ifend ifend ifend ifend ifend ifend if end ifend if
--macro puppettruerepeat with x = 2 to 23puppetsprite x, trueend repeat
--macro puppetfalserepeat with x = 2 to 23puppetsprite x, falseend repeatgo to frame 1
--macro puppetfalse2repeat with x = 2 to 23puppetsprite x, falseend repeat
--macro waitTicksstartTimerrepeat while the timer <2*60end repeatend wait
Script Channel Commands
--------------------
moveablespritecheckSpriteconstrainpuppettruego to frame 40play frame 16play frame 21go to frame 4go to frame 19 of movie "Entryway"play frame 19 of movie "Entryway"puppetfalsego to frame 50go to frame 52go to frame 6play frame 11play frame 26
