Allie's Playhouse

home *** CD-ROM | disk | FTP | other *** search

/ Allie's Playhouse / allies-playhouse.bin / anatomy.tbk (.txt) < prev next >

Wrap

Asymetrix ToolBook File | 1993-08-27 | 72KB | 921 lines

System Arial 4zpath "c:\toolbook\playhous\" .sbk" (Zpath&" enterbook enterbook c:\toolbook\playhous\ playhous.sbk Zpath playhous.sbk zpath Allie's Playhouse arial Arial tbkBitmap(" kid") status displayKid terBook LeaveBook enterBook enterBook c:\toolbook\playhous\ playhous.sbk Zpath playhous.sbk zpath LeaveBook close count tbkMCI close kid tbkBitmap status kid window tbkBitmap displayKid *&$"W% l z! :PHYSSIZE :PHYSSIZE names hands p H m mouth mouth abdomen abdomen chest chest mouth mouth hands hands abdomen abdomen chest chest mouth chest abdomen hands hands mouth chest abdomen hands hands results buttonUp buttonUp j!"!g! Congratulations! All your answers were correct.uires 13 pointsw! allieplay 4game replay -- say goofy thing buttonUp buttonUp replay ":PHYSSIZE alliel1 #:PHYSSIZE alliel2 $:PHYSSIZE alliewin N%:PHYSSIZE 4game replay -- say goofy thing allieSpeech buttonUp buttonUp replay allieSpeech 4zpath "c:\toolbook\playhous\" .sbk" (Zpath&" tbkMCIchk(" p&"yesno.wav alias winlose","",1) samples","",1) &"alliecom. ","",1) LeaveBook practice ("close W","") tbkBitmap(" &kid") saveAs Vstatus displayKid initGame 4game, questions, points, roundnum, result, try roundNum -- CREATE RANDOM LIST OF 10 QUESTIONS ci <= 12 table sortNames 4mystName, , speech -- MAIN GAME LOOP --After 12th , give results -- Ask the mistery part playSpeechAnatomy mystname rePlay level ("stop "Congratulations!"& k&" All your answers were correct." allieComments congratulations >= 24 "Excellent!"& k&"You scored"&& k&"out excellent >= 18 "Very Good!"& VeryGood >= 12 >= 6 "Fair!"& >= 0 36."& k&"Better luck I..." better waitTime, try, -- playwin alliewin -- Wrong playLose2 allielose -- Blink FillColor 0,0,0 0,100,0 waittime -- PRACTICE -- create list "head" "eyes" "ears" "nose" "mouth" "neck" "chest" "arms" "abdomen" "hands" "legs" "feet" replay initGame enterBook rePlay saveAs results LeaveBook buttonup sortNames keyDown enterBook c:\toolbook\playhous\ playhous.sbk Zpath playhous.sbk open yesno.wav alias winlose tbkMCIchk set winlose time format samples tbkMCIchk open alliecom.wav alias allie tbkMCIchk set allie time format samples tbkMCIchk zpath LeaveBook buttonup close allie tbkMCI close winlose tbkMCI close kid tbkBitmap practice buttonup practice saveAs buttonup practice status kid window tbkBitmap displayKid initGame roundNum sortNames table questions points roundnum result Yresults playSpeechAnatomy mystname mystName questions roundNum speech rePlay playSpeechAnatomy mystName results stop winlose tbkMCI results Congratulations! All your answers were correct. ]EallieComments results Excellent! You scored points out of 36. ]EallieComments results Very Good! You scored points out of 36. ]EallieComments results Good! You scored points out of 36. ]EallieComments results Fair! You scored points out of 36. ]EallieComments results You scored points out of 36. Better luck next time... ]EallieComments buttonup practice better VeryGood excellent congratulations results points level buttonup results results irregularPolygon (Nplaywin qdalliewin playLose2 allielose waittime uplayLose allielose rePlay irregularPolygon field playSpeechAnatomy mystName points waitTime speech sortNames mouth chest abdomen hands questions result keyDown replay 4zpath "c:\toolbook\playhous\" .sbk" (Zpath&" tbkMCIchk(" p&"yesno.wav alias winlose","",1) samples","",1) &"alliecom. ","",1) LeaveBook practice ("close W","") tbkBitmap(" &kid") saveAs Vstatus displayKid initGame 4game, questions, points, roundnum, result, try roundNum -- CREATE RANDOM LIST OF 10 QUESTIONS ci <= 12 table sortNames 4mystName, , speech -- MAIN GAME LOOP --After 12th , give results -- Ask the mistery part playSpeechAnatomy mystname rePlay level ("stop "Congratulations!"& k&" All your answers were correct." allieComments congratulations >= 24 "Excellent!"& k&"You scored"&& k&"out excellent >= 18 "Very Good!"& VeryGood >= 12 >= 6 "Fair!"& >= 0 36."& k&"Better luck I..." better waitTime, try, -- playwin alliewin -- Wrong playLose2 allielose -- Blink FillColor 0,0,0 0,100,0 waittime -- PRACTICE -- create list "head" "eyes" "ears" "nose" "mouth" "neck" "chest" "arms" "abdomen" "hands" "legs" "feet" replay initGame enterBook rePlay saveAs results LeaveBook buttonup sortNames keyDown enterBook c:\toolbook\playhous\ playhous.sbk Zpath playhous.sbk open yesno.wav alias winlose tbkMCIchk set winlose time format samples tbkMCIchk open alliecom.wav alias allie tbkMCIchk set allie time format samples tbkMCIchk zpath LeaveBook buttonup close allie tbkMCI close winlose tbkMCI close kid tbkBitmap practice buttonup practice saveAs buttonup practice status kid window tbkBitmap displayKid initGame roundNum sortNames table questions points roundnum result Yresults playSpeechAnatomy mystname mystName questions roundNum speech rePlay playSpeechAnatomy mystName results stop winlose tbkMCI results Congratulations! All your answers were correct. ]EallieComments results Excellent! You scored points out of 36. ]EallieComments results Very Good! You scored points out of 36. ]EallieComments results Good! You scored points out of 36. ]EallieComments results Fair! You scored points out of 36. ]EallieComments results You scored points out of 36. Better luck next time... ]EallieComments buttonup practice better VeryGood excellent congratulations results points level buttonup results results irregularPolygon (Nplaywin qdalliewin playLose2 allielose waittime uplayLose allielose rePlay irregularPolygon field playSpeechAnatomy mystName points waitTime speech sortNames mouth chest abdomen hands questions result keyDown replay io time format tmsf tbkMCIchk Where is the head? Where is the eyes? Where is the ears? Where is the nose? mouth Where is the mouth? Where is the neck? chest Where is the chest? Where is the arms? abdomen Where is the abdomen? hands Where is the hands? Where is the legs? Where is the feet? The head The eyes The ears The nose mouth The mouth The neck chest The chest The arms abdomen The abdomen hands The hands The legs The feet keyDown replay p 997 0 990 990990990 0990990990 99 990 99 90 99 09 09 99 99 9 9 "'w" f`"" ff`* ff`* ff`* ff`* ff`* ff`* ff`* ff`* ff`* ff`* ff`* `"" f`* ** f ** f ff`* ff`* ff`* ff`* ff`* ff`* ff`* ff`* ff`* ff`* ff`* "'w" oCS\ f "" w{ "" w{ "" w{ "" w{ "" w{ "" w{ wp"" w "" w{ "" w{ "" wwp"" wp"" wwp"" wp"" ww wwp"" ww 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 8175,5745 8400,2220 "Help!!!" buttonup buttonup Help!!! :PHYSSIZE xyoffset item1 item2 p2 + p2 + buttondown buttonup buttondown item2 item1 xyoffset buttonup item2 item1 8400,2220 practice 4game "practice" "play" "names" buttonUp buttonUp practice names :PHYSSIZE xyoffset item1 item2 p2 + p2 + buttondown buttonup buttondown item2 item1 xyoffset buttonup item2 item1 ff`*y +3#'Y "play" "practice" "names" initGame buttonUp buttonUp practice names j^initGame :PHYSSIZE 8385,3270 help anatomy buttonup buttonup anatomy 4zpath "c:\toolbook\playhous\" .sbk" (Zpath&" tbkMCIchk(" p&"yesno.wav alias winlose","",1) samples","",1) &"alliecom. ","",1) LeaveBook practice ("close W","") tbkBitmap(" &kid") saveAs Vstatus displayKid initGame 4game, questions, points, roundnum, result, try roundNum -- CREATE RANDOM LIST OF 10 QUESTIONS ci <= 12 table sortNames 4mystName, , speech -- MAIN GAME LOOP --After 12th , give results -- Ask the mistery part playSpeechAnatomy mystname rePlay level ("stop "Congratulations!"& k&" All your answers were correct." allieComments congratulations >= 24 "Excellent!"& k&"You scored"&& k&"out excellent >= 18 "Very Good!"& VeryGood >= 12 >= 6 "Fair!"& >= 0 30."& k&"Better luck I..." better waitTime, try, -- playwin alliewin -- Wrong playLose2 allielose -- Blink FillColor 0,0,0 0,100,0 waittime -- PRACTICE -- create list "head" "eyes" "ears" "nose" "mouth" "neck" "chest" "arms" "abdomen" "hands" "legs" "feet" replay initGame enterBook rePlay saveAs results LeaveBook buttonup sortNames keyDown enterBook c:\toolbook\playhous\ playhous.sbk Zpath playhous.sbk open yesno.wav alias winlose tbkMCIchk set winlose time format samples tbkMCIchk open alliecom.wav alias allie tbkMCIchk set allie time format samples tbkMCIchk zpath LeaveBook buttonup close allie tbkMCI close winlose tbkMCI close kid tbkBitmap practice buttonup practice saveAs buttonup practice status kid window tbkBitmap displayKid initGame roundNum sortNames table questions points roundnum result Yresults playSpeechAnatomy mystname mystName questions roundNum speech rePlay playSpeechAnatomy mystName results stop winlose tbkMCI results Congratulations! All your answers were correct. ]EallieComments results Excellent! You scored points out of 30. ]EallieComments results Very Good! You scored points out of 30. ]EallieComments results Good! You scored points out of 30. ]EallieComments results Fair! You scored points out of 30. ]EallieComments results You scored points out of 30. Better luck next time... ]EallieComments buttonup practice better VeryGood excellent congratulations results points level buttonup results results irregularPolygon (Nplaywin qdalliewin playLose2 allielose waittime uplayLose allielose rePlay irregularPolygon field playSpeechAnatomy mystName points waitTime speech sortNames mouth chest abdomen hands questions result keyDown replay