C64S tape image fileEXP IN SW        ‚o]PLANETS         ‚°ÉSOUNDS          eTAPE-DISK úd MAKE A LIST 'STORY PROB 4‰òÿÿUNIT5QUIZ ,‰òÿÿSENTENCES G‰òÿÿUNIT7QUIZ  LF$²Ç(10): Z$²Ç(0)JBL$²" "o™ Ç(14)"“"," ÔÁÐÅ-ÄÉÓË ÃÏÐÙ"›(™ " ÃOPIES ÓEQUENTIAL ÄATA ÆILES FROM"Ç2™ " ÔAPE TO ÄISK OR FROM ÄISK TO ÔAPE."ô<™ " ÃOPY TO ÄISK OR ÔAPE (D/T) ? D";F… CP$: ‹ CP$²"D" ° CP$²"T" § 90*P™ "‘‘‘": ‰ 60OZ™ " ÄISK ÕNIT # (8-11) ? 8";xd… UN: ‹ UN³8 ° UN±11 § ™ "‘‘‘": ‰ 90œn™" ÄISK ÄRIVE # (0/1) ? 0";Îx… DR$: ‹ DR$³±"0" ¯ DR$³±"1" § ™ "‘‘‘": ‰ 110â‚‹ CP$²"T" § 150úŒ 560: 490: ‰ 190 – 490: 560< ™ " ×RITE ÅND-OF-ÔAPE ÍARKER (Y/N) ? Y";nª… TM$: ‹ TM$³±"Y" ¯ TM$³±"N" § ™ "‘‘‘": ‰ 160‰´SA²1: ‹ TM$²"Y" § SA²2»¾™ " ÄROP ÌINE-FEED ÃHARACTERS (Y/N) ? Y";íÈ… DL$: ‹ DL$³±"Y" ¯ DL$³±"N" § ™ "‘‘‘": ‰ 190ÒŸ 15,UN,15: 440ܘ15,"I"ªDR$: 4405æ™ "“": ‹ CP$²"T" § 360TðŸ 2,8,2,DR$ª":"ªDF$ª",S,W"kú 440: Ÿ 1,1,0,TF$Œ¡#1,DA$: TS²ST: ‹ TS²0 § 280¡‹ TS ¯ 191 § 470Á‹ DL$²"Y" § ‹ DA$²LF$ § 300Ô"˜2,DA$;: 440å,‹ TS²0 § 2606™ " ÅND OF ÉNPUT ÆILE":  1@  2: 440:   15FJ… " ÃOPY ÁNOTHER ÆILE (Y/N) ? N";A$bT‹ A$²"Y" § ™ "“": ‰ 130h^€‡hŸ 2,8,2,DR$ª":"ªDF$ª",S,R"Ÿr 440: Ÿ 1,1,SA,TF$À|¡#2,DA$: TS²ST: ‹ TS²0 § 400Õ†‹ TS ¯ 191 § 470õ‹ DL$²"Y" § ‹ DA$²LF$ § 420š˜1,DA$;: 440¤‹ TS²0 § 380#®‰ 3108¸„15,EN,EM$,ET,ESG‹ EN²0 § ŽhÌ™ " ÄISK ";EM$;ET;ES: ‰ 480‡Ö™ " ÔAPE ÓTATUS ÅRROR";TSà  1:   2:   15: €Êê™ " ÄISK ÆILE ÎAME (ÍAX 16 ÃHARACTERS)"óôDF$²"SAME": ‹ CP$²"T" § DF$²" ’ "þ™ " ? "DF$"";: … DF$=‹ DF$²"SAME" ¯ TF$±"" § DF$²TF$: ‰ 550l‹ DF$±"" ¯ Æ(DF$ªZ$)³±18 ¯ Ã(DF$)³17 § 550ƒ™ "‘"BL$"‘": ‰ 500‰&Ž¶0™ " ÔAPE ÆILE ÎAME (ÍAX 16 ÃHARACTERS)"Ý:TF$²"NONE": ‹ CP$²"T" § TF$²"SAME"üD™ " ? "TF$"";: … TF$N‹ TF$²"SAME" § TF$²DF$: ‰ 620CX‹ Ã(TF$)±16 § ™ "‘"BL$"‘": ‰ 570]b‹ TF$²"NONE" § TF$²""clŽ) "ÍAKE ÍE Á ÌIST BY ÍATT ÂLAIS"3‰ 500G—239,0:™"‚¯„";Y¡X$:‹X$²""§22s‹Æ(X$)³32°Æ(X$)±95§22yŽ‡20:™X$:ŽÊ×300:—205,23:™:™"  ÐRESS ÓPACE ÂAR ÔO ÃONTINUE ’‘":—239,0Þ ¡X$:‹X$³±" "§32"™" ‘":Žd16556f 3:P$²"ÏÆÆ":OD²3:FS$²";"XiDN$²""ŠkE1$²""ªÇ(27)ª"T"ªÊ(DN$,2)ª""ªÇ(27)ª"B"˜lE2$²"“"žŽÆÈMR²(¸(0)«200)­35:†R$(MR,NF),T(NF):ŽÕ,‹ER²30§550Ü6Ö‚âôìù1655õþ100!&×300:™"“"£10)" ÍAKE ÍE Á ÌIST "B(™£10)¸(0)«200" ÃHARS. ÆREE."g+X$²" ":R$²" ITEMS"œ.™X$"Á’ ÁDD"R$:™X$"Å’ ÅDIT"R$:™X$"Ä’ ÄELETE"R$Í0™X$"Ò’ ÒEVIEW":™X$"Ô’ ÔOTAL":™X$"Ï’ ÓORT" 5™X$"Ð’ ÐRINTER: "P$:™X$"Ó’ ÓAVE FILE":™X$"Ì’ ÌOAD FILE"8™X$"Ñ’ ÑUIT"JD™£14)"ÃHOOSE ONE: ";:C$²"SLRPADETOQ"RF20wII²1¤Ã(C$):‹X$³±Ê(C$,I,1)§‚:‰582€N™X$;¹P‘I1000,1050,1100,1150,1200,1350,1400,1450,1500,1600ÂS‰550òX™" Ä’ISK OR Ô’APE ?";:28:DV²8:AL²2:AS²2 b‹X$²"T"§DV²1:AL²0:AS²1@g…" ÆILENAME";F$:‹DV²8§F$²F$ª",S": 15:Ÿ15,8,15FlŽwè™E2$£18)" ÓAVE ":™E1$:600:‹DV²8§F$²F$ª",W"Œí‹Æ(F$)²44¯DV²8§Ž¬òŸ2,DV,AS,F$:1700:‹X§ 2:‰30Ë÷˜2,NR","NF:R²1¤NR:F²1¤NFßü˜2,R$(R,F):‚F,Rì 2:‰1700ý1650:œ:100.™E2$£18)" ÌOAD ":™E1$:600:‹DV²8§F$²F$ª",R"E‹Æ(F$)²44¯DV²8§550e$Ÿ2,DV,AL,F$:1700:‹X§ 2:‰30w.„2,NR,NF:200š8R²1¤NR:F²1¤NF:„2,R$(R,F):‚:‚¬B 2:1700:‰550ÉL™E2$£17)" ÒEVIEW ":™E1$ØN 3:Ÿ3,OD,7QR²1¤NR:X$²Ê(Ä(R),2):‹R³10§X$²" "ªX$V‹R³100§X$²X$ª" "5[˜3,""ªX$ª"’";:1140:˜3,X$J`¡X$:‹X$³±""§1130Qe‚R^g™: 3:‰30ij—239,0}l¡X$:‹X$²""§1132‘m‹X$²"Q"§™:‰1127›o‰1125ËtX$²"":F²1¤NF«1:X$²X$ªR$(R,F)ª""ªFS$ª"’":‚æy‹NF±1§X$²X$ªR$(R,NF):Žý{X$²È(X$,Ã(X$)«3):Ž~ 3:‹P$²"ÏÎ"§P$²"ÏÆÆ":OD²3:Ž0ƒP$²"ÏÎ":OD²4:ŽJ°™E2$£19)" ÁDD ":™E1$Yµ‹NF²0§1240‚·‹¸(0)³200§™" ÎÏ ÍÏÒÅ ÍÅÍÏÒÙ. ":‰30²º™"ÐRESS ÒÅÔÕÒÎ’ ALONE TO RETURN TO ÍÅÎÕ."ß¼™"ÆIELD ÓEPARATOR IS: "Ç(34)FS$Ç(34)""¿™""Ä(NRª1)" ":1250:‹X$²""§ŽÉNR²NRª1:X²NR:1300:‰12150Ø1650:œ:100rÚ™" ÎÅ× ÆÉÌÅ: ":…"ÈOW MANY FIELDS (1-10)";NF:‹NF³1°NF±10§550†Ý200:1210:‰550–âX$²"":…X$:ŽžF²1ÁI²1¤Ã(X$):‹Ê(X$,I,1)²FS$§1325Ú#‚:R$(X,F)²X$:‹F²NF§Ž÷(J²Fª1¤NF:R$(X,J)²"":‚:Ž+-R$(X,F)²È(X$,I«1):X$²Ê(X$,Iª1):F²Fª1:‹F³NF§1310C2‹F²NF§R$(X,NF)²X$:ŽI7fF™E2$£17)" ÄELETE ":™E1$”KR²0:…"ÉTEM # TO ÄELETE (ÒÅÔÕÒÎ ABORTS)";R¤P‹R³1°R±NR§Ž³U‹R²NR§1375ÉZI²R¤NR«1:F²1¤NFä\R$(I,F)²R$(Iª1,F):‚F,Iò_NR²NR«1:Ž x™E2$£18)" ÅDIT ":™E1$3}™"ÉTEM # TO ÅDIT (1 -"NR;:…")";RC‚‹R³1°R±NR§ŽW‡1140:™" "X$sŒ—205,5:™:1250:‹X$²""§Ž‘X²R:‰1300žª™E2$£17)" ÔOTALS ":™E1$³¯I²1¤NF:T(I)²0:‚á´R²1¤NR:F²1¤NF:T(F)²T(F)ªÅ(R$(R,F)):‚F,Rõ¶™T(1);:‹NF²1§30¹I²2¤NF:™" ; "T(I);:‚:‰30.Ü™E2$£18)" ÓORT ":™E1$Zá™"ÓORT BY WHICH FIELD (1 -"NF;:…")";F1læ‹F1³1°F1±NF§Ž ë™"Á’SCENDING OR Ä’ESCENDING ?";:28:A²X$²"D"Øð™"ÉS THIS FIELD ÎUMERIC (Y/N) ?";:28:NM²¨(X$²"Y")áúM²NRõÿM²µ(M­2):‹M²0§ŽJ²1¤NR«M:I²J/ L²IªM:‹NM§B²R$(I,F1)±R$(L,F1):‰1550M B²Å(R$(I,F1))±Å(R$(L,F1))[‹A²B§1565F²1¤NF:X$²R$(I,F):R$(I,F)²R$(L,F):R$(L,F)²X$:‚¤I²I«M:‹I±²1§1545±‚J:‰1535ã@™"“  ÑÕÉÔ: ’ ÁRE ÙOU ÓURE ?";:28òJ‹X$³±"Y"§Ž T1650: 3: 2: 15:™"“":€/r‹FK(0)§I²0¤7:—1375ªI,FK(I):‚5tŽew‹Â(1375)§I²0¤7:FK(I)²Â(1375ªI):—1375ªI,0:‚kyŽ€¤‹DV²1§X²ST:‰1715›¦„15,X,X1$,X1,X2:‹X²0§Ž¿¨™" ÄISK ÅÒÒ: "X;X1$;X1;X2:‰30ͳ‹X²64§X²0ظ‹X²0§Žø½™" ÃASSETTE ÅÒÒÏÒ: "X:‰30%dA²15 : TILT ANGLE OF RINGSCnÞ3,1 : MULTICOLOR BITMAPexç0,1:ç4,1:ç 1,2:ç2,3,2:ç3,3,0k‚:“Œ DRAW RANDOM STARS OVER THE SCREEN–I²1¤100:æ 160¬»(1),200¬»(1):å 1 ¤ ª0,ª0:‚È :æª DRAW BACK PART OF RINGSö´I² 40 ¤ 82 ¾‹I±46 ¯ I³54§‚È‹ I±65¯ I³73§ ‚?Òâ 1,80,100,I,I­2.5,270,90,A,1EÜ‚Kæ:hð DRAW THE PLANET ITSELFúâ 2,80,100,30,30¬1.7ß 2,80,100©â 3,80,100,30,30¬1.7Èâ 3,80,100,10,30¬1.7,0,180×"ß3,105,100Ý,:6 DRAW THE FRONT PART OF THE RINGS@I² 40 ¤ 82'J‹I±46 ¯ I³54§‚;T‹ I±65¯ I³73§ ‚]^â 1,80,100,I,I­2.5,90,270,A,1ch‚ir:ˆ| DRAW A COUPLE OF PLANETS †ç2,8,4:â2,0,0,20,34¬ß 2,0,0Çšç2,6,4:â2,110,40,10,17Ö¤ß 2,110,40÷®ç1,6,1:â1,110,40,10,17,0,180¸â1,110,40,3,17,0,180Âß 1,118,40%Ì:?Ö WAIT FOR A KEYPRESSRà¡A$:‹A$²""§480bê‹A$²Ç(13)§ŠkôÞ0,1 MX$²"G"2™"“"Ç(27)"T":ç0,2:ç4,2:ç1,1T™"A - WOLF WHISTLE SIMULATIONl™"B - FLYING SAUCERˆ™"C - GRANDFATHER CLOCK™™"D - SCALES­™"E - EXPLOSIONÅ™"F - PHONE RINGINGÔ™"G - BOMBî2¡A$:‹A$³"A"°A$±MX$§50ý<A²Æ(A$)«64?F‘ A 100,200,300,400,500,600,700,800,900,1000,1100,1200,1300GP‰50MZ:l[ THIS IS THE WOLF WHISTLE‚dÛ7:L²600¤1000©20nÚ1,L,3:‚¡xL²500¤800©40®‚Ú1,L,3:‚ÁŒL²800¤500©«40ЖÚ1,L,3:‚:ŽÖ :ö¡ THIS IS THE FLYING SAUCERÈÛ7:M²1¤20ÒL²900¤850©«10%ÜÚ1,L,1:‚7æL²850¤900©10DðÚ1,L,1:‚Lú‚:ŽR:v THIS IS THE GRANDFATHER CLOCK…,K²1¤12:Û06Ú1,500,60:Ú2,210,60®@I²8 ¤ 1 ©«1ÂJÛ I:J²1¤50:‚:‚ÕTI²1¤450:‚:‚:ŽÛ^:è_ SCALESƒ 7,118,169,262,345,383,453*‘ƒ 516,571,596,643,685,704,7393’Œ:Û8HšI²0¤6:‡ V1(I):‚]¤I²0¤6:‡ V2(I):‚l©I²1¤200:‚®I²0¤6:Ú1,V1(I),50:J²1¤20:‚:‚²¸I²0¤6:Ú1,V2(I),50:J²1¤20:‚:‚¸ÌŽ¾Ö:Î× EXPLOSIONßôÛ0:Ú3,900,60íþI²8¤1©«1Û I:J²1¤40:‚:‚ Û 0:Ž:% PHONE RINGING1XK²1¤10cbÚ1,800,75:I²1¤30:Û0:J²1¤10:‚:Û8:J²1¤10:‚:‚vlJ²1¤500:‚:‚:Ž|v:‡w BOMB¬¼Û8:I²1000¤400©«10:Ú1,I,3:‚:‰500xôyúzþ{|}~€"‚&ƒ,„,…0‡0ˆ6‰:Š@ŒDJŽNTX‘^’b“h¡l¢l£r¤v¥v¦v§|¨€©