home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Allie's Playhouse
/
allies-playhouse.bin
/
maze.tbk
(
.txt
)
< prev
next >
Wrap
Asymetrix ToolBook File
|
1993-07-16
|
101KB
|
1,494 lines
Allie's Playhouse
System
Allie's Playhouse
System
Times New Roman
:PHYSSIZE
xyoffset
item1
item2
p2 +
p2 +
buttondown
buttonup
buttondown
item2
item1
xyoffset
buttonup
item2
item1
8175,5745
"Help!!!"
buttonup
buttonup
Help!!!
30,50,100
0,100,0
buttonDown
buttonUp
buttonDown
buttonUp
Kkeydown
30,50,100
0,100,0
buttonDown
buttonUp
buttonDown
buttonUp
Kkeydown
30,50,100
0,100,0
buttonDown
buttonUp
buttonDown
buttonUp
Kkeydown
30,50,100
0,100,0
keyDownArrow
buttonDown
buttonUp
buttonDown
buttonUp
Kkeydown
>&"sel")
buttondown
buttonup
buttondown
buttonup
previous
previous
:PHYSSIZE
leftsel
:PHYSSIZE
>&"sel")
buttondown
buttonup
buttondown
buttonup
right
:PHYSSIZE
rightsel
:PHYSSIZE
8242,5745
@ : l
maze2
4mousePosition, catTime
getTickCount() >
+ 600
"5550,4095"
"5550,2970"
"gotcha!"
playsound
playSound ohno
yieldApp()
543,535
"cat"
"5550,4095"
tbkMMNotify
"maze2"
tbkMCIchk("
music
tbkMMNotify
getTickCount
5550,4095
5550,2970
mouse
playsound
playSound
yieldApp
mouse
mouse
5550,4095
getTickCount
mousePosition
catTime
tbkMMNotify
maze2
play music from 0
maze2
tbkMCIchk
!4"X#|$
a1Top
a1bottom
a1right
a1left
b1top
b1bottom
b1right
b1left
c1top
c1bottom
c1right
c1left
d1top
d1bottom
d1right
d1left
e1top
e1bottom
e1right
e1left
f1top
f1bottom
f1right
f1left
a2top
a2bottom
a2right
a2left
c2top
c2bottom
c2right
c2left
d2top
d2bottom
d2right
d2left
e2top
e2bottom
e2right
e2left
f2top
f2bottom
f2right
f2left
a3top
a3bottom
a3right
a3left
b3top
b3bottom
b3right
b3left
c3top
c3bottom
c3right
c3left
d3top
d3bottom
d3right
d3left
e3top
e3bottom
e3right
e3left
f3top
f3bottom
f3right
f3left
a4top
a4bottom
a4right
a4left
b4top
b4bottom
b4right
b4left
c4top
c4bottom
c4right
c4left
d4top
d4bottom
d4right
d4left
e4top
e4bottom
e4right
e4left
f4top
f4bottom
f4right
f4left
a5top
a5bottom
a5right
a5left
b5top
b5bottom
b5right
b5left
c5top
c5bottom
c5right
c5left
d5top
d5bottom
d5right
d5left
e5top
e5bottom
e5right
e5left
f5top
f5bottom
f5right
f5left
b2top
b2bottom
b2right
b2left
cheese
*:PHYSSIZE
mouse
+:PHYSSIZE
x,:PHYSSIZE
4zpath
"c:\toolbook\playhous\"
.sbk"
(Zpath&"
tbkMCIchk("
p&"maze.wav alias
","",1)
samples","",1)
LeaveBook
[("close
R","")
tbkBitmap("
kid")
status
displayKid
buttonDoubleclick -- Used
rename lines
4mousePosition, catTime
543,535
getTickCount()
music","",1)
"level"
checkWallLeft
getNewPosLeft
playSound spring
H-1220,0
CheckWallRight
getNewPosRight
H1220,0
checkWallUp
getNewPosUp
H0,-1200
keyDownArrow
checkWallDown
getNewPosDown
H0,1200
checkWin
"maze1"
-- Winning sequence here
"You
'"cheese"
"yum"
yieldApp()
543,535
default
"maze2"
543,535
"maze3"
543,535
checkWallRight
bounce
checkWallleft
&"Top")
&"Bottom")
getNewPosleft
MousePosition
playsound sfx
("stop
","")
"cat"
8019 wait","",1)
8019
29624
29624
39471","",1)
39471
43441","",1)
"ohno"
43441
50129","",1)
checkWin
checkWallRight
enterPage
checkWallleft
checkWallUp
LeaveBook
checkWallDown
leavePage
getNewPosRight
getNewPosleft
keyDown
getNewPosUp
enterBook
getNewPosDown
playsound
enterBook
c:\toolbook\playhous\
playhous.sbk
Zpath
playhous.sbk
open
maze.wav alias maze
tbkMCIchk
set maze time format samples
tbkMCIchk
zpath
LeaveBook
close maze
tbkMCI
close kid
tbkBitmap
status kid window
tbkBitmap
displayKid
enterPage
mouse
getTickCount
open
.mid alias music
tbkMCIchk
play music from 0
tbkMCIchk
level
level
Zpath
mousePosition
catTime
leavePage
close music
tbkMCI
keyDown
35checkWallLeft
[getNewPosLeft
playSound
mouse
hCheckWallRight
getNewPosRight
playSound
mouse
checkWallUp
getNewPosUp
playSound
mouse
\@checkWallDown
fgetNewPosDown
playSound
mouse
]checkWin
spring
checkWin
maze1
cheese
playSound
yieldApp
mouse
cheese
maze2
cheese
playSound
yieldApp
mouse
cheese
maze3
cheese
playSound
yieldApp
mouse
cheese
default
mousePosition
checkWallRight
right
playSound
mouse
mouse
bounce
mousePosition
checkWallleft
playSound
mouse
mouse
bounce
mousePosition
checkWallUp
playSound
mouse
mouse
bounce
mousePosition
checkWallDown
Bottom
playSound
mouse
mouse
bounce
mousePosition
getNewPosRight
mousePosition
getNewPosleft
mousePosition
getNewPosUp
MousePosition
mousePosition
getNewPosDown
MousePosition
mousePosition
playsound
stop maze
tbkMCI
play maze from 0 to 8019 wait
tbkMCIchk
play maze from 8019 to 29624 wait
tbkMCIchk
spring
play maze from 29624 to 39471
tbkMCIchk
bounce
play maze from 39471 to 43441
tbkMCIchk
play maze from 43441 to 50129
tbkMCIchk
4zpath
"c:\toolbook\playhous\"
.sbk"
(Zpath&"
tbkMCIchk("
p&"maze.wav alias
","",1)
samples","",1)
LeaveBook
[("close
R","")
tbkBitmap("
kid")
status
displayKid
buttonDoubleclick -- Used
rename lines
4mousePosition, catTime
543,535
getTickCount()
music","",1)
"level"
checkWallLeft
getNewPosLeft
playSound spring
H-1220,0
CheckWallRight
getNewPosRight
H1220,0
checkWallUp
getNewPosUp
H0,-1200
keyDownArrow
checkWallDown
getNewPosDown
H0,1200
checkWin
"maze1"
-- Winning sequence here
"You
'"cheese"
"yum"
yieldApp()
543,535
default
"maze2"
543,535
"maze3"
543,535
checkWallRight
bounce
checkWallleft
&"Top")
&"Bottom")
getNewPosleft
MousePosition
playsound sfx
("stop
","")
"cat"
8019 wait","",1)
8019
29624
29624
39471","",1)
39471
43441","",1)
"ohno"
43441
50129","",1)
checkWin
checkWallRight
enterPage
checkWallleft
checkWallUp
LeaveBook
checkWallDown
leavePage
getNewPosRight
getNewPosleft
keyDown
getNewPosUp
enterBook
getNewPosDown
playsound
enterBook
c:\toolbook\playhous\
playhous.sbk
Zpath
playhous.sbk
open
maze.wav alias maze
tbkMCIchk
set maze time format samples
tbkMCIchk
zpath
LeaveBook
close maze
tbkMCI
close kid
tbkBitmap
status kid window
tbkBitmap
displayKid
enterPage
mouse
getTickCount
open
.mid alias music
tbkMCIchk
play music from 0
tbkMCIchk
level
level
Zpath
mousePosition
catTime
leavePage
close music
tbkMCI
keyDown
35checkWallLeft
[getNewPosLeft
playSound
mouse
hCheckWallRight
getNewPosRight
playSound
mouse
checkWallUp
getNewPosUp
playSound
mouse
\@checkWallDown
fgetNewPosDown
playSound
mouse
]checkWin
spring
checkWin
maze1
cheese
playSound
yieldApp
mouse
cheese
maze2
cheese
playSound
yieldApp
mouse
cheese
maze3
cheese
playSound
yieldApp
mouse
cheese
default
mousePosition
checkWallRight
right
playSound
mouse
mouse
bounce
mousePosition
checkWallleft
playSound
mouse
mouse
bounce
mousePosition
checkWallUp
playSound
mouse
mouse
bounce
mousePosition
checkWallDown
Bottom
playSound
mouse
mouse
bounce
mousePosition
getNewPosRight
mousePosition
getNewPosleft
mousePosition
getNewPosUp
MousePosition
mousePosition
getNewPosDown
MousePosition
mousePosition
playsound
stop maze
tbkMCI
play maze from 0 to 8019 wait
tbkMCIchk
play maze from 8019 to 29624 wait
tbkMCIchk
spring
play maze from 29624 to 39471
tbkMCIchk
bounce
play maze from 39471 to 43441
tbkMCIchk
play maze from 43441 to 50129
tbkMCIchk
4Zpath
playhouse
.tbk")
default
buttonup
buttonup
playhous.tbk
default
playhouse
Zpath
:PHYSSIZE
xyoffset
item1
item2
p2 +
p2 +
buttondown
buttonup
buttondown
item2
item1
xyoffset
buttonup
item2
item1
8242,5745
help maze
buttonup
buttonup
:PHYSSIZE
30,50,100
0,100,0
buttonDown
buttonUp
buttonDown
buttonUp
Kkeydown
30,50,100
0,100,0
buttonDown
buttonUp
buttonDown
buttonUp
Kkeydown
30,50,100
0,100,0
buttonDown
buttonUp
buttonDown
buttonUp
Kkeydown
30,50,100
0,100,0
keyDownArrow
buttonDown
buttonUp
buttonDown
buttonUp
Kkeydown
level
4level
default
buttonUp
buttonUp
default
level
pscript
to handle buttonUp
set invert of self to false
set invert of target to true
pobjects
button id 26 of background id 0,button id 27 of background id 0,button id 28 of background id 0
level1
level3
level2
4level
eatClicks()
default
buttonUp
buttonUp
eatClicks
default
level
play maze from 8019 to 29624 wait
tbkMCIchk
spring
play maze from 29624 to 39471
tbkMCIchk
bounce
play maze from 39471 to 43441
tbkMCIchk
play maze from 43441 to 50129
tbkMCIchk
maze1
Maze3
4mousePosition, catTime
getTickCount() >
+ 400
"4245,5220"
"4245,4005"
"gotcha!"
playsound
playSound ohno
yieldApp()
543,535
"cat"
"4245,5220"
tbkMMNotify
"maze3"
tbkMCIchk("
music
tbkMMNotify
getTickCount
4245,5220
4245,4005
mouse
playsound
playSound
yieldApp
mouse
mouse
4245,5220
getTickCount
mousePosition
catTime
tbkMMNotify
maze3
play music from 0
maze3
tbkMCIchk
&!J"n#
'")F*
a1Top
a1bottom
a1right
a1left
b1top
b1bottom
b1right
b1left
c1top
c1bottom
c1right
c1left
d1top
d1bottom
d1right
d1left
e1top
e1bottom
e1right
e1left
f1top
f1bottom
f1right
f1left
a2top
a2bottom
a2right
a2left
c2top
c2bottom
c2right
c2left
d2top
d2bottom
d2right
d2left
e2top
e2bottom
e2right
e2left
f2top
f2bottom
f2right
f2left
a3top
a3bottom
a3right
a3left
b3top
b3bottom
b3right
b3left
c3top
c3bottom
c3right
c3left
d3top
d3bottom
d3right
d3left
e3top
e3bottom
e3right
e3left
f3top
f3bottom
f3right
f3left
a4top
a4bottom
a4right
a4left
b4top
b4bottom
b4right
b4left
c4top
c4bottom
c4right
c4left
d4top
d4bottom
d4right
d4left
e4top
e4bottom
e4right
e4left
f4top
f4bottom
f4right
f4left
a5top
a5bottom
a5right
a5left
b5top
b5bottom
b5right
b5left
c5top
c5bottom
c5right
c5left
d5top
d5bottom
d5right
d5left
e5top
e5bottom
e5right
e5left
f5top
f5bottom
f5right
f5left
b2top
b2bottom
b2right
b2left
cheese
+:PHYSSIZE
mouse
+:PHYSSIZE
,:PHYSSIZE
maze2
enterpage
enterpage
a1Top
a1bottom
a1right
a1left
b1top
b1bottom
b1right
b1left
c1top
c1bottom
c1right
c1left
d1top
d1bottom
d1right
d1left
e1top
e1bottom
e1right
e1left
f1top
f1bottom
f1right
f1left
a2top
a2bottom
a2right
a2left
c2top
c2bottom
c2right
c2left
d2top
d2bottom
d2right
d2left
e2top
e2bottom
e2right
e2left
f2top
f2bottom
f2right
f2left
a3top
a3bottom
a3right
a3left
b3top
b3bottom
b3right
b3left
c3top
c3bottom
c3right
c3left
d3top
d3bottom
d3right
d3left
e3top
e3bottom
e3right
e3left
f3top
f3bottom
f3right
f3left
a4top
a4bottom
a4right
a4left
b4top
b4bottom
b4right
b4left
c4top
c4bottom
c4right
c4left
d4top
d4bottom
d4right
d4left
e4top
e4bottom
e4right
e4left
f4top
f4bottom
f4right
f4left
a5top
a5bottom
a5right
a5left
b5top
b5bottom
b5right
b5left
c5top
c5bottom
c5right
c5left
d5top
d5bottom
d5right
d5left
e5top
e5bottom
e5right
e5left
f5top
f5bottom
f5right
f5left
b2top
b2bottom
b2right
b2left
mouse
x,:PHYSSIZE
4-:PHYSSIZE
Maze3
(""( "
"*""*
*"( "
hplayhous.ico
4Zpath
playhouse
.tbk")
default
buttonup
buttonup
playhous.tbk
default
playhouse
Zpath
:PHYSSIZE
xyoffset
item1
item2
p2 +
p2 +
buttondown
buttonup
buttondown
item2
item1
xyoffset
buttonup
item2
item1
8242,5745
help maze
buttonup
buttonup
:PHYSSIZE
30,50,100
0,100,0
buttonDown
buttonUp
buttonDown
buttonUp
Kkeydown
30,50,100
0,100,0
buttonDown
buttonUp
buttonDown
buttonUp
Kkeydown
30,50,100
0,100,0
buttonDown
buttonUp
buttonDown
buttonUp
Kkeydown
30,50,100
0,100,0
keyDownArrow
buttonDown
buttonUp
buttonDown
buttonUp
Kkeydown
level
4level
default
buttonUp
buttonUp
default
level
pscript
to handle buttonUp
set invert of self to false
set invert of target to true
pobjects
button id 26 of background id 0,button id 27 of background id 0,button id 28 of background id 0
level1
level3
level2
maze1
4mousePosition, catTime
getTickCount() >
+ 900
"4275,4140"
"4275,2895"
"gotcha!"
playsound
playSound ohno
yieldApp()
543,535
"cat"
"4275,4140"
tbkMMNotify
"maze1"
tbkMCIchk("
music
tbkMMNotify
getTickCount
4275,4140
4275,2895
mouse
playsound
playSound
yieldApp
mouse
mouse
4275,4140
getTickCount
mousePosition
catTime
tbkMMNotify
maze1
play music from 0
maze1
tbkMCIchk
.!R"v#
(*)N*
a1Top
a1bottom
a1right
a1left
b1top
b1bottom
b1right
b1left
c1top
c1bottom
c1right
c1left
d1top
d1bottom
d1right
d1left
e1top
e1bottom
e1right
e1left
f1top
f1bottom
f1right
f1left
a2top
a2bottom
a2right
a2left
c2top
c2bottom
c2right
c2left
d2top
d2bottom
d2right
d2left
e2top
e2bottom
e2right
e2left
f2top
f2bottom
f2right
f2left
a3top
a3bottom
a3right
a3left
b3top
b3bottom
b3right
b3left
c3top
c3bottom
c3right
c3left
d3top
d3bottom
d3right
d3left
e3top
e3bottom
e3right
e3left
f3top
f3bottom
f3right
f3left
a4top
a4bottom
a4right
a4left
b4top
b4bottom
b4right
b4left
c4top
c4bottom
c4right
c4left
d4top
d4bottom
d4right
d4left
e4top
e4bottom
e4right
e4left
f4top
f4bottom
f4right
f4left
a5top
a5bottom
a5right
a5left
b5top
b5bottom
b5right
b5left
c5top
c5bottom
c5right
c5left
d5top
d5bottom
d5right
d5left
e5top
e5bottom
e5right
e5left
f5top
f5bottom
f5right
f5left
b2top
b2bottom
b2right
b2left
cheese
+:PHYSSIZE
mouse
+:PHYSSIZE
,:PHYSSIZE
4zpath
"c:\toolbook\playhous\"
.sbk"
(Zpath&"
tbkMCIchk("
p&"maze.wav alias
","",1)
samples","",1)
LeaveBook
[("close
R","")
tbkBitmap("
kid")
status
displayKid
buttonDoubleclick -- Used
rename lines
4mousePosition, catTime
543,535
getTickCount()
music","",1)
checkWallLeft
getNewPosLeft
playSound spring
H-1220,0
CheckWallRight
getNewPosRight
H1220,0
checkWallUp
getNewPosUp
H0,-1200
keyDownArrow
checkWallDown
getNewPosDown
H0,1200
checkWin
"maze1"
-- Winning sequence here
"You
'"cheese"
"yum"
yieldApp()
543,535
default
"maze2"
543,535
"maze3"
543,535
checkWallRight
bounce
checkWallleft
&"Top")
&"Bottom")
getNewPosleft
MousePosition
playsound sfx
("stop
","")
"cat"
8019 wait","",1)
8019
29624
29624
39471","",1)
39471
43441","",1)
"ohno"
43441
50129","",1)
checkWin
checkWallRight
enterPage
checkWallleft
checkWallUp
LeaveBook
checkWallDown
leavePage
getNewPosRight
getNewPosleft
keyDown
getNewPosUp
enterBook
getNewPosDown
playsound
enterBook
c:\toolbook\playhous\
playhous.sbk
Zpath
playhous.sbk
open
maze.wav alias maze
tbkMCIchk
set maze time format samples
tbkMCIchk
zpath
LeaveBook
close maze
tbkMCI
close kid
tbkBitmap
status kid window
tbkBitmap
displayKid
enterPage
mouse
getTickCount
open
.mid alias music
tbkMCIchk
play music from 0
tbkMCIchk
Zpath
mousePosition
catTime
leavePage
close music
tbkMCI
keyDown
35checkWallLeft
[getNewPosLeft
playSound
mouse
hCheckWallRight
getNewPosRight
playSound
mouse
checkWallUp
getNewPosUp
playSound
mouse
\@checkWallDown
fgetNewPosDown
playSound
mouse
]checkWin
spring
checkWin
maze1
cheese
playSound
yieldApp
mouse
cheese
maze2
cheese
playSound
yieldApp
mouse
cheese
maze3
cheese
playSound
yieldApp
mouse
cheese
default
mousePosition
checkWallRight
right
playSound
mouse
mouse
bounce
mousePosition
checkWallleft
playSound
mouse
mouse
bounce
mousePosition
checkWallUp
playSound
mouse
mouse
bounce
mousePosition
checkWallDown
Bottom
playSound
mouse
mouse
bounce
mousePosition
getNewPosRight
mousePosition
getNewPosleft
mousePosition
getNewPosUp
MousePosition
mousePosition
getNewPosDown
MousePosition
mousePosition
playsound
stop maze
tbkMCI
play maze from 0 to 8019 wait
tbkMCIchk
play maze from 8019 to 29624 wait
tbkMCIchk
spring
play maze from 29624 to 39471
tbkMCIchk
bounce
play maze from 39471 to 43441
tbkMCIchk
play maze from 43441 to 50129
tbkMCIchk