&$: COPYRIGHT 1989 FALSOFT, INC&@ LISTING 1 - DRAW STAR&a4: RESERVE GRAPHICS MEMORY&4,1: SET UP HIGH RESOLUTION&(0,1: SET BACKGROUND=WHITE AND FOREGROUND=BLACK&2: CLEAR GRAPHICS SCREEN&<1,1: TURN ON GRAPHICS SCREEN',FV57.29577951: DEGREES TO RADIANS CONVERSION'XPX195(90V)128: X-VALUE AT POINT 1'ZY195(90V)96: Y-VALUE AT POINT 1'dX295(162V)128: X-VALUE AT POINT 2'nY295(162V)96: Y-VALUE AT POINT 2( xX395(234V)128: X-VALUE AT POINT 3(8Y395(234V)96: Y-VALUE AT POINT 3(eX495(306V)128: X-VALUE AT POINT 4(Y495(306V)96: Y-VALUE AT POINT 4(X595(378V)128: X-VALUE AT POINT 5(Y595(378V)96: Y-VALUE AT POINT 5)(X1,Y1)(X3,Y3),: DRAW STAR LEG 1-3);(X5,Y5),: DRAW STAR LEG 3-5)_Ȼ(X2,Y2),: DRAW STAR LEG 5-2)һ(X4,Y4),: DRAW STAR LEG 2-4)ܻ(X1,Y1),: DRAW STAR LEG 4-1)恥230: LOOP TO ADMIRE CREATION378V)96: Y-VALUE AT POINT 5)(X1,Y1)(X3,YD&$: COPYRIGHT 1989 FALSOFT, INC&E LISTING 2 - MULTIPLE STARS&f4: RESERVE GRAPHICS MEMORY&4,1: SET UP HIGH RESOLUTION&(0,1: SET BACKGROUND=WHITE AND FOREGROUND=BLACK&2: CLEAR GRAPHICS SCREEN'5:"AMOUNT OF ROTATION (1-36)";R'7R1R3653'5<1,1: TURN ON GRAPHICS SCREEN'gFV57.29577951: DEGREES TO RADIANS CONVERSION'uKA072R'PX195((90A)V)128: X-VALUE AT POINT 1'ZY195((90A)V)96: Y-VALUE AT POINT 1(dX295((162A)V)128: X-VALUE AT POINT 2(7nY295((162A)V)96: Y-VALUE AT POINT 2(hxX395((234A)V)128: X-VALUE AT POINT 3(Y395((234A)V)96: Y-VALUE AT POINT 3(X495((306A)V)128: X-VALUE AT POINT 4(Y495((306A)V)96: Y-VALUE AT POINT 4),X595((378A)V)128: X-VALUE AT POINT 5)]Y595((378A)V)96: Y-VALUE AT POINT 5)(X1,Y1)(X3,Y3),: DRAW STAR LEG 1-3)(X5,Y5),: DRAW STAR LEG 3-5)Ȼ(X2,Y2),: DRAW STAR LEG 5-2)һ(X4,Y4),: DRAW STAR LEG 2-4*ܻ(X1,Y1),: DRAW STAR LEG 4-1*A*C恥230: LOOP TO ADMIRE CREATION96: Y-VALUE AT POINT 5)(X1,Y1)(X3,Y3),: DRAW STAR LEG 1-3)(X5,Y5),: DRAW STAR LEG 3-5)Ȼ(X2,Y2),: DRAW STAR LEG 5-2)һ(X4,Y4),: DRAW STAR LEG 2-4*ܻ(X1, &$: COPYRIGHT 1989 FALSOFT, INC&H: ############################&l: # #&: # GALISAT 2 #&: # #& :# COCO 2 VER. BY DAVID #& :# FRANCIS. DEFAULT PLOT: #':# EAST=RIGHT, WEST=LEFT. #'@:# CHG. L TO -1 IN LINE #'c:# 6002 TO FLIP. #':# #':############################(;:(32,128):@11,"galisat";:1043,50:@73,"COCO 2 VERSION":8)"BY DAVID FRANCIS"::" PLOTS POSITIONS OF JUPITER'S GALILEAN SATELLITES(T6000 : INITIALIZE(k2000 : GET DATE(x 65495,0("5000 : SETUP PLOT SCREEN(#1000 : MAIN LOOP($: ===========================(&: MAIN PROGRAM LOOP)(: ===========================)wDL((N(N))20.5)20:MT(358.476.9856003N)P:MJ(225.328.0830853N)P:JJ221.647.9025179N)VT1.92(MT).02(2MT):VJ5.55(MJ).17(2MJ): K(JJVTVJ)P:DT(28.0710.406(K))*Z(K)DT:I(Z(1ZZ)):IIP:F(NDT173):F1IVJ*U184.5506203.405863FF1:U241.5015101.2916323FF1:U3109.977050.2345169FF1:U4176.358621.4879802FF1*X15.906(U1PPI):X1139L(X13.5.5):X29.397(U2PPI):X2139L(X23.5.5)+FX314.989(U3PPI):X3139L(X33.5.5):X426.364(U4PPI):X4139L(X43.5.5)+a(12) 65494,0:+(X1,V):(X2,V):(X3,V):(X4,V)+VV1:NN.05:V191 1020 :1000+(12) 65494,0: :1020+: =========================,: GET DATE & CONVERT IT TO,$: JULIAN DAY NO.,E: =========================,Ї:" ENTER YEAR (YYYY)";Y:" ENTER MONTH (MM)";M:" ENTER DAY (DD)";D,ҁ3000 : DATE VALID?,D(D):G1,D1(D):FDD1.5,J(7(((M9)12)Y)4)-څ G0 2018-S(M9):A(M9)-3J1(YS(A7))-RJ1(((J1100)1)34)-nJJ(275M9)D1GJ1-JJ17210272G367Y- F0 2026-FF1:JJ1-NJ2415020F--: =========================-: CHECK FOR VALID DATE.: =========================.X Y0 Y99999 :" YEAR MUST BE 0 - 99999.":3008. D1 D31 :" DAY IS INVALID.":3008. M1 M12 :" MONTH IS INVALID.":3008. . :" PRESS [ENTER] TO RE-ENTER DATA. I$/ I$:I$"" 3012/ ƅI$(13) 3012/+ Ȓ65494,0:/L: =========================/e: SETUP PLOT SCREEN/: =========================/4,1::1,1/L1 "BM249,180"EAST$:"BM2,180"WEST$ :"BM2,180"EAST$:"BM249,180"WEST$0(136,0)(136,191),:(142,0)(142,191),0UZZ2 191 20:(0,ZZ)(15,ZZ),:(241,ZZ)(256,ZZ),:0[0|: =========================0: INITIALIZE0: =========================0pPI3.14159265:PPI180:V0:V11800rL11vEAST$"U6R4L4D3R2L2D3R4":WEST$"U6D6E2U1D1F2U61x0UZZ2 191 20:(0,ZZ)(15,ZZ),:(241,ZZ)(256,ZZ),:0[0|: =========================0: INITIALIZE0: =========================0pPI3.14159265:PPI180:V0:V11800rL11vEAST$"U6R4L4D3R2L2D3R4":WESTM&&*: COPYRIGHT 1989 FALSOFT,INC&H "**********************"&b" R.M. EHRENBERG"&y" PRESENTS"&(" CATAGORIES"&2"**********************"& 1420: 770/nH A$(94) 1070/R PS0 880/\P0P0.2: P01.2 P0.2/f (104,176)(123,183),2: (12,22),P0: 770/p PS1 9100Yz P1100 P1P110 : P11000 P1P1100 : P110000 P1P11000 : P1P110000: P1110000 P1100 (200,176)(247,183),2: (24,22),P1: 7700 PS2 9400P2P2.2: P21.2 P2.20 (424,176)(443,183),2: (52,22),P2: 7701 PS3 9701u P3100 P3P310 : P31000 P3P3100 : P310000 P3P31000 : P3P310000: P3110000 P3101 (520,176)(567,183),2: (64,22),P3: 7701ʅ PS4 10101ԅ P40 P41 : P401 (80,184)(159,192),32+ P40 (10,23), "CONTINUOUS" : (10,23), "STEP"2A PS5 10502\P5P51: P53 P502x (280,184)(359,192),32 P50 (35,23),"X ONLY" : P51 (35,23),"Y ONLY" : (35,23), "X AND Y"2 7702$: G=GOTO ACCUMULATE DATA3. A$"G" 12513e8 P50 &H6076,&H95 : P51 &H60F0,&H95 : &H6076,&H0A: &H60F0,&H873B P50 P11000 &H6073,&H63: &H6074,&H583L P50 P11000 &H6073,&H80: &H6074,&H004 V P51 P31000 &H60ED,&H63: &H60EE,&H584?` P51 P31000 &H60ED,&H80: &H60EE,&H004j P52 P11000 &H6073,&H65: &H6074,&HB0: &H60ED,&H65: &H60EE,&HB04t P52 P11000 &H6073,&H80: &H6074,&H00: &H60ED,&H80: &H60EE,&H005~ P50 TDP1 : P51 TDP3 : TDP15CTD((TD60).130).008: P52 TDTD25UMS(TD256)5jLS(TDMS256)5 &H606B,MS: &H606C,LS: &H60E5,MS: &H60E6,LS5 P52 P110 P120: 1280: 7705 128,16 P50 A0(0) : P51 A1(0) : P52 A0(0)6% 128,161 14906Zą P40 "" 1191 : 7706p΅ P41 12506A$: A$"" 1240 : A$"S" 770 : 11916⁥ 7706 A$"W" 12606 (416,184)(535,192),4,7  FI$: FI$"" 1258 : (52,23), FI$73 "O", #1, FI$7P#1,PS,P0,P1,P2,P3,P4,P57 I&H6100 &H65AF: B(((I)4)64): #1,(B): 7 17 (416,184)(535,192),47끥 7707 A$"R" 7707 (416,184)(535,192),4,8 FI$: FI$"" 1267 : (52,23),FI$82 "I", #1, FI$8O#1,PS,P0,P1,P2,P3,P4,P58 I&H6100 &H65AF: #1, B$: B((B$)64)4: I,B: 8 18 (416,184)(535,192),48 1430: 1500: 7708:8: DISPLAY INFORMATION LINE SUBROUTINE9 (0,174)(639,191),19w (0,22), " TRACE 1: Y= V/DIV X= MS/DIV TRACE 2: Y= V/DIV X= MS/DIV"9 (0,23), " REFRESH: DISPLAY MODE: FILE: "9 (0,1), " CURRENT PARAMETER SELECTED:":( (104,176)(123,183),2: (12,22),P0:<2 (200,176)(247,183),2: (24,22),P1:f< (424,176)(443,183),2: (52,22),P2:F (520,176)(567,183),2: (64,22),P3:P (80,184)(159,192),3:Z P40 (10,23),"CONTINUOUS" : (10,23), "STEP";d (280,184)(359,192),3;Vn P50 (35,23),"X ONLY" : P51 (35,23),"Y ONLY" : (35,23),"X AND Y";\x;c:;: DISPLAY SELECT LINE SUBROUTINE; (232,0)(639,17),1 @ Y20 (X20,Y),: : (50,3),"POINTS OFF SCREEN!":>E 3,0>SJ ISB1 EB 2: Y170((I) &HFC)SF: X(I&H6100)2>K X1 Y19 (X20,Y)(X20,Y),: >T Y20 (X20,Y),: : (50,3),"POINTS OFF SCREEN!":>^ 1670?h ISB EB: Y170((I) &HFC)SF: XI&H6100?/r X0 Y19 (X20,Y)(X20,Y),: ?p| Y20 (X20,Y),: : (50,3),"POINTS OFF SCREEN!":?z 1,0?T Y20 (X20,Y),: : (50,3),"POINTS OFF SCREEN!":>^ 1670?h ISB EB: Y170((I) &HFC)SF: XI&H620BR8D40R20U40NL20"A%ˆ"NR20M-12,+5"AwІ"BR22BD54R20U20L20ND20U20R20D40BR6BU12U4BU8U4BU12BR10D40BR10R20U20L20U20R20"AՆ"ND18M-12,+4"Aچ"BR18BD54R20U20L20ND20U20R20D40BR6BU12U4BU8U4BU12BR10R20D20NL20D20NL20BR8U40R20D40NL20"A߆"NL20M-12,+2"BT"BR18BD54R20U20L20ND20U20R20D40BR6BU12U4BU8U4BU12BR10D20R20U20D40BR8R20U20L20U20R20"Bd"NU16NL14"B"BR16BD54R20U20L20U20R20D40BR6BU12U4BU8U4BU12BR6D40R20U40NL20BR8D40R20U40NL20"B"NR20NU2ND2M-16,-2"C"BR22BD54R20U20L20U20R20D40BR6BU12U4BU8U4BU12BR10D40BR10R20U20L20U20R20"C2"ND16M-16,-4"C"BR18BD54R20U20L20U20R20D40BR6BU12U4BU8U4BU12BR10R20D20NL20D20NL20BR8U40R20D40NL20"C"NL20M-16,-5"C "BR18BD54R20U20L20U20R20D40BR6BU12U4BU8U4BU12BR10D20R20U20D40BR8R20U20L20U20R20"D"NU16M-16,-7"D^"BR10BD14D40BR10U40R20D40NL20BR10BU12U4BU8U4BU12BR6D40R20U40NL20BR8D40R20U40NL20"Dq"NR20M-16,-9"D "BR16BD14D40BR10U40R20D40NL20BR10BU12U4BU8U4BU12BR10D40BR10R20U20L20U20R20"D%"ND16M-15,-12"E2*"BR10BD14D40BR10U40R20D40NL20BR10BU12U4BU8U4BU12BR10R20D20NL20D20NL20BR8U40R20D40NL20"EF/"NL20M-11,-10"E4"BR10BD14D40BR10U40R20D40NL20BR10BU12U4BU8U4BU12BR10D20R20U20D40BR8R20U20L20U20R20"E9"NU16M-9,-10"F>"BR16BD14D40BR14NU40BR10BU12U4BU8U4BU12BR6D40R20U40NL20BR8D40R20U40NL20"FC"NR20M-7,-10"F[H"BR22BD14D40BR14NU40BR10BU12U4BU8U4BU12BR10D40BR10R20U20L20U20R20"FnM"ND16M-5,-10"FR"BR20BD14D40BR14NU40BR10BU12U4BU8U4BU12BR10R20D20NL20D20NL20BR8U40R20D40NL20"FW"NL20M-3,-10"G$\"BR20BD14D40BR14NU40BR10BU12U4BU8U4BU12BR10D20R20U20D40BR8R20U20L20U20R20"G8a(13)865GLf:0,0:730999Gk BR6BU12U4BU8U4BU12BR6D40R20U40NL20BR8D40R20U40NL20"Gp BR10D40BR10R20U20L20U20R20"Gu R20D20NL20D20NL20BR8U40R20D40NL20"Gz D20R20U20D40BR8R20U20L20U20R20"HX0:I148:TEM$P$(I,1):P$(I,1)P$(I,2):P$(I,2)TEM$::TEM$CL$(1):CL$(1)CL$(2):CL$(2)TEM$Hb105H:@101,"YOU TRIED"NCNW"TIMES &":@165,"ANSWERED"NC"CORRECTLY"H@229,"WHILE DOING"NW"WRONG."HNQNCNW: NQ0 NQ1HMS(NCNQ100)I@293,"YOUR SCORE IS"MS"%."I:@357,"ANOTHER TRY (Y/N/C) ?";IOX$:X$"Y" I_X$"N":IoX$"C"270Iy935NW"TIMES &":@165,"ANSWERED"NC"CORRECTLY"H@229,"WHILE DOING"NW"WRONG."HNQNCNW: NQ0 NQ1HMS(NCNQ100)I@2&Bd: COCO 3 OSCILLOSCOPE PROGRAM. EMULATES A DUAL-TRACE SCOPE.&In:&ax: DATA DICTIONARY:&~: A$=TEMPORARY VARIABLE&: B$=TEMPORARY VARIABLE&: EB=END OF BUFFER&: FI$=FILE NAME VARIABLE&: I=TEMPORARY INDEX VARIABLE': P0=Y VOLTS PER DIVISION FOR TRACE 1'N: P1=X TIME PER DIVISION FOR TRACE 1 IN MS'y: P2=Y VOLTS PER DIVISION FOR TRACE 2': P3=X TIME PER DIVISION FOR TRACE 2 IN MS': P4=REFRESH, 0=CONTINUOUS, 1=STEP': P5=DISPLAY MODE, 0=X, 1=Y, 2=X AND Y(: PS=PARAMETER SELECTED, 0-5(D: PS$=TEMPORARY STRING VARIABLE(^: SB=START OF BUFFER(~: SF=Y SCALE FACTOR, FINAL(: Y=TEMPORARY VARIABLE FOR Y POSITION(: YS=Y SCALE FACTOR(:(": STORE MACHINE LANGUAGE CODE IN &H6000 ON),0&H6000: 1&H607A))6 1000, &H5FFF)A@ I&H6000 &H60F1)[J A$: I,("&H"A$))aT)^ 10,8E,FF,00,8E,61,00,C6,00,BD,A9,A2,C6,80,F7,FF,20,A6,A4,2B,04,C0,40,20,04,CB,40,20,00,F7,FF,20,A6,A4,2B,04,C0,20,20,04,CB,20,20,00,F7,FF,20,A6,A4,2B*h 04,C0,10,20,04,CB,10,20,00,F7,FF,20,A6,A4,2B,04,C0,08,20,04,CB,08,20,00,F7,FF,20,A6,A4,2B,04,C0,04,20,04,CB,04,20,00,F7,FF,20,A6,A4,2B,04,C0,02,20,04+5r CB,02,20,00,E7,80,CC,00,00,83,00,01,26,FB,8C,7F,FF,26,00,39,20,8D,10,8E,FF,00,8E,61,00,C6,01,BD,A9,A2,C6,80,F7,FF,20,A6,A4,2B,04,C0,40,20,04,CB,40,20+| 00,F7,FF,20,A6,A4,2B,04,C0,20,20,04,CB,20,20,00,F7,FF,20,A6,A4,2B,04,C0,10,20,04,CB,10,20,00,F7,FF,20,A6,A4,2B,04,C0,08,20,04,CB,08,20,00,F7,FF,20,A6,U A4,2B,04,C0,04,20,04,CB,04,20,00,F7,FF,20,A6,A4,2B,04,C0,02,20,04,CB,02,20,00,E7,80,CC,00,00,83,00,01,26,FB,8C,7F,FF,26,00,39,\:,n: INITIALIZE,v 4,|, 1,3200, 2,200, 3,200, 4,300, (0,174)(639,191),1, (0,0)(47,9),2, (0,0)(79,7),3- (0,0)(119,7),4-PS0-!P110: P310-0P01: P21-?P40: P50-J 620-V& 1280-b0 1430-m: 760-yD 1270-N 1420-X:-b: DISPLAY GRATICULE SUBROUTINE-l X20 620 60-v (X,21)(X,171),-- Y21 171 30. (20,Y)(620,Y),.., X20 620 12.D (X,169)(X,173),.J._ƀ Y21 171 4.w (316,Y)(324,Y),.}ڋ..:.: READ KEYS SUBROUTINE.A$: A$"" 770. A$(9) 810.PSPS1: PS6 PS0/  1(3)1:N(B(I))0195/6N(B(I))0:I:I14:N(I)1:/QB(48):BA((Y))205/rC(48):CB CA((Y))210/ A$(1):CL$(1):P$(A(Y),1)/ A$(B(2)):CL$(2):P$(B,2):P$(B,3)/ A$(B(3)):CL$(2):P$(C,2):P$(C,3)0 A$(B(4)):CL$(2):P$(A(Y),2):P$(A(Y),3)01,00$Z00-0,40R A$(1)"C0":CL$(1):P$(A(Y),1)0 A$(B(2))"C1":CL$(2):P$(B,2):P$(B,3)0 A$(B(3))"C1":CL$(2):P$(C,2):P$(C,3)0 A$(B(4))"C1":CL$(2):P$(A(Y),2):P$(A(Y),3)00,1:1,11(8,6)(120,80),,B1+X$:X$" "290:X$"@"9051N1,0:(8,6)(120,80),,B:2751a"ZZ1:Z4Z11'1,0:(C(Z),D(Z))(E(Z),F(Z)),,B1,X$:X$" "290:X$(13)310:X$"@"905111,0:(C(Z),D(Z))(E(Z),F(Z)),,B:29516Z1B(4)32023;NWNW1:K15:0,4:1,1:10,3:0,1:1,1:1,3:K:2952@NCNC1:0,4:1:(0,40)(256,126),,B:(6,44)(124,122),,B:(130,44)(248,122),,B:(2,42),0,02E A$(5):CL$(1):P$(A(Y),1)2J A$(6):CL$(2):P$(A(Y),2):P$(A(Y),3)2O1,13TX$:X$(13)3403Y0,13+^31:1,1:24:Y:9053c0,2:1:1,1:(0,40)(256,126),,B:(6,44)(124,122),,B:(130,44)(248,122),,B:(2,42),0,03hI148: A$(5):CL$(1):P$(I,1)3m A$(6):CL$(2):P$(I,2):P$(I,3)3rX$:X$(13)3704-w1,0:(8,46)(122,120),,BF:(132,46)(246,120),,BF:I43|4>"U16"4"BR14BD14ND40BR10R20D20L20D20R20BR6BU12U4BU8U4BU12BR6D40R20U40NL20BR8D40R20U40NL20"4"NR20M+2,-12"4"BR18BD14ND40BR10R20D20L20D20R20BR8BU12U4BU8U4BU12BR10D40BR10R20U20L20U20R20"5"ND18M+3,-12"5m"BR14BD14ND40BR10R20D20L20D20R20BR6BU12U4BU8U4BU12BR6R20D20NL20D20NL20BR8U40R20D40NL20"5"NL20M+5,-12"5"BR14BD14ND40BR10R20D20L20D20R20BR6BU12U4BU8U4BU12BR6D20R20U20D40BR8R20U20L20U20R20"5"NU16M+7,-12"63"BR24BD14D40BR10BU12U4BU8U4BU12BR6D40R20U40NL20BR8D40R20U40NL20"6F"NR20M+10,-9"6"BR30BD14D40BR10BU12U4BU8U4BU12BR10D40BR10R20U20L20U20R20"6"ND16M+10,-9"6†"BR28BD14D40BR10BU12U4BU8U4BU12BR6R20D20NL20D20NL20BR8U40R20D40NL20"6dž"NL20M+12,-9"7=̆"BR28BD14D40BR10BU12U4BU8U4BU12BR6D20R20U20D40BR8R20U20L20U20R20"7Pц"NU16M+14,-9"7ֆ"BR20BD14R20D20L20D20R20BR6BU12U4BU8U4BU12BR6D40R20U40NL20BR8D40R20U40NL20"7ۆ"NR20M+14,-6"7"BR22BD14R20D20L20D20R20BR8BU12U4BU8U4BU12BR10D40BR10R20U20L20U20R20"8"ND16M+14,-4"8g"BR22BD14R20D20L20D20R20BR6BU12U4BU8U4BU12BR6R20D20NL20D20NL20BR8U40R20D40NL20"8z"NL20M+14,-3"8"BR22BD14R20D20L20D20R20BR6BU12U4BU8U4BU12BR6D20R20U20D40BR8R20U20L20U20R20"8"NU16R14"9."BR20BD14R20D20NL20D20NL20BR8BU12U4BU8U4BU12BR6D40R20U40NL20BR8D40R20U40NL20"99"R20"9"BR22BD14R20D20NL20D20NL20BR8BU12U4BU8U4BU12BR10D40BR10R20U20L20U20R20"9 "ND16M+16,+2"9"BR20BD14R20D20NL20D20NL20BR8BU12U4BU8U4BU12BR6R20D20NL20D20NL20BR8U40R20D40NL20":"NL20M+16,+4":W"BR20BD14R20D20NL20D20NL20BR8BU12U4BU8U4BU12BR6D20R20U20D40BR8R20U20L20U20R20":j!"NU16M+14,+7":&"BR18BD14D20R20U20D40BR8BU12U4BU8U4BU12BR6D40R20U40NL20BR8D40R20U40NL20":+"NR20M+14,+9";0"BR18BD14D20R20U20D40BR8BU12U4BU8U4BU12BR10D40BR10R20U20L20U20R20";'5"ND16M+11,+10";z:"BR16BD14D20R20U20D40BR8BU12U4BU8U4BU12BR10R20D20NL20D20NL20BR8U40R20D40NL20";?"NL20M+11,+12";D"BR16BD14D20R20U20D40BR8BU12U4BU8U4BU12BR10D20R20U20D40BR8R20U20L20U20R20";I"NU16M+10,+14"M"BR22BD54R20U20L20ND20U20R20BD40BR6BU12U4BU8U4BU12BR10D40BR10R20U20L20U20R20">`"ND16M-5,+14">"BR18BD54R20U20L20ND20U20R20BD40BR6BU12U4BU8U4BU12BR10R20D20NL20D20NL20BR8U40R20D40NL20">"NL20M-7,+14"?,"BR18BD54R20U20L20ND20U20R20BD40BR6BU12U4BU8U4BU12BR10D20R20U20D40BR8R20U20L20U20R20"??"NU16M-9,+14"?"BR16BD14ND4R20D40BR6BU12U4BU8U4BU12BR6D40R20U40NL20BR8D40R20U40NL20"?"NR22M-10,+13"?"BR20BD14ND4R20D40BR6BU12U4BU8U4BU12BR10D40BR10R20U20L20U20R20"?"ND18M-10,+11"@G"BR16BD14ND4R20D40BR6BU12U4BU8U4BU12BR10R20D20NL20D20NL20BR8U40R20D40NL20"@Z"NL20M-10,+9"@"BR16BD14ND4R20D40BR6BU12U4BU8U4BU12BR10D20R20U20D40BR8R20U20L20U20R20"@"NU16M-12,+7"AƆ"BR16BD54R20U20L20ND20U20R20D40BR6BU12U4BU8U4BU12BR6D40R20U40NL63) MORTGAGE"/# " (80) DIAMONDS"/: " (84) GALISAT2"/Q " (85) GALISAT3"/e " (94) TRIG1"/y " (94) TRIG2"/ "(112) BASKETBL"/ "(114) SAMURAI"/І "END"R". " (61) HCAT". " (62) CATS". " (62) INNKEEP"/  " (XREF","(182) COMMANDO"0. END) FILESRCH"/ "(102) LOADER","(103) CADPRINT","(108) RESTORE","(117) ROBOCISE","(135) WHO AM I"/ "(146) TIN EAR","(147) KOLAROLA","(150) SUBTRACT","(162) SUPERCLS","(166) SOUND 2"0$ "(167) SOUNDGEN","(172) #z&"***************************&C* WATCH THIS:CLOCK SKILLS *&d* COPYRIGHT (C) 1989 *&* BY FRED B. SCERBO *&* 60 HARDING AVENUE *&* NORTH ADAMS, MA 01247 *&***************************&3000'+ 0:(32,220);(32,204);:I1192:A:(A128);:'G (32,195);(32,211);'i@390," CLOCK SKILLS ";'@422," BY FRED B.SCERBO ";:@454," COPYRIGHT (C) 1989 ";(61,,58,53,56,62,60,61,53,60,62,61,53,60,61,53,,53,64,78,77,76,74,74,,74,77,72,78,76,76,77(Q53,,58,53,,58,,53,52,,58,52,53,,,53,,53,,72,69,,72,74,,74,69,,74,,,(#53,,58,53,,59,51,55,,,58,,53,,,53,51,55,,,69,,,75,67,74,69,,75,67,67,67((53,,58,53,,58,,53,,,58,,53,,,53,,53,,,69,,,74,,74,69,,,,,69)$-53,,58,53,,58,,53,,,58,,53,,48,53,,53,,,69,,,74,,74,69,,64,,,69)253,51,59,55,,59,48,55,,49,59,,53,51,55,53,,53,,64,71,66,64,74,64,74,71,66,75,67,67,71)7X$:X$(13)55)< P$(48,3),A$(6),B$(48),C$(48),A(48),N(48),B(4),C(4),D(4),E(4),F(4),AO(48)*5AI13: C(I),D(I),E(I),F(I)::I16:A$(I)::I148:P$(I,1),P$(I,2):*>F1,0*RKCL$(2)"BR1BL1"+JPCL$(1)"BR20R86D70L86BU70D2R84D66L84U66R2ND66BR34BD4ND8BR4R4D4L4D4R4BD42BL2L4D4R4D4L4U4BH21BL8R4U8L4D4R4BR62BD4R4U4NL4U4L4BH16BD2U8BR10BD8R4D4L4D4R4BD20D8U4L4U4BL12BD10NR4D4R4D4L4BL30U8L4BL6BU2L4U4NR4U4R4D8BU28U8L4D8NR4BL4U8BR14U8BR4D8BF16BD2"+U::(32,"=");:@102,"AN INTRODUCTION TO":@137,"CLOCK SKILLS":@199,"A) REVIEW CLOCKS":@263,"B) QUIZ CLOCKS":@327,"C) REVERSE QUIZ"+Z@388,"<<