9106"xX` L4x1X` a"xGX` LXxU䅑X` "xhhhhhhhhhhhHHX` "hhhhhhh` "Ȅ؅ 񷊢ȑ` "ȱ` #UW0UU,15(UC,0:UN,0:UR$"":UI$"":UL0UL39$-UI$:UI$""45Y2UA(UI$):UR(UR$):UA13UR0UC,1:" ";:707UA20(UR0)45:UR$(UR$,UR1):" ";:45<URUL45A95:UR$UR$UI$:UI$;:45FUR$UX$" ";:145KUIUR11:(UR$,UI,1)" " PUR$(UR$,UI)::_(US$)0110JdUI1(US$):UI$(US$,UI,1):UI$""Pi]nUA46psUA32UR0xUA47UA58}UA64UA91UA193UA218UI$"":(UT)UU%UI$(UA128)170:251,0:252,US256:253,0:254,UF:UVUZ1:UV%(UT):300bUZ0:US$UJ$:UG$UK$:UT$UL$:UPUJ:ULUK:"";:UW0UY,6:UX,14UT,UV%:251,0:252,UF:253,0:254,US256:UV:UW0UU,15U1,U1%:U2,U2%:U3,U3%:U4,U4%:FL1FL0:35U1%(U1):U2%(U2):U3%(U3):U4%(U4)0UJ$US$:UK$UG$:UL$UT$:UJUP:UKUL:U,"":UT,UU%:UW0UY,12:UX,6u1" M E N U"6" --------------------------------";" 1. BEGIN CASCADE@" 2. STUDENT INSTRUCTIONS" E" 3. TEACHER INSTRUCTIONS"1 J" 4. QUIT"] O" --------------------------------" T" PRESS A NUMBER KEY (1-4) "; YUL1:US$"1234" [35:US$"" ^(UR$)1000,400,500,390 c300 rUZ1UP%:155 w UE:"":UW0UY,6:UX,14:UU,14 :@ "":UT,UL%:UW0UY,11:UX,12u UT$" ASCADE":UH1:UP0:UG$"TUDENT NST":850 " HIS PROGRAM IS INTENDED " FOR VISUAL AMUSEMENT ONLY. " T SIMULATES A WATER FALL " OVER A TERRAIN.7 " O RETURN TO MENU, PRESSJ " 'H'.S 835g UZ1UP%:155m  "":UT,UL%:UW0UY,2:UX,10 UT$" ASCADE":UH1:UP0:UG$"EACHER NST":850 " O THE BEST OF OUR KNOWLEDGE," " THIS PROGRAM IS IN THE PUBLIC"I " DOMAIN. F THIS IS NOT TRUE,"g " PLEASE CONTACT:" " ŠӠ" " 3370 HARMACY VE. " GINCOURT, NTARIO" " ANADA, 1 24" " (416) 499-4292"/ UH1:835:850T " ROGRAM AME: ASCADE"x " RITTEN BY : NKNOWN" " EVISED BY : IKE EMMER " HIS PROGRAM WILL RUN ON ANY " à2.0 OMPUTER" 4.0 ԠOMPUTER<" 8032 OMPUTERa" OMMODORE 64 OMPUTERjI835~NUZ1UP%:155SUC$"BEFORE RUNNING THIS PROGRAM ON AN 8032" LOAD THE 'CBM 4032' PROGRAM": "";:UT,UU%:UW0UY,1:UX,14.!I138:" ";:F"I122:" ";:^#I137:" ";:v$I122:" ";:%" &"  '"  O M M O D O R E(" )"EDUCATIONAL8*"SOFTWAREV+"1983,(UD$,24);"PRESS SPACE BAR OR WAIT"UC$:UI0-UI$:UI$" "UIUI1:UI250813.300CUN,0:(UD$,24);"PRESS SPACE BAR TO CONTINUE"HUI$:UI$" "840MLRUPUP1:""(UT$UP$,21);(UP$UG$(UP),18){W" --------------------------------------"\UH0(UD$,24);(UP$,7);"HELP - PRESS H "aUH0:"":k(UD$,24);" ONE MOMENT PLEASE... ":NUX$"H":US32768:U1196:U2197:U3198:U4216:UC167:UB1024:UD1084:UE1105UT59468:UU%12:UL%14:UP%1158:UN158:50003,0:UW(50003):UF(53)UW0US1024:U1209:U2210:U3211:U4214:UC204:UB2048:UX53280:UD2064/UW0UT53272:UU%21:UL%23:UP%2151:UN198:UY53281:UU2199:UE2087[UC$(155):UV1214:UW0UF196:UV2238UD$"":UP$" "UT$" "DRP(99):900:"":"": SHIFTED SPACE (US40)967003((0)(((0))0)65536)500935cUC$"THIS MACHINE DOES NOT HAVE ENOUGH""MEMORY TO RUN THIS PROGRAM !":UE:""UC$:UW0965UF60UF108UF12495052,0:53,UF4::900UW1601103,88:1104,228:1107,85:1111,228:965NUW1"THIS PGM WILL NOT WORK ON THIS MACHINE!":UE:}1103,49:1104,230:1107,46:1111,230:965UD800:300UZ1UP%:UP%:UZ0""UC$;::UW0UY,6:UX,14LNG6: *** THIS VARIABLE COULD BE CHANGED TO VARY THE LENGTH OF THE^ WATER DROP. IF A LENGTH >99 IS DESIRED, THE DIMENSION OF DRP MUST BE CHANGED ACCORDINGLY. * * *PO$"N":UW01100UT,UL%:UP1:UG$UT$:UH1:85010)"O YOU WANT SOUND? ";:US$"YNH":UL1:35:PO$UR$3PO$"Y"59467,16BL CASCADESSQ"":UT,UU%vVWA160:BALL87:BOX102:MAX100jSCUS:"":UW0UU,15tI024:SCI40,WA:SCI4039,WA:I~I039:SC2440I,WA:II1MAXPSC(1000(1))J03 (PJ)32PJ,BOX)J,IAI138:SCI,32:I[SSC20:D40:CLNGLNGuI1CLNG:DRP(I)0:IDRP(CLNG)S(S)321500S,BALLA$:A$"H"FL1:145(S40)32D40:1360NSSD:PO$"Y"59466,200:59464,200 (NS)321360&D401440KR32(S1):L32(S1):59464,0j(RLD12((1).5):1360{2RD1:1360<LD1:1360F1440PTLDRP(1)ZTL0TL,32dI2CLNGnDRP(I1)DRP(I)xIDRP(CLNG)SSSD:DRP(CLNG)S1260 STUCK@PO$"Y"59464,50:POKE59464,0RCLNG21220bCLNGCLNG1rSDRP(CLNG)S01500D40:1260 FINISHED