Teach Yourself Amstrad Basic Part 2 (UK) (Face B) (1984) [Original] [TAPE] [EDUCATIF].cdt
HexaDumpAscii only
000000: 5A 58 54 61 70 65 21 1A 01 0D 20 1C 20 11 76 09 ZXTape!... . .v.
000010: B3 04 B3 04 F5 04 71 09 02 10 08 0F 00 07 01 00 ......q.........
000020: 2C 53 41 54 31 00 00 00 00 00 00 00 00 00 00 00 ,SAT1...........
000030: 00 01 00 00 00 08 70 01 FF E5 17 00 00 00 00 00 ......p.........
000040: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000050: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000060: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000080: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000090: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0000F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000100: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000110: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000120: 00 67 A6 FF FF FF FF 11 74 09 B3 04 B3 04 F7 04 .g......t.......
000130: 6F 09 02 10 08 6A 0A 15 08 00 16 07 00 64 00 01 o....j.......d..
000140: C0 00 2C 00 6E 00 01 C0 20 53 65 6C 66 20 41 73 ..,.n... Self As
000150: 73 65 73 73 6D 65 6E 74 20 54 65 73 74 73 20 3A sessment Tests :
000160: 20 42 41 53 49 43 20 42 6F 6F 6B 20 32 00 07 00 BASIC Book 2...
000170: 78 00 01 C0 00 12 00 82 00 01 C0 20 44 41 20 39 x.......... DA 9
000180: 2F 31 32 2F 38 34 00 07 00 8C 00 01 C0 00 18 00 /12/84..........
000190: 96 00 01 C0 20 50 72 6F 67 72 61 6D 6D 65 72 73 .... Programmers
0001A0: 20 6B 65 79 73 00 07 00 A0 00 01 C0 00 10 00 AA keys...........
0001B0: 00 A4 20 0E 2C 22 6C 69 73 74 0D 22 00 0F 00 B4 .. .,"list."....
0001C0: 00 A4 20 0F 2C 22 72 75 6E 0D 22 00 3B 00 BE 00 .. .,"run.".;...
0001D0: A4 20 10 2C 22 6D 6F 64 65 20 32 3A 70 61 70 65 . .,"mode 2:pape
0001E0: 72 20 30 3A 70 65 6E 20 31 3A 69 6E 6B 20 30 2C r 0:pen 1:ink 0,
0001F0: 32 33 3A 69 6E 6B 20 31 2C 30 3A 62 6F 72 64 65 23:ink 1,0:borde
000200: 72 20 31 33 0D 22 00 15 00 C8 00 A4 20 11 2C 22 r 13."...... .,"
000210: 72 65 6E 75 6D 20 31 30 30 0D 22 00 0C 00 D2 00 renum 100.".....
000220: A4 20 12 2C 22 FF 22 00 07 00 DC 00 01 C0 00 0C . .,".".........
000230: 00 E6 00 B3 20 9F 20 1E C0 03 00 93 32 2C 00 F0 .... . .....2,..
000240: 00 01 C0 20 61 72 72 61 79 73 20 65 72 6F 72 24 ... arrays eror$
000250: 2C 71 75 65 73 24 20 28 6E 6F 74 20 64 69 6D 65 ,ques$ (not dime
000260: 6E 73 69 6F 6E 65 64 29 00 07 00 FA 00 01 C0 00 nsioned)........
000270: 0E 00 04 01 01 C0 20 53 65 74 2D 75 70 00 07 00 ...... Set-up...
000280: 0E 01 01 C0 00 26 00 18 01 AD 20 0F 01 82 20 19 .....&.... ... .
000290: 11 01 A2 20 0E 2C 19 13 01 A2 20 0F 2C 0E 01 A2 ... .,.... .,...
0002A0: 20 10 2C 0F 01 A2 20 11 2C 14 00 2D 00 22 01 CF .,... .,..-."..
0002B0: 20 19 FF 2C 1C 36 00 2C 1C 36 00 2C 1C 36 00 20 ..,.6.,.6.,.6.
0002C0: 01 C0 20 73 65 74 20 75 70 20 66 61 6B 65 20 22 .. set up fake "
0002D0: 71 75 6F 74 65 73 22 00 2B 00 2C 01 0D 00 00 73 quotes".+.,....s
0002E0: 63 6F 72 E5 EF 0E 01 0D 00 00 71 75 65 73 74 69 cor.......questi
0002F0: 6F EE EF 0F 01 0D 00 00 6C 69 6E 65 6C 65 EE EF o.......linele..
000300: 19 21 00 10 00 36 01 03 00 00 54 C2 EF FF 03 28 .!...6....T....(
000310: 17 29 00 2A 00 40 01 9F 20 1E 42 04 20 01 C0 20 .).*.@.. .B. ..
000320: 72 65 61 64 20 61 20 73 74 72 69 6E 67 20 2B 20 read a string +
000330: 70 72 65 74 74 79 20 73 65 74 75 70 00 C1 09 1C pretty setup....
000340: 00 4A 01 9F 20 1E FC 03 20 01 C0 20 53 65 74 20 .J.. ... .. Set
000350: 75 70 20 77 69 6E 64 6F 77 73 00 2B 00 54 01 9F up windows.+.T..
000360: 20 1E 14 05 20 01 C0 20 50 72 69 6E 74 20 73 74 ... .. Print st
000370: 72 69 6E 67 20 72 65 61 64 20 61 73 20 70 72 65 ring read as pre
000380: 74 74 79 65 64 00 33 00 5E 01 A9 20 23 0F 2C 17 ttyed.3.^.. #.,.
000390: 2C 15 01 BF 23 0F 2C 22 50 72 65 73 73 20 53 50 ,...#.,"Press SP
0003A0: 41 43 45 20 74 6F 20 73 74 61 72 74 22 01 D6 20 ACE to start"..
0003B0: FF 43 F2 22 20 22 01 D5 00 07 00 68 01 01 C0 00 .C." ".....h....
0003C0: 11 00 72 01 01 C0 20 4D 61 69 6E 20 6C 6F 6F 70 ..r... Main loop
0003D0: 00 07 00 7C 01 01 C0 00 12 00 86 01 0D 00 00 6C ...|...........l
0003E0: 69 6E 65 6C 65 EE EF 19 21 00 2A 00 90 01 9F 20 inele...!.*....
0003F0: 1E 42 04 20 01 C0 20 72 65 61 64 20 61 20 73 74 .B. .. read a st
000400: 72 69 6E 67 20 2B 20 70 72 65 74 74 79 20 73 65 ring + pretty se
000410: 74 75 70 00 1F 00 9A 01 0D 00 00 70 74 79 6C 69 tup........ptyli
000420: 6E 65 F3 EF 0D 00 00 70 72 65 74 74 79 6C 69 6E ne.....prettylin
000430: 65 F3 00 07 00 A4 01 01 C0 00 30 00 AE 01 C3 D9 e.........0.....
000440: 3E 20 0D 00 00 6E 75 6D 71 75 65 73 F4 20 20 20 > ...numques.
000450: 20 20 20 20 01 C0 20 6E 75 6D 62 65 72 20 6F 66 .. number of
000460: 20 71 75 65 73 74 69 6F 6E 73 20 00 37 00 B8 01 questions .7...
000470: 9E 20 0D 00 00 E9 EF 0F 20 EC 20 0D 00 00 6E 75 . ...... . ...nu
000480: 6D 71 75 65 73 F4 20 01 C0 20 6C 6F 6F 70 20 66 mques. .. loop f
000490: 6F 72 20 65 61 63 68 20 71 75 65 73 74 69 6F 6E or each question
0004A0: 20 20 00 14 00 C2 01 C3 20 03 00 00 71 75 65 F3 ...... ...que.
0004B0: 28 0D 00 00 E9 29 00 0B 00 CC 01 B0 20 0D 00 00 (....)...... ...
0004C0: E9 00 27 00 D6 01 C3 20 03 00 00 61 6E F3 20 20 ..'.... ...an.
0004D0: 20 20 20 01 C0 20 47 65 74 20 63 6F 72 72 65 63 .. Get correc
0004E0: 74 20 61 6E 73 77 65 72 00 3E 00 E0 01 9E 20 0D t answer.>.... .
0004F0: 00 00 E9 EF 0F 20 EC 20 0D 00 00 6E 75 6D 71 75 ..... . ...numqu
000500: 65 73 F4 20 01 C0 20 6C 6F 6F 70 20 66 6F 72 20 es. .. loop for
000510: 6E 75 6D 62 65 72 20 6F 66 20 71 75 65 73 74 69 number of questi
000520: 6F 6E 73 20 20 20 00 25 00 EA 01 C3 20 03 00 00 ons .%.... ...
000530: 65 72 6F F2 28 0D 00 00 E9 29 20 01 C0 20 67 65 ero.(....) .. ge
000540: 74 3E C7 20 72 65 73 70 6F 6E 73 65 73 00 0B 00 t>. responses...
000550: F4 01 B0 20 0D 00 00 E9 00 07 00 FE 01 01 C0 00 ... ............
000560: 0D 00 08 02 8A 20 01 20 8A 20 23 0F 00 1C 00 12 ..... . . #.....
000570: 02 9F 20 1E FC 03 20 01 C0 20 53 65 74 20 75 70 .. ... .. Set up
000580: 20 77 69 6E 64 6F 77 73 00 30 00 1C 02 A1 20 03 windows.0.... .
000590: 00 00 E1 EF 22 20 20 20 20 20 20 20 20 20 45 6E ...." En
0005A0: 64 20 6F 66 20 54 65 73 74 22 20 EB 20 9F 20 1E d of Test" . . .
0005B0: 14 05 01 A0 20 1E 70 03 00 36 00 26 02 A9 20 23 .... .p..6.&.. #
0005C0: 12 2C 11 F4 28 0D 00 00 71 75 65 73 74 69 6F EE .,..(...questio.
0005D0: F0 19 0A 29 2C 11 01 BF 23 12 2C FF 19 28 0D 00 ...),...#.,..(..
0005E0: 00 71 75 65 73 74 69 6F EE 29 3B 22 2E 22 00 28 .questio.);".".(
0005F0: 00 30 02 9F 20 1E 14 05 20 20 20 20 01 C0 20 70 .0.. ... .. p
000600: 72 69 6E 74 20 70 72 65 74 74 79 27 64 20 71 75 rint pretty'd qu
000610: 65 73 74 69 6F 6E 00 07 00 3A 02 01 C0 00 1B 00 estion...:......
000620: 44 02 9E 20 0D 00 00 E9 EF 0F 20 EC 20 0D 00 00 D.. ...... . ...
000630: 6E 75 6D 71 75 65 73 F4 00 17 00 4E 02 03 00 00 numques....N....
000640: E1 EF 03 01 80 00 00 71 75 65 F3 28 0D 00 00 E9 .......que.(....
000650: 29 00 23 00 58 02 A9 20 23 0F 2C 10 2C 0D 00 00 ).#.X.. #.,.,...
000660: E9 F6 10 F5 0F 20 20 01 C0 20 73 65 74 20 63 75 ..... .. set cu
000670: 72 73 6F 72 00 1D 00 62 02 A1 20 03 00 00 E1 EF rsor...b.. .....
000680: 22 54 22 20 EB 20 03 00 00 E1 EF 22 54 72 75 65 "T" . ....."True
000690: 22 00 1E 00 6C 02 A1 20 03 00 00 E1 EF 22 46 22 "...l.. ....."F"
0006A0: 20 EB 20 03 00 00 E1 EF 22 46 61 6C 73 65 22 00 . ....."False".
0006B0: 38 00 76 02 BF 20 23 0F 2C 22 28 22 3B FF 03 28 8.v.. #.,"(";..(
0006C0: 0D 00 00 E9 F4 19 40 29 3B 22 29 20 22 3B 20 01 ......@);") "; .
0006D0: C0 20 50 72 69 6E 74 20 71 75 65 73 74 69 6F 6E . Print question
0006E0: 20 6E 75 6D 62 65 72 00 0C 00 80 02 D8 20 E7 20 number...... .
0006F0: 0E 2C 0F 00 0A 00 8A 02 9F 20 1E 14 05 00 0C 00 .,....... ......
000700: 94 02 D8 20 E7 20 0E 2C 0F 00 0B 00 9E 02 B0 20 ... . .,.......
000710: 0D 00 00 E9 00 07 00 A8 02 01 C0 00 12 00 B2 02 ................
000720: 01 C0 20 47 65 74 20 61 6E 73 77 65 72 00 07 00 .. Get answer...
000730: BC 02 01 C0 00 1C 00 C6 02 03 00 00 E1 EF FF 43 ...............C
000740: 01 A1 20 03 00 58 46 00 E1 EF 22 22 20 A0 20 1E .. ..XF..."" . .
000750: C6 02 00 3D 00 D0 02 03 00 00 E1 EF FF 1C 28 03 ...=..........(.
000760: 00 00 E1 29 01 A1 20 03 00 00 E1 F1 22 41 22 20 ...).. ....."A"
000770: FC 20 03 00 00 E1 EE FF 03 28 19 40 F4 0D 00 00 . .......(.@....
000780: 6E 75 6D 71 75 65 73 F4 29 20 A0 20 1E C6 02 00 numques.) . ....
000790: 2A 00 DA 02 0D 00 00 41 4E 53 4E 55 CD EF 28 FF *......ANSNU..(.
0007A0: 01 28 03 00 00 C1 29 F5 19 40 29 01 0D 00 00 6C .(....)..@)....l
0007B0: 69 6E 65 6C 65 EE EF 19 24 00 2F 00 E4 02 A9 20 inele...$./....
0007C0: 23 0F 2C 11 2C 0D 00 00 41 4E 53 4E 55 CD F6 10 #.,.,...ANSNU...
0007D0: F5 0F 01 BB 23 0F 2C 0E 01 BF 23 0F 2C 03 00 00 ....#.,...#.,...
0007E0: C1 3B 01 BB 23 0F 2C 0F 00 22 00 EE 02 01 C0 20 .;..#.,..".....
0007F0: 68 69 67 68 6C 69 67 68 74 73 20 73 65 6C 65 63 highlights selec
000800: 74 65 64 20 61 6E 73 77 65 72 00 2C 00 F8 02 0D ted answer.,....
000810: 00 00 70 6F 69 6E 74 F3 EF 0E 01 A1 20 03 00 00 ..point..... ...
000820: E1 EF 03 00 00 61 6E F3 20 EB 20 0D 00 00 70 6F .....an. . ...po
000830: 69 6E 74 F3 EF 0F 00 20 00 02 03 0D 00 00 73 63 int.... ......sc
000840: 6F 72 E5 EF 0D 00 00 48 FC 73 63 6F 72 E5 F4 0D or.....H.scor...
000850: 00 00 70 6F 69 6E 74 F3 00 1C 00 0C 03 9F 20 1E ..point....... .
000860: 64 05 20 01 C0 20 70 72 69 6E 74 20 72 65 73 70 d. .. print resp
000870: 6F 6E 73 65 00 3A 00 16 03 A9 20 23 0F 2C 16 2C onse.:.... #.,.,
000880: 19 11 F5 0D 00 00 70 74 79 6C 69 6E 65 F3 01 BF ......ptyline...
000890: 23 0F 2C 22 50 72 65 73 73 20 53 50 41 43 45 20 #.,"Press SPACE
0008A0: 74 6F 20 63 6F 6E 74 69 6E 75 65 22 20 20 00 25 to continue" .%
0008B0: 00 20 03 03 00 00 C9 EF 22 22 20 01 20 D6 20 03 . ......"" . . .
0008C0: 00 00 C9 EF 22 22 01 20 03 00 00 C9 EF FF 43 20 ...."". ......C
0008D0: 01 20 D5 00 2D 00 2A 03 A1 20 03 00 00 C9 EF 03 . ..-.*.. ......
0008E0: 00 00 54 C2 20 EB 20 0D 00 00 6C 69 6E 65 6C 65 ..T. . ...linele
0008F0: EE EF 19 21 01 9F 20 1E 56 04 01 A0 20 1E 08 02 ...!.. .V... ...
000900: 00 15 00 34 03 A1 20 03 00 00 C9 F2 22 20 22 20 ...4.. ....." "
000910: A0 20 1E 20 03 00 1E 00 3E 03 0D 00 00 71 75 65 . . ....>....que
000920: 73 74 69 6F EE EF 0D 00 00 71 75 65 73 74 69 6F stio.....questio
000930: EE F4 0F 00 0A 00 48 03 A0 20 1E 86 01 00 07 00 ......H.. ......
000940: 52 03 01 C0 00 18 00 5C 03 78 48 FF FF FF FF 11 R......\.xH.....
000950: 77 09 EA 04 7C 04 F6 04 6D 09 02 10 08 0F 00 07 w...|...m.......
000960: 01 00 2C 53 41 54 31 00 00 00 00 00 00 00 00 00 ..,SAT1.........
000970: 00 00 00 02 00 00 00 08 70 09 00 E5 17 00 00 00 ........p.......
000980: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000990: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0009A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0009B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0009C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0009D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0009E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0009F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000A00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000A10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000A20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000A30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000A40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000A50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
000A60: 00 00 00 C7 15 FF FF FF FF 11 78 09 B3 04 B3 04 ..........x.....
000A70: F9 04 72 09 02 10 08 6E 0A 15 08 00 16 01 C0 20 ..r....n.......
000A80: 45 6E 64 20 71 75 69 7A 20 72 6F 75 74 69 6E 65 End quiz routine
000A90: 00 07 00 66 03 01 C0 00 0D 00 70 03 A9 20 23 0F ...f......p.. #.
000AA0: 2C 16 2C 15 00 36 00 7A 03 BF 20 23 0F 2C 22 59 ,.,..6.z.. #.,"Y
000AB0: 6F 75 20 73 63 6F 72 65 64 22 3B 0D 00 00 73 63 ou scored";...sc
000AC0: 6F 72 E5 3B 22 6F 75 74 20 6F 66 22 3B 0D 00 00 or.;"out of";...
000AD0: 71 75 65 73 74 69 6F EE F5 0F 00 33 00 84 03 A9 questio....3....
000AE0: 20 23 0F 2C 12 2C 19 0A 01 BF 23 0F 2C 22 50 72 #.,.,....#.,"Pr
000AF0: 65 73 73 20 53 50 41 43 45 20 74 6F 20 72 75 6E ess SPACE to run
000B00: 20 74 68 65 20 70 72 6F 67 72 61 6D 22 00 31 00 the program".1.
000B10: 8E 03 A9 20 23 0F 2C 13 2C 19 0C 01 BF 23 0F 2C ... #.,.,....#.,
000B20: 22 61 67 61 69 6E 2C 20 20 6F 72 20 45 53 43 2F "again, or ESC/
000B30: 45 53 43 20 74 6F 20 66 69 6E 69 73 68 22 00 11 ESC to finish"..
000B40: 00 98 03 D6 20 FF 43 F2 22 20 22 01 D5 01 CA 00 .... .C." ".....
000B50: 07 00 A2 03 01 C0 00 20 00 AC 03 01 C0 20 49 6E ....... ..... In
000B60: 74 65 72 63 65 70 74 20 45 53 43 41 50 45 20 72 tercept ESCAPE r
000B70: 6F 75 74 69 6E 65 00 07 00 B6 03 01 C0 6A 6B 00 outine.......jk.
000B80: 1F 00 C0 03 AD 20 0F 20 01 82 20 0F 20 01 20 A2 ..... . .. . . .
000B90: 20 0E 2C 0F 20 01 20 A2 20 0F 2C 19 19 20 00 21 .,. . . .,.. .!
000BA0: 00 CA 03 BA 20 0E 01 20 BB 20 0F 20 01 C0 20 72 .... .. . . .. r
000BB0: 65 73 74 6F 72 65 20 64 65 66 61 75 6C 74 73 00 estore defaults.
000BC0: 06 00 D4 03 98 00 07 00 DE 03 01 C0 00 1A 00 E8 ................
000BD0: 03 01 C0 20 49 6E 69 74 69 61 6C 69 73 65 20 77 ... Initialise w
000BE0: 69 6E 64 6F 77 73 00 07 00 F2 03 01 C0 00 12 00 indows..........
000BF0: FC 03 BA 20 23 11 2C 10 20 01 20 8A 20 23 11 00 ... #.,. . . #..
000C00: 3D 00 06 04 D8 20 23 0E 2C 10 2C 19 27 2C 10 2C =.... #.,.,.',.,
000C10: 12 F4 0D 00 00 70 74 79 6C 69 6E 65 F3 20 01 20 .....ptyline. .
000C20: D8 20 23 0F 2C 10 2C 19 27 2C 14 F4 0D 00 00 70 . #.,.,.',.....p
000C30: 74 79 6C 69 6E 65 F3 2C 19 18 20 20 00 0E 00 10 tyline.,.. ....
000C40: 04 BA 20 0E 01 BB 20 0F 01 8A 00 12 00 1A 04 BA .. ... .........
000C50: 20 23 0F 2C 11 20 01 20 8A 20 23 0F 00 3C 00 24 #.,. . . #..<.$
000C60: 04 D8 20 23 0E 2C 14 2C 19 26 2C 11 2C 12 F4 0D .. #.,.,.&,.,...
000C70: 00 00 70 74 79 6C 69 6E 65 F3 20 01 20 D8 20 16 ..ptyline. . . .
000C80: 89 23 0F 2C 11 2C 19 26 2C 15 F4 0D 00 00 70 74 .#.,.,.&,.....pt
000C90: 79 6C 69 6E 65 F3 2C 19 17 20 00 06 00 2E 04 C9 yline.,.. ......
000CA0: 00 07 00 38 04 01 C0 00 26 00 42 04 01 C0 20 72 ...8....&.B... r
000CB0: 65 61 64 73 20 61 20 73 74 72 69 6E 67 20 2B 20 eads a string +
000CC0: 70 72 65 74 74 79 20 70 72 69 6E 74 73 00 0B 00 pretty prints...
000CD0: 4C 04 C3 20 03 00 00 F1 00 0E 00 56 04 03 00 00 L.. .......V....
000CE0: E1 EF 03 00 00 F1 00 15 00 60 04 0D 00 00 70 72 .........`....pr
000CF0: 65 74 74 79 6C 69 6E 65 F3 EF 0E 00 0A 00 6A 04 ettyline......j.
000D00: 9F 20 1E 9C 04 00 06 00 74 04 C9 00 07 00 7E 04 . ......t.....~.
000D10: 01 C0 00 26 00 88 04 01 C0 20 53 65 74 20 75 70 ...&..... Set up
000D20: 20 73 74 72 69 6E 67 20 66 6F 72 20 70 72 65 74 string for pret
000D30: 74 79 20 70 72 69 6E 74 00 07 00 92 04 01 C0 00 ty print........
000D40: 16 00 9C 04 0D 00 00 50 54 D2 EF 0D 00 00 4C 49 .......PT.....LI
000D50: 4E 45 4C 45 CE 00 18 00 A6 04 D6 20 FF 0E 28 03 NELE....... ..(.
000D60: 00 00 E1 29 20 EE 20 0D 00 00 50 54 D2 00 1D 00 ...) . ...PT....
000D70: B0 04 20 20 D6 20 AC 28 03 00 00 E1 2C 0D 00 00 .. . .(....,...
000D80: 50 2E 7E 54 D2 2C 0F 29 F2 22 20 22 00 18 00 BA P.~T.,.)." "....
000D90: 04 20 20 20 20 0D 00 00 50 54 D2 EF 0D 00 00 50 . ...PT.....P
000DA0: 54 D2 F5 0F 00 0A 00 C4 04 20 20 20 20 D5 00 1F T........ ...
000DB0: 00 CE 04 20 20 AC 28 03 00 00 E1 2C 0D 00 00 50 ... .(....,...P
000DC0: 54 D2 2C 0F 29 EF FF 03 28 1C FE 00 29 00 41 00 T.,.)...(...).A.
000DD0: D8 04 20 20 0D 00 00 50 54 D2 EF 0D 00 00 50 54 .. ...PT.....PT
000DE0: D2 F4 0D 00 00 4C 49 4E 45 4C 45 CE 20 01 20 0D .....LINELE. . .
000DF0: 00 00 70 72 65 74 74 79 6C 69 6E 65 F3 EF 0D 00 ..prettyline....
000E00: 00 70 72 65 74 74 79 6C 69 6E 65 F3 F4 0F 00 08 .prettyline.....
000E10: 00 E2 04 20 20 D5 00 06 00 EC 04 C9 00 07 00 F6 ... ...........
000E20: 04 01 C0 00 35 00 00 05 01 C0 20 53 75 62 72 6F ....5..... Subro
000E30: 75 74 69 6E 65 20 74 6F 20 70 72 69 6E 74 20 61 utine to print a
000E40: 24 20 77 69 74 68 20 43 48 52 24 28 26 46 45 29 $ with CHR$(&FE)
000E50: 20 61 73 20 43 52 4C 46 00 07 00 0A 05 01 C0 00 as CRLF........
000E60: 18 00 14 05 9E 20 0D 00 00 F8 EF 0F 20 EC 20 FF ..... ...... . .
000E70: 0E 28 03 00 00 E1 29 00 18 00 1E 05 03 00 00 E2 .(....).........
000E80: EF AC 28 B6 26 03 00 00 E1 2C 0D 00 00 F8 2C 0F ..(.&....,....,.
000E90: 29 00 21 00 28 05 A1 20 03 00 00 E2 EF FF 03 28 ).!.(.. .......(
000EA0: 1C FE 00 29 EB 20 BF 20 01 97 20 BF 20 03 00 00 ...). . .. . ...
000EB0: E2 3B 00 0B 00 32 05 B0 20 0D 00 00 F8 00 06 00 .;...2.. .......
000EC0: 3C 05 C9 00 07 00 46 05 01 C0 00 15 00 50 05 01 <.....F......P..
000ED0: C0 20 50 72 69 6E 74 20 63 6F 6D 6D 65 6E 74 00 . Print comment.
000EE0: 07 00 5A 05 01 C0 00 1A 00 64 05 CC 20 0F 2C 1A ..Z......d.. .,.
000EF0: DC 05 F5 0D 00 00 70 6F 69 6E 74 F3 F6 1A AA 05 ......point.....
000F00: 00 26 00 6E 05 D8 20 E7 20 0E 2C 0F 20 01 C0 20 .&.n.. . .,. ..
000F10: 72 6F 75 74 69 6E 65 20 6E 65 65 64 73 20 77 69 routine needs wi
000F20: 6E 64 6F 77 20 30 00 1E 00 78 05 03 00 00 E1 20 ndow 0...x.....
000F30: EF 20 03 00 00 45 52 4F D2 28 0D 00 00 41 4E 53 . ...ERO.(...ANS
000F40: 4E 55 CD 29 00 20 00 82 05 9F 20 1E 9C 04 20 01 NU.). .... ... .
000F50: C0 20 70 72 65 74 74 79 20 75 70 20 72 65 73 70 . pretty up resp
000F60: 6F 6E 73 65 00 37 00 8C 05 A9 20 0F 2C 28 0F F4 onse.7.... .,(..
000F70: 0D 00 00 6E 75 6D 71 75 65 73 F4 29 F6 10 20 01 ...numques.).. .
000F80: C0 20 73 65 74 6E 3F 20 63 75 72 73 6F 72 20 66 . setn? cursor f
000F90: 6F 72 20 72 65 73 70 6F 6E 73 65 20 20 00 23 00 or response .#.
000FA0: 96 05 9F 20 1E 14 05 20 01 C0 20 50 72 69 6E 74 ... ... .. Print
000FB0: 20 70 72 65 74 74 79 20 72 65 73 70 6F 6E 73 65 pretty response
000FC0: 00 10 00 A0 05 D8 20 E7 20 0E 2C 0F 20 01 20 C9 ...... . .,. . .
000FD0: 00 07 00 AA 05 01 C0 00 29 00 B4 05 A9 20 0F 2C ........).... .,
000FE0: 28 10 F4 0D 00 00 6E 75 6D 71 75 65 73 F4 29 F6 (.....numques.).
000FF0: 10 F5 0D 00 00 70 72 65 74 74 79 6C 69 6E 65 F3 .....prettyline.
001000: 00 22 00 BE 05 9F 20 1E 14 05 20 01 C0 20 50 72 .".... ... .. Pr
001010: 69 6E 74 20 61 6C 74 65 72 65 64 20 73 74 72 69 int altered stri
001020: 6E 67 00 10 00 C8 05 D8 20 E7 20 0E 2C 0F 20 01 ng...... . .,. .
001030: 20 C9 00 07 00 D2 05 01 C0 00 1A 00 DC 05 01 C0 ...............
001040: 20 44 61 74 61 20 66 6F 72 20 71 75 65 73 74 69 Data for questi
001050: 6F 6E 73 00 0F 00 E6 05 01 C0 20 46 6F 72 6D 61 ons....... Forma
001060: 74 3A 00 18 00 F0 05 01 C0 20 48 65 61 64 69 6E t:....... Headin
001070: 67 20 66 6F 72 20 54 65 73 74 00 1A 00 FA 05 01 g for Test......
001080: C0 20 46 6F 72 20 65 B3 44 61 63 68 20 71 75 65 . For e.Dach que
001090: 73 74 69 6F 6E 3A 00 18 00 04 06 01 C0 20 20 20 stion:.......
0010A0: 20 51 75 65 73 74 69 6F 6E 20 74 65 78 74 00 20 Question text.
0010B0: 00 0E 06 01 C0 20 20 20 20 4E 75 6D 62 65 72 20 ..... Number
0010C0: 6F 66 20 61 6E 73 77 65 72 73 20 28 4E 29 00 39 of answers (N).9
0010D0: 00 18 06 01 C0 20 20 20 20 54 65 78 74 20 6F 66 ..... Text of
0010E0: 20 65 61 63 68 20 61 6E 73 77 65 72 20 28 20 6D each answer ( m
0010F0: 75 73 74 20 62 65 20 4E 20 69 74 65 6D 73 20 6F ust be N items o
001100: 66 20 74 65 78 74 29 00 33 00 22 06 01 C0 20 20 f text).3."...
001110: 20 20 43 6F 72 72 65 63 74 20 61 6E 73 77 65 72 Correct answer
001120: 20 28 41 2D 46 29 20 20 77 68 65 72 65 20 41 3D (A-F) where A=
001130: 31 2C 42 3D 32 20 65 74 63 2E 00 3F 00 2C 06 01 1,B=2 etc..?.,..
001140: C0 20 20 20 20 54 65 78 74 20 66 6F 72 20 65 61 . Text for ea
001150: 63 68 20 61 6E 73 77 65 72 20 69 6E 20 73 61 6D ch answer in sam
001160: 65 20 6F 72 64 65 72 20 28 6D 75 73 74 20 62 65 e order (must be
001170: 20 4E 20 69 74 65 6D 73 29 00 1C 00 36 06 01 C0 N items)...6...
001180: 20 41 66 74 65 72 20 61 6C FD 0C 6C 20 71 75 65 After al..l que
001190: 73 74 69 6F 6E 73 3A 00 28 00 40 06 01 C0 20 22 stions:.(.@... "
0011A0: 20 20 20 20 20 20 20 20 20 45 6E 64 20 6F 66 20 End of
0011B0: 54 65 73 74 22 20 28 65 78 61 63 74 6C 79 29 00 Test" (exactly).
0011C0: 07 00 4A 06 01 C0 00 25 00 54 06 8C 20 22 53 65 ..J....%.T.. "Se
0011D0: 6C 66 20 41 73 73 65 73 73 6D 65 6E 74 20 54 65 lf Assessment Te
0011E0: 73 74 20 2D 20 43 68 2E 20 31 22 00 07 00 5E 06 st - Ch. 1"...^.
0011F0: 01 C0 00 3F 00 68 06 8C 20 22 54 79 70 69 6E 67 ...?.h.. "Typing
001200: 20 43 4C 53 20 5B 45 4E 54 45 52 5D 20 67 69 76 CLS [ENTER] giv
001210: 65 73 20 79 6F 75 20 61 20 63 6F 6D 70 6C 65 74 es you a complet
001220: 65 6C 79 20 62 6C 61 6E 6B 20 73 63 72 65 65 6E ely blank screen
001230: 22 00 0E 00 72 06 8C 20 32 2C 54 2C 46 2C 42 00 "...r.. 2,T,F,B.
001240: 37 00 7C 06 8C 20 22 4E 6F 20 79 6F 75 20 67 65 7.|.. "No you ge
001250: 74 20 27 52 65 61 64 79 27 20 69 6E 20 74 68 65 t 'Ready' in the
001260: 20 74 6F 70 20 6C 65 66 74 20 68 61 6E 64 20 63 top left hand c
001270: 6F 72 6E 65 72 22 00 3D 00 86 06 8C 20 22 43 6F orner".=.... "Co
001280: 72 72 65 63 74 2C 20 79 6F 75 20 B3 58 FF FF FF rrect, you .X...
001290: FF 11 7A 09 B3 04 B3 04 F8 04 74 09 02 10 08 0F ..z.......t.....
0012A0: 00 07 01 00 2C 53 41 54 31 00 00 00 00 00 00 00 ....,SAT1.......
0012B0: 00 00 00 00 00 03 FF 00 E5 07 70 11 00 E5 17 00 ..........p.....
0012C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0012D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0012E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0012F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001300: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001310: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001320: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001330: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001340: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001350: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001360: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001370: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001380: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001390: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0013A0: 00 00 00 00 00 9F 0C FF FF FF FF 11 7B 09 B3 04 ............{...
0013B0: B3 04 FA 04 74 09 02 10 08 C3 26 15 08 00 16 67 ....t.....&....g
0013C0: 65 74 20 27 52 65 61 64 79 27 20 69 6E 20 74 68 et 'Ready' in th
0013D0: 65 20 74 6F 70 20 6C 65 66 74 20 68 61 6E 64 20 e top left hand
0013E0: 63 6F 72 6E 65 72 22 00 07 00 90 06 01 C0 00 3C corner"........<
0013F0: 00 9A 06 8C 20 22 54 68 65 20 6E 75 6D 65 72 69 .... "The numeri
001400: 63 20 6B 65 79 70 61 64 20 69 73 20 6E 6F 74 20 c keypad is not
001410: 61 66 66 65 63 74 65 64 20 62 79 20 53 48 49 46 affected by SHIF
001420: 54 20 6F 72 20 43 54 52 4C 22 00 0E 00 A4 06 8C T or CTRL"......
001430: 20 32 2C 54 2C 46 2C 42 00 35 00 AE 06 8C 20 22 2,T,F,B.5.... "
001440: 4E 6F 74 20 71 75 69 74 65 2C 20 43 54 52 4C 2F Not quite, CTRL/
001450: 45 4E 54 45 52 20 68 61 73 20 61 20 73 70 65 63 ENTER has a spec
001460: 69 61 6C 20 66 75 6E 63 74 69 6F 6E 22 00 33 00 ial function".3.
001470: B8 06 8C 20 22 43 6F 72 72 65 63 74 2C 20 43 54 ... "Correct, CT
001480: 52 4C 2F 45 4E 54 45 52 20 68 61 73 20 61 20 73 RL/ENTER has a s
001490: 70 65 63 69 61 6C 20 66 75 6E 63 74 69 6F 6E 22 pecial function"
0014A0: 00 07 00 C2 06 01 C0 00 3E 00 CC 06 8C 20 22 48 ........>.... "H
0014B0: 6F 77 20 6D 61 6E 79 20 74 65 78 74 20 63 68 D8 ow many text ch.
0014C0: B4 61 72 61 63 74 65 72 73 20 70 65 72 20 6C 69 .aracters per li
0014D0: 6E 65 20 61 72 65 20 74 68 65 72 65 20 69 6E 20 ne are there in
0014E0: 4D 6F 64 65 20 30 22 00 13 00 D6 06 8C 20 33 2C Mode 0"...... 3,
0014F0: 32 30 2C 34 30 2C 38 30 2C 41 00 30 00 E0 06 8C 20,40,80,A.0....
001500: 20 22 43 6F 72 72 65 63 74 22 2C 22 4E 6F 2C 20 "Correct","No,
001510: 79 6F 75 27 72 65 20 74 68 69 6E 6B 69 6E 67 20 you're thinking
001520: 6F 66 20 4D 6F 64 65 20 31 22 00 26 00 EA 06 8C of Mode 1".&....
001530: 20 22 4E 6F 2C 20 79 6F 75 27 72 65 20 74 68 69 "No, you're thi
001540: 6E 6B 69 6E 67 20 6F 66 20 4D 6F 64 65 20 32 22 nking of Mode 2"
001550: 00 07 00 F4 06 01 C0 00 45 00 FE 06 8C 20 22 48 ........E.... "H
001560: 6F 77 20 6D 61 6E 79 20 64 69 66 66 65 72 65 6E ow many differen
001570: 74 20 63 6F 6C 6F 75 72 73 20 63 61 6E 20 79 6F t colours can yo
001580: 75 20 75 73 65 20 66 6F 72 20 74 68 65 20 73 63 u use for the sc
001590: 72 65 65 6E 20 62 6F 72 64 65 72 22 00 13 00 08 reen border"....
0015A0: 07 8C 20 33 2C 32 35 2C 32 36 2C 32 37 2C 43 00 .. 3,25,26,27,C.
0015B0: 35 00 12 07 8C 20 22 4E 6F 2C 20 66 72 6F 6D 20 5.... "No, from
0015C0: 30 6B 99 20 74 6F 20 32 36 20 6D 61 6B 65 73 20 0k. to 26 makes
0015D0: 61 20 74 6F 74 61 6C 20 6F 66 20 32 37 20 63 6F a total of 27 co
0015E0: 6C 6F 75 72 73 22 00 35 00 1C 07 8C 20 22 4E 6F lours".5.... "No
0015F0: 2C 20 66 72 6F 6D 20 30 20 74 6F 20 32 36 20 6D , from 0 to 26 m
001600: 61 6B 65 73 20 61 20 74 6F 74 61 6C 20 6F 66 20 akes a total of
001610: 32 37 20 63 6F 6C 6F 75 72 73 22 00 36 00 26 07 27 colours".6.&.
001620: 8C 20 22 59 65 73 2E 20 46 72 6F 6D 20 30 20 74 . "Yes. From 0 t
001630: 6F 20 32 36 20 6D 61 6B 65 73 20 61 20 74 6F 74 o 26 makes a tot
001640: 61 6C 20 6F 66 20 32 37 20 63 6F 6C 6F 75 72 73 al of 27 colours
001650: 22 00 07 00 30 07 01 C0 00 5A 00 3A 07 8C 20 22 "...0....Z.:.. "
001660: 57 68 61 74 20 77 69 6C 6C 20 74 68 65 20 43 50 What will the CP
001670: 43 34 36 34 20 64 6F 20 77 68 65 6E 20 69 74 20 C464 do when it
001680: 72 65 61 63 68 65 73 20 74 68 65 20 66 6F 6C 6C reaches the foll
001690: 6F 77 69 6E 67 20 6C 69 6E 65 3A 20 20 20 20 20 owing line:
0016A0: 20 20 20 20 20 20 31 33 30 20 47 4F 54 4F 20 37 130 GOTO 7
0016B0: 30 22 00 37 00 44 07 8C 20 33 2C 22 53 6B 69 70 0".7.D.. 3,"Skip
0016C0: 20 6C 69 36 DE 6E 65 73 20 66 72 6F 6D 20 37 30 li6.nes from 70
0016D0: 20 74 6F 20 31 33 30 22 2C 22 53 74 6F 70 20 61 to 130","Stop a
0016E0: 74 20 6C 69 6E 65 20 31 33 30 22 00 29 00 4E 07 t line 130".).N.
0016F0: 8C 20 22 4A 75 6D 70 20 62 61 63 6B 20 74 6F 20 . "Jump back to
001700: 37 30 20 61 66 74 65 72 20 6C 69 6E 65 20 31 33 70 after line 13
001710: 30 22 2C 43 00 44 00 58 07 8C 20 22 4E 6F 2C 20 0",C.D.X.. "No,
001720: 69 74 20 77 69 6C 6C 20 6B 65 65 70 20 6A 75 6D it will keep jum
001730: 70 69 6E 67 20 62 61 63 6B 20 74 6F 20 37 30 20 ping back to 70
001740: 77 68 65 6E 65 76 65 72 20 69 74 20 72 65 61 63 whenever it reac
001750: 68 65 73 20 31 33 30 22 00 44 00 62 07 8C 20 22 hes 130".D.b.. "
001760: 4E 6F 2C 20 69 74 20 77 69 6C 6C 20 6B 65 65 70 No, it will keep
001770: 20 6A 75 6D 70 69 6E 67 20 62 61 63 6B 20 74 6F jumping back to
001780: 20 37 30 20 77 68 65 6E 65 76 65 72 20 69 74 20 70 whenever it
001790: 72 65 61 63 68 65 73 20 31 33 30 22 00 10 00 6C reaches 130"...l
0017A0: 07 8C 20 22 43 6F 72 72 65 63 74 22 00 07 00 76 .. "Correct"...v
0017B0: 07 01 C0 00 55 00 80 07 8C 20 22 59 6F 75 20 6F ....U.... "You o
0017C0: 62 74 61 69 6E DA 2A 20 74 68 65 20 63 6F 70 79 btain.* the copy
0017D0: 20 63 75 72 73 6F 72 20 62 79 20 68 6F 6C 64 69 cursor by holdi
0017E0: 6E 67 20 64 6F 77 6E 20 53 48 49 46 54 20 77 68 ng down SHIFT wh
0017F0: 69 6C 65 20 70 72 65 73 73 69 6E 67 20 61 20 63 ile pressing a c
001800: 75 72 73 6F 72 20 6B 65 79 22 00 30 00 8A 07 8C ursor key".0....
001810: 20 32 2C 54 2C 46 2C 41 2C 22 59 65 73 2E 20 43 2,T,F,A,"Yes. C
001820: 6F 72 72 65 63 74 22 2C 22 4E 6F 2C 20 69 74 20 orrect","No, it
001830: 18 69 73 18 20 74 72 75 65 22 00 07 00 94 07 01 .is. true"......
001840: C0 00 5B 00 9E 07 8C 20 22 57 68 69 63 68 20 6F ..[.... "Which o
001850: 66 20 74 68 65 20 66 6F 6C 6C 6F 77 69 6E 67 20 f the following
001860: 74 77 6F 20 63 6F 6D 6D 61 6E 64 73 20 77 6F 75 two commands wou
001870: 6C 64 20 6C 65 61 76 65 20 74 68 65 20 67 72 61 ld leave the gra
001880: 70 68 69 63 73 20 63 75 72 73 6F 72 20 61 74 20 phics cursor at
001890: 78 3D 32 30 30 2C 20 79 3D 38 30 22 00 27 00 A8 x=200, y=80".'..
0018A0: 07 8C 20 32 2C 22 4D 4F 56 45 52 20 32 30 30 2C .. 2,"MOVER 200,
0018B0: 38 30 22 2C 22 4D 4F 56 45 20 32 30 30 2C 38 30 80","MOVE 200,80
0018C0: 22 2C 42 00 4A 00 B2 BE EC 07 8C 20 22 4E 6F 2C ",B.J...... "No,
0018D0: 20 74 68 69 73 20 63 6F 6D 6D 61 6E 64 20 64 65 this command de
0018E0: 70 65 6E 64 73 20 6F 6E 20 77 68 65 72 65 20 74 pends on where t
0018F0: 68 65 20 63 75 72 73 6F 72 20 77 61 73 20 62 65 he cursor was be
001900: 66 6F 72 65 22 2C 22 43 6F 72 72 65 63 74 22 00 fore","Correct".
001910: 07 00 BC 07 01 C0 00 5F 00 C6 07 8C 20 22 57 68 ......._.... "Wh
001920: 61 74 20 70 61 72 74 20 6F 66 20 74 68 65 20 66 at part of the f
001930: 6F 6C 6C 6F 77 69 6E 67 20 63 6F 6D 6D 61 6E 64 ollowing command
001940: 20 64 65 74 65 72 6D 69 6E 65 73 20 74 68 65 20 determines the
001950: 6E 6F 74 65 20 6F 66 20 74 68 65 20 73 6F 75 6E note of the soun
001960: 64 20 20 20 20 53 4F 55 4E 44 20 31 2C 31 35 30 d SOUND 1,150
001970: 2C 33 30 30 22 00 38 00 D0 07 8C 20 33 2C 22 31 ,300".8.... 3,"1
001980: 20 28 63 68 61 6E 6E 65 6C 29 22 2C 22 31 35 30 (channel)","150
001990: 20 28 70 65 72 69 6F 64 29 22 2C 22 33 30 30 20 (period)","300
0019A0: 28 64 75 72 61 74 69 6F 6E 29 22 2C 42 00 2D 00 (duration)",B.-.
0019B0: DA 07 8C 20 22 4E 6F 2C 20 74 68 65 20 18 70 65 ... "No, the .pe
0019C0: 72 69 6F 64 18 20 64 65 74 B1 CA 65 72 6D 69 6E riod. det..ermin
0019D0: 65 73 20 74 68 65 20 6E 6F 74 65 22 00 37 00 E4 es the note".7..
0019E0: 07 8C 20 22 43 6F 72 72 65 63 74 22 2C 22 4E 6F .. "Correct","No
0019F0: 2C 20 74 68 65 20 18 70 65 72 69 6F 64 18 20 64 , the .period. d
001A00: 65 74 65 72 6D 69 6E 65 73 20 74 68 65 20 6E 6F etermines the no
001A10: 74 65 22 00 07 00 EE 07 01 C0 00 5C 00 F8 07 8C te"........\....
001A20: 20 22 57 68 61 74 20 77 6F 75 6C 64 20 62 65 20 "What would be
001A30: 74 68 65 20 76 61 6C 75 65 20 6F 66 20 27 74 27 the value of 't'
001A40: 20 61 66 74 65 72 20 74 68 65 20 66 6F 6C 6C 6F after the follo
001A50: 77 69 6E 67 20 63 6F 6D 6D 61 6E 64 20 69 66 20 wing command if
001A60: 73 3D 31 37 2E 33 32 20 20 20 20 74 3D 52 4F 55 s=17.32 t=ROU
001A70: 4E 44 28 73 29 22 00 18 00 02 08 8C 20 34 2C 31 ND(s)"...... 4,1
001A80: 37 2C 31 2E 37 2C 31 38 2C 31 2E 38 2C 41 00 55 7,1.7,18,1.8,A.U
001A90: 00 0C 08 8C 20 22 43 6F 72 72 65 63 74 22 2C 22 .... "Correct","
001AA0: 4E 6F 20 74 68 65 20 63 6F 6D 6D 61 6E 64 20 67 No the command g
001AB0: 69 76 65 73 20 79 6F 75 20 74 68 65 20 6E 65 61 ives you the nea
001AC0: 72 65 73 74 20 77 68 6F 6C 65 20 52 DB 6E 75 6D rest whole R.num
001AD0: 62 65 72 2C 20 31 37 20 69 6E 20 74 68 69 73 20 ber, 17 in this
001AE0: 63 61 73 65 22 00 4B 00 16 08 8C 20 22 4E 6F 20 case".K.... "No
001AF0: 74 68 65 20 63 6F 6D 6D 61 6E 64 20 67 69 76 65 the command give
001B00: 73 20 79 6F 75 20 74 68 65 20 6E 65 61 72 65 73 s you the neares
001B10: 74 20 77 68 6F 6C 65 20 6E 75 6D 62 65 72 2C 20 t whole number,
001B20: 31 37 20 69 6E 20 74 68 69 73 20 63 61 73 65 22 17 in this case"
001B30: 00 4B 00 20 08 8C 20 22 4E 6F 20 74 68 65 20 63 .K. .. "No the c
001B40: 6F 6D 6D 61 6E 64 20 67 69 76 65 73 20 79 6F 75 ommand gives you
001B50: 20 74 68 65 20 6E 65 61 72 65 73 74 20 77 68 6F the nearest who
001B60: 6C 65 20 6E 75 6D 62 65 72 2C 20 31 37 20 69 6E le number, 17 in
001B70: 20 74 68 69 73 20 63 61 73 65 22 00 07 00 2A 08 this case"...*.
001B80: 01 C0 00 1D 00 34 08 8C 20 22 20 20 20 20 20 20 .....4.. "
001B90: 20 20 20 45 6E 64 20 6F 66 20 54 65 73 74 22 00 End of Test".
001BA0: 10 00 3E 08 8C 20 31 2C 22 22 2C 41 2C 22 22 00 ..>.. 1,"",A,"".
001BB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001BC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 0A 07 FF ................
001BD0: FF FF FF 11 7D 09 B3 04 B3 04 F8 04 79 09 02 10 ....}.......y...
001BE0: 08 0F 00 07 01 00 2C 53 41 54 32 00 00 00 00 00 ......,SAT2.....
001BF0: 00 00 00 00 00 00 00 01 00 00 00 08 70 01 FF 60 ............p..`
001C00: 17 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001C10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001C20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001C30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001C40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001C50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001C60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001C70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001C80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001C90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001CA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001CB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001CC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001CD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
001CE0: 00 00 00 00 00 00 00 D9 AB FF FF FF FF 11 7C 09 ..............|.
001CF0: B3 04 B3 04 FB 04 79 09 02 10 08 72 0A 15 08 00 ......y....r....
001D00: 16 07 00 64 00 01 C0 00 2C 00 6E 00 01 C0 20 53 ...d....,.n... S
001D10: 65 6C 66 20 41 73 73 65 73 73 6D 65 6E 74 20 54 elf Assessment T
001D20: 65 73 74 73 20 3A 20 42 41 53 49 43 20 42 6F 6F ests : BASIC Boo
001D30: 6B 20 32 00 07 00 78 00 01 C0 00 12 00 82 00 01 k 2...x.........
001D40: C0 20 44 41 20 39 2F 31 32 2F 38 34 00 07 00 8C . DA 9/12/84....
001D50: 00 01 C0 00 18 00 96 00 01 C0 20 50 72 6F 67 72 .......... Progr
001D60: 61 6D 6D 65 72 73 20 6B 65 79 73 00 07 00 A0 00 ammers keys.....
001D70: 01 C0 00 10 00 AA 00 A4 20 0E 2C 22 6C 69 73 74 ........ .,"list
001D80: 0D 22 00 0F 00 B4 00 A4 20 0F 2C 22 72 75 6E 0D ."...... .,"run.
001D90: 22 00 3B 00 BE 00 A4 20 10 2C 22 6D 6F 64 65 20 ".;.... .,"mode
001DA0: 32 3A 70 61 70 65 72 20 30 3A 70 65 6E 20 31 3A 2:paper 0:pen 1:
001DB0: 69 6E 6B 20 30 2C 32 33 3A 69 6E 6B 20 31 2C 30 ink 0,23:ink 1,0
001DC0: 3A 62 6F 72 64 65 72 20 31 33 0D 22 00 15 00 C8 :border 13."....
001DD0: 00 A4 20 11 2C 22 72 65 6E 75 6D 20 31 30 30 0D .. .,"renum 100.
001DE0: 22 00 0C 00 D2 00 A4 20 12 2C 22 FF 22 00 07 00 "...... .,"."...
001DF0: DC 00 01 C0 00 0C 00 E6 00 B3 20 9F 20 1E C0 03 .......... . ...
001E00: 00 93 32 2C 00 F0 00 01 C0 20 61 72 72 61 79 73 ..2,..... arrays
001E10: 20 65 72 6F 72 24 2C 71 75 65 73 24 20 28 6E 6F eror$,ques$ (no
001E20: 74 20 64 69 6D 65 6E 73 69 6F 6E 65 64 29 00 07 t dimensioned)..
001E30: 00 FA 00 01 C0 00 0E 00 04 01 01 C0 20 53 65 74 ............ Set
001E40: 2D 75 70 00 07 00 0E 01 01 C0 00 26 00 18 01 AD -up........&....
001E50: 20 0F 01 82 20 19 11 01 A2 20 0E 2C 19 13 01 A2 ... .... .,....
001E60: 20 0F 2C 0E 01 A2 20 10 2C 0F 01 A2 20 11 2C 14 .,... .,... .,.
001E70: 00 2D 00 22 01 CF 20 19 FF 2C 1C 36 00 2C 1C 36 .-.".. ..,.6.,.6
001E80: 00 2C 1C 36 00 20 01 C0 20 73 65 74 20 75 70 20 .,.6. .. set up
001E90: 66 61 6B 65 20 22 71 75 6F 74 65 73 22 00 2B 00 fake "quotes".+.
001EA0: 2C 01 0D 00 00 73 63 6F 72 E5 EF 0E 01 0D 00 00 ,....scor.......
001EB0: 71 75 65 73 74 69 6F EE EF 0F 01 0D 00 00 6C 69 questio.......li
001EC0: 6E 65 6C 65 EE EF 19 21 00 10 00 36 01 03 00 00 nele...!...6....
001ED0: 54 C2 EF FF 03 28 17 29 00 2A 00 40 01 9F 20 1E T....(.).*.@.. .
001EE0: 42 04 20 01 C0 20 72 65 61 64 20 61 20 73 74 72 B. .. read a str
001EF0: 69 6E 67 20 2B 20 70 72 65 74 74 79 20 73 65 74 ing + pretty set
001F00: 75 70 00 C1 09 1C 00 4A 01 9F 20 1E FC 03 20 01 up.....J.. ... .
001F10: C0 20 53 65 74 20 75 70 20 77 69 6E 64 6F 77 73 . Set up windows
001F20: 00 2B 00 54 01 9F 20 1E 14 05 20 01 C0 20 50 72 .+.T.. ... .. Pr
001F30: 69 6E 74 20 73 74 72 69 6E 67 20 72 65 61 64 20 int string read
001F40: 61 73 20 70 72 65 74 74 79 65 64 00 33 00 5E 01 as prettyed.3.^.
001F50: A9 20 23 0F 2C 17 2C 15 01 BF 23 0F 2C 22 50 72 . #.,.,...#.,"Pr
001F60: 65 73 73 20 53 50 41 43 45 20 74 6F 20 73 74 61 ess SPACE to sta
001F70: 72 74 22 01 D6 20 FF 43 F2 22 20 22 01 D5 00 07 rt".. .C." "....
001F80: 00 68 01 01 C0 00 11 00 72 01 01 C0 20 4D 61 69 .h......r... Mai
001F90: 6E 20 6C 6F 6F 70 00 07 00 7C 01 01 C0 00 12 00 n loop...|......
001FA0: 86 01 0D 00 00 6C 69 6E 65 6C 65 EE EF 19 21 00 .....linele...!.
001FB0: 2A 00 90 01 9F 20 1E 42 04 20 01 C0 20 72 65 61 *.... .B. .. rea
001FC0: 64 20 61 20 73 74 72 69 6E 67 20 2B 20 70 72 65 d a string + pre
001FD0: 74 74 79 20 73 65 74 75 70 00 1F 00 9A 01 0D 00 tty setup.......
001FE0: 00 70 74 79 6C 69 6E 65 F3 EF 0D 00 00 70 72 65 .ptyline.....pre
001FF0: 74 74 79 6C 69 6E 65 F3 00 07 00 A4 01 01 C0 00 ttyline.........
002000: 30 00 AE 01 C3 D9 3E 20 0D 00 00 6E 75 6D 71 75 0.....> ...numqu
002010: 65 73 F4 20 20 20 20 20 20 20 01 C0 20 6E 75 6D es. .. num
002020: 62 65 72 20 6F 66 20 71 75 65 73 74 69 6F 6E 73 ber of questions
002030: 20 00 37 00 B8 01 9E 20 0D 00 00 E9 EF 0F 20 EC .7.... ...... .
002040: 20 0D 00 00 6E 75 6D 71 75 65 73 F4 20 01 C0 20 ...numques. ..
002050: 6C 6F 6F 70 20 66 6F 72 20 65 61 63 68 20 71 75 loop for each qu
002060: 65 73 74 69 6F 6E 20 20 00 14 00 C2 01 C3 20 03 estion ...... .
002070: 00 00 71 75 65 F3 28 0D 00 00 E9 29 00 0B 00 CC ..que.(....)....
002080: 01 B0 20 0D 00 00 E9 00 27 00 D6 01 C3 20 03 00 .. .....'.... ..
002090: 00 61 6E F3 20 20 20 20 20 01 C0 20 47 65 74 20 .an. .. Get
0020A0: 63 6F 72 72 65 63 74 20 61 6E 73 77 65 72 00 3E correct answer.>
0020B0: 00 E0 01 9E 20 0D 00 00 E9 EF 0F 20 EC 20 0D 00 .... ...... . ..
0020C0: 00 6E 75 6D 71 75 65 73 F4 20 01 C0 20 6C 6F 6F .numques. .. loo
0020D0: 70 20 66 6F 72 20 6E 75 6D 62 65 72 20 6F 66 20 p for number of
0020E0: 71 75 65 73 74 69 6F 6E 73 20 20 20 00 25 00 EA questions .%..
0020F0: 01 C3 20 03 00 00 65 72 6F F2 28 0D 00 00 E9 29 .. ...ero.(....)
002100: 20 01 C0 20 67 65 74 3E C7 20 72 65 73 70 6F 6E .. get>. respon
002110: 73 65 73 00 0B 00 F4 01 B0 20 0D 00 00 E9 00 07 ses...... ......
002120: 00 FE 01 01 C0 00 0D 00 08 02 8A 20 01 20 8A 20 ........... . .
002130: 23 0F 00 1C 00 12 02 9F 20 1E FC 03 20 01 C0 20 #....... ... ..
002140: 53 65 74 20 75 70 20 77 69 6E 64 6F 77 73 00 30 Set up windows.0
002150: 00 1C 02 A1 20 03 00 00 E1 EF 22 20 20 20 20 20 .... ....."
002160: 20 20 20 20 45 6E 64 20 6F 66 20 54 65 73 74 22 End of Test"
002170: 20 EB 20 9F 20 1E 14 05 01 A0 20 1E 70 03 00 36 . . ..... .p..6
002180: 00 26 02 A9 20 23 12 2C 11 F4 28 0D 00 00 71 75 .&.. #.,..(...qu
002190: 65 73 74 69 6F EE F0 19 0A 29 2C 11 01 BF 23 12 estio....),...#.
0021A0: 2C FF 19 28 0D 00 00 71 75 65 73 74 69 6F EE 29 ,..(...questio.)
0021B0: 3B 22 2E 22 00 28 00 30 02 9F 20 1E 14 05 20 20 ;".".(.0.. ...
0021C0: 20 20 01 C0 20 70 72 69 6E 74 20 70 72 65 74 74 .. print prett
0021D0: 79 27 64 20 71 75 65 73 74 69 6F 6E 00 07 00 3A y'd question...:
0021E0: 02 01 C0 00 1B 00 44 02 9E 20 0D 00 00 E9 EF 0F ......D.. ......
0021F0: 20 EC 20 0D 00 00 6E 75 6D 71 75 65 73 F4 00 17 . ...numques...
002200: 00 4E 02 03 00 00 E1 EF 03 01 80 00 00 71 75 65 .N...........que
002210: F3 28 0D 00 00 E9 29 00 23 00 58 02 A9 20 23 0F .(....).#.X.. #.
002220: 2C 10 2C 0D 00 00 E9 F6 10 F5 0F 20 20 01 C0 20 ,.,........ ..
002230: 73 65 74 20 63 75 72 73 6F 72 00 1D 00 62 02 A1 set cursor...b..
002240: 20 03 00 00 E1 EF 22 54 22 20 EB 20 03 00 00 E1 ....."T" . ....
002250: EF 22 54 72 75 65 22 00 1E 00 6C 02 A1 20 03 00 ."True"...l.. ..
002260: 00 E1 EF 22 46 22 20 EB 20 03 00 00 E1 EF 22 46 ..."F" . ....."F
002270: 61 6C 73 65 22 00 38 00 76 02 BF 20 23 0F 2C 22 alse".8.v.. #.,"
002280: 28 22 3B FF 03 28 0D 00 00 E9 F4 19 40 29 3B 22 (";..(......@);"
002290: 29 20 22 3B 20 01 C0 20 50 72 69 6E 74 20 71 75 ) "; .. Print qu
0022A0: 65 73 74 69 6F 6E 20 6E 75 6D 62 65 72 00 0C 00 estion number...
0022B0: 80 02 D8 20 E7 20 0E 2C 0F 00 0A 00 8A 02 9F 20 ... . .,.......
0022C0: 1E 14 05 00 0C 00 94 02 D8 20 E7 20 0E 2C 0F 00 ......... . .,..
0022D0: 0B 00 9E 02 B0 20 0D 00 00 E9 00 07 00 A8 02 01 ..... ..........
0022E0: C0 00 12 00 B2 02 01 C0 20 47 65 74 20 61 6E 73 ........ Get ans
0022F0: 77 65 72 00 07 00 BC 02 01 C0 00 1C 00 C6 02 03 wer.............
002300: 00 00 E1 EF FF 43 01 A1 20 03 00 58 46 00 E1 EF .....C.. ..XF...
002310: 22 22 20 A0 20 1E C6 02 00 3D 00 D0 02 03 00 00 "" . ....=......
002320: E1 EF FF 1C 28 03 00 00 E1 29 01 A1 20 03 00 00 ....(....).. ...
002330: E1 F1 22 41 22 20 FC 20 03 00 00 E1 EE FF 03 28 .."A" . .......(
002340: 19 40 F4 0D 00 00 6E 75 6D 71 75 65 73 F4 29 20 .@....numques.)
002350: A0 20 1E C6 02 00 2A 00 DA 02 0D 00 00 41 4E 53 . ....*......ANS
002360: 4E 55 CD EF 28 FF 01 28 03 00 00 C1 29 F5 19 40 NU..(..(....)..@
002370: 29 01 0D 00 00 6C 69 6E 65 6C 65 EE EF 19 24 00 )....linele...$.
002380: 2F 00 E4 02 A9 20 23 0F 2C 11 2C 0D 00 00 41 4E /.... #.,.,...AN
002390: 53 4E 55 CD F6 10 F5 0F 01 BB 23 0F 2C 0E 01 BF SNU.......#.,...
0023A0: 23 0F 2C 03 00 00 C1 3B 01 BB 23 0F 2C 0F 00 22 #.,....;..#.,.."
0023B0: 00 EE 02 01 C0 20 68 69 67 68 6C 69 67 68 74 73 ..... highlights
0023C0: 20 73 65 6C 65 63 74 65 64 20 61 6E 73 77 65 72 selected answer
0023D0: 00 2C 00 F8 02 0D 00 00 70 6F 69 6E 74 F3 EF 0E .,......point...
0023E0: 01 A1 20 03 00 00 E1 EF 03 00 00 61 6E F3 20 EB .. ........an. .
0023F0: 20 0D 00 00 70 6F 69 6E 74 F3 EF 0F 00 20 00 02 ...point.... ..
002400: 03 0D 00 00 73 63 6F 72 E5 EF 0D 00 00 48 FC 73 ....scor.....H.s
002410: 63 6F 72 E5 F4 0D 00 00 70 6F 69 6E 74 F3 00 1C cor.....point...
002420: 00 0C 03 9F 20 1E 64 05 20 01 C0 20 70 72 69 6E .... .d. .. prin
002430: 74 20 72 65 73 70 6F 6E 73 65 00 3A 00 16 03 A9 t response.:....
002440: 20 23 0F 2C 16 2C 19 11 F5 0D 00 00 70 74 79 6C #.,.,......ptyl
002450: 69 6E 65 F3 01 BF 23 0F 2C 22 50 72 65 73 73 20 ine...#.,"Press
002460: 53 50 41 43 45 20 74 6F 20 63 6F 6E 74 69 6E 75 SPACE to continu
002470: 65 22 20 20 00 25 00 20 03 03 00 00 C9 EF 22 22 e" .%. ......""
002480: 20 01 20 D6 20 03 00 00 C9 EF 22 22 01 20 03 00 . . ....."". ..
002490: 00 C9 EF FF 43 20 01 20 D5 00 2D 00 2A 03 A1 20 ....C . ..-.*..
0024A0: 03 00 00 C9 EF 03 00 00 54 C2 20 EB 20 0D 00 00 ........T. . ...
0024B0: 6C 69 6E 65 6C 65 EE EF 19 21 01 9F 20 1E 56 04 linele...!.. .V.
0024C0: 01 A0 20 1E 08 02 00 15 00 34 03 A1 20 03 00 00 .. ......4.. ...
0024D0: C9 F2 22 20 22 20 A0 20 1E 20 03 00 1E 00 3E 03 .." " . . ....>.
0024E0: 0D 00 00 71 75 65 73 74 69 6F EE EF 0D 00 00 71 ...questio.....q
0024F0: 75 65 73 74 69 6F EE F4 0F 00 0A 00 48 03 A0 20 uestio......H..
002500: 1E 86 01 00 07 00 52 03 01 C0 00 18 00 5C 03 78 ......R......\.x
002510: 48 FF FF FF FF 11 7E 09 B3 04 B3 04 F9 04 77 09 H.....~.......w.
002520: 02 10 08 0F 00 07 01 00 2C 53 41 54 32 00 00 00 ........,SAT2...
002530: 00 00 00 00 00 00 00 00 00 02 00 00 00 08 70 09 ..............p.
002540: 00 60 17 00 00 00 00 00 00 00 00 00 00 00 00 00 .`..............
002550: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002560: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002570: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002580: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002590: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0025A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0025B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0025C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0025D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0025E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0025F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002600: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002610: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002620: 00 00 00 00 00 00 00 00 00 79 18 FF FF FF FF 11 .........y......
002630: 7F 09 B3 04 B3 04 FD 04 7B 09 02 10 08 77 0A 15 ........{....w..
002640: 08 00 16 01 C0 20 45 6E 64 20 71 75 69 7A 20 72 ..... End quiz r
002650: 6F 75 74 69 6E 65 00 07 00 66 03 01 C0 00 0D 00 outine...f......
002660: 70 03 A9 20 23 0F 2C 16 2C 15 00 36 00 7A 03 BF p.. #.,.,..6.z..
002670: 20 23 0F 2C 22 59 6F 75 20 73 63 6F 72 65 64 22 #.,"You scored"
002680: 3B 0D 00 00 73 63 6F 72 E5 3B 22 6F 75 74 20 6F ;...scor.;"out o
002690: 66 22 3B 0D 00 00 71 75 65 73 74 69 6F EE F5 0F f";...questio...
0026A0: 00 33 00 84 03 A9 20 23 0F 2C 12 2C 19 0A 01 BF .3.... #.,.,....
0026B0: 23 0F 2C 22 50 72 65 73 73 20 53 50 41 43 45 20 #.,"Press SPACE
0026C0: 74 6F 20 72 75 6E 20 74 68 65 20 70 72 6F 67 72 to run the progr
0026D0: 61 6D 22 00 31 00 8E 03 A9 20 23 0F 2C 13 2C 19 am".1.... #.,.,.
0026E0: 0C 01 BF 23 0F 2C 22 61 67 61 69 6E 2C 20 20 6F ...#.,"again, o
0026F0: 72 20 45 53 43 2F 45 53 43 20 74 6F 20 66 69 6E r ESC/ESC to fin
002700: 69 73 68 22 00 11 00 98 03 D6 20 FF 43 F2 22 20 ish"...... .C."
002710: 22 01 D5 01 CA 00 07 00 A2 03 01 C0 00 20 00 AC "............ ..
002720: 03 01 C0 20 49 6E 74 65 72 63 65 70 74 20 45 53 ... Intercept ES
002730: 43 41 50 45 20 72 6F 75 74 69 6E 65 00 07 00 B6 CAPE routine....
002740: 03 01 C0 6A 6B 00 1F 00 C0 03 AD 20 0F 20 01 82 ...jk...... . ..
002750: 20 0F 20 01 20 A2 20 0E 2C 0F 20 01 20 A2 20 0F . . . .,. . . .
002760: 2C 19 19 20 00 21 00 CA 03 BA 20 0E 01 20 BB 20 ,.. .!.... .. .
002770: 0F 20 01 C0 20 72 65 73 74 6F 72 65 20 64 65 66 . .. restore def
002780: 61 75 6C 74 73 00 06 00 D4 03 98 00 07 00 DE 03 aults...........
002790: 01 C0 00 1A 00 E8 03 01 C0 20 49 6E 69 74 69 61 ......... Initia
0027A0: 6C 69 73 65 20 77 69 6E 64 6F 77 73 00 07 00 F2 lise windows....
0027B0: 03 01 C0 00 12 00 FC 03 BA 20 23 11 2C 10 20 01 ......... #.,. .
0027C0: 20 8A 20 23 11 00 3D 00 06 04 D8 20 23 0E 2C 10 . #..=.... #.,.
0027D0: 2C 19 27 2C 10 2C 12 F4 0D 00 00 70 74 79 6C 69 ,.',.,.....ptyli
0027E0: 6E 65 F3 20 01 20 D8 20 23 0F 2C 10 2C 19 27 2C ne. . . #.,.,.',
0027F0: 14 F4 0D 00 00 70 74 79 6C 69 6E 65 F3 2C 19 18 .....ptyline.,..
002800: 20 20 00 0E 00 10 04 BA 20 0E 01 BB 20 0F 01 8A ...... ... ...
002810: 00 12 00 1A 04 BA 20 23 0F 2C 11 20 01 20 8A 20 ...... #.,. . .
002820: 23 0F 00 3C 00 24 04 D8 20 23 0E 2C 14 2C 19 26 #..<.$.. #.,.,.&
002830: 2C 11 2C 12 F4 0D 00 00 70 74 79 6C 69 6E 65 F3 ,.,.....ptyline.
002840: 20 01 20 D8 20 16 89 23 0F 2C 11 2C 19 26 2C 15 . . ..#.,.,.&,.
002850: F4 0D 00 00 70 74 79 6C 69 6E 65 F3 2C 19 17 20 ....ptyline.,..
002860: 00 06 00 2E 04 C9 00 07 00 38 04 01 C0 00 26 00 .........8....&.
002870: 42 04 01 C0 20 72 65 61 64 73 20 61 20 73 74 72 B... reads a str
002880: 69 6E 67 20 2B 20 70 72 65 74 74 79 20 70 72 69 ing + pretty pri
002890: 6E 74 73 00 0B 00 4C 04 C3 20 03 00 00 F1 00 0E nts...L.. ......
0028A0: 00 56 04 03 00 00 E1 EF 03 00 00 F1 00 15 00 60 .V.............`
0028B0: 04 0D 00 00 70 72 65 74 74 79 6C 69 6E 65 F3 EF ....prettyline..
0028C0: 0E 00 0A 00 6A 04 9F 20 1E 9C 04 00 06 00 74 04 ....j.. ......t.
0028D0: C9 00 07 00 7E 04 01 C0 00 26 00 88 04 01 C0 20 ....~....&.....
0028E0: 53 65 74 20 75 70 20 73 74 72 69 6E 67 20 66 6F Set up string fo
0028F0: 72 20 70 72 65 74 74 79 20 70 72 69 6E 74 00 07 r pretty print..
002900: 00 92 04 01 C0 00 16 00 9C 04 0D 00 00 50 54 D2 .............PT.
002910: EF 0D 00 00 4C 49 4E 45 4C 45 CE 00 18 00 A6 04 ....LINELE......
002920: D6 20 FF 0E 28 03 00 00 E1 29 20 EE 20 0D 00 00 . ..(....) . ...
002930: 50 54 D2 00 1D 00 B0 04 20 20 D6 20 AC 28 03 00 PT...... . .(..
002940: 00 E1 2C 0D 00 00 50 2E 7E 54 D2 2C 0F 29 F2 22 ..,...P.~T.,.)."
002950: 20 22 00 18 00 BA 04 20 20 20 20 0D 00 00 50 54 "..... ...PT
002960: D2 EF 0D 00 00 50 54 D2 F5 0F 00 0A 00 C4 04 20 .....PT........
002970: 20 20 20 D5 00 1F 00 CE 04 20 20 AC 28 03 00 00 ...... .(...
002980: E1 2C 0D 00 00 50 54 D2 2C 0F 29 EF FF 03 28 1C .,...PT.,.)...(.
002990: FE 00 29 00 41 00 D8 04 20 20 0D 00 00 50 54 D2 ..).A... ...PT.
0029A0: EF 0D 00 00 50 54 D2 F4 0D 00 00 4C 49 4E 45 4C ....PT.....LINEL
0029B0: 45 CE 20 01 20 0D 00 00 70 72 65 74 74 79 6C 69 E. . ...prettyli
0029C0: 6E 65 F3 EF 0D 00 00 70 72 65 74 74 79 6C 69 6E ne.....prettylin
0029D0: 65 F3 F4 0F 00 08 00 E2 04 20 20 D5 00 06 00 EC e........ .....
0029E0: 04 C9 00 07 00 F6 04 01 C0 00 35 00 00 05 01 C0 ..........5.....
0029F0: 20 53 75 62 72 6F 75 74 69 6E 65 20 74 6F 20 70 Subroutine to p
002A00: 72 69 6E 74 20 61 24 20 77 69 74 68 20 43 48 52 rint a$ with CHR
002A10: 24 28 26 46 45 29 20 61 73 20 43 52 4C 46 00 07 $(&FE) as CRLF..
002A20: 00 0A 05 01 C0 00 18 00 14 05 9E 20 0D 00 00 F8 ........... ....
002A30: EF 0F 20 EC 20 FF 0E 28 03 00 00 E1 29 00 18 00 .. . ..(....)...
002A40: 1E 05 03 00 00 E2 EF AC 28 B6 26 03 00 00 E1 2C ........(.&....,
002A50: 0D 00 00 F8 2C 0F 29 00 21 00 28 05 A1 20 03 00 ....,.).!.(.. ..
002A60: 00 E2 EF FF 03 28 1C FE 00 29 EB 20 BF 20 01 97 .....(...). . ..
002A70: 20 BF 20 03 00 00 E2 3B 00 0B 00 32 05 B0 20 0D . ....;...2.. .
002A80: 00 00 F8 00 06 00 3C 05 C9 00 07 00 46 05 01 C0 ......<.....F...
002A90: 00 15 00 50 05 01 C0 20 50 72 69 6E 74 20 63 6F ...P... Print co
002AA0: 6D 6D 65 6E 74 00 07 00 5A 05 01 C0 00 1A 00 64 mment...Z......d
002AB0: 05 CC 20 0F 2C 1A DC 05 F5 0D 00 00 70 6F 69 6E .. .,.......poin
002AC0: 74 F3 F6 1A AA 05 00 26 00 6E 05 D8 20 E7 20 0E t......&.n.. . .
002AD0: 2C 0F 20 01 C0 20 72 6F 75 74 69 6E 65 20 6E 65 ,. .. routine ne
002AE0: 65 64 73 20 77 69 6E 64 6F 77 20 30 00 1E 00 78 eds window 0...x
002AF0: 05 03 00 00 E1 20 EF 20 03 00 00 45 52 4F D2 28 ..... . ...ERO.(
002B00: 0D 00 00 41 4E 53 4E 55 CD 29 00 20 00 82 05 9F ...ANSNU.). ....
002B10: 20 1E 9C 04 20 01 C0 20 70 72 65 74 74 79 20 75 ... .. pretty u
002B20: 70 20 72 65 73 70 6F 6E 73 65 00 37 00 8C 05 A9 p response.7....
002B30: 20 0F 2C 28 0F F4 0D 00 00 6E 75 6D 71 75 65 73 .,(.....numques
002B40: F4 29 F6 10 20 01 C0 20 73 65 74 6E 3F 20 63 75 .).. .. setn? cu
002B50: 72 73 6F 72 20 66 6F 72 20 72 65 73 70 6F 6E 73 rsor for respons
002B60: 65 20 20 00 23 00 96 05 9F 20 1E 14 05 20 01 C0 e .#.... ... ..
002B70: 20 50 72 69 6E 74 20 70 72 65 74 74 79 20 72 65 Print pretty re
002B80: 73 70 6F 6E 73 65 00 10 00 A0 05 D8 20 E7 20 0E sponse...... . .
002B90: 2C 0F 20 01 20 C9 00 07 00 AA 05 01 C0 00 29 00 ,. . .........).
002BA0: B4 05 A9 20 0F 2C 28 10 F4 0D 00 00 6E 75 6D 71 ... .,(.....numq
002BB0: 75 65 73 F4 29 F6 10 F5 0D 00 00 70 72 65 74 74 ues.)......prett
002BC0: 79 6C 69 6E 65 F3 00 22 00 BE 05 9F 20 1E 14 05 yline..".... ...
002BD0: 20 01 C0 20 50 72 69 6E 74 20 61 6C 74 65 72 65 .. Print altere
002BE0: 64 20 73 74 72 69 6E 67 00 10 00 C8 05 D8 20 E7 d string...... .
002BF0: 20 0E 2C 0F 20 01 20 C9 00 07 00 D2 05 01 C0 00 .,. . .........
002C00: 1A 00 DC 05 01 C0 20 44 61 74 61 20 66 6F 72 20 ...... Data for
002C10: 71 75 65 73 74 69 6F 6E 73 00 0F 00 E6 05 01 C0 questions.......
002C20: 20 46 6F 72 6D 61 74 3A 00 18 00 F0 05 01 C0 20 Format:.......
002C30: 48 65 61 64 69 6E 67 20 66 6F 72 20 54 65 73 74 Heading for Test
002C40: 00 1A 00 FA 05 01 C0 20 46 6F 72 20 65 B3 44 61 ....... For e.Da
002C50: 63 68 20 71 75 65 73 74 69 6F 6E 3A 00 18 00 04 ch question:....
002C60: 06 01 C0 20 20 20 20 51 75 65 73 74 69 6F 6E 20 ... Question
002C70: 74 65 78 74 00 20 00 0E 06 01 C0 20 20 20 20 4E text. ..... N
002C80: 75 6D 62 65 72 20 6F 66 20 61 6E 73 77 65 72 73 umber of answers
002C90: 20 28 4E 29 00 39 00 18 06 01 C0 20 20 20 20 54 (N).9..... T
002CA0: 65 78 74 20 6F 66 20 65 61 63 68 20 61 6E 73 77 ext of each answ
002CB0: 65 72 20 28 20 6D 75 73 74 20 62 65 20 4E 20 69 er ( must be N i
002CC0: 74 65 6D 73 20 6F 66 20 74 65 78 74 29 00 33 00 tems of text).3.
002CD0: 22 06 01 C0 20 20 20 20 43 6F 72 72 65 63 74 20 "... Correct
002CE0: 61 6E 73 77 65 72 20 28 41 2D 46 29 20 20 77 68 answer (A-F) wh
002CF0: 65 72 65 20 41 3D 31 2C 42 3D 32 20 65 74 63 2E ere A=1,B=2 etc.
002D00: 00 3F 00 2C 06 01 C0 20 20 20 20 54 65 78 74 20 .?.,... Text
002D10: 66 6F 72 20 65 61 63 68 20 61 6E 73 77 65 72 20 for each answer
002D20: 69 6E 20 73 61 6D 65 20 6F 72 64 65 72 20 28 6D in same order (m
002D30: 75 73 74 20 62 65 20 4E 20 69 74 65 6D 73 29 00 ust be N items).
002D40: 1C 00 36 06 01 C0 20 41 66 74 65 72 20 61 6C FD ..6... After al.
002D50: 0C 6C 20 71 75 65 73 74 69 6F 6E 73 3A 00 28 00 .l questions:.(.
002D60: 40 06 01 C0 20 22 20 20 20 20 20 20 20 20 20 45 @... " E
002D70: 6E 64 20 6F 66 20 54 65 73 74 22 20 28 65 78 61 nd of Test" (exa
002D80: 63 74 6C 79 29 00 07 00 4A 06 01 C0 00 25 00 54 ctly)...J....%.T
002D90: 06 8C 20 22 53 65 6C 66 20 41 73 73 65 73 73 6D .. "Self Assessm
002DA0: 65 6E 74 20 54 65 73 74 20 2D 20 43 68 2E 20 32 ent Test - Ch. 2
002DB0: 22 00 07 00 5E 06 01 C0 00 60 00 68 06 8C 20 22 "...^....`.h.. "
002DC0: 57 68 61 74 20 64 6F 20 79 6F 75 20 65 6E 74 65 What do you ente
002DD0: 72 20 74 6F 20 67 65 74 20 61 75 74 6F 6D 61 74 r to get automat
002DE0: 69 63 20 6E 75 6D 62 65 72 69 6E 67 20 73 74 61 ic numbering sta
002DF0: 72 74 69 6E 67 20 61 74 20 6C 69 6E 65 20 6E 75 rting at line nu
002E00: 6D 62 65 72 20 31 32 35 2C 20 69 6E 20 73 74 65 mber 125, in ste
002E10: 70 73 20 6F 66 20 39 22 00 37 00 72 06 8C 20 33 ps of 9".7.r.. 3
002E20: 2C 22 41 55 54 4F 20 39 2C 31 32 35 22 2C 22 41 ,"AUTO 9,125","A
002E30: 55 54 4F 20 39 0D 0A 20 20 20 20 20 31 32 35 22 UTO 9.. 125"
002E40: 2C 22 41 55 54 4F 20 31 32 35 2C 39 22 2C 43 00 ,"AUTO 125,9",C.
002E50: 50 A3 10 FF FF FF FF 11 80 09 B3 04 B3 04 FB 04 P£..............
002E60: 7C 09 02 10 08 0F 00 07 01 00 2C 53 41 54 32 00 |.........,SAT2.
002E70: 00 00 00 00 00 00 00 00 00 00 00 03 FF 00 60 07 ..............`.
002E80: 70 11 00 60 17 00 00 00 00 00 00 00 00 00 00 00 p..`............
002E90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002EA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002EB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002EC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002ED0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002EE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002EF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002F00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002F10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002F20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002F30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002F40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002F50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
002F60: 00 00 00 00 00 00 00 00 00 00 00 19 F4 FF FF FF ................
002F70: FF 11 83 09 B3 04 B3 04 FF 04 7D 09 02 10 08 01 ..........}.....
002F80: 29 15 08 00 16 00 7C 06 8C 20 22 4E 6F 2C 20 69 ).....|.. "No, i
002F90: 74 27 73 20 74 68 65 20 6F 74 68 65 72 20 77 61 t's the other wa
002FA0: 79 20 72 6F 75 6E 64 20 2D 20 61 6E 73 77 65 72 y round - answer
002FB0: 20 43 22 2C 22 4E 6F 2C 20 74 68 65 20 61 6E 73 C","No, the ans
002FC0: 77 65 72 20 69 73 20 43 22 2C 22 43 6F 72 72 65 wer is C","Corre
002FD0: 63 74 22 00 07 00 86 06 01 C0 00 3A 00 90 06 8C ct"........:....
002FE0: 20 22 59 6F 75 20 73 74 6F 70 20 61 75 74 6F 6D "You stop autom
002FF0: 61 74 69 63 20 6C 69 6E 65 20 6E 75 6D 62 65 72 atic line number
003000: 69 6E 67 20 62 79 20 70 72 65 73 73 69 6E 67 20 ing by pressing
003010: 45 53 43 22 00 3F 00 9A 06 8C 20 32 2C 54 2C 46 ESC".?.... 2,T,F
003020: 2C 41 2C 22 59 65 73 2C 20 79 6F 75 20 70 72 65 ,A,"Yes, you pre
003030: 73 73 20 45 53 43 22 2C 22 4E 6F 2C 20 79 6F 75 ss ESC","No, you
003040: 20 18 64 6F 18 20 70 72 65 73 73 20 45 53 43 22 .do. press ESC"
003050: 20 20 20 00 07 00 A4 06 01 C0 00 46 00 AE 06 8C ........F....
003060: 20 22 57 68 69 63 68 20 6F 66 20 74 68 65 20 66 "Which of the f
003070: 6F 6C 6C 6F 77 69 6E 67 20 77 69 6C 6C 20 67 69 ollowing will gi
003080: 76 65 20 79 6F 02 B2 75 20 61 20 FF 53 79 6E 74 ve yo..u a .Synt
003090: 61 78 20 65 72 72 6F 72 FF 20 6D 65 73 73 61 67 ax error. messag
0030A0: 65 22 00 2F 00 B8 06 8C 20 33 2C 22 45 52 41 53 e"./.... 3,"ERAS
0030B0: 45 20 31 32 30 22 2C 22 31 32 30 22 2C 22 44 45 E 120","120","DE
0030C0: 4C 45 54 45 20 31 32 30 22 2C 41 20 20 20 20 20 LETE 120",A
0030D0: 20 00 39 00 C2 06 8C 20 22 43 6F 72 72 65 63 74 .9.... "Correct
0030E0: 2C 20 45 52 41 53 45 20 64 6F 65 73 20 6E 6F 74 , ERASE does not
0030F0: 20 64 65 6C 65 74 65 20 70 72 6F 67 72 61 6D 20 delete program
003100: 6C 69 6E 65 73 22 20 20 20 20 00 42 00 CC 06 8C lines" .B....
003110: 20 22 4E 6F 2C 20 74 68 65 20 61 6E 73 77 65 72 "No, the answer
003120: 20 69 73 20 41 2C 20 45 52 41 53 45 20 64 6F 65 is A, ERASE doe
003130: 73 20 6E 6F 74 20 64 65 6C 65 74 65 20 70 72 6F s not delete pro
003140: 67 72 61 6D 20 6C 69 6E 65 73 22 20 00 45 00 D6 gram lines" .E..
003150: 06 8C 20 22 4E 6F 2C 20 74 68 65 20 61 6E 73 77 .. "No, the answ
003160: 65 72 20 69 73 20 41 2C 20 45 52 41 53 45 20 64 er is A, ERASE d
003170: 6F 65 73 20 6E 6F 74 20 64 65 6C 65 74 65 20 70 oes not delete p
003180: 72 6F 67 72 61 6D 20 23 07 6C 69 6E 65 73 22 20 rogram #.lines"
003190: 20 20 20 00 07 00 E0 06 01 C0 00 5F 00 EA 06 8C ........_....
0031A0: 20 22 57 68 79 20 77 69 6C 6C 20 74 68 65 20 43 "Why will the C
0031B0: 50 43 34 36 34 20 6E 6F 74 20 61 63 63 65 70 74 PC464 not accept
0031C0: 20 74 68 65 20 66 6F 6C 6C 6F 77 69 6E 67 20 73 the following s
0031D0: 74 61 74 65 6D 65 6E 74 20 61 74 20 70 6F 77 65 tatement at powe
0031E0: 72 2D 6F 6E 3A 20 20 41 25 28 31 33 2C 36 29 3D r-on: A%(13,6)=
0031F0: 31 32 33 34 35 2E 36 37 22 00 3A 00 F4 06 8C 20 12345.67".:....
003200: 35 2C 22 49 6E 74 65 67 65 72 20 76 61 72 69 61 5,"Integer varia
003210: 62 6C 65 73 20 63 61 6E 6E 6F 74 20 62 65 20 20 bles cannot be
003220: 20 20 20 20 20 20 20 73 75 62 73 63 72 69 70 74 subscript
003230: 65 64 22 00 40 00 FE 06 8C 20 20 20 22 52 65 61 ed".@.... "Rea
003240: 6C 20 6E 75 6D 62 65 72 73 20 63 61 6E 27 74 20 l numbers can't
003250: 62 65 20 70 75 74 20 69 6E 20 20 20 20 20 20 20 be put in
003260: 20 69 6E 74 65 67 65 72 20 76 61 72 69 61 62 6C integer variabl
003270: 65 73 22 00 3A 00 08 07 8C 20 20 20 22 41 25 28 es".:.... "A%(
003280: 78 2C 79 29 20 68 61 73 6E D4 B0 27 74 20 62 65 x,y) hasn..'t be
003290: 65 6E 20 73 65 74 20 75 70 20 62 79 20 61 20 20 en set up by a
0032A0: 20 20 20 44 49 4D 20 63 6F 6D 6D 61 6E 64 22 00 DIM command".
0032B0: 28 00 12 07 8C 20 20 20 22 4F 6E 65 20 73 75 62 (.... "One sub
0032C0: 73 63 72 69 70 74 20 69 73 20 6D 6F 72 65 20 74 script is more t
0032D0: 68 61 6E 20 31 30 22 00 3F 00 1C 07 8C 20 20 20 han 10".?....
0032E0: 22 54 77 6F 20 64 69 6D 65 6E 73 69 6F 6E 61 6C "Two dimensional
0032F0: 20 61 72 72 61 79 73 20 6D 75 73 74 20 62 65 20 arrays must be
003300: 20 20 20 20 20 64 65 66 69 6E 65 64 20 62 79 20 defined by
003310: 61 20 44 49 4D 22 00 08 00 26 07 8C 20 44 00 32 a DIM"...&.. D.2
003320: 00 30 07 8C 20 22 4E 6F 2C 20 74 68 65 20 61 6E .0.. "No, the an
003330: 73 77 65 72 20 69 73 20 44 22 2C 22 4E 6F 2C 20 swer is D","No,
003340: 74 68 65 20 61 6E 73 77 65 72 20 69 73 20 44 22 the answer is D"
003350: 00 3C 00 3A 07 8C 20 22 4E 6F 2C 20 74 68 65 20 .<.:.. "No, the
003360: 61 6E 73 77 65 72 20 69 73 20 44 22 2C 22 43 6F answer is D","Co
003370: 72 72 65 63 74 22 2C 22 4E 6F 2C 20 74 68 65 20 rrect","No, the
003380: 61 6E 73 77 65 72 20 69 73 20 44 2E 19 22 00 07 answer is D.."..
003390: 00 44 07 01 C0 00 62 00 4E 07 8C 20 22 48 6F 77 .D....b.N.. "How
0033A0: 20 64 6F 20 79 6F 75 20 64 65 66 69 6E 65 20 74 do you define t
0033B0: 77 6F 20 61 72 72 61 79 73 20 6F 66 20 35 30 20 wo arrays of 50
0033C0: 65 6C 65 6D 65 6E 74 73 20 65 61 63 68 20 69 6E elements each in
0033D0: 20 6F 6E 65 20 44 49 4D 20 63 6F 6D 6D 61 6E 64 one DIM command
0033E0: 2E 20 28 59 65 73 20 79 6F 75 20 63 61 6E 20 64 . (Yes you can d
0033F0: 6F 20 69 74 21 29 22 00 55 00 58 07 8C 20 33 2C o it!)".U.X.. 3,
003400: 22 44 49 4D 20 61 6C 70 68 61 2C 62 65 74 61 2C "DIM alpha,beta,
003410: 28 34 39 29 2C 28 34 39 29 22 2C 22 44 49 4D 20 (49),(49)","DIM
003420: 61 6C 70 68 61 2C 62 65 74 61 28 34 39 29 22 2C alpha,beta(49)",
003430: 22 44 49 4D 20 61 6C 70 68 61 28 34 39 29 2C 62 "DIM alpha(49),b
003440: 65 74 61 28 34 39 29 20 20 20 20 20 00 3E 00 62 eta(49) .>.b
003450: 07 8C 20 43 2C 22 4E 6F 2C 20 74 68 65 20 61 6E .. C,"No, the an
003460: 73 77 65 72 20 69 73 20 43 22 2C 22 4E 6F 2C 20 swer is C","No,
003470: 74 68 65 20 61 6E 73 77 65 72 20 69 73 20 43 22 the answer is C"
003480: 2C 22 43 6F 72 72 65 63 74 22 00 07 00 33 33 6C ,"Correct"...33l
003490: 07 01 C0 00 69 00 76 07 8C 20 22 57 68 65 6E 20 ....i.v.. "When
0034A0: 74 68 65 20 66 69 72 73 74 20 52 45 41 44 20 63 the first READ c
0034B0: 6F 6D 6D 61 6E 64 20 69 73 20 65 78 65 63 75 74 ommand is execut
0034C0: 65 64 20 77 69 74 68 69 6E 20 61 20 70 72 6F 67 ed within a prog
0034D0: 72 61 6D 2C 20 77 68 69 63 68 20 44 41 54 41 20 ram, which DATA
0034E0: 63 6F 6E 73 74 61 6E 74 20 64 6F 65 73 20 69 74 constant does it
0034F0: 20 74 61 6B 65 20 66 69 72 73 74 22 00 36 00 80 take first".6..
003500: 07 8C 20 32 2C 22 54 68 65 20 66 69 72 73 74 20 .. 2,"The first
003510: 44 41 54 41 20 73 74 61 74 65 6D 65 6E 74 20 69 DATA statement i
003520: 6E 20 74 68 65 20 20 20 20 20 70 72 6F 67 72 61 n the progra
003530: 6D 22 00 36 00 8A 07 8C 20 22 54 68 65 20 66 69 m".6.... "The fi
003540: 72 73 74 20 6F 6E 65 20 61 66 74 65 72 20 74 68 rst one after th
003550: 65 20 52 45 41 44 20 20 20 20 20 20 20 20 63 6F e READ co
003560: 6D 6D 61 6E 64 22 2C 41 00 4C 00 94 07 8C 20 22 mmand",A.L.... "
003570: 52 69 67 68 74 2C 20 75 6E 6C 65 73 73 20 61 20 Right, unless a
003580: 52 45 53 54 4F 52 45 20 74 6F 20 73 6F 6D 65 24 RESTORE to some$
003590: 3E 77 68 65 72 65 20 65 6C 73 65 20 68 61 73 20 >where else has
0035A0: 62 65 65 6E 20 65 78 65 63 75 74 65 64 20 66 69 been executed fi
0035B0: 72 73 74 22 20 20 00 43 00 9E 07 8C 20 22 57 72 rst" .C.... "Wr
0035C0: 6F 6E 67 2C 20 75 6E 6C 65 73 73 20 61 20 73 75 ong, unless a su
0035D0: 69 74 61 62 6C 65 20 52 45 53 54 4F 52 45 20 68 itable RESTORE h
0035E0: 61 73 20 62 65 65 6E 20 65 78 65 63 75 74 65 64 as been executed
0035F0: 20 66 69 72 73 74 22 20 20 00 07 00 A8 07 01 C0 first" .......
003600: 00 8F 00 B2 07 8C 20 22 54 68 65 20 66 6F 6C 6C ...... "The foll
003610: 6F 77 69 6E 67 20 69 73 20 61 20 70 65 72 66 65 owing is a perfe
003620: 63 74 6C 79 20 76 61 6C 69 64 20 44 41 54 41 20 ctly valid DATA
003630: 73 74 61 74 65 6D 65 6E 74 2E 20 54 72 75 65 20 statement. True
003640: 6F 72 20 66 61 6C 73 65 3F 3A 20 20 20 20 20 20 or false?:
003650: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
003660: 20 20 20 44 41 54 41 20 62 6F 69 6C 65 64 20 62 DATA boiled b
003670: 65 65 66 20 61 6E 64 20 63 61 72 72 6F 74 73 2C eef and carrots,
003680: 20 31 37 2E 33 31 31 31 31 32 31 2C 32 25 20 00 17.3111121,2% .
003690: 2B 66 98 00 BC 07 8C 20 32 2C 54 2C 46 2C 42 2C +f..... 2,T,F,B,
0036A0: 22 43 6F 72 72 65 63 74 22 2C 22 4E 6F 2C 20 69 "Correct","No, i
0036B0: 74 20 18 69 73 18 20 74 72 75 65 22 00 07 00 C6 t .is. true"....
0036C0: 07 01 C0 00 1D 00 D0 07 8C 20 22 20 20 20 20 20 ......... "
0036D0: 20 20 20 20 45 6E 64 20 6F 66 20 54 65 73 74 22 End of Test"
0036E0: 00 10 00 DA 07 8C 20 31 2C 22 22 2C 41 2C 22 22 ...... 1,"",A,""
0036F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003700: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003710: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003720: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003730: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003740: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003750: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003760: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003770: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003780: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003790: 00 00 00 C2 65 FF FF FF FF 11 85 09 B3 04 B3 04 ....e...........
0037A0: FD 04 80 09 02 10 08 0F 00 07 01 00 2C 53 41 54 ............,SAT
0037B0: 33 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 3...............
0037C0: 00 08 70 01 FF 56 19 00 00 00 00 00 00 00 00 00 ..p..V..........
0037D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0037E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0037F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003800: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003810: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003820: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003830: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003840: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003850: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003860: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003870: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003880: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
003890: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0038A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 E0 79 FF ..............y.
0038B0: FF FF FF 11 85 09 B3 04 B3 04 FF 04 7F 09 02 10 ................
0038C0: 08 77 0A 15 08 00 16 07 00 64 00 01 C0 00 2C 00 .w.......d....,.
0038D0: 6E 00 01 C0 20 53 65 6C 66 20 41 73 73 65 73 73 n... Self Assess
0038E0: 6D 65 6E 74 20 54 65 73 74 73 20 3A 20 42 41 53 ment Tests : BAS
0038F0: 49 43 20 42 6F 6F 6B 20 32 00 07 00 78 00 01 C0 IC Book 2...x...
003900: 00 12 00 82 00 01 C0 20 44 41 20 39 2F 31 32 2F ....... DA 9/12/
003910: 38 34 00 07 00 8C 00 01 C0 00 18 00 96 00 01 C0 84..............
003920: 20 50 72 6F 67 72 61 6D 6D 65 72 73 20 6B 65 79 Programmers key
003930: 73 00 07 00 A0 00 01 C0 00 10 00 AA 00 A4 20 0E s............. .
003940: 2C 22 6C 69 73 74 0D 22 00 0F 00 B4 00 A4 20 0F ,"list."...... .
003950: 2C 22 72 75 6E 0D 22 00 3B 00 BE 00 A4 20 10 2C ,"run.".;.... .,
003960: 22 6D 6F 64 65 20 32 3A 70 61 70 65 72 20 30 3A "mode 2:paper 0:
003970: 70 65 6E 20 31 3A 69 6E 6B 20 30 2C 32 33 3A 69 pen 1:ink 0,23:i
003980: 6E 6B 20 31 2C 30 3A 62 6F 72 64 65 72 20 31 33 nk 1,0:border 13
003990: 0D 22 00 15 00 C8 00 A4 20 11 2C 22 72 65 6E 75 ."...... .,"renu
0039A0: 6D 20 31 30 30 0D 22 00 0C 00 D2 00 A4 20 12 2C m 100."...... .,
0039B0: 22 FF 22 00 07 00 DC 00 01 C0 00 0C 00 E6 00 B3 ".".............
0039C0: 20 9F 20 1E C0 03 00 93 32 2C 00 F0 00 01 C0 20 . .....2,.....
0039D0: 61 72 72 61 79 73 20 65 72 6F 72 24 2C 71 75 65 arrays eror$,que
0039E0: 73 24 20 28 6E 6F 74 20 64 69 6D 65 6E 73 69 6F s$ (not dimensio
0039F0: 6E 65 64 29 00 07 00 FA 00 01 C0 00 0E 00 04 01 ned)............
003A00: 01 C0 20 53 65 74 2D 75 70 00 07 00 0E 01 01 C0 .. Set-up.......
003A10: 00 26 00 18 01 AD 20 0F 01 82 20 19 11 01 A2 20 .&.... ... ....
003A20: 0E 2C 19 13 01 A2 20 0F 2C 0E 01 A2 20 10 2C 0F .,.... .,... .,.
003A30: 01 A2 20 11 2C 14 00 2D 00 22 01 CF 20 19 FF 2C .. .,..-.".. ..,
003A40: 1C 36 00 2C 1C 36 00 2C 1C 36 00 20 01 C0 20 73 .6.,.6.,.6. .. s
003A50: 65 74 20 75 70 20 66 61 6B 65 20 22 71 75 6F 74 et up fake "quot
003A60: 65 73 22 00 2B 00 2C 01 0D 00 00 73 63 6F 72 E5 es".+.,....scor.
003A70: EF 0E 01 0D 00 00 71 75 65 73 74 69 6F EE EF 0F ......questio...
003A80: 01 0D 00 00 6C 69 6E 65 6C 65 EE EF 19 21 00 10 ....linele...!..
003A90: 00 36 01 03 00 00 54 C2 EF FF 03 28 17 29 00 2A .6....T....(.).*
003AA0: 00 40 01 9F 20 1E 42 04 20 01 C0 20 72 65 61 64 .@.. .B. .. read
003AB0: 20 61 20 73 74 72 69 6E 67 20 2B 20 70 72 65 74 a string + pret
003AC0: 74 79 20 73 65 74 75 70 00 C1 09 1C 00 4A 01 9F ty setup.....J..
003AD0: 20 1E FC 03 20 01 C0 20 53 65 74 20 75 70 20 77 ... .. Set up w
003AE0: 69 6E 64 6F 77 73 00 2B 00 54 01 9F 20 1E 14 05 indows.+.T.. ...
003AF0: 20 01 C0 20 50 72 69 6E 74 20 73 74 72 69 6E 67 .. Print string
003B00: 20 72 65 61 64 20 61 73 20 70 72 65 74 74 79 65 read as prettye
003B10: 64 00 33 00 5E 01 A9 20 23 0F 2C 17 2C 15 01 BF d.3.^.. #.,.,...
003B20: 23 0F 2C 22 50 72 65 73 73 20 53 50 41 43 45 20 #.,"Press SPACE
003B30: 74 6F 20 73 74 61 72 74 22 01 D6 20 FF 43 F2 22 to start".. .C."
003B40: 20 22 01 D5 00 07 00 68 01 01 C0 00 11 00 72 01 ".....h......r.
003B50: 01 C0 20 4D 61 69 6E 20 6C 6F 6F 70 00 07 00 7C .. Main loop...|
003B60: 01 01 C0 00 12 00 86 01 0D 00 00 6C 69 6E 65 6C ...........linel
003B70: 65 EE EF 19 21 00 2A 00 90 01 9F 20 1E 42 04 20 e...!.*.... .B.
003B80: 01 C0 20 72 65 61 64 20 61 20 73 74 72 69 6E 67 .. read a string
003B90: 20 2B 20 70 72 65 74 74 79 20 73 65 74 75 70 00 + pretty setup.
003BA0: 1F 00 9A 01 0D 00 00 70 74 79 6C 69 6E 65 F3 EF .......ptyline..
003BB0: 0D 00 00 70 72 65 74 74 79 6C 69 6E 65 F3 00 07 ...prettyline...
003BC0: 00 A4 01 01 C0 00 30 00 AE 01 C3 D9 3E 20 0D 00 ......0.....> ..
003BD0: 00 6E 75 6D 71 75 65 73 F4 20 20 20 20 20 20 20 .numques.
003BE0: 01 C0 20 6E 75 6D 62 65 72 20 6F 66 20 71 75 65 .. number of que
003BF0: 73 74 69 6F 6E 73 20 00 37 00 B8 01 9E 20 0D 00 stions .7.... ..
003C00: 00 E9 EF 0F 20 EC 20 0D 00 00 6E 75 6D 71 75 65 .... . ...numque
003C10: 73 F4 20 01 C0 20 6C 6F 6F 70 20 66 6F 72 20 65 s. .. loop for e
003C20: 61 63 68 20 71 75 65 73 74 69 6F 6E 20 20 00 14 ach question ..
003C30: 00 C2 01 C3 20 03 00 00 71 75 65 F3 28 0D 00 00 .... ...que.(...
003C40: E9 29 00 0B 00 CC 01 B0 20 0D 00 00 E9 00 27 00 .)...... .....'.
003C50: D6 01 C3 20 03 00 00 61 6E F3 20 20 20 20 20 01 ... ...an. .
003C60: C0 20 47 65 74 20 63 6F 72 72 65 63 74 20 61 6E . Get correct an
003C70: 73 77 65 72 00 3E 00 E0 01 9E 20 0D 00 00 E9 EF swer.>.... .....
003C80: 0F 20 EC 20 0D 00 00 6E 75 6D 71 75 65 73 F4 20 . . ...numques.
003C90: 01 C0 20 6C 6F 6F 70 20 66 6F 72 20 6E 75 6D 62 .. loop for numb
003CA0: 65 72 20 6F 66 20 71 75 65 73 74 69 6F 6E 73 20 er of questions
003CB0: 20 20 00 25 00 EA 01 C3 20 03 00 00 65 72 6F F2 .%.... ...ero.
003CC0: 28 0D 00 00 E9 29 20 01 C0 20 67 65 74 3E C7 20 (....) .. get>.
003CD0: 72 65 73 70 6F 6E 73 65 73 00 0B 00 F4 01 B0 20 responses......
003CE0: 0D 00 00 E9 00 07 00 FE 01 01 C0 00 0D 00 08 02 ................
003CF0: 8A 20 01 20 8A 20 23 0F 00 1C 00 12 02 9F 20 1E . . . #....... .
003D00: FC 03 20 01 C0 20 53 65 74 20 75 70 20 77 69 6E .. .. Set up win
003D10: 64 6F 77 73 00 30 00 1C 02 A1 20 03 00 00 E1 EF dows.0.... .....
003D20: 22 20 20 20 20 20 20 20 20 20 45 6E 64 20 6F 66 " End of
003D30: 20 54 65 73 74 22 20 EB 20 9F 20 1E 14 05 01 A0 Test" . . .....
003D40: 20 1E 70 03 00 36 00 26 02 A9 20 23 12 2C 11 F4 .p..6.&.. #.,..
003D50: 28 0D 00 00 71 75 65 73 74 69 6F EE F0 19 0A 29 (...questio....)
003D60: 2C 11 01 BF 23 12 2C FF 19 28 0D 00 00 71 75 65 ,...#.,..(...que
003D70: 73 74 69 6F EE 29 3B 22 2E 22 00 28 00 30 02 9F stio.);".".(.0..
003D80: 20 1E 14 05 20 20 20 20 01 C0 20 70 72 69 6E 74 ... .. print
003D90: 20 70 72 65 74 74 79 27 64 20 71 75 65 73 74 69 pretty'd questi
003DA0: 6F 6E 00 07 00 3A 02 01 C0 00 1B 00 44 02 9E 20 on...:......D..
003DB0: 0D 00 00 E9 EF 0F 20 EC 20 0D 00 00 6E 75 6D 71 ...... . ...numq
003DC0: 75 65 73 F4 00 17 00 4E 02 03 00 00 E1 EF 03 01 ues....N........
003DD0: 80 00 00 71 75 65 F3 28 0D 00 00 E9 29 00 23 00 ...que.(....).#.
003DE0: 58 02 A9 20 23 0F 2C 10 2C 0D 00 00 E9 F6 10 F5 X.. #.,.,.......
003DF0: 0F 20 20 01 C0 20 73 65 74 20 63 75 72 73 6F 72 . .. set cursor
003E00: 00 1D 00 62 02 A1 20 03 00 00 E1 EF 22 54 22 20 ...b.. ....."T"
003E10: EB 20 03 00 00 E1 EF 22 54 72 75 65 22 00 1E 00 . ....."True"...
003E20: 6C 02 A1 20 03 00 00 E1 EF 22 46 22 20 EB 20 03 l.. ....."F" . .
003E30: 00 00 E1 EF 22 46 61 6C 73 65 22 00 38 00 76 02 ...."False".8.v.
003E40: BF 20 23 0F 2C 22 28 22 3B FF 03 28 0D 00 00 E9 . #.,"(";..(....
003E50: F4 19 40 29 3B 22 29 20 22 3B 20 01 C0 20 50 72 ..@);") "; .. Pr
003E60: 69 6E 74 20 71 75 65 73 74 69 6F 6E 20 6E 75 6D int question num
003E70: 62 65 72 00 0C 00 80 02 D8 20 E7 20 0E 2C 0F 00 ber...... . .,..
003E80: 0A 00 8A 02 9F 20 1E 14 05 00 0C 00 94 02 D8 20 ..... .........
003E90: E7 20 0E 2C 0F 00 0B 00 9E 02 B0 20 0D 00 00 E9 . .,....... ....
003EA0: 00 07 00 A8 02 01 C0 00 12 00 B2 02 01 C0 20 47 .............. G
003EB0: 65 74 20 61 6E 73 77 65 72 00 07 00 BC 02 01 C0 et answer.......
003EC0: 00 1C 00 C6 02 03 00 00 E1 EF FF 43 01 A1 20 03 ...........C.. .
003ED0: 00 58 46 00 E1 EF 22 22 20 A0 20 1E C6 02 00 3D .XF..."" . ....=
003EE0: 00 D0 02 03 00 00 E1 EF FF 1C 28 03 00 00 E1 29 ..........(....)
003EF0: 01 A1 20 03 00 00 E1 F1 22 41 22 20 FC 20 03 00 .. ....."A" . ..
003F00: 00 E1 EE FF 03 28 19 40 F4 0D 00 00 6E 75 6D 71 .....(.@....numq
003F10: 75 65 73 F4 29 20 A0 20 1E C6 02 00 2A 00 DA 02 ues.) . ....*...
003F20: 0D 00 00 41 4E 53 4E 55 CD EF 28 FF 01 28 03 00 ...ANSNU..(..(..
003F30: 00 C1 29 F5 19 40 29 01 0D 00 00 6C 69 6E 65 6C ..)..@)....linel
003F40: 65 EE EF 19 24 00 2F 00 E4 02 A9 20 23 0F 2C 11 e...$./.... #.,.
003F50: 2C 0D 00 00 41 4E 53 4E 55 CD F6 10 F5 0F 01 BB ,...ANSNU.......
003F60: 23 0F 2C 0E 01 BF 23 0F 2C 03 00 00 C1 3B 01 BB #.,...#.,....;..
003F70: 23 0F 2C 0F 00 22 00 EE 02 01 C0 20 68 69 67 68 #.,.."..... high
003F80: 6C 69 67 68 74 73 20 73 65 6C 65 63 74 65 64 20 lights selected
003F90: 61 6E 73 77 65 72 00 2C 00 F8 02 0D 00 00 70 6F answer.,......po
003FA0: 69 6E 74 F3 EF 0E 01 A1 20 03 00 00 E1 EF 03 00 int..... .......
003FB0: 00 61 6E F3 20 EB 20 0D 00 00 70 6F 69 6E 74 F3 .an. . ...point.
003FC0: EF 0F 00 20 00 02 03 0D 00 00 73 63 6F 72 E5 EF ... ......scor..
003FD0: 0D 00 00 48 FC 73 63 6F 72 E5 F4 0D 00 00 70 6F ...H.scor.....po
003FE0: 69 6E 74 F3 00 1C 00 0C 03 9F 20 1E 64 05 20 01 int....... .d. .
003FF0: C0 20 70 72 69 6E 74 20 72 65 73 70 6F 6E 73 65 . print response
004000: 00 3A 00 16 03 A9 20 23 0F 2C 16 2C 19 11 F5 0D .:.... #.,.,....
004010: 00 00 70 74 79 6C 69 6E 65 F3 01 BF 23 0F 2C 22 ..ptyline...#.,"
004020: 50 72 65 73 73 20 53 50 41 43 45 20 74 6F 20 63 Press SPACE to c
004030: 6F 6E 74 69 6E 75 65 22 20 20 00 25 00 20 03 03 ontinue" .%. ..
004040: 00 00 C9 EF 22 22 20 01 20 D6 20 03 00 00 C9 EF ...."" . . .....
004050: 22 22 01 20 03 00 00 C9 EF FF 43 20 01 20 D5 00 "". ......C . ..
004060: 2D 00 2A 03 A1 20 03 00 00 C9 EF 03 00 00 54 C2 -.*.. ........T.
004070: 20 EB 20 0D 00 00 6C 69 6E 65 6C 65 EE EF 19 21 . ...linele...!
004080: 01 9F 20 1E 56 04 01 A0 20 1E 08 02 00 15 00 34 .. .V... ......4
004090: 03 A1 20 03 00 00 C9 F2 22 20 22 20 A0 20 1E 20 .. ....." " . .
0040A0: 03 00 1E 00 3E 03 0D 00 00 71 75 65 73 74 69 6F ....>....questio
0040B0: EE EF 0D 00 00 71 75 65 73 74 69 6F EE F4 0F 00 .....questio....
0040C0: 0A 00 48 03 A0 20 1E 86 01 00 07 00 52 03 01 C0 ..H.. ......R...
0040D0: 00 18 00 5C 03 78 48 FF FF FF FF 11 82 09 B3 04 ...\.xH.........
0040E0: B3 04 FB 04 77 09 02 10 08 0F 00 07 01 00 2C 53 ....w.........,S
0040F0: 41 54 33 00 00 00 00 00 00 00 00 00 00 00 00 02 AT3.............
004100: 00 00 00 08 70 09 00 56 19 00 00 00 00 00 00 00 ....p..V........
004110: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004120: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004130: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004140: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004150: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004160: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004180: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004190: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0041A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0041B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0041C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0041D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0041E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 40 ...............@
0041F0: CA FF FF FF FF 11 82 09 B3 04 B3 04 FD 04 7B 09 ..............{.
004200: 02 10 08 6C 0A 15 08 00 16 01 C0 20 45 6E 64 20 ...l....... End
004210: 71 75 69 7A 20 72 6F 75 74 69 6E 65 00 07 00 66 quiz routine...f
004220: 03 01 C0 00 0D 00 70 03 A9 20 23 0F 2C 16 2C 15 ......p.. #.,.,.
004230: 00 36 00 7A 03 BF 20 23 0F 2C 22 59 6F 75 20 73 .6.z.. #.,"You s
004240: 63 6F 72 65 64 22 3B 0D 00 00 73 63 6F 72 E5 3B cored";...scor.;
004250: 22 6F 75 74 20 6F 66 22 3B 0D 00 00 71 75 65 73 "out of";...ques
004260: 74 69 6F EE F5 0F 00 33 00 84 03 A9 20 23 0F 2C tio....3.... #.,
004270: 12 2C 19 0A 01 BF 23 0F 2C 22 50 72 65 73 73 20 .,....#.,"Press
004280: 53 50 41 43 45 20 74 6F 20 72 75 6E 20 74 68 65 SPACE to run the
004290: 20 70 72 6F 67 72 61 6D 22 00 31 00 8E 03 A9 20 program".1....
0042A0: 23 0F 2C 13 2C 19 0C 01 BF 23 0F 2C 22 61 67 61 #.,.,....#.,"aga
0042B0: 69 6E 2C 20 20 6F 72 20 45 53 43 2F 45 53 43 20 in, or ESC/ESC
0042C0: 74 6F 20 66 69 6E 69 73 68 22 00 11 00 98 03 D6 to finish"......
0042D0: 20 FF 43 F2 22 20 22 01 D5 01 CA 00 07 00 A2 03 .C." ".........
0042E0: 01 C0 00 20 00 AC 03 01 C0 20 49 6E 74 65 72 63 ... ..... Interc
0042F0: 65 70 74 20 45 53 43 41 50 45 20 72 6F 75 74 69 ept ESCAPE routi
004300: 6E 65 00 07 00 B6 03 01 C0 6A 6B 00 1F 00 C0 03 ne.......jk.....
004310: AD 20 0F 20 01 82 20 0F 20 01 20 A2 20 0E 2C 0F . . .. . . . .,.
004320: 20 01 20 A2 20 0F 2C 19 19 20 00 21 00 CA 03 BA . . .,.. .!....
004330: 20 0E 01 20 BB 20 0F 20 01 C0 20 72 65 73 74 6F .. . . .. resto
004340: 72 65 20 64 65 66 61 75 6C 74 73 00 06 00 D4 03 re defaults.....
004350: 98 00 07 00 DE 03 01 C0 00 1A 00 E8 03 01 C0 20 ...............
004360: 49 6E 69 74 69 61 6C 69 73 65 20 77 69 6E 64 6F Initialise windo
004370: 77 73 00 07 00 F2 03 01 C0 00 12 00 FC 03 BA 20 ws.............
004380: 23 11 2C 10 20 01 20 8A 20 23 11 00 3D 00 06 04 #.,. . . #..=...
004390: D8 20 23 0E 2C 10 2C 19 27 2C 10 2C 12 F4 0D 00 . #.,.,.',.,....
0043A0: 00 70 74 79 6C 69 6E 65 F3 20 01 20 D8 20 23 0F .ptyline. . . #.
0043B0: 2C 10 2C 19 27 2C 14 F4 0D 00 00 70 74 79 6C 69 ,.,.',.....ptyli
0043C0: 6E 65 F3 2C 19 18 20 20 00 0E 00 10 04 BA 20 0E ne.,.. ...... .
0043D0: 01 BB 20 0F 01 8A 00 12 00 1A 04 BA 20 23 0F 2C .. ......... #.,
0043E0: 11 20 01 20 8A 20 23 0F 00 3C 00 24 04 D8 20 23 . . . #..<.$.. #
0043F0: 0E 2C 14 2C 19 26 2C 11 2C 12 F4 0D 00 00 70 74 .,.,.&,.,.....pt
004400: 79 6C 69 6E 65 F3 20 01 20 D8 20 16 89 23 0F 2C yline. . . ..#.,
004410: 11 2C 19 26 2C 15 F4 0D 00 00 70 74 79 6C 69 6E .,.&,.....ptylin
004420: 65 F3 2C 19 17 20 00 06 00 2E 04 C9 00 07 00 38 e.,.. .........8
004430: 04 01 C0 00 26 00 42 04 01 C0 20 72 65 61 64 73 ....&.B... reads
004440: 20 61 20 73 74 72 69 6E 67 20 2B 20 70 72 65 74 a string + pret
004450: 74 79 20 70 72 69 6E 74 73 00 0B 00 4C 04 C3 20 ty prints...L..
004460: 03 00 00 F1 00 0E 00 56 04 03 00 00 E1 EF 03 00 .......V........
004470: 00 F1 00 15 00 60 04 0D 00 00 70 72 65 74 74 79 .....`....pretty
004480: 6C 69 6E 65 F3 EF 0E 00 0A 00 6A 04 9F 20 1E 9C line......j.. ..
004490: 04 00 06 00 74 04 C9 00 07 00 7E 04 01 C0 00 26 ....t.....~....&
0044A0: 00 88 04 01 C0 20 53 65 74 20 75 70 20 73 74 72 ..... Set up str
0044B0: 69 6E 67 20 66 6F 72 20 70 72 65 74 74 79 20 70 ing for pretty p
0044C0: 72 69 6E 74 00 07 00 92 04 01 C0 00 16 00 9C 04 rint............
0044D0: 0D 00 00 50 54 D2 EF 0D 00 00 4C 49 4E 45 4C 45 ...PT.....LINELE
0044E0: CE 00 18 00 A6 04 D6 20 FF 0E 28 03 00 00 E1 29 ....... ..(....)
0044F0: 20 EE 20 0D 00 00 50 54 D2 00 1D 00 B0 04 20 20 . ...PT......
004500: D6 20 AC 28 03 00 00 E1 2C 0D 00 00 50 2E 7E 54 . .(....,...P.~T
004510: D2 2C 0F 29 F2 22 20 22 00 18 00 BA 04 20 20 20 .,.)." ".....
004520: 20 0D 00 00 50 54 D2 EF 0D 00 00 50 54 D2 F5 0F ...PT.....PT...
004530: 00 0A 00 C4 04 20 20 20 20 D5 00 1F 00 CE 04 20 ..... ......
004540: 20 AC 28 03 00 00 E1 2C 0D 00 00 50 54 D2 2C 0F .(....,...PT.,.
004550: 29 EF FF 03 28 1C FE 00 29 00 41 00 D8 04 20 20 )...(...).A...
004560: 0D 00 00 50 54 D2 EF 0D 00 00 50 54 D2 F4 0D 00 ...PT.....PT....
004570: 00 4C 49 4E 45 4C 45 CE 20 01 20 0D 00 00 70 72 .LINELE. . ...pr
004580: 65 74 74 79 6C 69 6E 65 F3 EF 0D 00 00 70 72 65 ettyline.....pre
004590: 74 74 79 6C 69 6E 65 F3 F4 0F 00 08 00 E2 04 20 ttyline........
0045A0: 20 D5 00 06 00 EC 04 C9 00 07 00 F6 04 01 C0 00 ...............
0045B0: 35 00 00 05 01 C0 20 53 75 62 72 6F 75 74 69 6E 5..... Subroutin
0045C0: 65 20 74 6F 20 70 72 69 6E 74 20 61 24 20 77 69 e to print a$ wi
0045D0: 74 68 20 43 48 52 24 28 26 46 45 29 20 61 73 20 th CHR$(&FE) as
0045E0: 43 52 4C 46 00 07 00 0A 05 01 C0 00 18 00 14 05 CRLF............
0045F0: 9E 20 0D 00 00 F8 EF 0F 20 EC 20 FF 0E 28 03 00 . ...... . ..(..
004600: 00 E1 29 00 18 00 1E 05 03 00 00 E2 EF AC 28 B6 ..)...........(.
004610: 26 03 00 00 E1 2C 0D 00 00 F8 2C 0F 29 00 21 00 &....,....,.).!.
004620: 28 05 A1 20 03 00 00 E2 EF FF 03 28 1C FE 00 29 (.. .......(...)
004630: EB 20 BF 20 01 97 20 BF 20 03 00 00 E2 3B 00 0B . . .. . ....;..
004640: 00 32 05 B0 20 0D 00 00 F8 00 06 00 3C 05 C9 00 .2.. .......<...
004650: 07 00 46 05 01 C0 00 15 00 50 05 01 C0 20 50 72 ..F......P... Pr
004660: 69 6E 74 20 63 6F 6D 6D 65 6E 74 00 07 00 5A 05 int comment...Z.
004670: 01 C0 00 1A 00 64 05 CC 20 0F 2C 1A DC 05 F5 0D .....d.. .,.....
004680: 00 00 70 6F 69 6E 74 F3 F6 1A AA 05 00 26 00 6E ..point......&.n
004690: 05 D8 20 E7 20 0E 2C 0F 20 01 C0 20 72 6F 75 74 .. . .,. .. rout
0046A0: 69 6E 65 20 6E 65 65 64 73 20 77 69 6E 64 6F 77 ine needs window
0046B0: 20 30 00 1E 00 78 05 03 00 00 E1 20 EF 20 03 00 0...x..... . ..
0046C0: 00 45 52 4F D2 28 0D 00 00 41 4E 53 4E 55 CD 29 .ERO.(...ANSNU.)
0046D0: 00 20 00 82 05 9F 20 1E 9C 04 20 01 C0 20 70 72 . .... ... .. pr
0046E0: 65 74 74 79 20 75 70 20 72 65 73 70 6F 6E 73 65 etty up response
0046F0: 00 37 00 8C 05 A9 20 0F 2C 28 0F F4 0D 00 00 6E .7.... .,(.....n
004700: 75 6D 71 75 65 73 F4 29 F6 10 20 01 C0 20 73 65 umques.).. .. se
004710: 74 6E 3F 20 63 75 72 73 6F 72 20 66 6F 72 20 72 tn? cursor for r
004720: 65 73 70 6F 6E 73 65 20 20 00 23 00 96 05 9F 20 esponse .#....
004730: 1E 14 05 20 01 C0 20 50 72 69 6E 74 20 70 72 65 ... .. Print pre
004740: 74 74 79 20 72 65 73 70 6F 6E 73 65 00 10 00 A0 tty response....
004750: 05 D8 20 E7 20 0E 2C 0F 20 01 20 C9 00 07 00 AA .. . .,. . .....
004760: 05 01 C0 00 29 00 B4 05 A9 20 0F 2C 28 10 F4 0D ....).... .,(...
004770: 00 00 6E 75 6D 71 75 65 73 F4 29 F6 10 F5 0D 00 ..numques.).....
004780: 00 70 72 65 74 74 79 6C 69 6E 65 F3 00 22 00 BE .prettyline.."..
004790: 05 9F 20 1E 14 05 20 01 C0 20 50 72 69 6E 74 20 .. ... .. Print
0047A0: 61 6C 74 65 72 65 64 20 73 74 72 69 6E 67 00 10 altered string..
0047B0: 00 C8 05 D8 20 E7 20 0E 2C 0F 20 01 20 C9 00 07 .... . .,. . ...
0047C0: 00 D2 05 01 C0 00 1A 00 DC 05 01 C0 20 44 61 74 ............ Dat
0047D0: 61 20 66 6F 72 20 71 75 65 73 74 69 6F 6E 73 00 a for questions.
0047E0: 0F 00 E6 05 01 C0 20 46 6F 72 6D 61 74 3A 00 18 ...... Format:..
0047F0: 00 F0 05 01 C0 20 48 65 61 64 69 6E 67 20 66 6F ..... Heading fo
004800: 72 20 54 65 73 74 00 1A 00 FA 05 01 C0 20 46 6F r Test....... Fo
004810: 72 20 65 B3 44 61 63 68 20 71 75 65 73 74 69 6F r e.Dach questio
004820: 6E 3A 00 18 00 04 06 01 C0 20 20 20 20 51 75 65 n:....... Que
004830: 73 74 69 6F 6E 20 74 65 78 74 00 20 00 0E 06 01 stion text. ....
004840: C0 20 20 20 20 4E 75 6D 62 65 72 20 6F 66 20 61 . Number of a
004850: 6E 73 77 65 72 73 20 28 4E 29 00 39 00 18 06 01 nswers (N).9....
004860: C0 20 20 20 20 54 65 78 74 20 6F 66 20 65 61 63 . Text of eac
004870: 68 20 61 6E 73 77 65 72 20 28 20 6D 75 73 74 20 h answer ( must
004880: 62 65 20 4E 20 69 74 65 6D 73 20 6F 66 20 74 65 be N items of te
004890: 78 74 29 00 33 00 22 06 01 C0 20 20 20 20 43 6F xt).3."... Co
0048A0: 72 72 65 63 74 20 61 6E 73 77 65 72 20 28 41 2D rrect answer (A-
0048B0: 46 29 20 20 77 68 65 72 65 20 41 3D 31 2C 42 3D F) where A=1,B=
0048C0: 32 20 65 74 63 2E 00 3F 00 2C 06 01 C0 20 20 20 2 etc..?.,...
0048D0: 20 54 65 78 74 20 66 6F 72 20 65 61 63 68 20 61 Text for each a
0048E0: 6E 73 77 65 72 20 69 6E 20 73 61 6D 65 20 6F 72 nswer in same or
0048F0: 64 65 72 20 28 6D 75 73 74 20 62 65 20 4E 20 69 der (must be N i
004900: 74 65 6D 73 29 00 1C 00 36 06 01 C0 20 41 66 74 tems)...6... Aft
004910: 65 72 20 61 6C FD 0C 6C 20 71 75 65 73 74 69 6F er al..l questio
004920: 6E 73 3A 00 28 00 40 06 01 C0 20 22 20 20 20 20 ns:.(.@... "
004930: 20 20 20 20 20 45 6E 64 20 6F 66 20 54 65 73 74 End of Test
004940: 22 20 28 65 78 61 63 74 6C 79 29 00 07 00 4A 06 " (exactly)...J.
004950: 01 C0 00 25 00 54 06 8C 20 22 53 65 6C 66 20 41 ...%.T.. "Self A
004960: 73 73 65 73 73 6D 65 6E 74 20 54 65 73 74 20 2D ssessment Test -
004970: 20 43 68 2E 20 33 22 00 07 00 5E 06 01 C0 00 39 Ch. 3"...^....9
004980: 00 68 06 8C 20 22 49 6E 20 4D 6F 64 65 20 31 2C .h.. "In Mode 1,
004990: 20 77 68 61 74 20 69 73 20 74 68 65 20 72 65 73 what is the res
0049A0: 75 6C 74 20 6F 66 20 65 6E 74 65 72 69 6E 67 20 ult of entering
0049B0: 50 45 4E 20 31 35 22 00 35 00 72 06 8C 20 34 2C PEN 15".5.r.. 4,
0049C0: 22 46 6F 6C 6C 6F 77 69 6E 67 20 74 65 78 74 20 "Following text
0049D0: 69 73 20 77 72 69 74 74 65 6E 20 69 6E 20 20 20 is written in
0049E0: 20 20 20 20 20 49 4E 4B 20 31 35 22 00 1C 00 7C INK 15"...|
0049F0: 06 8C 20 22 50 45 4E 20 69 73 20 73 65 74 20 74 .. "PEN is set t
004A00: 6F 20 49 4E 4B 20 33 22 00 3E 00 86 06 8C 20 22 o INK 3".>.... "
004A10: 4E 6F 74 68 69 6E 67 72 4F FF FF FF FF 11 7A 09 NothingrO.....z.
004A20: B3 04 B3 04 F9 04 78 09 02 10 08 0F 00 07 01 00 ......x.........
004A30: 2C 53 41 54 33 00 00 00 00 00 00 00 00 00 00 00 ,SAT3...........
004A40: 00 03 00 00 00 08 70 11 00 56 19 00 00 00 00 00 ......p..V......
004A50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004A60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004A70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004A80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004A90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004AA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004AB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004AC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004AD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004AE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004AF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004B00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004B10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004B20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
004B30: 00 11 55 FF FF FF FF 11 7E 09 B3 04 B3 04 FF 04 ..U.....~.......
004B40: 7D 09 02 10 08 7C 0A 15 08 00 16 2C 20 73 69 6E }....|....., sin
004B50: 63 65 20 31 35 20 69 73 20 6F 75 74 20 6F 66 20 ce 15 is out of
004B60: 20 20 20 20 20 20 20 20 72 61 6E 67 65 20 69 6E range in
004B70: 20 4D 6F 64 65 20 31 22 20 20 00 1F 00 90 06 8C Mode 1" ......
004B80: 20 22 50 45 4E 20 69 73 20 73 65 74 20 74 6F 20 "PEN is set to
004B90: 49 4E 4B 20 31 35 22 2C 42 00 38 00 9A 06 8C 20 INK 15",B.8....
004BA0: 22 4E 6F 2C 20 42 2C 20 50 65 6E 20 31 35 20 69 "No, B, Pen 15 i
004BB0: 73 20 66 6F 72 63 65 64 20 69 6E 74 6F 20 72 61 s forced into ra
004BC0: 6E 67 65 20 2B 20 62 65 63 6F 6D 65 73 20 33 22 nge + becomes 3"
004BD0: 20 00 3B 00 A4 06 8C 20 22 43 6F 72 72 65 63 74 .;.... "Correct
004BE0: 2C 20 50 65 6E 20 31 35 20 69 73 20 66 6F 72 63 , Pen 15 is forc
004BF0: 65 64 20 69 6E 74 6F 20 72 61 6E 67 65 20 2B 20 ed into range +
004C00: 62 65 63 6F 6D 65 73 20 33 22 20 20 00 3A 00 AE becomes 3" .:..
004C10: 06 8C 20 22 4E 6F 2C 20 42 2C 20 50 65 6E 20 31 .. "No, B, Pen 1
004C20: 35 20 69 73 20 66 6F 72 63 65 64 20 69 6E 74 6F 5 is forced into
004C30: 20 72 61 6E 67 65 20 2B 20 62 65 63 6F 6D 65 73 range + becomes
004C40: 20 33 22 20 20 20 00 3B 00 B8 06 24 9F 8C 20 22 3" .;...$.. "
004C50: 4E 6F 2C 20 42 2C 20 50 65 6E 20 31 35 20 69 73 No, B, Pen 15 is
004C60: 20 66 6F 72 63 65 64 20 69 6E 74 6F 20 72 61 6E forced into ran
004C70: 67 65 20 2B 20 62 65 63 6F 6D 65 73 20 33 22 20 ge + becomes 3"
004C80: 20 20 20 00 07 00 C2 06 01 C0 00 63 00 CC 06 8C ........c....
004C90: 20 22 57 68 61 74 20 69 73 20 74 68 65 20 6D 61 "What is the ma
004CA0: 78 69 6D 75 6D 20 6E 75 6D 62 65 72 20 6F 66 20 ximum number of
004CB0: 63 6F 6C 6F 75 72 73 20 79 6F 75 20 63 61 6E 20 colours you can
004CC0: 73 65 65 20 6F 6E 20 74 68 65 20 73 63 72 65 65 see on the scree
004CD0: 6E 20 61 74 20 74 68 65 20 73 61 6D 65 20 74 69 n at the same ti
004CE0: 6D 65 20 69 6E 20 4D 6F 64 65 20 32 22 00 34 00 me in Mode 2".4.
004CF0: D6 06 8C 20 32 2C 32 2C 33 2C 42 2C 22 4E 6F 2C ... 2,2,3,B,"No,
004D00: 20 79 6F 75 20 66 6F 72 67 6F 74 20 74 68 65 20 you forgot the
004D10: 62 6F 72 64 65 72 22 2C 22 43 6F 72 72 65 63 74 border","Correct
004D20: 22 00 07 00 E0 06 01 C0 00 4A 00 EA 06 8C 20 22 "........J.... "
004D30: 48 6F 77 20 6D 61 6E 79 20 63 6F 6C 6F 75 72 73 How many colours
004D40: 20 63 61 6E 20 79 6F 75 20 70 75 74 20 22 70 6F can you put "po
004D50: 6E 20 73 63 72 65 65 6E 20 61 74 20 74 68 65 20 n screen at the
004D60: 73 61 6D 65 20 74 69 6D 65 20 69 6E 20 4D 6F 64 same time in Mod
004D70: 65 20 30 22 00 54 00 F4 06 8C 20 33 2C 35 2C 31 e 0".T.... 3,5,1
004D80: 37 2C 31 36 2C 42 2C 22 4E 6F 2C 20 74 68 61 74 7,16,B,"No, that
004D90: 27 73 20 4D 6F 64 65 20 31 22 2C 22 43 6F 72 72 's Mode 1","Corr
004DA0: 65 63 74 22 2C 22 4E 6F 2C 20 79 6F 75 20 68 61 ect","No, you ha
004DB0: 76 65 20 66 6F 72 67 6F 74 74 65 6E 20 74 68 65 ve forgotten the
004DC0: 20 62 6F 72 64 65 72 22 00 07 00 FE 06 01 C0 00 border"........
004DD0: 60 00 08 07 8C 20 22 57 68 61 74 20 49 4E 4B 20 `.... "What INK
004DE0: 69 73 20 50 45 4E 20 73 65 74 20 74 6F 20 61 66 is PEN set to af
004DF0: 74 65 72 20 65 6E 74 65 72 69 6E 67 20 74 68 65 ter entering the
004E00: 20 66 6F 6C 6C 6F 77 69 6E 67 3A 20 20 20 20 20 following:
004E10: 20 20 20 4D 4F 44 45 20 30 3A 50 45 4E 20 31 33 MODE 0:PEN 13
004E20: 3A 4D 4F 44 45 20 32 3A 4D 4F 44 45 20 30 22 00 :MODE 2:MODE 0".
004E30: 1C 00 12 07 8C 20 33 2C 49 4E 4B 20 31 33 2C 49 ..... 3,INK 13,I
004E40: 4E 4B 20 31 2C 6E 6F 6E 65 2C 42 00 51 00 1C 0E NK 1,none,B.Q...
004E50: 68 07 8C 20 22 4E 6F 2C 20 42 2C 20 67 6F 69 6E h.. "No, B, goin
004E60: 67 20 69 6E 74 6F 20 6D 6F 64 65 20 32 20 74 68 g into mode 2 th
004E70: 65 20 70 65 6E 20 69 73 20 66 6F 72 63 65 64 20 e pen is forced
004E80: 69 6E 74 6F 20 72 61 6E 67 65 20 61 6E 64 20 67 into range and g
004E90: 6F 65 73 20 74 6F 20 49 4E 4B 20 31 22 20 00 55 oes to INK 1" .U
004EA0: 00 26 07 8C 20 22 43 6F 72 72 65 63 74 2C 20 67 .&.. "Correct, g
004EB0: 6F 69 6E 67 20 69 6E 74 6F 20 6D 6F 64 65 20 32 oing into mode 2
004EC0: 20 74 68 65 20 70 65 6E 20 69 73 20 66 6F 72 63 the pen is forc
004ED0: 65 64 20 69 6E 74 6F 20 72 61 6E 67 65 20 61 6E ed into range an
004EE0: 64 20 67 6F 65 73 20 74 6F 20 49 4E 4B 20 31 22 d goes to INK 1"
004EF0: 20 20 20 00 55 00 30 07 8C 20 22 4E 6F 2C 20 42 .U.0.. "No, B
004F00: 2C 20 67 6F 69 6E 67 20 69 6E 74 6F 20 6D 6F 64 , going into mod
004F10: 65 20 32 20 74 68 65 20 70 65 6E 20 69 73 20 66 e 2 the pen is f
004F20: 6F 72 63 65 64 20 69 6E 74 6F 20 72 61 6E 67 65 orced into range
004F30: 20 61 6E 64 20 67 6F 65 73 20 74 6F 20 49 4E 4B and goes to INK
004F40: 20 31 22 20 20 20 20 20 00 07 00 3A 07 01 C0 00 1" ...:....
004F50: 6B CB 0F 00 44 07 8C 20 22 49 66 20 79 6F 75 20 k...D.. "If you
004F60: 64 6F 6E 27 74 20 69 6E 63 6C 75 64 65 20 74 68 don't include th
004F70: 65 20 6F 70 74 69 6F 6E 61 6C 20 49 4E 4B 20 61 e optional INK a
004F80: 72 67 75 6D 65 6E 74 20 69 6E 20 61 20 50 4C 4F rgument in a PLO
004F90: 54 20 6F 72 20 44 52 41 57 20 63 6F 6D 6D 61 6E T or DRAW comman
004FA0: 64 2C 20 77 68 61 74 20 63 6F 6C 6F 75 72 20 77 d, what colour w
004FB0: 69 6C 6C 20 62 65 20 75 73 65 64 22 00 48 00 4E ill be used".H.N
004FC0: 07 8C 20 34 2C 49 4E 4B 20 31 2C 43 6F 6C 6F 75 .. 4,INK 1,Colou
004FD0: 72 20 31 2C 54 68 65 20 6C 61 73 74 20 49 4E 4B r 1,The last INK
004FE0: 20 75 73 65 64 20 69 6E 20 61 20 50 4C 4F 54 20 used in a PLOT
004FF0: 6F 72 20 20 20 20 20 20 44 52 41 57 20 63 6F 6D or DRAW com
005000: 6D 61 6E 64 00 3A 00 58 07 8C 20 54 68 65 20 6C mand.:.X.. The l
005010: 61 73 74 20 63 6F 6C 6F 75 72 20 75 73 65 64 20 ast colour used
005020: 69 6E 20 61 20 50 4C 4F 54 20 20 20 20 20 20 6F in a PLOT o
005030: 72 20 44 52 41 57 20 63 6F 6D 6D 61 6E 64 00 43 r DRAW command.C
005040: 00 62 07 8C 20 43 2C 22 4E 6F 2C 20 43 2C 20 75 .b.. C,"No, C, u
005050: 6E 6C 65 91 12 73 73 20 6E 6F 6E 65 20 68 61 73 nle..ss none has
005060: 20 62 65 65 6E 20 65 78 65 63 75 74 65 64 2C 77 been executed,w
005070: 68 65 6E 20 49 4E 4B 20 31 20 69 73 20 75 73 65 hen INK 1 is use
005080: 64 22 20 00 43 00 6C 07 8C 20 22 4E 6F 2C 20 43 d" .C.l.. "No, C
005090: 2C 20 75 6E 6C 65 73 73 20 6E 6F 6E 65 20 68 61 , unless none ha
0050A0: 73 20 62 65 65 6E 20 65 78 65 63 75 74 65 64 2C s been executed,
0050B0: 20 77 68 65 6E 20 49 4E 4B 20 31 20 69 73 20 75 when INK 1 is u
0050C0: 73 65 64 22 20 20 00 46 00 76 07 8C 20 22 43 6F sed" .F.v.. "Co
0050D0: 72 72 65 63 74 2C 20 75 6E 6C 65 73 73 20 6E 6F rrect, unless no
0050E0: 6E 65 20 68 61 73 20 62 65 65 6E 20 65 78 65 63 ne has been exec
0050F0: 75 74 65 64 2C 20 77 68 65 6E 20 49 4E 4B 20 31 uted, when INK 1
005100: 20 69 73 20 75 73 65 64 22 20 20 20 00 43 00 80 is used" .C..
005110: 07 8C 20 22 4E 6F 2C 20 43 2C 20 75 6E 6C 65 73 .. "No, C, unles
005120: 73 20 6E 6F 6E 65 20 68 61 73 20 62 65 65 6E 20 s none has been
005130: 65 78 65 63 75 74 65 64 2C 20 77 68 65 6E 20 49 executed, when I
005140: 4E 4B 20 31 20 69 73 20 75 73 65 64 22 20 20 00 NK 1 is used" .
005150: 07 00 8A 07 01 4C 64 C0 00 87 00 94 07 8C 20 22 .....Ld....... "
005160: 49 6E 20 4D 6F 64 65 20 30 2C 20 63 6F 2D 6F 72 In Mode 0, co-or
005170: 64 69 6E 61 74 65 20 36 33 39 2C 33 39 39 20 69 dinate 639,399 i
005180: 73 20 69 6E 20 74 68 65 20 74 6F 70 20 72 69 67 s in the top rig
005190: 68 74 2D 68 61 6E 64 20 63 6F 72 6E 65 72 20 6F ht-hand corner o
0051A0: 66 20 74 68 65 20 73 63 72 65 65 6E 2E 20 57 68 f the screen. Wh
0051B0: 61 74 20 69 73 20 74 68 65 20 63 6F 2D 6F 72 64 at is the co-ord
0051C0: 69 6E 61 74 65 20 6F 66 20 74 68 69 73 20 70 6F inate of this po
0051D0: 69 6E 74 20 69 6E 20 4D 6F 64 65 20 32 3F 22 00 int in Mode 2?".
0051E0: 2F 00 9E 07 8C 20 34 2C 22 31 35 39 2C 39 39 22 /.... 4,"159,99"
0051F0: 2C 22 31 35 39 2C 31 39 39 22 2C 22 31 35 39 2C ,"159,199","159,
005200: 33 39 39 22 2C 22 36 33 39 2C 33 39 39 22 00 3B 399","639,399".;
005210: 00 A8 07 8C 20 44 2C 22 4E 6F 2C 20 44 2C 20 63 .... D,"No, D, c
005220: 6F 2D 6F 72 64 69 6E 61 74 65 73 20 61 72 65 20 o-ordinates are
005230: 74 68 65 20 73 61 6D 65 20 69 6E 20 61 6C 6C 20 the same in all
005240: 6D 6F 64 65 73 22 20 20 20 00 38 00 B2 07 8C 20 modes" .8....
005250: 22 4E 6F 2C 20 44 2C 57 1A 20 63 6F 2D 6F 72 64 "No, D,W. co-ord
005260: 69 6E 61 74 65 73 20 61 72 65 20 74 68 65 20 73 inates are the s
005270: 61 6D 65 20 69 6E 20 61 6C 6C 20 6D 6F 64 65 73 ame in all modes
005280: 22 20 20 00 38 00 BC 07 8C 20 22 4E 6F 2C 20 44 " .8.... "No, D
005290: 2C 20 63 6F 2D 6F 72 64 69 6E 61 74 65 73 20 61 , co-ordinates a
0052A0: 72 65 20 74 68 65 20 73 61 6D 65 20 69 6E 20 61 re the same in a
0052B0: 6C 6C 20 6D 6F 64 65 73 22 20 20 00 38 00 C6 07 ll modes" .8...
0052C0: 8C 20 22 43 6F 72 72 65 63 74 2C 20 63 6F 2D 6F . "Correct, co-o
0052D0: 72 64 69 6E 61 74 65 73 20 61 72 65 20 74 68 65 rdinates are the
0052E0: 20 73 61 6D 65 20 69 6E 20 61 6C 6C 20 6D 6F 64 same in all mod
0052F0: 65 73 22 00 07 00 D0 07 01 C0 00 63 00 DA 07 8C es"........c....
005300: 20 22 57 68 65 72 65 20 77 69 6C 6C 20 74 68 65 "Where will the
005310: 20 6F 72 69 67 69 6E 20 62 65 20 61 66 74 65 72 origin be after
005320: 20 65 6E 74 65 72 69 6E 67 20 74 68 65 20 66 6F entering the fo
005330: 6C 6C 6F 77 69 6E 67 3A 20 20 4D 4F 44 45 20 30 llowing: MODE 0
005340: 3A 4F 52 49 47 49 4E 20 31 30 30 2C 35 30 3A 4F :ORIGIN 100,50:O
005350: 52 49 47 49 4E 20 37 33 2C BC 47 FF FF FF FF 11 RIGIN 73,.G.....
005360: 87 09 EA 04 7C 04 FE 04 80 09 02 10 08 10 00 07 ....|...........
005370: 01 00 2C 53 41 54 33 00 00 00 00 00 00 00 00 00 ..,SAT3.........
005380: 00 00 00 04 FF 00 56 01 70 19 00 56 19 00 00 00 ......V.p..V....
005390: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0053A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0053B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0053C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0053D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0053E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0053F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005400: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005410: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005420: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005430: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005440: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005450: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005460: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005470: 00 00 00 BB EE FF FF FF FF 11 86 09 EA 04 7C 04 ..............|.
005480: FF 04 82 09 02 10 08 A3 19 09 02 00 16 2D 32 34 .......£.....-24
005490: 22 00 2C 00 E4 07 8C 20 34 2C 22 31 37 33 2C 32 ".,.... 4,"173,2
0054A0: 36 22 2C 22 32 37 2C 37 34 22 2C 22 37 33 2C 2D 6","27,74","73,-
0054B0: 32 34 22 2C 22 37 33 2C 32 34 22 2C 43 00 3C 00 24","73,24",C.<.
0054C0: EE 07 8C 20 22 4E 6F 2C 20 43 2C 20 72 65 6C 61 ... "No, C, rela
0054D0: 74 69 76 65 20 74 6F 20 74 68 65 20 62 6F 74 74 tive to the bott
0054E0: 6F 6D 20 6C 65 66 74 20 6F 66 20 74 68 65 20 73 om left of the s
0054F0: 63 72 65 65 6E 22 20 20 20 00 3B 00 F8 07 8C 20 creen" .;....
005500: 22 4E 6F 2C 20 43 2C 20 72 65 6C 61 74 69 76 65 "No, C, relative
005510: 20 74 6F 20 74 68 65 20 62 6F 74 74 6F 6D 20 6C to the bottom l
005520: 65 66 74 20 6F 66 20 74 68 65 20 73 63 72 65 65 eft of the scree
005530: 6E 22 20 20 00 3C 00 02 08 8C 20 22 43 6F 72 72 n" .<.... "Corr
005540: 65 63 74 2C 20 72 65 6C 61 74 69 76 65 20 74 6F ect, relative to
005550: 20 74 68 65 20 62 6F 74 74 6F 6D 20 6C 65 66 74 the bottom left
005560: 20 6F 66 20 74 68 65 20 73 63 72 65 65 6E 22 20 of the screen"
005570: 00 3C 00 0C 08 8C 20 22 4E 6F 2C 20 43 2C 20 72 .<.... "No, C, r
005580: 65 6C 61 74 69 76 65 20 74 6F 20 74 68 3E AA 65 elative to th>.e
005590: 20 62 6F 74 74 6F 6D 20 6C 65 66 74 20 6F 66 20 bottom left of
0055A0: 74 68 65 20 73 63 72 65 65 6E 22 20 20 20 00 07 the screen" ..
0055B0: 00 16 08 01 C0 00 1D 00 20 08 8C 20 22 20 20 20 ........ .. "
0055C0: 20 20 20 20 20 20 45 6E 64 20 6F 66 20 54 65 73 End of Tes
0055D0: 74 22 00 10 00 2A 08 8C 20 31 2C 22 22 2C 41 2C t"...*.. 1,"",A,
0055E0: 22 22 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ""..............
0055F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005600: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005610: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005620: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005630: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005640: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005650: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005660: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005670: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005680: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 F7 ................
005690: 62 FF FF FF FF 11 87 09 B3 04 B3 04 FD 04 82 09 b...............
0056A0: 02 10 08 0F 00 07 01 00 2C 53 41 54 34 00 00 00 ........,SAT4...
0056B0: 00 00 00 00 00 00 00 00 00 01 00 00 00 08 70 01 ..............p.
0056C0: FF 19 16 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0056D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0056E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0056F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005700: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005710: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005720: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005730: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005740: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005750: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005760: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005770: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005780: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
005790: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0057A0: 00 00 00 00 00 00 00 00 00 5E 4A FF FF FF FF 11 .........^J.....
0057B0: 88 09 B3 04 B3 04 00 05 82 09 02 10 08 7C 0A 15 .............|..
0057C0: 08 00 16 07 00 64 00 01 C0 00 2C 00 6E 00 01 C0 .....d....,.n...
0057D0: 20 53 65 6C 66 20 41 73 73 65 73 73 6D 65 6E 74 Self Assessment
0057E0: 20 54 65 73 74 73 20 3A 20 42 41 53 49 43 20 42 Tests : BASIC B
0057F0: 6F 6F 6B 20 32 00 07 00 78 00 01 C0 00 12 00 82 ook 2...x.......
005800: 00 01 C0 20 44 41 20 39 2F 31 32 2F 38 34 00 07 ... DA 9/12/84..
005810: 00 8C 00 01 C0 00 18 00 96 00 01 C0 20 50 72 6F ............ Pro
005820: 67 72 61 6D 6D 65 72 73 20 6B 65 79 73 00 07 00 grammers keys...
005830: A0 00 01 C0 00 10 00 AA 00 A4 20 0E 2C 22 6C 69 .......... .,"li
005840: 73 74 0D 22 00 0F 00 B4 00 A4 20 0F 2C 22 72 75 st."...... .,"ru
005850: 6E 0D 22 00 3B 00 BE 00 A4 20 10 2C 22 6D 6F 64 n.".;.... .,"mod
005860: 65 20 32 3A 70 61 70 65 72 20 30 3A 70 65 6E 20 e 2:paper 0:pen
005870: 31 3A 69 6E 6B 20 30 2C 32 33 3A 69 6E 6B 20 31 1:ink 0,23:ink 1
005880: 2C 30 3A 62 6F 72 64 65 72 20 31 33 0D 22 00 15 ,0:border 13."..
005890: 00 C8 00 A4 20 11 2C 22 72 65 6E 75 6D 20 31 30 .... .,"renum 10
0058A0: 30 0D 22 00 0C 00 D2 00 A4 20 12 2C 22 FF 22 00 0."...... .,".".
0058B0: 07 00 DC 00 01 C0 00 0C 00 E6 00 B3 20 9F 20 1E ............ . .
0058C0: C0 03 00 93 32 2C 00 F0 00 01 C0 20 61 72 72 61 ....2,..... arra
0058D0: 79 73 20 65 72 6F 72 24 2C 71 75 65 73 24 20 28 ys eror$,ques$ (
0058E0: 6E 6F 74 20 64 69 6D 65 6E 73 69 6F 6E 65 64 29 not dimensioned)
0058F0: 00 07 00 FA 00 01 C0 00 0E 00 04 01 01 C0 20 53 .............. S
005900: 65 74 2D 75 70 00 07 00 0E 01 01 C0 00 26 00 18 et-up........&..
005910: 01 AD 20 0F 01 82 20 19 11 01 A2 20 0E 2C 19 13 .. ... .... .,..
005920: 01 A2 20 0F 2C 0E 01 A2 20 10 2C 0F 01 A2 20 11 .. .,... .,... .
005930: 2C 14 00 2D 00 22 01 CF 20 19 FF 2C 1C 36 00 2C ,..-.".. ..,.6.,
005940: 1C 36 00 2C 1C 36 00 20 01 C0 20 73 65 74 20 75 .6.,.6. .. set u
005950: 70 20 66 61 6B 65 20 22 71 75 6F 74 65 73 22 00 p fake "quotes".
005960: 2B 00 2C 01 0D 00 00 73 63 6F 72 E5 EF 0E 01 0D +.,....scor.....
005970: 00 00 71 75 65 73 74 69 6F EE EF 0F 01 0D 00 00 ..questio.......
005980: 6C 69 6E 65 6C 65 EE EF 19 21 00 10 00 36 01 03 linele...!...6..
005990: 00 00 54 C2 EF FF 03 28 17 29 00 2A 00 40 01 9F ..T....(.).*.@..
0059A0: 20 1E 42 04 20 01 C0 20 72 65 61 64 20 61 20 73 .B. .. read a s
0059B0: 74 72 69 6E 67 20 2B 20 70 72 65 74 74 79 20 73 tring + pretty s
0059C0: 65 74 75 70 00 C1 09 1C 00 4A 01 9F 20 1E FC 03 etup.....J.. ...
0059D0: 20 01 C0 20 53 65 74 20 75 70 20 77 69 6E 64 6F .. Set up windo
0059E0: 77 73 00 2B 00 54 01 9F 20 1E 14 05 20 01 C0 20 ws.+.T.. ... ..
0059F0: 50 72 69 6E 74 20 73 74 72 69 6E 67 20 72 65 61 Print string rea
005A00: 64 20 61 73 20 70 72 65 74 74 79 65 64 00 33 00 d as prettyed.3.
005A10: 5E 01 A9 20 23 0F 2C 17 2C 15 01 BF 23 0F 2C 22 ^.. #.,.,...#.,"
005A20: 50 72 65 73 73 20 53 50 41 43 45 20 74 6F 20 73 Press SPACE to s
005A30: 74 61 72 74 22 01 D6 20 FF 43 F2 22 20 22 01 D5 tart".. .C." "..
005A40: 00 07 00 68 01 01 C0 00 11 00 72 01 01 C0 20 4D ...h......r... M
005A50: 61 69 6E 20 6C 6F 6F 70 00 07 00 7C 01 01 C0 00 ain loop...|....
005A60: 12 00 86 01 0D 00 00 6C 69 6E 65 6C 65 EE EF 19 .......linele...
005A70: 21 00 2A 00 90 01 9F 20 1E 42 04 20 01 C0 20 72 !.*.... .B. .. r
005A80: 65 61 64 20 61 20 73 74 72 69 6E 67 20 2B 20 70 ead a string + p
005A90: 72 65 74 74 79 20 73 65 74 75 70 00 1F 00 9A 01 retty setup.....
005AA0: 0D 00 00 70 74 79 6C 69 6E 65 F3 EF 0D 00 00 70 ...ptyline.....p
005AB0: 72 65 74 74 79 6C 69 6E 65 F3 00 07 00 A4 01 01 rettyline.......
005AC0: C0 00 30 00 AE 01 C3 D9 3E 20 0D 00 00 6E 75 6D ..0.....> ...num
005AD0: 71 75 65 73 F4 20 20 20 20 20 20 20 01 C0 20 6E ques. .. n
005AE0: 75 6D 62 65 72 20 6F 66 20 71 75 65 73 74 69 6F umber of questio
005AF0: 6E 73 20 00 37 00 B8 01 9E 20 0D 00 00 E9 EF 0F ns .7.... ......
005B00: 20 EC 20 0D 00 00 6E 75 6D 71 75 65 73 F4 20 01 . ...numques. .
005B10: C0 20 6C 6F 6F 70 20 66 6F 72 20 65 61 63 68 20 . loop for each
005B20: 71 75 65 73 74 69 6F 6E 20 20 00 14 00 C2 01 C3 question ......
005B30: 20 03 00 00 71 75 65 F3 28 0D 00 00 E9 29 00 0B ...que.(....)..
005B40: 00 CC 01 B0 20 0D 00 00 E9 00 27 00 D6 01 C3 20 .... .....'....
005B50: 03 00 00 61 6E F3 20 20 20 20 20 01 C0 20 47 65 ...an. .. Ge
005B60: 74 20 63 6F 72 72 65 63 74 20 61 6E 73 77 65 72 t correct answer
005B70: 00 3E 00 E0 01 9E 20 0D 00 00 E9 EF 0F 20 EC 20 .>.... ...... .
005B80: 0D 00 00 6E 75 6D 71 75 65 73 F4 20 01 C0 20 6C ...numques. .. l
005B90: 6F 6F 70 20 66 6F 72 20 6E 75 6D 62 65 72 20 6F oop for number o
005BA0: 66 20 71 75 65 73 74 69 6F 6E 73 20 20 20 00 25 f questions .%
005BB0: 00 EA 01 C3 20 03 00 00 65 72 6F F2 28 0D 00 00 .... ...ero.(...
005BC0: E9 29 20 01 C0 20 67 65 74 3E C7 20 72 65 73 70 .) .. get>. resp
005BD0: 6F 6E 73 65 73 00 0B 00 F4 01 B0 20 0D 00 00 E9 onses...... ....
005BE0: 00 07 00 FE 01 01 C0 00 0D 00 08 02 8A 20 01 20 ............. .
005BF0: 8A 20 23 0F 00 1C 00 12 02 9F 20 1E FC 03 20 01 . #....... ... .
005C00: C0 20 53 65 74 20 75 70 20 77 69 6E 64 6F 77 73 . Set up windows
005C10: 00 30 00 1C 02 A1 20 03 00 00 E1 EF 22 20 20 20 .0.... ....."
005C20: 20 20 20 20 20 20 45 6E 64 20 6F 66 20 54 65 73 End of Tes
005C30: 74 22 20 EB 20 9F 20 1E 14 05 01 A0 20 1E 70 03 t" . . ..... .p.
005C40: 00 36 00 26 02 A9 20 23 12 2C 11 F4 28 0D 00 00 .6.&.. #.,..(...
005C50: 71 75 65 73 74 69 6F EE F0 19 0A 29 2C 11 01 BF questio....),...
005C60: 23 12 2C FF 19 28 0D 00 00 71 75 65 73 74 69 6F #.,..(...questio
005C70: EE 29 3B 22 2E 22 00 28 00 30 02 9F 20 1E 14 05 .);".".(.0.. ...
005C80: 20 20 20 20 01 C0 20 70 72 69 6E 74 20 70 72 65 .. print pre
005C90: 74 74 79 27 64 20 71 75 65 73 74 69 6F 6E 00 07 tty'd question..
005CA0: 00 3A 02 01 C0 00 1B 00 44 02 9E 20 0D 00 00 E9 .:......D.. ....
005CB0: EF 0F 20 EC 20 0D 00 00 6E 75 6D 71 75 65 73 F4 .. . ...numques.
005CC0: 00 17 00 4E 02 03 00 00 E1 EF 03 01 80 00 00 71 ...N...........q
005CD0: 75 65 F3 28 0D 00 00 E9 29 00 23 00 58 02 A9 20 ue.(....).#.X..
005CE0: 23 0F 2C 10 2C 0D 00 00 E9 F6 10 F5 0F 20 20 01 #.,.,........ .
005CF0: C0 20 73 65 74 20 63 75 72 73 6F 72 00 1D 00 62 . set cursor...b
005D00: 02 A1 20 03 00 00 E1 EF 22 54 22 20 EB 20 03 00 .. ....."T" . ..
005D10: 00 E1 EF 22 54 72 75 65 22 00 1E 00 6C 02 A1 20 ..."True"...l..
005D20: 03 00 00 E1 EF 22 46 22 20 EB 20 03 00 00 E1 EF ....."F" . .....
005D30: 22 46 61 6C 73 65 22 00 38 00 76 02 BF 20 23 0F "False".8.v.. #.
005D40: 2C 22 28 22 3B FF 03 28 0D 00 00 E9 F4 19 40 29 ,"(";..(......@)
005D50: 3B 22 29 20 22 3B 20 01 C0 20 50 72 69 6E 74 20 ;") "; .. Print
005D60: 71 75 65 73 74 69 6F 6E 20 6E 75 6D 62 65 72 00 question number.
005D70: 0C 00 80 02 D8 20 E7 20 0E 2C 0F 00 0A 00 8A 02 ..... . .,......
005D80: 9F 20 1E 14 05 00 0C 00 94 02 D8 20 E7 20 0E 2C . ......... . .,
005D90: 0F 00 0B 00 9E 02 B0 20 0D 00 00 E9 00 07 00 A8 ....... ........
005DA0: 02 01 C0 00 12 00 B2 02 01 C0 20 47 65 74 20 61 .......... Get a
005DB0: 6E 73 77 65 72 00 07 00 BC 02 01 C0 00 1C 00 C6 nswer...........
005DC0: 02 03 00 00 E1 EF FF 43 01 A1 20 03 00 58 46 00 .......C.. ..XF.
005DD0: E1 EF 22 22 20 A0 20 1E C6 02 00 3D 00 D0 02 03 .."" . ....=....
005DE0: 00 00 E1 EF FF 1C 28 03 00 00 E1 29 01 A1 20 03 ......(....).. .
005DF0: 00 00 E1 F1 22 41 22 20 FC 20 03 00 00 E1 EE FF ...."A" . ......
005E00: 03 28 19 40 F4 0D 00 00 6E 75 6D 71 75 65 73 F4 .(.@....numques.
005E10: 29 20 A0 20 1E C6 02 00 2A 00 DA 02 0D 00 00 41 ) . ....*......A
005E20: 4E 53 4E 55 CD EF 28 FF 01 28 03 00 00 C1 29 F5 NSNU..(..(....).
005E30: 19 40 29 01 0D 00 00 6C 69 6E 65 6C 65 EE EF 19 .@)....linele...
005E40: 24 00 2F 00 E4 02 A9 20 23 0F 2C 11 2C 0D 00 00 $./.... #.,.,...
005E50: 41 4E 53 4E 55 CD F6 10 F5 0F 01 BB 23 0F 2C 0E ANSNU.......#.,.
005E60: 01 BF 23 0F 2C 03 00 00 C1 3B 01 BB 23 0F 2C 0F ..#.,....;..#.,.
005E70: 00 22 00 EE 02 01 C0 20 68 69 67 68 6C 69 67 68 ."..... highligh
005E80: 74 73 20 73 65 6C 65 63 74 65 64 20 61 6E 73 77 ts selected answ
005E90: 65 72 00 2C 00 F8 02 0D 00 00 70 6F 69 6E 74 F3 er.,......point.
005EA0: EF 0E 01 A1 20 03 00 00 E1 EF 03 00 00 61 6E F3 .... ........an.
005EB0: 20 EB 20 0D 00 00 70 6F 69 6E 74 F3 EF 0F 00 20 . ...point....
005EC0: 00 02 03 0D 00 00 73 63 6F 72 E5 EF 0D 00 00 48 ......scor.....H
005ED0: FC 73 63 6F 72 E5 F4 0D 00 00 70 6F 69 6E 74 F3 .scor.....point.
005EE0: 00 1C 00 0C 03 9F 20 1E 64 05 20 01 C0 20 70 72 ...... .d. .. pr
005EF0: 69 6E 74 20 72 65 73 70 6F 6E 73 65 00 3A 00 16 int response.:..
005F00: 03 A9 20 23 0F 2C 16 2C 19 11 F5 0D 00 00 70 74 .. #.,.,......pt
005F10: 79 6C 69 6E 65 F3 01 BF 23 0F 2C 22 50 72 65 73 yline...#.,"Pres
005F20: 73 20 53 50 41 43 45 20 74 6F 20 63 6F 6E 74 69 s SPACE to conti
005F30: 6E 75 65 22 20 20 00 25 00 20 03 03 00 00 C9 EF nue" .%. ......
005F40: 22 22 20 01 20 D6 20 03 00 00 C9 EF 22 22 01 20 "" . . ....."".
005F50: 03 00 00 C9 EF FF 43 20 01 20 D5 00 2D 00 2A 03 ......C . ..-.*.
005F60: A1 20 03 00 00 C9 EF 03 00 00 54 C2 20 EB 20 0D . ........T. . .
005F70: 00 00 6C 69 6E 65 6C 65 EE EF 19 21 01 9F 20 1E ..linele...!.. .
005F80: 56 04 01 A0 20 1E 08 02 00 15 00 34 03 A1 20 03 V... ......4.. .
005F90: 00 00 C9 F2 22 20 22 20 A0 20 1E 20 03 00 1E 00 ...." " . . ....
005FA0: 3E 03 0D 00 00 71 75 65 73 74 69 6F EE EF 0D 00 >....questio....
005FB0: 00 71 75 65 73 74 69 6F EE F4 0F 00 0A 00 48 03 .questio......H.
005FC0: A0 20 1E 86 01 00 07 00 52 03 01 C0 00 18 00 5C . ......R......\
005FD0: 03 78 48 FF FF FF FF 11 88 09 B3 04 B3 04 FF 04 .xH.............
005FE0: 7F 09 02 10 08 10 00 07 01 00 2C 53 41 54 34 00 ..........,SAT4.
005FF0: 00 00 00 00 00 00 00 00 00 00 00 02 00 00 00 08 ................
006000: 70 09 00 19 16 00 00 00 00 00 00 00 00 00 00 00 p...............
006010: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006020: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006030: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006040: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006050: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006060: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006080: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006090: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0060A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0060B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0060C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0060D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0060E0: 00 00 00 00 00 00 00 00 00 00 00 FE F9 FF FF FF ................
0060F0: FF 11 88 09 B3 04 B3 04 00 05 80 09 02 10 08 79 ...............y
006100: 0A 15 08 00 16 01 C0 20 45 6E 64 20 71 75 69 7A ....... End quiz
006110: 20 72 6F 75 74 69 6E 65 00 07 00 66 03 01 C0 00 routine...f....
006120: 0D 00 70 03 A9 20 23 0F 2C 16 2C 15 00 36 00 7A ..p.. #.,.,..6.z
006130: 03 BF 20 23 0F 2C 22 59 6F 75 20 73 63 6F 72 65 .. #.,"You score
006140: 64 22 3B 0D 00 00 73 63 6F 72 E5 3B 22 6F 75 74 d";...scor.;"out
006150: 20 6F 66 22 3B 0D 00 00 71 75 65 73 74 69 6F EE of";...questio.
006160: F5 0F 00 33 00 84 03 A9 20 23 0F 2C 12 2C 19 0A ...3.... #.,.,..
006170: 01 BF 23 0F 2C 22 50 72 65 73 73 20 53 50 41 43 ..#.,"Press SPAC
006180: 45 20 74 6F 20 72 75 6E 20 74 68 65 20 70 72 6F E to run the pro
006190: 67 72 61 6D 22 00 31 00 8E 03 A9 20 23 0F 2C 13 gram".1.... #.,.
0061A0: 2C 19 0C 01 BF 23 0F 2C 22 61 67 61 69 6E 2C 20 ,....#.,"again,
0061B0: 20 6F 72 20 45 53 43 2F 45 53 43 20 74 6F 20 66 or ESC/ESC to f
0061C0: 69 6E 69 73 68 22 00 11 00 98 03 D6 20 FF 43 F2 inish"...... .C.
0061D0: 22 20 22 01 D5 01 CA 00 07 00 A2 03 01 C0 00 20 " "............
0061E0: 00 AC 03 01 C0 20 49 6E 74 65 72 63 65 70 74 20 ..... Intercept
0061F0: 45 53 43 41 50 45 20 72 6F 75 74 69 6E 65 00 07 ESCAPE routine..
006200: 00 B6 03 01 C0 6A 6B 00 1F 00 C0 03 AD 20 0F 20 .....jk...... .
006210: 01 82 20 0F 20 01 20 A2 20 0E 2C 0F 20 01 20 A2 .. . . . .,. . .
006220: 20 0F 2C 19 19 20 00 21 00 CA 03 BA 20 0E 01 20 .,.. .!.... ..
006230: BB 20 0F 20 01 C0 20 72 65 73 74 6F 72 65 20 64 . . .. restore d
006240: 65 66 61 75 6C 74 73 00 06 00 D4 03 98 00 07 00 efaults.........
006250: DE 03 01 C0 00 1A 00 E8 03 01 C0 20 49 6E 69 74 ........... Init
006260: 69 61 6C 69 73 65 20 77 69 6E 64 6F 77 73 00 07 ialise windows..
006270: 00 F2 03 01 C0 00 12 00 FC 03 BA 20 23 11 2C 10 ........... #.,.
006280: 20 01 20 8A 20 23 11 00 3D 00 06 04 D8 20 23 0E . . #..=.... #.
006290: 2C 10 2C 19 27 2C 10 2C 12 F4 0D 00 00 70 74 79 ,.,.',.,.....pty
0062A0: 6C 69 6E 65 F3 20 01 20 D8 20 23 0F 2C 10 2C 19 line. . . #.,.,.
0062B0: 27 2C 14 F4 0D 00 00 70 74 79 6C 69 6E 65 F3 2C ',.....ptyline.,
0062C0: 19 18 20 20 00 0E 00 10 04 BA 20 0E 01 BB 20 0F .. ...... ... .
0062D0: 01 8A 00 12 00 1A 04 BA 20 23 0F 2C 11 20 01 20 ........ #.,. .
0062E0: 8A 20 23 0F 00 3C 00 24 04 D8 20 23 0E 2C 14 2C . #..<.$.. #.,.,
0062F0: 19 26 2C 11 2C 12 F4 0D 00 00 70 74 79 6C 69 6E .&,.,.....ptylin
006300: 65 F3 20 01 20 D8 20 16 89 23 0F 2C 11 2C 19 26 e. . . ..#.,.,.&
006310: 2C 15 F4 0D 00 00 70 74 79 6C 69 6E 65 F3 2C 19 ,.....ptyline.,.
006320: 17 20 00 06 00 2E 04 C9 00 07 00 38 04 01 C0 00 . .........8....
006330: 26 00 42 04 01 C0 20 72 65 61 64 73 20 61 20 73 &.B... reads a s
006340: 74 72 69 6E 67 20 2B 20 70 72 65 74 74 79 20 70 tring + pretty p
006350: 72 69 6E 74 73 00 0B 00 4C 04 C3 20 03 00 00 F1 rints...L.. ....
006360: 00 0E 00 56 04 03 00 00 E1 EF 03 00 00 F1 00 15 ...V............
006370: 00 60 04 0D 00 00 70 72 65 74 74 79 6C 69 6E 65 .`....prettyline
006380: F3 EF 0E 00 0A 00 6A 04 9F 20 1E 9C 04 00 06 00 ......j.. ......
006390: 74 04 C9 00 07 00 7E 04 01 C0 00 26 00 88 04 01 t.....~....&....
0063A0: C0 20 53 65 74 20 75 70 20 73 74 72 69 6E 67 20 . Set up string
0063B0: 66 6F 72 20 70 72 65 74 74 79 20 70 72 69 6E 74 for pretty print
0063C0: 00 07 00 92 04 01 C0 00 16 00 9C 04 0D 00 00 50 ...............P
0063D0: 54 D2 EF 0D 00 00 4C 49 4E 45 4C 45 CE 00 18 00 T.....LINELE....
0063E0: A6 04 D6 20 FF 0E 28 03 00 00 E1 29 20 EE 20 0D ... ..(....) . .
0063F0: 00 00 50 54 D2 00 1D 00 B0 04 20 20 D6 20 AC 28 ..PT...... . .(
006400: 03 00 00 E1 2C 0D 00 00 50 2E 7E 54 D2 2C 0F 29 ....,...P.~T.,.)
006410: F2 22 20 22 00 18 00 BA 04 20 20 20 20 0D 00 00 ." "..... ...
006420: 50 54 D2 EF 0D 00 00 50 54 D2 F5 0F 00 0A 00 C4 PT.....PT.......
006430: 04 20 20 20 20 D5 00 1F 00 CE 04 20 20 AC 28 03 . ...... .(.
006440: 00 00 E1 2C 0D 00 00 50 54 D2 2C 0F 29 EF FF 03 ...,...PT.,.)...
006450: 28 1C FE 00 29 00 41 00 D8 04 20 20 0D 00 00 50 (...).A... ...P
006460: 54 D2 EF 0D 00 00 50 54 D2 F4 0D 00 00 4C 49 4E T.....PT.....LIN
006470: 45 4C 45 CE 20 01 20 0D 00 00 70 72 65 74 74 79 ELE. . ...pretty
006480: 6C 69 6E 65 F3 EF 0D 00 00 70 72 65 74 74 79 6C line.....prettyl
006490: 69 6E 65 F3 F4 0F 00 08 00 E2 04 20 20 D5 00 06 ine........ ...
0064A0: 00 EC 04 C9 00 07 00 F6 04 01 C0 00 35 00 00 05 ............5...
0064B0: 01 C0 20 53 75 62 72 6F 75 74 69 6E 65 20 74 6F .. Subroutine to
0064C0: 20 70 72 69 6E 74 20 61 24 20 77 69 74 68 20 43 print a$ with C
0064D0: 48 52 24 28 26 46 45 29 20 61 73 20 43 52 4C 46 HR$(&FE) as CRLF
0064E0: 00 07 00 0A 05 01 C0 00 18 00 14 05 9E 20 0D 00 ............. ..
0064F0: 00 F8 EF 0F 20 EC 20 FF 0E 28 03 00 00 E1 29 00 .... . ..(....).
006500: 18 00 1E 05 03 00 00 E2 EF AC 28 B6 26 03 00 00 ..........(.&...
006510: E1 2C 0D 00 00 F8 2C 0F 29 00 21 00 28 05 A1 20 .,....,.).!.(..
006520: 03 00 00 E2 EF FF 03 28 1C FE 00 29 EB 20 BF 20 .......(...). .
006530: 01 97 20 BF 20 03 00 00 E2 3B 00 0B 00 32 05 B0 .. . ....;...2..
006540: 20 0D 00 00 F8 00 06 00 3C 05 C9 00 07 00 46 05 .......<.....F.
006550: 01 C0 00 15 00 50 05 01 C0 20 50 72 69 6E 74 20 .....P... Print
006560: 63 6F 6D 6D 65 6E 74 00 07 00 5A 05 01 C0 00 1A comment...Z.....
006570: 00 64 05 CC 20 0F 2C 1A DC 05 F5 0D 00 00 70 6F .d.. .,.......po
006580: 69 6E 74 F3 F6 1A AA 05 00 26 00 6E 05 D8 20 E7 int......&.n.. .
006590: 20 0E 2C 0F 20 01 C0 20 72 6F 75 74 69 6E 65 20 .,. .. routine
0065A0: 6E 65 65 64 73 20 77 69 6E 64 6F 77 20 30 00 1E needs window 0..
0065B0: 00 78 05 03 00 00 E1 20 EF 20 03 00 00 45 52 4F .x..... . ...ERO
0065C0: D2 28 0D 00 00 41 4E 53 4E 55 CD 29 00 20 00 82 .(...ANSNU.). ..
0065D0: 05 9F 20 1E 9C 04 20 01 C0 20 70 72 65 74 74 79 .. ... .. pretty
0065E0: 20 75 70 20 72 65 73 70 6F 6E 73 65 00 37 00 8C up response.7..
0065F0: 05 A9 20 0F 2C 28 0F F4 0D 00 00 6E 75 6D 71 75 .. .,(.....numqu
006600: 65 73 F4 29 F6 10 20 01 C0 20 73 65 74 6E 3F 20 es.).. .. setn?
006610: 63 75 72 73 6F 72 20 66 6F 72 20 72 65 73 70 6F cursor for respo
006620: 6E 73 65 20 20 00 23 00 96 05 9F 20 1E 14 05 20 nse .#.... ...
006630: 01 C0 20 50 72 69 6E 74 20 70 72 65 74 74 79 20 .. Print pretty
006640: 72 65 73 70 6F 6E 73 65 00 10 00 A0 05 D8 20 E7 response...... .
006650: 20 0E 2C 0F 20 01 20 C9 00 07 00 AA 05 01 C0 00 .,. . .........
006660: 29 00 B4 05 A9 20 0F 2C 28 10 F4 0D 00 00 6E 75 ).... .,(.....nu
006670: 6D 71 75 65 73 F4 29 F6 10 F5 0D 00 00 70 72 65 mques.)......pre
006680: 74 74 79 6C 69 6E 65 F3 00 22 00 BE 05 9F 20 1E ttyline..".... .
006690: 14 05 20 01 C0 20 50 72 69 6E 74 20 61 6C 74 65 .. .. Print alte
0066A0: 72 65 64 20 73 74 72 69 6E 67 00 10 00 C8 05 D8 red string......
0066B0: 20 E7 20 0E 2C 0F 20 01 20 C9 00 07 00 D2 05 01 . .,. . .......
0066C0: C0 00 1A 00 DC 05 01 C0 20 44 61 74 61 20 66 6F ........ Data fo
0066D0: 72 20 71 75 65 73 74 69 6F 6E 73 00 0F 00 E6 05 r questions.....
0066E0: 01 C0 20 46 6F 72 6D 61 74 3A 00 18 00 F0 05 01 .. Format:......
0066F0: C0 20 48 65 61 64 69 6E 67 20 66 6F 72 20 54 65 . Heading for Te
006700: 73 74 00 1A 00 FA 05 01 C0 20 46 6F 72 20 65 B3 st....... For e.
006710: 44 61 63 68 20 71 75 65 73 74 69 6F 6E 3A 00 18 Dach question:..
006720: 00 04 06 01 C0 20 20 20 20 51 75 65 73 74 69 6F ..... Questio
006730: 6E 20 74 65 78 74 00 20 00 0E 06 01 C0 20 20 20 n text. .....
006740: 20 4E 75 6D 62 65 72 20 6F 66 20 61 6E 73 77 65 Number of answe
006750: 72 73 20 28 4E 29 00 39 00 18 06 01 C0 20 20 20 rs (N).9.....
006760: 20 54 65 78 74 20 6F 66 20 65 61 63 68 20 61 6E Text of each an
006770: 73 77 65 72 20 28 20 6D 75 73 74 20 62 65 20 4E swer ( must be N
006780: 20 69 74 65 6D 73 20 6F 66 20 74 65 78 74 29 00 items of text).
006790: 33 00 22 06 01 C0 20 20 20 20 43 6F 72 72 65 63 3."... Correc
0067A0: 74 20 61 6E 73 77 65 72 20 28 41 2D 46 29 20 20 t answer (A-F)
0067B0: 77 68 65 72 65 20 41 3D 31 2C 42 3D 32 20 65 74 where A=1,B=2 et
0067C0: 63 2E 00 3F 00 2C 06 01 C0 20 20 20 20 54 65 78 c..?.,... Tex
0067D0: 74 20 66 6F 72 20 65 61 63 68 20 61 6E 73 77 65 t for each answe
0067E0: 72 20 69 6E 20 73 61 6D 65 20 6F 72 64 65 72 20 r in same order
0067F0: 28 6D 75 73 74 20 62 65 20 4E 20 69 74 65 6D 73 (must be N items
006800: 29 00 1C 00 36 06 01 C0 20 41 66 74 65 72 20 61 )...6... After a
006810: 6C FD 0C 6C 20 71 75 65 73 74 69 6F 6E 73 3A 00 l..l questions:.
006820: 28 00 40 06 01 C0 20 22 20 20 20 20 20 20 20 20 (.@... "
006830: 20 45 6E 64 20 6F 66 20 54 65 73 74 22 20 28 65 End of Test" (e
006840: 78 61 63 74 6C 79 29 00 07 00 4A 06 01 C0 00 25 xactly)...J....%
006850: 00 54 06 8C 20 22 53 65 6C 66 20 41 73 73 65 73 .T.. "Self Asses
006860: 73 6D 65 6E 74 20 54 65 73 74 20 2D 20 43 68 2E sment Test - Ch.
006870: 20 34 22 00 07 00 5E 06 01 C0 00 5A 00 68 06 8C 4"...^....Z.h..
006880: 20 22 57 68 61 74 20 69 73 20 74 68 65 20 72 65 "What is the re
006890: 73 75 6C 74 20 6F 66 20 74 68 65 20 66 6F 6C 6C sult of the foll
0068A0: 6F 77 69 6E 67 20 73 74 61 74 65 6D 65 6E 74 20 owing statement
0068B0: 77 68 65 6E 20 78 3D 31 20 20 20 20 46 4F 52 20 when x=1 FOR
0068C0: 61 3D 2D 31 30 20 54 4F 20 2D 32 30 20 53 54 45 a=-10 TO -20 STE
0068D0: 50 20 78 22 00 20 00 72 06 8C 20 34 2C 22 31 30 P x". .r.. 4,"10
0068E0: 20 73 74 65 70 73 20 61 72 65 20 65 78 65 63 75 steps are execu
0068F0: 74 65 64 22 00 1E 00 7C 06 8C 20 22 31 31 20 73 ted"...|.. "11 s
006900: 74 65 70 73 20 61 72 65 20 65 78 65 63 75 74 65 teps are execute
006910: 64 22 00 C1 77 FF FF FF FF 11 84 09 B3 04 B3 04 d"..w...........
006920: FD 04 81 09 02 10 08 0F 00 07 01 00 2C 53 41 54 ............,SAT
006930: 34 00 00 00 00 00 00 00 00 00 00 00 00 03 FF 00 4...............
006940: 19 06 70 11 00 19 16 00 00 00 00 00 00 00 00 00 ..p.............
006950: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006960: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006970: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006980: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006990: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0069A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0069B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0069C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0069D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0069E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0069F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006A00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006A10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
006A20: 00 00 00 00 00 00 00 00 00 00 00 00 00 F8 A4 FF ................
006A30: FF FF FF 11 85 09 EA 04 7C 04 FF 04 7F 09 02 10 ........|.......
006A40: 08 01 25 13 07 00 16 36 00 86 06 8C 20 22 54 68 ..%....6.... "Th
006A50: 65 20 70 72 6F 67 72 61 6D 20 73 6B 69 70 73 20 e program skips
006A60: 74 6F 20 74 68 65 20 4E 45 58 54 20 78 20 20 20 to the NEXT x
006A70: 20 20 73 74 61 74 65 6D 65 6E 74 22 00 27 00 90 statement".'..
006A80: 06 8C 20 22 54 68 65 20 6C 6F 6F 70 20 69 73 20 .. "The loop is
006A90: 65 78 65 63 75 74 65 64 20 6F 6E 63 65 20 6F 6E executed once on
006AA0: 6C 79 22 00 1E 00 9A 06 8C 20 43 2C 22 4E 6F 2C ly"...... C,"No,
006AB0: 20 74 68 65 20 61 6E 73 77 65 72 20 69 73 20 43 the answer is C
006AC0: 22 00 1C 00 A4 06 8C 20 22 4E 6F 2C 20 74 68 65 "...... "No, the
006AD0: 20 61 6E 73 77 65 72 20 69 73 20 43 22 00 10 00 answer is C"...
006AE0: AE 06 8C 20 22 43 6F 72 72 65 63 74 22 00 1E 00 ... "Correct"...
006AF0: B8 06 8C 20 22 4E 6F 2C 20 74 68 65 20 61 6E 73 ... "No, the ans
006B00: 77 65 72 20 69 73 20 43 22 20 20 00 07 00 C2 06 wer is C" .....
006B10: 01 C0 00 60 00 CC 06 8C 20 22 57 68 61 74 20 69 ...`.... "What i
006B20: 73 20 74 68 65 20 76 61 6C 75 65 20 6F 66 20 71 s the value of q
006B30: 20 61 66 74 65 72 20 74 68 69 73 20 6C 6F 6F 70 after this loop
006B40: 20 68 61 73 20 62 65 2F E1 65 6E 20 65 78 65 63 has be/.en exec
006B50: 75 74 65 64 3F 20 20 20 46 4F 52 20 71 3D 2D 30 uted? FOR q=-0
006B60: 2E 35 20 54 4F 20 31 2E 37 20 53 54 45 50 20 30 .5 TO 1.7 STEP 0
006B70: 2E 35 22 20 00 16 00 D6 06 8C 20 33 2C 32 2E 30 .5" ...... 3,2.0
006B80: 2C 31 2E 37 2C 31 2E 35 2C 41 00 33 00 E0 06 8C ,1.7,1.5,A.3....
006B90: 20 22 43 6F 72 72 65 63 74 2C 20 74 68 65 20 66 "Correct, the f
006BA0: 69 72 73 74 20 76 61 6C 75 65 20 6F 75 74 73 69 irst value outsi
006BB0: 64 65 20 74 68 65 20 72 61 6E 67 65 22 00 34 00 de the range".4.
006BC0: EA 06 8C 20 22 4E 6F 2C 20 41 2C 20 74 68 65 20 ... "No, A, the
006BD0: 66 69 72 73 74 20 76 61 6C 75 65 20 6F 75 74 73 first value outs
006BE0: 69 64 65 20 74 68 65 20 72 61 6E 67 65 22 20 20 ide the range"
006BF0: 20 00 34 00 F4 06 8C 20 22 4E 6F 2C 20 41 2C 20 .4.... "No, A,
006C00: 74 68 65 20 66 69 72 73 74 20 76 61 6C 75 65 20 the first value
006C10: 6F 75 74 73 69 64 65 20 74 68 65 20 72 61 6E 67 outside the rang
006C20: 65 22 20 20 20 00 07 00 FE 06 01 C0 00 7C 00 08 e" ........|..
006C30: 07 8C 20 22 48 6F 77 20 6D 61 6E 79 20 74 69 6D .. "How many tim
006C40: 65 73 20 69 73 20 FF 48 65 6E 48 6C 6C 6F FF 20 es is .HenHllo.
006C50: 70 72 69 6E 74 65 64 20 77 68 65 6E 20 74 68 65 printed when the
006C60: 20 66 6F 6C 6C 6F 77 69 6E 67 20 63 6F 64 65 20 following code
006C70: 69 73 20 65 78 65 63 75 74 65 64 3F 20 20 20 7A is executed? z
006C80: 3D 33 3A 57 48 49 4C 45 20 7A 3C 30 3A 20 20 20 =3:WHILE z<0:
006C90: 20 50 52 49 4E 54 20 FF 48 65 6C 6C 6F FF 3A 7A PRINT .Hello.:z
006CA0: 3D 7A 2B 31 3A 57 45 4E 44 22 00 30 00 12 07 8C =z+1:WEND".0....
006CB0: 20 34 2C 33 20 74 69 6D 65 73 2C 34 20 74 69 6D 4,3 times,4 tim
006CC0: 65 73 2C 49 6E 64 65 66 69 6E 69 74 65 6C 79 2C es,Indefinitely,
006CD0: 4E 65 76 65 72 2C 44 20 20 20 00 47 00 1C 07 8C Never,D .G....
006CE0: 20 22 4E 6F 2C 20 74 68 65 20 63 6F 6E 64 69 74 "No, the condit
006CF0: 69 6F 6E 20 69 73 20 6E 65 76 65 72 20 74 72 75 ion is never tru
006D00: 65 2C 20 73 6F 20 74 68 65 20 6C 6F 6F 70 20 69 e, so the loop i
006D10: 73 20 6E 65 76 65 72 20 65 78 65 63 75 74 65 64 s never executed
006D20: 22 00 47 00 26 07 8C 20 22 4E 6F 2C 20 74 68 65 ".G.&.. "No, the
006D30: 20 63 6F 6E 64 69 74 69 6F 6E 20 69 73 20 6E 65 condition is ne
006D40: 76 65 72 20 74 72 75 65 2C 20 73 9A 01 6F 20 74 ver true, s..o t
006D50: 68 65 20 6C 6F 6F 70 20 69 73 20 6E 65 76 65 72 he loop is never
006D60: 20 65 78 65 63 75 74 65 64 22 00 47 00 30 07 8C executed".G.0..
006D70: 20 22 4E 6F 2C 20 74 68 65 20 63 6F 6E 64 69 74 "No, the condit
006D80: 69 6F 6E 20 69 73 20 6E 65 76 65 72 20 74 72 75 ion is never tru
006D90: 65 2C 20 73 6F 20 74 68 65 20 6C 6F 6F 70 20 69 e, so the loop i
006DA0: 73 20 6E 65 76 65 72 20 65 78 65 63 75 74 65 64 s never executed
006DB0: 22 00 31 00 3A 07 8C 20 22 59 65 73 2C 20 62 65 ".1.:.. "Yes, be
006DC0: 63 61 75 73 65 20 74 68 65 20 63 6F 6E 64 69 74 cause the condit
006DD0: 69 6F 6E 20 69 73 20 6E 65 76 65 72 20 74 72 75 ion is never tru
006DE0: 65 22 00 07 00 44 07 01 C0 00 69 00 4E 07 8C 20 e"...D....i.N..
006DF0: 22 57 68 65 6E 20 69 73 20 FF 44 6F 6E 65 FF 20 "When is .Done.
006E00: 70 72 69 6E 74 65 64 20 62 79 20 74 68 69 73 20 printed by this
006E10: 73 74 61 74 65 6D 65 6E 74 3F 20 20 49 46 20 41 statement? IF A
006E20: 3D 35 20 54 48 45 4E 20 50 52 49 4E 54 20 FF 35 =5 THEN PRINT .5
006E30: FF 20 45 4C 53 45 20 50 52 49 4E 54 20 FF 4E 6F . ELSE PRINT .No
006E40: 74 20 35 FF 3A 50 52 49 4E 54 20 FF 44 38 B5 6F t 5.:PRINT .D8.o
006E50: 6E 65 FF 22 00 1F 00 58 07 8C 20 34 2C 22 41 66 ne."...X.. 4,"Af
006E60: 74 65 72 20 FF 35 FF 20 69 73 20 70 72 69 6E 74 ter .5. is print
006E70: 65 64 22 00 21 00 62 07 8C 20 22 41 66 74 65 72 ed".!.b.. "After
006E80: 20 FF 4E 6F 74 20 35 FF 20 69 73 20 70 72 69 6E .Not 5. is prin
006E90: 74 65 64 22 00 28 00 6C 07 8C 20 22 57 68 65 6E ted".(.l.. "When
006EA0: 20 FF 35 FF 20 6F 72 20 FF 4E 6F 74 20 35 FF 20 .5. or .Not 5.
006EB0: 61 72 65 20 70 72 69 6E 74 65 64 22 00 10 00 76 are printed"...v
006EC0: 07 8C 20 22 4E 65 76 65 72 22 2C 42 00 44 00 80 .. "Never",B.D..
006ED0: 07 8C 20 22 4E 6F 2C 20 74 68 65 20 61 6E 73 77 .. "No, the answ
006EE0: 65 72 20 69 73 20 42 2C 20 74 68 65 20 FF 3A FF er is B, the .:.
006EF0: 20 64 6F 65 73 6E 27 74 20 65 6E 64 20 74 68 65 doesn't end the
006F00: 20 49 46 20 63 6F 6D 6D 61 6E 64 22 20 20 20 20 IF command"
006F10: 00 10 00 8A 07 8C 20 22 43 6F 72 72 65 63 74 22 ...... "Correct"
006F20: 00 44 00 94 07 8C 20 22 4E 6F 2C 20 74 68 65 20 .D.... "No, the
006F30: 61 6E 73 77 65 72 20 69 73 20 42 2C 20 74 68 65 answer is B, the
006F40: 20 FF 3A FF 20 64 6F 65 73 6E 27 74 20 65 6E 0A .:. doesn't en.
006F50: EB 64 20 74 68 65 20 49 46 20 63 6F 6D 6D 61 6E .d the IF comman
006F60: 64 22 20 20 20 20 00 1D 00 9E 07 8C 20 22 4E 6F d" ...... "No
006F70: 2C 20 74 68 65 20 61 6E 73 77 65 72 20 69 73 20 , the answer is
006F80: 42 22 20 00 07 00 A8 07 01 C0 00 52 00 B2 07 8C B" ........R....
006F90: 20 22 55 6E 74 69 6C 20 74 68 65 20 63 6F 6E 64 "Until the cond
006FA0: 69 74 69 6F 6E 20 69 73 20 6E 6F 20 6C 6F 6E 67 ition is no long
006FB0: 65 72 20 74 72 75 65 2C 20 79 6F 75 20 63 61 6E er true, you can
006FC0: 6E 6F 74 20 65 78 69 74 20 66 72 6F 6D 20 61 20 not exit from a
006FD0: 57 48 49 4C 45 20 6C 6F 6F 70 22 20 00 0E 00 BC WHILE loop" ....
006FE0: 07 8C 20 32 2C 54 2C 46 2C 42 00 24 00 C6 07 8C .. 2,T,F,B.$....
006FF0: 20 22 4E 6F 2C 20 79 6F 75 20 63 61 6E 20 65 78 "No, you can ex
007000: 69 74 20 75 73 69 6E 67 20 47 4F 54 4F 22 00 25 it using GOTO".%
007010: 00 D0 07 8C 20 22 59 65 73 2C 20 79 6F 75 20 63 .... "Yes, you c
007020: 61 6E 20 65 78 69 74 20 75 73 69 6E 67 20 47 4F an exit using GO
007030: 54 4F 22 00 07 00 DA 07 01 C0 00 1D 00 E4 07 8C TO".............
007040: 20 22 20 20 20 20 20 20 20 20 20 45 6E 64 20 6F " End o
007050: 66 3D 4F 20 54 65 73 74 22 00 10 00 EE 07 8C 20 f=O Test"......
007060: 31 2C 22 22 2C 41 2C 22 22 00 00 00 00 00 00 00 1,"",A,"".......
007070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007080: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007090: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0070A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0070B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0070C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0070D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0070E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0070F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007100: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007110: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007120: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007130: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007140: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007150: 00 00 00 F9 E5 FF FF FF FF 11 88 09 B3 04 B3 04 ................
007160: FF 04 84 09 02 10 08 10 00 07 01 00 2C 53 41 54 ............,SAT
007170: 36 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 6...............
007180: 00 08 70 01 FF 23 17 00 00 00 00 00 00 00 00 00 ..p..#..........
007190: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0071A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0071B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0071C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0071D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0071E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0071F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007200: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007210: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007220: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007230: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007240: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007250: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007260: 00 00 00 00 00 00 00 00 00 00 00 00 00 7F 26 FF ..............&.
007270: FF FF FF 11 89 09 B3 04 B3 04 00 05 82 09 02 10 ................
007280: 08 7F 0A 15 08 00 16 07 00 64 00 01 C0 00 2C 00 .........d....,.
007290: 6E 00 01 C0 20 53 65 6C 66 20 41 73 73 65 73 73 n... Self Assess
0072A0: 6D 65 6E 74 20 54 65 73 74 73 20 3A 20 42 41 53 ment Tests : BAS
0072B0: 49 43 20 42 6F 6F 6B 20 32 00 07 00 78 00 01 C0 IC Book 2...x...
0072C0: 00 12 00 82 00 01 C0 20 44 41 20 39 2F 31 32 2F ....... DA 9/12/
0072D0: 38 34 00 07 00 8C 00 01 C0 00 18 00 96 00 01 C0 84..............
0072E0: 20 50 72 6F 67 72 61 6D 6D 65 72 73 20 6B 65 79 Programmers key
0072F0: 73 00 07 00 A0 00 01 C0 00 10 00 AA 00 A4 20 0E s............. .
007300: 2C 22 6C 69 73 74 0D 22 00 0F 00 B4 00 A4 20 0F ,"list."...... .
007310: 2C 22 72 75 6E 0D 22 00 3B 00 BE 00 A4 20 10 2C ,"run.".;.... .,
007320: 22 6D 6F 64 65 20 32 3A 70 61 70 65 72 20 30 3A "mode 2:paper 0:
007330: 70 65 6E 20 31 3A 69 6E 6B 20 30 2C 32 33 3A 69 pen 1:ink 0,23:i
007340: 6E 6B 20 31 2C 30 3A 62 6F 72 64 65 72 20 31 33 nk 1,0:border 13
007350: 0D 22 00 15 00 C8 00 A4 20 11 2C 22 72 65 6E 75 ."...... .,"renu
007360: 6D 20 31 30 30 0D 22 00 0C 00 D2 00 A4 20 12 2C m 100."...... .,
007370: 22 FF 22 00 07 00 DC 00 01 C0 00 0C 00 E6 00 B3 ".".............
007380: 20 9F 20 1E C0 03 00 93 32 2C 00 F0 00 01 C0 20 . .....2,.....
007390: 61 72 72 61 79 73 20 65 72 6F 72 24 2C 71 75 65 arrays eror$,que
0073A0: 73 24 20 28 6E 6F 74 20 64 69 6D 65 6E 73 69 6F s$ (not dimensio
0073B0: 6E 65 64 29 00 07 00 FA 00 01 C0 00 0E 00 04 01 ned)............
0073C0: 01 C0 20 53 65 74 2D 75 70 00 07 00 0E 01 01 C0 .. Set-up.......
0073D0: 00 26 00 18 01 AD 20 0F 01 82 20 19 11 01 A2 20 .&.... ... ....
0073E0: 0E 2C 19 13 01 A2 20 0F 2C 0E 01 A2 20 10 2C 0F .,.... .,... .,.
0073F0: 01 A2 20 11 2C 14 00 2D 00 22 01 CF 20 19 FF 2C .. .,..-.".. ..,
007400: 1C 36 00 2C 1C 36 00 2C 1C 36 00 20 01 C0 20 73 .6.,.6.,.6. .. s
007410: 65 74 20 75 70 20 66 61 6B 65 20 22 71 75 6F 74 et up fake "quot
007420: 65 73 22 00 2B 00 2C 01 0D 00 00 73 63 6F 72 E5 es".+.,....scor.
007430: EF 0E 01 0D 00 00 71 75 65 73 74 69 6F EE EF 0F ......questio...
007440: 01 0D 00 00 6C 69 6E 65 6C 65 EE EF 19 21 00 10 ....linele...!..
007450: 00 36 01 03 00 00 54 C2 EF FF 03 28 17 29 00 2A .6....T....(.).*
007460: 00 40 01 9F 20 1E 42 04 20 01 C0 20 72 65 61 64 .@.. .B. .. read
007470: 20 61 20 73 74 72 69 6E 67 20 2B 20 70 72 65 74 a string + pret
007480: 74 79 20 73 65 74 75 70 00 C1 09 1C 00 4A 01 9F ty setup.....J..
007490: 20 1E FC 03 20 01 C0 20 53 65 74 20 75 70 20 77 ... .. Set up w
0074A0: 69 6E 64 6F 77 73 00 2B 00 54 01 9F 20 1E 14 05 indows.+.T.. ...
0074B0: 20 01 C0 20 50 72 69 6E 74 20 73 74 72 69 6E 67 .. Print string
0074C0: 20 72 65 61 64 20 61 73 20 70 72 65 74 74 79 65 read as prettye
0074D0: 64 00 33 00 5E 01 A9 20 23 0F 2C 17 2C 15 01 BF d.3.^.. #.,.,...
0074E0: 23 0F 2C 22 50 72 65 73 73 20 53 50 41 43 45 20 #.,"Press SPACE
0074F0: 74 6F 20 73 74 61 72 74 22 01 D6 20 FF 43 F2 22 to start".. .C."
007500: 20 22 01 D5 00 07 00 68 01 01 C0 00 11 00 72 01 ".....h......r.
007510: 01 C0 20 4D 61 69 6E 20 6C 6F 6F 70 00 07 00 7C .. Main loop...|
007520: 01 01 C0 00 12 00 86 01 0D 00 00 6C 69 6E 65 6C ...........linel
007530: 65 EE EF 19 21 00 2A 00 90 01 9F 20 1E 42 04 20 e...!.*.... .B.
007540: 01 C0 20 72 65 61 64 20 61 20 73 74 72 69 6E 67 .. read a string
007550: 20 2B 20 70 72 65 74 74 79 20 73 65 74 75 70 00 + pretty setup.
007560: 1F 00 9A 01 0D 00 00 70 74 79 6C 69 6E 65 F3 EF .......ptyline..
007570: 0D 00 00 70 72 65 74 74 79 6C 69 6E 65 F3 00 07 ...prettyline...
007580: 00 A4 01 01 C0 00 30 00 AE 01 C3 D9 3E 20 0D 00 ......0.....> ..
007590: 00 6E 75 6D 71 75 65 73 F4 20 20 20 20 20 20 20 .numques.
0075A0: 01 C0 20 6E 75 6D 62 65 72 20 6F 66 20 71 75 65 .. number of que
0075B0: 73 74 69 6F 6E 73 20 00 37 00 B8 01 9E 20 0D 00 stions .7.... ..
0075C0: 00 E9 EF 0F 20 EC 20 0D 00 00 6E 75 6D 71 75 65 .... . ...numque
0075D0: 73 F4 20 01 C0 20 6C 6F 6F 70 20 66 6F 72 20 65 s. .. loop for e
0075E0: 61 63 68 20 71 75 65 73 74 69 6F 6E 20 20 00 14 ach question ..
0075F0: 00 C2 01 C3 20 03 00 00 71 75 65 F3 28 0D 00 00 .... ...que.(...
007600: E9 29 00 0B 00 CC 01 B0 20 0D 00 00 E9 00 27 00 .)...... .....'.
007610: D6 01 C3 20 03 00 00 61 6E F3 20 20 20 20 20 01 ... ...an. .
007620: C0 20 47 65 74 20 63 6F 72 72 65 63 74 20 61 6E . Get correct an
007630: 73 77 65 72 00 3E 00 E0 01 9E 20 0D 00 00 E9 EF swer.>.... .....
007640: 0F 20 EC 20 0D 00 00 6E 75 6D 71 75 65 73 F4 20 . . ...numques.
007650: 01 C0 20 6C 6F 6F 70 20 66 6F 72 20 6E 75 6D 62 .. loop for numb
007660: 65 72 20 6F 66 20 71 75 65 73 74 69 6F 6E 73 20 er of questions
007670: 20 20 00 25 00 EA 01 C3 20 03 00 00 65 72 6F F2 .%.... ...ero.
007680: 28 0D 00 00 E9 29 20 01 C0 20 67 65 74 3E C7 20 (....) .. get>.
007690: 72 65 73 70 6F 6E 73 65 73 00 0B 00 F4 01 B0 20 responses......
0076A0: 0D 00 00 E9 00 07 00 FE 01 01 C0 00 0D 00 08 02 ................
0076B0: 8A 20 01 20 8A 20 23 0F 00 1C 00 12 02 9F 20 1E . . . #....... .
0076C0: FC 03 20 01 C0 20 53 65 74 20 75 70 20 77 69 6E .. .. Set up win
0076D0: 64 6F 77 73 00 30 00 1C 02 A1 20 03 00 00 E1 EF dows.0.... .....
0076E0: 22 20 20 20 20 20 20 20 20 20 45 6E 64 20 6F 66 " End of
0076F0: 20 54 65 73 74 22 20 EB 20 9F 20 1E 14 05 01 A0 Test" . . .....
007700: 20 1E 70 03 00 36 00 26 02 A9 20 23 12 2C 11 F4 .p..6.&.. #.,..
007710: 28 0D 00 00 71 75 65 73 74 69 6F EE F0 19 0A 29 (...questio....)
007720: 2C 11 01 BF 23 12 2C FF 19 28 0D 00 00 71 75 65 ,...#.,..(...que
007730: 73 74 69 6F EE 29 3B 22 2E 22 00 28 00 30 02 9F stio.);".".(.0..
007740: 20 1E 14 05 20 20 20 20 01 C0 20 70 72 69 6E 74 ... .. print
007750: 20 70 72 65 74 74 79 27 64 20 71 75 65 73 74 69 pretty'd questi
007760: 6F 6E 00 07 00 3A 02 01 C0 00 1B 00 44 02 9E 20 on...:......D..
007770: 0D 00 00 E9 EF 0F 20 EC 20 0D 00 00 6E 75 6D 71 ...... . ...numq
007780: 75 65 73 F4 00 17 00 4E 02 03 00 00 E1 EF 03 01 ues....N........
007790: 80 00 00 71 75 65 F3 28 0D 00 00 E9 29 00 23 00 ...que.(....).#.
0077A0: 58 02 A9 20 23 0F 2C 10 2C 0D 00 00 E9 F6 10 F5 X.. #.,.,.......
0077B0: 0F 20 20 01 C0 20 73 65 74 20 63 75 72 73 6F 72 . .. set cursor
0077C0: 00 1D 00 62 02 A1 20 03 00 00 E1 EF 22 54 22 20 ...b.. ....."T"
0077D0: EB 20 03 00 00 E1 EF 22 54 72 75 65 22 00 1E 00 . ....."True"...
0077E0: 6C 02 A1 20 03 00 00 E1 EF 22 46 22 20 EB 20 03 l.. ....."F" . .
0077F0: 00 00 E1 EF 22 46 61 6C 73 65 22 00 38 00 76 02 ...."False".8.v.
007800: BF 20 23 0F 2C 22 28 22 3B FF 03 28 0D 00 00 E9 . #.,"(";..(....
007810: F4 19 40 29 3B 22 29 20 22 3B 20 01 C0 20 50 72 ..@);") "; .. Pr
007820: 69 6E 74 20 71 75 65 73 74 69 6F 6E 20 6E 75 6D int question num
007830: 62 65 72 00 0C 00 80 02 D8 20 E7 20 0E 2C 0F 00 ber...... . .,..
007840: 0A 00 8A 02 9F 20 1E 14 05 00 0C 00 94 02 D8 20 ..... .........
007850: E7 20 0E 2C 0F 00 0B 00 9E 02 B0 20 0D 00 00 E9 . .,....... ....
007860: 00 07 00 A8 02 01 C0 00 12 00 B2 02 01 C0 20 47 .............. G
007870: 65 74 20 61 6E 73 77 65 72 00 07 00 BC 02 01 C0 et answer.......
007880: 00 1C 00 C6 02 03 00 00 E1 EF FF 43 01 A1 20 03 ...........C.. .
007890: 00 58 46 00 E1 EF 22 22 20 A0 20 1E C6 02 00 3D .XF..."" . ....=
0078A0: 00 D0 02 03 00 00 E1 EF FF 1C 28 03 00 00 E1 29 ..........(....)
0078B0: 01 A1 20 03 00 00 E1 F1 22 41 22 20 FC 20 03 00 .. ....."A" . ..
0078C0: 00 E1 EE FF 03 28 19 40 F4 0D 00 00 6E 75 6D 71 .....(.@....numq
0078D0: 75 65 73 F4 29 20 A0 20 1E C6 02 00 2A 00 DA 02 ues.) . ....*...
0078E0: 0D 00 00 41 4E 53 4E 55 CD EF 28 FF 01 28 03 00 ...ANSNU..(..(..
0078F0: 00 C1 29 F5 19 40 29 01 0D 00 00 6C 69 6E 65 6C ..)..@)....linel
007900: 65 EE EF 19 24 00 2F 00 E4 02 A9 20 23 0F 2C 11 e...$./.... #.,.
007910: 2C 0D 00 00 41 4E 53 4E 55 CD F6 10 F5 0F 01 BB ,...ANSNU.......
007920: 23 0F 2C 0E 01 BF 23 0F 2C 03 00 00 C1 3B 01 BB #.,...#.,....;..
007930: 23 0F 2C 0F 00 22 00 EE 02 01 C0 20 68 69 67 68 #.,.."..... high
007940: 6C 69 67 68 74 73 20 73 65 6C 65 63 74 65 64 20 lights selected
007950: 61 6E 73 77 65 72 00 2C 00 F8 02 0D 00 00 70 6F answer.,......po
007960: 69 6E 74 F3 EF 0E 01 A1 20 03 00 00 E1 EF 03 00 int..... .......
007970: 00 61 6E F3 20 EB 20 0D 00 00 70 6F 69 6E 74 F3 .an. . ...point.
007980: EF 0F 00 20 00 02 03 0D 00 00 73 63 6F 72 E5 EF ... ......scor..
007990: 0D 00 00 48 FC 73 63 6F 72 E5 F4 0D 00 00 70 6F ...H.scor.....po
0079A0: 69 6E 74 F3 00 1C 00 0C 03 9F 20 1E 64 05 20 01 int....... .d. .
0079B0: C0 20 70 72 69 6E 74 20 72 65 73 70 6F 6E 73 65 . print response
0079C0: 00 3A 00 16 03 A9 20 23 0F 2C 16 2C 19 11 F5 0D .:.... #.,.,....
0079D0: 00 00 70 74 79 6C 69 6E 65 F3 01 BF 23 0F 2C 22 ..ptyline...#.,"
0079E0: 50 72 65 73 73 20 53 50 41 43 45 20 74 6F 20 63 Press SPACE to c
0079F0: 6F 6E 74 69 6E 75 65 22 20 20 00 25 00 20 03 03 ontinue" .%. ..
007A00: 00 00 C9 EF 22 22 20 01 20 D6 20 03 00 00 C9 EF ...."" . . .....
007A10: 22 22 01 20 03 00 00 C9 EF FF 43 20 01 20 D5 00 "". ......C . ..
007A20: 2D 00 2A 03 A1 20 03 00 00 C9 EF 03 00 00 54 C2 -.*.. ........T.
007A30: 20 EB 20 0D 00 00 6C 69 6E 65 6C 65 EE EF 19 21 . ...linele...!
007A40: 01 9F 20 1E 56 04 01 A0 20 1E 08 02 00 15 00 34 .. .V... ......4
007A50: 03 A1 20 03 00 00 C9 F2 22 20 22 20 A0 20 1E 20 .. ....." " . .
007A60: 03 00 1E 00 3E 03 0D 00 00 71 75 65 73 74 69 6F ....>....questio
007A70: EE EF 0D 00 00 71 75 65 73 74 69 6F EE F4 0F 00 .....questio....
007A80: 0A 00 48 03 A0 20 1E 86 01 00 07 00 52 03 01 C0 ..H.. ......R...
007A90: 00 18 00 5C 03 78 48 FF FF FF FF 11 89 09 B3 04 ...\.xH.........
007AA0: B3 04 FF 04 86 09 02 10 08 10 00 07 01 00 2C 53 ..............,S
007AB0: 41 54 36 00 00 00 00 00 00 00 00 00 00 00 00 02 AT6.............
007AC0: 00 00 00 08 70 09 00 23 17 00 00 00 00 00 00 00 ....p..#........
007AD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007AE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007AF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007B00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007B10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007B20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007B30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007B40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007B50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007B60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007B70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007B80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007B90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
007BA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 DF ................
007BB0: 95 FF FF FF FF 11 88 09 B3 04 B3 04 00 05 82 09 ................
007BC0: 02 10 08 7A 0A 15 08 00 16 01 C0 20 45 6E 64 20 ...z....... End
007BD0: 71 75 69 7A 20 72 6F 75 74 69 6E 65 00 07 00 66 quiz routine...f
007BE0: 03 01 C0 00 0D 00 70 03 A9 20 23 0F 2C 16 2C 15 ......p.. #.,.,.
007BF0: 00 36 00 7A 03 BF 20 23 0F 2C 22 59 6F 75 20 73 .6.z.. #.,"You s
007C00: 63 6F 72 65 64 22 3B 0D 00 00 73 63 6F 72 E5 3B cored";...scor.;
007C10: 22 6F 75 74 20 6F 66 22 3B 0D 00 00 71 75 65 73 "out of";...ques
007C20: 74 69 6F EE F5 0F 00 33 00 84 03 A9 20 23 0F 2C tio....3.... #.,
007C30: 12 2C 19 0A 01 BF 23 0F 2C 22 50 72 65 73 73 20 .,....#.,"Press
007C40: 53 50 41 43 45 20 74 6F 20 72 75 6E 20 74 68 65 SPACE to run the
007C50: 20 70 72 6F 67 72 61 6D 22 00 31 00 8E 03 A9 20 program".1....
007C60: 23 0F 2C 13 2C 19 0C 01 BF 23 0F 2C 22 61 67 61 #.,.,....#.,"aga
007C70: 69 6E 2C 20 20 6F 72 20 45 53 43 2F 45 53 43 20 in, or ESC/ESC
007C80: 74 6F 20 66 69 6E 69 73 68 22 00 11 00 98 03 D6 to finish"......
007C90: 20 FF 43 F2 22 20 22 01 D5 01 CA 00 07 00 A2 03 .C." ".........
007CA0: 01 C0 00 20 00 AC 03 01 C0 20 49 6E 74 65 72 63 ... ..... Interc
007CB0: 65 70 74 20 45 53 43 41 50 45 20 72 6F 75 74 69 ept ESCAPE routi
007CC0: 6E 65 00 07 00 B6 03 01 C0 6A 6B 00 1F 00 C0 03 ne.......jk.....
007CD0: AD 20 0F 20 01 82 20 0F 20 01 20 A2 20 0E 2C 0F . . .. . . . .,.
007CE0: 20 01 20 A2 20 0F 2C 19 19 20 00 21 00 CA 03 BA . . .,.. .!....
007CF0: 20 0E 01 20 BB 20 0F 20 01 C0 20 72 65 73 74 6F .. . . .. resto
007D00: 72 65 20 64 65 66 61 75 6C 74 73 00 06 00 D4 03 re defaults.....
007D10: 98 00 07 00 DE 03 01 C0 00 1A 00 E8 03 01 C0 20 ...............
007D20: 49 6E 69 74 69 61 6C 69 73 65 20 77 69 6E 64 6F Initialise windo
007D30: 77 73 00 07 00 F2 03 01 C0 00 12 00 FC 03 BA 20 ws.............
007D40: 23 11 2C 10 20 01 20 8A 20 23 11 00 3D 00 06 04 #.,. . . #..=...
007D50: D8 20 23 0E 2C 10 2C 19 27 2C 10 2C 12 F4 0D 00 . #.,.,.',.,....
007D60: 00 70 74 79 6C 69 6E 65 F3 20 01 20 D8 20 23 0F .ptyline. . . #.
007D70: 2C 10 2C 19 27 2C 14 F4 0D 00 00 70 74 79 6C 69 ,.,.',.....ptyli
007D80: 6E 65 F3 2C 19 18 20 20 00 0E 00 10 04 BA 20 0E ne.,.. ...... .
007D90: 01 BB 20 0F 01 8A 00 12 00 1A 04 BA 20 23 0F 2C .. ......... #.,
007DA0: 11 20 01 20 8A 20 23 0F 00 3C 00 24 04 D8 20 23 . . . #..<.$.. #
007DB0: 0E 2C 14 2C 19 26 2C 11 2C 12 F4 0D 00 00 70 74 .,.,.&,.,.....pt
007DC0: 79 6C 69 6E 65 F3 20 01 20 D8 20 16 89 23 0F 2C yline. . . ..#.,
007DD0: 11 2C 19 26 2C 15 F4 0D 00 00 70 74 79 6C 69 6E .,.&,.....ptylin
007DE0: 65 F3 2C 19 17 20 00 06 00 2E 04 C9 00 07 00 38 e.,.. .........8
007DF0: 04 01 C0 00 26 00 42 04 01 C0 20 72 65 61 64 73 ....&.B... reads
007E00: 20 61 20 73 74 72 69 6E 67 20 2B 20 70 72 65 74 a string + pret
007E10: 74 79 20 70 72 69 6E 74 73 00 0B 00 4C 04 C3 20 ty prints...L..
007E20: 03 00 00 F1 00 0E 00 56 04 03 00 00 E1 EF 03 00 .......V........
007E30: 00 F1 00 15 00 60 04 0D 00 00 70 72 65 74 74 79 .....`....pretty
007E40: 6C 69 6E 65 F3 EF 0E 00 0A 00 6A 04 9F 20 1E 9C line......j.. ..
007E50: 04 00 06 00 74 04 C9 00 07 00 7E 04 01 C0 00 26 ....t.....~....&
007E60: 00 88 04 01 C0 20 53 65 74 20 75 70 20 73 74 72 ..... Set up str
007E70: 69 6E 67 20 66 6F 72 20 70 72 65 74 74 79 20 70 ing for pretty p
007E80: 72 69 6E 74 00 07 00 92 04 01 C0 00 16 00 9C 04 rint............
007E90: 0D 00 00 50 54 D2 EF 0D 00 00 4C 49 4E 45 4C 45 ...PT.....LINELE
007EA0: CE 00 18 00 A6 04 D6 20 FF 0E 28 03 00 00 E1 29 ....... ..(....)
007EB0: 20 EE 20 0D 00 00 50 54 D2 00 1D 00 B0 04 20 20 . ...PT......
007EC0: D6 20 AC 28 03 00 00 E1 2C 0D 00 00 50 2E 7E 54 . .(....,...P.~T
007ED0: D2 2C 0F 29 F2 22 20 22 00 18 00 BA 04 20 20 20 .,.)." ".....
007EE0: 20 0D 00 00 50 54 D2 EF 0D 00 00 50 54 D2 F5 0F ...PT.....PT...
007EF0: 00 0A 00 C4 04 20 20 20 20 D5 00 1F 00 CE 04 20 ..... ......
007F00: 20 AC 28 03 00 00 E1 2C 0D 00 00 50 54 D2 2C 0F .(....,...PT.,.
007F10: 29 EF FF 03 28 1C FE 00 29 00 41 00 D8 04 20 20 )...(...).A...
007F20: 0D 00 00 50 54 D2 EF 0D 00 00 50 54 D2 F4 0D 00 ...PT.....PT....
007F30: 00 4C 49 4E 45 4C 45 CE 20 01 20 0D 00 00 70 72 .LINELE. . ...pr
007F40: 65 74 74 79 6C 69 6E 65 F3 EF 0D 00 00 70 72 65 ettyline.....pre
007F50: 74 74 79 6C 69 6E 65 F3 F4 0F 00 08 00 E2 04 20 ttyline........
007F60: 20 D5 00 06 00 EC 04 C9 00 07 00 F6 04 01 C0 00 ...............
007F70: 35 00 00 05 01 C0 20 53 75 62 72 6F 75 74 69 6E 5..... Subroutin
007F80: 65 20 74 6F 20 70 72 69 6E 74 20 61 24 20 77 69 e to print a$ wi
007F90: 74 68 20 43 48 52 24 28 26 46 45 29 20 61 73 20 th CHR$(&FE) as
007FA0: 43 52 4C 46 00 07 00 0A 05 01 C0 00 18 00 14 05 CRLF............
007FB0: 9E 20 0D 00 00 F8 EF 0F 20 EC 20 FF 0E 28 03 00 . ...... . ..(..
007FC0: 00 E1 29 00 18 00 1E 05 03 00 00 E2 EF AC 28 B6 ..)...........(.
007FD0: 26 03 00 00 E1 2C 0D 00 00 F8 2C 0F 29 00 21 00 &....,....,.).!.
007FE0: 28 05 A1 20 03 00 00 E2 EF FF 03 28 1C FE 00 29 (.. .......(...)
007FF0: EB 20 BF 20 01 97 20 BF 20 03 00 00 E2 3B 00 0B . . .. . ....;..
008000: 00 32 05 B0 20 0D 00 00 F8 00 06 00 3C 05 C9 00 .2.. .......<...
008010: 07 00 46 05 01 C0 00 15 00 50 05 01 C0 20 50 72 ..F......P... Pr
008020: 69 6E 74 20 63 6F 6D 6D 65 6E 74 00 07 00 5A 05 int comment...Z.
008030: 01 C0 00 1A 00 64 05 CC 20 0F 2C 1A DC 05 F5 0D .....d.. .,.....
008040: 00 00 70 6F 69 6E 74 F3 F6 1A AA 05 00 26 00 6E ..point......&.n
008050: 05 D8 20 E7 20 0E 2C 0F 20 01 C0 20 72 6F 75 74 .. . .,. .. rout
008060: 69 6E 65 20 6E 65 65 64 73 20 77 69 6E 64 6F 77 ine needs window
008070: 20 30 00 1E 00 78 05 03 00 00 E1 20 EF 20 03 00 0...x..... . ..
008080: 00 45 52 4F D2 28 0D 00 00 41 4E 53 4E 55 CD 29 .ERO.(...ANSNU.)
008090: 00 20 00 82 05 9F 20 1E 9C 04 20 01 C0 20 70 72 . .... ... .. pr
0080A0: 65 74 74 79 20 75 70 20 72 65 73 70 6F 6E 73 65 etty up response
0080B0: 00 37 00 8C 05 A9 20 0F 2C 28 0F F4 0D 00 00 6E .7.... .,(.....n
0080C0: 75 6D 71 75 65 73 F4 29 F6 10 20 01 C0 20 73 65 umques.).. .. se
0080D0: 74 6E 3F 20 63 75 72 73 6F 72 20 66 6F 72 20 72 tn? cursor for r
0080E0: 65 73 70 6F 6E 73 65 20 20 00 23 00 96 05 9F 20 esponse .#....
0080F0: 1E 14 05 20 01 C0 20 50 72 69 6E 74 20 70 72 65 ... .. Print pre
008100: 74 74 79 20 72 65 73 70 6F 6E 73 65 00 10 00 A0 tty response....
008110: 05 D8 20 E7 20 0E 2C 0F 20 01 20 C9 00 07 00 AA .. . .,. . .....
008120: 05 01 C0 00 29 00 B4 05 A9 20 0F 2C 28 10 F4 0D ....).... .,(...
008130: 00 00 6E 75 6D 71 75 65 73 F4 29 F6 10 F5 0D 00 ..numques.).....
008140: 00 70 72 65 74 74 79 6C 69 6E 65 F3 00 22 00 BE .prettyline.."..
008150: 05 9F 20 1E 14 05 20 01 C0 20 50 72 69 6E 74 20 .. ... .. Print
008160: 61 6C 74 65 72 65 64 20 73 74 72 69 6E 67 00 10 altered string..
008170: 00 C8 05 D8 20 E7 20 0E 2C 0F 20 01 20 C9 00 07 .... . .,. . ...
008180: 00 D2 05 01 C0 00 1A 00 DC 05 01 C0 20 44 61 74 ............ Dat
008190: 61 20 66 6F 72 20 71 75 65 73 74 69 6F 6E 73 00 a for questions.
0081A0: 0F 00 E6 05 01 C0 20 46 6F 72 6D 61 74 3A 00 18 ...... Format:..
0081B0: 00 F0 05 01 C0 20 48 65 61 64 69 6E 67 20 66 6F ..... Heading fo
0081C0: 72 20 54 65 73 74 00 1A 00 FA 05 01 C0 20 46 6F r Test....... Fo
0081D0: 72 20 65 B3 44 61 63 68 20 71 75 65 73 74 69 6F r e.Dach questio
0081E0: 6E 3A 00 18 00 04 06 01 C0 20 20 20 20 51 75 65 n:....... Que
0081F0: 73 74 69 6F 6E 20 74 65 78 74 00 20 00 0E 06 01 stion text. ....
008200: C0 20 20 20 20 4E 75 6D 62 65 72 20 6F 66 20 61 . Number of a
008210: 6E 73 77 65 72 73 20 28 4E 29 00 39 00 18 06 01 nswers (N).9....
008220: C0 20 20 20 20 54 65 78 74 20 6F 66 20 65 61 63 . Text of eac
008230: 68 20 61 6E 73 77 65 72 20 28 20 6D 75 73 74 20 h answer ( must
008240: 62 65 20 4E 20 69 74 65 6D 73 20 6F 66 20 74 65 be N items of te
008250: 78 74 29 00 33 00 22 06 01 C0 20 20 20 20 43 6F xt).3."... Co
008260: 72 72 65 63 74 20 61 6E 73 77 65 72 20 28 41 2D rrect answer (A-
008270: 46 29 20 20 77 68 65 72 65 20 41 3D 31 2C 42 3D F) where A=1,B=
008280: 32 20 65 74 63 2E 00 3F 00 2C 06 01 C0 20 20 20 2 etc..?.,...
008290: 20 54 65 78 74 20 66 6F 72 20 65 61 63 68 20 61 Text for each a
0082A0: 6E 73 77 65 72 20 69 6E 20 73 61 6D 65 20 6F 72 nswer in same or
0082B0: 64 65 72 20 28 6D 75 73 74 20 62 65 20 4E 20 69 der (must be N i
0082C0: 74 65 6D 73 29 00 1C 00 36 06 01 C0 20 41 66 74 tems)...6... Aft
0082D0: 65 72 20 61 6C FD 0C 6C 20 71 75 65 73 74 69 6F er al..l questio
0082E0: 6E 73 3A 00 28 00 40 06 01 C0 20 22 20 20 20 20 ns:.(.@... "
0082F0: 20 20 20 20 20 45 6E 64 20 6F 66 20 54 65 73 74 End of Test
008300: 22 20 28 65 78 61 63 74 6C 79 29 00 07 00 4A 06 " (exactly)...J.
008310: 01 C0 00 25 00 54 06 8C 20 22 53 65 6C 66 20 41 ...%.T.. "Self A
008320: 73 73 65 73 73 6D 65 6E 74 20 54 65 73 74 20 2D ssessment Test -
008330: 20 43 68 2E 20 36 22 00 07 00 5E 06 01 C0 00 25 Ch. 6"...^....%
008340: 00 68 06 8C 20 22 57 68 61 74 20 69 73 20 74 68 .h.. "What is th
008350: 65 20 76 61 6C 75 65 20 6F 66 20 33 2E 31 32 34 e value of 3.124
008360: 45 35 22 00 3C 00 72 06 8C 20 35 2C 32 39 37 2E E5".<.r.. 5,297.
008370: 35 34 36 36 39 2C 30 2E 30 30 33 33 36 30 38 2C 54669,0.0033608,
008380: 22 33 31 32 2C 34 30 30 22 2C 22 33 31 2C 32 34 "312,400","31,24
008390: 30 22 2C 30 2E 30 30 30 30 33 31 32 34 2C 43 00 0",0.00003124,C.
0083A0: 35 00 7C 06 8C 20 22 4E 6F 2C 20 74 68 65 20 61 5.|.. "No, the a
0083B0: 6E 73 77 65 72 20 69 73 20 43 2C 20 33 2E 31 32 nswer is C, 3.12
0083C0: 34 20 74 69 6D 65 73 20 31 30 30 30 30 30 22 20 4 times 100000"
0083D0: 20 20 20 20 00 35 00 AC 4A FF FF FF FF 11 84 09 .5..J.......
0083E0: B3 04 B3 04 FB 04 7C 09 02 10 08 0F 00 07 01 00 ......|.........
0083F0: 2C 53 41 54 36 00 00 00 00 00 00 00 00 00 00 00 ,SAT6...........
008400: 00 03 FF 00 23 07 70 11 00 23 17 00 00 00 00 00 ....#.p..#......
008410: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008420: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008430: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008440: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008450: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008460: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008470: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008480: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008490: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0084A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0084B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0084C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0084D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0084E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0084F0: 00 22 94 FF FF FF FF 11 84 09 B3 04 B3 04 FE 04 ."..............
008500: 7D 09 02 10 08 18 1F 15 08 00 16 86 06 8C 20 22 }............. "
008510: 4E 6F 2C 20 74 68 65 20 61 6E 73 77 65 72 20 69 No, the answer i
008520: 73 20 43 2C 20 33 2E 31 32 34 20 74 69 6D 65 73 s C, 3.124 times
008530: 20 31 30 30 30 30 30 22 20 20 20 20 20 00 24 00 100000" .$.
008540: 90 06 8C 20 22 43 6F 72 72 65 63 74 2C 20 33 2E ... "Correct, 3.
008550: 31 32 34 20 74 69 6D 65 73 20 31 30 30 30 30 30 124 times 100000
008560: 22 00 35 00 9A 06 8C 20 22 4E 6F 2C 20 74 68 65 ".5.... "No, the
008570: 20 61 6E 73 77 65 72 20 69 73 20 43 2C 20 33 2E answer is C, 3.
008580: 31 32 34 20 74 69 6D 65 73 20 31 30 30 30 30 30 124 times 100000
008590: 22 20 20 20 20 20 00 35 00 A4 06 8C 20 22 4E 6F " .5.... "No
0085A0: 2C 20 74 68 65 20 61 6E 73 77 65 72 20 69 73 20 , the answer is
0085B0: 43 2C 20 33 2E 31 32 34 20 74 69 6D 65 73 20 31 C, 3.124 times 1
0085C0: 30 30 30 30 30 22 20 20 20 20 20 00 07 00 AE 06 00000" .....
0085D0: 01 C0 00 38 00 B8 06 8C 20 22 57 68 69 63 68 20 ...8.... "Which
0085E0: 6F 66 20 74 68 65 20 66 6F 6C 6C 6F 77 69 6E 67 of the following
0085F0: 20 69 73 20 18 6E 6F 74 18 20 61 20 74 72 69 67 is .not. a trig
008600: 20 66 75 6E 63 74 69 6F 6E 22 00 AA 09 1A 00 C2 function"......
008610: 06 8C 20 34 2C 54 41 4E 2C 52 4E 44 2C 43 4F 53 .. 4,TAN,RND,COS
008620: 2C 41 54 4E 2C 42 00 27 00 CC 06 8C 20 22 4E 6F ,ATN,B.'.... "No
008630: 2C 20 74 61 6E 67 65 6E 74 20 69 73 20 61 20 74 , tangent is a t
008640: 72 69 67 20 66 75 6E 63 74 69 6F 6E 22 00 2B 00 rig function".+.
008650: D6 06 8C 20 22 59 65 73 2C 20 72 61 6E 64 6F 6D ... "Yes, random
008660: 20 69 73 20 6E 6F 74 20 61 20 74 72 69 67 20 66 is not a trig f
008670: 75 6E 63 74 69 6F 6E 22 00 26 00 E0 06 8C 20 22 unction".&.... "
008680: 4E 6F 2C 20 63 6F 73 69 6E 65 20 69 73 20 61 20 No, cosine is a
008690: 74 72 69 67 20 66 75 6E 63 74 69 6F 6E 22 00 2A trig function".*
0086A0: 00 EA 06 8C 20 22 4E 6F 2C 20 61 72 63 74 61 6E .... "No, arctan
0086B0: 67 65 6E 74 20 69 73 20 61 20 74 72 69 67 20 66 gent is a trig f
0086C0: 75 6E 63 74 69 6F 6E 22 00 07 00 F4 06 01 C0 00 unction"........
0086D0: 5F 00 FE 06 8C 20 22 49 66 20 61 20 63 61 72 20 _.... "If a car
0086E0: 69 73 20 67 6F 69 6E 67 20 75 70 20 61 20 31 2D is going up a 1-
0086F0: 69 6E 2D 35 20 68 69 6C 6C 2C 20 77 68 61 74 20 in-5 hill, what
008700: 69 73 20 74 68 65 20 74 61 6E 67 65 6E 25 9D 74 is the tangen%.t
008710: 20 6F 66 20 69 74 73 20 61 6E 67 6C 65 20 74 6F of its angle to
008720: 20 74 68 65 20 68 6F 72 69 7A 6F 6E 74 61 6C 22 the horizontal"
008730: 00 25 00 08 07 8C 20 34 2C 34 2E 39 39 39 39 39 .%.... 4,4.99999
008740: 39 39 2C 35 2C 30 2E 31 39 36 31 31 36 31 33 2C 99,5,0.19611613,
008750: 30 2E 32 2C 44 00 4B 00 12 07 8C 20 22 4E 6F 2C 0.2,D.K.... "No,
008760: 20 31 2F 35 20 3D 20 30 2E 32 22 2C 22 4E 6F 2C 1/5 = 0.2","No,
008770: 20 31 2F 35 20 3D 20 30 2E 32 22 2C 22 4E 6F 2C 1/5 = 0.2","No,
008780: 20 31 2F 35 20 3D 20 30 2E 32 22 2C 22 43 6F 72 1/5 = 0.2","Cor
008790: 72 65 63 74 2C 20 31 2F 35 20 3D 20 30 2E 32 22 rect, 1/5 = 0.2"
0087A0: 00 07 00 1C 07 01 C0 00 80 00 26 07 8C 20 22 55 ..........&.. "U
0087B0: 6E 6C 65 73 73 20 79 6F 75 20 69 6E 63 6C 75 64 nless you includ
0087C0: 65 20 61 20 52 41 44 20 63 6F 6D 6D 61 6E 64 20 e a RAD command
0087D0: 61 74 20 74 68 65 20 62 65 67 69 6E 6E 69 6E 67 at the beginning
0087E0: 20 6F 66 20 61 20 70 72 6F 67 72 61 6D 2C 20 69 of a program, i
0087F0: 74 20 77 69 6C 6C 20 63 61 6C 63 75 6C 61 74 65 t will calculate
008800: 20 65 76 65 72 79 74 68 69 6E 67 20 69 6E 20 69 everything in i
008810: 98 64 65 67 72 65 65 73 2E 20 54 72 75 65 20 6F .degrees. True o
008820: 72 20 66 61 6C 73 65 3F 22 00 59 00 30 07 8C 20 r false?".Y.0..
008830: 32 2C 54 2C 46 2C 42 2C 22 4E 6F 2C 20 65 78 61 2,T,F,B,"No, exa
008840: 63 74 6C 79 20 74 68 65 20 6F 70 70 6F 73 69 74 ctly the opposit
008850: 65 20 69 73 20 74 72 75 65 22 2C 22 43 6F 72 72 e is true","Corr
008860: 65 63 74 2C 20 65 78 61 63 74 6C 79 20 74 68 65 ect, exactly the
008870: 20 6F 70 70 6F 73 69 74 65 20 69 73 20 74 72 75 opposite is tru
008880: 65 22 00 07 00 3A 07 01 C0 00 24 00 44 07 8C 20 e"...:....$.D..
008890: 22 57 68 61 74 20 69 73 20 74 68 65 20 76 61 6C "What is the val
0088A0: 75 65 20 6F 66 20 53 51 52 28 34 29 22 00 15 00 ue of SQR(4)"...
0088B0: 4E 07 8C 20 33 2C 31 2E 34 31 34 2C 32 2C 31 36 N.. 3,1.414,2,16
0088C0: 2C 42 00 42 00 58 07 8C 20 22 4E 6F 2C 20 74 68 ,B.B.X.. "No, th
0088D0: 61 74 20 69 73 20 53 51 52 28 32 29 22 2C 22 43 at is SQR(2)","C
0088E0: 6F 72 72 65 63 74 22 2C 22 4E 6F 2C 20 74 68 61 orrect","No, tha
0088F0: 74 20 69 73 20 34 20 18 73 71 75 61 72 65 64 18 t is 4 .squared.
008900: 22 20 20 20 00 07 00 62 07 01 C0 00 26 00 6C 07 " ...b....&.l.
008910: 8C C7 D9 20 22 57 68 61 74 20 69 73 20 74 68 65 ... "What is the
008920: 20 76 61 6C 75 65 20 6F 66 20 33 2E 31 32 34 45 value of 3.124E
008930: 2D 35 22 00 3A 00 76 07 8C 20 35 2C 32 39 37 2E -5".:.v.. 5,297.
008940: 35 34 36 36 39 2C 30 2E 30 30 33 33 36 30 38 2C 54669,0.0033608,
008950: 22 33 31 32 2C 34 30 30 22 2C 22 33 31 2C 32 34 "312,400","31,24
008960: 30 22 2C 30 2E 30 30 30 30 33 31 32 34 00 3B 00 0",0.00003124.;.
008970: 80 07 8C 20 45 2C 22 4E 6F 2C 20 74 68 65 20 61 ... E,"No, the a
008980: 6E 73 77 65 72 20 69 73 20 45 2C 20 33 2E 31 32 nswer is E, 3.12
008990: 34 20 64 69 76 69 64 65 64 20 62 79 20 31 30 30 4 divided by 100
0089A0: 30 30 30 22 20 20 20 20 00 39 00 8A 07 8C 20 22 000" .9.... "
0089B0: 4E 6F 2C 20 74 68 65 20 61 6E 73 77 65 72 20 69 No, the answer i
0089C0: 73 20 45 2C 20 33 2E 31 32 34 20 64 69 76 69 64 s E, 3.124 divid
0089D0: 65 64 20 62 79 20 31 30 30 30 30 30 22 20 20 20 ed by 100000"
0089E0: 20 00 38 00 94 07 8C 20 22 4E 6F 2C 20 74 68 65 .8.... "No, the
0089F0: 20 61 6E 73 77 65 72 20 69 73 20 45 2C 20 33 2E answer is E, 3.
008A00: 31 32 34 20 64 69 76 69 64 65 64 20 62 79 20 31 124 divided by 1
008A10: 30 30 30 B2 87 30 30 22 20 20 20 00 39 00 9E 07 000..00" .9...
008A20: 8C 20 22 4E 6F 2C 20 74 68 65 20 61 6E 73 77 65 . "No, the answe
008A30: 72 20 69 73 20 45 2C 20 33 2E 31 32 34 20 64 69 r is E, 3.124 di
008A40: 76 69 64 65 64 20 62 79 20 31 30 30 30 30 30 22 vided by 100000"
008A50: 20 20 20 20 00 2F 00 A8 07 8C 20 22 43 6F 72 72 ./.... "Corr
008A60: 65 63 74 2C 20 33 2E 31 32 34 20 64 69 76 69 64 ect, 3.124 divid
008A70: 65 64 20 62 79 20 31 30 30 30 30 30 22 20 20 20 ed by 100000"
008A80: 20 20 20 00 07 00 B2 07 01 C0 00 21 00 BC 07 8C ........!....
008A90: 20 22 57 68 61 74 20 69 73 20 74 68 65 20 76 61 "What is the va
008AA0: 6C 75 65 20 6F 66 20 33 5E 32 22 00 14 00 C6 07 lue of 3^2".....
008AB0: 8C 20 33 2C 31 2E 37 33 32 2C 36 2C 39 2C 43 00 . 3,1.732,6,9,C.
008AC0: 49 00 D0 07 8C 20 22 4E 6F 2C 20 74 68 61 74 20 I.... "No, that
008AD0: 69 73 20 74 68 65 20 73 71 75 61 72 65 20 72 6F is the square ro
008AE0: 6F 74 20 6F 66 20 33 22 2C 22 4E 6F 2C 20 74 68 ot of 3","No, th
008AF0: 65 20 61 6E 73 77 65 72 20 69 73 20 43 22 2C 22 e answer is C","
008B00: 43 6F 72 72 65 63 74 22 00 07 00 DA 07 01 C0 00 Correct"........
008B10: 6D 00 E4 07 8C 5F 30 20 22 49 73 20 74 68 65 20 m...._0 "Is the
008B20: 66 6F 6C 6C 6F 77 69 6E 67 20 6C 69 6E 65 20 6F following line o
008B30: 66 20 42 41 53 49 43 20 61 20 63 6F 72 72 65 63 f BASIC a correc
008B40: 74 20 74 72 61 6E 73 6C 61 74 69 6F 6E 20 6F 66 t translation of
008B50: 20 74 68 65 20 63 6F 73 69 6E 65 20 72 75 6C 65 the cosine rule
008B60: 3F 20 20 61 5E 32 3D 62 5E 32 2B 63 5E 32 2D 28 ? a^2=b^2+c^2-(
008B70: 32 2A 62 2A 63 2A 43 4F 53 28 61 29 29 22 00 11 2*b*c*COS(a))"..
008B80: 00 EE 07 8C 20 32 2C 59 65 73 2C 4E 6F 2C 42 00 .... 2,Yes,No,B.
008B90: 38 00 F8 07 8C 20 22 57 72 6F 6E 67 2C 20 79 6F 8.... "Wrong, yo
008BA0: 75 20 63 61 6E 27 74 20 68 61 76 65 20 61 5E 32 u can't have a^2
008BB0: 20 6F 6E 20 6C 65 66 74 20 6F 66 20 3D 2C 75 73 on left of =,us
008BC0: 65 20 73 71 72 22 20 00 3C 00 02 08 8C 20 22 52 e sqr" .<.... "R
008BD0: 69 67 68 74 2C 20 79 6F 75 20 63 61 6E 27 74 20 ight, you can't
008BE0: 68 61 76 65 20 61 5E 32 20 6F 6E 20 6C 65 66 74 have a^2 on left
008BF0: 20 6F 66 20 3D 2C 75 73 65 20 73 71 72 22 20 20 of =,use sqr"
008C00: 20 20 20 00 07 00 0C 08 01 C0 00 1D 00 16 08 8C .............
008C10: 20 22 20 20 20 20 20 53 54 20 20 20 20 45 6E 64 " ST End
008C20: 20 6F 66 20 54 65 73 74 22 00 10 00 20 08 8C 20 of Test"... ..
008C30: 31 2C 22 22 2C 41 2C 22 22 00 00 00 00 00 00 00 1,"",A,"".......
008C40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008C50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008C60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008C70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008C80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008C90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008CA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008CB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008CC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008CD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008CE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008CF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008D00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008D10: 00 00 00 00 00 00 00 00 00 82 09 FF FF FF FF 11 ................
008D20: 8A 09 B3 04 B3 04 FF 04 85 09 02 10 08 10 00 07 ................
008D30: 01 00 2C 53 41 54 37 00 00 00 00 00 00 00 00 00 ..,SAT7.........
008D40: 00 00 00 01 00 00 00 08 70 01 FF A2 16 00 00 00 ........p.......
008D50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008D60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008D70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008D80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008D90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008DA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008DB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008DC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008DD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008DE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008DF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008E00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008E10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008E20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
008E30: 00 00 00 08 E9 FF FF FF FF 11 87 09 B3 04 B3 04 ................
008E40: FE 04 80 09 02 10 08 7A 0A 15 08 00 16 07 00 64 .......z.......d
008E50: 00 01 C0 00 2C 00 6E 00 01 C0 20 53 65 6C 66 20 ....,.n... Self
008E60: 41 73 73 65 73 73 6D 65 6E 74 20 54 65 73 74 73 Assessment Tests
008E70: 20 3A 20 42 41 53 49 43 20 42 6F 6F 6B 20 32 00 : BASIC Book 2.
008E80: 07 00 78 00 01 C0 00 12 00 82 00 01 C0 20 44 41 ..x.......... DA
008E90: 20 39 2F 31 32 2F 38 34 00 07 00 8C 00 01 C0 00 9/12/84........
008EA0: 18 00 96 00 01 C0 20 50 72 6F 67 72 61 6D 6D 65 ...... Programme
008EB0: 72 73 20 6B 65 79 73 00 07 00 A0 00 01 C0 00 10 rs keys.........
008EC0: 00 AA 00 A4 20 0E 2C 22 6C 69 73 74 0D 22 00 0F .... .,"list."..
008ED0: 00 B4 00 A4 20 0F 2C 22 72 75 6E 0D 22 00 3B 00 .... .,"run.".;.
008EE0: BE 00 A4 20 10 2C 22 6D 6F 64 65 20 32 3A 70 61 ... .,"mode 2:pa
008EF0: 70 65 72 20 30 3A 70 65 6E 20 31 3A 69 6E 6B 20 per 0:pen 1:ink
008F00: 30 2C 32 33 3A 69 6E 6B 20 31 2C 30 3A 62 6F 72 0,23:ink 1,0:bor
008F10: 64 65 72 20 31 33 0D 22 00 15 00 C8 00 A4 20 11 der 13."...... .
008F20: 2C 22 72 65 6E 75 6D 20 31 30 30 0D 22 00 0F 00 ,"renum 100."...
008F30: D2 00 A4 20 12 2C FF 03 28 19 7E 29 00 07 00 DC ... .,..(.~)....
008F40: 00 01 C0 00 0C 00 E6 00 B3 20 9F 20 1E B9 A9 CA ......... . ....
008F50: 03 00 2C 00 F0 00 01 C0 20 61 72 72 61 79 73 20 ..,..... arrays
008F60: 65 72 6F 72 24 2C 71 75 65 73 24 20 28 6E 6F 74 eror$,ques$ (not
008F70: 20 64 69 6D 65 6E 73 69 6F 6E 65 64 29 00 07 00 dimensioned)...
008F80: FA 00 01 C0 00 0E 00 04 01 01 C0 20 53 65 74 2D ........... Set-
008F90: 75 70 00 07 00 0E 01 01 C0 00 26 00 18 01 AD 20 up........&....
008FA0: 0F 01 82 20 19 11 01 A2 20 0E 2C 19 13 01 A2 20 ... .... .,....
008FB0: 0F 2C 0E 01 A2 20 10 2C 0F 01 A2 20 11 2C 14 00 .,... .,... .,..
008FC0: 0B 00 22 01 CF 20 80 20 19 7E 00 2E 00 2C 01 CF ..".. . .~...,..
008FD0: 20 19 7E 2C 1C 36 00 2C 1C 36 00 2C 1C 36 00 20 .~,.6.,.6.,.6.
008FE0: 01 C0 20 73 65 74 20 75 70 20 66 61 6B 65 20 22 .. set up fake "
008FF0: 71 75 6F 74 65 73 22 20 00 2B 00 36 01 0D 00 00 quotes" .+.6....
009000: 73 63 6F 72 E5 EF 0E 01 0D 00 00 71 75 65 73 74 scor.......quest
009010: 69 6F EE EF 0F 01 0D 00 00 6C 69 6E 65 6C 65 EE io.......linele.
009020: EF 19 21 00 10 00 40 01 03 00 00 54 C2 EF FF 03 ..!...@....T....
009030: 28 17 29 00 2A 00 4A 01 9F 20 1E 4C 04 20 01 C0 (.).*.J.. .L. ..
009040: 20 72 65 61 64 20 61 20 73 74 72 69 6E 67 20 79 read a string y
009050: 6A 2B 20 70 72 65 74 74 79 20 73 65 74 75 70 00 j+ pretty setup.
009060: 1C 00 54 01 9F 20 1E 06 04 20 01 C0 20 53 65 74 ..T.. ... .. Set
009070: 20 75 70 20 77 69 6E 64 6F 77 73 00 2B 00 5E 01 up windows.+.^.
009080: 9F 20 1E 1E 05 20 01 C0 20 50 72 69 6E 74 20 73 . ... .. Print s
009090: 74 72 69 6E 67 20 72 65 61 64 20 61 73 20 70 72 tring read as pr
0090A0: 65 74 74 79 65 64 00 33 00 68 01 A9 20 23 0F 2C ettyed.3.h.. #.,
0090B0: 17 2C 15 01 BF 23 0F 2C 22 50 72 65 73 73 20 53 .,...#.,"Press S
0090C0: 50 41 43 45 20 74 6F 20 73 74 61 72 74 22 01 D6 PACE to start"..
0090D0: 20 FF 43 F2 22 20 22 01 D5 00 07 00 72 01 01 C0 .C." ".....r...
0090E0: 00 11 00 7C 01 01 C0 20 4D 61 69 6E 20 6C 6F 6F ...|... Main loo
0090F0: 70 00 07 00 86 01 01 C0 00 12 00 90 01 0D 00 00 p...............
009100: 6C 69 6E 65 6C 65 EE EF 19 21 00 2A 00 9A 01 9F linele...!.*....
009110: 20 1E 4C 04 20 01 C0 20 72 65 61 64 20 61 20 73 .L. .. read a s
009120: 74 72 69 6E 67 20 2B 20 70 72 65 74 74 79 20 73 tring + pretty s
009130: 65 74 75 70 00 1F 00 A4 01 0D 00 00 70 74 79 6C etup........ptyl
009140: 69 6E 65 F3 EF 0D 00 00 70 72 65 74 74 79 6C 69 ine.....prettyli
009150: 6E 69 98 65 F3 00 07 00 AE 01 01 C0 00 30 00 B8 ni.e.........0..
009160: 01 C3 20 0D 00 00 6E 75 6D 71 75 65 73 F4 20 20 .. ...numques.
009170: 20 20 20 20 20 01 C0 20 6E 75 6D 62 65 72 20 6F .. number o
009180: 66 20 71 75 65 73 74 69 6F 6E 73 20 00 37 00 C2 f questions .7..
009190: 01 9E 20 0D 00 00 E9 EF 0F 20 EC 20 0D 00 00 6E .. ...... . ...n
0091A0: 75 6D 71 75 65 73 F4 20 01 C0 20 6C 6F 6F 70 20 umques. .. loop
0091B0: 66 6F 72 20 65 61 63 68 20 71 75 65 73 74 69 6F for each questio
0091C0: 6E 20 20 00 14 00 CC 01 C3 20 03 00 00 71 75 65 n ...... ...que
0091D0: F3 28 0D 00 00 E9 29 00 0B 00 D6 01 B0 20 0D 00 .(....)...... ..
0091E0: 00 E9 00 27 00 E0 01 C3 20 03 00 00 61 6E F3 20 ...'.... ...an.
0091F0: 20 20 20 20 01 C0 20 47 65 74 20 63 6F 72 72 65 .. Get corre
009200: 63 74 20 61 6E 73 77 65 72 00 3E 00 EA 01 9E 20 ct answer.>....
009210: 0D 00 00 E9 EF 0F 20 EC 20 0D 00 00 6E 75 6D 71 ...... . ...numq
009220: 75 65 73 F4 20 01 C0 20 6C 6F 6F 70 20 66 6F 72 ues. .. loop for
009230: 20 6E 75 6D 62 65 72 20 6F 66 20 71 75 65 73 74 number of quest
009240: 69 6F 6E 73 20 20 20 00 25 00 F4 01 C3 20 03 00 ions .%.... ..
009250: 00 65 72 E8 27 6F F2 28 0D 00 00 E9 29 20 01 C0 .er.'o.(....) ..
009260: 20 67 65 74 20 72 65 73 70 6F 6E 73 65 73 00 0B get responses..
009270: 00 FE 01 B0 20 0D 00 00 E9 00 07 00 08 02 01 C0 .... ...........
009280: 00 0D 00 12 02 8A 20 01 20 8A 20 23 0F 00 1C 00 ...... . . #....
009290: 1C 02 9F 20 1E 06 04 20 01 C0 20 53 65 74 20 75 ... ... .. Set u
0092A0: 70 20 77 69 6E 64 6F 77 73 00 30 00 26 02 A1 20 p windows.0.&..
0092B0: 03 00 00 E1 EF 22 20 20 20 20 20 20 20 20 20 45 ....." E
0092C0: 6E 64 20 6F 66 20 54 65 73 74 22 20 EB 20 9F 20 nd of Test" . .
0092D0: 1E 1E 05 01 A0 20 1E 7A 03 00 36 00 30 02 A9 20 ..... .z..6.0..
0092E0: 23 12 2C 11 F4 28 0D 00 00 71 75 65 73 74 69 6F #.,..(...questio
0092F0: EE F0 19 0A 29 2C 11 01 BF 23 12 2C FF 19 28 0D ....),...#.,..(.
009300: 00 00 71 75 65 73 74 69 6F EE 29 3B 22 2E 22 00 ..questio.);".".
009310: 28 00 3A 02 9F 20 1E 1E 05 20 20 20 20 01 C0 20 (.:.. ... ..
009320: 70 72 69 6E 74 20 70 72 65 74 74 79 27 64 20 71 print pretty'd q
009330: 75 65 73 74 69 6F 6E 00 07 00 44 02 01 C0 00 1B uestion...D.....
009340: 00 4E 02 9E 20 0D 00 00 E9 EF 0F 20 EC 20 0D 00 .N.. ...... . ..
009350: 00 6E 75 6D 71 8F 18 75 65 73 F4 00 17 00 58 02 .numq..ues....X.
009360: 03 00 00 E1 EF 03 00 00 71 75 65 F3 28 0D 00 00 ........que.(...
009370: E9 29 00 23 00 62 02 A9 20 23 0F 2C 10 2C 0D 00 .).#.b.. #.,.,..
009380: 00 E9 F6 10 F5 0F 20 20 01 C0 20 73 65 74 20 63 ...... .. set c
009390: 75 72 73 6F 72 00 1D 00 6C 02 A1 20 03 00 00 E1 ursor...l.. ....
0093A0: EF 22 54 22 20 EB 20 03 00 00 E1 EF 22 54 72 75 ."T" . ....."Tru
0093B0: 65 22 00 1E 00 76 02 A1 20 03 00 00 E1 EF 22 46 e"...v.. ....."F
0093C0: 22 20 EB 20 03 00 00 E1 EF 22 46 61 6C 73 65 22 " . ....."False"
0093D0: 00 38 00 80 02 BF 20 23 0F 2C 22 28 22 3B FF 03 .8.... #.,"(";..
0093E0: 28 0D 00 00 E9 F4 19 40 29 3B 22 29 20 22 3B 20 (......@);") ";
0093F0: 01 C0 20 50 72 69 6E 74 20 71 75 65 73 74 69 6F .. Print questio
009400: 6E 20 6E 75 6D 62 65 72 00 0C 00 8A 02 D8 20 E7 n number...... .
009410: 20 0E 2C 0F 00 0A 00 94 02 9F 20 1E 1E 05 00 0C .,....... .....
009420: 00 9E 02 D8 20 E7 20 0E 2C 0F 00 0B 00 A8 02 B0 .... . .,.......
009430: 20 0D 00 00 E9 00 07 00 B2 02 01 C0 00 12 00 BC ...............
009440: 02 01 C0 20 47 65 74 20 61 6E 73 77 65 72 00 07 ... Get answer..
009450: 00 C6 02 01 C0 00 1C 66 76 00 D0 02 03 00 00 E1 .......fv.......
009460: EF FF 43 01 A1 20 03 00 00 E1 EF 22 22 20 A0 20 ..C.. ....."" .
009470: 1E D0 02 00 3D 00 DA 02 03 00 00 E1 EF FF 1C 28 ....=..........(
009480: 03 00 00 E1 29 01 A1 20 03 00 00 E1 F1 22 41 22 ....).. ....."A"
009490: 20 FC 20 03 00 00 E1 EE FF 03 28 19 40 F4 0D 00 . .......(.@...
0094A0: 00 6E 75 6D 71 75 65 73 F4 29 20 A0 20 1E D0 02 .numques.) . ...
0094B0: 00 2A 00 E4 02 0D 00 00 41 4E 53 4E 55 CD EF 28 .*......ANSNU..(
0094C0: FF 01 28 03 00 00 C1 29 F5 19 40 29 01 0D 00 00 ..(....)..@)....
0094D0: 6C 69 6E 65 6C 65 EE EF 19 24 00 2F 00 EE 02 A9 linele...$./....
0094E0: 20 23 0F 2C 11 2C 0D 00 00 41 4E 53 4E 55 CD F6 #.,.,...ANSNU..
0094F0: 10 F5 0F 01 BB 23 0F 2C 0E 01 BF 23 0F 2C 03 00 .....#.,...#.,..
009500: 00 C1 3B 01 BB 23 0F 2C 0F 00 22 00 F8 02 01 C0 ..;..#.,..".....
009510: 20 68 69 67 68 6C 69 67 68 74 73 20 73 65 6C 65 highlights sele
009520: 63 74 65 64 20 61 6E 73 77 65 72 00 2C 00 02 03 cted answer.,...
009530: 0D 00 00 70 6F 69 6E 74 F3 EF 0E 01 A1 20 03 00 ...point..... ..
009540: 00 E1 EF 03 00 00 61 6E F3 20 EB 20 0D 00 00 70 ......an. . ...p
009550: 6F 69 6E 74 F3 EF 0F 00 20 CE FE 00 0C 03 0D 00 oint.... .......
009560: 00 73 63 6F 72 E5 EF 0D 00 00 73 63 6F 72 E5 F4 .scor.....scor..
009570: 0D 00 00 70 6F 69 6E 74 F3 00 1C 00 16 03 9F 20 ...point.......
009580: 1E 6E 05 20 01 C0 20 70 72 69 6E 74 20 72 65 73 .n. .. print res
009590: 70 6F 6E 73 65 00 3A 00 20 03 A9 20 23 0F 2C 16 ponse.:. .. #.,.
0095A0: 2C 19 11 F5 0D 00 00 70 74 79 6C 69 6E 65 F3 01 ,......ptyline..
0095B0: BF 23 0F 2C 22 50 72 65 73 73 20 53 50 41 43 45 .#.,"Press SPACE
0095C0: 20 74 6F 20 63 6F 6E 74 69 6E 75 65 22 20 20 00 to continue" .
0095D0: 25 00 2A 03 03 00 00 C9 EF 22 22 20 01 20 D6 20 %.*......"" . .
0095E0: 03 00 00 C9 EF 22 22 01 20 03 00 00 C9 EF FF 43 ....."". ......C
0095F0: 20 01 20 D5 00 2D 00 34 03 A1 20 03 00 00 C9 EF . ..-.4.. .....
009600: 03 00 00 54 C2 20 EB 20 0D 00 00 6C 69 6E 65 6C ...T. . ...linel
009610: 65 EE EF 19 21 01 9F 20 1E 60 04 01 A0 20 1E 12 e...!.. .`... ..
009620: 02 00 15 00 3E 03 A1 20 03 00 00 C9 F2 22 20 22 ....>.. ....." "
009630: 20 A0 20 1E 2A 03 00 1E 00 48 03 0D 00 00 71 75 . .*....H....qu
009640: 65 73 74 69 6F EE EF 0D 00 00 71 75 65 73 74 69 estio.....questi
009650: 6F EE F4 0F 00 0A 00 52 03 A0 20 81 55 FF FF FF o......R.. .U...
009660: FF 11 85 09 B3 04 B3 04 FE 04 7F 09 02 10 08 0F ................
009670: 00 07 01 00 2C 53 41 54 37 00 00 00 00 00 00 00 ....,SAT7.......
009680: 00 00 00 00 00 02 00 00 00 08 70 09 00 A2 16 00 ..........p.....
009690: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0096A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0096B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0096C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0096D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0096E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0096F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009700: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009710: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009720: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009730: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009740: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009750: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009760: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009770: 00 00 00 00 00 A8 5A FF FF FF FF 11 87 09 B3 04 ......Z.........
009780: B3 04 01 05 84 09 02 10 08 80 0A 15 08 00 16 1E ................
009790: 90 01 00 07 00 5C 03 01 C0 00 18 00 66 03 01 C0 .....\......f...
0097A0: 20 45 6E 64 20 71 75 69 7A 20 72 6F 75 74 69 6E End quiz routin
0097B0: 65 00 07 00 70 03 01 C0 00 0D 00 7A 03 A9 20 23 e...p......z.. #
0097C0: 0F 2C 16 2C 15 00 36 00 84 03 BF 20 23 0F 2C 22 .,.,..6.... #.,"
0097D0: 59 6F 75 20 73 63 6F 72 65 64 22 3B 0D 00 00 73 You scored";...s
0097E0: 63 6F 72 E5 3B 22 6F 75 74 20 6F 66 22 3B 0D 00 cor.;"out of";..
0097F0: 00 71 75 65 73 74 69 6F EE F5 0F 00 33 00 8E 03 .questio....3...
009800: A9 20 23 0F 2C 12 2C 19 0A 01 BF 23 0F 2C 22 50 . #.,.,....#.,"P
009810: 72 65 73 73 20 53 50 41 43 45 20 74 6F 20 72 75 ress SPACE to ru
009820: 6E 20 74 68 65 20 70 72 6F 67 72 61 6D 22 00 31 n the program".1
009830: 00 98 03 A9 20 23 0F 2C 13 2C 19 0C 01 BF 23 0F .... #.,.,....#.
009840: 2C 22 61 67 61 69 6E 2C 20 20 6F 72 20 45 53 43 ,"again, or ESC
009850: 2F 45 53 43 20 74 6F 20 66 69 6E 69 73 68 22 00 /ESC to finish".
009860: 11 00 A2 03 D6 20 FF 43 F2 22 20 22 01 D5 01 CA ..... .C." "....
009870: 00 07 00 AC 03 01 C0 00 20 00 B6 03 01 C0 20 49 ........ ..... I
009880: 6E 74 65 72 63 65 70 74 20 45 53 43 41 50 45 A2 ntercept ESCAPE.
009890: 11 20 72 6F 75 74 69 6E 65 00 07 00 C0 03 01 C0 . routine.......
0098A0: 00 1F 00 CA 03 AD 20 0F 20 01 82 20 0F 20 01 20 ...... . .. . .
0098B0: A2 20 0E 2C 0F 20 01 20 A2 20 0F 2C 19 19 20 00 . .,. . . .,.. .
0098C0: 21 00 D4 03 BA 20 0E 01 20 BB 20 0F 20 01 C0 20 !.... .. . . ..
0098D0: 72 65 73 74 6F 72 65 20 64 65 66 61 75 6C 74 73 restore defaults
0098E0: 00 06 00 DE 03 98 00 07 00 E8 03 01 C0 00 1A 00 ................
0098F0: F2 03 01 C0 20 49 6E 69 74 69 61 6C 69 73 65 20 .... Initialise
009900: 77 69 6E 64 6F 77 73 00 07 00 FC 03 01 C0 00 12 windows.........
009910: 00 06 04 BA 20 23 11 2C 10 20 01 20 8A 20 23 11 .... #.,. . . #.
009920: 00 3D 00 10 04 D8 20 23 0E 2C 10 2C 19 27 2C 10 .=.... #.,.,.',.
009930: 2C 12 F4 0D 00 00 70 74 79 6C 69 6E 65 F3 20 01 ,.....ptyline. .
009940: 20 D8 20 23 0F 2C 10 2C 19 27 2C 14 F4 0D 00 00 . #.,.,.',.....
009950: 70 74 79 6C 69 6E 65 F3 2C 19 18 20 20 00 0E 00 ptyline.,.. ...
009960: 1A 04 BA 20 0E 01 BB 20 0F 01 8A 00 12 00 24 04 ... ... ......$.
009970: BA 20 23 0F 2C 11 20 01 20 8A 20 23 0F 00 3C 00 . #.,. . . #..<.
009980: 2E 04 D8 20 23 0E 2C 14 2C 19 26 2C 11 2C 12 F4 ... #.,.,.&,.,..
009990: 0D 84 07 00 00 70 74 79 6C 69 6E 65 F3 20 01 20 .....ptyline. .
0099A0: D8 20 23 0F 2C 11 2C 19 26 2C 15 F4 0D 00 00 70 . #.,.,.&,.....p
0099B0: 74 79 6C 69 6E 65 F3 2C 19 17 20 00 06 00 38 04 tyline.,.. ...8.
0099C0: C9 00 07 00 42 04 01 C0 00 26 00 4C 04 01 C0 20 ....B....&.L...
0099D0: 72 65 61 64 73 20 61 20 73 74 72 69 6E 67 20 2B reads a string +
0099E0: 20 70 72 65 74 74 79 20 70 72 69 6E 74 73 00 0B pretty prints..
0099F0: 00 56 04 C3 20 03 00 00 F1 00 0E 00 60 04 03 00 .V.. .......`...
009A00: 00 E1 EF 03 00 00 F1 00 15 00 6A 04 0D 00 00 70 ..........j....p
009A10: 72 65 74 74 79 6C 69 6E 65 F3 EF 0E 00 0A 00 74 rettyline......t
009A20: 04 9F 20 1E A6 04 00 06 00 7E 04 C9 00 07 00 88 .. ......~......
009A30: 04 01 C0 00 26 00 92 04 01 C0 20 53 65 74 20 75 ....&..... Set u
009A40: 70 20 73 74 72 69 6E 67 20 66 6F 72 20 70 72 65 p string for pre
009A50: 74 74 79 20 70 72 69 6E 74 00 07 00 9C 04 01 C0 tty print.......
009A60: 00 16 00 A6 04 0D 00 00 50 54 D2 EF 0D 00 00 4C ........PT.....L
009A70: 49 4E 45 4C 45 CE 00 18 00 B0 04 D6 20 FF 0E 28 INELE....... ..(
009A80: 03 00 00 E1 29 20 EE 20 0D 00 00 50 54 D2 00 1D ....) . ...PT...
009A90: 00 BA 04 A9 7D 20 20 D6 20 AC 28 03 00 00 E1 2C ....} . .(....,
009AA0: 0D 00 00 50 54 D2 2C 0F 29 F2 22 20 22 00 18 00 ...PT.,.)." "...
009AB0: C4 04 20 20 20 20 0D 00 00 50 54 D2 EF 0D 00 00 .. ...PT.....
009AC0: 50 54 D2 F5 0F 00 0A 00 CE 04 20 20 20 20 D5 00 PT........ ..
009AD0: 1F 00 D8 04 20 20 AC 28 03 00 00 E1 2C 0D 00 00 .... .(....,...
009AE0: 50 54 D2 2C 0F 29 EF FF 03 28 1C FE 00 29 00 41 PT.,.)...(...).A
009AF0: 00 E2 04 20 20 0D 00 00 50 54 D2 EF 0D 00 00 50 ... ...PT.....P
009B00: 54 D2 F4 0D 00 00 4C 49 4E 45 4C 45 CE 20 01 20 T.....LINELE. .
009B10: 0D 00 00 70 72 65 74 74 79 6C 69 6E 65 F3 EF 0D ...prettyline...
009B20: 00 00 70 72 65 74 74 79 6C 69 6E 65 F3 F4 0F 00 ..prettyline....
009B30: 08 00 EC 04 20 20 D5 00 06 00 F6 04 C9 00 07 00 .... ..........
009B40: 00 05 01 C0 00 35 00 0A 05 01 C0 20 53 75 62 72 .....5..... Subr
009B50: 6F 75 74 69 6E 65 20 74 6F 20 70 72 69 6E 74 20 outine to print
009B60: 61 24 20 77 69 74 68 20 43 48 52 24 28 26 46 45 a$ with CHR$(&FE
009B70: 29 20 61 73 20 43 52 4C 46 00 07 00 14 05 01 C0 ) as CRLF.......
009B80: 00 18 00 1E 05 9E 20 0D 00 00 F8 EF 0F 20 EC 20 ...... ...... .
009B90: FF 0E 28 03 00 DA DF 00 E1 29 00 18 00 28 05 03 ..(......)...(..
009BA0: 00 00 E2 EF AC 28 03 00 00 E1 2C 0D 00 00 F8 2C .....(....,....,
009BB0: 0F 29 00 21 00 32 05 A1 20 03 00 00 E2 EF FF 03 .).!.2.. .......
009BC0: 28 1C FE 00 29 EB 20 BF 20 01 97 20 BF 20 03 00 (...). . .. . ..
009BD0: 00 E2 3B 00 0B 00 3C 05 B0 20 0D 00 00 F8 00 06 ..;...<.. ......
009BE0: 00 46 05 C9 00 07 00 50 05 01 C0 00 15 00 5A 05 .F.....P......Z.
009BF0: 01 C0 20 50 72 69 6E 74 20 63 6F 6D 6D 65 6E 74 .. Print comment
009C00: 00 07 00 64 05 01 C0 00 1A 00 6E 05 CC 20 0F 2C ...d......n.. .,
009C10: 1A DC 05 F5 0D 00 00 70 6F 69 6E 74 F3 F6 1A AA .......point....
009C20: 05 00 26 00 78 05 D8 20 E7 20 0E 2C 0F 20 01 C0 ..&.x.. . .,. ..
009C30: 20 72 6F 75 74 69 6E 65 20 6E 65 65 64 73 20 77 routine needs w
009C40: 69 6E 64 6F 77 20 30 00 1E 00 82 05 03 00 00 E1 indow 0.........
009C50: 20 EF 20 03 00 00 45 52 4F D2 28 0D 00 00 41 4E . ...ERO.(...AN
009C60: 53 4E 55 CD 29 00 20 00 8C 05 9F 20 1E A6 04 20 SNU.). .... ...
009C70: 01 C0 20 70 72 65 74 74 79 20 75 70 20 72 65 73 .. pretty up res
009C80: 70 6F 6E 73 65 00 37 00 96 05 A9 20 0F 2C 28 0F ponse.7.... .,(.
009C90: F4 0D 00 00 6E 75 6D AE 49 71 75 65 73 F4 29 F6 ....num.Iques.).
009CA0: 10 20 01 C0 20 73 65 74 20 63 75 72 73 6F 72 20 . .. set cursor
009CB0: 66 6F 72 20 72 65 73 70 6F 6E 73 65 20 20 00 23 for response .#
009CC0: 00 A0 05 9F 20 1E 1E 05 20 01 C0 20 50 72 69 6E .... ... .. Prin
009CD0: 74 20 70 72 65 74 74 79 20 72 65 73 70 6F 6E 73 t pretty respons
009CE0: 65 00 10 00 AA 05 D8 20 E7 20 0E 2C 0F 20 01 20 e...... . .,. .
009CF0: C9 00 07 00 B4 05 01 C0 00 29 00 BE 05 A9 20 0F .........).... .
009D00: 2C 28 10 F4 0D 00 00 6E 75 6D 71 75 65 73 F4 29 ,(.....numques.)
009D10: F6 10 F5 0D 00 00 70 72 65 74 74 79 6C 69 6E 65 ......prettyline
009D20: F3 00 22 00 C8 05 9F 20 1E 1E 05 20 01 C0 20 50 ..".... ... .. P
009D30: 72 69 6E 74 20 61 6C 74 65 72 65 64 20 73 74 72 rint altered str
009D40: 69 6E 67 00 10 00 D2 05 D8 20 E7 20 0E 2C 0F 20 ing...... . .,.
009D50: 01 20 C9 00 07 00 DC 05 01 C0 00 1A 00 E6 05 01 . ..............
009D60: C0 20 44 61 74 61 20 66 6F 72 20 71 75 65 73 74 . Data for quest
009D70: 69 6F 6E 73 00 0F 00 F0 05 01 C0 20 46 6F 72 6D ions....... Form
009D80: 61 74 3A 00 18 00 FA 05 01 C0 20 48 65 61 64 69 at:....... Headi
009D90: 6E 67 20 66 6F 72 20 54 65 62 97 73 74 00 1A 00 ng for Teb.st...
009DA0: 04 06 01 C0 20 46 6F 72 20 65 61 63 68 20 71 75 .... For each qu
009DB0: 65 73 74 69 6F 6E 3A 00 18 00 0E 06 01 C0 20 20 estion:.......
009DC0: 20 20 51 75 65 73 74 69 6F 6E 20 74 65 78 74 00 Question text.
009DD0: 20 00 18 06 01 C0 20 20 20 20 4E 75 6D 62 65 72 ..... Number
009DE0: 20 6F 66 20 61 6E 73 77 65 72 73 20 28 4E 29 00 of answers (N).
009DF0: 39 00 22 06 01 C0 20 20 20 20 54 65 78 74 20 6F 9."... Text o
009E00: 66 20 65 61 63 68 20 61 6E 73 77 65 72 20 28 20 f each answer (
009E10: 6D 75 73 74 20 62 65 20 4E 20 69 74 65 6D 73 20 must be N items
009E20: 6F 66 20 74 65 78 74 29 00 33 00 2C 06 01 C0 20 of text).3.,...
009E30: 20 20 20 43 6F 72 72 65 63 74 20 61 6E 73 77 65 Correct answe
009E40: 72 20 28 41 2D 46 29 20 20 77 68 65 72 65 20 41 r (A-F) where A
009E50: 3D 31 2C 42 3D 32 20 65 74 63 2E 00 3F 00 36 06 =1,B=2 etc..?.6.
009E60: 01 C0 20 20 20 20 54 65 78 74 20 66 6F 72 20 65 .. Text for e
009E70: 61 63 68 20 61 6E 73 77 65 72 20 69 6E 20 73 61 ach answer in sa
009E80: 6D 65 20 6F 72 64 65 72 20 28 6D 75 73 74 20 62 me order (must b
009E90: 65 20 4E 20 69 74 65 6D 73 29 00 38 A4 1C 00 40 e N items).8...@
009EA0: 06 01 C0 20 41 66 74 65 72 20 61 6C 6C 20 71 75 ... After all qu
009EB0: 65 73 74 69 6F 6E 73 3A 00 28 00 4A 06 01 C0 20 estions:.(.J...
009EC0: 22 20 20 20 20 20 20 20 20 20 45 6E 64 20 6F 66 " End of
009ED0: 20 54 65 73 74 22 20 28 65 78 61 63 74 6C 79 29 Test" (exactly)
009EE0: 00 07 00 54 06 01 C0 00 25 00 5E 06 8C 20 22 53 ...T....%.^.. "S
009EF0: 65 6C 66 20 41 73 73 65 73 73 6D 65 6E 74 20 54 elf Assessment T
009F00: 65 73 74 20 2D 20 43 68 2E 20 37 22 00 07 00 68 est - Ch. 7"...h
009F10: 06 01 C0 00 74 00 72 06 8C 20 22 57 68 61 74 20 ....t.r.. "What
009F20: 72 65 73 75 6C 74 20 64 6F 20 79 6F 75 20 67 65 result do you ge
009F30: 74 20 66 72 6F 6D 20 74 68 65 20 66 6F 6C 6C 6F t from the follo
009F40: 77 69 6E 67 20 74 77 6F 20 6C 69 6E 65 73 3A 20 wing two lines:
009F50: 20 20 20 20 20 20 6E 61 6D 65 24 3D 7E 43 6F 6D name$=~Com
009F60: 70 75 74 65 72 7E 20 20 20 20 20 20 20 20 20 20 puter~
009F70: 20 20 20 50 52 49 4E 54 20 4C 45 4E 28 6E 61 6D PRINT LEN(nam
009F80: 65 24 29 22 20 20 20 00 22 00 7C 06 8C 20 34 2C e$)" .".|.. 4,
009F90: 43 4F 4D 50 55 54 45 52 2C 7E 43 4F 4D FA B8 FF COMPUTER,~COM...
009FA0: FF FF FF 11 89 09 B3 04 B3 04 FE 04 82 09 02 10 ................
009FB0: 08 10 00 07 01 00 2C 53 41 54 37 00 00 00 00 00 ......,SAT7.....
009FC0: 00 00 00 00 00 00 00 03 FF 00 A2 06 70 11 00 A2 ............p...
009FD0: 16 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009FE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
009FF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A000: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A010: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A020: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A030: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A040: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A050: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A060: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A080: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A090: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A0A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A0B0: 00 00 00 00 00 00 00 E7 FF FF FF FF FF 11 88 09 ................
00A0C0: B3 04 B3 04 01 05 84 09 02 10 08 3E 25 13 07 00 ...........>%...
00A0D0: 16 50 55 54 45 52 7E 2C 38 2C 7E 38 7E 00 57 00 .PUTER~,8,~8~.W.
00A0E0: 86 06 8C 20 43 2C 22 4E 6F 2C 20 74 68 65 20 61 ... C,"No, the a
00A0F0: 6E 73 77 65 72 20 69 73 20 43 22 2C 22 4E 6F 2C nswer is C","No,
00A100: 20 74 68 65 20 61 6E 73 77 65 72 20 69 73 20 43 the answer is C
00A110: 22 2C 43 6F 72 72 65 63 74 2C 22 4E 6F 2C 20 74 ",Correct,"No, t
00A120: 68 65 20 61 6E 73 77 65 72 20 69 73 20 43 22 20 he answer is C"
00A130: 20 20 20 20 00 07 00 90 06 01 C0 00 77 00 9A 06 ........w...
00A140: 8C 20 22 57 68 61 74 20 72 65 73 75 6C 74 20 64 . "What result d
00A150: 6F 20 79 6F 75 20 67 65 74 20 66 72 6F 6D 20 74 o you get from t
00A160: 68 65 20 6E 65 78 74 20 74 77 6F 20 6C 69 6E 65 he next two line
00A170: 73 3A 20 20 20 20 20 20 20 20 20 20 6E 61 6D 65 s: name
00A180: 24 3D 7E 43 6F 6D 70 75 74 65 72 7E 20 20 20 20 $=~Computer~
00A190: 20 20 20 20 20 20 20 20 20 20 50 52 49 4E 54 20 PRINT
00A1A0: 52 49 47 48 54 24 28 6E 61 6D 65 24 2C 34 29 22 RIGHT$(name$,4)"
00A1B0: 20 20 00 23 00 A4 06 8C 20 35 2C 43 6F 6D 70 2C .#.... 5,Comp,
00A1C0: 6F 6D 70 75 2C 6D 70 75 74 2C 70 75 74 65 2C 75 ompu,mput,pute,u
00A1D0: 74 95 A6 65 72 2C 45 00 48 00 AE 06 8C 20 22 4E t..er,E.H.... "N
00A1E0: 6F 2C 20 74 68 65 20 61 6E 73 77 65 72 20 69 73 o, the answer is
00A1F0: 20 45 22 2C 22 4E 6F 2C 20 74 68 65 20 61 6E 73 E","No, the ans
00A200: 77 65 72 20 69 73 20 45 22 2C 22 4E 6F 2C 20 74 wer is E","No, t
00A210: 68 65 20 61 6E 73 77 65 72 20 69 73 20 45 22 00 he answer is E".
00A220: 26 00 B8 06 8C 20 22 4E 6F 2C 20 74 68 65 20 61 &.... "No, the a
00A230: 6E 73 77 65 72 20 69 73 20 45 22 2C 22 43 6F 72 nswer is E","Cor
00A240: 72 65 63 74 22 00 07 00 C2 06 01 C0 00 7C 00 CC rect"........|..
00A250: 06 8C 20 22 57 68 61 74 20 72 65 73 75 6C 74 20 .. "What result
00A260: 64 6F 20 79 6F 75 20 67 65 74 20 66 72 6F 6D 20 do you get from
00A270: 74 68 65 20 66 6F 6C 6C 6F 77 69 6E 67 20 74 77 the following tw
00A280: 6F 20 6C 69 6E 65 73 3A 20 20 20 20 20 20 20 20 o lines:
00A290: 20 20 6E 61 6D 65 24 3D 7E 43 6F 6D 70 75 74 65 name$=~Compute
00A2A0: 72 7E 20 20 20 20 20 20 20 20 20 20 20 20 50 52 r~ PR
00A2B0: 49 4E 54 20 49 4E 53 54 52 28 33 2C 6E 61 6D 65 INT INSTR(3,name
00A2C0: 24 2C 7E 70 75 74 7E 29 00 44 00 D6 06 8C 20 33 $,~put~).D.... 3
00A2D0: 2C 34 2C AA D9 35 2C 36 2C 41 2C 43 6F 72 72 65 ,4,..5,6,A,Corre
00A2E0: 63 74 2C 22 4E 6F 2C 20 74 68 65 20 61 6E 73 77 ct,"No, the answ
00A2F0: 65 72 20 69 73 20 41 22 2C 22 4E 6F 2C 20 74 68 er is A","No, th
00A300: 65 20 61 6E 73 77 65 72 20 69 73 20 41 22 00 07 e answer is A"..
00A310: 00 E0 06 01 C0 00 6C 00 EA 06 8C 20 22 57 68 65 ......l.... "Whe
00A320: 6E 20 77 69 6C 6C 20 27 6E 75 6D 27 20 18 6E 6F n will 'num' .no
00A330: 74 18 20 62 65 20 70 72 69 6E 74 65 64 20 62 79 t. be printed by
00A340: 20 74 68 65 20 66 6F 6C 6C 6F 77 69 6E 67 20 73 the following s
00A350: 74 61 74 65 6D 65 6E 74 3A 20 20 20 20 20 49 46 tatement: IF
00A360: 20 6E 75 6D 3C 35 30 20 4F 52 20 6E 75 6D 3E 36 num<50 OR num>6
00A370: 37 20 54 48 45 4E 20 50 52 49 4E 54 20 6E 75 6D 7 THEN PRINT num
00A380: 22 00 3A 00 F4 06 8C 20 34 2C 27 6E 75 6D 27 20 ".:.... 4,'num'
00A390: 69 73 20 3C 35 30 20 62 75 74 20 6E 6F 74 20 3E is <50 but not >
00A3A0: 36 37 2C 27 6E 75 6D 27 20 69 73 20 3E 36 37 20 67,'num' is >67
00A3B0: 62 75 74 20 6E 6F 74 20 3C 35 30 00 38 00 FE 06 but not <50.8...
00A3C0: 8C 20 27 6E 75 6D 27 20 69 73 20 3C 35 30 20 61 . 'num' is <50 a
00A3D0: 6E 64 20 3E 36 9E D5 37 2C 27 6E 75 6D 27 20 69 nd >6..7,'num' i
00A3E0: 73 20 6E 65 69 74 68 65 72 20 3C 35 30 20 6E 6F s neither <50 no
00A3F0: 72 20 3E 36 37 00 08 00 08 07 8C 20 44 00 A6 00 r >67...... D...
00A400: 12 07 8C 20 22 4E 6F 2C 20 74 68 65 20 61 6E 73 ... "No, the ans
00A410: 77 65 72 20 69 73 20 44 22 2C 22 49 66 20 61 20 wer is D","If a
00A420: 6E 75 6D 62 65 72 20 69 73 20 67 72 65 61 74 65 number is greate
00A430: 72 20 74 68 61 6E 20 36 37 2C 20 69 74 20 6D 75 r than 67, it mu
00A440: 73 74 20 62 65 20 6C 65 73 73 20 74 68 61 6E 20 st be less than
00A450: 35 30 20 2D 20 41 6E 73 77 65 72 20 69 73 20 44 50 - Answer is D
00A460: 22 2C 22 4E 6F 20 6E 75 6D 62 65 72 20 63 61 6E ","No number can
00A470: 20 62 65 20 6C 65 73 73 20 74 68 61 6E 20 35 30 be less than 50
00A480: 20 61 6E 64 20 67 72 65 61 74 65 72 20 74 68 61 and greater tha
00A490: 6E 20 36 37 20 2D 20 41 6E 73 77 65 72 20 69 73 n 67 - Answer is
00A4A0: 20 44 22 00 10 00 1C 07 8C 20 22 43 6F 72 72 65 D"...... "Corre
00A4B0: 63 74 22 00 07 00 26 07 01 C0 00 5D 00 30 07 8C ct"...&....].0..
00A4C0: 20 22 57 68 61 74 20 72 65 73 75 6C 74 20 64 6F "What result do
00A4D0: 20 79 6F 75 20 67 65 F5 38 74 20 66 72 6F 6D 20 you ge.8t from
00A4E0: 74 68 65 20 66 6F 6C 6C 6F 77 69 6E 67 20 6C 69 the following li
00A4F0: 6E 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ne
00A500: 20 20 50 52 49 4E 54 20 56 41 4C 28 7E 30 2D 33 PRINT VAL(~0-3
00A510: 30 20 73 65 63 73 7E 29 20 00 47 00 3A 07 8C 20 0 secs~) .G.:..
00A520: 33 2C 30 2C 33 30 2C 2D 33 30 2C 41 2C 43 6F 72 3,0,30,-30,A,Cor
00A530: 72 65 63 74 2C 22 4E 6F 2C 20 74 68 65 20 61 6E rect,"No, the an
00A540: 73 77 65 72 20 69 73 20 41 22 2C 22 4E 6F 2C 20 swer is A","No,
00A550: 74 68 65 20 61 6E 73 77 65 72 20 69 73 20 41 22 the answer is A"
00A560: 00 07 00 44 07 01 C0 00 A3 00 4E 07 8C 20 20 20 ...D....£.N..
00A570: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
00A580: 20 20 20 20 22 57 68 61 74 20 77 69 6C 6C 20 62 "What will b
00A590: 65 20 74 68 65 20 72 61 6E 67 65 20 6F 66 20 6E e the range of n
00A5A0: 75 6D 62 65 72 73 20 61 6C 6C 6F 77 65 64 20 69 umbers allowed i
00A5B0: 6E 20 27 6E 75 6D 24 27 20 62 79 20 74 68 65 20 n 'num$' by the
00A5C0: 66 6F 6C 6C 6F 77 69 6E 67 20 6C 69 6E 65 3A 20 following line:
00A5D0: 20 20 20 20 20 20 20 20 20 9D 19 20 20 20 20 20 ..
00A5E0: 20 20 20 49 46 20 56 41 4C 28 6E 75 6D 24 29 3E IF VAL(num$)>
00A5F0: 30 20 41 4E 44 20 56 41 4C 28 6E 75 6D 24 29 3C 0 AND VAL(num$)<
00A600: 36 20 54 48 45 4E 2E 2E 2E 2E 2E 22 00 26 00 58 6 THEN.....".&.X
00A610: 07 8C 20 34 2C 30 20 74 6F 20 36 2C 30 20 74 6F .. 4,0 to 6,0 to
00A620: 20 35 2C 31 20 74 6F 20 36 2C 31 20 74 6F 20 35 5,1 to 6,1 to 5
00A630: 2C 44 00 66 00 62 07 8C 20 22 4E 6F 2C 20 74 68 ,D.f.b.. "No, th
00A640: 65 20 61 6E 73 77 65 72 20 69 73 20 44 22 2C 22 e answer is D","
00A650: 4E 65 61 72 6C 79 20 72 69 67 68 74 20 2D 20 74 Nearly right - t
00A660: 68 65 20 61 6E 73 77 65 72 20 69 73 20 44 22 2C he answer is D",
00A670: 22 4E 65 61 72 6C 79 20 72 69 67 68 74 20 2D 20 "Nearly right -
00A680: 74 68 65 20 61 6E 73 77 65 72 20 69 73 20 44 22 the answer is D"
00A690: 2C 43 6F 72 72 65 63 74 00 07 00 6C 07 01 C0 00 ,Correct...l....
00A6A0: 5D 00 76 07 8C 20 22 57 68 61 74 20 77 69 6C 6C ].v.. "What will
00A6B0: 20 62 65 20 74 68 65 20 72 65 73 75 6C 74 20 6F be the result o
00A6C0: 66 20 74 68 65 20 66 6F 6C 6C 6F 77 69 6E 67 20 f the following
00A6D0: 6C 69 6E 65 3F 20 20 20 20 20 20 48 FD 20 20 20 line? H.
00A6E0: 20 20 20 20 20 20 50 52 49 4E 54 20 4D 49 44 24 PRINT MID$
00A6F0: 28 7E 62 61 6E 61 6E 61 7E 2C 33 2C 33 29 00 4A (~banana~,3,3).J
00A700: 00 80 07 8C 20 33 2C 62 61 6E 2C 61 6E 61 2C 6E .... 3,ban,ana,n
00A710: 61 6E 2C 43 2C 22 4E 6F 2C 20 74 68 65 20 61 6E an,C,"No, the an
00A720: 73 77 65 72 20 69 73 20 43 22 2C 22 4E 6F 2C 20 swer is C","No,
00A730: 74 68 65 20 61 6E 73 77 65 72 20 69 73 20 43 22 the answer is C"
00A740: 2C 43 6F 72 72 65 63 74 00 07 00 8A 07 01 C0 00 ,Correct........
00A750: 1D 00 94 07 8C 20 22 20 20 20 20 20 20 20 20 20 ..... "
00A760: 45 6E 64 20 6F 66 20 54 65 73 74 22 00 10 00 9E End of Test"....
00A770: 07 8C 20 31 2C 22 22 2C 41 2C 22 22 00 00 00 00 .. 1,"",A,""....
00A780: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A790: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A7A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A7B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A7C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A7D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 B5 B2 FF ................
00A7E0: FF FF FF 11 7B 09 B3 04 B3 04 F8 04 78 09 02 10 ....{.......x...
00A7F0: 08 0F 00 07 01 00 2C 53 41 54 38 00 00 00 00 00 ......,SAT8.....
00A800: 00 00 00 00 00 00 00 01 00 00 00 08 70 01 FF 82 ............p...
00A810: 15 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A820: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A830: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A840: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A850: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A860: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A870: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A880: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A890: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A8A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A8B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A8C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A8D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A8E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00A8F0: 00 00 00 00 00 00 00 1F 17 FF FF FF FF 11 7E 09 ..............~.
00A900: B3 04 B3 04 FC 04 7D 09 02 10 08 75 0A 15 08 00 ......}....u....
00A910: 16 07 00 64 00 01 C0 00 2C 00 6E 00 01 C0 20 53 ...d....,.n... S
00A920: 65 6C 66 20 41 73 73 65 73 73 6D 65 6E 74 20 54 elf Assessment T
00A930: 65 73 74 73 20 3A 20 42 41 53 49 43 20 42 6F 6F ests : BASIC Boo
00A940: 6B 20 32 00 07 00 78 00 01 C0 00 12 00 82 00 01 k 2...x.........
00A950: C0 20 44 41 20 39 2F 31 32 2F 38 34 00 07 00 8C . DA 9/12/84....
00A960: 00 01 C0 00 18 00 96 00 01 C0 20 50 72 6F 67 72 .......... Progr
00A970: 61 6D 6D 65 72 73 20 6B 65 79 73 00 07 00 A0 00 ammers keys.....
00A980: 01 C0 00 10 00 AA 00 A4 20 0E 2C 22 6C 69 73 74 ........ .,"list
00A990: 0D 22 00 0F 00 B4 00 A4 20 0F 2C 22 72 75 6E 0D ."...... .,"run.
00A9A0: 22 00 3B 00 BE 00 A4 20 10 2C 22 6D 6F 64 65 20 ".;.... .,"mode
00A9B0: 32 3A 70 61 70 65 72 20 30 3A 70 65 6E 20 31 3A 2:paper 0:pen 1:
00A9C0: 69 6E 6B 20 30 2C 32 33 3A 69 6E 6B 20 31 2C 30 ink 0,23:ink 1,0
00A9D0: 3A 62 6F 72 64 65 72 20 31 33 0D 22 00 15 00 C8 :border 13."....
00A9E0: 00 A4 20 11 2C 22 72 65 6E 75 6D 20 31 30 30 0D .. .,"renum 100.
00A9F0: 22 00 0C 00 D2 00 A4 20 12 2C 22 FF 22 00 07 00 "...... .,"."...
00AA00: DC 00 01 C0 00 0C 00 E6 00 B3 20 9F 20 1E C0 03 .......... . ...
00AA10: 00 93 32 2C 00 F0 00 01 C0 20 61 72 72 61 79 73 ..2,..... arrays
00AA20: 20 65 72 6F 72 24 2C 71 75 65 73 24 20 28 6E 6F eror$,ques$ (no
00AA30: 74 20 64 69 6D 65 6E 73 69 6F 6E 65 64 29 00 07 t dimensioned)..
00AA40: 00 FA 00 01 C0 00 0E 00 04 01 01 C0 20 53 65 74 ............ Set
00AA50: 2D 75 70 00 07 00 0E 01 01 C0 00 26 00 18 01 AD -up........&....
00AA60: 20 0F 01 82 20 19 11 01 A2 20 0E 2C 19 13 01 A2 ... .... .,....
00AA70: 20 0F 2C 0E 01 A2 20 10 2C 0F 01 A2 20 11 2C 14 .,... .,... .,.
00AA80: 00 2D 00 22 01 CF 20 19 FF 2C 1C 36 00 2C 1C 36 .-.".. ..,.6.,.6
00AA90: 00 2C 1C 36 00 20 01 C0 20 73 65 74 20 75 70 20 .,.6. .. set up
00AAA0: 66 61 6B 65 20 22 71 75 6F 74 65 73 22 00 2B 00 fake "quotes".+.
00AAB0: 2C 01 0D 00 00 73 63 6F 72 E5 EF 0E 01 0D 00 00 ,....scor.......
00AAC0: 71 75 65 73 74 69 6F EE EF 0F 01 0D 00 00 6C 69 questio.......li
00AAD0: 6E 65 6C 65 EE EF 19 21 00 10 00 36 01 03 00 00 nele...!...6....
00AAE0: 54 C2 EF FF 03 28 17 29 00 2A 00 40 01 9F 20 1E T....(.).*.@.. .
00AAF0: 42 04 20 01 C0 20 72 65 61 64 20 61 20 73 74 72 B. .. read a str
00AB00: 69 6E 67 20 2B 20 70 72 65 74 74 79 20 73 65 74 ing + pretty set
00AB10: 75 70 00 C1 09 1C 00 4A 01 9F 20 1E FC 03 20 01 up.....J.. ... .
00AB20: C0 20 53 65 74 20 75 70 20 77 69 6E 64 6F 77 73 . Set up windows
00AB30: 00 2B 00 54 01 9F 20 1E 14 05 20 01 C0 20 50 72 .+.T.. ... .. Pr
00AB40: 69 6E 74 20 73 74 72 69 6E 67 20 72 65 61 64 20 int string read
00AB50: 61 73 20 70 72 65 74 74 79 65 64 00 33 00 5E 01 as prettyed.3.^.
00AB60: A9 20 23 0F 2C 17 2C 15 01 BF 23 0F 2C 22 50 72 . #.,.,...#.,"Pr
00AB70: 65 73 73 20 53 50 41 43 45 20 74 6F 20 73 74 61 ess SPACE to sta
00AB80: 72 74 22 01 D6 20 FF 43 F2 22 20 22 01 D5 00 07 rt".. .C." "....
00AB90: 00 68 01 01 C0 00 11 00 72 01 01 C0 20 4D 61 69 .h......r... Mai
00ABA0: 6E 20 6C 6F 6F 70 00 07 00 7C 01 01 C0 00 12 00 n loop...|......
00ABB0: 86 01 0D 00 00 6C 69 6E 65 6C 65 EE EF 19 21 00 .....linele...!.
00ABC0: 2A 00 90 01 9F 20 1E 42 04 20 01 C0 20 72 65 61 *.... .B. .. rea
00ABD0: 64 20 61 20 73 74 72 69 6E 67 20 2B 20 70 72 65 d a string + pre
00ABE0: 74 74 79 20 73 65 74 75 70 00 1F 00 9A 01 0D 00 tty setup.......
00ABF0: 00 70 74 79 6C 69 6E 65 F3 EF 0D 00 00 70 72 65 .ptyline.....pre
00AC00: 74 74 79 6C 69 6E 65 F3 00 07 00 A4 01 01 C0 00 ttyline.........
00AC10: 30 00 AE 01 C3 D9 3E 20 0D 00 00 6E 75 6D 71 75 0.....> ...numqu
00AC20: 65 73 F4 20 20 20 20 20 20 20 01 C0 20 6E 75 6D es. .. num
00AC30: 62 65 72 20 6F 66 20 71 75 65 73 74 69 6F 6E 73 ber of questions
00AC40: 20 00 37 00 B8 01 9E 20 0D 00 00 E9 EF 0F 20 EC .7.... ...... .
00AC50: 20 0D 00 00 6E 75 6D 71 75 65 73 F4 20 01 C0 20 ...numques. ..
00AC60: 6C 6F 6F 70 20 66 6F 72 20 65 61 63 68 20 71 75 loop for each qu
00AC70: 65 73 74 69 6F 6E 20 20 00 14 00 C2 01 C3 20 03 estion ...... .
00AC80: 00 00 71 75 65 F3 28 0D 00 00 E9 29 00 0B 00 CC ..que.(....)....
00AC90: 01 B0 20 0D 00 00 E9 00 27 00 D6 01 C3 20 03 00 .. .....'.... ..
00ACA0: 00 61 6E F3 20 20 20 20 20 01 C0 20 47 65 74 20 .an. .. Get
00ACB0: 63 6F 72 72 65 63 74 20 61 6E 73 77 65 72 00 3E correct answer.>
00ACC0: 00 E0 01 9E 20 0D 00 00 E9 EF 0F 20 EC 20 0D 00 .... ...... . ..
00ACD0: 00 6E 75 6D 71 75 65 73 F4 20 01 C0 20 6C 6F 6F .numques. .. loo
00ACE0: 70 20 66 6F 72 20 6E 75 6D 62 65 72 20 6F 66 20 p for number of
00ACF0: 71 75 65 73 74 69 6F 6E 73 20 20 20 00 25 00 EA questions .%..
00AD00: 01 C3 20 03 00 00 65 72 6F F2 28 0D 00 00 E9 29 .. ...ero.(....)
00AD10: 20 01 C0 20 67 65 74 3E C7 20 72 65 73 70 6F 6E .. get>. respon
00AD20: 73 65 73 00 0B 00 F4 01 B0 20 0D 00 00 E9 00 07 ses...... ......
00AD30: 00 FE 01 01 C0 00 0D 00 08 02 8A 20 01 20 8A 20 ........... . .
00AD40: 23 0F 00 1C 00 12 02 9F 20 1E FC 03 20 01 C0 20 #....... ... ..
00AD50: 53 65 74 20 75 70 20 77 69 6E 64 6F 77 73 00 30 Set up windows.0
00AD60: 00 1C 02 A1 20 03 00 00 E1 EF 22 20 20 20 20 20 .... ....."
00AD70: 20 20 20 20 45 6E 64 20 6F 66 20 54 65 73 74 22 End of Test"
00AD80: 20 EB 20 9F 20 1E 14 05 01 A0 20 1E 70 03 00 36 . . ..... .p..6
00AD90: 00 26 02 A9 20 23 12 2C 11 F4 28 0D 00 00 71 75 .&.. #.,..(...qu
00ADA0: 65 73 74 69 6F EE F0 19 0A 29 2C 11 01 BF 23 12 estio....),...#.
00ADB0: 2C FF 19 28 0D 00 00 71 75 65 73 74 69 6F EE 29 ,..(...questio.)
00ADC0: 3B 22 2E 22 00 28 00 30 02 9F 20 1E 14 05 20 20 ;".".(.0.. ...
00ADD0: 20 20 01 C0 20 70 72 69 6E 74 20 70 72 65 74 74 .. print prett
00ADE0: 79 27 64 20 71 75 65 73 74 69 6F 6E 00 07 00 3A y'd question...:
00ADF0: 02 01 C0 00 1B 00 44 02 9E 20 0D 00 00 E9 EF 0F ......D.. ......
00AE00: 20 EC 20 0D 00 00 6E 75 6D 71 75 65 73 F4 00 17 . ...numques...
00AE10: 00 4E 02 03 00 00 E1 EF 03 01 80 00 00 71 75 65 .N...........que
00AE20: F3 28 0D 00 00 E9 29 00 23 00 58 02 A9 20 23 0F .(....).#.X.. #.
00AE30: 2C 10 2C 0D 00 00 E9 F6 10 F5 0F 20 20 01 C0 20 ,.,........ ..
00AE40: 73 65 74 20 63 75 72 73 6F 72 00 1D 00 62 02 A1 set cursor...b..
00AE50: 20 03 00 00 E1 EF 22 54 22 20 EB 20 03 00 00 E1 ....."T" . ....
00AE60: EF 22 54 72 75 65 22 00 1E 00 6C 02 A1 20 03 00 ."True"...l.. ..
00AE70: 00 E1 EF 22 46 22 20 EB 20 03 00 00 E1 EF 22 46 ..."F" . ....."F
00AE80: 61 6C 73 65 22 00 38 00 76 02 BF 20 23 0F 2C 22 alse".8.v.. #.,"
00AE90: 28 22 3B FF 03 28 0D 00 00 E9 F4 19 40 29 3B 22 (";..(......@);"
00AEA0: 29 20 22 3B 20 01 C0 20 50 72 69 6E 74 20 71 75 ) "; .. Print qu
00AEB0: 65 73 74 69 6F 6E 20 6E 75 6D 62 65 72 00 0C 00 estion number...
00AEC0: 80 02 D8 20 E7 20 0E 2C 0F 00 0A 00 8A 02 9F 20 ... . .,.......
00AED0: 1E 14 05 00 0C 00 94 02 D8 20 E7 20 0E 2C 0F 00 ......... . .,..
00AEE0: 0B 00 9E 02 B0 20 0D 00 00 E9 00 07 00 A8 02 01 ..... ..........
00AEF0: C0 00 12 00 B2 02 01 C0 20 47 65 74 20 61 6E 73 ........ Get ans
00AF00: 77 65 72 00 07 00 BC 02 01 C0 00 1C 00 C6 02 03 wer.............
00AF10: 00 00 E1 EF FF 43 01 A1 20 03 00 58 46 00 E1 EF .....C.. ..XF...
00AF20: 22 22 20 A0 20 1E C6 02 00 3D 00 D0 02 03 00 00 "" . ....=......
00AF30: E1 EF FF 1C 28 03 00 00 E1 29 01 A1 20 03 00 00 ....(....).. ...
00AF40: E1 F1 22 41 22 20 FC 20 03 00 00 E1 EE FF 03 28 .."A" . .......(
00AF50: 19 40 F4 0D 00 00 6E 75 6D 71 75 65 73 F4 29 20 .@....numques.)
00AF60: A0 20 1E C6 02 00 2A 00 DA 02 0D 00 00 41 4E 53 . ....*......ANS
00AF70: 4E 55 CD EF 28 FF 01 28 03 00 00 C1 29 F5 19 40 NU..(..(....)..@
00AF80: 29 01 0D 00 00 6C 69 6E 65 6C 65 EE EF 19 24 00 )....linele...$.
00AF90: 2F 00 E4 02 A9 20 23 0F 2C 11 2C 0D 00 00 41 4E /.... #.,.,...AN
00AFA0: 53 4E 55 CD F6 10 F5 0F 01 BB 23 0F 2C 0E 01 BF SNU.......#.,...
00AFB0: 23 0F 2C 03 00 00 C1 3B 01 BB 23 0F 2C 0F 00 22 #.,....;..#.,.."
00AFC0: 00 EE 02 01 C0 20 68 69 67 68 6C 69 67 68 74 73 ..... highlights
00AFD0: 20 73 65 6C 65 63 74 65 64 20 61 6E 73 77 65 72 selected answer
00AFE0: 00 2C 00 F8 02 0D 00 00 70 6F 69 6E 74 F3 EF 0E .,......point...
00AFF0: 01 A1 20 03 00 00 E1 EF 03 00 00 61 6E F3 20 EB .. ........an. .
00B000: 20 0D 00 00 70 6F 69 6E 74 F3 EF 0F 00 20 00 02 ...point.... ..
00B010: 03 0D 00 00 73 63 6F 72 E5 EF 0D 00 00 48 FC 73 ....scor.....H.s
00B020: 63 6F 72 E5 F4 0D 00 00 70 6F 69 6E 74 F3 00 1C cor.....point...
00B030: 00 0C 03 9F 20 1E 64 05 20 01 C0 20 70 72 69 6E .... .d. .. prin
00B040: 74 20 72 65 73 70 6F 6E 73 65 00 3A 00 16 03 A9 t response.:....
00B050: 20 23 0F 2C 16 2C 19 11 F5 0D 00 00 70 74 79 6C #.,.,......ptyl
00B060: 69 6E 65 F3 01 BF 23 0F 2C 22 50 72 65 73 73 20 ine...#.,"Press
00B070: 53 50 41 43 45 20 74 6F 20 63 6F 6E 74 69 6E 75 SPACE to continu
00B080: 65 22 20 20 00 25 00 20 03 03 00 00 C9 EF 22 22 e" .%. ......""
00B090: 20 01 20 D6 20 03 00 00 C9 EF 22 22 01 20 03 00 . . ....."". ..
00B0A0: 00 C9 EF FF 43 20 01 20 D5 00 2D 00 2A 03 A1 20 ....C . ..-.*..
00B0B0: 03 00 00 C9 EF 03 00 00 54 C2 20 EB 20 0D 00 00 ........T. . ...
00B0C0: 6C 69 6E 65 6C 65 EE EF 19 21 01 9F 20 1E 56 04 linele...!.. .V.
00B0D0: 01 A0 20 1E 08 02 00 15 00 34 03 A1 20 03 00 00 .. ......4.. ...
00B0E0: C9 F2 22 20 22 20 A0 20 1E 20 03 00 1E 00 3E 03 .." " . . ....>.
00B0F0: 0D 00 00 71 75 65 73 74 69 6F EE EF 0D 00 00 71 ...questio.....q
00B100: 75 65 73 74 69 6F EE F4 0F 00 0A 00 48 03 A0 20 uestio......H..
00B110: 1E 86 01 00 07 00 52 03 01 C0 00 18 00 5C 03 78 ......R......\.x
00B120: 48 FF FF FF FF 11 80 09 B3 04 B3 04 FA 04 7A 09 H.............z.
00B130: 02 10 08 0F 00 07 01 00 2C 53 41 54 38 00 00 00 ........,SAT8...
00B140: 00 00 00 00 00 00 00 00 00 02 00 00 00 08 70 09 ..............p.
00B150: 00 82 15 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B160: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B180: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B190: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B1A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B1B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B1C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B1D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B1E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B1F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B200: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B210: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B220: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00B230: 00 00 00 00 00 00 00 00 00 BF A4 FF FF FF FF 11 ................
00B240: 81 09 B3 04 B3 04 FB 04 7A 09 02 10 08 71 0A 15 ........z....q..
00B250: 08 00 16 01 C0 20 45 6E 64 20 71 75 69 7A 20 72 ..... End quiz r
00B260: 6F 75 74 69 6E 65 00 07 00 66 03 01 C0 00 0D 00 outine...f......
00B270: 70 03 A9 20 23 0F 2C 16 2C 15 00 36 00 7A 03 BF p.. #.,.,..6.z..
00B280: 20 23 0F 2C 22 59 6F 75 20 73 63 6F 72 65 64 22 #.,"You scored"
00B290: 3B 0D 00 00 73 63 6F 72 E5 3B 22 6F 75 74 20 6F ;...scor.;"out o
00B2A0: 66 22 3B 0D 00 00 71 75 65 73 74 69 6F EE F5 0F f";...questio...
00B2B0: 00 33 00 84 03 A9 20 23 0F 2C 12 2C 19 0A 01 BF .3.... #.,.,....
00B2C0: 23 0F 2C 22 50 72 65 73 73 20 53 50 41 43 45 20 #.,"Press SPACE
00B2D0: 74 6F 20 72 75 6E 20 74 68 65 20 70 72 6F 67 72 to run the progr
00B2E0: 61 6D 22 00 31 00 8E 03 A9 20 23 0F 2C 13 2C 19 am".1.... #.,.,.
00B2F0: 0C 01 BF 23 0F 2C 22 61 67 61 69 6E 2C 20 20 6F ...#.,"again, o
00B300: 72 20 45 53 43 2F 45 53 43 20 74 6F 20 66 69 6E r ESC/ESC to fin
00B310: 69 73 68 22 00 11 00 98 03 D6 20 FF 43 F2 22 20 ish"...... .C."
00B320: 22 01 D5 01 CA 00 07 00 A2 03 01 C0 00 20 00 AC "............ ..
00B330: 03 01 C0 20 49 6E 74 65 72 63 65 70 74 20 45 53 ... Intercept ES
00B340: 43 41 50 45 20 72 6F 75 74 69 6E 65 00 07 00 B6 CAPE routine....
00B350: 03 01 C0 6A 6B 00 1F 00 C0 03 AD 20 0F 20 01 82 ...jk...... . ..
00B360: 20 0F 20 01 20 A2 20 0E 2C 0F 20 01 20 A2 20 0F . . . .,. . . .
00B370: 2C 19 19 20 00 21 00 CA 03 BA 20 0E 01 20 BB 20 ,.. .!.... .. .
00B380: 0F 20 01 C0 20 72 65 73 74 6F 72 65 20 64 65 66 . .. restore def
00B390: 61 75 6C 74 73 00 06 00 D4 03 98 00 07 00 DE 03 aults...........
00B3A0: 01 C0 00 1A 00 E8 03 01 C0 20 49 6E 69 74 69 61 ......... Initia
00B3B0: 6C 69 73 65 20 77 69 6E 64 6F 77 73 00 07 00 F2 lise windows....
00B3C0: 03 01 C0 00 12 00 FC 03 BA 20 23 11 2C 10 20 01 ......... #.,. .
00B3D0: 20 8A 20 23 11 00 3D 00 06 04 D8 20 23 0E 2C 10 . #..=.... #.,.
00B3E0: 2C 19 27 2C 10 2C 12 F4 0D 00 00 70 74 79 6C 69 ,.',.,.....ptyli
00B3F0: 6E 65 F3 20 01 20 D8 20 23 0F 2C 10 2C 19 27 2C ne. . . #.,.,.',
00B400: 14 F4 0D 00 00 70 74 79 6C 69 6E 65 F3 2C 19 18 .....ptyline.,..
00B410: 20 20 00 0E 00 10 04 BA 20 0E 01 BB 20 0F 01 8A ...... ... ...
00B420: 00 12 00 1A 04 BA 20 23 0F 2C 11 20 01 20 8A 20 ...... #.,. . .
00B430: 23 0F 00 3C 00 24 04 D8 20 23 0E 2C 14 2C 19 26 #..<.$.. #.,.,.&
00B440: 2C 11 2C 12 F4 0D 00 00 70 74 79 6C 69 6E 65 F3 ,.,.....ptyline.
00B450: 20 01 20 D8 20 16 89 23 0F 2C 11 2C 19 26 2C 15 . . ..#.,.,.&,.
00B460: F4 0D 00 00 70 74 79 6C 69 6E 65 F3 2C 19 17 20 ....ptyline.,..
00B470: 00 06 00 2E 04 C9 00 07 00 38 04 01 C0 00 26 00 .........8....&.
00B480: 42 04 01 C0 20 72 65 61 64 73 20 61 20 73 74 72 B... reads a str
00B490: 69 6E 67 20 2B 20 70 72 65 74 74 79 20 70 72 69 ing + pretty pri
00B4A0: 6E 74 73 00 0B 00 4C 04 C3 20 03 00 00 F1 00 0E nts...L.. ......
00B4B0: 00 56 04 03 00 00 E1 EF 03 00 00 F1 00 15 00 60 .V.............`
00B4C0: 04 0D 00 00 70 72 65 74 74 79 6C 69 6E 65 F3 EF ....prettyline..
00B4D0: 0E 00 0A 00 6A 04 9F 20 1E 9C 04 00 06 00 74 04 ....j.. ......t.
00B4E0: C9 00 07 00 7E 04 01 C0 00 26 00 88 04 01 C0 20 ....~....&.....
00B4F0: 53 65 74 20 75 70 20 73 74 72 69 6E 67 20 66 6F Set up string fo
00B500: 72 20 70 72 65 74 74 79 20 70 72 69 6E 74 00 07 r pretty print..
00B510: 00 92 04 01 C0 00 16 00 9C 04 0D 00 00 50 54 D2 .............PT.
00B520: EF 0D 00 00 4C 49 4E 45 4C 45 CE 00 18 00 A6 04 ....LINELE......
00B530: D6 20 FF 0E 28 03 00 00 E1 29 20 EE 20 0D 00 00 . ..(....) . ...
00B540: 50 54 D2 00 1D 00 B0 04 20 20 D6 20 AC 28 03 00 PT...... . .(..
00B550: 00 E1 2C 0D 00 00 50 2E 7E 54 D2 2C 0F 29 F2 22 ..,...P.~T.,.)."
00B560: 20 22 00 18 00 BA 04 20 20 20 20 0D 00 00 50 54 "..... ...PT
00B570: D2 EF 0D 00 00 50 54 D2 F5 0F 00 0A 00 C4 04 20 .....PT........
00B580: 20 20 20 D5 00 1F 00 CE 04 20 20 AC 28 03 00 00 ...... .(...
00B590: E1 2C 0D 00 00 50 54 D2 2C 0F 29 EF FF 03 28 1C .,...PT.,.)...(.
00B5A0: FE 00 29 00 41 00 D8 04 20 20 0D 00 00 50 54 D2 ..).A... ...PT.
00B5B0: EF 0D 00 00 50 54 D2 F4 0D 00 00 4C 49 4E 45 4C ....PT.....LINEL
00B5C0: 45 CE 20 01 20 0D 00 00 70 72 65 74 74 79 6C 69 E. . ...prettyli
00B5D0: 6E 65 F3 EF 0D 00 00 70 72 65 74 74 79 6C 69 6E ne.....prettylin
00B5E0: 65 F3 F4 0F 00 08 00 E2 04 20 20 D5 00 06 00 EC e........ .....
00B5F0: 04 C9 00 07 00 F6 04 01 C0 00 35 00 00 05 01 C0 ..........5.....
00B600: 20 53 75 62 72 6F 75 74 69 6E 65 20 74 6F 20 70 Subroutine to p
00B610: 72 69 6E 74 20 61 24 20 77 69 74 68 20 43 48 52 rint a$ with CHR
00B620: 24 28 26 46 45 29 20 61 73 20 43 52 4C 46 00 07 $(&FE) as CRLF..
00B630: 00 0A 05 01 C0 00 18 00 14 05 9E 20 0D 00 00 F8 ........... ....
00B640: EF 0F 20 EC 20 FF 0E 28 03 00 00 E1 29 00 18 00 .. . ..(....)...
00B650: 1E 05 03 00 00 E2 EF AC 28 B6 26 03 00 00 E1 2C ........(.&....,
00B660: 0D 00 00 F8 2C 0F 29 00 21 00 28 05 A1 20 03 00 ....,.).!.(.. ..
00B670: 00 E2 EF FF 03 28 1C FE 00 29 EB 20 BF 20 01 97 .....(...). . ..
00B680: 20 BF 20 03 00 00 E2 3B 00 0B 00 32 05 B0 20 0D . ....;...2.. .
00B690: 00 00 F8 00 06 00 3C 05 C9 00 07 00 46 05 01 C0 ......<.....F...
00B6A0: 00 15 00 50 05 01 C0 20 50 72 69 6E 74 20 63 6F ...P... Print co
00B6B0: 6D 6D 65 6E 74 00 07 00 5A 05 01 C0 00 1A 00 64 mment...Z......d
00B6C0: 05 CC 20 0F 2C 1A DC 05 F5 0D 00 00 70 6F 69 6E .. .,.......poin
00B6D0: 74 F3 F6 1A AA 05 00 26 00 6E 05 D8 20 E7 20 0E t......&.n.. . .
00B6E0: 2C 0F 20 01 C0 20 72 6F 75 74 69 6E 65 20 6E 65 ,. .. routine ne
00B6F0: 65 64 73 20 77 69 6E 64 6F 77 20 30 00 1E 00 78 eds window 0...x
00B700: 05 03 00 00 E1 20 EF 20 03 00 00 45 52 4F D2 28 ..... . ...ERO.(
00B710: 0D 00 00 41 4E 53 4E 55 CD 29 00 20 00 82 05 9F ...ANSNU.). ....
00B720: 20 1E 9C 04 20 01 C0 20 70 72 65 74 74 79 20 75 ... .. pretty u
00B730: 70 20 72 65 73 70 6F 6E 73 65 00 37 00 8C 05 A9 p response.7....
00B740: 20 0F 2C 28 0F F4 0D 00 00 6E 75 6D 71 75 65 73 .,(.....numques
00B750: F4 29 F6 10 20 01 C0 20 73 65 74 6E 3F 20 63 75 .).. .. setn? cu
00B760: 72 73 6F 72 20 66 6F 72 20 72 65 73 70 6F 6E 73 rsor for respons
00B770: 65 20 20 00 23 00 96 05 9F 20 1E 14 05 20 01 C0 e .#.... ... ..
00B780: 20 50 72 69 6E 74 20 70 72 65 74 74 79 20 72 65 Print pretty re
00B790: 73 70 6F 6E 73 65 00 10 00 A0 05 D8 20 E7 20 0E sponse...... . .
00B7A0: 2C 0F 20 01 20 C9 00 07 00 AA 05 01 C0 00 29 00 ,. . .........).
00B7B0: B4 05 A9 20 0F 2C 28 10 F4 0D 00 00 6E 75 6D 71 ... .,(.....numq
00B7C0: 75 65 73 F4 29 F6 10 F5 0D 00 00 70 72 65 74 74 ues.)......prett
00B7D0: 79 6C 69 6E 65 F3 00 22 00 BE 05 9F 20 1E 14 05 yline..".... ...
00B7E0: 20 01 C0 20 50 72 69 6E 74 20 61 6C 74 65 72 65 .. Print altere
00B7F0: 64 20 73 74 72 69 6E 67 00 10 00 C8 05 D8 20 E7 d string...... .
00B800: 20 0E 2C 0F 20 01 20 C9 00 07 00 D2 05 01 C0 00 .,. . .........
00B810: 1A 00 DC 05 01 C0 20 44 61 74 61 20 66 6F 72 20 ...... Data for
00B820: 71 75 65 73 74 69 6F 6E 73 00 0F 00 E6 05 01 C0 questions.......
00B830: 20 46 6F 72 6D 61 74 3A 00 18 00 F0 05 01 C0 20 Format:.......
00B840: 48 65 61 64 69 6E 67 20 66 6F 72 20 54 65 73 74 Heading for Test
00B850: 00 1A 00 FA 05 01 C0 20 46 6F 72 20 65 B3 44 61 ....... For e.Da
00B860: 63 68 20 71 75 65 73 74 69 6F 6E 3A 00 18 00 04 ch question:....
00B870: 06 01 C0 20 20 20 20 51 75 65 73 74 69 6F 6E 20 ... Question
00B880: 74 65 78 74 00 20 00 0E 06 01 C0 20 20 20 20 4E text. ..... N
00B890: 75 6D 62 65 72 20 6F 66 20 61 6E 73 77 65 72 73 umber of answers
00B8A0: 20 28 4E 29 00 39 00 18 06 01 C0 20 20 20 20 54 (N).9..... T
00B8B0: 65 78 74 20 6F 66 20 65 61 63 68 20 61 6E 73 77 ext of each answ
00B8C0: 65 72 20 28 20 6D 75 73 74 20 62 65 20 4E 20 69 er ( must be N i
00B8D0: 74 65 6D 73 20 6F 66 20 74 65 78 74 29 00 33 00 tems of text).3.
00B8E0: 22 06 01 C0 20 20 20 20 43 6F 72 72 65 63 74 20 "... Correct
00B8F0: 61 6E 73 77 65 72 20 28 41 2D 46 29 20 20 77 68 answer (A-F) wh
00B900: 65 72 65 20 41 3D 31 2C 42 3D 32 20 65 74 63 2E ere A=1,B=2 etc.
00B910: 00 3F 00 2C 06 01 C0 20 20 20 20 54 65 78 74 20 .?.,... Text
00B920: 66 6F 72 20 65 61 63 68 20 61 6E 73 77 65 72 20 for each answer
00B930: 69 6E 20 73 61 6D 65 20 6F 72 64 65 72 20 28 6D in same order (m
00B940: 75 73 74 20 62 65 20 4E 20 69 74 65 6D 73 29 00 ust be N items).
00B950: 1C 00 36 06 01 C0 20 41 66 74 65 72 20 61 6C FD ..6... After al.
00B960: 0C 6C 20 71 75 65 73 74 69 6F 6E 73 3A 00 28 00 .l questions:.(.
00B970: 40 06 01 C0 20 22 20 20 20 20 20 20 20 20 20 45 @... " E
00B980: 6E 64 20 6F 66 20 54 65 73 74 22 20 28 65 78 61 nd of Test" (exa
00B990: 63 74 6C 79 29 00 07 00 4A 06 01 C0 00 25 00 54 ctly)...J....%.T
00B9A0: 06 8C 20 22 53 65 6C 66 20 41 73 73 65 73 73 6D .. "Self Assessm
00B9B0: 65 6E 74 20 54 65 73 74 20 2D 20 43 68 2E 20 38 ent Test - Ch. 8
00B9C0: 22 00 07 00 5E 06 01 C0 00 7F 00 68 06 8C 20 22 "...^......h.. "
00B9D0: 46 6F 72 20 77 68 61 74 20 64 75 72 61 74 69 6F For what duratio
00B9E0: 6E 20 77 69 6C 6C 20 65 61 63 68 20 63 6F 6C 6F n will each colo
00B9F0: 75 72 20 73 74 61 79 20 6F 6E 20 74 68 65 20 73 ur stay on the s
00BA00: 63 72 65 65 6E 20 61 66 74 65 72 20 74 68 65 20 creen after the
00BA10: 66 6F 6C 6C 6F 77 69 6E 67 20 6C 69 6E 65 3A 20 following line:
00BA20: 20 20 20 20 20 20 20 20 20 20 20 20 49 4E 4B 20 INK
00BA30: 31 2C 31 30 2C 31 37 3A 53 50 45 45 44 20 49 4E 1,10,17:SPEED IN
00BA40: 4B 20 35 2C 31 30 22 00 27 00 72 06 8C 20 34 2C K 5,10".'.r.. 4,
00BA50: 22 43 6F 6C 2E 31 30 3A 35 20 73 65 63 73 2C 43 "Col.10:5 secs,C
00BA60: 6F 11 2E FF FF FF FF 11 7E 09 B3 04 B3 04 F8 04 o.......~.......
00BA70: 78 09 02 10 08 0F 00 07 01 00 2C 53 41 54 38 00 x.........,SAT8.
00BA80: 00 00 00 00 00 00 00 00 00 00 00 03 FF 00 82 05 ................
00BA90: 70 11 00 82 15 00 00 00 00 00 00 00 00 00 00 00 p...............
00BAA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BAB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BAC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BAD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BAE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BAF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BB00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BB10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BB20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BB30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BB40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BB50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BB60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00BB70: 00 00 00 00 00 00 00 00 00 00 00 FD 8A FF FF FF ................
00BB80: FF 11 7E 09 EA 04 7C 04 FD 04 7C 09 02 10 08 21 ..~...|...|....!
00BB90: 27 11 06 00 16 6C 2E 31 37 3A 31 30 20 73 65 63 '....l.17:10 sec
00BBA0: 73 22 00 24 00 7C 06 8C 20 22 43 6F 6C 2E 31 30 s".$.|.. "Col.10
00BBB0: 3A 31 20 73 65 63 2C 43 6F 6C 2E 31 37 3A 32 20 :1 sec,Col.17:2
00BBC0: 73 65 63 73 22 20 00 28 00 86 06 8C 20 22 43 6F secs" .(.... "Co
00BBD0: 6C 2E 31 30 3A 30 2E 31 20 73 65 63 73 2C 43 6F l.10:0.1 secs,Co
00BBE0: 6C 2E 31 37 3A 30 2E 32 20 73 65 63 73 22 00 28 l.17:0.2 secs".(
00BBF0: 00 90 06 8C 20 22 43 6F 6C 2E 31 30 3A 30 2E 32 .... "Col.10:0.2
00BC00: 20 73 65 63 73 2C 43 6F 6C 2E 31 37 3A 30 2E 31 secs,Col.17:0.1
00BC10: 20 73 65 63 73 22 00 49 00 9A 06 8C 20 43 2C 22 secs".I.... C,"
00BC20: 4E 6F 2C 20 74 68 65 20 73 70 65 65 64 20 69 73 No, the speed is
00BC30: 20 6D 65 61 73 75 72 65 64 20 69 6E 20 31 2F 35 measured in 1/5
00BC40: 30 74 68 73 20 6F 66 20 61 20 73 65 63 6F 6E 64 0ths of a second
00BC50: 20 2D 20 61 6E 73 77 65 72 20 69 73 20 43 22 00 - answer is C".
00BC60: 47 00 A4 06 8C 20 22 4E 6F 2C 20 74 68 65 20 73 G.... "No, the s
00BC70: 70 65 65 64 20 69 73 20 6D 65 61 73 75 72 65 64 peed is measured
00BC80: 20 69 6E 20 31 2F 35 30 74 68 73 20 6F 66 20 61 in 1/50ths of a
00BC90: 20 73 65 63 6F EA A0 6E 64 20 2D 20 61 6E 73 77 seco..nd - answ
00BCA0: 65 72 20 69 73 20 43 22 00 38 00 AE 06 8C 20 22 er is C".8.... "
00BCB0: 43 6F 72 72 65 63 74 22 2C 22 4E 6F 2C 20 74 68 Correct","No, th
00BCC0: 65 20 6F 74 68 65 72 20 77 61 79 20 72 6F 75 6E e other way roun
00BCD0: 64 20 2D 20 41 6E 73 77 65 72 20 69 73 20 43 22 d - Answer is C"
00BCE0: 00 07 00 B8 06 01 C0 00 8F 00 C2 06 8C 20 22 54 ............. "T
00BCF0: 68 65 20 73 74 61 74 65 6D 65 6E 74 20 54 45 53 he statement TES
00BD00: 54 28 37 35 2C 31 30 37 29 20 77 69 6C 6C 20 72 T(75,107) will r
00BD10: 65 74 75 72 6E 20 74 68 65 20 76 61 6C 75 65 20 eturn the value
00BD20: 2D 31 20 69 66 20 74 68 65 20 49 4E 4B 20 61 74 -1 if the INK at
00BD30: 20 74 68 65 73 65 20 63 6F 2D 6F 72 64 69 6E 61 these co-ordina
00BD40: 74 65 73 20 69 73 20 64 69 66 66 65 72 65 6E 74 tes is different
00BD50: 20 74 6F 20 74 68 61 74 20 6F 66 20 74 68 65 20 to that of the
00BD60: 50 41 50 45 52 2E 20 54 72 75 65 20 6F 72 20 66 PAPER. True or f
00BD70: 61 6C 73 65 3F 22 00 6D 00 CC 06 8C 20 32 2C 54 alse?".m.... 2,T
00BD80: 2C 46 2C 42 2C 22 4E 6F 2C 20 69 74 20 72 65 74 ,F,B,"No, it ret
00BD90: 75 72 6E 73 20 74 68 EB 3A 65 20 49 4E 4B 20 6E urns th.:e INK n
00BDA0: 75 6D 62 65 72 20 6F 66 20 74 68 65 20 70 69 78 umber of the pix
00BDB0: 65 6C 22 2C 22 43 6F 72 72 65 63 74 2C 20 69 74 el","Correct, it
00BDC0: 20 72 65 74 75 72 6E 73 20 74 68 65 20 49 4E 4B returns the INK
00BDD0: 20 6E 75 6D 62 65 72 20 6F 66 20 74 68 65 20 70 number of the p
00BDE0: 69 78 65 6C 22 00 9C 00 D6 06 8C 20 22 54 68 65 ixel"...... "The
00BDF0: 20 66 6F 6C 6C 6F 77 69 6E 67 20 6C 69 6E 65 20 following line
00BE00: 67 69 76 65 73 20 74 68 65 20 70 6F 73 69 74 69 gives the positi
00BE10: 6F 6E 20 77 68 65 72 65 20 74 68 65 20 6E 65 78 on where the nex
00BE20: 74 20 63 68 61 72 61 63 74 65 72 20 77 69 6C 6C t character will
00BE30: 20 61 70 70 65 61 72 20 69 6E 20 4D 6F 64 65 20 appear in Mode
00BE40: 30 2E 20 57 68 61 74 20 73 68 6F 75 6C 64 20 74 0. What should t
00BE50: 68 65 20 63 6F 2D 6F 72 64 69 6E 61 74 65 73 20 he co-ordinates
00BE60: 62 65 20 69 6E 20 4D 6F 64 65 20 31 3F 20 20 20 be in Mode 1?
00BE70: 54 41 47 3A 4D 4F 56 45 20 33 31 30 2C 31 39 30 TAG:MOVE 310,190
00BE80: 22 00 27 00 E0 06 8C 20 33 2C 22 33 31 30 2C 31 ".'.... 3,"310,1
00BE90: 39 30 22 2C 22 36 32 30 2C AB E4 33 38 30 22 2C 90","620,..380",
00BEA0: 22 31 35 35 2C 39 35 22 2C 41 00 78 00 EA 06 8C "155,95",A.x....
00BEB0: 20 22 43 6F 72 72 65 63 74 22 2C 22 4E 6F 2C 20 "Correct","No,
00BEC0: 73 63 72 65 65 6E 20 63 6F 2D 6F 72 64 69 6E 61 screen co-ordina
00BED0: 74 65 73 20 61 72 65 20 74 68 65 20 73 61 6D 65 tes are the same
00BEE0: 20 69 6E 20 61 6C 6C 20 6D 6F 64 65 73 22 2C 22 in all modes","
00BEF0: 4E 6F 2C 20 73 63 72 65 65 6E 20 63 6F 2D 6F 72 No, screen co-or
00BF00: 64 69 6E 61 74 65 73 20 61 72 65 20 74 68 65 20 dinates are the
00BF10: 73 61 6D 65 20 69 6E 20 61 6C 6C 20 6D 6F 64 65 same in all mode
00BF20: 73 22 00 07 00 F4 06 01 C0 00 35 00 FE 06 8C 20 s"........5....
00BF30: 22 4C 4F 43 41 54 45 20 68 61 73 20 6E 6F 20 65 "LOCATE has no e
00BF40: 66 66 65 63 74 20 77 68 69 6C 65 20 54 41 47 20 ffect while TAG
00BF50: 69 73 20 62 65 69 6E 67 20 75 73 65 64 22 00 C3 is being used"..
00BF60: 00 08 07 8C 20 32 2C 54 2C 46 2C 42 2C 22 4E 6F .... 2,T,F,B,"No
00BF70: 2C 20 54 41 47 4F 46 46 20 77 69 6C 6C 20 61 6C , TAGOFF will al
00BF80: 6C 6F 77 20 74 68 65 20 6E 65 78 74 20 63 68 61 low the next cha
00BF90: 72 61 63 74 65 72 20 74 6F 20 62 73 46 65 20 70 racter to bsFe p
00BFA0: 72 69 6E 74 65 64 20 61 74 20 74 68 65 20 63 75 rinted at the cu
00BFB0: 72 72 65 6E 74 20 63 75 72 73 6F 72 20 70 6F 73 rrent cursor pos
00BFC0: 69 74 69 6F 6E 22 2C 22 43 6F 72 72 65 63 74 2C ition","Correct,
00BFD0: 20 54 41 47 4F 46 46 20 77 69 6C 6C 20 61 6C 6C TAGOFF will all
00BFE0: 6F 77 20 74 68 65 20 6E 65 78 74 20 63 68 61 72 ow the next char
00BFF0: 61 63 74 65 72 20 74 6F 20 62 65 20 70 72 69 6E acter to be prin
00C000: 74 65 64 20 61 74 20 74 68 65 20 63 75 72 72 65 ted at the curre
00C010: 6E 74 20 63 75 72 73 6F 72 20 70 6F 73 69 74 69 nt cursor positi
00C020: 6F 6E 22 00 07 00 12 07 01 C0 00 56 00 1C 07 8C on"........V....
00C030: 20 22 57 68 61 74 20 76 61 6C 75 65 20 77 6F 75 "What value wou
00C040: 6C 64 20 54 45 53 54 28 31 33 30 2C 31 32 30 29 ld TEST(130,120)
00C050: 20 72 65 74 75 72 6E 20 61 66 74 65 72 20 74 68 return after th
00C060: 65 20 66 6F 6C 6C 6F 77 69 6E 67 20 6C 69 6E 65 e following line
00C070: 20 50 4C 4F 54 20 31 33 30 2C 31 32 30 2C 32 22 PLOT 130,120,2"
00C080: 00 68 00 26 07 8C 20 33 2C 30 2C 2D 31 2C 32 2C .h.&.. 3,0,-1,2,
00C090: 43 2C 22 4E 6F 2C 20 74 68 65 20 61 6E 55 55 73 C,"No, the anUUs
00C0A0: 77 65 72 20 69 73 20 74 68 65 20 69 6E 6B 20 63 wer is the ink c
00C0B0: 6F 6C 6F 75 72 20 2D 20 43 22 2C 22 4E 6F 2C 20 olour - C","No,
00C0C0: 74 68 65 20 61 6E 73 77 65 72 20 69 73 20 74 68 the answer is th
00C0D0: 65 20 69 6E 6B 20 63 6F 6C 6F 75 72 20 2D 20 43 e ink colour - C
00C0E0: 22 2C 43 6F 72 72 65 63 74 20 00 07 00 30 07 01 ",Correct ...0..
00C0F0: C0 00 1D 00 3A 07 8C 20 22 20 20 20 20 20 20 20 ....:.. "
00C100: 20 20 45 6E 64 20 6F 66 20 54 65 73 74 22 00 10 End of Test"..
00C110: 00 44 07 8C 20 31 2C 22 22 2C 41 2C 22 22 00 00 .D.. 1,"",A,""..
00C120: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C130: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C140: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C150: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C160: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C180: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C190: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 B9 ................
00C1A0: C2 FF FF FF FF 11 82 09 B3 04 B3 04 FB 04 7C 09 ..............|.
00C1B0: 02 10 08 10 00 07 01 00 2C 53 41 54 39 00 00 00 ........,SAT9...
00C1C0: 00 00 00 00 00 00 00 00 00 01 00 00 00 08 70 01 ..............p.
00C1D0: FF C3 14 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C1E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C1F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C200: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C210: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C220: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C230: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C240: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C250: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C260: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C270: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C280: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C290: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C2A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00C2B0: 00 00 00 00 00 00 00 00 00 C2 63 FF FF FF FF 11 ..........c.....
00C2C0: 83 09 B3 04 B3 04 FE 04 7F 09 02 10 08 78 0A 15 .............x..
00C2D0: 08 00 16 07 00 64 00 01 C0 00 2C 00 6E 00 01 C0 .....d....,.n...
00C2E0: 20 53 65 6C 66 20 41 73 73 65 73 73 6D 65 6E 74 Self Assessment
00C2F0: 20 54 65 73 74 73 20 3A 20 42 41 53 49 43 20 42 Tests : BASIC B
00C300: 6F 6F 6B 20 32 00 07 00 78 00 01 C0 00 12 00 82 ook 2...x.......
00C310: 00 01 C0 20 44 41 20 39 2F 31 32 2F 38 34 00 07 ... DA 9/12/84..
00C320: 00 8C 00 01 C0 00 18 00 96 00 01 C0 20 50 72 6F ............ Pro
00C330: 67 72 61 6D 6D 65 72 73 20 6B 65 79 73 00 07 00 grammers keys...
00C340: A0 00 01 C0 00 10 00 AA 00 A4 20 0E 2C 22 6C 69 .......... .,"li
00C350: 73 74 0D 22 00 0F 00 B4 00 A4 20 0F 2C 22 72 75 st."...... .,"ru
00C360: 6E 0D 22 00 3B 00 BE 00 A4 20 10 2C 22 6D 6F 64 n.".;.... .,"mod
00C370: 65 20 32 3A 70 61 70 65 72 20 30 3A 70 65 6E 20 e 2:paper 0:pen
00C380: 31 3A 69 6E 6B 20 30 2C 32 33 3A 69 6E 6B 20 31 1:ink 0,23:ink 1
00C390: 2C 30 3A 62 6F 72 64 65 72 20 31 33 0D 22 00 15 ,0:border 13."..
00C3A0: 00 C8 00 A4 20 11 2C 22 72 65 6E 75 6D 20 31 30 .... .,"renum 10
00C3B0: 30 0D 22 00 0C 00 D2 00 A4 20 12 2C 22 FF 22 00 0."...... .,".".
00C3C0: 07 00 DC 00 01 C0 00 0C 00 E6 00 B3 20 9F 20 1E ............ . .
00C3D0: C0 03 00 93 32 2C 00 F0 00 01 C0 20 61 72 72 61 ....2,..... arra
00C3E0: 79 73 20 65 72 6F 72 24 2C 71 75 65 73 24 20 28 ys eror$,ques$ (
00C3F0: 6E 6F 74 20 64 69 6D 65 6E 73 69 6F 6E 65 64 29 not dimensioned)
00C400: 00 07 00 FA 00 01 C0 00 0E 00 04 01 01 C0 20 53 .............. S
00C410: 65 74 2D 75 70 00 07 00 0E 01 01 C0 00 26 00 18 et-up........&..
00C420: 01 AD 20 0F 01 82 20 19 11 01 A2 20 0E 2C 19 13 .. ... .... .,..
00C430: 01 A2 20 0F 2C 0E 01 A2 20 10 2C 0F 01 A2 20 11 .. .,... .,... .
00C440: 2C 14 00 2D 00 22 01 CF 20 19 FF 2C 1C 36 00 2C ,..-.".. ..,.6.,
00C450: 1C 36 00 2C 1C 36 00 20 01 C0 20 73 65 74 20 75 .6.,.6. .. set u
00C460: 70 20 66 61 6B 65 20 22 71 75 6F 74 65 73 22 00 p fake "quotes".
00C470: 2B 00 2C 01 0D 00 00 73 63 6F 72 E5 EF 0E 01 0D +.,....scor.....
00C480: 00 00 71 75 65 73 74 69 6F EE EF 0F 01 0D 00 00 ..questio.......
00C490: 6C 69 6E 65 6C 65 EE EF 19 21 00 10 00 36 01 03 linele...!...6..
00C4A0: 00 00 54 C2 EF FF 03 28 17 29 00 2A 00 40 01 9F ..T....(.).*.@..
00C4B0: 20 1E 42 04 20 01 C0 20 72 65 61 64 20 61 20 73 .B. .. read a s
00C4C0: 74 72 69 6E 67 20 2B 20 70 72 65 74 74 79 20 73 tring + pretty s
00C4D0: 65 74 75 70 00 C1 09 1C 00 4A 01 9F 20 1E FC 03 etup.....J.. ...
00C4E0: 20 01 C0 20 53 65 74 20 75 70 20 77 69 6E 64 6F .. Set up windo
00C4F0: 77 73 00 2B 00 54 01 9F 20 1E 14 05 20 01 C0 20 ws.+.T.. ... ..
00C500: 50 72 69 6E 74 20 73 74 72 69 6E 67 20 72 65 61 Print string rea
00C510: 64 20 61 73 20 70 72 65 74 74 79 65 64 00 33 00 d as prettyed.3.
00C520: 5E 01 A9 20 23 0F 2C 17 2C 15 01 BF 23 0F 2C 22 ^.. #.,.,...#.,"
00C530: 50 72 65 73 73 20 53 50 41 43 45 20 74 6F 20 73 Press SPACE to s
00C540: 74 61 72 74 22 01 D6 20 FF 43 F2 22 20 22 01 D5 tart".. .C." "..
00C550: 00 07 00 68 01 01 C0 00 11 00 72 01 01 C0 20 4D ...h......r... M
00C560: 61 69 6E 20 6C 6F 6F 70 00 07 00 7C 01 01 C0 00 ain loop...|....
00C570: 12 00 86 01 0D 00 00 6C 69 6E 65 6C 65 EE EF 19 .......linele...
00C580: 21 00 2A 00 90 01 9F 20 1E 42 04 20 01 C0 20 72 !.*.... .B. .. r
00C590: 65 61 64 20 61 20 73 74 72 69 6E 67 20 2B 20 70 ead a string + p
00C5A0: 72 65 74 74 79 20 73 65 74 75 70 00 1F 00 9A 01 retty setup.....
00C5B0: 0D 00 00 70 74 79 6C 69 6E 65 F3 EF 0D 00 00 70 ...ptyline.....p
00C5C0: 72 65 74 74 79 6C 69 6E 65 F3 00 07 00 A4 01 01 rettyline.......
00C5D0: C0 00 30 00 AE 01 C3 D9 3E 20 0D 00 00 6E 75 6D ..0.....> ...num
00C5E0: 71 75 65 73 F4 20 20 20 20 20 20 20 01 C0 20 6E ques. .. n
00C5F0: 75 6D 62 65 72 20 6F 66 20 71 75 65 73 74 69 6F umber of questio
00C600: 6E 73 20 00 37 00 B8 01 9E 20 0D 00 00 E9 EF 0F ns .7.... ......
00C610: 20 EC 20 0D 00 00 6E 75 6D 71 75 65 73 F4 20 01 . ...numques. .
00C620: C0 20 6C 6F 6F 70 20 66 6F 72 20 65 61 63 68 20 . loop for each
00C630: 71 75 65 73 74 69 6F 6E 20 20 00 14 00 C2 01 C3 question ......
00C640: 20 03 00 00 71 75 65 F3 28 0D 00 00 E9 29 00 0B ...que.(....)..
00C650: 00 CC 01 B0 20 0D 00 00 E9 00 27 00 D6 01 C3 20 .... .....'....
00C660: 03 00 00 61 6E F3 20 20 20 20 20 01 C0 20 47 65 ...an. .. Ge
00C670: 74 20 63 6F 72 72 65 63 74 20 61 6E 73 77 65 72 t correct answer
00C680: 00 3E 00 E0 01 9E 20 0D 00 00 E9 EF 0F 20 EC 20 .>.... ...... .
00C690: 0D 00 00 6E 75 6D 71 75 65 73 F4 20 01 C0 20 6C ...numques. .. l
00C6A0: 6F 6F 70 20 66 6F 72 20 6E 75 6D 62 65 72 20 6F oop for number o
00C6B0: 66 20 71 75 65 73 74 69 6F 6E 73 20 20 20 00 25 f questions .%
00C6C0: 00 EA 01 C3 20 03 00 00 65 72 6F F2 28 0D 00 00 .... ...ero.(...
00C6D0: E9 29 20 01 C0 20 67 65 74 3E C7 20 72 65 73 70 .) .. get>. resp
00C6E0: 6F 6E 73 65 73 00 0B 00 F4 01 B0 20 0D 00 00 E9 onses...... ....
00C6F0: 00 07 00 FE 01 01 C0 00 0D 00 08 02 8A 20 01 20 ............. .
00C700: 8A 20 23 0F 00 1C 00 12 02 9F 20 1E FC 03 20 01 . #....... ... .
00C710: C0 20 53 65 74 20 75 70 20 77 69 6E 64 6F 77 73 . Set up windows
00C720: 00 30 00 1C 02 A1 20 03 00 00 E1 EF 22 20 20 20 .0.... ....."
00C730: 20 20 20 20 20 20 45 6E 64 20 6F 66 20 54 65 73 End of Tes
00C740: 74 22 20 EB 20 9F 20 1E 14 05 01 A0 20 1E 70 03 t" . . ..... .p.
00C750: 00 36 00 26 02 A9 20 23 12 2C 11 F4 28 0D 00 00 .6.&.. #.,..(...
00C760: 71 75 65 73 74 69 6F EE F0 19 0A 29 2C 11 01 BF questio....),...
00C770: 23 12 2C FF 19 28 0D 00 00 71 75 65 73 74 69 6F #.,..(...questio
00C780: EE 29 3B 22 2E 22 00 28 00 30 02 9F 20 1E 14 05 .);".".(.0.. ...
00C790: 20 20 20 20 01 C0 20 70 72 69 6E 74 20 70 72 65 .. print pre
00C7A0: 74 74 79 27 64 20 71 75 65 73 74 69 6F 6E 00 07 tty'd question..
00C7B0: 00 3A 02 01 C0 00 1B 00 44 02 9E 20 0D 00 00 E9 .:......D.. ....
00C7C0: EF 0F 20 EC 20 0D 00 00 6E 75 6D 71 75 65 73 F4 .. . ...numques.
00C7D0: 00 17 00 4E 02 03 00 00 E1 EF 03 01 80 00 00 71 ...N...........q
00C7E0: 75 65 F3 28 0D 00 00 E9 29 00 23 00 58 02 A9 20 ue.(....).#.X..
00C7F0: 23 0F 2C 10 2C 0D 00 00 E9 F6 10 F5 0F 20 20 01 #.,.,........ .
00C800: C0 20 73 65 74 20 63 75 72 73 6F 72 00 1D 00 62 . set cursor...b
00C810: 02 A1 20 03 00 00 E1 EF 22 54 22 20 EB 20 03 00 .. ....."T" . ..
00C820: 00 E1 EF 22 54 72 75 65 22 00 1E 00 6C 02 A1 20 ..."True"...l..
00C830: 03 00 00 E1 EF 22 46 22 20 EB 20 03 00 00 E1 EF ....."F" . .....
00C840: 22 46 61 6C 73 65 22 00 38 00 76 02 BF 20 23 0F "False".8.v.. #.
00C850: 2C 22 28 22 3B FF 03 28 0D 00 00 E9 F4 19 40 29 ,"(";..(......@)
00C860: 3B 22 29 20 22 3B 20 01 C0 20 50 72 69 6E 74 20 ;") "; .. Print
00C870: 71 75 65 73 74 69 6F 6E 20 6E 75 6D 62 65 72 00 question number.
00C880: 0C 00 80 02 D8 20 E7 20 0E 2C 0F 00 0A 00 8A 02 ..... . .,......
00C890: 9F 20 1E 14 05 00 0C 00 94 02 D8 20 E7 20 0E 2C . ......... . .,
00C8A0: 0F 00 0B 00 9E 02 B0 20 0D 00 00 E9 00 07 00 A8 ....... ........
00C8B0: 02 01 C0 00 12 00 B2 02 01 C0 20 47 65 74 20 61 .......... Get a
00C8C0: 6E 73 77 65 72 00 07 00 BC 02 01 C0 00 1C 00 C6 nswer...........
00C8D0: 02 03 00 00 E1 EF FF 43 01 A1 20 03 00 58 46 00 .......C.. ..XF.
00C8E0: E1 EF 22 22 20 A0 20 1E C6 02 00 3D 00 D0 02 03 .."" . ....=....
00C8F0: 00 00 E1 EF FF 1C 28 03 00 00 E1 29 01 A1 20 03 ......(....).. .
00C900: 00 00 E1 F1 22 41 22 20 FC 20 03 00 00 E1 EE FF ...."A" . ......
00C910: 03 28 19 40 F4 0D 00 00 6E 75 6D 71 75 65 73 F4 .(.@....numques.
00C920: 29 20 A0 20 1E C6 02 00 2A 00 DA 02 0D 00 00 41 ) . ....*......A
00C930: 4E 53 4E 55 CD EF 28 FF 01 28 03 00 00 C1 29 F5 NSNU..(..(....).
00C940: 19 40 29 01 0D 00 00 6C 69 6E 65 6C 65 EE EF 19 .@)....linele...
00C950: 24 00 2F 00 E4 02 A9 20 23 0F 2C 11 2C 0D 00 00 $./.... #.,.,...
00C960: 41 4E 53 4E 55 CD F6 10 F5 0F 01 BB 23 0F 2C 0E ANSNU.......#.,.
00C970: 01 BF 23 0F 2C 03 00 00 C1 3B 01 BB 23 0F 2C 0F ..#.,....;..#.,.
00C980: 00 22 00 EE 02 01 C0 20 68 69 67 68 6C 69 67 68 ."..... highligh
00C990: 74 73 20 73 65 6C 65 63 74 65 64 20 61 6E 73 77 ts selected answ
00C9A0: 65 72 00 2C 00 F8 02 0D 00 00 70 6F 69 6E 74 F3 er.,......point.
00C9B0: EF 0E 01 A1 20 03 00 00 E1 EF 03 00 00 61 6E F3 .... ........an.
00C9C0: 20 EB 20 0D 00 00 70 6F 69 6E 74 F3 EF 0F 00 20 . ...point....
00C9D0: 00 02 03 0D 00 00 73 63 6F 72 E5 EF 0D 00 00 48 ......scor.....H
00C9E0: FC 73 63 6F 72 E5 F4 0D 00 00 70 6F 69 6E 74 F3 .scor.....point.
00C9F0: 00 1C 00 0C 03 9F 20 1E 64 05 20 01 C0 20 70 72 ...... .d. .. pr
00CA00: 69 6E 74 20 72 65 73 70 6F 6E 73 65 00 3A 00 16 int response.:..
00CA10: 03 A9 20 23 0F 2C 16 2C 19 11 F5 0D 00 00 70 74 .. #.,.,......pt
00CA20: 79 6C 69 6E 65 F3 01 BF 23 0F 2C 22 50 72 65 73 yline...#.,"Pres
00CA30: 73 20 53 50 41 43 45 20 74 6F 20 63 6F 6E 74 69 s SPACE to conti
00CA40: 6E 75 65 22 20 20 00 25 00 20 03 03 00 00 C9 EF nue" .%. ......
00CA50: 22 22 20 01 20 D6 20 03 00 00 C9 EF 22 22 01 20 "" . . ....."".
00CA60: 03 00 00 C9 EF FF 43 20 01 20 D5 00 2D 00 2A 03 ......C . ..-.*.
00CA70: A1 20 03 00 00 C9 EF 03 00 00 54 C2 20 EB 20 0D . ........T. . .
00CA80: 00 00 6C 69 6E 65 6C 65 EE EF 19 21 01 9F 20 1E ..linele...!.. .
00CA90: 56 04 01 A0 20 1E 08 02 00 15 00 34 03 A1 20 03 V... ......4.. .
00CAA0: 00 00 C9 F2 22 20 22 20 A0 20 1E 20 03 00 1E 00 ...." " . . ....
00CAB0: 3E 03 0D 00 00 71 75 65 73 74 69 6F EE EF 0D 00 >....questio....
00CAC0: 00 71 75 65 73 74 69 6F EE F4 0F 00 0A 00 48 03 .questio......H.
00CAD0: A0 20 1E 86 01 00 07 00 52 03 01 C0 00 18 00 5C . ......R......\
00CAE0: 03 78 48 FF FF FF FF 11 84 09 EA 04 7C 04 FC 04 .xH.........|...
00CAF0: 83 09 02 10 08 10 00 07 01 00 2C 53 41 54 39 00 ..........,SAT9.
00CB00: 00 00 00 00 00 00 00 00 00 00 00 02 00 00 00 08 ................
00CB10: 70 09 00 C3 14 00 00 00 00 00 00 00 00 00 00 00 p...............
00CB20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00CB30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00CB40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00CB50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00CB60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00CB70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00CB80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00CB90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00CBA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00CBB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00CBC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00CBD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00CBE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00CBF0: 00 00 00 00 00 00 00 00 00 00 00 62 D0 FF FF FF ...........b....
00CC00: FF 11 85 09 B3 04 B3 04 FF 04 82 09 02 10 08 7D ...............}
00CC10: 0A 15 08 00 16 01 C0 20 45 6E 64 20 71 75 69 7A ....... End quiz
00CC20: 20 72 6F 75 74 69 6E 65 00 07 00 66 03 01 C0 00 routine...f....
00CC30: 0D 00 70 03 A9 20 23 0F 2C 16 2C 15 00 36 00 7A ..p.. #.,.,..6.z
00CC40: 03 BF 20 23 0F 2C 22 59 6F 75 20 73 63 6F 72 65 .. #.,"You score
00CC50: 64 22 3B 0D 00 00 73 63 6F 72 E5 3B 22 6F 75 74 d";...scor.;"out
00CC60: 20 6F 66 22 3B 0D 00 00 71 75 65 73 74 69 6F EE of";...questio.
00CC70: F5 0F 00 33 00 84 03 A9 20 23 0F 2C 12 2C 19 0A ...3.... #.,.,..
00CC80: 01 BF 23 0F 2C 22 50 72 65 73 73 20 53 50 41 43 ..#.,"Press SPAC
00CC90: 45 20 74 6F 20 72 75 6E 20 74 68 65 20 70 72 6F E to run the pro
00CCA0: 67 72 61 6D 22 00 31 00 8E 03 A9 20 23 0F 2C 13 gram".1.... #.,.
00CCB0: 2C 19 0C 01 BF 23 0F 2C 22 61 67 61 69 6E 2C 20 ,....#.,"again,
00CCC0: 20 6F 72 20 45 53 43 2F 45 53 43 20 74 6F 20 66 or ESC/ESC to f
00CCD0: 69 6E 69 73 68 22 00 11 00 98 03 D6 20 FF 43 F2 inish"...... .C.
00CCE0: 22 20 22 01 D5 01 CA 00 07 00 A2 03 01 C0 00 20 " "............
00CCF0: 00 AC 03 01 C0 20 49 6E 74 65 72 63 65 70 74 20 ..... Intercept
00CD00: 45 53 43 41 50 45 20 72 6F 75 74 69 6E 65 00 07 ESCAPE routine..
00CD10: 00 B6 03 01 C0 6A 6B 00 1F 00 C0 03 AD 20 0F 20 .....jk...... .
00CD20: 01 82 20 0F 20 01 20 A2 20 0E 2C 0F 20 01 20 A2 .. . . . .,. . .
00CD30: 20 0F 2C 19 19 20 00 21 00 CA 03 BA 20 0E 01 20 .,.. .!.... ..
00CD40: BB 20 0F 20 01 C0 20 72 65 73 74 6F 72 65 20 64 . . .. restore d
00CD50: 65 66 61 75 6C 74 73 00 06 00 D4 03 98 00 07 00 efaults.........
00CD60: DE 03 01 C0 00 1A 00 E8 03 01 C0 20 49 6E 69 74 ........... Init
00CD70: 69 61 6C 69 73 65 20 77 69 6E 64 6F 77 73 00 07 ialise windows..
00CD80: 00 F2 03 01 C0 00 12 00 FC 03 BA 20 23 11 2C 10 ........... #.,.
00CD90: 20 01 20 8A 20 23 11 00 3D 00 06 04 D8 20 23 0E . . #..=.... #.
00CDA0: 2C 10 2C 19 27 2C 10 2C 12 F4 0D 00 00 70 74 79 ,.,.',.,.....pty
00CDB0: 6C 69 6E 65 F3 20 01 20 D8 20 23 0F 2C 10 2C 19 line. . . #.,.,.
00CDC0: 27 2C 14 F4 0D 00 00 70 74 79 6C 69 6E 65 F3 2C ',.....ptyline.,
00CDD0: 19 18 20 20 00 0E 00 10 04 BA 20 0E 01 BB 20 0F .. ...... ... .
00CDE0: 01 8A 00 12 00 1A 04 BA 20 23 0F 2C 11 20 01 20 ........ #.,. .
00CDF0: 8A 20 23 0F 00 3C 00 24 04 D8 20 23 0E 2C 14 2C . #..<.$.. #.,.,
00CE00: 19 26 2C 11 2C 12 F4 0D 00 00 70 74 79 6C 69 6E .&,.,.....ptylin
00CE10: 65 F3 20 01 20 D8 20 16 89 23 0F 2C 11 2C 19 26 e. . . ..#.,.,.&
00CE20: 2C 15 F4 0D 00 00 70 74 79 6C 69 6E 65 F3 2C 19 ,.....ptyline.,.
00CE30: 17 20 00 06 00 2E 04 C9 00 07 00 38 04 01 C0 00 . .........8....
00CE40: 26 00 42 04 01 C0 20 72 65 61 64 73 20 61 20 73 &.B... reads a s
00CE50: 74 72 69 6E 67 20 2B 20 70 72 65 74 74 79 20 70 tring + pretty p
00CE60: 72 69 6E 74 73 00 0B 00 4C 04 C3 20 03 00 00 F1 rints...L.. ....
00CE70: 00 0E 00 56 04 03 00 00 E1 EF 03 00 00 F1 00 15 ...V............
00CE80: 00 60 04 0D 00 00 70 72 65 74 74 79 6C 69 6E 65 .`....prettyline
00CE90: F3 EF 0E 00 0A 00 6A 04 9F 20 1E 9C 04 00 06 00 ......j.. ......
00CEA0: 74 04 C9 00 07 00 7E 04 01 C0 00 26 00 88 04 01 t.....~....&....
00CEB0: C0 20 53 65 74 20 75 70 20 73 74 72 69 6E 67 20 . Set up string
00CEC0: 66 6F 72 20 70 72 65 74 74 79 20 70 72 69 6E 74 for pretty print
00CED0: 00 07 00 92 04 01 C0 00 16 00 9C 04 0D 00 00 50 ...............P
00CEE0: 54 D2 EF 0D 00 00 4C 49 4E 45 4C 45 CE 00 18 00 T.....LINELE....
00CEF0: A6 04 D6 20 FF 0E 28 03 00 00 E1 29 20 EE 20 0D ... ..(....) . .
00CF00: 00 00 50 54 D2 00 1D 00 B0 04 20 20 D6 20 AC 28 ..PT...... . .(
00CF10: 03 00 00 E1 2C 0D 00 00 50 2E 7E 54 D2 2C 0F 29 ....,...P.~T.,.)
00CF20: F2 22 20 22 00 18 00 BA 04 20 20 20 20 0D 00 00 ." "..... ...
00CF30: 50 54 D2 EF 0D 00 00 50 54 D2 F5 0F 00 0A 00 C4 PT.....PT.......
00CF40: 04 20 20 20 20 D5 00 1F 00 CE 04 20 20 AC 28 03 . ...... .(.
00CF50: 00 00 E1 2C 0D 00 00 50 54 D2 2C 0F 29 EF FF 03 ...,...PT.,.)...
00CF60: 28 1C FE 00 29 00 41 00 D8 04 20 20 0D 00 00 50 (...).A... ...P
00CF70: 54 D2 EF 0D 00 00 50 54 D2 F4 0D 00 00 4C 49 4E T.....PT.....LIN
00CF80: 45 4C 45 CE 20 01 20 0D 00 00 70 72 65 74 74 79 ELE. . ...pretty
00CF90: 6C 69 6E 65 F3 EF 0D 00 00 70 72 65 74 74 79 6C line.....prettyl
00CFA0: 69 6E 65 F3 F4 0F 00 08 00 E2 04 20 20 D5 00 06 ine........ ...
00CFB0: 00 EC 04 C9 00 07 00 F6 04 01 C0 00 35 00 00 05 ............5...
00CFC0: 01 C0 20 53 75 62 72 6F 75 74 69 6E 65 20 74 6F .. Subroutine to
00CFD0: 20 70 72 69 6E 74 20 61 24 20 77 69 74 68 20 43 print a$ with C
00CFE0: 48 52 24 28 26 46 45 29 20 61 73 20 43 52 4C 46 HR$(&FE) as CRLF
00CFF0: 00 07 00 0A 05 01 C0 00 18 00 14 05 9E 20 0D 00 ............. ..
00D000: 00 F8 EF 0F 20 EC 20 FF 0E 28 03 00 00 E1 29 00 .... . ..(....).
00D010: 18 00 1E 05 03 00 00 E2 EF AC 28 B6 26 03 00 00 ..........(.&...
00D020: E1 2C 0D 00 00 F8 2C 0F 29 00 21 00 28 05 A1 20 .,....,.).!.(..
00D030: 03 00 00 E2 EF FF 03 28 1C FE 00 29 EB 20 BF 20 .......(...). .
00D040: 01 97 20 BF 20 03 00 00 E2 3B 00 0B 00 32 05 B0 .. . ....;...2..
00D050: 20 0D 00 00 F8 00 06 00 3C 05 C9 00 07 00 46 05 .......<.....F.
00D060: 01 C0 00 15 00 50 05 01 C0 20 50 72 69 6E 74 20 .....P... Print
00D070: 63 6F 6D 6D 65 6E 74 00 07 00 5A 05 01 C0 00 1A comment...Z.....
00D080: 00 64 05 CC 20 0F 2C 1A DC 05 F5 0D 00 00 70 6F .d.. .,.......po
00D090: 69 6E 74 F3 F6 1A AA 05 00 26 00 6E 05 D8 20 E7 int......&.n.. .
00D0A0: 20 0E 2C 0F 20 01 C0 20 72 6F 75 74 69 6E 65 20 .,. .. routine
00D0B0: 6E 65 65 64 73 20 77 69 6E 64 6F 77 20 30 00 1E needs window 0..
00D0C0: 00 78 05 03 00 00 E1 20 EF 20 03 00 00 45 52 4F .x..... . ...ERO
00D0D0: D2 28 0D 00 00 41 4E 53 4E 55 CD 29 00 20 00 82 .(...ANSNU.). ..
00D0E0: 05 9F 20 1E 9C 04 20 01 C0 20 70 72 65 74 74 79 .. ... .. pretty
00D0F0: 20 75 70 20 72 65 73 70 6F 6E 73 65 00 37 00 8C up response.7..
00D100: 05 A9 20 0F 2C 28 0F F4 0D 00 00 6E 75 6D 71 75 .. .,(.....numqu
00D110: 65 73 F4 29 F6 10 20 01 C0 20 73 65 74 6E 3F 20 es.).. .. setn?
00D120: 63 75 72 73 6F 72 20 66 6F 72 20 72 65 73 70 6F cursor for respo
00D130: 6E 73 65 20 20 00 23 00 96 05 9F 20 1E 14 05 20 nse .#.... ...
00D140: 01 C0 20 50 72 69 6E 74 20 70 72 65 74 74 79 20 .. Print pretty
00D150: 72 65 73 70 6F 6E 73 65 00 10 00 A0 05 D8 20 E7 response...... .
00D160: 20 0E 2C 0F 20 01 20 C9 00 07 00 AA 05 01 C0 00 .,. . .........
00D170: 29 00 B4 05 A9 20 0F 2C 28 10 F4 0D 00 00 6E 75 ).... .,(.....nu
00D180: 6D 71 75 65 73 F4 29 F6 10 F5 0D 00 00 70 72 65 mques.)......pre
00D190: 74 74 79 6C 69 6E 65 F3 00 22 00 BE 05 9F 20 1E ttyline..".... .
00D1A0: 14 05 20 01 C0 20 50 72 69 6E 74 20 61 6C 74 65 .. .. Print alte
00D1B0: 72 65 64 20 73 74 72 69 6E 67 00 10 00 C8 05 D8 red string......
00D1C0: 20 E7 20 0E 2C 0F 20 01 20 C9 00 07 00 D2 05 01 . .,. . .......
00D1D0: C0 00 1A 00 DC 05 01 C0 20 44 61 74 61 20 66 6F ........ Data fo
00D1E0: 72 20 71 75 65 73 74 69 6F 6E 73 00 0F 00 E6 05 r questions.....
00D1F0: 01 C0 20 46 6F 72 6D 61 74 3A 00 18 00 F0 05 01 .. Format:......
00D200: C0 20 48 65 61 64 69 6E 67 20 66 6F 72 20 54 65 . Heading for Te
00D210: 73 74 00 1A 00 FA 05 01 C0 20 46 6F 72 20 65 B3 st....... For e.
00D220: 44 61 63 68 20 71 75 65 73 74 69 6F 6E 3A 00 18 Dach question:..
00D230: 00 04 06 01 C0 20 20 20 20 51 75 65 73 74 69 6F ..... Questio
00D240: 6E 20 74 65 78 74 00 20 00 0E 06 01 C0 20 20 20 n text. .....
00D250: 20 4E 75 6D 62 65 72 20 6F 66 20 61 6E 73 77 65 Number of answe
00D260: 72 73 20 28 4E 29 00 39 00 18 06 01 C0 20 20 20 rs (N).9.....
00D270: 20 54 65 78 74 20 6F 66 20 65 61 63 68 20 61 6E Text of each an
00D280: 73 77 65 72 20 28 20 6D 75 73 74 20 62 65 20 4E swer ( must be N
00D290: 20 69 74 65 6D 73 20 6F 66 20 74 65 78 74 29 00 items of text).
00D2A0: 33 00 22 06 01 C0 20 20 20 20 43 6F 72 72 65 63 3."... Correc
00D2B0: 74 20 61 6E 73 77 65 72 20 28 41 2D 46 29 20 20 t answer (A-F)
00D2C0: 77 68 65 72 65 20 41 3D 31 2C 42 3D 32 20 65 74 where A=1,B=2 et
00D2D0: 63 2E 00 3F 00 2C 06 01 C0 20 20 20 20 54 65 78 c..?.,... Tex
00D2E0: 74 20 66 6F 72 20 65 61 63 68 20 61 6E 73 77 65 t for each answe
00D2F0: 72 20 69 6E 20 73 61 6D 65 20 6F 72 64 65 72 20 r in same order
00D300: 28 6D 75 73 74 20 62 65 20 4E 20 69 74 65 6D 73 (must be N items
00D310: 29 00 1C 00 36 06 01 C0 20 41 66 74 65 72 20 61 )...6... After a
00D320: 6C FD 0C 6C 20 71 75 65 73 74 69 6F 6E 73 3A 00 l..l questions:.
00D330: 28 00 40 06 01 C0 20 22 20 20 20 20 20 20 20 20 (.@... "
00D340: 20 45 6E 64 20 6F 66 20 54 65 73 74 22 20 28 65 End of Test" (e
00D350: 78 61 63 74 6C 79 29 00 07 00 4A 06 01 C0 00 25 xactly)...J....%
00D360: 00 54 06 8C 20 22 53 65 6C 66 20 41 73 73 65 73 .T.. "Self Asses
00D370: 73 6D 65 6E 74 20 54 65 73 74 20 2D 20 43 68 2E sment Test - Ch.
00D380: 20 39 22 00 07 00 5E 06 01 C0 00 52 00 68 06 8C 9"...^....R.h..
00D390: 20 22 54 68 65 20 74 6F 6E 65 20 65 6E 76 65 6C "The tone envel
00D3A0: 6F 70 65 20 45 4E 54 20 31 2C 20 34 30 2C 34 2C ope ENT 1, 40,4,
00D3B0: 31 20 77 69 6C 6C 20 67 69 76 65 20 61 20 72 69 1 will give a ri
00D3C0: 73 69 6E 67 20 6E 6F 74 65 2E 20 54 72 75 65 20 sing note. True
00D3D0: 6F 72 20 66 61 6C 73 65 22 20 20 20 00 49 00 72 or false" .I.r
00D3E0: 06 8C 20 32 2C 54 2C 46 2C 42 2C 22 4E 6F 2C 20 .. 2,T,F,B,"No,
00D3F0: 69 74 20 67 69 76 65 73 20 79 6F 75 20 61 20 6C it gives you a l
00D400: 65 6E 67 74 68 65 6E 69 6E 67 20 70 65 72 69 6F engthening perio
00D410: 64 2C 20 73 6F 20 61 20 66 61 6C 6C 69 6E 67 20 d, so a falling
00D420: 6E 6F 74 F7 28 FF FF FF FF 11 88 09 B3 04 B3 04 not.(...........
00D430: FE 04 87 09 02 10 08 10 00 07 01 00 2C 53 41 54 ............,SAT
00D440: 39 00 00 00 00 00 00 00 00 00 00 00 00 03 FF 00 9...............
00D450: C3 04 70 11 00 C3 14 00 00 00 00 00 00 00 00 00 ..p.............
00D460: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D470: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D480: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D490: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D4A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D4B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D4C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D4D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D4E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D4F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D500: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D510: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D520: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00D530: 00 00 00 00 00 00 00 00 00 00 00 00 00 11 5E FF ..............^.
00D540: FF FF FF 11 8A 09 B3 04 B3 04 01 05 85 09 02 10 ................
00D550: 08 B3 29 0F 05 00 16 65 22 00 47 00 7C 06 8C 20 ..)....e".G.|..
00D560: 22 43 6F 72 72 65 63 74 2C 20 69 74 20 67 69 76 "Correct, it giv
00D570: 65 73 20 79 6F 75 20 61 20 6C 65 6E 67 74 68 65 es you a lengthe
00D580: 6E 69 6E 67 20 70 65 72 69 6F 64 2C 20 73 6F 20 ning period, so
00D590: 61 20 66 61 6C 6C 69 6E 67 20 6E 6F 74 65 22 20 a falling note"
00D5A0: 00 07 00 86 06 01 C0 00 30 00 90 06 8C 20 22 48 ........0.... "H
00D5B0: 6F 77 20 6D 61 6E 79 20 73 65 63 74 69 6F 6E 73 ow many sections
00D5C0: 20 63 61 6E 20 61 6E 20 65 6E 76 65 6C 6F 70 65 can an envelope
00D5D0: 20 68 61 76 65 3F 22 00 3F 00 9A 06 8C 20 34 2C have?".?.... 4,
00D5E0: 31 2C 33 2C 31 35 2C 35 2C 44 2C 22 4E 6F 2C 20 1,3,15,5,D,"No,
00D5F0: 74 68 65 20 61 6E 73 77 65 72 20 69 73 20 44 22 the answer is D"
00D600: 2C 22 4E 6F 2C 20 74 68 65 20 61 6E 73 77 65 72 ,"No, the answer
00D610: 20 69 73 20 44 22 00 26 00 A4 06 8C 20 22 4E 6F is D".&.... "No
00D620: 2C 20 74 68 65 20 61 6E 73 77 65 72 20 69 73 20 , the answer is
00D630: 44 22 2C 22 43 6F 72 72 65 63 74 22 00 07 00 AE D","Correct"....
00D640: 06 01 C0 00 3E 00 B8 06 8C 20 22 43 61 6E 20 79 ....>.... "Can y
00D650: 6F 75 20 68 61 76 65 5E B4 20 6D 6F 72 65 20 74 ou have^. more t
00D660: 68 61 6E 20 6F 6E 65 20 73 65 63 74 69 6F 6E 20 han one section
00D670: 69 6E 20 61 20 74 6F 6E 65 20 65 6E 76 65 6C 6F in a tone envelo
00D680: 70 65 22 00 6A 00 C2 06 8C 20 32 2C 59 65 73 2C pe".j.... 2,Yes,
00D690: 4E 6F 2C 41 2C 22 43 6F 72 72 65 63 74 2C 20 79 No,A,"Correct, y
00D6A0: 6F 75 20 63 61 6E 20 68 61 76 65 20 75 70 20 74 ou can have up t
00D6B0: 6F 20 66 69 76 65 20 73 65 63 74 69 6F 6E 73 22 o five sections"
00D6C0: 2C 22 4E 6F 74 20 74 72 75 65 2E 20 59 6F 75 20 ,"Not true. You
00D6D0: 63 61 6E 20 68 61 76 65 20 75 70 20 74 6F 20 66 can have up to f
00D6E0: 69 76 65 20 73 65 63 74 69 6F 6E 73 22 00 07 00 ive sections"...
00D6F0: CC 06 01 C0 00 6F 00 D6 06 8C 20 22 57 68 61 74 .....o.... "What
00D700: 20 64 6F 65 73 20 74 68 65 20 73 65 63 6F 6E 64 does the second
00D710: 20 73 65 63 74 69 6F 6E 20 6F 66 20 74 68 69 73 section of this
00D720: 20 76 6F 6C 75 6D 65 20 65 6E 76 65 6C 6F 70 65 volume envelope
00D730: 20 67 69 76 65 20 79 6F 75 3F 20 20 45 4E 56 20 give you? ENV
00D740: 39 2C 20 31 2C 31 35 2C 31 2C 20 31 2C 30 2C 34 9, 1,15,1, 1,0,4
00D750: 30 2C 20 34 2C 2D 32 2C 35 27 98 2C 20 37 2C 2D 0, 4,-2,5'., 7,-
00D760: 31 2C 31 30 22 00 33 00 E0 06 8C 20 33 2C 41 20 1,10".3.... 3,A
00D770: 66 61 73 74 20 61 74 74 61 63 6B 2C 41 20 6C 6F fast attack,A lo
00D780: 6E 67 20 73 75 73 74 61 69 6E 2C 41 20 73 6C 6F ng sustain,A slo
00D790: 77 20 64 65 63 61 79 20 00 3E 00 EA 06 8C 20 42 w decay .>.... B
00D7A0: 2C 22 4E 6F 2C 20 74 68 65 20 61 6E 73 77 65 72 ,"No, the answer
00D7B0: 20 69 73 20 42 22 2C 22 43 6F 72 72 65 63 74 22 is B","Correct"
00D7C0: 2C 22 4E 6F 2C 20 74 68 65 20 61 6E 73 77 65 72 ,"No, the answer
00D7D0: 20 69 73 20 42 22 00 07 00 F4 06 01 C0 00 64 00 is B"........d.
00D7E0: FE 06 8C 20 22 57 68 61 74 20 64 6F 65 73 20 74 ... "What does t
00D7F0: 68 65 20 74 68 69 72 64 20 73 65 63 74 69 6F 6E he third section
00D800: 20 6F 66 20 74 68 69 73 20 74 6F 6E 65 20 65 6E of this tone en
00D810: 76 65 6C 6F 70 65 20 67 69 76 65 3F 20 20 20 20 velope give?
00D820: 20 20 45 4E 54 20 34 2C 20 35 30 2C 31 2C 31 2C ENT 4, 50,1,1,
00D830: 20 31 2C 30 2C 35 30 2C 20 35 30 2C 2D 31 2C 31 1,0,50, 50,-1,1
00D840: 22 00 36 00 08 07 8C 20 33 2C 41 20 66 61 6C 6C ".6.... 3,A fall
00D850: 69 6E 67 20 6E 6F 74 65 2C 41 20 8D D4 72 69 73 ing note,A ..ris
00D860: 69 6E 67 20 6E 6F 74 65 2C 41 20 73 75 73 74 61 ing note,A susta
00D870: 69 6E 65 64 20 6E 6F 74 65 00 3E 00 12 07 8C 20 ined note.>....
00D880: 42 2C 22 4E 6F 2C 20 74 68 65 20 61 6E 73 77 65 B,"No, the answe
00D890: 72 20 69 73 20 42 22 2C 22 43 6F 72 72 65 63 74 r is B","Correct
00D8A0: 22 2C 22 4E 6F 2C 20 74 68 65 20 61 6E 73 77 65 ","No, the answe
00D8B0: 72 20 69 73 20 42 22 00 07 00 1C 07 01 C0 00 5D r is B"........]
00D8C0: 00 26 07 8C 20 22 44 65 73 63 72 69 62 65 20 74 .&.. "Describe t
00D8D0: 68 69 73 20 73 6F 75 6E 64 20 20 20 20 20 20 20 his sound
00D8E0: 20 20 20 20 20 20 45 4E 56 20 31 2C 20 31 35 2C ENV 1, 15,
00D8F0: 31 2C 33 2C 20 31 2C 30 2C 38 30 2C 20 31 2C 2D 1,3, 1,0,80, 1,-
00D900: 31 35 2C 31 20 3A 20 53 4F 55 4E 44 20 37 2C 31 15,1 : SOUND 7,1
00D910: 30 30 2C 31 35 35 2C 30 2C 31 22 00 3C 00 30 07 00,155,0,1".<.0.
00D920: 8C 20 34 2C 22 46 61 73 74 20 61 74 74 61 63 6B . 4,"Fast attack
00D930: 2C 20 66 61 73 74 20 64 65 63 61 79 22 2C 22 46 , fast decay","F
00D940: 61 73 74 20 61 74 74 61 63 6B 2C 20 73 6C 6F 77 ast attack, slow
00D950: 20 64 65 63 61 79 22 00 3C 00 3A 07 8C 61 26 20 decay".<.:..a&
00D960: 22 53 6C 6F 77 20 61 74 74 61 63 6B 2C 20 66 61 "Slow attack, fa
00D970: 73 74 20 64 65 63 61 79 22 2C 22 53 6C 6F 77 20 st decay","Slow
00D980: 61 74 74 61 63 6B 2C 20 73 6C 6F 77 20 64 65 63 attack, slow dec
00D990: 61 79 22 2C 43 00 56 00 44 07 8C 20 22 4E 6F 2C ay",C.V.D.. "No,
00D9A0: 20 74 68 65 20 61 6E 73 77 65 72 20 69 73 20 43 the answer is C
00D9B0: 22 2C 22 4E 6F 2C 20 74 68 65 20 61 6E 73 77 65 ","No, the answe
00D9C0: 72 20 69 73 20 43 22 2C 43 6F 72 72 65 63 74 2C r is C",Correct,
00D9D0: 22 4E 6F 2C 20 74 68 65 20 61 6E 73 77 65 72 20 "No, the answer
00D9E0: 69 73 20 43 22 20 20 20 20 20 20 00 07 00 4E 07 is C" ...N.
00D9F0: 01 C0 00 1D 00 58 07 8C 20 22 20 20 20 20 20 20 .....X.. "
00DA00: 20 20 20 45 6E 64 20 6F 66 20 54 65 73 74 22 00 End of Test".
00DA10: 10 00 62 07 8C 20 31 2C 22 22 2C 41 2C 22 22 00 ..b.. 1,"",A,"".
00DA20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DA30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DA40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DA50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 12 ................
00DA60: 83 FF FF FF FF 11 89 09 B3 04 B3 04 FF 04 84 09 ................
00DA70: 02 10 08 0F 00 07 01 00 2C 53 41 54 31 30 00 00 ........,SAT10..
00DA80: 00 00 00 00 00 00 00 00 00 01 00 00 00 08 70 01 ..............p.
00DA90: FF 48 13 00 00 00 00 00 00 00 00 00 00 00 00 00 .H..............
00DAA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DAB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DAC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DAD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DAE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DAF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DB00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DB10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DB20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DB30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DB40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DB50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DB60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00DB70: 00 00 00 00 00 00 00 00 00 E7 45 FF FF FF FF 11 ..........E.....
00DB80: 89 09 B3 04 B3 04 FF 04 83 09 02 10 08 7B 0A 15 .............{..
00DB90: 08 00 16 07 00 64 00 01 C0 00 2C 00 6E 00 01 C0 .....d....,.n...
00DBA0: 20 53 65 6C 66 20 41 73 73 65 73 73 6D 65 6E 74 Self Assessment
00DBB0: 20 54 65 73 74 73 20 3A 20 42 41 53 49 43 20 42 Tests : BASIC B
00DBC0: 6F 6F 6B 20 32 00 07 00 78 00 01 C0 00 12 00 82 ook 2...x.......
00DBD0: 00 01 C0 20 44 41 20 39 2F 31 32 2F 38 34 00 07 ... DA 9/12/84..
00DBE0: 00 8C 00 01 C0 00 18 00 96 00 01 C0 20 50 72 6F ............ Pro
00DBF0: 67 72 61 6D 6D 65 72 73 20 6B 65 79 73 00 07 00 grammers keys...
00DC00: A0 00 01 C0 00 10 00 AA 00 A4 20 0E 2C 22 6C 69 .......... .,"li
00DC10: 73 74 0D 22 00 0F 00 B4 00 A4 20 0F 2C 22 72 75 st."...... .,"ru
00DC20: 6E 0D 22 00 3B 00 BE 00 A4 20 10 2C 22 6D 6F 64 n.".;.... .,"mod
00DC30: 65 20 32 3A 70 61 70 65 72 20 30 3A 70 65 6E 20 e 2:paper 0:pen
00DC40: 31 3A 69 6E 6B 20 30 2C 32 33 3A 69 6E 6B 20 31 1:ink 0,23:ink 1
00DC50: 2C 30 3A 62 6F 72 64 65 72 20 31 33 0D 22 00 15 ,0:border 13."..
00DC60: 00 C8 00 A4 20 11 2C 22 72 65 6E 75 6D 20 31 30 .... .,"renum 10
00DC70: 30 0D 22 00 0C 00 D2 00 A4 20 12 2C 22 FF 22 00 0."...... .,".".
00DC80: 07 00 DC 00 01 C0 00 0C 00 E6 00 B3 20 9F 20 1E ............ . .
00DC90: C0 03 00 93 32 2C 00 F0 00 01 C0 20 61 72 72 61 ....2,..... arra
00DCA0: 79 73 20 65 72 6F 72 24 2C 71 75 65 73 24 20 28 ys eror$,ques$ (
00DCB0: 6E 6F 74 20 64 69 6D 65 6E 73 69 6F 6E 65 64 29 not dimensioned)
00DCC0: 00 07 00 FA 00 01 C0 00 0E 00 04 01 01 C0 20 53 .............. S
00DCD0: 65 74 2D 75 70 00 07 00 0E 01 01 C0 00 26 00 18 et-up........&..
00DCE0: 01 AD 20 0F 01 82 20 19 11 01 A2 20 0E 2C 19 13 .. ... .... .,..
00DCF0: 01 A2 20 0F 2C 0E 01 A2 20 10 2C 0F 01 A2 20 11 .. .,... .,... .
00DD00: 2C 14 00 2D 00 22 01 CF 20 19 FF 2C 1C 36 00 2C ,..-.".. ..,.6.,
00DD10: 1C 36 00 2C 1C 36 00 20 01 C0 20 73 65 74 20 75 .6.,.6. .. set u
00DD20: 70 20 66 61 6B 65 20 22 71 75 6F 74 65 73 22 00 p fake "quotes".
00DD30: 2B 00 2C 01 0D 00 00 73 63 6F 72 E5 EF 0E 01 0D +.,....scor.....
00DD40: 00 00 71 75 65 73 74 69 6F EE EF 0F 01 0D 00 00 ..questio.......
00DD50: 6C 69 6E 65 6C 65 EE EF 19 21 00 10 00 36 01 03 linele...!...6..
00DD60: 00 00 54 C2 EF FF 03 28 17 29 00 2A 00 40 01 9F ..T....(.).*.@..
00DD70: 20 1E 42 04 20 01 C0 20 72 65 61 64 20 61 20 73 .B. .. read a s
00DD80: 74 72 69 6E 67 20 2B 20 70 72 65 74 74 79 20 73 tring + pretty s
00DD90: 65 74 75 70 00 C1 09 1C 00 4A 01 9F 20 1E FC 03 etup.....J.. ...
00DDA0: 20 01 C0 20 53 65 74 20 75 70 20 77 69 6E 64 6F .. Set up windo
00DDB0: 77 73 00 2B 00 54 01 9F 20 1E 14 05 20 01 C0 20 ws.+.T.. ... ..
00DDC0: 50 72 69 6E 74 20 73 74 72 69 6E 67 20 72 65 61 Print string rea
00DDD0: 64 20 61 73 20 70 72 65 74 74 79 65 64 00 33 00 d as prettyed.3.
00DDE0: 5E 01 A9 20 23 0F 2C 17 2C 15 01 BF 23 0F 2C 22 ^.. #.,.,...#.,"
00DDF0: 50 72 65 73 73 20 53 50 41 43 45 20 74 6F 20 73 Press SPACE to s
00DE00: 74 61 72 74 22 01 D6 20 FF 43 F2 22 20 22 01 D5 tart".. .C." "..
00DE10: 00 07 00 68 01 01 C0 00 11 00 72 01 01 C0 20 4D ...h......r... M
00DE20: 61 69 6E 20 6C 6F 6F 70 00 07 00 7C 01 01 C0 00 ain loop...|....
00DE30: 12 00 86 01 0D 00 00 6C 69 6E 65 6C 65 EE EF 19 .......linele...
00DE40: 21 00 2A 00 90 01 9F 20 1E 42 04 20 01 C0 20 72 !.*.... .B. .. r
00DE50: 65 61 64 20 61 20 73 74 72 69 6E 67 20 2B 20 70 ead a string + p
00DE60: 72 65 74 74 79 20 73 65 74 75 70 00 1F 00 9A 01 retty setup.....
00DE70: 0D 00 00 70 74 79 6C 69 6E 65 F3 EF 0D 00 00 70 ...ptyline.....p
00DE80: 72 65 74 74 79 6C 69 6E 65 F3 00 07 00 A4 01 01 rettyline.......
00DE90: C0 00 30 00 AE 01 C3 D9 3E 20 0D 00 00 6E 75 6D ..0.....> ...num
00DEA0: 71 75 65 73 F4 20 20 20 20 20 20 20 01 C0 20 6E ques. .. n
00DEB0: 75 6D 62 65 72 20 6F 66 20 71 75 65 73 74 69 6F umber of questio
00DEC0: 6E 73 20 00 37 00 B8 01 9E 20 0D 00 00 E9 EF 0F ns .7.... ......
00DED0: 20 EC 20 0D 00 00 6E 75 6D 71 75 65 73 F4 20 01 . ...numques. .
00DEE0: C0 20 6C 6F 6F 70 20 66 6F 72 20 65 61 63 68 20 . loop for each
00DEF0: 71 75 65 73 74 69 6F 6E 20 20 00 14 00 C2 01 C3 question ......
00DF00: 20 03 00 00 71 75 65 F3 28 0D 00 00 E9 29 00 0B ...que.(....)..
00DF10: 00 CC 01 B0 20 0D 00 00 E9 00 27 00 D6 01 C3 20 .... .....'....
00DF20: 03 00 00 61 6E F3 20 20 20 20 20 01 C0 20 47 65 ...an. .. Ge
00DF30: 74 20 63 6F 72 72 65 63 74 20 61 6E 73 77 65 72 t correct answer
00DF40: 00 3E 00 E0 01 9E 20 0D 00 00 E9 EF 0F 20 EC 20 .>.... ...... .
00DF50: 0D 00 00 6E 75 6D 71 75 65 73 F4 20 01 C0 20 6C ...numques. .. l
00DF60: 6F 6F 70 20 66 6F 72 20 6E 75 6D 62 65 72 20 6F oop for number o
00DF70: 66 20 71 75 65 73 74 69 6F 6E 73 20 20 20 00 25 f questions .%
00DF80: 00 EA 01 C3 20 03 00 00 65 72 6F F2 28 0D 00 00 .... ...ero.(...
00DF90: E9 29 20 01 C0 20 67 65 74 3E C7 20 72 65 73 70 .) .. get>. resp
00DFA0: 6F 6E 73 65 73 00 0B 00 F4 01 B0 20 0D 00 00 E9 onses...... ....
00DFB0: 00 07 00 FE 01 01 C0 00 0D 00 08 02 8A 20 01 20 ............. .
00DFC0: 8A 20 23 0F 00 1C 00 12 02 9F 20 1E FC 03 20 01 . #....... ... .
00DFD0: C0 20 53 65 74 20 75 70 20 77 69 6E 64 6F 77 73 . Set up windows
00DFE0: 00 30 00 1C 02 A1 20 03 00 00 E1 EF 22 20 20 20 .0.... ....."
00DFF0: 20 20 20 20 20 20 45 6E 64 20 6F 66 20 54 65 73 End of Tes
00E000: 74 22 20 EB 20 9F 20 1E 14 05 01 A0 20 1E 70 03 t" . . ..... .p.
00E010: 00 36 00 26 02 A9 20 23 12 2C 11 F4 28 0D 00 00 .6.&.. #.,..(...
00E020: 71 75 65 73 74 69 6F EE F0 19 0A 29 2C 11 01 BF questio....),...
00E030: 23 12 2C FF 19 28 0D 00 00 71 75 65 73 74 69 6F #.,..(...questio
00E040: EE 29 3B 22 2E 22 00 28 00 30 02 9F 20 1E 14 05 .);".".(.0.. ...
00E050: 20 20 20 20 01 C0 20 70 72 69 6E 74 20 70 72 65 .. print pre
00E060: 74 74 79 27 64 20 71 75 65 73 74 69 6F 6E 00 07 tty'd question..
00E070: 00 3A 02 01 C0 00 1B 00 44 02 9E 20 0D 00 00 E9 .:......D.. ....
00E080: EF 0F 20 EC 20 0D 00 00 6E 75 6D 71 75 65 73 F4 .. . ...numques.
00E090: 00 17 00 4E 02 03 00 00 E1 EF 03 01 80 00 00 71 ...N...........q
00E0A0: 75 65 F3 28 0D 00 00 E9 29 00 23 00 58 02 A9 20 ue.(....).#.X..
00E0B0: 23 0F 2C 10 2C 0D 00 00 E9 F6 10 F5 0F 20 20 01 #.,.,........ .
00E0C0: C0 20 73 65 74 20 63 75 72 73 6F 72 00 1D 00 62 . set cursor...b
00E0D0: 02 A1 20 03 00 00 E1 EF 22 54 22 20 EB 20 03 00 .. ....."T" . ..
00E0E0: 00 E1 EF 22 54 72 75 65 22 00 1E 00 6C 02 A1 20 ..."True"...l..
00E0F0: 03 00 00 E1 EF 22 46 22 20 EB 20 03 00 00 E1 EF ....."F" . .....
00E100: 22 46 61 6C 73 65 22 00 38 00 76 02 BF 20 23 0F "False".8.v.. #.
00E110: 2C 22 28 22 3B FF 03 28 0D 00 00 E9 F4 19 40 29 ,"(";..(......@)
00E120: 3B 22 29 20 22 3B 20 01 C0 20 50 72 69 6E 74 20 ;") "; .. Print
00E130: 71 75 65 73 74 69 6F 6E 20 6E 75 6D 62 65 72 00 question number.
00E140: 0C 00 80 02 D8 20 E7 20 0E 2C 0F 00 0A 00 8A 02 ..... . .,......
00E150: 9F 20 1E 14 05 00 0C 00 94 02 D8 20 E7 20 0E 2C . ......... . .,
00E160: 0F 00 0B 00 9E 02 B0 20 0D 00 00 E9 00 07 00 A8 ....... ........
00E170: 02 01 C0 00 12 00 B2 02 01 C0 20 47 65 74 20 61 .......... Get a
00E180: 6E 73 77 65 72 00 07 00 BC 02 01 C0 00 1C 00 C6 nswer...........
00E190: 02 03 00 00 E1 EF FF 43 01 A1 20 03 00 58 46 00 .......C.. ..XF.
00E1A0: E1 EF 22 22 20 A0 20 1E C6 02 00 3D 00 D0 02 03 .."" . ....=....
00E1B0: 00 00 E1 EF FF 1C 28 03 00 00 E1 29 01 A1 20 03 ......(....).. .
00E1C0: 00 00 E1 F1 22 41 22 20 FC 20 03 00 00 E1 EE FF ...."A" . ......
00E1D0: 03 28 19 40 F4 0D 00 00 6E 75 6D 71 75 65 73 F4 .(.@....numques.
00E1E0: 29 20 A0 20 1E C6 02 00 2A 00 DA 02 0D 00 00 41 ) . ....*......A
00E1F0: 4E 53 4E 55 CD EF 28 FF 01 28 03 00 00 C1 29 F5 NSNU..(..(....).
00E200: 19 40 29 01 0D 00 00 6C 69 6E 65 6C 65 EE EF 19 .@)....linele...
00E210: 24 00 2F 00 E4 02 A9 20 23 0F 2C 11 2C 0D 00 00 $./.... #.,.,...
00E220: 41 4E 53 4E 55 CD F6 10 F5 0F 01 BB 23 0F 2C 0E ANSNU.......#.,.
00E230: 01 BF 23 0F 2C 03 00 00 C1 3B 01 BB 23 0F 2C 0F ..#.,....;..#.,.
00E240: 00 22 00 EE 02 01 C0 20 68 69 67 68 6C 69 67 68 ."..... highligh
00E250: 74 73 20 73 65 6C 65 63 74 65 64 20 61 6E 73 77 ts selected answ
00E260: 65 72 00 2C 00 F8 02 0D 00 00 70 6F 69 6E 74 F3 er.,......point.
00E270: EF 0E 01 A1 20 03 00 00 E1 EF 03 00 00 61 6E F3 .... ........an.
00E280: 20 EB 20 0D 00 00 70 6F 69 6E 74 F3 EF 0F 00 20 . ...point....
00E290: 00 02 03 0D 00 00 73 63 6F 72 E5 EF 0D 00 00 48 ......scor.....H
00E2A0: FC 73 63 6F 72 E5 F4 0D 00 00 70 6F 69 6E 74 F3 .scor.....point.
00E2B0: 00 1C 00 0C 03 9F 20 1E 64 05 20 01 C0 20 70 72 ...... .d. .. pr
00E2C0: 69 6E 74 20 72 65 73 70 6F 6E 73 65 00 3A 00 16 int response.:..
00E2D0: 03 A9 20 23 0F 2C 16 2C 19 11 F5 0D 00 00 70 74 .. #.,.,......pt
00E2E0: 79 6C 69 6E 65 F3 01 BF 23 0F 2C 22 50 72 65 73 yline...#.,"Pres
00E2F0: 73 20 53 50 41 43 45 20 74 6F 20 63 6F 6E 74 69 s SPACE to conti
00E300: 6E 75 65 22 20 20 00 25 00 20 03 03 00 00 C9 EF nue" .%. ......
00E310: 22 22 20 01 20 D6 20 03 00 00 C9 EF 22 22 01 20 "" . . ....."".
00E320: 03 00 00 C9 EF FF 43 20 01 20 D5 00 2D 00 2A 03 ......C . ..-.*.
00E330: A1 20 03 00 00 C9 EF 03 00 00 54 C2 20 EB 20 0D . ........T. . .
00E340: 00 00 6C 69 6E 65 6C 65 EE EF 19 21 01 9F 20 1E ..linele...!.. .
00E350: 56 04 01 A0 20 1E 08 02 00 15 00 34 03 A1 20 03 V... ......4.. .
00E360: 00 00 C9 F2 22 20 22 20 A0 20 1E 20 03 00 1E 00 ...." " . . ....
00E370: 3E 03 0D 00 00 71 75 65 73 74 69 6F EE EF 0D 00 >....questio....
00E380: 00 71 75 65 73 74 69 6F EE F4 0F 00 0A 00 48 03 .questio......H.
00E390: A0 20 1E 86 01 00 07 00 52 03 01 C0 00 18 00 5C . ......R......\
00E3A0: 03 78 48 FF FF FF FF 11 85 09 EA 04 7C 04 FD 04 .xH.........|...
00E3B0: 80 09 02 10 08 10 00 07 01 00 2C 53 41 54 31 30 ..........,SAT10
00E3C0: 00 00 00 00 00 00 00 00 00 00 00 02 00 00 00 08 ................
00E3D0: 70 09 00 48 13 00 00 00 00 00 00 00 00 00 00 00 p..H............
00E3E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E3F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E400: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E410: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E420: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E430: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E440: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E450: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E460: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E470: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E480: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E490: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E4A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00E4B0: 00 00 00 00 00 00 00 00 00 00 00 47 F6 FF FF FF ...........G....
00E4C0: FF 11 88 09 B3 04 B3 04 00 05 83 09 02 10 08 80 ................
00E4D0: 0A 15 08 00 16 01 C0 20 45 6E 64 20 71 75 69 7A ....... End quiz
00E4E0: 20 72 6F 75 74 69 6E 65 00 07 00 66 03 01 C0 00 routine...f....
00E4F0: 0D 00 70 03 A9 20 23 0F 2C 16 2C 15 00 36 00 7A ..p.. #.,.,..6.z
00E500: 03 BF 20 23 0F 2C 22 59 6F 75 20 73 63 6F 72 65 .. #.,"You score
00E510: 64 22 3B 0D 00 00 73 63 6F 72 E5 3B 22 6F 75 74 d";...scor.;"out
00E520: 20 6F 66 22 3B 0D 00 00 71 75 65 73 74 69 6F EE of";...questio.
00E530: F5 0F 00 33 00 84 03 A9 20 23 0F 2C 12 2C 19 0A ...3.... #.,.,..
00E540: 01 BF 23 0F 2C 22 50 72 65 73 73 20 53 50 41 43 ..#.,"Press SPAC
00E550: 45 20 74 6F 20 72 75 6E 20 74 68 65 20 70 72 6F E to run the pro
00E560: 67 72 61 6D 22 00 31 00 8E 03 A9 20 23 0F 2C 13 gram".1.... #.,.
00E570: 2C 19 0C 01 BF 23 0F 2C 22 61 67 61 69 6E 2C 20 ,....#.,"again,
00E580: 20 6F 72 20 45 53 43 2F 45 53 43 20 74 6F 20 66 or ESC/ESC to f
00E590: 69 6E 69 73 68 22 00 11 00 98 03 D6 20 FF 43 F2 inish"...... .C.
00E5A0: 22 20 22 01 D5 01 CA 00 07 00 A2 03 01 C0 00 20 " "............
00E5B0: 00 AC 03 01 C0 20 49 6E 74 65 72 63 65 70 74 20 ..... Intercept
00E5C0: 45 53 43 41 50 45 20 72 6F 75 74 69 6E 65 00 07 ESCAPE routine..
00E5D0: 00 B6 03 01 C0 6A 6B 00 1F 00 C0 03 AD 20 0F 20 .....jk...... .
00E5E0: 01 82 20 0F 20 01 20 A2 20 0E 2C 0F 20 01 20 A2 .. . . . .,. . .
00E5F0: 20 0F 2C 19 19 20 00 21 00 CA 03 BA 20 0E 01 20 .,.. .!.... ..
00E600: BB 20 0F 20 01 C0 20 72 65 73 74 6F 72 65 20 64 . . .. restore d
00E610: 65 66 61 75 6C 74 73 00 06 00 D4 03 98 00 07 00 efaults.........
00E620: DE 03 01 C0 00 1A 00 E8 03 01 C0 20 49 6E 69 74 ........... Init
00E630: 69 61 6C 69 73 65 20 77 69 6E 64 6F 77 73 00 07 ialise windows..
00E640: 00 F2 03 01 C0 00 12 00 FC 03 BA 20 23 11 2C 10 ........... #.,.
00E650: 20 01 20 8A 20 23 11 00 3D 00 06 04 D8 20 23 0E . . #..=.... #.
00E660: 2C 10 2C 19 27 2C 10 2C 12 F4 0D 00 00 70 74 79 ,.,.',.,.....pty
00E670: 6C 69 6E 65 F3 20 01 20 D8 20 23 0F 2C 10 2C 19 line. . . #.,.,.
00E680: 27 2C 14 F4 0D 00 00 70 74 79 6C 69 6E 65 F3 2C ',.....ptyline.,
00E690: 19 18 20 20 00 0E 00 10 04 BA 20 0E 01 BB 20 0F .. ...... ... .
00E6A0: 01 8A 00 12 00 1A 04 BA 20 23 0F 2C 11 20 01 20 ........ #.,. .
00E6B0: 8A 20 23 0F 00 3C 00 24 04 D8 20 23 0E 2C 14 2C . #..<.$.. #.,.,
00E6C0: 19 26 2C 11 2C 12 F4 0D 00 00 70 74 79 6C 69 6E .&,.,.....ptylin
00E6D0: 65 F3 20 01 20 D8 20 16 89 23 0F 2C 11 2C 19 26 e. . . ..#.,.,.&
00E6E0: 2C 15 F4 0D 00 00 70 74 79 6C 69 6E 65 F3 2C 19 ,.....ptyline.,.
00E6F0: 17 20 00 06 00 2E 04 C9 00 07 00 38 04 01 C0 00 . .........8....
00E700: 26 00 42 04 01 C0 20 72 65 61 64 73 20 61 20 73 &.B... reads a s
00E710: 74 72 69 6E 67 20 2B 20 70 72 65 74 74 79 20 70 tring + pretty p
00E720: 72 69 6E 74 73 00 0B 00 4C 04 C3 20 03 00 00 F1 rints...L.. ....
00E730: 00 0E 00 56 04 03 00 00 E1 EF 03 00 00 F1 00 15 ...V............
00E740: 00 60 04 0D 00 00 70 72 65 74 74 79 6C 69 6E 65 .`....prettyline
00E750: F3 EF 0E 00 0A 00 6A 04 9F 20 1E 9C 04 00 06 00 ......j.. ......
00E760: 74 04 C9 00 07 00 7E 04 01 C0 00 26 00 88 04 01 t.....~....&....
00E770: C0 20 53 65 74 20 75 70 20 73 74 72 69 6E 67 20 . Set up string
00E780: 66 6F 72 20 70 72 65 74 74 79 20 70 72 69 6E 74 for pretty print
00E790: 00 07 00 92 04 01 C0 00 16 00 9C 04 0D 00 00 50 ...............P
00E7A0: 54 D2 EF 0D 00 00 4C 49 4E 45 4C 45 CE 00 18 00 T.....LINELE....
00E7B0: A6 04 D6 20 FF 0E 28 03 00 00 E1 29 20 EE 20 0D ... ..(....) . .
00E7C0: 00 00 50 54 D2 00 1D 00 B0 04 20 20 D6 20 AC 28 ..PT...... . .(
00E7D0: 03 00 00 E1 2C 0D 00 00 50 2E 7E 54 D2 2C 0F 29 ....,...P.~T.,.)
00E7E0: F2 22 20 22 00 18 00 BA 04 20 20 20 20 0D 00 00 ." "..... ...
00E7F0: 50 54 D2 EF 0D 00 00 50 54 D2 F5 0F 00 0A 00 C4 PT.....PT.......
00E800: 04 20 20 20 20 D5 00 1F 00 CE 04 20 20 AC 28 03 . ...... .(.
00E810: 00 00 E1 2C 0D 00 00 50 54 D2 2C 0F 29 EF FF 03 ...,...PT.,.)...
00E820: 28 1C FE 00 29 00 41 00 D8 04 20 20 0D 00 00 50 (...).A... ...P
00E830: 54 D2 EF 0D 00 00 50 54 D2 F4 0D 00 00 4C 49 4E T.....PT.....LIN
00E840: 45 4C 45 CE 20 01 20 0D 00 00 70 72 65 74 74 79 ELE. . ...pretty
00E850: 6C 69 6E 65 F3 EF 0D 00 00 70 72 65 74 74 79 6C line.....prettyl
00E860: 69 6E 65 F3 F4 0F 00 08 00 E2 04 20 20 D5 00 06 ine........ ...
00E870: 00 EC 04 C9 00 07 00 F6 04 01 C0 00 35 00 00 05 ............5...
00E880: 01 C0 20 53 75 62 72 6F 75 74 69 6E 65 20 74 6F .. Subroutine to
00E890: 20 70 72 69 6E 74 20 61 24 20 77 69 74 68 20 43 print a$ with C
00E8A0: 48 52 24 28 26 46 45 29 20 61 73 20 43 52 4C 46 HR$(&FE) as CRLF
00E8B0: 00 07 00 0A 05 01 C0 00 18 00 14 05 9E 20 0D 00 ............. ..
00E8C0: 00 F8 EF 0F 20 EC 20 FF 0E 28 03 00 00 E1 29 00 .... . ..(....).
00E8D0: 18 00 1E 05 03 00 00 E2 EF AC 28 B6 26 03 00 00 ..........(.&...
00E8E0: E1 2C 0D 00 00 F8 2C 0F 29 00 21 00 28 05 A1 20 .,....,.).!.(..
00E8F0: 03 00 00 E2 EF FF 03 28 1C FE 00 29 EB 20 BF 20 .......(...). .
00E900: 01 97 20 BF 20 03 00 00 E2 3B 00 0B 00 32 05 B0 .. . ....;...2..
00E910: 20 0D 00 00 F8 00 06 00 3C 05 C9 00 07 00 46 05 .......<.....F.
00E920: 01 C0 00 15 00 50 05 01 C0 20 50 72 69 6E 74 20 .....P... Print
00E930: 63 6F 6D 6D 65 6E 74 00 07 00 5A 05 01 C0 00 1A comment...Z.....
00E940: 00 64 05 CC 20 0F 2C 1A DC 05 F5 0D 00 00 70 6F .d.. .,.......po
00E950: 69 6E 74 F3 F6 1A AA 05 00 26 00 6E 05 D8 20 E7 int......&.n.. .
00E960: 20 0E 2C 0F 20 01 C0 20 72 6F 75 74 69 6E 65 20 .,. .. routine
00E970: 6E 65 65 64 73 20 77 69 6E 64 6F 77 20 30 00 1E needs window 0..
00E980: 00 78 05 03 00 00 E1 20 EF 20 03 00 00 45 52 4F .x..... . ...ERO
00E990: D2 28 0D 00 00 41 4E 53 4E 55 CD 29 00 20 00 82 .(...ANSNU.). ..
00E9A0: 05 9F 20 1E 9C 04 20 01 C0 20 70 72 65 74 74 79 .. ... .. pretty
00E9B0: 20 75 70 20 72 65 73 70 6F 6E 73 65 00 37 00 8C up response.7..
00E9C0: 05 A9 20 0F 2C 28 0F F4 0D 00 00 6E 75 6D 71 75 .. .,(.....numqu
00E9D0: 65 73 F4 29 F6 10 20 01 C0 20 73 65 74 6E 3F 20 es.).. .. setn?
00E9E0: 63 75 72 73 6F 72 20 66 6F 72 20 72 65 73 70 6F cursor for respo
00E9F0: 6E 73 65 20 20 00 23 00 96 05 9F 20 1E 14 05 20 nse .#.... ...
00EA00: 01 C0 20 50 72 69 6E 74 20 70 72 65 74 74 79 20 .. Print pretty
00EA10: 72 65 73 70 6F 6E 73 65 00 10 00 A0 05 D8 20 E7 response...... .
00EA20: 20 0E 2C 0F 20 01 20 C9 00 07 00 AA 05 01 C0 00 .,. . .........
00EA30: 29 00 B4 05 A9 20 0F 2C 28 10 F4 0D 00 00 6E 75 ).... .,(.....nu
00EA40: 6D 71 75 65 73 F4 29 F6 10 F5 0D 00 00 70 72 65 mques.)......pre
00EA50: 74 74 79 6C 69 6E 65 F3 00 22 00 BE 05 9F 20 1E ttyline..".... .
00EA60: 14 05 20 01 C0 20 50 72 69 6E 74 20 61 6C 74 65 .. .. Print alte
00EA70: 72 65 64 20 73 74 72 69 6E 67 00 10 00 C8 05 D8 red string......
00EA80: 20 E7 20 0E 2C 0F 20 01 20 C9 00 07 00 D2 05 01 . .,. . .......
00EA90: C0 00 1A 00 DC 05 01 C0 20 44 61 74 61 20 66 6F ........ Data fo
00EAA0: 72 20 71 75 65 73 74 69 6F 6E 73 00 0F 00 E6 05 r questions.....
00EAB0: 01 C0 20 46 6F 72 6D 61 74 3A 00 18 00 F0 05 01 .. Format:......
00EAC0: C0 20 48 65 61 64 69 6E 67 20 66 6F 72 20 54 65 . Heading for Te
00EAD0: 73 74 00 1A 00 FA 05 01 C0 20 46 6F 72 20 65 B3 st....... For e.
00EAE0: 44 61 63 68 20 71 75 65 73 74 69 6F 6E 3A 00 18 Dach question:..
00EAF0: 00 04 06 01 C0 20 20 20 20 51 75 65 73 74 69 6F ..... Questio
00EB00: 6E 20 74 65 78 74 00 20 00 0E 06 01 C0 20 20 20 n text. .....
00EB10: 20 4E 75 6D 62 65 72 20 6F 66 20 61 6E 73 77 65 Number of answe
00EB20: 72 73 20 28 4E 29 00 39 00 18 06 01 C0 20 20 20 rs (N).9.....
00EB30: 20 54 65 78 74 20 6F 66 20 65 61 63 68 20 61 6E Text of each an
00EB40: 73 77 65 72 20 28 20 6D 75 73 74 20 62 65 20 4E swer ( must be N
00EB50: 20 69 74 65 6D 73 20 6F 66 20 74 65 78 74 29 00 items of text).
00EB60: 33 00 22 06 01 C0 20 20 20 20 43 6F 72 72 65 63 3."... Correc
00EB70: 74 20 61 6E 73 77 65 72 20 28 41 2D 46 29 20 20 t answer (A-F)
00EB80: 77 68 65 72 65 20 41 3D 31 2C 42 3D 32 20 65 74 where A=1,B=2 et
00EB90: 63 2E 00 3F 00 2C 06 01 C0 20 20 20 20 54 65 78 c..?.,... Tex
00EBA0: 74 20 66 6F 72 20 65 61 63 68 20 61 6E 73 77 65 t for each answe
00EBB0: 72 20 69 6E 20 73 61 6D 65 20 6F 72 64 65 72 20 r in same order
00EBC0: 28 6D 75 73 74 20 62 65 20 4E 20 69 74 65 6D 73 (must be N items
00EBD0: 29 00 1C 00 36 06 01 C0 20 41 66 74 65 72 20 61 )...6... After a
00EBE0: 6C FD 0C 6C 20 71 75 65 73 74 69 6F 6E 73 3A 00 l..l questions:.
00EBF0: 28 00 40 06 01 C0 20 22 20 20 20 20 20 20 20 20 (.@... "
00EC00: 20 45 6E 64 20 6F 66 20 54 65 73 74 22 20 28 65 End of Test" (e
00EC10: 78 61 63 74 6C 79 29 00 07 00 4A 06 01 C0 00 26 xactly)...J....&
00EC20: 00 54 06 8C 20 22 53 65 6C 66 20 41 73 73 65 73 .T.. "Self Asses
00EC30: 73 6D 65 6E 74 20 54 65 73 74 20 2D 20 43 68 2E sment Test - Ch.
00EC40: 20 31 30 22 00 07 00 5E 06 01 C0 00 41 00 68 06 10"...^....A.h.
00EC50: 8C 20 57 68 61 74 20 6D 75 73 74 20 79 6F 75 20 . What must you
00EC60: 64 6F 20 74 6F 20 28 70 65 72 69 6F 64 29 20 74 do to (period) t
00EC70: 6F 20 72 61 69 73 65 20 61 20 6E 6F 74 65 20 62 o raise a note b
00EC80: 79 20 6F 6E 65 20 6F 63 74 61 76 65 00 40 00 72 y one octave.@.r
00EC90: 06 8C 20 34 2C 4D 75 6C 74 69 70 6C 79 20 62 79 .. 4,Multiply by
00ECA0: 20 32 2C 44 69 76 69 64 65 20 62 79 20 32 2C 4D 2,Divide by 2,M
00ECB0: 75 6C 74 69 70 6C 79 20 62 79 20 32 2F 33 2C 44 ultiply by 2/3,D
00ECC0: 69 76 69 64 65 20 62 79 20 32 2F 33 00 52 00 7C ivide by 2/3.R.|
00ECD0: 06 8C 20 42 2C 22 4E 6F 2C 20 74 68 65 20 61 6E .. B,"No, the an
00ECE0: 73 77 65 27 90 FF FF FF FF 11 87 09 B3 04 B3 04 swe'............
00ECF0: FE 04 81 09 02 10 08 10 00 07 01 00 2C 53 41 54 ............,SAT
00ED00: 31 30 00 00 00 00 00 00 00 00 00 00 00 03 FF 00 10..............
00ED10: 48 03 70 11 00 48 13 00 00 00 00 00 00 00 00 00 H.p..H..........
00ED20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00ED30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00ED40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00ED50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00ED60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00ED70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00ED80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00ED90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00EDA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00EDB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00EDC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00EDD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00EDE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00EDF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 79 0D FF .............y..
00EE00: FF FF FF 11 87 09 B3 04 B3 04 FF 04 83 09 02 10 ................
00EE10: 08 DC 24 0D 04 00 16 72 20 69 73 20 42 22 2C 43 ..$....r is B",C
00EE20: 6F 72 72 65 63 74 2C 22 4E 6F 2C 20 74 68 65 20 orrect,"No, the
00EE30: 61 6E 73 77 65 72 20 69 73 20 42 22 2C 22 4E 6F answer is B","No
00EE40: 2C 20 74 68 65 20 61 6E 73 77 65 72 20 69 73 20 , the answer is
00EE50: 42 22 00 07 00 86 06 01 C0 00 33 00 90 06 8C 20 B"........3....
00EE60: 48 6F 77 20 6D 61 6E 79 20 73 6F 75 6E 64 20 63 How many sound c
00EE70: 68 61 6E 6E 65 6C 73 20 64 6F 65 73 20 74 68 65 hannels does the
00EE80: 20 43 50 43 34 36 34 20 68 61 76 65 00 13 00 9A CPC464 have....
00EE90: 06 8C 20 34 2C 31 2C 32 2C 33 2C 31 35 2C 43 00 .. 4,1,2,3,15,C.
00EEA0: 50 00 A4 06 8C 20 22 4E 6F 2C 20 74 68 65 20 61 P.... "No, the a
00EEB0: 6E 73 77 65 72 20 69 73 20 43 22 2C 22 4E 6F 2C nswer is C","No,
00EEC0: 20 74 68 65 20 61 6E 73 77 65 72 20 69 73 20 43 the answer is C
00EED0: 22 2C 43 6F 72 72 65 63 74 2C 22 4E 6F 2C 20 74 ",Correct,"No, t
00EEE0: 68 65 20 61 6E 73 77 65 72 20 69 73 20 43 22 00 he answer is C".
00EEF0: 07 00 AE 06 01 C0 00 62 00 B8 06 8C 20 22 57 68 .......b.... "Wh
00EF00: 69 63 68 20 63 68 61 6E 6E 65 6C 73 20 61 72 65 ich channels are
00EF10: 20 62 65 69 6E 67 20 59 9E 75 73 65 64 20 62 79 being Y.used by
00EF20: 20 74 68 65 20 66 6F 6C 6C 6F 77 69 6E 67 20 53 the following S
00EF30: 4F 55 4E 44 20 63 6F 6D 6D 61 6E 64 3F 20 20 20 OUND command?
00EF40: 20 20 20 20 53 4F 55 4E 44 20 34 2C 31 30 30 2C SOUND 4,100,
00EF50: 32 30 30 2C 33 2C 31 2C 37 22 00 2E 00 C2 06 8C 200,3,1,7"......
00EF60: 20 34 2C 43 20 6F 6E 6C 79 2C 41 20 61 6E 64 20 4,C only,A and
00EF70: 42 2C 41 20 6F 6E 6C 79 2C 22 41 2C 20 42 2C 20 B,A only,"A, B,
00EF80: 61 6E 64 20 43 22 2C 41 00 50 00 CC 06 8C 20 43 and C",A.P.... C
00EF90: 6F 72 72 65 63 74 2C 22 4E 6F 2C 20 74 68 65 20 orrect,"No, the
00EFA0: 61 6E 73 77 65 72 20 69 73 20 41 22 2C 22 4E 6F answer is A","No
00EFB0: 2C 20 74 68 65 20 61 6E 73 77 65 72 20 69 73 20 , the answer is
00EFC0: 41 22 2C 22 4E 6F 2C 20 74 68 65 20 61 6E 73 77 A","No, the answ
00EFD0: 65 72 20 69 73 20 41 22 00 07 00 D6 06 01 C0 00 er is A"........
00EFE0: 1F 00 E0 06 8C 20 22 57 68 6F 20 77 61 73 20 43 ..... "Who was C
00EFF0: 6F 6C 6F 6E 65 6C 20 42 6F 67 65 79 3F 22 00 66 olonel Bogey?".f
00F000: 00 EA 06 8C 20 31 2C 22 41 6E 73 77 65 72 73 20 .... 1,"Answers
00F010: 6F 6E 20 61 20 70 6F 73 74 58 95 63 61 72 64 20 on a postX.card
00F020: 70 6C 65 61 73 65 20 74 6F 0D 0A 20 20 20 20 41 please to.. A
00F030: 6D 73 6F 66 74 0D 0A 20 20 20 20 31 36 39 20 4B msoft.. 169 K
00F040: 69 6E 67 73 20 52 6F 61 64 0D 0A 20 20 20 20 42 ings Road.. B
00F050: 72 65 6E 74 77 6F 6F 64 0D 0A 20 20 20 20 45 73 rentwood.. Es
00F060: 73 65 78 22 2C 41 00 09 00 F4 06 8C 20 22 22 00 sex",A...... "".
00F070: 07 00 FE 06 01 C0 00 8D 00 08 07 8C 20 22 54 68 ............ "Th
00F080: 65 20 52 45 53 54 4F 52 45 20 63 6F 6D 6D 61 6E e RESTORE comman
00F090: 64 20 73 65 74 73 20 74 68 65 20 43 50 43 34 36 d sets the CPC46
00F0A0: 34 27 73 20 70 6F 69 6E 74 65 72 20 74 6F 20 74 4's pointer to t
00F0B0: 68 65 20 66 69 72 73 74 20 63 6F 6E 73 74 61 6E he first constan
00F0C0: 74 20 69 6E 20 74 68 65 20 66 69 72 73 74 20 44 t in the first D
00F0D0: 41 54 41 20 73 74 61 74 65 6D 65 6E 74 20 66 6F ATA statement fo
00F0E0: 6C 6C 6F 77 69 6E 67 20 74 68 65 20 64 65 73 69 llowing the desi
00F0F0: 67 6E 61 74 65 64 20 6C 69 6E 65 20 6E 75 6D 62 gnated line numb
00F100: 65 72 22 00 29 00 12 07 8C 20 32 2C 54 2C 46 2C er".).... 2,T,F,
00F110: 41 2C 43 6F 72 72 65 63 74 2C 22 44 27 4E 6F 2C A,Correct,"D'No,
00F120: 20 69 74 20 18 69 73 18 20 74 72 75 65 22 00 07 it .is. true"..
00F130: 00 1C 07 01 C0 00 1D 00 26 07 8C 20 22 20 20 20 ........&.. "
00F140: 20 20 20 20 20 20 45 6E 64 20 6F 66 20 54 65 73 End of Tes
00F150: 74 22 00 10 00 30 07 8C 20 31 2C 22 22 2C 41 2C t"...0.. 1,"",A,
00F160: 22 22 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ""..............
00F170: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F180: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F190: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F1A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F1B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F1C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F1D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F1E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F1F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F200: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F210: 00 00 00 00 00 00 00 00 00 00 00 00 00 0B E0 FF ................
00F220: FF FF FF 11 88 09 B3 04 B3 04 FE 04 86 09 02 10 ................
00F230: 08 0F 00 07 01 00 2C 53 41 54 31 31 00 00 00 00 ......,SAT11....
00F240: 00 00 00 00 00 00 00 01 00 00 00 08 70 01 FF 3E ............p..>
00F250: 16 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F260: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F270: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F280: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F290: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F2A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F2B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F2C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F2D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F2E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F2F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F300: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F310: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F320: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00F330: 00 00 00 00 00 00 00 0D 0C FF FF FF FF 11 85 09 ................
00F340: EA 04 7C 04 FE 04 82 09 02 10 08 80 0A 15 08 00 ..|.............
00F350: 16 07 00 64 00 01 C0 00 2C 00 6E 00 01 C0 20 53 ...d....,.n... S
00F360: 65 6C 66 20 41 73 73 65 73 73 6D 65 6E 74 20 54 elf Assessment T
00F370: 65 73 74 73 20 3A 20 42 41 53 49 43 20 42 6F 6F ests : BASIC Boo
00F380: 6B 20 32 00 07 00 78 00 01 C0 00 12 00 82 00 01 k 2...x.........
00F390: C0 20 44 41 20 39 2F 31 32 2F 38 34 00 07 00 8C . DA 9/12/84....
00F3A0: 00 01 C0 00 18 00 96 00 01 C0 20 50 72 6F 67 72 .......... Progr
00F3B0: 61 6D 6D 65 72 73 20 6B 65 79 73 00 07 00 A0 00 ammers keys.....
00F3C0: 01 C0 00 10 00 AA 00 A4 20 0E 2C 22 6C 69 73 74 ........ .,"list
00F3D0: 0D 22 00 0F 00 B4 00 A4 20 0F 2C 22 72 75 6E 0D ."...... .,"run.
00F3E0: 22 00 3B 00 BE 00 A4 20 10 2C 22 6D 6F 64 65 20 ".;.... .,"mode
00F3F0: 32 3A 70 61 70 65 72 20 30 3A 70 65 6E 20 31 3A 2:paper 0:pen 1:
00F400: 69 6E 6B 20 30 2C 32 33 3A 69 6E 6B 20 31 2C 30 ink 0,23:ink 1,0
00F410: 3A 62 6F 72 64 65 72 20 31 33 0D 22 00 15 00 C8 :border 13."....
00F420: 00 A4 20 11 2C 22 72 65 6E 75 6D 20 31 30 30 0D .. .,"renum 100.
00F430: 22 00 0C 00 D2 00 A4 20 12 2C 22 FF 22 00 07 00 "...... .,"."...
00F440: DC 00 01 C0 00 0C 00 E6 00 B3 20 9F 20 1E C0 03 .......... . ...
00F450: 00 93 32 2C 00 F0 00 01 C0 20 61 72 72 61 79 73 ..2,..... arrays
00F460: 20 65 72 6F 72 24 2C 71 75 65 73 24 20 28 6E 6F eror$,ques$ (no
00F470: 74 20 64 69 6D 65 6E 73 69 6F 6E 65 64 29 00 07 t dimensioned)..
00F480: 00 FA 00 01 C0 00 0E 00 04 01 01 C0 20 53 65 74 ............ Set
00F490: 2D 75 70 00 07 00 0E 01 01 C0 00 26 00 18 01 AD -up........&....
00F4A0: 20 0F 01 82 20 19 11 01 A2 20 0E 2C 19 13 01 A2 ... .... .,....
00F4B0: 20 0F 2C 0E 01 A2 20 10 2C 0F 01 A2 20 11 2C 14 .,... .,... .,.
00F4C0: 00 2D 00 22 01 CF 20 19 FF 2C 1C 36 00 2C 1C 36 .-.".. ..,.6.,.6
00F4D0: 00 2C 1C 36 00 20 01 C0 20 73 65 74 20 75 70 20 .,.6. .. set up
00F4E0: 66 61 6B 65 20 22 71 75 6F 74 65 73 22 00 2B 00 fake "quotes".+.
00F4F0: 2C 01 0D 00 00 73 63 6F 72 E5 EF 0E 01 0D 00 00 ,....scor.......
00F500: 71 75 65 73 74 69 6F EE EF 0F 01 0D 00 00 6C 69 questio.......li
00F510: 6E 65 6C 65 EE EF 19 21 00 10 00 36 01 03 00 00 nele...!...6....
00F520: 54 C2 EF FF 03 28 17 29 00 2A 00 40 01 9F 20 1E T....(.).*.@.. .
00F530: 42 04 20 01 C0 20 72 65 61 64 20 61 20 73 74 72 B. .. read a str
00F540: 69 6E 67 20 2B 20 70 72 65 74 74 79 20 73 65 74 ing + pretty set
00F550: 75 70 00 C1 09 1C 00 4A 01 9F 20 1E FC 03 20 01 up.....J.. ... .
00F560: C0 20 53 65 74 20 75 70 20 77 69 6E 64 6F 77 73 . Set up windows
00F570: 00 2B 00 54 01 9F 20 1E 14 05 20 01 C0 20 50 72 .+.T.. ... .. Pr
00F580: 69 6E 74 20 73 74 72 69 6E 67 20 72 65 61 64 20 int string read
00F590: 61 73 20 70 72 65 74 74 79 65 64 00 33 00 5E 01 as prettyed.3.^.
00F5A0: A9 20 23 0F 2C 17 2C 15 01 BF 23 0F 2C 22 50 72 . #.,.,...#.,"Pr
00F5B0: 65 73 73 20 53 50 41 43 45 20 74 6F 20 73 74 61 ess SPACE to sta
00F5C0: 72 74 22 01 D6 20 FF 43 F2 22 20 22 01 D5 00 07 rt".. .C." "....
00F5D0: 00 68 01 01 C0 00 11 00 72 01 01 C0 20 4D 61 69 .h......r... Mai
00F5E0: 6E 20 6C 6F 6F 70 00 07 00 7C 01 01 C0 00 12 00 n loop...|......
00F5F0: 86 01 0D 00 00 6C 69 6E 65 6C 65 EE EF 19 21 00 .....linele...!.
00F600: 2A 00 90 01 9F 20 1E 42 04 20 01 C0 20 72 65 61 *.... .B. .. rea
00F610: 64 20 61 20 73 74 72 69 6E 67 20 2B 20 70 72 65 d a string + pre
00F620: 74 74 79 20 73 65 74 75 70 00 1F 00 9A 01 0D 00 tty setup.......
00F630: 00 70 74 79 6C 69 6E 65 F3 EF 0D 00 00 70 72 65 .ptyline.....pre
00F640: 74 74 79 6C 69 6E 65 F3 00 07 00 A4 01 01 C0 00 ttyline.........
00F650: 30 00 AE 01 C3 D9 3E 20 0D 00 00 6E 75 6D 71 75 0.....> ...numqu
00F660: 65 73 F4 20 20 20 20 20 20 20 01 C0 20 6E 75 6D es. .. num
00F670: 62 65 72 20 6F 66 20 71 75 65 73 74 69 6F 6E 73 ber of questions
00F680: 20 00 37 00 B8 01 9E 20 0D 00 00 E9 EF 0F 20 EC .7.... ...... .
00F690: 20 0D 00 00 6E 75 6D 71 75 65 73 F4 20 01 C0 20 ...numques. ..
00F6A0: 6C 6F 6F 70 20 66 6F 72 20 65 61 63 68 20 71 75 loop for each qu
00F6B0: 65 73 74 69 6F 6E 20 20 00 14 00 C2 01 C3 20 03 estion ...... .
00F6C0: 00 00 71 75 65 F3 28 0D 00 00 E9 29 00 0B 00 CC ..que.(....)....
00F6D0: 01 B0 20 0D 00 00 E9 00 27 00 D6 01 C3 20 03 00 .. .....'.... ..
00F6E0: 00 61 6E F3 20 20 20 20 20 01 C0 20 47 65 74 20 .an. .. Get
00F6F0: 63 6F 72 72 65 63 74 20 61 6E 73 77 65 72 00 3E correct answer.>
00F700: 00 E0 01 9E 20 0D 00 00 E9 EF 0F 20 EC 20 0D 00 .... ...... . ..
00F710: 00 6E 75 6D 71 75 65 73 F4 20 01 C0 20 6C 6F 6F .numques. .. loo
00F720: 70 20 66 6F 72 20 6E 75 6D 62 65 72 20 6F 66 20 p for number of
00F730: 71 75 65 73 74 69 6F 6E 73 20 20 20 00 25 00 EA questions .%..
00F740: 01 C3 20 03 00 00 65 72 6F F2 28 0D 00 00 E9 29 .. ...ero.(....)
00F750: 20 01 C0 20 67 65 74 3E C7 20 72 65 73 70 6F 6E .. get>. respon
00F760: 73 65 73 00 0B 00 F4 01 B0 20 0D 00 00 E9 00 07 ses...... ......
00F770: 00 FE 01 01 C0 00 0D 00 08 02 8A 20 01 20 8A 20 ........... . .
00F780: 23 0F 00 1C 00 12 02 9F 20 1E FC 03 20 01 C0 20 #....... ... ..
00F790: 53 65 74 20 75 70 20 77 69 6E 64 6F 77 73 00 30 Set up windows.0
00F7A0: 00 1C 02 A1 20 03 00 00 E1 EF 22 20 20 20 20 20 .... ....."
00F7B0: 20 20 20 20 45 6E 64 20 6F 66 20 54 65 73 74 22 End of Test"
00F7C0: 20 EB 20 9F 20 1E 14 05 01 A0 20 1E 70 03 00 36 . . ..... .p..6
00F7D0: 00 26 02 A9 20 23 12 2C 11 F4 28 0D 00 00 71 75 .&.. #.,..(...qu
00F7E0: 65 73 74 69 6F EE F0 19 0A 29 2C 11 01 BF 23 12 estio....),...#.
00F7F0: 2C FF 19 28 0D 00 00 71 75 65 73 74 69 6F EE 29 ,..(...questio.)
00F800: 3B 22 2E 22 00 28 00 30 02 9F 20 1E 14 05 20 20 ;".".(.0.. ...
00F810: 20 20 01 C0 20 70 72 69 6E 74 20 70 72 65 74 74 .. print prett
00F820: 79 27 64 20 71 75 65 73 74 69 6F 6E 00 07 00 3A y'd question...:
00F830: 02 01 C0 00 1B 00 44 02 9E 20 0D 00 00 E9 EF 0F ......D.. ......
00F840: 20 EC 20 0D 00 00 6E 75 6D 71 75 65 73 F4 00 17 . ...numques...
00F850: 00 4E 02 03 00 00 E1 EF 03 01 80 00 00 71 75 65 .N...........que
00F860: F3 28 0D 00 00 E9 29 00 23 00 58 02 A9 20 23 0F .(....).#.X.. #.
00F870: 2C 10 2C 0D 00 00 E9 F6 10 F5 0F 20 20 01 C0 20 ,.,........ ..
00F880: 73 65 74 20 63 75 72 73 6F 72 00 1D 00 62 02 A1 set cursor...b..
00F890: 20 03 00 00 E1 EF 22 54 22 20 EB 20 03 00 00 E1 ....."T" . ....
00F8A0: EF 22 54 72 75 65 22 00 1E 00 6C 02 A1 20 03 00 ."True"...l.. ..
00F8B0: 00 E1 EF 22 46 22 20 EB 20 03 00 00 E1 EF 22 46 ..."F" . ....."F
00F8C0: 61 6C 73 65 22 00 38 00 76 02 BF 20 23 0F 2C 22 alse".8.v.. #.,"
00F8D0: 28 22 3B FF 03 28 0D 00 00 E9 F4 19 40 29 3B 22 (";..(......@);"
00F8E0: 29 20 22 3B 20 01 C0 20 50 72 69 6E 74 20 71 75 ) "; .. Print qu
00F8F0: 65 73 74 69 6F 6E 20 6E 75 6D 62 65 72 00 0C 00 estion number...
00F900: 80 02 D8 20 E7 20 0E 2C 0F 00 0A 00 8A 02 9F 20 ... . .,.......
00F910: 1E 14 05 00 0C 00 94 02 D8 20 E7 20 0E 2C 0F 00 ......... . .,..
00F920: 0B 00 9E 02 B0 20 0D 00 00 E9 00 07 00 A8 02 01 ..... ..........
00F930: C0 00 12 00 B2 02 01 C0 20 47 65 74 20 61 6E 73 ........ Get ans
00F940: 77 65 72 00 07 00 BC 02 01 C0 00 1C 00 C6 02 03 wer.............
00F950: 00 00 E1 EF FF 43 01 A1 20 03 00 58 46 00 E1 EF .....C.. ..XF...
00F960: 22 22 20 A0 20 1E C6 02 00 3D 00 D0 02 03 00 00 "" . ....=......
00F970: E1 EF FF 1C 28 03 00 00 E1 29 01 A1 20 03 00 00 ....(....).. ...
00F980: E1 F1 22 41 22 20 FC 20 03 00 00 E1 EE FF 03 28 .."A" . .......(
00F990: 19 40 F4 0D 00 00 6E 75 6D 71 75 65 73 F4 29 20 .@....numques.)
00F9A0: A0 20 1E C6 02 00 2A 00 DA 02 0D 00 00 41 4E 53 . ....*......ANS
00F9B0: 4E 55 CD EF 28 FF 01 28 03 00 00 C1 29 F5 19 40 NU..(..(....)..@
00F9C0: 29 01 0D 00 00 6C 69 6E 65 6C 65 EE EF 19 24 00 )....linele...$.
00F9D0: 2F 00 E4 02 A9 20 23 0F 2C 11 2C 0D 00 00 41 4E /.... #.,.,...AN
00F9E0: 53 4E 55 CD F6 10 F5 0F 01 BB 23 0F 2C 0E 01 BF SNU.......#.,...
00F9F0: 23 0F 2C 03 00 00 C1 3B 01 BB 23 0F 2C 0F 00 22 #.,....;..#.,.."
00FA00: 00 EE 02 01 C0 20 68 69 67 68 6C 69 67 68 74 73 ..... highlights
00FA10: 20 73 65 6C 65 63 74 65 64 20 61 6E 73 77 65 72 selected answer
00FA20: 00 2C 00 F8 02 0D 00 00 70 6F 69 6E 74 F3 EF 0E .,......point...
00FA30: 01 A1 20 03 00 00 E1 EF 03 00 00 61 6E F3 20 EB .. ........an. .
00FA40: 20 0D 00 00 70 6F 69 6E 74 F3 EF 0F 00 20 00 02 ...point.... ..
00FA50: 03 0D 00 00 73 63 6F 72 E5 EF 0D 00 00 48 FC 73 ....scor.....H.s
00FA60: 63 6F 72 E5 F4 0D 00 00 70 6F 69 6E 74 F3 00 1C cor.....point...
00FA70: 00 0C 03 9F 20 1E 64 05 20 01 C0 20 70 72 69 6E .... .d. .. prin
00FA80: 74 20 72 65 73 70 6F 6E 73 65 00 3A 00 16 03 A9 t response.:....
00FA90: 20 23 0F 2C 16 2C 19 11 F5 0D 00 00 70 74 79 6C #.,.,......ptyl
00FAA0: 69 6E 65 F3 01 BF 23 0F 2C 22 50 72 65 73 73 20 ine...#.,"Press
00FAB0: 53 50 41 43 45 20 74 6F 20 63 6F 6E 74 69 6E 75 SPACE to continu
00FAC0: 65 22 20 20 00 25 00 20 03 03 00 00 C9 EF 22 22 e" .%. ......""
00FAD0: 20 01 20 D6 20 03 00 00 C9 EF 22 22 01 20 03 00 . . ....."". ..
00FAE0: 00 C9 EF FF 43 20 01 20 D5 00 2D 00 2A 03 A1 20 ....C . ..-.*..
00FAF0: 03 00 00 C9 EF 03 00 00 54 C2 20 EB 20 0D 00 00 ........T. . ...
00FB00: 6C 69 6E 65 6C 65 EE EF 19 21 01 9F 20 1E 56 04 linele...!.. .V.
00FB10: 01 A0 20 1E 08 02 00 15 00 34 03 A1 20 03 00 00 .. ......4.. ...
00FB20: C9 F2 22 20 22 20 A0 20 1E 20 03 00 1E 00 3E 03 .." " . . ....>.
00FB30: 0D 00 00 71 75 65 73 74 69 6F EE EF 0D 00 00 71 ...questio.....q
00FB40: 75 65 73 74 69 6F EE F4 0F 00 0A 00 48 03 A0 20 uestio......H..
00FB50: 1E 86 01 00 07 00 52 03 01 C0 00 18 00 5C 03 78 ......R......\.x
00FB60: 48 FF FF FF FF 11 87 09 B3 04 B3 04 FD 04 80 09 H...............
00FB70: 02 10 08 10 00 07 01 00 2C 53 41 54 31 31 00 00 ........,SAT11..
00FB80: 00 00 00 00 00 00 00 00 00 02 00 00 00 08 70 09 ..............p.
00FB90: 00 3E 16 00 00 00 00 00 00 00 00 00 00 00 00 00 .>..............
00FBA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00FBB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00FBC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00FBD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00FBE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00FBF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00FC00: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00FC10: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00FC20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00FC30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00FC40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00FC50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00FC60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
00FC70: 00 00 00 00 00 00 00 00 00 AD BF FF FF FF FF 11 ................
00FC80: 88 09 EA 04 7C 04 01 05 86 09 02 10 08 85 0A 15 ....|...........
00FC90: 08 00 16 01 C0 20 45 6E 64 20 71 75 69 7A 20 72 ..... End quiz r
00FCA0: 6F 75 74 69 6E 65 00 07 00 66 03 01 C0 00 0D 00 outine...f......
00FCB0: 70 03 A9 20 23 0F 2C 16 2C 15 00 36 00 7A 03 BF p.. #.,.,..6.z..
00FCC0: 20 23 0F 2C 22 59 6F 75 20 73 63 6F 72 65 64 22 #.,"You scored"
00FCD0: 3B 0D 00 00 73 63 6F 72 E5 3B 22 6F 75 74 20 6F ;...scor.;"out o
00FCE0: 66 22 3B 0D 00 00 71 75 65 73 74 69 6F EE F5 0F f";...questio...
00FCF0: 00 33 00 84 03 A9 20 23 0F 2C 12 2C 19 0A 01 BF .3.... #.,.,....
00FD00: 23 0F 2C 22 50 72 65 73 73 20 53 50 41 43 45 20 #.,"Press SPACE
00FD10: 74 6F 20 72 75 6E 20 74 68 65 20 70 72 6F 67 72 to run the progr
00FD20: 61 6D 22 00 31 00 8E 03 A9 20 23 0F 2C 13 2C 19 am".1.... #.,.,.
00FD30: 0C 01 BF 23 0F 2C 22 61 67 61 69 6E 2C 20 20 6F ...#.,"again, o
00FD40: 72 20 45 53 43 2F 45 53 43 20 74 6F 20 66 69 6E r ESC/ESC to fin
00FD50: 69 73 68 22 00 11 00 98 03 D6 20 FF 43 F2 22 20 ish"...... .C."
00FD60: 22 01 D5 01 CA 00 07 00 A2 03 01 C0 00 20 00 AC "............ ..
00FD70: 03 01 C0 20 49 6E 74 65 72 63 65 70 74 20 45 53 ... Intercept ES
00FD80: 43 41 50 45 20 72 6F 75 74 69 6E 65 00 07 00 B6 CAPE routine....
00FD90: 03 01 C0 6A 6B 00 1F 00 C0 03 AD 20 0F 20 01 82 ...jk...... . ..
00FDA0: 20 0F 20 01 20 A2 20 0E 2C 0F 20 01 20 A2 20 0F . . . .,. . . .
00FDB0: 2C 19 19 20 00 21 00 CA 03 BA 20 0E 01 20 BB 20 ,.. .!.... .. .
00FDC0: 0F 20 01 C0 20 72 65 73 74 6F 72 65 20 64 65 66 . .. restore def
00FDD0: 61 75 6C 74 73 00 06 00 D4 03 98 00 07 00 DE 03 aults...........
00FDE0: 01 C0 00 1A 00 E8 03 01 C0 20 49 6E 69 74 69 61 ......... Initia
00FDF0: 6C 69 73 65 20 77 69 6E 64 6F 77 73 00 07 00 F2 lise windows....
00FE00: 03 01 C0 00 12 00 FC 03 BA 20 23 11 2C 10 20 01 ......... #.,. .
00FE10: 20 8A 20 23 11 00 3D 00 06 04 D8 20 23 0E 2C 10 . #..=.... #.,.
00FE20: 2C 19 27 2C 10 2C 12 F4 0D 00 00 70 74 79 6C 69 ,.',.,.....ptyli
00FE30: 6E 65 F3 20 01 20 D8 20 23 0F 2C 10 2C 19 27 2C ne. . . #.,.,.',
00FE40: 14 F4 0D 00 00 70 74 79 6C 69 6E 65 F3 2C 19 18 .....ptyline.,..
00FE50: 20 20 00 0E 00 10 04 BA 20 0E 01 BB 20 0F 01 8A ...... ... ...
00FE60: 00 12 00 1A 04 BA 20 23 0F 2C 11 20 01 20 8A 20 ...... #.,. . .
00FE70: 23 0F 00 3C 00 24 04 D8 20 23 0E 2C 14 2C 19 26 #..<.$.. #.,.,.&
00FE80: 2C 11 2C 12 F4 0D 00 00 70 74 79 6C 69 6E 65 F3 ,.,.....ptyline.
00FE90: 20 01 20 D8 20 16 89 23 0F 2C 11 2C 19 26 2C 15 . . ..#.,.,.&,.
00FEA0: F4 0D 00 00 70 74 79 6C 69 6E 65 F3 2C 19 17 20 ....ptyline.,..
00FEB0: 00 06 00 2E 04 C9 00 07 00 38 04 01 C0 00 26 00 .........8....&.
00FEC0: 42 04 01 C0 20 72 65 61 64 73 20 61 20 73 74 72 B... reads a str
00FED0: 69 6E 67 20 2B 20 70 72 65 74 74 79 20 70 72 69 ing + pretty pri
00FEE0: 6E 74 73 00 0B 00 4C 04 C3 20 03 00 00 F1 00 0E nts...L.. ......
00FEF0: 00 56 04 03 00 00 E1 EF 03 00 00 F1 00 15 00 60 .V.............`
00FF00: 04 0D 00 00 70 72 65 74 74 79 6C 69 6E 65 F3 EF ....prettyline..
00FF10: 0E 00 0A 00 6A 04 9F 20 1E 9C 04 00 06 00 74 04 ....j.. ......t.
00FF20: C9 00 07 00 7E 04 01 C0 00 26 00 88 04 01 C0 20 ....~....&.....
00FF30: 53 65 74 20 75 70 20 73 74 72 69 6E 67 20 66 6F Set up string fo
00FF40: 72 20 70 72 65 74 74 79 20 70 72 69 6E 74 00 07 r pretty print..
00FF50: 00 92 04 01 C0 00 16 00 9C 04 0D 00 00 50 54 D2 .............PT.
00FF60: EF 0D 00 00 4C 49 4E 45 4C 45 CE 00 18 00 A6 04 ....LINELE......
00FF70: D6 20 FF 0E 28 03 00 00 E1 29 20 EE 20 0D 00 00 . ..(....) . ...
00FF80: 50 54 D2 00 1D 00 B0 04 20 20 D6 20 AC 28 03 00 PT...... . .(..
00FF90: 00 E1 2C 0D 00 00 50 2E 7E 54 D2 2C 0F 29 F2 22 ..,...P.~T.,.)."
00FFA0: 20 22 00 18 00 BA 04 20 20 20 20 0D 00 00 50 54 "..... ...PT
00FFB0: D2 EF 0D 00 00 50 54 D2 F5 0F 00 0A 00 C4 04 20 .....PT........
00FFC0: 20 20 20 D5 00 1F 00 CE 04 20 20 AC 28 03 00 00 ...... .(...
00FFD0: E1 2C 0D 00 00 50 54 D2 2C 0F 29 EF FF 03 28 1C .,...PT.,.)...(.
00FFE0: FE 00 29 00 41 00 D8 04 20 20 0D 00 00 50 54 D2 ..).A... ...PT.
00FFF0: EF 0D 00 00 50 54 D2 F4 0D 00 00 4C 49 4E 45 4C ....PT.....LINEL
010000: 45 CE 20 01 20 0D 00 00 70 72 65 74 74 79 6C 69 E. . ...prettyli
010010: 6E 65 F3 EF 0D 00 00 70 72 65 74 74 79 6C 69 6E ne.....prettylin
010020: 65 F3 F4 0F 00 08 00 E2 04 20 20 D5 00 06 00 EC e........ .....
010030: 04 C9 00 07 00 F6 04 01 C0 00 35 00 00 05 01 C0 ..........5.....
010040: 20 53 75 62 72 6F 75 74 69 6E 65 20 74 6F 20 70 Subroutine to p
010050: 72 69 6E 74 20 61 24 20 77 69 74 68 20 43 48 52 rint a$ with CHR
010060: 24 28 26 46 45 29 20 61 73 20 43 52 4C 46 00 07 $(&FE) as CRLF..
010070: 00 0A 05 01 C0 00 18 00 14 05 9E 20 0D 00 00 F8 ........... ....
010080: EF 0F 20 EC 20 FF 0E 28 03 00 00 E1 29 00 18 00 .. . ..(....)...
010090: 1E 05 03 00 00 E2 EF AC 28 B6 26 03 00 00 E1 2C ........(.&....,
0100A0: 0D 00 00 F8 2C 0F 29 00 21 00 28 05 A1 20 03 00 ....,.).!.(.. ..
0100B0: 00 E2 EF FF 03 28 1C FE 00 29 EB 20 BF 20 01 97 .....(...). . ..
0100C0: 20 BF 20 03 00 00 E2 3B 00 0B 00 32 05 B0 20 0D . ....;...2.. .
0100D0: 00 00 F8 00 06 00 3C 05 C9 00 07 00 46 05 01 C0 ......<.....F...
0100E0: 00 15 00 50 05 01 C0 20 50 72 69 6E 74 20 63 6F ...P... Print co
0100F0: 6D 6D 65 6E 74 00 07 00 5A 05 01 C0 00 1A 00 64 mment...Z......d
010100: 05 CC 20 0F 2C 1A DC 05 F5 0D 00 00 70 6F 69 6E .. .,.......poin
010110: 74 F3 F6 1A AA 05 00 26 00 6E 05 D8 20 E7 20 0E t......&.n.. . .
010120: 2C 0F 20 01 C0 20 72 6F 75 74 69 6E 65 20 6E 65 ,. .. routine ne
010130: 65 64 73 20 77 69 6E 64 6F 77 20 30 00 1E 00 78 eds window 0...x
010140: 05 03 00 00 E1 20 EF 20 03 00 00 45 52 4F D2 28 ..... . ...ERO.(
010150: 0D 00 00 41 4E 53 4E 55 CD 29 00 20 00 82 05 9F ...ANSNU.). ....
010160: 20 1E 9C 04 20 01 C0 20 70 72 65 74 74 79 20 75 ... .. pretty u
010170: 70 20 72 65 73 70 6F 6E 73 65 00 37 00 8C 05 A9 p response.7....
010180: 20 0F 2C 28 0F F4 0D 00 00 6E 75 6D 71 75 65 73 .,(.....numques
010190: F4 29 F6 10 20 01 C0 20 73 65 74 6E 3F 20 63 75 .).. .. setn? cu
0101A0: 72 73 6F 72 20 66 6F 72 20 72 65 73 70 6F 6E 73 rsor for respons
0101B0: 65 20 20 00 23 00 96 05 9F 20 1E 14 05 20 01 C0 e .#.... ... ..
0101C0: 20 50 72 69 6E 74 20 70 72 65 74 74 79 20 72 65 Print pretty re
0101D0: 73 70 6F 6E 73 65 00 10 00 A0 05 D8 20 E7 20 0E sponse...... . .
0101E0: 2C 0F 20 01 20 C9 00 07 00 AA 05 01 C0 00 29 00 ,. . .........).
0101F0: B4 05 A9 20 0F 2C 28 10 F4 0D 00 00 6E 75 6D 71 ... .,(.....numq
010200: 75 65 73 F4 29 F6 10 F5 0D 00 00 70 72 65 74 74 ues.)......prett
010210: 79 6C 69 6E 65 F3 00 22 00 BE 05 9F 20 1E 14 05 yline..".... ...
010220: 20 01 C0 20 50 72 69 6E 74 20 61 6C 74 65 72 65 .. Print altere
010230: 64 20 73 74 72 69 6E 67 00 10 00 C8 05 D8 20 E7 d string...... .
010240: 20 0E 2C 0F 20 01 20 C9 00 07 00 D2 05 01 C0 00 .,. . .........
010250: 1A 00 DC 05 01 C0 20 44 61 74 61 20 66 6F 72 20 ...... Data for
010260: 71 75 65 73 74 69 6F 6E 73 00 0F 00 E6 05 01 C0 questions.......
010270: 20 46 6F 72 6D 61 74 3A 00 18 00 F0 05 01 C0 20 Format:.......
010280: 48 65 61 64 69 6E 67 20 66 6F 72 20 54 65 73 74 Heading for Test
010290: 00 1A 00 FA 05 01 C0 20 46 6F 72 20 65 B3 44 61 ....... For e.Da
0102A0: 63 68 20 71 75 65 73 74 69 6F 6E 3A 00 18 00 04 ch question:....
0102B0: 06 01 C0 20 20 20 20 51 75 65 73 74 69 6F 6E 20 ... Question
0102C0: 74 65 78 74 00 20 00 0E 06 01 C0 20 20 20 20 4E text. ..... N
0102D0: 75 6D 62 65 72 20 6F 66 20 61 6E 73 77 65 72 73 umber of answers
0102E0: 20 28 4E 29 00 39 00 18 06 01 C0 20 20 20 20 54 (N).9..... T
0102F0: 65 78 74 20 6F 66 20 65 61 63 68 20 61 6E 73 77 ext of each answ
010300: 65 72 20 28 20 6D 75 73 74 20 62 65 20 4E 20 69 er ( must be N i
010310: 74 65 6D 73 20 6F 66 20 74 65 78 74 29 00 33 00 tems of text).3.
010320: 22 06 01 C0 20 20 20 20 43 6F 72 72 65 63 74 20 "... Correct
010330: 61 6E 73 77 65 72 20 28 41 2D 46 29 20 20 77 68 answer (A-F) wh
010340: 65 72 65 20 41 3D 31 2C 42 3D 32 20 65 74 63 2E ere A=1,B=2 etc.
010350: 00 3F 00 2C 06 01 C0 20 20 20 20 54 65 78 74 20 .?.,... Text
010360: 66 6F 72 20 65 61 63 68 20 61 6E 73 77 65 72 20 for each answer
010370: 69 6E 20 73 61 6D 65 20 6F 72 64 65 72 20 28 6D in same order (m
010380: 75 73 74 20 62 65 20 4E 20 69 74 65 6D 73 29 00 ust be N items).
010390: 1C 00 36 06 01 C0 20 41 66 74 65 72 20 61 6C FD ..6... After al.
0103A0: 0C 6C 20 71 75 65 73 74 69 6F 6E 73 3A 00 28 00 .l questions:.(.
0103B0: 40 06 01 C0 20 22 20 20 20 20 20 20 20 20 20 45 @... " E
0103C0: 6E 64 20 6F 66 20 54 65 73 74 22 20 28 65 78 61 nd of Test" (exa
0103D0: 63 74 6C 79 29 00 07 00 4A 06 01 C0 00 26 00 54 ctly)...J....&.T
0103E0: 06 8C 20 22 53 65 6C 66 20 41 73 73 65 73 73 6D .. "Self Assessm
0103F0: 65 6E 74 20 54 65 73 74 20 2D 20 43 68 2E 20 31 ent Test - Ch. 1
010400: 31 22 00 07 00 5E 06 01 C0 00 99 00 68 06 8C 20 1"...^......h..
010410: 22 55 6E 64 65 72 20 77 68 61 74 20 63 6F 6E 64 "Under what cond
010420: 69 74 69 6F 6E 73 20 77 69 6C 6C 20 27 46 69 6E itions will 'Fin
010430: 69 73 68 27 20 62 65 20 70 72 69 6E 74 65 64 20 ish' be printed
010440: 62 79 20 74 68 65 20 66 6F 6C 6C 6F 77 69 6E 67 by the following
010450: 20 73 74 61 74 65 6D 65 6E 74 3F 20 20 20 20 20 statement?
010460: 20 20 20 20 20 20 49 46 20 70 6C 61 63 65 20 4F IF place O
010470: 52 20 74 69 6D 65 31 20 54 48 45 4E 20 50 52 49 R time1 THEN PRI
010480: 4E 54 20 7E 43 6F 6E 74 69 6E 75 65 7E 20 45 4C NT ~Continue~ EL
010490: 53 45 20 50 52 49 4E 54 20 7E 46 69 6E 69 73 68 SE PRINT ~Finish
0104A0: 7E 8B 11 FF FF FF FF 11 8B 09 B3 04 B3 04 00 05 ~...............
0104B0: 86 09 02 10 08 10 00 07 01 00 2C 53 41 54 31 31 ..........,SAT11
0104C0: 00 00 00 00 00 00 00 00 00 00 00 03 FF 00 3E 06 ..............>.
0104D0: 70 11 00 3E 16 00 00 00 00 00 00 00 00 00 00 00 p..>............
0104E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0104F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010500: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010510: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010520: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010530: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010540: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010550: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010560: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010570: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010580: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010590: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0105A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0105B0: 00 00 00 00 00 00 00 00 00 00 00 4C 65 FF FF FF ...........Le...
0105C0: FF 11 8B 09 EA 04 7C 04 00 05 85 09 02 10 08 28 ......|........(
0105D0: 2A 13 07 00 16 22 00 48 00 72 06 8C 20 33 2C 22 *....".H.r.. 3,"
0105E0: 70 6C 61 63 65 3D 30 20 3A 20 74 69 6D 65 31 3D place=0 : time1=
0105F0: 30 22 2C 22 70 6C 61 63 65 3C 3E 30 20 3A 20 74 0","place<>0 : t
010600: 69 6D 65 31 3C 3E 30 22 2C 22 70 6C 61 63 65 3D ime1<>0","place=
010610: 2D 31 20 3A 20 74 69 6D 65 31 3D 2D 31 22 00 3C -1 : time1=-1".<
010620: 00 7C 06 8C 20 41 2C 43 6F 72 72 65 63 74 2C 22 .|.. A,Correct,"
010630: 4E 6F 2C 20 74 68 65 20 61 6E 73 77 65 72 20 69 No, the answer i
010640: 73 20 41 22 2C 22 4E 6F 2C 20 74 68 65 20 61 6E s A","No, the an
010650: 73 77 65 72 20 69 73 20 41 22 00 07 00 86 06 01 swer is A"......
010660: C0 00 55 00 90 06 8C 20 22 59 6F 75 20 63 61 6E ..U.... "You can
010670: 6E 6F 74 20 70 75 74 20 66 6C 6F 61 74 69 6E 67 not put floating
010680: 20 70 6F 69 6E 74 20 6E 75 6D 62 65 72 73 20 69 point numbers i
010690: 6E 74 6F 20 69 6E 74 65 67 65 72 20 76 61 72 69 nto integer vari
0106A0: 61 62 6C 65 73 2E 20 54 72 75 65 20 6F 72 20 66 ables. True or f
0106B0: 61 6C 73 65 3F 22 00 5B 00 9A 06 8C 20 32 2C 54 alse?".[.... 2,T
0106C0: 2C 46 2C 42 2C 22 4E 6F 2C 20 74 68 65 20 43 50 ,F,B,"No, the CP
0106D0: 43 34 36 34 20 ED 4C 6D 65 72 65 6C 79 20 72 6F C464 .Lmerely ro
0106E0: 75 6E 64 73 20 74 68 65 6D 22 2C 22 43 6F 72 72 unds them","Corr
0106F0: 65 63 74 2C 20 74 68 65 20 43 50 43 34 36 34 20 ect, the CPC464
010700: 6D 65 72 65 6C 79 20 72 6F 75 6E 64 73 20 74 68 merely rounds th
010710: 65 6D 22 00 07 00 A4 06 01 C0 00 4D 00 AE 06 8C em"........M....
010720: 20 22 57 68 61 74 20 77 6F 75 6C 64 20 74 68 65 "What would the
010730: 20 72 65 73 75 6C 74 20 6F 66 20 74 68 65 20 66 result of the f
010740: 6F 6C 6C 6F 77 69 6E 67 20 62 65 3F 20 20 20 20 ollowing be?
010750: 78 3D 37 3A 79 25 3D 78 2F 30 2E 31 33 3A 50 52 x=7:y%=x/0.13:PR
010760: 49 4E 54 20 79 25 22 00 1C 00 B8 06 8C 20 33 2C INT y%"...... 3,
010770: 35 33 2E 38 34 36 31 35 33 2C 35 33 2E 38 2C 35 53.846153,53.8,5
010780: 34 2C 43 00 39 00 C2 06 8C 20 22 4E 6F 2C 20 74 4,C.9.... "No, t
010790: 68 65 20 61 6E 73 77 65 72 20 69 73 20 43 2C 20 he answer is C,
0107A0: 79 25 20 6D 75 73 74 20 62 65 20 61 20 77 68 6F y% must be a who
0107B0: 6C 65 20 6E 75 6D 62 65 72 22 20 20 00 3A 00 CC le number" .:..
0107C0: 06 8C 20 22 4E 6F 2C 20 74 68 65 20 61 6E 73 77 .. "No, the answ
0107D0: 65 72 20 69 73 20 43 4D 5A 2C 20 79 25 20 6D 75 er is CMZ, y% mu
0107E0: 73 74 20 62 65 20 61 20 77 68 6F 6C 65 20 6E 75 st be a whole nu
0107F0: 6D 62 65 72 22 20 20 20 00 2F 00 D6 06 8C 20 22 mber" ./.... "
010800: 43 6F 72 72 65 63 74 2C 20 79 25 20 6D 75 73 74 Correct, y% must
010810: 20 62 65 20 61 20 77 68 6F 6C 65 20 6E 75 6D 62 be a whole numb
010820: 65 72 22 20 20 20 20 00 07 00 E0 06 01 C0 00 74 er" ........t
010830: 00 EA 06 8C 20 22 57 68 65 6E 20 77 6F 75 6C 64 .... "When would
010840: 20 27 46 6F 75 6E 64 27 20 62 65 20 70 72 69 6E 'Found' be prin
010850: 74 65 64 20 62 79 20 74 68 65 20 66 6F 6C 6C 6F ted by the follo
010860: 77 69 6E 67 20 6C 69 6E 65 20 20 20 20 20 20 20 wing line
010870: 20 20 20 20 20 20 20 20 49 46 20 49 4E 53 54 52 IF INSTR
010880: 28 74 68 69 6E 67 24 2C 6C 6F 73 74 24 29 20 54 (thing$,lost$) T
010890: 48 45 4E 20 50 52 49 4E 54 20 FF 46 6F 75 6E 64 HEN PRINT .Found
0108A0: FF 22 00 3A 00 F4 06 8C 20 34 2C 22 74 68 69 6E .".:.... 4,"thin
0108B0: 67 24 20 61 6E 64 20 6C 6F 73 74 24 20 61 72 65 g$ and lost$ are
0108C0: 20 62 6F 74 68 20 2D 31 22 2C 22 74 68 69 6E 67 both -1","thing
0108D0: 24 20 3D 20 FF 6C 6F 73 74 BC 42 24 FF 22 00 27 $ = .lost.B$.".'
0108E0: 00 FE 06 8C 20 22 74 68 69 6E 67 24 20 69 73 20 .... "thing$ is
0108F0: 61 20 73 75 62 73 74 72 69 6E 67 20 6F 66 20 6C a substring of l
010900: 6F 73 74 24 22 00 27 00 08 07 8C 20 22 6C 6F 73 ost$".'.... "los
010910: 74 24 20 69 73 20 61 20 73 75 62 73 74 72 69 6E t$ is a substrin
010920: 67 20 6F 66 20 74 68 69 6E 67 24 22 00 34 00 12 g of thing$".4..
010930: 07 8C 20 44 2C 22 53 74 72 69 6E 67 73 20 63 61 .. D,"Strings ca
010940: 6E 27 74 20 65 71 75 61 6C 20 6E 75 6D 62 65 72 n't equal number
010950: 73 20 2D 20 41 6E 73 77 65 72 20 69 73 20 44 22 s - Answer is D"
010960: 00 3B 00 1C 07 8C 20 22 54 72 75 65 2C 20 62 75 .;.... "True, bu
010970: 74 20 74 68 69 73 20 69 73 20 6E 6F 74 20 74 68 t this is not th
010980: 65 20 6F 6E 6C 79 20 74 69 6D 65 2C 20 61 6E 73 e only time, ans
010990: 77 65 72 20 69 73 20 44 22 20 20 00 31 00 26 07 wer is D" .1.&.
0109A0: 8C 20 22 4E 6F 2C 20 69 74 27 73 20 74 68 65 20 . "No, it's the
0109B0: 6F 74 68 65 72 20 77 61 79 20 72 6F 75 6E 64 20 other way round
0109C0: 2D 20 44 22 2C 43 6F 72 72 65 63 74 00 07 00 30 - D",Correct...0
0109D0: 07 01 C0 00 69 00 3A 07 8C 20 22 5A 42 57 68 61 ....i.:.. "ZBWha
0109E0: 74 20 77 6F 75 6C 64 20 74 68 65 20 72 65 73 75 t would the resu
0109F0: 6C 74 20 62 65 20 66 72 6F 6D 20 74 68 65 20 66 lt be from the f
010A00: 6F 6C 6C 6F 77 69 6E 67 20 6C 6F 6F 70 3F 20 20 ollowing loop?
010A10: 20 20 20 20 20 20 20 20 20 46 4F 52 20 78 25 3D FOR x%=
010A20: 31 20 54 4F 20 35 20 53 54 45 50 20 30 2E 37 3A 1 TO 5 STEP 0.7:
010A30: 50 52 49 4E 54 20 78 25 3A 4E 45 58 54 22 00 44 PRINT x%:NEXT".D
010A40: 00 44 07 8C 20 33 2C 22 31 2C 20 32 2C 20 33 2C .D.. 3,"1, 2, 3,
010A50: 20 34 2C 20 35 22 2C 22 30 2E 37 2C 20 31 2E 34 4, 5","0.7, 1.4
010A60: 2C 20 32 2E 31 2C 20 32 2E 38 2C 20 33 2E 35 22 , 2.1, 2.8, 3.5"
010A70: 2C 22 31 2C 20 32 2C 20 32 2C 20 33 2C 20 33 22 ,"1, 2, 2, 3, 3"
010A80: 2C 41 00 3A 00 4E 07 8C 20 43 6F 72 72 65 63 74 ,A.:.N.. Correct
010A90: 2C 22 4E 6F 2C 20 74 68 65 20 61 6E 73 77 65 72 ,"No, the answer
010AA0: 20 69 73 20 41 22 2C 22 4E 6F 2C 20 74 68 65 20 is A","No, the
010AB0: 61 6E 73 77 65 72 20 69 73 20 41 22 00 07 00 58 answer is A"...X
010AC0: 07 01 C0 00 68 00 62 07 8C 20 22 57 68 61 74 20 ....h.b.. "What
010AD0: 77 6F 75 6C 64 20 74 68 65 20 72 65 73 12 8D 75 would the res..u
010AE0: 6C 74 20 6F 66 20 74 68 65 20 66 6F 6C 6C 6F 77 lt of the follow
010AF0: 69 6E 67 20 6C 6F 6F 70 20 62 65 3F 20 20 20 20 ing loop be?
010B00: 20 20 20 20 20 20 20 20 20 46 4F 52 20 78 25 3D FOR x%=
010B10: 31 20 54 4F 20 35 20 53 54 45 50 20 30 2E 37 3A 1 TO 5 STEP 0.7:
010B20: 50 52 49 4E 54 20 78 3A 4E 45 58 54 22 00 41 00 PRINT x:NEXT".A.
010B30: 6C 07 8C 20 33 2C 22 31 20 32 20 33 20 34 20 35 l.. 3,"1 2 3 4 5
010B40: 22 2C 22 31 2C 20 31 2E 37 2C 20 32 2E 34 2C 20 ","1, 1.7, 2.4,
010B50: 33 2E 31 2C 20 33 2E 38 2C 20 34 2E 35 22 2C 22 3.1, 3.8, 4.5","
010B60: 30 2C 20 30 2C 20 30 2C 20 30 2C 20 30 22 00 39 0, 0, 0, 0, 0".9
010B70: 00 76 07 8C 20 43 2C 22 4E 6F 2C 20 78 20 69 73 .v.. C,"No, x is
010B80: 20 61 20 64 69 66 66 65 72 65 6E 74 20 76 61 72 a different var
010B90: 69 61 62 6C 65 20 74 6F 20 78 25 2C 20 73 6F 20 iable to x%, so
010BA0: 69 74 27 73 20 43 22 00 3F 00 80 07 8C 20 22 4E it's C".?.... "N
010BB0: 6F 2C 20 78 20 69 73 20 61 20 64 69 66 66 65 72 o, x is a differ
010BC0: 65 6E 74 20 76 61 72 69 61 62 6C 65 20 74 6F 20 ent variable to
010BD0: 78 25 2C 20 73 6F 20 69 74 27 73 20 43 22 2C 3E x%, so it's C",>
010BE0: FA 43 6F 72 72 65 63 74 00 07 00 8A 07 01 C0 00 .Correct........
010BF0: 1D 00 94 07 8C 20 22 20 20 20 20 20 20 20 20 20 ..... "
010C00: 45 6E 64 20 6F 66 20 54 65 73 74 22 00 10 00 9E End of Test"....
010C10: 07 8C 20 31 2C 22 22 2C 41 2C 22 22 00 00 00 00 .. 1,"",A,""....
010C20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010C30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010C40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010C50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010C60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010C70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010C80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010C90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010CA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010CB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010CC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010CD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010CE0: 00 D3 10 FF FF FF FF 11 8C 09 B3 04 B3 04 00 05 ................
010CF0: 88 09 02 10 08 10 00 07 01 00 2C 53 41 54 31 32 ..........,SAT12
010D00: 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 08 ................
010D10: 70 01 FF 69 18 00 00 00 00 00 00 00 00 00 00 00 p..i............
010D20: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010D30: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010D40: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010D50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010D60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010D70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010D80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010D90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010DA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010DB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010DC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010DD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010DE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
010DF0: 00 00 00 00 00 00 00 00 00 00 00 65 D5 FF FF FF ...........e....
010E00: FF 11 8B 09 B3 04 B3 04 02 05 89 09 02 10 08 85 ................
010E10: 0A 15 08 00 16 07 00 64 00 01 C0 00 2C 00 6E 00 .......d....,.n.
010E20: 01 C0 20 53 65 6C 66 20 41 73 73 65 73 73 6D 65 .. Self Assessme
010E30: 6E 74 20 54 65 73 74 73 20 3A 20 42 41 53 49 43 nt Tests : BASIC
010E40: 20 42 6F 6F 6B 20 32 00 07 00 78 00 01 C0 00 12 Book 2...x.....
010E50: 00 82 00 01 C0 20 44 41 20 39 2F 31 32 2F 38 34 ..... DA 9/12/84
010E60: 00 07 00 8C 00 01 C0 00 18 00 96 00 01 C0 20 50 .............. P
010E70: 72 6F 67 72 61 6D 6D 65 72 73 20 6B 65 79 73 00 rogrammers keys.
010E80: 07 00 A0 00 01 C0 00 10 00 AA 00 A4 20 0E 2C 22 ............ .,"
010E90: 6C 69 73 74 0D 22 00 0F 00 B4 00 A4 20 0F 2C 22 list."...... .,"
010EA0: 72 75 6E 0D 22 00 3B 00 BE 00 A4 20 10 2C 22 6D run.".;.... .,"m
010EB0: 6F 64 65 20 32 3A 70 61 70 65 72 20 30 3A 70 65 ode 2:paper 0:pe
010EC0: 6E 20 31 3A 69 6E 6B 20 30 2C 32 33 3A 69 6E 6B n 1:ink 0,23:ink
010ED0: 20 31 2C 30 3A 62 6F 72 64 65 72 20 31 33 0D 22 1,0:border 13."
010EE0: 00 15 00 C8 00 A4 20 11 2C 22 72 65 6E 75 6D 20 ...... .,"renum
010EF0: 31 30 30 0D 22 00 0C 00 D2 00 A4 20 12 2C 22 FF 100."...... .,".
010F00: 22 00 07 00 DC 00 01 C0 00 0C 00 E6 00 B3 20 9F "............. .
010F10: 20 1E C0 03 00 93 32 2C 00 F0 00 01 C0 20 61 72 .....2,..... ar
010F20: 72 61 79 73 20 65 72 6F 72 24 2C 71 75 65 73 24 rays eror$,ques$
010F30: 20 28 6E 6F 74 20 64 69 6D 65 6E 73 69 6F 6E 65 (not dimensione
010F40: 64 29 00 07 00 FA 00 01 C0 00 0E 00 04 01 01 C0 d)..............
010F50: 20 53 65 74 2D 75 70 00 07 00 0E 01 01 C0 00 26 Set-up........&
010F60: 00 18 01 AD 20 0F 01 82 20 19 11 01 A2 20 0E 2C .... ... .... .,
010F70: 19 13 01 A2 20 0F 2C 0E 01 A2 20 10 2C 0F 01 A2 .... .,... .,...
010F80: 20 11 2C 14 00 2D 00 22 01 CF 20 19 FF 2C 1C 36 .,..-.".. ..,.6
010F90: 00 2C 1C 36 00 2C 1C 36 00 20 01 C0 20 73 65 74 .,.6.,.6. .. set
010FA0: 20 75 70 20 66 61 6B 65 20 22 71 75 6F 74 65 73 up fake "quotes
010FB0: 22 00 2B 00 2C 01 0D 00 00 73 63 6F 72 E5 EF 0E ".+.,....scor...
010FC0: 01 0D 00 00 71 75 65 73 74 69 6F EE EF 0F 01 0D ....questio.....
010FD0: 00 00 6C 69 6E 65 6C 65 EE EF 19 21 00 10 00 36 ..linele...!...6
010FE0: 01 03 00 00 54 C2 EF FF 03 28 17 29 00 2A 00 40 ....T....(.).*.@
010FF0: 01 9F 20 1E 42 04 20 01 C0 20 72 65 61 64 20 61 .. .B. .. read a
011000: 20 73 74 72 69 6E 67 20 2B 20 70 72 65 74 74 79 string + pretty
011010: 20 73 65 74 75 70 00 C1 09 1C 00 4A 01 9F 20 1E setup.....J.. .
011020: FC 03 20 01 C0 20 53 65 74 20 75 70 20 77 69 6E .. .. Set up win
011030: 64 6F 77 73 00 2B 00 54 01 9F 20 1E 14 05 20 01 dows.+.T.. ... .
011040: C0 20 50 72 69 6E 74 20 73 74 72 69 6E 67 20 72 . Print string r
011050: 65 61 64 20 61 73 20 70 72 65 74 74 79 65 64 00 ead as prettyed.
011060: 33 00 5E 01 A9 20 23 0F 2C 17 2C 15 01 BF 23 0F 3.^.. #.,.,...#.
011070: 2C 22 50 72 65 73 73 20 53 50 41 43 45 20 74 6F ,"Press SPACE to
011080: 20 73 74 61 72 74 22 01 D6 20 FF 43 F2 22 20 22 start".. .C." "
011090: 01 D5 00 07 00 68 01 01 C0 00 11 00 72 01 01 C0 .....h......r...
0110A0: 20 4D 61 69 6E 20 6C 6F 6F 70 00 07 00 7C 01 01 Main loop...|..
0110B0: C0 00 12 00 86 01 0D 00 00 6C 69 6E 65 6C 65 EE .........linele.
0110C0: EF 19 21 00 2A 00 90 01 9F 20 1E 42 04 20 01 C0 ..!.*.... .B. ..
0110D0: 20 72 65 61 64 20 61 20 73 74 72 69 6E 67 20 2B read a string +
0110E0: 20 70 72 65 74 74 79 20 73 65 74 75 70 00 1F 00 pretty setup...
0110F0: 9A 01 0D 00 00 70 74 79 6C 69 6E 65 F3 EF 0D 00 .....ptyline....
011100: 00 70 72 65 74 74 79 6C 69 6E 65 F3 00 07 00 A4 .prettyline.....
011110: 01 01 C0 00 30 00 AE 01 C3 D9 3E 20 0D 00 00 6E ....0.....> ...n
011120: 75 6D 71 75 65 73 F4 20 20 20 20 20 20 20 01 C0 umques. ..
011130: 20 6E 75 6D 62 65 72 20 6F 66 20 71 75 65 73 74 number of quest
011140: 69 6F 6E 73 20 00 37 00 B8 01 9E 20 0D 00 00 E9 ions .7.... ....
011150: EF 0F 20 EC 20 0D 00 00 6E 75 6D 71 75 65 73 F4 .. . ...numques.
011160: 20 01 C0 20 6C 6F 6F 70 20 66 6F 72 20 65 61 63 .. loop for eac
011170: 68 20 71 75 65 73 74 69 6F 6E 20 20 00 14 00 C2 h question ....
011180: 01 C3 20 03 00 00 71 75 65 F3 28 0D 00 00 E9 29 .. ...que.(....)
011190: 00 0B 00 CC 01 B0 20 0D 00 00 E9 00 27 00 D6 01 ...... .....'...
0111A0: C3 20 03 00 00 61 6E F3 20 20 20 20 20 01 C0 20 . ...an. ..
0111B0: 47 65 74 20 63 6F 72 72 65 63 74 20 61 6E 73 77 Get correct answ
0111C0: 65 72 00 3E 00 E0 01 9E 20 0D 00 00 E9 EF 0F 20 er.>.... ......
0111D0: EC 20 0D 00 00 6E 75 6D 71 75 65 73 F4 20 01 C0 . ...numques. ..
0111E0: 20 6C 6F 6F 70 20 66 6F 72 20 6E 75 6D 62 65 72 loop for number
0111F0: 20 6F 66 20 71 75 65 73 74 69 6F 6E 73 20 20 20 of questions
011200: 00 25 00 EA 01 C3 20 03 00 00 65 72 6F F2 28 0D .%.... ...ero.(.
011210: 00 00 E9 29 20 01 C0 20 67 65 74 3E C7 20 72 65 ...) .. get>. re
011220: 73 70 6F 6E 73 65 73 00 0B 00 F4 01 B0 20 0D 00 sponses...... ..
011230: 00 E9 00 07 00 FE 01 01 C0 00 0D 00 08 02 8A 20 ...............
011240: 01 20 8A 20 23 0F 00 1C 00 12 02 9F 20 1E FC 03 . . #....... ...
011250: 20 01 C0 20 53 65 74 20 75 70 20 77 69 6E 64 6F .. Set up windo
011260: 77 73 00 30 00 1C 02 A1 20 03 00 00 E1 EF 22 20 ws.0.... ....."
011270: 20 20 20 20 20 20 20 20 45 6E 64 20 6F 66 20 54 End of T
011280: 65 73 74 22 20 EB 20 9F 20 1E 14 05 01 A0 20 1E est" . . ..... .
011290: 70 03 00 36 00 26 02 A9 20 23 12 2C 11 F4 28 0D p..6.&.. #.,..(.
0112A0: 00 00 71 75 65 73 74 69 6F EE F0 19 0A 29 2C 11 ..questio....),.
0112B0: 01 BF 23 12 2C FF 19 28 0D 00 00 71 75 65 73 74 ..#.,..(...quest
0112C0: 69 6F EE 29 3B 22 2E 22 00 28 00 30 02 9F 20 1E io.);".".(.0.. .
0112D0: 14 05 20 20 20 20 01 C0 20 70 72 69 6E 74 20 70 .. .. print p
0112E0: 72 65 74 74 79 27 64 20 71 75 65 73 74 69 6F 6E retty'd question
0112F0: 00 07 00 3A 02 01 C0 00 1B 00 44 02 9E 20 0D 00 ...:......D.. ..
011300: 00 E9 EF 0F 20 EC 20 0D 00 00 6E 75 6D 71 75 65 .... . ...numque
011310: 73 F4 00 17 00 4E 02 03 00 00 E1 EF 03 01 80 00 s....N..........
011320: 00 71 75 65 F3 28 0D 00 00 E9 29 00 23 00 58 02 .que.(....).#.X.
011330: A9 20 23 0F 2C 10 2C 0D 00 00 E9 F6 10 F5 0F 20 . #.,.,........
011340: 20 01 C0 20 73 65 74 20 63 75 72 73 6F 72 00 1D .. set cursor..
011350: 00 62 02 A1 20 03 00 00 E1 EF 22 54 22 20 EB 20 .b.. ....."T" .
011360: 03 00 00 E1 EF 22 54 72 75 65 22 00 1E 00 6C 02 ....."True"...l.
011370: A1 20 03 00 00 E1 EF 22 46 22 20 EB 20 03 00 00 . ....."F" . ...
011380: E1 EF 22 46 61 6C 73 65 22 00 38 00 76 02 BF 20 .."False".8.v..
011390: 23 0F 2C 22 28 22 3B FF 03 28 0D 00 00 E9 F4 19 #.,"(";..(......
0113A0: 40 29 3B 22 29 20 22 3B 20 01 C0 20 50 72 69 6E @);") "; .. Prin
0113B0: 74 20 71 75 65 73 74 69 6F 6E 20 6E 75 6D 62 65 t question numbe
0113C0: 72 00 0C 00 80 02 D8 20 E7 20 0E 2C 0F 00 0A 00 r...... . .,....
0113D0: 8A 02 9F 20 1E 14 05 00 0C 00 94 02 D8 20 E7 20 ... ......... .
0113E0: 0E 2C 0F 00 0B 00 9E 02 B0 20 0D 00 00 E9 00 07 .,....... ......
0113F0: 00 A8 02 01 C0 00 12 00 B2 02 01 C0 20 47 65 74 ............ Get
011400: 20 61 6E 73 77 65 72 00 07 00 BC 02 01 C0 00 1C answer.........
011410: 00 C6 02 03 00 00 E1 EF FF 43 01 A1 20 03 00 58 .........C.. ..X
011420: 46 00 E1 EF 22 22 20 A0 20 1E C6 02 00 3D 00 D0 F..."" . ....=..
011430: 02 03 00 00 E1 EF FF 1C 28 03 00 00 E1 29 01 A1 ........(....)..
011440: 20 03 00 00 E1 F1 22 41 22 20 FC 20 03 00 00 E1 ....."A" . ....
011450: EE FF 03 28 19 40 F4 0D 00 00 6E 75 6D 71 75 65 ...(.@....numque
011460: 73 F4 29 20 A0 20 1E C6 02 00 2A 00 DA 02 0D 00 s.) . ....*.....
011470: 00 41 4E 53 4E 55 CD EF 28 FF 01 28 03 00 00 C1 .ANSNU..(..(....
011480: 29 F5 19 40 29 01 0D 00 00 6C 69 6E 65 6C 65 EE )..@)....linele.
011490: EF 19 24 00 2F 00 E4 02 A9 20 23 0F 2C 11 2C 0D ..$./.... #.,.,.
0114A0: 00 00 41 4E 53 4E 55 CD F6 10 F5 0F 01 BB 23 0F ..ANSNU.......#.
0114B0: 2C 0E 01 BF 23 0F 2C 03 00 00 C1 3B 01 BB 23 0F ,...#.,....;..#.
0114C0: 2C 0F 00 22 00 EE 02 01 C0 20 68 69 67 68 6C 69 ,.."..... highli
0114D0: 67 68 74 73 20 73 65 6C 65 63 74 65 64 20 61 6E ghts selected an
0114E0: 73 77 65 72 00 2C 00 F8 02 0D 00 00 70 6F 69 6E swer.,......poin
0114F0: 74 F3 EF 0E 01 A1 20 03 00 00 E1 EF 03 00 00 61 t..... ........a
011500: 6E F3 20 EB 20 0D 00 00 70 6F 69 6E 74 F3 EF 0F n. . ...point...
011510: 00 20 00 02 03 0D 00 00 73 63 6F 72 E5 EF 0D 00 . ......scor....
011520: 00 48 FC 73 63 6F 72 E5 F4 0D 00 00 70 6F 69 6E .H.scor.....poin
011530: 74 F3 00 1C 00 0C 03 9F 20 1E 64 05 20 01 C0 20 t....... .d. ..
011540: 70 72 69 6E 74 20 72 65 73 70 6F 6E 73 65 00 3A print response.:
011550: 00 16 03 A9 20 23 0F 2C 16 2C 19 11 F5 0D 00 00 .... #.,.,......
011560: 70 74 79 6C 69 6E 65 F3 01 BF 23 0F 2C 22 50 72 ptyline...#.,"Pr
011570: 65 73 73 20 53 50 41 43 45 20 74 6F 20 63 6F 6E ess SPACE to con
011580: 74 69 6E 75 65 22 20 20 00 25 00 20 03 03 00 00 tinue" .%. ....
011590: C9 EF 22 22 20 01 20 D6 20 03 00 00 C9 EF 22 22 .."" . . .....""
0115A0: 01 20 03 00 00 C9 EF FF 43 20 01 20 D5 00 2D 00 . ......C . ..-.
0115B0: 2A 03 A1 20 03 00 00 C9 EF 03 00 00 54 C2 20 EB *.. ........T. .
0115C0: 20 0D 00 00 6C 69 6E 65 6C 65 EE EF 19 21 01 9F ...linele...!..
0115D0: 20 1E 56 04 01 A0 20 1E 08 02 00 15 00 34 03 A1 .V... ......4..
0115E0: 20 03 00 00 C9 F2 22 20 22 20 A0 20 1E 20 03 00 ....." " . . ..
0115F0: 1E 00 3E 03 0D 00 00 71 75 65 73 74 69 6F EE EF ..>....questio..
011600: 0D 00 00 71 75 65 73 74 69 6F EE F4 0F 00 0A 00 ...questio......
011610: 48 03 A0 20 1E 86 01 00 07 00 52 03 01 C0 00 18 H.. ......R.....
011620: 00 5C 03 78 48 FF FF FF FF 11 88 09 EA 04 7C 04 .\.xH.........|.
011630: FE 04 84 09 02 10 08 10 00 07 01 00 2C 53 41 54 ............,SAT
011640: 31 32 00 00 00 00 00 00 00 00 00 00 00 02 00 00 12..............
011650: 00 08 70 09 00 69 18 00 00 00 00 00 00 00 00 00 ..p..i..........
011660: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011670: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011680: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011690: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0116A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0116B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0116C0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0116D0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0116E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0116F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011700: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011710: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011720: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011730: 00 00 00 00 00 00 00 00 00 00 00 00 00 C5 66 FF ..............f.
011740: FF FF FF 11 89 09 B3 04 B3 04 02 05 89 09 02 10 ................
011750: 08 82 0A 15 08 00 16 01 C0 20 45 6E 64 20 71 75 ......... End qu
011760: 69 7A 20 72 6F 75 74 69 6E 65 00 07 00 66 03 01 iz routine...f..
011770: C0 00 0D 00 70 03 A9 20 23 0F 2C 16 2C 15 00 36 ....p.. #.,.,..6
011780: 00 7A 03 BF 20 23 0F 2C 22 59 6F 75 20 73 63 6F .z.. #.,"You sco
011790: 72 65 64 22 3B 0D 00 00 73 63 6F 72 E5 3B 22 6F red";...scor.;"o
0117A0: 75 74 20 6F 66 22 3B 0D 00 00 71 75 65 73 74 69 ut of";...questi
0117B0: 6F EE F5 0F 00 33 00 84 03 A9 20 23 0F 2C 12 2C o....3.... #.,.,
0117C0: 19 0A 01 BF 23 0F 2C 22 50 72 65 73 73 20 53 50 ....#.,"Press SP
0117D0: 41 43 45 20 74 6F 20 72 75 6E 20 74 68 65 20 70 ACE to run the p
0117E0: 72 6F 67 72 61 6D 22 00 31 00 8E 03 A9 20 23 0F rogram".1.... #.
0117F0: 2C 13 2C 19 0C 01 BF 23 0F 2C 22 61 67 61 69 6E ,.,....#.,"again
011800: 2C 20 20 6F 72 20 45 53 43 2F 45 53 43 20 74 6F , or ESC/ESC to
011810: 20 66 69 6E 69 73 68 22 00 11 00 98 03 D6 20 FF finish"...... .
011820: 43 F2 22 20 22 01 D5 01 CA 00 07 00 A2 03 01 C0 C." "...........
011830: 00 20 00 AC 03 01 C0 20 49 6E 74 65 72 63 65 70 . ..... Intercep
011840: 74 20 45 53 43 41 50 45 20 72 6F 75 74 69 6E 65 t ESCAPE routine
011850: 00 07 00 B6 03 01 C0 6A 6B 00 1F 00 C0 03 AD 20 .......jk......
011860: 0F 20 01 82 20 0F 20 01 20 A2 20 0E 2C 0F 20 01 . .. . . . .,. .
011870: 20 A2 20 0F 2C 19 19 20 00 21 00 CA 03 BA 20 0E . .,.. .!.... .
011880: 01 20 BB 20 0F 20 01 C0 20 72 65 73 74 6F 72 65 . . . .. restore
011890: 20 64 65 66 61 75 6C 74 73 00 06 00 D4 03 98 00 defaults.......
0118A0: 07 00 DE 03 01 C0 00 1A 00 E8 03 01 C0 20 49 6E ............. In
0118B0: 69 74 69 61 6C 69 73 65 20 77 69 6E 64 6F 77 73 itialise windows
0118C0: 00 07 00 F2 03 01 C0 00 12 00 FC 03 BA 20 23 11 ............. #.
0118D0: 2C 10 20 01 20 8A 20 23 11 00 3D 00 06 04 D8 20 ,. . . #..=....
0118E0: 23 0E 2C 10 2C 19 27 2C 10 2C 12 F4 0D 00 00 70 #.,.,.',.,.....p
0118F0: 74 79 6C 69 6E 65 F3 20 01 20 D8 20 23 0F 2C 10 tyline. . . #.,.
011900: 2C 19 27 2C 14 F4 0D 00 00 70 74 79 6C 69 6E 65 ,.',.....ptyline
011910: F3 2C 19 18 20 20 00 0E 00 10 04 BA 20 0E 01 BB .,.. ...... ...
011920: 20 0F 01 8A 00 12 00 1A 04 BA 20 23 0F 2C 11 20 ......... #.,.
011930: 01 20 8A 20 23 0F 00 3C 00 24 04 D8 20 23 0E 2C . . #..<.$.. #.,
011940: 14 2C 19 26 2C 11 2C 12 F4 0D 00 00 70 74 79 6C .,.&,.,.....ptyl
011950: 69 6E 65 F3 20 01 20 D8 20 16 89 23 0F 2C 11 2C ine. . . ..#.,.,
011960: 19 26 2C 15 F4 0D 00 00 70 74 79 6C 69 6E 65 F3 .&,.....ptyline.
011970: 2C 19 17 20 00 06 00 2E 04 C9 00 07 00 38 04 01 ,.. .........8..
011980: C0 00 26 00 42 04 01 C0 20 72 65 61 64 73 20 61 ..&.B... reads a
011990: 20 73 74 72 69 6E 67 20 2B 20 70 72 65 74 74 79 string + pretty
0119A0: 20 70 72 69 6E 74 73 00 0B 00 4C 04 C3 20 03 00 prints...L.. ..
0119B0: 00 F1 00 0E 00 56 04 03 00 00 E1 EF 03 00 00 F1 .....V..........
0119C0: 00 15 00 60 04 0D 00 00 70 72 65 74 74 79 6C 69 ...`....prettyli
0119D0: 6E 65 F3 EF 0E 00 0A 00 6A 04 9F 20 1E 9C 04 00 ne......j.. ....
0119E0: 06 00 74 04 C9 00 07 00 7E 04 01 C0 00 26 00 88 ..t.....~....&..
0119F0: 04 01 C0 20 53 65 74 20 75 70 20 73 74 72 69 6E ... Set up strin
011A00: 67 20 66 6F 72 20 70 72 65 74 74 79 20 70 72 69 g for pretty pri
011A10: 6E 74 00 07 00 92 04 01 C0 00 16 00 9C 04 0D 00 nt..............
011A20: 00 50 54 D2 EF 0D 00 00 4C 49 4E 45 4C 45 CE 00 .PT.....LINELE..
011A30: 18 00 A6 04 D6 20 FF 0E 28 03 00 00 E1 29 20 EE ..... ..(....) .
011A40: 20 0D 00 00 50 54 D2 00 1D 00 B0 04 20 20 D6 20 ...PT...... .
011A50: AC 28 03 00 00 E1 2C 0D 00 00 50 2E 7E 54 D2 2C .(....,...P.~T.,
011A60: 0F 29 F2 22 20 22 00 18 00 BA 04 20 20 20 20 0D .)." "..... .
011A70: 00 00 50 54 D2 EF 0D 00 00 50 54 D2 F5 0F 00 0A ..PT.....PT.....
011A80: 00 C4 04 20 20 20 20 D5 00 1F 00 CE 04 20 20 AC ... ...... .
011A90: 28 03 00 00 E1 2C 0D 00 00 50 54 D2 2C 0F 29 EF (....,...PT.,.).
011AA0: FF 03 28 1C FE 00 29 00 41 00 D8 04 20 20 0D 00 ..(...).A... ..
011AB0: 00 50 54 D2 EF 0D 00 00 50 54 D2 F4 0D 00 00 4C .PT.....PT.....L
011AC0: 49 4E 45 4C 45 CE 20 01 20 0D 00 00 70 72 65 74 INELE. . ...pret
011AD0: 74 79 6C 69 6E 65 F3 EF 0D 00 00 70 72 65 74 74 tyline.....prett
011AE0: 79 6C 69 6E 65 F3 F4 0F 00 08 00 E2 04 20 20 D5 yline........ .
011AF0: 00 06 00 EC 04 C9 00 07 00 F6 04 01 C0 00 35 00 ..............5.
011B00: 00 05 01 C0 20 53 75 62 72 6F 75 74 69 6E 65 20 .... Subroutine
011B10: 74 6F 20 70 72 69 6E 74 20 61 24 20 77 69 74 68 to print a$ with
011B20: 20 43 48 52 24 28 26 46 45 29 20 61 73 20 43 52 CHR$(&FE) as CR
011B30: 4C 46 00 07 00 0A 05 01 C0 00 18 00 14 05 9E 20 LF.............
011B40: 0D 00 00 F8 EF 0F 20 EC 20 FF 0E 28 03 00 00 E1 ...... . ..(....
011B50: 29 00 18 00 1E 05 03 00 00 E2 EF AC 28 B6 26 03 )...........(.&.
011B60: 00 00 E1 2C 0D 00 00 F8 2C 0F 29 00 21 00 28 05 ...,....,.).!.(.
011B70: A1 20 03 00 00 E2 EF FF 03 28 1C FE 00 29 EB 20 . .......(...).
011B80: BF 20 01 97 20 BF 20 03 00 00 E2 3B 00 0B 00 32 . .. . ....;...2
011B90: 05 B0 20 0D 00 00 F8 00 06 00 3C 05 C9 00 07 00 .. .......<.....
011BA0: 46 05 01 C0 00 15 00 50 05 01 C0 20 50 72 69 6E F......P... Prin
011BB0: 74 20 63 6F 6D 6D 65 6E 74 00 07 00 5A 05 01 C0 t comment...Z...
011BC0: 00 1A 00 64 05 CC 20 0F 2C 1A DC 05 F5 0D 00 00 ...d.. .,.......
011BD0: 70 6F 69 6E 74 F3 F6 1A AA 05 00 26 00 6E 05 D8 point......&.n..
011BE0: 20 E7 20 0E 2C 0F 20 01 C0 20 72 6F 75 74 69 6E . .,. .. routin
011BF0: 65 20 6E 65 65 64 73 20 77 69 6E 64 6F 77 20 30 e needs window 0
011C00: 00 1E 00 78 05 03 00 00 E1 20 EF 20 03 00 00 45 ...x..... . ...E
011C10: 52 4F D2 28 0D 00 00 41 4E 53 4E 55 CD 29 00 20 RO.(...ANSNU.).
011C20: 00 82 05 9F 20 1E 9C 04 20 01 C0 20 70 72 65 74 .... ... .. pret
011C30: 74 79 20 75 70 20 72 65 73 70 6F 6E 73 65 00 37 ty up response.7
011C40: 00 8C 05 A9 20 0F 2C 28 0F F4 0D 00 00 6E 75 6D .... .,(.....num
011C50: 71 75 65 73 F4 29 F6 10 20 01 C0 20 73 65 74 6E ques.).. .. setn
011C60: 3F 20 63 75 72 73 6F 72 20 66 6F 72 20 72 65 73 ? cursor for res
011C70: 70 6F 6E 73 65 20 20 00 23 00 96 05 9F 20 1E 14 ponse .#.... ..
011C80: 05 20 01 C0 20 50 72 69 6E 74 20 70 72 65 74 74 . .. Print prett
011C90: 79 20 72 65 73 70 6F 6E 73 65 00 10 00 A0 05 D8 y response......
011CA0: 20 E7 20 0E 2C 0F 20 01 20 C9 00 07 00 AA 05 01 . .,. . .......
011CB0: C0 00 29 00 B4 05 A9 20 0F 2C 28 10 F4 0D 00 00 ..).... .,(.....
011CC0: 6E 75 6D 71 75 65 73 F4 29 F6 10 F5 0D 00 00 70 numques.)......p
011CD0: 72 65 74 74 79 6C 69 6E 65 F3 00 22 00 BE 05 9F rettyline.."....
011CE0: 20 1E 14 05 20 01 C0 20 50 72 69 6E 74 20 61 6C ... .. Print al
011CF0: 74 65 72 65 64 20 73 74 72 69 6E 67 00 10 00 C8 tered string....
011D00: 05 D8 20 E7 20 0E 2C 0F 20 01 20 C9 00 07 00 D2 .. . .,. . .....
011D10: 05 01 C0 00 1A 00 DC 05 01 C0 20 44 61 74 61 20 .......... Data
011D20: 66 6F 72 20 71 75 65 73 74 69 6F 6E 73 00 0F 00 for questions...
011D30: E6 05 01 C0 20 46 6F 72 6D 61 74 3A 00 18 00 F0 .... Format:....
011D40: 05 01 C0 20 48 65 61 64 69 6E 67 20 66 6F 72 20 ... Heading for
011D50: 54 65 73 74 00 1A 00 FA 05 01 C0 20 46 6F 72 20 Test....... For
011D60: 65 B3 44 61 63 68 20 71 75 65 73 74 69 6F 6E 3A e.Dach question:
011D70: 00 18 00 04 06 01 C0 20 20 20 20 51 75 65 73 74 ....... Quest
011D80: 69 6F 6E 20 74 65 78 74 00 20 00 0E 06 01 C0 20 ion text. .....
011D90: 20 20 20 4E 75 6D 62 65 72 20 6F 66 20 61 6E 73 Number of ans
011DA0: 77 65 72 73 20 28 4E 29 00 39 00 18 06 01 C0 20 wers (N).9.....
011DB0: 20 20 20 54 65 78 74 20 6F 66 20 65 61 63 68 20 Text of each
011DC0: 61 6E 73 77 65 72 20 28 20 6D 75 73 74 20 62 65 answer ( must be
011DD0: 20 4E 20 69 74 65 6D 73 20 6F 66 20 74 65 78 74 N items of text
011DE0: 29 00 33 00 22 06 01 C0 20 20 20 20 43 6F 72 72 ).3."... Corr
011DF0: 65 63 74 20 61 6E 73 77 65 72 20 28 41 2D 46 29 ect answer (A-F)
011E00: 20 20 77 68 65 72 65 20 41 3D 31 2C 42 3D 32 20 where A=1,B=2
011E10: 65 74 63 2E 00 3F 00 2C 06 01 C0 20 20 20 20 54 etc..?.,... T
011E20: 65 78 74 20 66 6F 72 20 65 61 63 68 20 61 6E 73 ext for each ans
011E30: 77 65 72 20 69 6E 20 73 61 6D 65 20 6F 72 64 65 wer in same orde
011E40: 72 20 28 6D 75 73 74 20 62 65 20 4E 20 69 74 65 r (must be N ite
011E50: 6D 73 29 00 1C 00 36 06 01 C0 20 41 66 74 65 72 ms)...6... After
011E60: 20 61 6C FD 0C 6C 20 71 75 65 73 74 69 6F 6E 73 al..l questions
011E70: 3A 00 28 00 40 06 01 C0 20 22 20 20 20 20 20 20 :.(.@... "
011E80: 20 20 20 45 6E 64 20 6F 66 20 54 65 73 74 22 20 End of Test"
011E90: 28 65 78 61 63 74 6C 79 29 00 07 00 4A 06 01 C0 (exactly)...J...
011EA0: 00 26 00 54 06 8C 20 22 53 65 6C 66 20 41 73 73 .&.T.. "Self Ass
011EB0: 65 73 73 6D 65 6E 74 20 54 65 73 74 20 2D 20 43 essment Test - C
011EC0: 68 2E 20 31 32 22 00 07 00 5E 06 01 C0 00 5A 00 h. 12"...^....Z.
011ED0: 68 06 8C 20 22 57 68 61 74 20 64 6F 20 79 6F 75 h.. "What do you
011EE0: 20 65 6E 74 65 72 20 74 6F 20 67 65 74 20 61 75 enter to get au
011EF0: 74 6F 6D 61 74 69 63 20 6E 75 6D 62 65 72 69 6E tomatic numberin
011F00: 67 20 73 74 61 72 74 69 6E 67 20 61 74 20 6C 69 g starting at li
011F10: 6E 65 20 31 30 30 2C 20 69 6E 20 73 74 65 70 73 ne 100, in steps
011F20: 20 6F 66 20 31 30 22 00 84 00 72 06 8C 20 33 2C of 10"...r.. 3,
011F30: 22 41 55 54 4F 20 31 30 2C 31 30 30 22 2C 22 41 "AUTO 10,100","A
011F40: 55 54 4F 20 31 30 20 20 20 20 20 20 20 20 20 20 UTO 10
011F50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
011F60: 20 20 20 31 30 26 8C FF FF FF FF 11 8A 09 B3 04 10&..........
011F70: B3 04 00 05 85 09 02 10 08 10 00 07 01 00 2C 53 ..............,S
011F80: 41 54 31 32 00 00 00 00 00 00 00 00 00 00 00 03 AT12............
011F90: 00 00 00 08 70 11 00 69 18 00 00 00 00 00 00 00 ....p..i........
011FA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011FB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011FC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011FD0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011FE0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
011FF0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
012000: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
012010: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
012020: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
012030: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
012040: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
012050: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
012060: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
012070: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 94 ................
012080: F9 FF FF FF FF 11 8C 09 EA 04 7C 04 02 05 88 09 ..........|.....
012090: 02 10 08 87 0A 15 08 00 16 30 22 2C 22 41 55 54 .........0","AUT
0120A0: 4F 20 31 30 30 2C 31 30 22 2C 43 2C 22 4E 6F 2C O 100,10",C,"No,
0120B0: 20 74 68 65 20 61 6E 73 77 65 72 20 69 73 20 43 the answer is C
0120C0: 22 2C 22 4E 6F 2C 20 74 68 65 20 61 6E 73 77 65 ","No, the answe
0120D0: 72 20 69 73 20 43 22 2C 43 6F 72 72 65 63 74 00 r is C",Correct.
0120E0: 07 00 7C 06 01 C0 00 5F 00 86 06 8C 20 22 57 68 ..|...._.... "Wh
0120F0: 61 74 20 49 4E 4B 20 69 73 20 50 45 4E 20 73 65 at INK is PEN se
012100: 74 20 74 6F 20 61 66 74 65 72 20 65 6E 74 65 72 t to after enter
012110: 69 6E 67 20 74 68 65 20 66 6F 6C 6C 6F 77 69 6E ing the followin
012120: 67 3F 20 20 20 20 20 20 20 20 4D 4F 44 45 20 30 g? MODE 0
012130: 3A 50 45 4E 20 39 3A 4D 4F 44 45 20 32 3A 4D 4F :PEN 9:MODE 2:MO
012140: 44 45 20 30 22 00 4F 00 90 06 8C 20 33 2C 49 4E DE 0".O.... 3,IN
012150: 4B 20 39 2C 49 4E 4B 20 31 2C 6E 6F 6E 65 2C 42 K 9,INK 1,none,B
012160: 2C 22 4E 6F 2C 20 74 68 65 20 61 6E 73 77 65 72 ,"No, the answer
012170: 20 69 73 20 42 22 2C 43 6F 72 72 65 63 74 2C 22 is B",Correct,"
012180: 4E 6F 2C 20 74 68 65 20 61 6E 73 77 65 72 20 69 No, the answer i
012190: 73 20 42 22 00 07 00 9A 06 14 20 01 C0 00 84 00 s B"...... .....
0121A0: A4 06 8C 20 22 55 6E 74 69 6C 20 74 68 65 20 57 ... "Until the W
0121B0: 48 49 4C 45 20 63 6F 6E 64 69 74 69 6F 6E 20 69 HILE condition i
0121C0: 73 20 6E 6F 20 6C 6F 6E 67 65 72 20 74 72 75 65 s no longer true
0121D0: 2C 20 79 6F 75 20 63 61 6E 6E 6F 74 20 65 78 69 , you cannot exi
0121E0: 74 20 66 72 6F 6D 20 74 68 65 20 6C 6F 6F 70 2E t from the loop.
0121F0: 20 54 72 75 65 20 6F 66 20 66 61 6C 73 65 3F 22 True of false?"
012200: 2C 32 2C 54 2C 46 2C 42 2C 22 4E 6F 2C 20 69 74 ,2,T,F,B,"No, it
012210: 27 73 20 66 61 6C 73 65 22 2C 43 6F 72 72 65 63 's false",Correc
012220: 74 00 07 00 AE 06 01 C0 00 6C 00 B8 06 8C 20 22 t........l.... "
012230: 57 68 61 74 20 64 6F 20 79 6F 75 20 67 65 74 20 What do you get
012240: 66 72 6F 6D 20 74 68 65 20 66 6F 6C 6C 6F 77 69 from the followi
012250: 6E 67 3F 20 20 20 20 20 20 20 20 20 6E 61 6D 65 ng? name
012260: 24 3D FF 73 6F 66 74 77 61 72 65 FF 20 20 20 20 $=.software.
012270: 20 20 20 20 20 20 20 20 20 20 20 20 20 50 52 49 PRI
012280: 4E 54 20 52 49 47 48 54 24 28 6E 61 6D 65 73 24 NT RIGHT$(names$
012290: 2C 33 29 22 00 1E 00 C2 06 8C 20 3E 47 35 2C 73 ,3)"...... >G5,s
0122A0: 6F 66 2C 66 74 77 2C 74 77 61 2C 77 61 72 2C 61 of,ftw,twa,war,a
0122B0: 72 65 2C 45 00 48 00 CC 06 8C 20 22 4E 6F 2C 20 re,E.H.... "No,
0122C0: 74 68 65 20 61 6E 73 77 65 72 20 69 73 20 45 22 the answer is E"
0122D0: 2C 22 4E 6F 2C 20 74 68 65 20 61 6E 73 77 65 72 ,"No, the answer
0122E0: 20 69 73 20 45 22 2C 22 4E 6F 2C 20 74 68 65 20 is E","No, the
0122F0: 61 6E 73 77 65 72 20 69 73 20 45 22 00 24 00 D6 answer is E".$..
012300: 06 8C 20 22 4E 6F 2C 20 74 68 65 20 61 6E 73 77 .. "No, the answ
012310: 65 72 20 69 73 20 45 22 2C 43 6F 72 72 65 63 74 er is E",Correct
012320: 00 07 00 E0 06 01 C0 00 8E 00 EA 06 8C 20 22 54 ............. "T
012330: 41 47 3A 4D 4F 56 45 20 33 31 30 2C 31 39 30 20 AG:MOVE 310,190
012340: 67 69 76 65 73 20 74 68 65 20 70 6F 73 69 74 69 gives the positi
012350: 6F 6E 20 6F 66 20 74 68 65 20 6E 65 78 74 20 70 on of the next p
012360: 72 69 6E 74 65 64 20 63 68 61 72 61 63 74 65 72 rinted character
012370: 20 69 6E 20 4D 6F 64 65 20 30 2E 20 57 68 61 74 in Mode 0. What
012380: 20 63 6F 2D 6F 72 64 69 6E 61 74 65 73 20 61 70 co-ordinates ap
012390: 70 6C 79 20 66 6F 72 20 74 68 65 20 73 72 DD 61 ply for the sr.a
0123A0: 6D 65 20 70 6F 73 69 74 69 6F 6E 20 69 6E 20 4D me position in M
0123B0: 6F 64 65 20 31 3F 22 00 27 00 F4 06 8C 20 33 2C ode 1?".'.... 3,
0123C0: 22 33 31 30 2C 31 39 30 22 2C 22 36 32 30 2C 33 "310,190","620,3
0123D0: 38 30 22 2C 22 31 35 35 2C 39 35 22 2C 41 00 3A 80","155,95",A.:
0123E0: 00 FE 06 8C 20 43 6F 72 72 65 63 74 2C 22 4E 6F .... Correct,"No
0123F0: 2C 20 74 68 65 20 61 6E 73 77 65 72 20 69 73 20 , the answer is
012400: 41 22 2C 22 4E 6F 2C 20 74 68 65 20 61 6E 73 77 A","No, the answ
012410: 65 72 20 69 73 20 41 22 00 07 00 08 07 01 C0 00 er is A"........
012420: 66 00 12 07 8C 20 22 57 68 61 74 20 64 6F 65 73 f.... "What does
012430: 20 74 68 65 20 66 69 72 73 74 20 73 65 63 74 69 the first secti
012440: 6F 6E 20 6F 66 20 74 68 69 73 20 74 6F 6E 65 20 on of this tone
012450: 65 6E 76 65 6C 6F 70 65 20 67 69 76 65 3F 20 20 envelope give?
012460: 20 20 20 20 20 20 45 4E 54 20 34 2C 20 35 30 2C ENT 4, 50,
012470: 31 2C 31 2C 20 31 2C 30 2C 35 30 2C 20 35 30 2C 1,1, 1,0,50, 50,
012480: 2D 31 2C 31 22 00 38 00 1C 07 8C 20 33 2C 41 20 -1,1".8.... 3,A
012490: 72 69 73 69 6E 67 20 6E 6F 74 65 2C 41 20 66 FD rising note,A f.
0124A0: D8 61 6C 6C 69 6E 67 20 6E 6F 74 65 2C 41 20 73 .alling note,A s
0124B0: 75 73 74 61 69 6E 65 64 20 6E 6F 74 65 2C 42 00 ustained note,B.
0124C0: 3A 00 26 07 8C 20 22 4E 6F 2C 20 74 68 65 20 61 :.&.. "No, the a
0124D0: 6E 73 77 65 72 20 69 73 20 42 22 2C 43 6F 72 72 nswer is B",Corr
0124E0: 65 63 74 2C 22 4E 6F 2C 20 74 68 65 20 61 6E 73 ect,"No, the ans
0124F0: 77 65 72 20 69 73 20 42 22 00 07 00 30 07 01 C0 wer is B"...0...
012500: 00 65 00 3A 07 8C 20 22 57 68 69 63 68 20 63 68 .e.:.. "Which ch
012510: 61 6E 6E 65 6C 73 20 61 72 65 20 62 65 69 6E 67 annels are being
012520: 20 75 73 65 64 20 62 79 20 74 68 65 20 66 6F 6C used by the fol
012530: 6C 6F 77 69 6E 67 20 53 4F 55 4E 44 20 63 6F 6D lowing SOUND com
012540: 6D 61 6E 64 20 20 20 20 20 20 20 20 20 20 20 53 mand S
012550: 4F 55 4E 44 20 33 2C 31 30 30 2C 32 30 30 2C 33 OUND 3,100,200,3
012560: 2C 31 2C 37 22 00 2E 00 44 07 8C 20 34 2C 43 20 ,1,7"...D.. 4,C
012570: 6F 6E 6C 79 2C 41 20 61 6E 64 20 42 2C 41 20 6F only,A and B,A o
012580: 6E 6C 79 2C 22 41 2C 20 42 2C 20 61 6E 64 20 43 nly,"A, B, and C
012590: 22 2C 42 00 50 00 4E 07 8C 20 22 4E 6F 2C 20 74 ",B.P.N.. "No, t
0125A0: 68 65 50 65 20 61 6E 73 77 65 72 20 69 73 20 42 hePe answer is B
0125B0: 22 2C 43 6F 72 72 65 63 74 2C 22 4E 6F 2C 20 74 ",Correct,"No, t
0125C0: 68 65 20 61 6E 73 77 65 72 20 69 73 20 42 22 2C he answer is B",
0125D0: 22 4E 6F 2C 20 74 68 65 20 61 6E 73 77 65 72 20 "No, the answer
0125E0: 69 73 20 42 22 00 07 00 58 07 01 C0 00 74 00 62 is B"...X....t.b
0125F0: 07 8C 20 22 54 68 65 20 63 6F 6D 6D 61 6E 64 20 .. "The command
012600: 4B 45 59 20 31 32 38 2C FF 6D 6F 64 65 20 32 FF KEY 128,.mode 2.
012610: 20 77 69 6C 6C 20 61 6C 6C 6F 77 20 79 6F 75 20 will allow you
012620: 74 6F 20 63 68 61 6E 67 65 20 74 6F 20 4D 6F 64 to change to Mod
012630: 65 20 32 20 62 79 20 70 72 65 73 73 69 6E 67 20 e 2 by pressing
012640: 6F 6E 65 20 6B 65 79 2E 20 54 72 75 65 20 6F 72 one key. True or
012650: 20 66 61 6C 73 65 3F 22 2C 32 2C 54 2C 46 2C 42 false?",2,T,F,B
012660: 00 35 00 6C 07 8C 20 22 4E 6F 2C 20 79 6F 75 20 .5.l.. "No, you
012670: 6D 75 73 74 20 61 64 64 20 74 68 65 20 43 52 20 must add the CR
012680: 63 68 61 72 61 63 74 65 72 20 28 41 53 43 49 49 character (ASCII
012690: 20 31 33 29 22 00 36 00 76 07 8C 20 22 59 65 73 13)".6.v.. "Yes
0126A0: 2C 20 79 2E 66 6F 75 20 6D 75 73 74 20 61 64 64 , y.fou must add
0126B0: 20 74 68 65 20 43 52 20 63 68 61 72 61 63 74 65 the CR characte
0126C0: 72 20 28 41 53 43 49 49 20 31 33 29 22 00 07 00 r (ASCII 13)"...
0126D0: 80 07 01 C0 00 37 00 8A 07 8C 20 22 57 68 61 74 .....7.... "What
0126E0: 20 69 73 20 74 68 65 20 65 66 66 65 63 74 20 6F is the effect o
0126F0: 66 20 74 68 65 20 63 6F 6D 6D 61 6E 64 20 53 50 f the command SP
012700: 45 45 44 20 57 52 49 54 45 3F 22 00 27 00 94 07 EED WRITE?".'...
012710: 8C 20 33 2C 43 68 61 6E 67 65 73 20 74 68 65 20 . 3,Changes the
012720: 74 65 78 74 20 70 72 69 6E 74 69 6E 67 20 72 61 text printing ra
012730: 74 65 00 26 00 9E 07 8C 20 43 68 61 6E 67 65 73 te.&.... Changes
012740: 20 74 68 65 20 63 61 73 73 65 74 74 65 20 72 65 the cassette re
012750: 61 64 20 73 70 65 65 64 00 25 00 A8 07 8C 20 43 ad speed.%.... C
012760: 68 61 6E 67 65 73 20 63 61 73 73 65 74 74 65 20 hanges cassette
012770: 77 72 69 74 65 20 73 70 65 65 64 2C 43 00 45 00 write speed,C.E.
012780: B2 07 8C 20 22 4E 6F 2C 20 74 68 65 20 61 6E 73 ... "No, the ans
012790: 77 65 72 20 69 73 20 43 22 2C 22 4E 6F 2C 20 74 wer is C","No, t
0127A0: 68 69 73 20 69 C2 6D 73 20 61 75 74 6F 6D 61 74 his i.ms automat
0127B0: 69 63 2C 20 74 68 65 20 61 6E 73 77 65 72 20 69 ic, the answer i
0127C0: 73 20 43 22 00 0E 00 BC 07 8C 20 43 6F 72 72 65 s C"...... Corre
0127D0: 63 74 00 07 00 C6 07 01 C0 00 7E 00 D0 07 8C 20 ct........~....
0127E0: 22 57 68 65 6E 20 77 69 6C 6C 20 27 57 61 69 74 "When will 'Wait
0127F0: 27 20 62 65 20 70 72 69 6E 74 65 64 20 62 79 20 ' be printed by
012800: 74 68 65 20 66 6F 6C 6C 6F 77 69 6E 67 20 73 74 the following st
012810: 61 74 65 6D 65 6E 74 3F 20 20 20 20 20 20 20 20 atement?
012820: 20 49 46 20 74 69 6D 65 31 20 4F 52 20 74 69 64 IF time1 OR tid
012830: 65 20 54 48 45 4E 20 50 52 49 4E 54 20 7E 43 6F e THEN PRINT ~Co
012840: 6E 74 7E 20 45 4C 53 45 20 50 52 49 4E 54 20 7E nt~ ELSE PRINT ~
012850: 57 61 69 74 7E 22 20 00 46 00 DA 07 8C 20 33 2C Wait~" .F.... 3,
012860: 22 74 69 6D 65 31 3D 30 20 3A 20 74 69 64 65 3D "time1=0 : tide=
012870: 30 22 2C 22 74 69 6D 65 31 3C 3E 30 20 3A 20 74 0","time1<>0 : t
012880: 69 64 65 20 3C 3E 30 22 2C 22 74 69 6D 65 31 3D ide <>0","time1=
012890: 2D 31 20 3A 20 74 69 64 65 3D 2D 31 22 00 3C 00 -1 : tide=-1".<.
0128A0: E4 07 8C 20 41 2C 43 4C 2A FF FF FF FF 11 8D 09 ... A,CL*.......
0128B0: B3 04 B3 04 02 05 88 09 02 10 08 10 00 07 01 00 ................
0128C0: 2C 53 41 54 31 32 00 00 00 00 00 00 00 00 00 00 ,SAT12..........
0128D0: 00 04 FF 00 69 00 70 19 00 69 18 00 00 00 00 00 ....i.p..i......
0128E0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0128F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
012900: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
012910: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
012920: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
012930: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
012940: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
012950: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
012960: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
012970: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
012980: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
012990: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0129A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0129B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
0129C0: 00 F0 0C FF FF FF FF 11 8E 09 B3 04 B3 04 01 05 ................
0129D0: 8A 09 02 10 08 14 1C 07 01 00 16 6F 72 72 65 63 ...........orrec
0129E0: 74 2C 22 4E 6F 2C 20 74 68 65 20 61 6E 73 77 65 t,"No, the answe
0129F0: 72 20 69 73 20 41 22 2C 22 4E 6F 2C 20 74 68 65 r is A","No, the
012A00: 20 61 6E 73 77 65 72 20 69 73 20 41 22 00 07 00 answer is A"...
012A10: EE 07 01 C0 00 1D 00 F8 07 8C 20 22 20 20 20 20 .......... "
012A20: 20 20 20 20 20 45 6E 64 20 6F 66 20 54 65 73 74 End of Test
012A30: 22 00 10 00 02 08 8C 20 31 2C 22 22 2C 41 2C 22 "...... 1,"",A,"
012A40: 22 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 "...............
012A50: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
012A60: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
012A70: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
012A80: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
012A90: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
012AA0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
012AB0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
012AC0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ................
012AD0: 00 00 00 00 00 00 00 00 00 00 00 EC E9 FF FF FF ................
012AE0: FF .
RESULT OF SEARCH :
PRO=29 CHEA=0 COD=1 MUSI=0 COP=1 GRA=30 WRIT=3 198=0 199=1 STARTER=0 KBI=0 CAAV=0 L.TOURNIER=0
PRO=29 CHEA=0 COD=1 MUSI=0 COP=1 GRA=30 WRIT=3 198=0 199=1 STARTER=0 KBI=0 CAAV=0 L.TOURNIER=0
vq,SAT1pgtoj d,n Self Assessment Tests BASIC Book 2x DA 9/12/84 Programmers
keys ,"list " ,"run " ,"mode 2paper 0pen 1ink 0,23ink 1,0border 13 " ,"renum 100
" ,"" 2, arrays eror$,ques$ (not dimensioned) Set-up& , , , ,-" ,6,6,6 set
up fake "quotes"+, scor questio linele!6T()* B read a string + pretty setupJ
Set up windows+T Print string read as prettyed3 #,,#,"Press SPACE to start" C"
"hr Main loop linele!* B read a string + pretty setup ptyline prettyline0 num
ques number of questions 7 numques loop for each question que( )
' an Get correct answer numques loop for number of questions % ero(
) get responses # Set up windows0 " End of Test" p6& #,( ques
tio ),#,( questio)"."(0 print pretty'd questionD numquesNque( )#X #,,
set cursorb "T" "True"l "F" "False"8v #,"("( )") " Print question number ,
, Get answerC XF"" () "A" ( numques) * ANSNU(()) linele$/ #,, ANSNU#,#,
#," highlights selected answer, point an point scor Hscor point d print resp
onse #,, ptyline#,"Press SPACE to continue" % "" "" C -* T linele! V 4 " "
questio questio H RxHwm,SAT1pxrn End quiz routinef p #,,6z #,"You scored" s
cor"out of" questio3 #,, #,"Press SPACE to run the program"1 #,,#,"again, or ES
C/ESC to finish" C" " Intercept ESCAPE routinejk , , ! restore defau
lts Initialise windows #, # #,,',, ptyline #,,', ptyline, #, #$ #,,&,,
ptyline #,,&, ptyline, .8&B reads a string + pretty printsL V prettyline j t&
Set up string for pretty print PT LINELE () PT (, P.T,)" " PT PT
(, PT,)()A PT PT LINELE prettyline prettyline 5 Subroutine to print a$ with
CHR$(&FE) as CRLF ()(&, ,)!( () 2 FP Print commentZd , point&n , rout
ine needs window 0x ERO( ANSNU) pretty up response7 ,( numques) setn cursor
for response # Print pretty response , ) ,( numques) prettyline" Print a
ltered string , Data for questions Format Heading for Test For eDach question
Question text Number of answers (N)9 Text of each answer ( must be N
items of text)3" Correct answer (A-F) where A1,B2 etc., Text for each ans
wer in same order (must be N items)6 After all questions( " End of Test"
(exactly)J%T "Self Assessment Test - Ch. 1"h "Typing CLS ENTER gives you a comp
letely blank screen"r 2,T,F,B7 "No you get 'Ready' in the top left hand corner"
"Correct, you Xzt,SAT1pt&get 'Ready' in the top left hand corner" "The numeric k
eypad is not affected by SHIFT or CTRL" 2,T,F,B5 "Not quite, CTRL/ENTER has a sp
ecial function"3 "Correct, CTRL/ENTER has a special function" "How many text cha
racters per line are there in Mode 0" 3,20,40,80,A0 "Correct","No, you're thinki
ng of Mode 1"& "No, you're thinking of Mode 2"E "How many different colours can
you use for the screen border" 3,25,26,27,C5 "No, from 0k to 26 makes a total of
27 colours"5 "No, from 0 to 26 makes a total of 27 colours"6& "Yes. From 0 to 2
6 makes a total of 27 colours"0Z "What will the CPC464 do when it reaches the fo
llowing line 130 GOTO 70"7D 3,"Skip li6nes from 70 to 130","Stop at li
ne 130")N "Jump back to 70 after line 130",CDX "No, it will keep jumping back to
70 whenever it reaches 130"Db "No, it will keep jumping back to 70 whenever it
reaches 130"l "Correct"vU "You obtain* the copy cursor by holding down SHIFT whi
le pressing a cursor key"0 2,T,F,A,"Yes. Correct","No, it is true" "Which of the
following two commands would leave the graphics cursor at x200, y80"' 2,"MOVER
200,80","MOVE 200,80",BJ "No, this command depends on where the cursor was befor
e","Correct" "What part of the following command determines the note of the soun
d SOUND 1,150,300"8 3,"1 (channel)","150 (period)","300 (duration)",B- "No, t
he period determines the note"7 "Correct","No, the period determines the note" "
What would be the value of 't' after the following command if s17.32 tROUND(s
)" 4,17,1.7,18,1.8,AU "Correct","No the command gives you the nearest whole Rnum
ber, 17 in this case"K "No the command gives you the nearest whole number, 17 in
this case"K "No the command gives you the nearest whole number, 17 in this cas
e"*4 " End of Test" 1,"",A,"" y,SAT2pyr d,n Self Assessment Tests BASIC
Book 2x DA 9/12/84 Programmers keys ,"list " ,"run " ,"mode 2paper 0pen 1ink 0,
23ink 1,0border 13 " ,"renum 100 " ,"" 2, arrays eror$,ques$ (not dimensioned)
Set-up& , , , ,-" ,6,6,6 set up fake "quotes"+, scor questio linele!6T()* B
read a string + pretty setupJ Set up windows+T Print string read as prettyed
3 #,,#,"Press SPACE to start" C" "hr Main loop linele!* B read a string + prett
y setup ptyline prettyline0 numques number of questions 7 numques l
oop for each question que( ) ' an Get correct answer numques loop f
or number of questions % ero( ) get responses # Set up windows0 "
End of Test" p6& #,( questio ),#,( questio)"."(0 print pretty'd ques
tionD numquesNque( )#X #,, set cursorb "T" "True"l "F" "False"8v #,"("(
)") " Print question number , , Get answerC XF"" () "A" ( numques) *
ANSNU(()) linele$/ #,, ANSNU#,#,#," highlights selected answer, point an point
scor Hscor point d print response #,, ptyline#,"Press SPACE to continue" % "
" "" C -* T linele! V 4 " " questio questio H RxHw,SAT2pyw End quiz rou
tinef p #,,6z #,"You scored" scor"out of" questio3 #,, #,"Press SPACE to run the
program"1 #,,#,"again, or ESC/ESC to finish" C" " Intercept ESCAPE routinejk
, , ! restore defaults Initialise windows #, # #,,',, ptyline #,,
', ptyline, #, #$ #,,&,, ptyline #,,&, ptyline, .8&B reads a string + pr
etty printsL V prettyline j t& Set up string for pretty print PT LINELE () PT
(, P.T,)" " PT PT (, PT,)()A PT PT LINELE prettyline prettyline
5 Subroutine to print a$ with CHR$(&FE) as CRLF ()(&, ,)!( () 2 FP Prin
t commentZd , point&n , routine needs window 0x ERO( ANSNU) pretty up resp
onse7 ,( numques) setn cursor for response # Print pretty response , ) ,(
numques) prettyline" Print altered string , Data for questions Format Headi
ng for Test For eDach question Question text Number of answers (N)9 Te
xt of each answer ( must be N items of text)3" Correct answer (A-F) where A1
,B2 etc., Text for each answer in same order (must be N items)6 After all que
stions( " End of Test" (exactly)J%T "Self Assessment Test - Ch. 2"h "Wha
t do you enter to get automatic numbering starting at line number 125, in steps
of 9"7r 3,"AUTO 9,125","AUTO 9 125","AUTO 125,9",CP£,SAT2p) "No, it's the
other way round - answer C","No, the answer is C","Correct" "You stop automatic
line numbering by pressing ESC" 2,T,F,A,"Yes, you press ESC","No, you do press E
SC" F "Which of the following will give you a Syntax error message"/ 3,"ERASE
120","120","DELETE 120",A 9 "Correct, ERASE does not delete program lines"
B "No, the answer is A, ERASE does not delete program lines" E "No, the answe
r is A, ERASE does not delete program #lines" "Why will the CPC464 not accep
t the following statement at power-on A%(13,6)12345.67" 5,"Integer variables ca
nnot be subscripted" "Real numbers can't be put in integer vari
ables" "A%(x,y) hasn't been set up by a DIM command"( "One subscript is
more than 10" "Two dimensional arrays must be defined by a DIM"& D20 "No,
the answer is D","No, the answer is D" "No, the answer is D","Correct","No, the
answer is D."DbN "How do you define two arrays of 50 elements each in one DIM c
ommand. (Yes you can do it!)"UX 3,"DIM alpha,beta,(49),(49)","DIM alpha,beta(49)
","DIM alpha(49),beta(49) b C,"No, the answer is C","No, the answer is C","C
orrect"33liv "When the first READ command is executed within a program, which DA
TA constant does it take first"6 2,"The first DATA statement in the program"
6 "The first one after the READ command",AL "Right, unless a RESTORE to s
ome$where else has been executed first" C "Wrong, unless a suitable RESTORE has
been executed first" "The following is a perfectly valid DATA statement. True
or false DATA boiled beef and carrots, 17.3111121,2% +f
2,T,F,B,"Correct","No, it is true" " End of Test" 1,"",A,""e,SAT3pVyw d
,n Self Assessment Tests BASIC Book 2x DA 9/12/84 Programmers keys ,"list " ,"r
un " ,"mode 2paper 0pen 1ink 0,23ink 1,0border 13 " ,"renum 100 " ,"" 2, arrays
eror$,ques$ (not dimensioned) Set-up& , , , ,-" ,6,6,6 set up fake "quotes"+
, scor questio linele!6T()* B read a string + pretty setupJ Set up windows+T
Print string read as prettyed3 #,,#,"Press SPACE to start" C" "hr Main loop li
nele!* B read a string + pretty setup ptyline prettyline0 numques numbe
r of questions 7 numques loop for each question que( ) ' an Get cor
rect answer numques loop for number of questions % ero( ) get responses
# Set up windows0 " End of Test" p6& #,( questio ),#,( questio
)"."(0 print pretty'd questionD numquesNque( )#X #,, set cursorb "T"
"True"l "F" "False"8v #,"("( )") " Print question number , , Get answe
rC XF"" () "A" ( numques) * ANSNU(()) linele$/ #,, ANSNU#,#,#," highlights se
lected answer, point an point scor Hscor point d print response #,, ptyline#
,"Press SPACE to continue" % "" "" C -* T linele! V 4 " " questio quest
io H RxHw,SAT3pVl End quiz routinef p #,,6z #,"You scored" scor"out of" questio
3 #,, #,"Press SPACE to run the program"1 #,,#,"again, or ESC/ESC to finish" C"
" Intercept ESCAPE routinejk , , ! restore defaults Initialise wind
ows #, # #,,',, ptyline #,,', ptyline, #, #$ #,,&,, ptyline #,,&, pt
yline, .8&B reads a string + pretty printsL V prettyline j t& Set up string for
pretty print PT LINELE () PT (, P.T,)" " PT PT (, PT,)()A PT PT
LINELE prettyline prettyline 5 Subroutine to print a$ with CHR$(&FE) as CRLF
()(&, ,)!( () 2 FP Print commentZd , point&n , routine needs window 0x
ERO( ANSNU) pretty up response7 ,( numques) setn cursor for response #
Print pretty response , ) ,( numques) prettyline" Print altered string ,
Data for questions Format Heading for Test For eDach question Question text
Number of answers (N)9 Text of each answer ( must be N items of text)3"
Correct answer (A-F) where A1,B2 etc., Text for each answer in same order (
must be N items)6 After all questions( " End of Test" (exactly)J%T "Self
Assessment Test - Ch. 3"9h "In Mode 1, what is the result of entering PEN 15"5r
4,"Following text is written in INK 15" "PEN is set to INK 3" "NothingrO
zx,SAT3pVU , since 15 is out of range in Mode 1" "PEN is set to INK 15
",B8 "No, B, Pen 15 is forced into range + becomes 3" "Correct, Pen 15 is force
d into range + becomes 3" "No, B, Pen 15 is forced into range + becomes 3" $
"No, B, Pen 15 is forced into range + becomes 3" c "What is the maximum numb
er of colours you can see on the screen at the same time in Mode 2"4 2,2,3,B,"No
, you forgot the border","Correct"J "How many colours can you put "pon screen at
the same time in Mode 0"T 3,5,17,16,B,"No, that's Mode 1","Correct","No, you ha
ve forgotten the border" "What INK is PEN set to after entering the following
MODE 0PEN 13MODE 2MODE 0" 3,INK 13,INK 1,none,BQh "No, B, going into mode 2
the pen is forced into range and goes to INK 1" U& "Correct, going into mode 2
the pen is forced into range and goes to INK 1" U0 "No, B, going into mode 2 t
he pen is forced into range and goes to INK 1" kD "If you don't include the
optional INK argument in a PLOT or DRAW command, what colour will be used"HN 4,I
NK 1,Colour 1,The last INK used in a PLOT or DRAW commandX The last colour
used in a PLOT or DRAW commandCb C,"No, C, unless none has been executed,wh
en INK 1 is used" Cl "No, C, unless none has been executed, when INK 1 is used"
Fv "Correct, unless none has been executed, when INK 1 is used" C "No, C, unl
ess none has been executed, when INK 1 is used" Ld "In Mode 0, co-ordinate 639,
399 is in the top right-hand corner of the screen. What is the co-ordinate of th
is point in Mode 2"/ 4,"159,99","159,199","159,399","639,399" D,"No, D, co-ordin
ates are the same in all modes" 8 "No, D,W co-ordinates are the same in all mo
des" 8 "No, D, co-ordinates are the same in all modes" 8 "Correct, co-ordinate
s are the same in all modes"c "Where will the origin be after entering the follo
wing MODE 0ORIGIN 100,50ORIGIN 73,G,SAT3VpV£-24", 4,"173,26","27,74","73,-24","
73,24",C "No, C, relative to the bottom left of the screen" "No, C, relative
to the bottom left of the screen" "Correct, relative to the bottom left of the
screen" "No, C, relative to the bottom left of the screen" " End o
f Test"* 1,"",A,""b,SAT4pJ d,n Self Assessment Tests BASIC Book 2x DA 9/12/84 P
rogrammers keys ,"list " ,"run " ,"mode 2paper 0pen 1ink 0,23ink 1,0border 13 "
,"renum 100 " ,"" 2, arrays eror$,ques$ (not dimensioned) Set-up& , , , ,-" ,
6,6,6 set up fake "quotes"+, scor questio linele!6T()* B read a string + prett
y setupJ Set up windows+T Print string read as prettyed3 #,,#,"Press SPACE t
o start" C" "hr Main loop linele!* B read a string + pretty setup ptyline prett
yline0 numques number of questions 7 numques loop for each question
que( ) ' an Get correct answer numques loop for number of question
s % ero( ) get responses # Set up windows0 " End of Test" p
6& #,( questio ),#,( questio)"."(0 print pretty'd questionD numquesNque
( )#X #,, set cursorb "T" "True"l "F" "False"8v #,"("( )") " Print questio
n number , , Get answerC XF"" () "A" ( numques) * ANSNU(()) linele$/ #,
, ANSNU#,#,#," highlights selected answer, point an point scor Hscor point d
print response #,, ptyline#,"Press SPACE to continue" % "" "" C -* T line
le! V 4 " " questio questio H RxH,SAT4py End quiz routinef p #,,6z #,"You sc
ored" scor"out of" questio3 #,, #,"Press SPACE to run the program"1 #,,#,"again,
or ESC/ESC to finish" C" " Intercept ESCAPE routinejk , , ! restor
e defaults Initialise windows #, # #,,',, ptyline #,,', ptyline, #, #$
#,,&,, ptyline #,,&, ptyline, .8&B reads a string + pretty printsL V prettyli
ne j t& Set up string for pretty print PT LINELE () PT (, P.T,)" " PT PT
(, PT,)()A PT PT LINELE prettyline prettyline 5 Subroutine to print
a$ with CHR$(&FE) as CRLF ()(&, ,)!( () 2 FP Print commentZd , point&n
, routine needs window 0x ERO( ANSNU) pretty up response7 ,( numques) setn
cursor for response # Print pretty response , ) ,( numques) prettyline"
Print altered string , Data for questions Format Heading for Test For eDach q
uestion Question text Number of answers (N)9 Text of each answer ( mus
t be N items of text)3" Correct answer (A-F) where A1,B2 etc., Text for e
ach answer in same order (must be N items)6 After all questions( " End o
f Test" (exactly)J%T "Self Assessment Test - Ch. 4"Zh "What is the result of the
following statement when x1 FOR a-10 TO -20 STEP x" r 4,"10 steps are execut
ed" "11 steps are executed"w,SAT4p%6 "The program skips to the NEXT x statem
ent"' "The loop is executed once only" C,"No, the answer is C" "No, the answer i
s C" "Correct" "No, the answer is C" "What is the value of q after this loop h
as be/en executed FOR q-0.5 TO 1.7 STEP 0.5" 3,2.0,1.7,1.5,A3 "Correct, the f
irst value outside the range"4 "No, A, the first value outside the range" 4 "N
o, A, the first value outside the range" "How many times is HenHllo printed w
hen the following code is executed z3WHILE z0 PRINT Hellozz+1WEND"0 4,3 tim
es,4 times,Indefinitely,Never,D G "No, the condition is never true, so the loo
p is never executed"G& "No, the condition is never true, so the loop is never ex
ecuted"G0 "No, the condition is never true, so the loop is never executed"1 "Yes
, because the condition is never true"DiN "When is Done printed by this statemen
t IF A5 THEN PRINT 5 ELSE PRINT Not 5PRINT D8one"X 4,"After 5 is printed"!b "Af
ter Not 5 is printed"(l "When 5 or Not 5 are printed"v "Never",BD "No, the answe
r is B, the doesn't end the IF command" "Correct"D "No, the answer is B, th
e doesn't en d the IF command" "No, the answer is B" R "Until the condition
is no longer true, you cannot exit from a WHILE loop" 2,T,F,B$ "No, you can ex
it using GOTO"% "Yes, you can exit using GOTO" " End ofO Test" 1,"",A,""
,SAT6p#& d,n Self Assessment Tests BASIC Book 2x DA 9/12/84 Programmers keys ,"
list " ,"run " ,"mode 2paper 0pen 1ink 0,23ink 1,0border 13 " ,"renum 100 " ,""
2, arrays eror$,ques$ (not dimensioned) Set-up& , , , ,-" ,6,6,6 set up fake
"quotes"+, scor questio linele!6T()* B read a string + pretty setupJ Set up
windows+T Print string read as prettyed3 #,,#,"Press SPACE to start" C" "hr Ma
in loop linele!* B read a string + pretty setup ptyline prettyline0 numques
number of questions 7 numques loop for each question que( ) ' an
Get correct answer numques loop for number of questions % ero( ) get
responses # Set up windows0 " End of Test" p6& #,( questio ),#
,( questio)"."(0 print pretty'd questionD numquesNque( )#X #,, set c
ursorb "T" "True"l "F" "False"8v #,"("( )") " Print question number , ,
Get answerC XF"" () "A" ( numques) * ANSNU(()) linele$/ #,, ANSNU#,#,#," hig
hlights selected answer, point an point scor Hscor point d print response #,
, ptyline#,"Press SPACE to continue" % "" "" C -* T linele! V 4 " " que
stio questio H RxH,SAT6p#z End quiz routinef p #,,6z #,"You scored" scor"out of
" questio3 #,, #,"Press SPACE to run the program"1 #,,#,"again, or ESC/ESC to f
inish" C" " Intercept ESCAPE routinejk , , ! restore defaults Initia
lise windows #, # #,,',, ptyline #,,', ptyline, #, #$ #,,&,, ptyline
#,,&, ptyline, .8&B reads a string + pretty printsL V prettyline j t& Set up st
ring for pretty print PT LINELE () PT (, P.T,)" " PT PT (, PT,)()A
PT PT LINELE prettyline prettyline 5 Subroutine to print a$ with CHR$(&FE)
as CRLF ()(&, ,)!( () 2 FP Print commentZd , point&n , routine needs
window 0x ERO( ANSNU) pretty up response7 ,( numques) setn cursor for respo
nse # Print pretty response , ) ,( numques) prettyline" Print altered str
ing , Data for questions Format Heading for Test For eDach question Questi
on text Number of answers (N)9 Text of each answer ( must be N items of t
ext)3" Correct answer (A-F) where A1,B2 etc., Text for each answer in sam
e order (must be N items)6 After all questions( " End of Test" (exactly)
J%T "Self Assessment Test - Ch. 6"%h "What is the value of 3.124E5"r 5,297.54669
,0.0033608,"312,400","31,240",0.00003124,C5 "No, the answer is C, 3.124 times 10
0000" 5J,SAT6#p#" "No, the answer is C, 3.124 times 100000" $ "Correct,
3.124 times 100000"5 "No, the answer is C, 3.124 times 100000" 5 "No, the an
swer is C, 3.124 times 100000" 8 "Which of the following is not a trig funct
ion" 4,TAN,RND,COS,ATN,B' "No, tangent is a trig function"+ "Yes, random is not
a trig function"& "No, cosine is a trig function"* "No, arctangent is a trig fun
ction" "If a car is going up a 1-in-5 hill, what is the tangen%t of its angle to
the horizontal"% 4,4.9999999,5,0.19611613,0.2,DK "No, 1/5 0.2","No, 1/5 0.2",
"No, 1/5 0.2","Correct, 1/5 0.2"& "Unless you include a RAD command at the beg
inning of a program, it will calculate everything in idegrees. True or false"Y0
2,T,F,B,"No, exactly the opposite is true","Correct, exactly the opposite is tru
e"$D "What is the value of SQR(4)"N 3,1.414,2,16,BBX "No, that is SQR(2)","Corre
ct","No, that is 4 squared" b&l "What is the value of 3.124E-5"v 5,297.54669,0
.0033608,"312,400","31,240",0.00003124 E,"No, the answer is E, 3.124 divided by
100000" 9 "No, the answer is E, 3.124 divided by 100000" 8 "No, the answer
is E, 3.124 divided by 100000" 9 "No, the answer is E, 3.124 divided by 10000
0" / "Correct, 3.124 divided by 100000" ! "What is the value of 32" 3,1.
732,6,9,CI "No, that is the square root of 3","No, the answer is C","Correct"m0
"Is the following line of BASIC a correct translation of the cosine rule a2b2+c
2-(2*b*c*COS(a))" 2,Yes,No,B8 "Wrong, you can't have a2 on left of ,use sqr" "R
ight, you can't have a2 on left of ,use sqr" " ST End of Test" 1,""
,A,"",SAT7pz d,n Self Assessment Tests BASIC Book 2x DA 9/12/84 Programmers key
s ,"list " ,"run " ,"mode 2paper 0pen 1ink 0,23ink 1,0border 13 " ,"renum 100 "
,() , arrays eror$,ques$ (not dimensioned) Set-up& , , , ," ., ,6,6,6 set u
p fake "quotes" +6 scor questio linele!T()*J L read a string yj+ pretty setupT
Set up windows+ Print string read as prettyed3h #,,#,"Press SPACE to start"
C" "r Main loop linele!* L read a string + pretty setup ptyline prettylinie0 n
umques number of questions 7 numques loop for each question que( )
' an Get correct answer numques loop for number of questions % er'
o( ) get responses # Set up windows0& " End of Test" z60 #,(
questio ),#,( questio)"."( print pretty'd questionDN numquesXque( )#b #
,, set cursorl "T" "True"v "F" "False"8 #,"("( )") " Print question number
, , Get answerfvC "" () "A" ( numques) * ANSNU(()) linele$/ #,, ANSNU#
,#,#," highlights selected answer, point an point scor scor point n print re
sponse #,, ptyline#,"Press SPACE to continue" %*"" "" C -4 T linele! "
" *H questio questio R U,SAT7pZ f End quiz routinep z #,,6 #,"You scored" scor"
out of" questio3 #,, #,"Press SPACE to run the program"1 #,,#,"again, or ESC/ES
C to finish" C" " Intercept ESCAPE routine , , ! restore defaults In
itialise windows #, # #,,',, ptyline #,,', ptyline, $ #, #. #,,&,, ptyl
ine #,,&, ptyline, 8B&L reads a string + pretty printsV j prettyline t & Set u
p string for pretty print PT LINELE () PT (, PT,)" " PT PT (, PT,)
()A PT PT LINELE prettyline prettyline 5 Subroutine to print a$ with CHR$(
&FE) as CRLF ()((, ,)!2 () FPZ Print commentdn , point&x , routine nee
ds window 0 ERO( ANSNU) pretty up response7 ,( numIques) set cursor for res
ponse # Print pretty response , ) ,( numques) prettyline" Print altered s
tring , Data for questions Format Heading for Tebst For each question Ques
tion text Number of answers (N)9" Text of each answer ( must be N items o
f text)3, Correct answer (A-F) where A1,B2 etc.6 Text for each answer in
same order (must be N items)8 After all questions(J " End of Test" (exac
tly)T% "Self Assessment Test - Ch. 7"htr "What result do you get from the follow
ing two lines name$Computer PRINT LEN(name$)" " 4,COMPUTER,C
OM,SAT7p%PUTER,8,8W C,"No, the answer is C","No, the answer is C",Correct,"No, t
he answer is C" w "What result do you get from the next two lines n
ame$Computer PRINT RIGHT$(name$,4)" # 5,Comp,ompu,mput,pute,uter,E
H "No, the answer is E","No, the answer is E","No, the answer is E"& "No, the an
swer is E","Correct" "What result do you get from the following two lines
name$Computer PRINT INSTR(3,name$,put)D 3,4,5,6,A,Correct,"No, the
answer is A","No, the answer is A"l "When will 'num' not be printed by the foll
owing statement IF num50 OR num67 THEN PRINT num" 4,'num' is 50 but not 67,'
num' is 67 but not 508 'num' is 50 and 67,'num' is neither 50 nor 67 D "No, the
answer is D","If a number is greater than 67, it must be less than 50 - Answer i
s D","No number can be less than 50 and greater than 67 - Answer is D" "Correct"
&0 "What result do you ge8t from the following line PRINT VAL(0-3
0 secs) G 3,0,30,-30,A,Correct,"No, the answer is A","No, the answer is A"D£N
"What will be the range of numbers allowed in 'num$' by the
following line IF VAL(num$)0 AND VAL(num$)6 THEN....."&X 4,0 to
6,0 to 5,1 to 6,1 to 5,Dfb "No, the answer is D","Nearly right - the answer is
D","Nearly right - the answer is D",Correctlv "What will be the result of the fo
llowing line H PRINT MID$(banana,3,3)J 3,ban,ana,nan,C,"No, the ans
wer is C","No, the answer is C",Correct " End of Test" 1,"",A,""x,SAT8pu
d,n Self Assessment Tests BASIC Book 2x DA 9/12/84 Programmers keys ,"list " ,
"run " ,"mode 2paper 0pen 1ink 0,23ink 1,0border 13 " ,"renum 100 " ,"" 2, arra
ys eror$,ques$ (not dimensioned) Set-up& , , , ,-" ,6,6,6 set up fake "quotes
"+, scor questio linele!6T()* B read a string + pretty setupJ Set up windows+
T Print string read as prettyed3 #,,#,"Press SPACE to start" C" "hr Main loop
linele!* B read a string + pretty setup ptyline prettyline0 numques num
ber of questions 7 numques loop for each question que( ) ' an Get c
orrect answer numques loop for number of questions % ero( ) get response
s # Set up windows0 " End of Test" p6& #,( questio ),#,( quest
io)"."(0 print pretty'd questionD numquesNque( )#X #,, set cursorb "
T" "True"l "F" "False"8v #,"("( )") " Print question number , , Get ans
werC XF"" () "A" ( numques) * ANSNU(()) linele$/ #,, ANSNU#,#,#," highlights
selected answer, point an point scor Hscor point d print response #,, ptylin
e#,"Press SPACE to continue" % "" "" C -* T linele! V 4 " " questio que
stio H RxHz,SAT8pzq End quiz routinef p #,,6z #,"You scored" scor"out of" quest
io3 #,, #,"Press SPACE to run the program"1 #,,#,"again, or ESC/ESC to finish"
C" " Intercept ESCAPE routinejk , , ! restore defaults Initialise wi
ndows #, # #,,',, ptyline #,,', ptyline, #, #$ #,,&,, ptyline #,,&,
ptyline, .8&B reads a string + pretty printsL V prettyline j t& Set up string fo
r pretty print PT LINELE () PT (, P.T,)" " PT PT (, PT,)()A PT P
T LINELE prettyline prettyline 5 Subroutine to print a$ with CHR$(&FE) as CRL
F ()(&, ,)!( () 2 FP Print commentZd , point&n , routine needs window
0x ERO( ANSNU) pretty up response7 ,( numques) setn cursor for response #
Print pretty response , ) ,( numques) prettyline" Print altered string ,
Data for questions Format Heading for Test For eDach question Question text
Number of answers (N)9 Text of each answer ( must be N items of text)3"
Correct answer (A-F) where A1,B2 etc., Text for each answer in same order
(must be N items)6 After all questions( " End of Test" (exactly)J%T "Se
lf Assessment Test - Ch. 8"h "For what duration will each colour stay on the scr
een after the following line INK 1,10,17SPEED INK 5,10"'r 4,"Col.105
secs,Co.x,SAT8p!'l.1710 secs"$ "Col.101 sec,Col.172 secs" ( "Col.100.1 secs,Col
.170.2 secs"( "Col.100.2 secs,Col.170.1 secs"I C,"No, the speed is measured in 1
/50ths of a second - answer is C"G "No, the speed is measured in 1/50ths of a se
cond - answer is C"8 "Correct","No, the other way round - Answer is C" "The stat
ement TEST(75,107) will return the value -1 if the INK at these co-ordinates is
different to that of the PAPER. True or false"m 2,T,F,B,"No, it returns the INK
number of the pixel","Correct, it returns the INK number of the pixel" "The foll
owing line gives the position where the next character will appear in Mode 0. Wh
at should the co-ordinates be in Mode 1 TAGMOVE 310,190"' 3,"310,190","620,380
","155,95",Ax "Correct","No, screen co-ordinates are the same in all modes","No,
screen co-ordinates are the same in all modes"5 "LOCATE has no effect while TAG
is being used" 2,T,F,B,"No, TAGOFF will allow the next character to bsFe printe
d at the current cursor position","Correct, TAGOFF will allow the next character
to be printed at the current cursor position"V "What value would TEST(130,120)
return after the following line PLOT 130,120,2"h& 3,0,-1,2,C,"No, the anUUswer i
s the ink colour - C","No, the answer is the ink colour - C",Correct 0 "
End of Test"D 1,"",A,"",SAT9pcx d,n Self Assessment Tests BASIC Book 2x DA 9/1
2/84 Programmers keys ,"list " ,"run " ,"mode 2paper 0pen 1ink 0,23ink 1,0border
13 " ,"renum 100 " ,"" 2, arrays eror$,ques$ (not dimensioned) Set-up& , , ,
,-" ,6,6,6 set up fake "quotes"+, scor questio linele!6T()* B read a string +
pretty setupJ Set up windows+T Print string read as prettyed3 #,,#,"Press S
PACE to start" C" "hr Main loop linele!* B read a string + pretty setup ptyline
prettyline0 numques number of questions 7 numques loop for each qu
estion que( ) ' an Get correct answer numques loop for number of qu
estions % ero( ) get responses # Set up windows0 " End of Test
" p6& #,( questio ),#,( questio)"."(0 print pretty'd questionD numqu
esNque( )#X #,, set cursorb "T" "True"l "F" "False"8v #,"("( )") " Print q
uestion number , , Get answerC XF"" () "A" ( numques) * ANSNU(()) linel
e$/ #,, ANSNU#,#,#," highlights selected answer, point an point scor Hscor po
int d print response #,, ptyline#,"Press SPACE to continue" % "" "" C -* T
linele! V 4 " " questio questio H RxH,SAT9pb End quiz routinef p #,,6z #,"
You scored" scor"out of" questio3 #,, #,"Press SPACE to run the program"1 #,,#,"
again, or ESC/ESC to finish" C" " Intercept ESCAPE routinejk , , !
restore defaults Initialise windows #, # #,,',, ptyline #,,', ptyline, #
, #$ #,,&,, ptyline #,,&, ptyline, .8&B reads a string + pretty printsL V pr
ettyline j t& Set up string for pretty print PT LINELE () PT (, P.T,)" "
PT PT (, PT,)()A PT PT LINELE prettyline prettyline 5 Subroutine to
print a$ with CHR$(&FE) as CRLF ()(&, ,)!( () 2 FP Print commentZd , poi
nt&n , routine needs window 0x ERO( ANSNU) pretty up response7 ,( numques)
setn cursor for response # Print pretty response , ) ,( numques) prettyli
ne" Print altered string , Data for questions Format Heading for Test For e
Dach question Question text Number of answers (N)9 Text of each answer
( must be N items of text)3" Correct answer (A-F) where A1,B2 etc., Text
for each answer in same order (must be N items)6 After all questions( "
End of Test" (exactly)J%T "Self Assessment Test - Ch. 9"Rh "The tone envelope E
NT 1, 40,4,1 will give a rising note. True or false" Ir 2,T,F,B,"No, it gives
you a lengthening period, so a falling not(,SAT9p)e"G "Correct, it gives you a l
engthening period, so a falling note" 0 "How many sections can an envelope have"
4,1,3,15,5,D,"No, the answer is D","No, the answer is D"& "No, the answer is D"
,"Correct" "Can you have more than one section in a tone envelope"j 2,Yes,No,A,"
Correct, you can have up to five sections","Not true. You can have up to five se
ctions"o "What does the second section of this volume envelope give you ENV 9,
1,15,1, 1,0,40, 4,-2,5', 7,-1,10"3 3,A fast attack,A long sustain,A slow decay
B,"No, the answer is B","Correct","No, the answer is B"d "What does the third se
ction of this tone envelope give ENT 4, 50,1,1, 1,0,50, 50,-1,1"6 3,A falli
ng note,A rising note,A sustained note B,"No, the answer is B","Correct","No, th
e answer is B"& "Describe this sound ENV 1, 15,1,3, 1,0,80, 1,-15,1
SOUND 7,100,155,0,1"0 4,"Fast attack, fast decay","Fast attack, slow decay"a& "
Slow attack, fast decay","Slow attack, slow decay",CVD "No, the answer is C","No
, the answer is C",Correct,"No, the answer is C" NX " End of Test"b
1,"",A,"",SAT10pHE d,n Self Assessment Tests BASIC Book 2x DA 9/12/84 Programm
ers keys ,"list " ,"run " ,"mode 2paper 0pen 1ink 0,23ink 1,0border 13 " ,"renum
100 " ,"" 2, arrays eror$,ques$ (not dimensioned) Set-up& , , , ,-" ,6,6,6
set up fake "quotes"+, scor questio linele!6T()* B read a string + pretty setup
J Set up windows+T Print string read as prettyed3 #,,#,"Press SPACE to start
" C" "hr Main loop linele!* B read a string + pretty setup ptyline prettyline0
numques number of questions 7 numques loop for each question que(
) ' an Get correct answer numques loop for number of questions % e
ro( ) get responses # Set up windows0 " End of Test" p6& #,(
questio ),#,( questio)"."(0 print pretty'd questionD numquesNque( )#X #
,, set cursorb "T" "True"l "F" "False"8v #,"("( )") " Print question numbe
r , , Get answerC XF"" () "A" ( numques) * ANSNU(()) linele$/ #,, ANSNU
#,#,#," highlights selected answer, point an point scor Hscor point d print
response #,, ptyline#,"Press SPACE to continue" % "" "" C -* T linele! V 4
" " questio questio H RxH,SAT10pHG End quiz routinef p #,,6z #,"You scored"
scor"out of" questio3 #,, #,"Press SPACE to run the program"1 #,,#,"again, or
ESC/ESC to finish" C" " Intercept ESCAPE routinejk , , ! restore def
aults Initialise windows #, # #,,',, ptyline #,,', ptyline, #, #$ #,,&
,, ptyline #,,&, ptyline, .8&B reads a string + pretty printsL V prettyline j
t& Set up string for pretty print PT LINELE () PT (, P.T,)" " PT PT
(, PT,)()A PT PT LINELE prettyline prettyline 5 Subroutine to print a$ wi
th CHR$(&FE) as CRLF ()(&, ,)!( () 2 FP Print commentZd , point&n , ro
utine needs window 0x ERO( ANSNU) pretty up response7 ,( numques) setn curs
or for response # Print pretty response , ) ,( numques) prettyline" Print
altered string , Data for questions Format Heading for Test For eDach questi
on Question text Number of answers (N)9 Text of each answer ( must be
N items of text)3" Correct answer (A-F) where A1,B2 etc., Text for each a
nswer in same order (must be N items)6 After all questions( " End of Tes
t" (exactly)J&T "Self Assessment Test - Ch. 10"Ah What must you do to (period) t
o raise a note by one octaver 4,Multiply by 2,Divide by 2,Multiply by 2/3,Divide
by 2/3R B,"No, the answe',SAT10HpHy $ r is B",Correct,"No, the answer is B","No
, the answer is B"3 How many sound channels does the CPC464 have 4,1,2,3,15,CP "
No, the answer is C","No, the answer is C",Correct,"No, the answer is C"b "Which
channels are being Yused by the following SOUND command SOUND 4,100,200,3
,1,7". 4,C only,A and B,A only,"A, B, and C",AP Correct,"No, the answer is A","N
o, the answer is A","No, the answer is A" "Who was Colonel Bogey"f 1,"Answers on
a postXcard please to Amsoft 169 Kings Road Brentwood Essex
",A "" "The RESTORE command sets the CPC464's pointer to the first constant in t
he first DATA statement following the designated line number") 2,T,F,A,Correct,"
D'No, it is true"& " End of Test"0 1,"",A,"",SAT11p d,n Self Assessment
Tests BASIC Book 2x DA 9/12/84 Programmers keys ,"list " ,"run " ,"mode 2paper
0pen 1ink 0,23ink 1,0border 13 " ,"renum 100 " ,"" 2, arrays eror$,ques$ (not
dimensioned) Set-up& , , , ,-" ,6,6,6 set up fake "quotes"+, scor questio lin
ele!6T()* B read a string + pretty setupJ Set up windows+T Print string rea
d as prettyed3 #,,#,"Press SPACE to start" C" "hr Main loop linele!* B read a s
tring + pretty setup ptyline prettyline0 numques number of questions 7
numques loop for each question que( ) ' an Get correct answer nu
mques loop for number of questions % ero( ) get responses # Set up wi
ndows0 " End of Test" p6& #,( questio ),#,( questio)"."(0 print
pretty'd questionD numquesNque( )#X #,, set cursorb "T" "True"l "F" "Fa
lse"8v #,"("( )") " Print question number , , Get answerC XF"" () "A" (
numques) * ANSNU(()) linele$/ #,, ANSNU#,#,#," highlights selected answer, poi
nt an point scor Hscor point d print response #,, ptyline#,"Press SPACE to c
ontinue" % "" "" C -* T linele! V 4 " " questio questio H RxH,SAT11p E
nd quiz routinef p #,,6z #,"You scored" scor"out of" questio3 #,, #,"Press SPACE
to run the program"1 #,,#,"again, or ESC/ESC to finish" C" " Intercept ESCAPE
routinejk , , ! restore defaults Initialise windows #, # #,,',, pt
yline #,,', ptyline, #, #$ #,,&,, ptyline #,,&, ptyline, .8&B reads a
string + pretty printsL V prettyline j t& Set up string for pretty print PT LINE
LE () PT (, P.T,)" " PT PT (, PT,)()A PT PT LINELE prettyline
prettyline 5 Subroutine to print a$ with CHR$(&FE) as CRLF ()(&, ,)!( ()
2 FP Print commentZd , point&n , routine needs window 0x ERO( ANSNU) pre
tty up response7 ,( numques) setn cursor for response # Print pretty respons
e , ) ,( numques) prettyline" Print altered string , Data for questions F
ormat Heading for Test For eDach question Question text Number of answers
(N)9 Text of each answer ( must be N items of text)3" Correct answer (A-F
) where A1,B2 etc., Text for each answer in same order (must be N items)6 Af
ter all questions( " End of Test" (exactly)J&T "Self Assessment Test - C
h. 11"h "Under what conditions will 'Finish' be printed by the following stateme
nt IF place OR time1 THEN PRINT Continue ELSE PRINT Finish,SAT11pLe(*"
Hr 3,"place0 time10","place0 time10","place-1 time1-1" A,Correct,"No, the ans
wer is A","No, the answer is A"U "You cannot put floating point numbers into int
eger variables. True or false" 2,T,F,B,"No, the CPC464 Lmerely rounds them","Cor
rect, the CPC464 merely rounds them"M "What would the result of the following be
x7y%x/0.13PRINT y%" 3,53.846153,53.8,54,C9 "No, the answer is C, y% must be
a whole number" "No, the answer is CMZ, y% must be a whole number" / "Correc
t, y% must be a whole number" t "When would 'Found' be printed by the followi
ng line IF INSTR(thing$,lost$) THEN PRINT Found" 4,"thing$ and los
t$ are both -1","thing$ lostB$"' "thing$ is a substring of lost$"' "lost$ is a
substring of thing$"4 D,"Strings can't equal numbers - Answer is D" "True, but t
his is not the only time, answer is D" 1& "No, it's the other way round - D",Co
rrect0i "ZBWhat would the result be from the following loop FOR x%1 TO
5 STEP 0.7PRINT x%NEXT"DD 3,"1, 2, 3, 4, 5","0.7, 1.4, 2.1, 2.8, 3.5","1, 2, 2,
3, 3",AN Correct,"No, the answer is A","No, the answer is A"Xhb "What would the
result of the following loop be FOR x%1 TO 5 STEP 0.7PRINT xNEXT"Al
3,"1 2 3 4 5","1, 1.7, 2.4, 3.1, 3.8, 4.5","0, 0, 0, 0, 0"9v C,"No, x is a diff
erent variable to x%, so it's C" "No, x is a different variable to x%, so it's C
",Correct " End of Test" 1,"",A,"",SAT12pie d,n Self Assessment Tests B
ASIC Book 2x DA 9/12/84 Programmers keys ,"list " ,"run " ,"mode 2paper 0pen 1in
k 0,23ink 1,0border 13 " ,"renum 100 " ,"" 2, arrays eror$,ques$ (not dimension
ed) Set-up& , , , ,-" ,6,6,6 set up fake "quotes"+, scor questio linele!6T()*
B read a string + pretty setupJ Set up windows+T Print string read as pret
tyed3 #,,#,"Press SPACE to start" C" "hr Main loop linele!* B read a string + p
retty setup ptyline prettyline0 numques number of questions 7 numque
s loop for each question que( ) ' an Get correct answer numques lo
op for number of questions % ero( ) get responses # Set up windows0 "
End of Test" p6& #,( questio ),#,( questio)"."(0 print pretty'd
questionD numquesNque( )#X #,, set cursorb "T" "True"l "F" "False"8v #,
"("( )") " Print question number , , Get answerC XF"" () "A" ( numques)
* ANSNU(()) linele$/ #,, ANSNU#,#,#," highlights selected answer, point an p
oint scor Hscor point d print response #,, ptyline#,"Press SPACE to continue"
% "" "" C -* T linele! V 4 " " questio questio H RxH,SAT12pif End quiz
routinef p #,,6z #,"You scored" scor"out of" questio3 #,, #,"Press SPACE to run
the program"1 #,,#,"again, or ESC/ESC to finish" C" " Intercept ESCAPE routin
ejk , , ! restore defaults Initialise windows #, # #,,',, ptyline
#,,', ptyline, #, #$ #,,&,, ptyline #,,&, ptyline, .8&B reads a string
+ pretty printsL V prettyline j t& Set up string for pretty print PT LINELE ()
PT (, P.T,)" " PT PT (, PT,)()A PT PT LINELE prettyline prettyl
ine 5 Subroutine to print a$ with CHR$(&FE) as CRLF ()(&, ,)!( () 2 FP
Print commentZd , point&n , routine needs window 0x ERO( ANSNU) pretty up
response7 ,( numques) setn cursor for response # Print pretty response , )
,( numques) prettyline" Print altered string , Data for questions Format H
eading for Test For eDach question Question text Number of answers (N)9
Text of each answer ( must be N items of text)3" Correct answer (A-F) wher
e A1,B2 etc., Text for each answer in same order (must be N items)6 After all
questions( " End of Test" (exactly)J&T "Self Assessment Test - Ch. 12"Z
h "What do you enter to get automatic numbering starting at line 100, in steps o
f 10"r 3,"AUTO 10,100","AUTO 10 10&,SAT12pi 0","AUTO
100,10",C,"No, the answer is C","No, the answer is C",Correct "What INK is PEN
set to after entering the following MODE 0PEN 9MODE 2MODE 0"O 3,INK 9,INK
1,none,B,"No, the answer is B",Correct,"No, the answer is B" "Until the WHILE
condition is no longer true, you cannot exit from the loop. True of false",2,T,F
,B,"No, it's false",Correctl "What do you get from the following name$so
ftware PRINT RIGHT$(names$,3)" G5,sof,ftw,twa,war,are,EH "No, th
e answer is E","No, the answer is E","No, the answer is E"$ "No, the answer is E
",Correct "TAGMOVE 310,190 gives the position of the next printed character in M
ode 0. What co-ordinates apply for the srame position in Mode 1"' 3,"310,190","6
20,380","155,95",A Correct,"No, the answer is A","No, the answer is A"f "What do
es the first section of this tone envelope give ENT 4, 50,1,1, 1,0,50, 50
,-1,1"8 3,A rising note,A falling note,A sustained note,B& "No, the answer is B"
,Correct,"No, the answer is B"0e "Which channels are being used by the following
SOUND command SOUND 3,100,200,3,1,7".D 4,C only,A and B,A only,"A, B,
and C",BPN "No, thePe answer is B",Correct,"No, the answer is B","No, the answe
r is B"Xtb "The command KEY 128,mode 2 will allow you to change to Mode 2 by pre
ssing one key. True or false",2,T,F,B5l "No, you must add the CR character (ASCI
I 13)"6v "Yes, y.fou must add the CR character (ASCII 13)"7 "What is the effect
of the command SPEED WRITE"' 3,Changes the text printing rate& Changes the casse
tte read speed% Changes cassette write speed,CE "No, the answer is C","No, this
ims automatic, the answer is C" Correct "When will 'Wait' be printed by the foll
owing statement IF time1 OR tide THEN PRINT Cont ELSE PRINT Wait" F 3,"t
ime10 tide0","time10 tide 0","time1-1 tide-1" A,CL*,SAT12ipiorrect,"No, the a
nswer is A","No, the answer is A" " End of Test" 1,"",A,""Tous droits réservés. Reproduction sans autorisation interdite. © Kukulcan