XFIRz39VMpami p:*YEKt K*SACfniCFCRD,pamFXtcLSREV lcc lcc lcc lcc lcc lcc lcc lcc lcc lcc lcc lcc lcc lcc lcc lccFCRDTT::@<5fniCS35,?C:\prog\190\tutor\castsd*SACL ?*)=tSAC# `mmmmon mouseup sound(1).stop() go to the frame + 1 end --- on exitFrame me go to the frame end waitForMouseuF&\\,>d>Jeremy Parker>tSAC  $global gSupportsTTS on enterFrame me if gSupportsTTS then if voiceState() <> #playing then go to the frame + 1 end if else go to the frame + 1 end if end --- on exitFrame me go to the frame endwaitForVoiceCompletion0V,>d> tSAC %on enterFrame me if not (sound(1).isBusy() or sound(2).isBusy() or sound(3).isBusy() or sound(4).isBusy() or sound(5).isBusy()) then go to (the frame + 1) end if end --- on exitFrame me go to the frame endwaitForSoundEndwkk,>d>Jeremy Parker>tSAC &&&&::::::NNNNNNRVdon exitFrame me play1 end startmusicuF&,>ZW>Jeremy ParkertSAC{ mglobal gChannel1Sounds, gSound1Number on enterFrame if not (sound(1).status = 3) then play1 go to (the frame + 1) end if end --- on exitFrame go to the frame endintermediateSoundPlayuF&,>c>Jeremy Parker>tSAC ((((<<<<<<PPPPPPTXfon exitFrame me play2 end playChannel2uF&,>c>Jeremy ParkertSAC      !!!!!!5555559=Kon enterFrame me if not (sound(1).status = #playing) then sound(1).pan = (random(199) - 100) sound(1).play(member("audrey")) sound(2).pan = (random(199) - 100) sound(2).play(member("charles")) -- sound(3).pan = (random(199) - 100) -- sound(3).play(member("crystal")) -- sound(4).pan = (random(199) - 100) -- sound(4).play(member("mike")) -- sound(5).pan = (random(199) - 100) -- sound(5).play(member("rich")) go to (the frame + 1) end if end --- on exitFrame me go to the frame enduF&,>c>Jeremy Parker>tSAC  on enterFrame me if (soundBusy(1) or soundBusy(2) or soundBusy(3) or soundBusy(4) or soundBusy(5)) then autoPanSounds else go to (the frame + 1) end if end --- on exitFrame me go to the frame end autoPanFrameuF&cc,>c>Jeremy ParkertSAC  ?IIII]]]]]]qqqqqquyon exitFrame me sound(1).stop() sound(2).stop() play1 end playOnly1uF&;;,>YMJ>Jeremy Parker>tSAC  &3333GGGGGG[[[[[[_cqglobal currentLetter, loss_occured, gKeyboardIsShowing, gKeysArePronounced, currentLetterPos on exitFrame me go to the frame end on keyDown currKey = the key currKeyNum = currKey.charToNum if(gKeyboardIsShowing) then highlightKey currKeyNum end if if not(loss_occured) then if(gKeysArePronounced) then pronounceKey currKeyNum end if case currKey of RETURN: scoreRead() SPACE: clearSpeechQueue() announceWord() -- alternates b/w entire word and letter-by-letter modes currentLetter: correctLetter() otherwise: wrongLetter() end case end if case currKeyNum of 9: showMainMenu() 28: gKeysArePronounced = not(gKeysArePronounced) end case end FireGameLoopO,>c>Jeremy Parker lcc SREV  knuj  *YEKt *SACfniCFCRD,pamFXtcLSREV lcc lcc lcc lcc lcc lcc lcc lcc lcc lcc lcc lcc lcc lcc lcc lccFCRDTT::Od>Jeremy Parker lcc pamFf,222ArialTimes New RomanSREV  knuj*mes New RomanSREV  knujtSAC &&&&&::::::NNNNNNRVdon exitFrame me toggleFireGame() enduj"",>]m>Jeremy ParkerrcsL\ #H\\\  GACWBgCfABW CfBWrcsL\ \\^)!  ICW E CfABWCfABW  CfBWrcsL222\ \\\F  ACWCg ACWCg ACWCg ACWCg ACWCg CfABW: CfBWrcsL\ \\\ BW rcsL   \ \\`3 ACWa ABW CfABW CfBWrcsL\ \\\ BWrcsL&&&\ \\\8   ACWACWACWACWACW BWCfABW% CfBWtSAC  $global gSupportsTTS on enterFrame me if gSupportsTTS then if voiceState() <> #playing then go to the frame + 1 end if else go to the frame + 1 end if end --- on exitFrame me go to the frame endwaitForVoiceCompletion0V,>d> tSAC %on enterFrame me if not (sound(1).isBusy() or sound(2).isBusy() or sound(3).isBusy() or sound(4).isBusy() or sound(5).isBusy()) then go to (the frame + 1) end if end --- on exitFrame me go to the frame endwaitForSoundEndwkk,>d>Jeremy ParkertSAC &&&&::::::NNNNNNRVdon exitFrame me play1 end startmusicuF&,>ZW>Jeremy ParkertSAC{ mglobal gChannel1Sounds, gSound1Number on enterFrame if not (sound(1).status = 3) then play1 go to (the frame + 1) end if end --- on exitFrame go to the frame endintermediateSoundPlayuF&,>c>Jeremy ParkeretSAC ((((<<<<<<PPPPPPTXfon exitFrame me play2 end playChannel2uF&,>c>Jeremy ParkertSAC      !!!!!!5555559=Kon enterFrame me if not (sound(1).status = #playing) then sound(1).pan = (random(199) - 100) sound(1).play(member("audrey")) sound(2).pan = (random(199) - 100) sound(2).play(member("charles")) -- sound(3).pan = (random(199) - 100) -- sound(3).play(member("crystal")) -- sound(4).pan = (random(199) - 100) -- sound(4).play(member("mike")) -- sound(5).pan = (random(199) - 100) -- sound(5).play(member("rich")) go to (the frame + 1) end if end --- on exitFrame me go to the frame enduF&,>c>Jeremy ParkerotSAC  on enterFrame me if (soundBusy(1) or soundBusy(2) or soundBusy(3) or soundBusy(4) or soundBusy(5)) then autoPanSounds else go to (the frame + 1) end if end --- on exitFrame me go to the frame end autoPanFrameuF&cc,>c>Jeremy ParkertSAC  ?IIII]]]]]]qqqqqquyon exitFrame me sound(1).stop() sound(2).stop() play1 end playOnly1uF&;;,>YMJ>Jeremy ParkerltSAC  MZZZZnnnnnnglobal currentLetter, loss_occured on exitFrame me go to the frame end on keyDown currKey = the key case currKey of tab: showMainMenu() RETURN: scoreRead() SPACE: if not(loss_occured) then clearSpeechQueue() announceWord() -- alternates b/w entire word and letter-by-letter modes end if currentLetter: if not(loss_occured) then correctLetter() end if otherwise: if not(loss_occured) then wrongLetter() end if end case if not(loss_occured) then pass end if end FireGameLoopl1//,>c>Jeremy ParkertSAC.   xxxxxon exitFrame me sound(1).play(member("audrey")) sound(2).play(member("rich")) sound(3).play(member("charles")) enduF&tt,>d>Jeremy ParkertSAC  $,,,,@@@@@@TTTTTTX\j on exitFrame go to the frame end putKeysuF&,>d>Jeremy ParkertSAC  %6666JJJJJJ^^^^^^bfton enterFrame me setStereoPan 0 endresetSpeechSpeeduF&!!,>d>Jeremy ParkertSAC \\\\\ppppppon exitFrame me voiceSpeak("Welcome to Jeremy and Tony's sound enhanced typing tutor") endPEXX,>>* tSAC $$$$$888888LLLLLLPTbon mouseUp me toggleFireGame() end ,>K>YJeremy ParkertSAC $$$$$888888LLLLLLPTbon mouseUp me toggleMainMenu() end ,>>Jeremy ParkertSAC IYYYYmmmmmmon keyDown go to the frame+1 end on exitFrame me go to the frame endwaitForKeyPress0VEE,>\> tSAC.   xxxxxon exitFrame me sound(1).play(member("audrey")) sound(2).play(member("rich")) sound(3).play(member("charles")) enduF&tt,>d>Jeremy ParkertSAC  $,,,,@@@@@@TTTTTTX\j on exitFrame go to the frame end putKeysuF&,>d>Jeremy ParkertSAC  %6666JJJJJJ^^^^^^bfton enterFrame me setStereoPan 0 endresetSpeechSpeeduF&!!,>d>Jeremy ParkertSAC $$$$$888888LLLLLLPTbon mouseUp me toggleFireGame() end ,>K>YJeremy ParkerknujrcsL~~~\ ^\\\6F_   (2444ACWa E RACWCWAdbACWDCWBgACWCWAdbACWDCWBgCfABW CfBW audreycharlesrcsL\  \\\ ACWBgACWBgBW  rcsL\ \\\ BWknujrcsL\  \\\ CfBWtSAC \\\\\ppppppon exitFrame me voiceSpeak("Welcome to Jeremy and Tony's sound enhanced typing tutor") endPEXX,>>* tSAC $$$$$888888LLLLLLPTbon mouseUp me toggleMainMenu() end ,>>Jeremy ParkertSAC IYYYYmmmmmmon keyDown go to the frame+1 end on exitFrame me go to the frame endwaitForKeyPress0VEE,>\> tSAC I^^^^rrrrrron exitFrame me sound(1).play(member("Sound - Fire Instructions")) end fireInstructionsPlayPEII,>>3Jeremy ParkerpamFf,222ArialTimes New Romanknuj)) then go to the frame else toggleFireGame() end if end on keyDown toggleFireGame() end on mouseDown toggleFireGame() endwaitForFireInstructionsPE,>> Jeremy ParkertSAC I^^^^rrrrrron exitFrame me sound(1).play(member("Sound - Fire Instructions")) end fireInstructionsPlayPEII,>>3Jeremy ParkertSAC ron exitFrame me if (sound(1).isBusy()) then go to the frame else toggleFireGame() end if end on keyDown toggleFireGame() end on mouseDown toggleFireGame() endwaitForFireInstructionsPE,>> Jeremy ParkerXtcL\` #(0#(#(#'#'#' #'!#'"#'#k6 P#'h%#'T&#'@'#',-#'1#'4#&@#&;#&8knuj>  rcsL\ \\\> DBW&9Welcome to Jeremy and Tony's sound enhanced typing tutorrcsL\ \\\  0CfABW CfBWrcsL\ x\\\ ACWDCWBgSound - Fire InstructionstSAC ron exitFrame me if (sound(1).isBusy()) then go to the frame else toggleFireGame() end if end on keyDown toggleFireGame() end on mouseDown toggleFireGame() endwaitForFireInstructionsPE,>> Jeremy ParkerknujV N\\^2 B" "U G CfBWCfRLdD BW:dCW.BW!BW%dD BW/dI" BW#BW$eBW    knujGamercsL\  \\\"1 ACWDCWBgACWDCWBgACWDCWBg audreyrichcharlesrcsL\  @\\\ BWrcsL\ #\\\ BWXtcL\` #(0#(#(#'#'#' #'!#'"#'#$8:#'h%#'T&#'@'#',-#'1#'4#&@#&;#&8knuj|ectLetter wrongLetterput voiceSpeakgetProp mouseDown charToNumvoiceSet keyPressed pronounceKey currKeyNumspace scoreReadrcsL\ xp$ p\\`T d"0 0m88:U:CfBWCfRLdD BWLdD BW/=dCW.I0 BW!BW"dI"I0BW# I0BW$eI0BW    manL1mouseUp exitFramesoundstopframegome enterFrame gSupportsTTS voiceStateplayingisBusyplay1statusgChannel1Sounds gSound1Numberplay2randompanmemberplay soundBusy autoPanSounds setStereoPantoggleMiniKeyboardtoggleFireGametoggleMainMenukeyDownkey showMainMenu announceWordcurrKeypassclearSpeechQueue currentLetter correctLetter wrongLetterput voiceSpeakgetProp mouseDown charToNumvoiceSet keyPressed pronounceKey currKeyNumspace scoreRead loss_occuredknujSound - Fire InstructionsrcsL<<<\ \\\  v ( ACWCg CfBWBW BWBWrcsL<<<\ x\\\  v ( ACWCg CfBWBW BWBWrcsL\ xv \\f|"0326 jTTX$XCfBWCfRLa)RI3 LBW4I0II2 LBW,LdD BW/+dCW.BW!BWdI" BW#BW$eLdA  BWdAI2O2e-  manL_KK;mouseUp exitFramesoundstopframegome enterFrame gSupportsTTS voiceStateplayingisBusyplay1statusgChannel1Sounds gSound1Numberplay2randompanmemberplay soundBusy autoPanSounds setStereoPantoggleMiniKeyboardtoggleFireGametoggleMainMenukeyDownkey showMainMenu announceWordcurrKeypassclearSpeechQueue currentLetter correctLetter wrongLetterput voiceSpeakgetProp mouseDown charToNumvoiceSet keyPressed pronounceKey currKeyNumspace scoreRead loss_occuredkeyCodegKeysArePronouncedgKeyboardIsShowing highlightKeycharcurrentLetterPos getPropRefrgbcolor updateFrameknujbrcsL~rcsL2rcsLrcsL rcsLrcsL~:rcsL&hrcsL2<knuj=[rcsLNrcsL=rcsL>Oeerf \tSACd?tSAC>knuj0BpamFfrcsLOknujkQknujf Nknuj3SrcsL=knujLx.*SACLxrcsLFHknujH&Oknuj&,7knuj+JrcsL<Weerf (rcsLnLrcsLFJknujCVtSACpBeerf 9tSAC8rcsLJIknuj1+knuj0EknujXLknujt,Gknuj..6eerf ZknujZFeerf >knuj:"Kknuj)Rknuj knuj\E<knuj#Iknuj Cknuj{$Mknuj]knujTDknuj.'5knuj2Aknuj40knuj qXknuj5TknujRYknuj x/knujT ^eeerf knujNWeerf ^knuj9$eerf Fknuj Ppamm `D_YXFIRppami h,#pamm ^e(+#*YEKttSAC#tSAC tSAC:"tSAC#tSAC{$tSACH&tSAC.'tSAC)tSAC+tSAC,tSAC./tSAC0tSAC1tSACFCRDTtSACCtSAC5XtcL\F*SACLN lcc fniCSSREV NmanLTrcsLxrcsL~rcsL2rcsLrcsL rcsLrcsL~:rcsL&hrcsL2<knuj=LrcsLNrcsL=rcsL>Oeerf \tSAC4tSAC3knuj6BpamFfrcsLOknujTQknujpBNknuj>SrcsL=knujk.knujLx2rcsLFHknuj{&Oknuj7knuj\ JrcsL<Wknuj >knujnLrcsLFJknujF@TtSACEknujfHtSAC2rcsLJIknuj7+knuj.PEknujXknuj Z9knujE6eerf Zeerf (knuj UknujKknuj Rknuj#3knuj>H[knujIknujTA<knujBMrcsLRknujt,:knuj 5knuj8Aknujd?0knujPXknuj*6]knujVCknuj\4K/eerf Geerf knujNWeerf ^knuj9$eerf Fknuj*bVpamm `Q9[XFIRzpami h,#pamm p(+#*YEKt,tSAC#tSACtSACtSAC*tSAC{tSAC tSACx tSACD tSACtSACtSAC.6tSAC7tSAC8tSACFCRDTtSACAtSACt@XtcL\PknujLN3 lcc fniCSSREV manL_ZrcsLxrcsL~rcsL2rcsLrcsL rcsLrcsL~:rcsL&hrcsL2<knuj=/rcsLNrcsL=rcsL>Oknuj NGtSAC?tSAC9knuj0]pamFfBrcsLOknujtPknuj CLknuj3SrcsL=knujT.knujS2rcsLFHknuj#Oknuj)7knuj.'JrcsL<Wknuj_rcsLXrcsLFJknuj5TtSAC4Kknuj\FHtSAC>rcsLJIknuj1+knuj,Eknujb\knujT>knuj+6eerf ZknujfYknujENknuj#knujH&R*SACL`knuj>HXknuj IknujC<knuj:"MknujRknuj ^e(knuj{$5knuj2Aknuj40knuj|QWknuj:$knujVCknujVLUknuj Deerf eerf \eerf ^knuj./Beerf Fknuj*bV