START 590) COLOR BLOCKS@G134096: G33,0Q(S$""r2 "":CD$""< "BLACK","WHITE","RED"F "CYAN","PURPLE","GREEN"P "BLUE","YELLOW","ORANGE"% Z "BROWN","PINK","GRAY 1"R d "GRAY 2","LT GREEN","LT BLUE"d n "GRAY 3"r x X0 3 Y1 5 Z1 4 " "(CD$,X4Z,1)" "; Z Y X3 X ""1)"Ϸ"32)" "$ 1)" "32)" "7 1)"̯"K "";: X1 4] A$,B$,C$,D$z "";: X1 "";  ""A$,""B$,""C$,""D$  X:  A$: A$"" 280 "A$(13) , G33,(G33)1 15 6 280 @K1 JA1:B0 T"":53281,A:53280,B3 ^ X102410242540F hY55296X1024V r X,91:Y,Be | X:198,0x T$:T$""390 T$(13)590 "":53281,B:53280,A  X102410242540 Y55296X1024  X,91:Y,A  X T$:T$""460 T$(13)590 320+  COLOR BAR TESTE 53280,0:53281,0:"W A120:""; "   ";  A14:"  "; &" ";: +198,0 0Z$:Z$""560 :Z$(13)590 D490X N53280,6:53281,1: "**** COMMODORE-64 DEMO ****"} X" F1 COLOR DEMO b" F2 HASHING DEMO l" F3 NTSC BAR CHART DEMO v" F4 SOUND DEMO - SIREN'" F5 JOYSTICK DEMOO" F6 KEYBOARD DEMOy" F7 DISK DRIVE DEMO" F8 EXIT TO BASIC"DIRECTIONS:""ALWAYS PRESS  RETURN FOR THE MAINMENU" "PRESS THE  SPACE BAR TO CONTINUE A DEMO"P" TO SELECT A DEMO, PRESS A FUNCTION KEY"Vj Z$:Z$""690 Z$""808,237:"": Z$""20Z$""320 Z$""490 Z$""840 Z$""1000 Z$""5000 Z$""2000 690>H53280,6:"**** COMMODORE-64 DEMO ****bJ" SOUND DEMOnRS54272\ L0 24: SL,0:f S14,5 : S18,16p S3,1 : S24,143z S6,240: S4,65FR5389 T1 200: FQFR(S27)3.5%: HF(FQ256):LFFQHF256<: S,LF: S1,HFBO S24,0" PRESS RETURN FOR MAIN MENU";:""30)"OK"198,0Z$:Z$""970Z$(13)590840 *** JOYSTICK DEMO PGM ***X1:P1:JL56321:1030X2:P2:JL56320:10301 1340:""< 1260c JV1 35)"OK ":1260:1070t$ 1260:1050. JV9 35)"OK ":1260:10908 1260:1070B JV8 35)"OK ":1260:1110L 1260:1090 V JV10 35)"OK ":1260:1130` 1260:1110Cj JV2 35)"OK ":1260:1150Tt 1260:1130{~ JV6 35)"OK ":1260:1170 1260:1150 JV4 35)"OK ":1260:1190 1260:1170 JV5 35)"OK ":1260:1210 1260:119035)"OK "$ GOTO 10102X11020o" PRESS RETURN FOR MAIN MENU";:""30)"OK"Z$:Z$(13)5901250 *** JOYSTICK ROUTINE ***: 56322,0 JV(JL)FRJV 16JV15(JV 15)( 56322,255 2A<53280,4:"**** COMMODORE-64 DEMO ****gF" JOYSTICK DEMOzP"DIRECTIONS:Z" PLUG JOYSTICK INTO GAME PORT ";P_" PRESS FIRE WHEN READY TO TESTd" PRESS RETURN FOR MAIN MENUn Z$:Z$(13)590-p1280: FR16 1390Dx"DIRECTIONS:x"1. PRESS JOYSTICK UP ""2. PRESS JOYSTICK UP + RIGHT ""3. PRESS JOYSTICK RIGHT ""4. PRESS JOYSTICK DOWN + RIGHT8"5. PRESS JOYSTICK DOWN "_"6. PRESS JOYSTICK DOWN + LEFT"7. PRESS JOYSTICK LEFT ""8. PRESS JOYSTICK UP + LEFT"9. PRESS FIRE BUTTON53280,5:"**** COMMODORE-64 DEMO ****$1,8,15:15,8,15* 44NT30[W" DISK DRIVE DEMOn\"DIRECTIONS:f"1. SELECT ONE: " PRESS RETURN FOR MAIN MENU" PRESS [F] TO FORMAT + TEST I0 9: A$:# A$: A$(13) 1:15: 5905 A$"F"2265@ 2240i"2. INSERT BLANK DISK FOR TESTING|"3. SELECT:" HOW MANY PASSES 3";PP:""TI$"000000"TT181,"N0:TEST DISK,00" 53280,2: C1$" DISK NEW COMMAND "N C2$" WAIT ABOUT 80 SECONDS "e$ CC$C1$C2$: 3230x. TINT 24208 "SYSTEM IS"B " NOT RESPONDING"L " CORRECTLY TO COMMANDS"V 3270j :t ~ " * * * * * * * * * * * * * "; ? " "h " * *" "  DRIVE PASSES " "  MECHANICAL TEST " SS1500: " "  TT21" 2,8,2,"0:TEST FILE,S,W"T CC$" OPEN WRITE FILE" : 3230z CH2:CC$"WRITE DATA" : 3340 CC$" CLOSE "CC$ : 3230 2,8,2,"0:TEST FILE,S,R" CC$" OPEN READ FILE" : 3230 CH2: 3400$( 1,"S0:TEST FILE"X2 CC$" SCRATCH FILE":TT1 : 3230^< :nF DD1500:K " * * * * * * * * * * * * * ";P TT21Z 4,8,4,"#"d NN%(1(TI)254NN%)255:1,"B-P";4;NN%n NN$"": I1 255:NN$NN$(I):x 4,NN$;4 1,"U2:";4;0;35;0a CC$" WRITE TRACK 35": 3230v 1,"U2:";4;0;1;0 CC$" WRITE TRACK 1" : 3230 1,"U1:";4;0;35;0 CC$" READ TRACK 35" : 3230 1,"U1:";4;0;1;0< CC$" READ TRACK 1" : 3230D 4J :P :Z BB1kT BPP 3480Y X1300::2430 " CONTINUE (Y/N)?";& A$:A$""3110N " "A$"";: A$"N" 1:15:S A$"Y" X 3110 CC$ 1,EN,EM$,ET,ES, "";EN;EM$;ET;ES;""; EN2 Y " UNIT IS FAILING "v " PERFORMANCE TEST " 3100 TM$TI$: 3100:TI$TM$: :  : " WRITING DATA"  I1000 1100:CH,I: 3240 * CH:!4 :!> :'!H " READING DATA"/!R A$C!\ I1000 1100N!f CH,J~!p JI " READ ERROR:": 3240!z ! 3240! CH:! 53280,5!53280,7:"**** COMMODORE-64 DEMO ****"" DISK DRIVE TEST"$"DIRECTIONS:Y"" PRESS RETURN FOR THE MAIN MENU";:""30)"OK"o"Z$:Z$(13)590y"3750"53280,5:"**** COMMODORE-64 DEMO ****"KB$(1)"1":KB$(2)"W":KB$(3)"D":KB$(4)"V":KB$(5)"0":KB$(6)"@":"#KB$(8)"F1":KB$(7)"=":KB$(9)"CRSR ^":H#" KEYBOARD DEMO[#"DIRECTIONS:#" PRESS RETURN FOR MAIN MENU#" PRESS SPACE WHEN READY TO DEMO# Z$:Z$(13)590#Z$(32)5050#"DIRECTIONS$ KB19I$" "KB;". PRESS ";KB$(KB);" KEY "e$:KB$(8)"":KB$(9)""p$"}$ KB19$KC$:KC$KB$(KB) 22)" OK "::5200$ 5120$P"  PRESS RETURN FOR MAIN MENU";:""30)"OK"%ZZ$:Z$(13)590%d5210