_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

ALG. VECTORS.C3

FILE INFORMATION

FILENAME(S): ALG. VECTORS.C3

FILE TYPE(S): PRG

FILE SIZE: 12.3K

FIRST SEEN: 2025-11-30 01:07:53

APPEARS ON: 2 disk(s)

FILE HASH

aad47273ca81ca6d487ae5179add9a371f45e9b7f107a9e056864d0b5c869ba5

FOUND ON DISKS (2 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
FREESOFT DISK NR ALG. VECTORS.C3 PRG Treasure Chest - Wolfgang Rauprich 17 0 DOWNLOAD FILE
L EHRNEN ALG. VECTORS.C3 PRG Treasure Chest - Wolfgang Rauprich 17 0 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 0A 08 01 00 89 39  31 30 00 2A 08 02 00 8F  |.......910.*....|
00000010: 20 2A 2A 20 4D 4C 20 53  54 4F 50 20 4B 45 59 20  | ** ML STOP KEY |
00000020: 44 49 53 41 42 4C 45 20  2A 2A 00 55 08 03 00 99  |DISABLE **.U....|
00000030: 22 78 A9 3D 85 90 EA A9  04 85 91 EA 58 60 20 EA  |"x.=........X` .|
00000040: FF A9 FF 85 9B 4C 58 E4  78 A9 55 85 90 EA A9 E4  |.....LX.x.U.....|
00000050: 85 91 EA 58 60 00 74 08  04 00 99 22 78 68 68 68  |...X`.t...."xhhh|
00000060: AA 68 A8 68 68 68 68 68  68 68 98 48 8A 48 58 60  |.h.hhhhhhh.H.HX`|
00000070: 31 31 31 22 00 85 08 05  00 99 22 68 68 68 68 68  |111"......"hhhhh|
00000080: 68 68 60 31 22 00 A7 08  06 00 8F 20 2A 2A 20 34  |hh`1"...... ** 4|
00000090: 20 2D 20 50 4F 50 20 4D  4C 20 53 55 42 52 4F 55  | - POP ML SUBROU|
000000A0: 54 49 4E 45 20 2A 2A 00  C8 08 0A 00 8F 20 2A 2A  |TINE **...... **|
000000B0: 47 45 4E 45 52 41 4C 20  49 4E 50 55 54 20 52 4F  |GENERAL INPUT RO|
000000C0: 55 54 49 4E 45 20 2A 2A  00 CE 08 0F 00 3A 00 D4  |UTINE **.....:..|
000000D0: 08 1E 00 3A 00 F0 08 23  00 8F 20 2B 2B 2B 20 49  |...:...#.. +++ I|
000000E0: 4E 50 55 54 20 53 45 43  54 49 4F 4E 20 2B 2B 2B  |NPUT SECTION +++|
000000F0: 00 02 09 28 00 55 52 24  B2 22 22 3A 55 49 24 B2  |...(.UR$."":UI$.|
00000100: 22 22 00 12 09 2A 00 8B  55 4C B2 30 A7 55 4C B2  |""...*..UL.0.UL.|
00000110: 38 30 00 25 09 2D 00 99  22 20 20 9D 9D 22 3B 3A  |80.%.-.."  ..";:|
00000120: 97 55 43 2C 30 00 39 09  32 00 A1 55 49 24 3A 8B  |.UC,0.9.2..UI$:.|
00000130: 55 49 24 B2 22 22 A7 35  30 00 63 09 37 00 8B 55  |UI$."".50.c.7..U|
00000140: 49 24 B2 C7 28 31 33 29  AF C3 28 55 52 24 29 B1  |I$..(13)..(UR$).|
00000150: B2 31 A7 97 55 43 2C 31  3A 99 22 20 9D 22 3B 3A  |.1..UC,1:." .";:|
00000160: 89 38 35 00 76 09 3C 00  8B 55 49 24 B2 C7 28 32  |.85.v.<..UI$..(2|
00000170: 30 29 A7 31 30 35 00 8A  09 3E 00 8B 20 C3 28 55  |0).105...>.. .(U|
00000180: 52 24 29 B2 B1 55 4C A7  35 30 00 AF 09 41 00 8D  |R$)..UL.50...A..|
00000190: 31 32 30 3A 8F 20 43 48  45 43 4B 20 46 4F 52 20  |120:. CHECK FOR |
000001A0: 56 41 4C 49 44 20 43 48  41 52 41 43 54 45 52 00  |VALID CHARACTER.|
000001B0: BF 09 46 00 55 52 24 B2  55 52 24 AA 55 49 24 00  |..F.UR$.UR$.UI$.|
000001C0: C9 09 4B 00 99 55 49 24  3B 00 D1 09 50 00 89 35  |..K..UI$;...P..5|
000001D0: 30 00 F6 09 55 00 8F 20  2B 2B 2B 20 43 48 45 43  |0...U.. +++ CHEC|
000001E0: 4B 20 46 4F 52 20 48 45  4C 50 20 52 45 51 55 45  |K FOR HELP REQUE|
000001F0: 53 54 20 2B 2B 2B 00 1E  0A 5A 00 8B 55 52 24 B2  |ST +++...Z..UR$.|
00000200: 55 58 24 A7 31 39 35 3A  8F 20 45 58 49 54 20 54  |UX$.195:. EXIT T|
00000210: 4F 20 48 45 4C 50 20 52  4F 55 54 49 4E 45 00 2D  |O HELP ROUTINE.-|
00000220: 0A 5F 00 8B 55 46 B2 31  A7 8D 32 34 30 00 3A 0A  |._..UF.1..240.:.|
00000230: 64 00 55 46 B2 30 3A 99  3A 8E 00 53 0A 66 00 8F  |d.UF.0:.:..S.f..|
00000240: 20 2B 2B 20 43 48 45 43  4B 20 44 45 4C 45 54 45  | ++ CHECK DELETE|
00000250: 20 2B 2B 00 64 0A 69 00  8B C3 28 55 52 24 29 B3  | ++.d.i...(UR$).|
00000260: 31 A7 35 30 00 7C 0A 6E  00 55 52 24 B2 C8 28 55  |1.50.|.n.UR$..(U|
00000270: 52 24 2C C3 28 55 52 24  29 AB 31 29 00 8E 0A 73  |R$,.(UR$).1)...s|
00000280: 00 99 22 9D 20 20 9D 9D  22 3B 3A 89 35 30 00 B5  |..".  ..";:.50..|
00000290: 0A 78 00 8F 20 2B 2B 20  43 48 45 43 4B 20 46 4F  |.x.. ++ CHECK FO|
000002A0: 52 20 56 41 4C 49 44 20  43 48 41 52 41 43 54 45  |R VALID CHARACTE|
000002B0: 52 53 20 2B 2B 00 C7 0A  7D 00 8B C3 28 55 53 24  |RS ++...}...(US$|
000002C0: 29 B2 30 A7 31 35 30 00  D8 0A 82 00 81 55 53 B2  |).0.150......US.|
000002D0: 31 A4 C3 28 55 53 24 29  00 EF 0A 87 00 8B 55 49  |1..(US$)......UI|
000002E0: 24 B2 CA 28 55 53 24 2C  55 53 2C 31 29 A7 8E 00  |$..(US$,US,1)...|
000002F0: F5 0A 8C 00 82 00 02 0B  91 00 55 49 24 B2 22 22  |..........UI$.""|
00000300: 3A 8E 00 1D 0B 96 00 8F  20 2A 2A 20 53 54 41 4E  |:....... ** STAN|
00000310: 44 41 52 44 20 49 4E 50  55 54 20 2A 2A 00 2E 0B  |DARD INPUT **...|
00000320: 98 00 8B C6 28 55 49 24  29 B2 34 36 A7 8E 00 3F  |....(UI$).46...?|
00000330: 0B 9B 00 8B 55 49 24 B2  C7 28 33 32 29 A7 8E 00  |....UI$..(32)...|
00000340: 5C 0B A0 00 8B C6 28 55  49 24 29 B3 34 38 B0 C6  |\.....(UI$).48..|
00000350: 28 55 49 24 29 B1 35 37  A7 31 37 30 00 62 0B A5  |(UI$).57.170.b..|
00000360: 00 8E 00 7F 0B AA 00 8B  C6 28 55 49 24 29 B3 36  |.........(UI$).6|
00000370: 35 B0 C6 28 55 49 24 29  B1 39 30 A7 31 38 30 00  |5..(UI$).90.180.|
00000380: 85 0B AF 00 8E 00 A9 0B  B4 00 8B C6 28 55 49 24  |............(UI$|
00000390: 29 B3 31 39 33 B0 C6 28  55 49 24 29 B1 32 31 38  |).193..(UI$).218|
000003A0: A7 55 49 24 B2 22 22 3A  8E 00 CC 0B B9 00 8B C2  |.UI$."":........|
000003B0: 28 55 54 29 B2 55 55 25  A7 55 49 24 B2 C7 28 C6  |(UT).UU%.UI$..(.|
000003C0: 28 55 49 24 29 AB 31 32  38 29 3A 8E 00 D2 0B BB  |(UI$).128):.....|
000003D0: 00 8E 00 DF 0B BE 00 55  49 24 B2 22 22 3A 8E 00  |.......UI$."":..|
000003E0: 04 0C C3 00 55 46 B2 31  3A 8F 20 2B 2B 2B 20 48  |....UF.1:. +++ H|
000003F0: 45 4C 50 20 52 4F 55 54  49 4E 45 20 45 58 49 54  |ELP ROUTINE EXIT|
00000400: 20 2B 2B 2B 00 0D 0C C5  00 8D 32 35 30 00 16 0C  | +++......250...|
00000410: C8 00 8D 32 34 35 00 35  0C CD 00 81 55 51 B2 55  |...245.5....UQ.U|
00000420: 42 A4 28 55 32 25 AC 32  35 36 AA 55 31 25 AA 55  |B.(U2%.256.U1%.U|
00000430: 33 25 AB 32 29 00 51 0C  D2 00 55 51 25 28 55 51  |3%.2).Q...UQ%(UQ|
00000440: AB 55 42 29 B2 C2 28 55  51 29 3A 82 3A 99 22 93  |.UB)..(UQ):.:.".|
00000450: 22 00 64 0C D7 00 55 5A  B2 31 3A 55 56 25 B2 C2  |".d...UZ.1:UV%..|
00000460: 28 55 54 29 00 6D 0C D8  00 89 33 30 30 00 92 0C  |(UT).m....300...|
00000470: D9 00 55 5A B2 30 3A 55  53 24 B2 55 4A 24 3A 55  |..UZ.0:US$.UJ$:U|
00000480: 47 24 B2 55 4B 24 3A 55  50 B2 55 4A 3A 55 4C B2  |G$.UK$:UP.UJ:UL.|
00000490: 55 4B 00 C9 0C DA 00 8B  C2 28 35 30 30 30 33 29  |UK.......(50003)|
000004A0: B2 30 A7 97 35 33 32 38  31 2C 31 3A 99 22 93 22  |.0..53281,1:."."|
000004B0: 3B 3A 97 35 33 32 38 31  2C 36 3A 97 35 33 32 38  |;:.53281,6:.5328|
000004C0: 30 2C 31 34 3A 89 32 32  30 00 D3 0C DB 00 99 22  |0,14:.220......"|
000004D0: 93 22 3B 00 02 0D DC 00  55 54 24 B2 55 4C 24 3A  |.";.....UT$.UL$:|
000004E0: 97 55 54 2C 55 56 25 3A  81 55 51 B2 55 42 A4 28  |.UT,UV%:.UQ.UB.(|
000004F0: 55 32 25 AC 32 35 36 AA  55 31 25 AA 55 33 25 AB  |U2%.256.U1%.U3%.|
00000500: 33 29 00 17 0D E1 00 97  55 51 2C 55 51 25 28 55  |3)......UQ,UQ%(U|
00000510: 51 AB 55 42 29 3A 82 00  23 0D E6 00 97 55 31 2C  |Q.UB):..#....U1,|
00000520: 55 31 25 00 2F 0D E8 00  97 55 32 2C 55 32 25 00  |U1%./....U2,U2%.|
00000530: 3B 0D E9 00 97 55 34 2C  55 34 25 00 49 0D EA 00  |;....U4,U4%.I...|
00000540: 97 55 33 2C 55 33 25 AB  31 00 51 0D EB 00 89 33  |.U3,U3%.1.Q....3|
00000550: 35 00 83 0D F0 00 55 44  25 B2 28 28 55 32 25 AC  |5.....UD%.((U2%.|
00000560: 32 35 36 AA 55 31 25 AA  55 33 25 29 AB 55 42 29  |256.U1%.U3%).UB)|
00000570: AD 34 30 3A 99 C8 28 55  44 24 2C 55 44 25 AA 31  |.40:..(UD$,UD%.1|
00000580: 29 3A 8E 00 BE 0D F5 00  99 C8 28 55 44 24 2C 32  |):........(UD$,2|
00000590: 34 29 3B 22 20 20 20 20  20 20 20 20 20 20 20 20  |4);"            |
000005A0: 20 20 20 20 20 20 20 20  20 20 12 20 48 45 4C 50  |          . HELP|
000005B0: 20 43 4F 4D 49 4E 47 20  92 20 20 22 3A 8E 00 EA  | COMING .  ":...|
000005C0: 0D FA 00 55 31 25 B2 C2  28 55 31 29 3A 55 32 25  |...U1%..(U1):U2%|
000005D0: B2 C2 28 55 32 29 3A 55  33 25 B2 C2 28 55 33 29  |..(U2):U3%..(U3)|
000005E0: 3A 55 34 25 B2 C2 28 55  34 29 00 FC 0D FB 00 55  |:U4%..(U4).....U|
000005F0: 4A 24 B2 55 53 24 3A 55  4A B2 55 4C 00 1C 0E FC  |J$.US$:UJ.UL....|
00000600: 00 55 4A 24 B2 55 53 24  3A 55 4B 24 B2 55 47 24  |.UJ$.US$:UK$.UG$|
00000610: 3A 55 4A B2 55 50 3A 55  4B B2 55 4C 00 22 0E FF  |:UJ.UP:UK.UL."..|
00000620: 00 8E 00 33 0E 2C 01 8F  20 2A 2A 20 4D 45 4E 55  |...3.,.. ** MENU|
00000630: 20 2A 2A 00 39 0E 2D 01  3A 00 68 0E 2E 01 99 22  | **.9.-.:.h...."|
00000640: 93 22 3A 97 55 54 2C 55  55 25 3A 8B C2 28 35 30  |.":.UT,UU%:..(50|
00000650: 30 30 33 29 B2 30 A7 97  35 33 32 38 31 2C 39 3A  |003).0..53281,9:|
00000660: 97 35 33 32 38 30 2C 38  00 6E 0E 2F 01 3A 00 8B  |.53280,8.n./.:..|
00000670: 0E 31 01 99 22 13 20 20  20 20 20 20 20 20 20 20  |.1..".          |
00000680: 20 20 20 20 20 20 4D 45  4E 55 22 00 BA 0E 36 01  |      MENU"...6.|
00000690: 99 22 20 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |." -------------|
000006A0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000006B0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 22 00 E1 0E 3B 01 99  |---------"...;..|
000006C0: 22 11 11 20 20 20 20 20  20 20 31 2E 20 20 20 41  |"..       1.   A|
000006D0: 4C 47 45 42 52 41 49 43  20 56 45 43 54 4F 52 53  |LGEBRAIC VECTORS|
000006E0: 22 00 0B 0F 40 01 99 22  11 11 20 20 20 20 20 20  |"...@.."..      |
000006F0: 20 32 2E 20 20 20 53 54  55 44 45 4E 54 20 49 4E  | 2.   STUDENT IN|
00000700: 53 54 52 55 43 54 49 4F  4E 53 22 00 35 0F 45 01  |STRUCTIONS".5.E.|
00000710: 99 22 11 11 20 20 20 20  20 20 20 33 2E 20 20 20  |."..       3.   |
00000720: 54 45 41 43 48 45 52 20  49 4E 53 54 52 55 43 54  |TEACHER INSTRUCT|
00000730: 49 4F 4E 53 22 00 51 0F  4F 01 99 22 11 11 20 20  |IONS".Q.O.."..  |
00000740: 20 20 20 20 20 34 2E 20  20 20 51 55 49 54 11 11  |     4.   QUIT..|
00000750: 22 00 80 0F 54 01 99 22  20 2D 2D 2D 2D 2D 2D 2D  |"...T.." -------|
00000760: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000770: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 22  |---------------"|
00000780: 00 AB 0F 59 01 99 22 11  11 20 20 20 20 20 20 20  |...Y.."..       |
00000790: 50 52 45 53 53 20 41 20  4E 55 4D 42 45 52 20 4B  |PRESS A NUMBER K|
000007A0: 45 59 20 28 31 2D 34 29  20 22 3B 00 D3 0F 5E 01  |EY (1-4) ";...^.|
000007B0: 55 4C B2 31 3A 55 53 24  B2 22 31 32 33 34 22 3A  |UL.1:US$."1234":|
000007C0: 8D 33 35 3A 8F 20 49 4E  50 55 54 20 52 4F 55 54  |.35:. INPUT ROUT|
000007D0: 49 4E 45 00 DE 0F 60 01  55 53 24 B2 22 22 00 FB  |INE...`.US$.""..|
000007E0: 0F 63 01 91 C5 28 55 52  24 29 8D 31 30 30 30 2C  |.c...(UR$).1000,|
000007F0: 34 30 30 2C 35 30 30 2C  33 39 36 00 04 10 68 01  |400,500,396...h.|
00000800: 89 33 30 30 00 2B 10 8B  01 8F 20 2A 2A 20 52 45  |.300.+.... ** RE|
00000810: 2D 45 4E 41 42 4C 45 20  53 54 4F 50 20 4B 45 59  |-ENABLE STOP KEY|
00000820: 20 41 4E 44 20 45 4E 44  20 2A 2A 00 5A 10 8C 01  | AND END **.Z...|
00000830: 8B C2 28 35 30 30 30 33  29 B3 B1 31 AF C2 28 35  |..(50003)..1..(5|
00000840: 30 30 30 33 29 B3 B1 31  36 30 AF C2 28 35 30 30  |0003)..160..(500|
00000850: 30 33 29 B3 B1 30 A7 33  39 39 00 84 10 8D 01 9E  |03)..0.399......|
00000860: 55 55 AA 37 31 3A 8B C2  28 35 30 30 30 33 29 B2  |UU.71:..(50003).|
00000870: 30 A7 97 35 33 32 38 31  2C 36 3A 97 35 33 32 38  |0..53281,6:.5328|
00000880: 30 2C 31 34 00 90 10 8E  01 99 22 9A 93 22 3A 80  |0,14......"..":.|
00000890: 00 9B 10 8F 01 8D 38 37  35 3A 8E 00 BC 10 90 01  |......875:......|
000008A0: 8F 20 2A 2A 20 53 54 55  44 45 4E 54 20 49 4E 53  |. ** STUDENT INS|
000008B0: 54 52 55 43 54 49 4F 4E  53 20 2A 2A 00 EB 10 95  |TRUCTIONS **....|
000008C0: 01 99 22 93 22 3A 97 55  54 2C 55 4C 25 3A 8B C2  |..".":.UT,UL%:..|
000008D0: 28 35 30 30 30 33 29 B2  30 A7 97 35 33 32 38 31  |(50003).0..53281|
000008E0: 2C 30 3A 97 35 33 32 38  30 2C 30 00 08 11 97 01  |,0:.53280,0.....|
000008F0: 55 54 24 B2 22 20 C1 CC  C7 C5 C2 D2 C1 C9 C3 A0  |UT$." ..........|
00000900: D6 C5 C3 D4 CF D2 D3 22  00 29 11 9A 01 55 50 B2  |.......".)...UP.|
00000910: 30 3A 55 47 24 B2 22 D3  54 55 44 45 4E 54 20 C9  |0:UG$.".TUDENT .|
00000920: 4E 53 54 22 3A 8D 38 35  30 00 51 11 9E 01 99 22  |NST":.850.Q...."|
00000930: 11 11 20 20 20 20 D4 48  49 53 20 50 52 4F 47 52  |..    .HIS PROGR|
00000940: 41 4D 20 43 4F 4E 54 41  49 4E 53 20 4E 49 4E 45  |AM CONTAINS NINE|
00000950: 22 00 8F 11 A0 01 99 22  11 20 20 20 20 45 58 45  |"......".    EXE|
00000960: 52 43 49 53 45 53 20 44  45 41 4C 49 4E 47 20 57  |RCISES DEALING W|
00000970: 49 54 48 20 C1 4C 47 45  42 52 41 49 43 22 3A 99  |ITH .LGEBRAIC":.|
00000980: 22 11 20 20 20 20 D6 45  43 54 4F 52 53 2E 22 00  |".    .ECTORS.".|
00000990: B9 11 A2 01 99 22 11 11  11 20 20 20 20 D9 4F 55  |....."...    .OU|
000009A0: 20 4D 41 59 20 43 48 4F  4F 53 45 20 4E 4F 54 20  | MAY CHOOSE NOT |
000009B0: 4F 4E 4C 59 20 54 48 45  22 00 E6 11 A4 01 99 22  |ONLY THE"......"|
000009C0: 11 20 20 20 20 4E 55 4D  42 45 52 20 4F 46 20 51  |.    NUMBER OF Q|
000009D0: 55 45 53 54 49 4F 4E 53  20 42 55 54 20 41 4C 53  |UESTIONS BUT ALS|
000009E0: 4F 20 54 48 45 22 00 0F  12 A6 01 99 22 11 20 20  |O THE"......".  |
000009F0: 20 20 53 49 5A 45 20 4F  46 20 54 48 45 20 4E 55  |  SIZE OF THE NU|
00000A00: 4D 42 45 52 53 20 54 48  41 54 20 59 4F 55 22 00  |MBERS THAT YOU".|
00000A10: 30 12 A8 01 99 22 11 20  20 20 20 57 4F 52 4B 20  |0....".    WORK |
00000A20: 57 49 54 48 2E 22 3A 8D  38 33 35 3A 8D 38 35 30  |WITH.":.835:.850|
00000A30: 00 5D 12 B4 01 99 22 11  11 11 11 20 20 20 20 D9  |.]...."....    .|
00000A40: 4F 55 20 57 49 4C 4C 20  4E 45 45 44 20 41 20 43  |OU WILL NEED A C|
00000A50: 41 4C 43 55 4C 41 54 4F  52 20 54 4F 22 00 7C 12  |ALCULATOR TO".|.|
00000A60: B6 01 99 22 20 20 20 20  44 4F 20 54 48 45 53 45  |..."    DO THESE|
00000A70: 20 45 58 45 52 43 49 53  45 53 2E 22 00 A5 12 B8  | EXERCISES."....|
00000A80: 01 99 22 11 11 20 20 20  20 C9 46 20 59 4F 55 52  |.."..    .F YOUR|
00000A90: 20 41 4E 53 57 45 52 20  49 53 20 41 20 56 45 43  | ANSWER IS A VEC|
00000AA0: 54 4F 52 2C 22 00 CB 12  BA 01 99 22 20 20 20 20  |TOR,"......"    |
00000AB0: 50 4C 45 41 53 45 20 55  53 45 20 50 41 52 45 4E  |PLEASE USE PAREN|
00000AC0: 54 48 45 53 45 53 20 41  4E 44 22 00 04 13 BC 01  |THESES AND".....|
00000AD0: 99 22 20 20 20 20 43 4F  4D 4D 41 53 20 41 53 20  |."    COMMAS AS |
00000AE0: 55 53 55 41 4C 2C 20 46  4F 52 20 45 58 41 4D 50  |USUAL, FOR EXAMP|
00000AF0: 4C 45 2C 22 3A 99 22 20  20 20 20 28 33 2C 2D 35  |LE,":."    (3,-5|
00000B00: 2C 36 29 2E 00 2B 13 BE  01 99 22 11 11 20 20 20  |,6)..+...."..   |
00000B10: 20 C9 CD D0 CF D2 D4 C1  CE D4 3A 20 20 C4 4F 20  | .........:  .O |
00000B20: 4E 4F 54 20 50 55 54 20  49 4E 22 00 55 13 C0 01  |NOT PUT IN".U...|
00000B30: 99 22 20 20 20 20 55 4E  4E 45 43 45 53 53 41 52  |."    UNNECESSAR|
00000B40: 59 20 53 50 41 43 45 53  20 4F 52 20 43 4F 4D 4D  |Y SPACES OR COMM|
00000B50: 41 53 21 21 22 00 63 13  C2 01 8D 38 33 35 3A 8D  |AS!!".c....835:.|
00000B60: 38 35 30 00 91 13 C4 01  99 22 11 11 11 11 20 20  |850......"....  |
00000B70: 20 20 D2 45 4D 45 4D 42  45 52 20 54 4F 20 48 49  |  .EMEMBER TO HI|
00000B80: 54 20 3C 52 45 54 55 52  4E 3E 20 41 46 54 45 52  |T <RETURN> AFTER|
00000B90: 22 00 BA 13 C6 01 99 22  20 20 20 54 59 50 49 4E  |"......"   TYPIN|
00000BA0: 47 20 59 4F 55 52 20 41  4E 53 57 45 52 2E 20 D4  |G YOUR ANSWER. .|
00000BB0: 48 49 53 20 54 45 4C 4C  53 22 00 E4 13 C8 01 99  |HIS TELLS"......|
00000BC0: 22 20 20 20 54 48 45 20  43 4F 4D 50 55 54 45 52  |"   THE COMPUTER|
00000BD0: 20 54 4F 20 41 43 43 45  50 54 20 57 48 41 54 20  | TO ACCEPT WHAT |
00000BE0: 59 4F 55 22 00 FB 13 CA  01 99 22 20 20 20 48 41  |YOU"......"   HA|
00000BF0: 56 45 20 54 59 50 45 44  2E 11 22 00 25 14 CC 01  |VE TYPED..".%...|
00000C00: 99 22 20 20 20 20 D4 59  50 45 20 3C 48 3E 20 41  |."    .YPE <H> A|
00000C10: 54 20 41 4E 59 20 54 49  4D 45 20 54 4F 20 52 45  |T ANY TIME TO RE|
00000C20: 54 55 52 4E 22 00 4F 14  CE 01 99 22 20 20 20 54  |TURN".O...."   T|
00000C30: 4F 20 54 48 45 20 4D 45  4E 55 20 46 4F 52 20 48  |O THE MENU FOR H|
00000C40: 45 4C 50 2E 20 20 D9 4F  55 20 57 49 4C 4C 22 00  |ELP.  .OU WILL".|
00000C50: 79 14 D0 01 99 22 20 20  20 42 45 20 52 45 54 55  |y...."   BE RETU|
00000C60: 52 4E 45 44 20 54 4F 20  54 48 45 20 50 4C 41 43  |RNED TO THE PLAC|
00000C70: 45 20 49 4E 20 54 48 45  22 00 A1 14 D2 01 99 22  |E IN THE"......"|
00000C80: 20 20 20 50 52 4F 47 52  41 4D 20 57 48 45 52 45  |   PROGRAM WHERE|
00000C90: 20 59 4F 55 20 4C 45 46  54 20 4F 46 46 20 41 53  | YOU LEFT OFF AS|
00000CA0: 22 00 CC 14 D4 01 99 22  20 20 20 53 4F 4F 4E 20  |"......"   SOON |
00000CB0: 41 53 20 54 48 45 20 4F  50 54 49 4F 4E 20 46 52  |AS THE OPTION FR|
00000CC0: 4F 4D 20 54 48 45 20 4D  45 4E 55 22 00 E3 14 D6  |OM THE MENU"....|
00000CD0: 01 99 22 20 20 20 49 53  20 43 4F 4D 50 4C 45 54  |.."   IS COMPLET|
00000CE0: 45 2E 22 00 EC 14 E5 01  8D 38 33 35 00 09 15 E7  |E."......835....|
00000CF0: 01 55 54 24 B2 22 20 41  4C 47 45 42 52 41 49 43  |.UT$." ALGEBRAIC|
00000D00: 20 56 45 43 54 4F 52 53  22 00 1D 15 EA 01 8B 55  | VECTORS"......U|
00000D10: 5A B2 31 A7 9E 55 50 25  3A 89 32 31 37 00 23 15  |Z.1..UP%:.217.#.|
00000D20: F3 01 8E 00 44 15 F4 01  8F 20 2A 2A 20 54 45 41  |....D.... ** TEA|
00000D30: 43 48 45 52 20 49 4E 53  54 52 55 43 54 49 4F 4E  |CHER INSTRUCTION|
00000D40: 53 20 2A 2A 00 74 15 F5  01 99 22 93 22 3A 97 55  |S **.t....".":.U|
00000D50: 54 2C 55 4C 25 3A 8B C2  28 35 30 30 30 33 29 B2  |T,UL%:..(50003).|
00000D60: 30 A7 97 35 33 32 38 31  2C 32 3A 97 35 33 32 38  |0..53281,2:.5328|
00000D70: 30 2C 31 30 00 AF 15 F6  01 55 54 24 B2 22 20 C1  |0,10.....UT$." .|
00000D80: CC C7 C5 C2 D2 C1 C9 C3  A0 D6 C5 C3 D4 CF D2 D3  |................|
00000D90: 22 3A 55 50 B2 30 3A 55  47 24 B2 22 D4 45 41 43  |":UP.0:UG$.".EAC|
00000DA0: 48 45 52 20 C9 4E 53 54  2E 22 3A 8D 38 35 30 00  |HER .NST.":.850.|
00000DB0: DD 15 F7 01 99 22 11 11  20 20 20 20 20 20 D4 4F  |....."..      .O|
00000DC0: 20 54 48 45 20 42 45 53  54 20 4F 46 20 4F 55 52  | THE BEST OF OUR|
00000DD0: 20 4B 4E 4F 57 4C 45 44  47 45 2C 11 22 00 06 16  | KNOWLEDGE,."...|
00000DE0: F8 01 99 22 20 20 20 54  48 49 53 20 50 52 4F 47  |..."   THIS PROG|
00000DF0: 52 41 4D 20 49 53 20 49  4E 20 54 48 45 20 50 55  |RAM IS IN THE PU|
00000E00: 42 4C 49 43 11 22 00 32  16 F9 01 99 22 20 20 20  |BLIC.".2...."   |
00000E10: 44 4F 4D 41 49 4E 2E 20  20 C9 46 20 54 48 49 53  |DOMAIN.  .F THIS|
00000E20: 20 49 53 20 4E 4F 54 20  54 48 45 20 43 41 53 45  | IS NOT THE CASE|
00000E30: 11 22 00 4F 16 FA 01 99  22 20 20 20 50 4C 45 41  |.".O...."   PLEA|
00000E40: 53 45 20 43 4F 4E 54 41  43 54 3A 11 11 11 22 00  |SE CONTACT:...".|
00000E50: 79 16 FB 01 99 22 20 20  20 20 20 20 C3 4F 4D 4D  |y...."      .OMM|
00000E60: 4F 44 4F 52 45 20 C2 55  53 49 4E 45 53 53 20 CD  |ODORE .USINESS .|
00000E70: 41 43 48 49 4E 45 53 11  22 00 9C 16 FC 01 99 22  |ACHINES."......"|
00000E80: 20 20 20 20 20 20 20 20  20 20 33 33 37 30 20 D0  |          3370 .|
00000E90: 48 41 52 4D 41 43 59 20  C1 56 45 2E 00 C0 16 FD  |HARMACY .VE.....|
00000EA0: 01 99 22 20 20 20 20 20  20 20 20 20 20 C1 47 49  |.."          .GI|
00000EB0: 4E 43 4F 55 52 54 2C 20  CF 4E 54 41 52 49 4F 22  |NCOURT, .NTARIO"|
00000EC0: 00 E2 16 FE 01 99 22 20  20 20 20 20 20 20 20 20  |......"         |
00000ED0: 20 C3 41 4E 41 44 41 20  20 20 CD 31 D7 20 32 CB  | .ANADA   .1. 2.|
00000EE0: 34 22 00 02 17 FF 01 99  22 20 20 20 20 20 20 20  |4"......"       |
00000EF0: 20 20 20 28 34 31 36 29  20 34 39 39 2D 34 32 39  |   (416) 499-429|
00000F00: 32 22 00 13 17 00 02 8D  20 38 33 35 3A 8D 20 38  |2"...... 835:. 8|
00000F10: 35 30 3A 00 3B 17 02 02  99 22 11 11 20 20 20 20  |50:.;...."..    |
00000F20: D4 48 49 53 20 50 52 4F  47 52 41 4D 20 43 4F 4E  |.HIS PROGRAM CON|
00000F30: 54 41 49 4E 53 20 4E 49  4E 45 22 00 79 17 04 02  |TAINS NINE".y...|
00000F40: 99 22 11 20 20 20 20 45  58 45 52 43 49 53 45 53  |.".    EXERCISES|
00000F50: 20 44 45 41 4C 49 4E 47  20 57 49 54 48 20 C1 4C  | DEALING WITH .L|
00000F60: 47 45 42 52 41 49 43 22  3A 99 22 11 20 20 20 20  |GEBRAIC":.".    |
00000F70: D6 45 43 54 4F 52 53 2E  22 00 A8 17 06 02 99 22  |.ECTORS."......"|
00000F80: 11 11 11 20 20 20 20 D4  48 45 20 53 54 55 44 45  |...    .HE STUDE|
00000F90: 4E 54 20 4E 4F 54 20 4F  4E 4C 59 20 48 41 53 20  |NT NOT ONLY HAS |
00000FA0: 43 4F 4E 54 52 4F 4C 22  00 D3 17 08 02 99 22 11  |CONTROL"......".|
00000FB0: 20 20 20 20 4F 46 20 54  48 45 20 4E 55 4D 42 45  |    OF THE NUMBE|
00000FC0: 52 20 4F 46 20 51 55 45  53 54 49 4F 4E 53 20 42  |R OF QUESTIONS B|
00000FD0: 55 54 22 00 FC 17 0A 02  99 22 11 20 20 20 20 41  |UT"......".    A|
00000FE0: 4C 53 4F 20 54 48 45 20  53 49 5A 45 20 4F 46 20  |LSO THE SIZE OF |
00000FF0: 54 48 45 20 4E 55 4D 42  45 52 53 22 00 26 18 0C  |THE NUMBERS".&..|
00001000: 02 99 22 11 20 20 20 20  54 48 41 54 20 48 45 20  |..".    THAT HE |
00001010: 57 4F 52 4B 53 20 57 49  54 48 2E 22 3A 8D 38 33  |WORKS WITH.":.83|
00001020: 35 3A 8D 38 35 30 00 54  18 0E 02 99 22 11 11 11  |5:.850.T...."...|
00001030: 11 11 20 20 20 20 C1 54  20 54 48 45 20 45 4E 44  |..    .T THE END|
00001040: 20 4F 46 20 54 48 45 20  45 58 45 52 43 49 53 45  | OF THE EXERCISE|
00001050: 2C 20 41 22 00 7F 18 10  02 99 22 11 20 20 20 20  |, A"......".    |
00001060: 53 55 4D 4D 41 52 59 20  57 49 4C 4C 20 42 45 20  |SUMMARY WILL BE |
00001070: 44 49 53 50 4C 41 59 45  44 2E 20 20 C9 54 22 00  |DISPLAYED.  .T".|
00001080: AC 18 11 02 99 22 11 20  20 20 20 57 49 4C 4C A0  |.....".    WILL.|
00001090: 53 48 4F 57 20 54 48 45  20 53 43 4F 52 45 20 41  |SHOW THE SCORE A|
000010A0: 4E 44 20 41 4C 53 4F 20  54 48 45 22 00 E4 18 12  |ND ALSO THE"....|
000010B0: 02 99 22 11 20 20 20 20  54 49 4D 45 20 54 41 4B  |..".    TIME TAK|
000010C0: 45 4E 20 54 4F 20 43 4F  4D 50 4C 45 54 45 20 54  |EN TO COMPLETE T|
000010D0: 48 45 22 3A 99 22 11 20  20 20 20 53 45 43 54 49  |HE":.".    SECTI|
000010E0: 4F 4E 2E 22 00 F2 18 14  02 8D 38 33 35 3A 8D 38  |ON."......835:.8|
000010F0: 35 30 00 21 19 16 02 99  22 11 11 11 20 20 20 20  |50.!...."...    |
00001100: D4 48 49 53 20 50 52 4F  47 52 41 4D 20 49 53 20  |.HIS PROGRAM IS |
00001110: 44 45 53 49 47 4E 45 44  20 54 4F 20 50 52 4F 2D  |DESIGNED TO PRO-|
00001120: 22 00 4C 19 18 02 99 22  11 20 20 20 20 56 49 44  |".L....".    VID|
00001130: 45 20 42 4F 54 48 20 50  52 41 43 54 49 43 45 20  |E BOTH PRACTICE |
00001140: 41 4E 44 20 52 45 56 49  45 57 2E 22 00 75 19 1A  |AND REVIEW.".u..|
00001150: 02 99 22 11 20 20 20 20  C1 20 53 54 55 44 45 4E  |..".    . STUDEN|
00001160: 54 20 55 53 49 4E 47 20  54 48 49 53 20 50 52 4F  |T USING THIS PRO|
00001170: 47 52 41 4D 22 00 9F 19  1C 02 99 22 11 20 20 20  |GRAM"......".   |
00001180: 20 53 48 4F 55 4C 44 20  41 4C 52 45 41 44 59 20  | SHOULD ALREADY |
00001190: 48 41 56 45 20 4B 4E 4F  57 4C 45 44 47 45 22 00  |HAVE KNOWLEDGE".|
000011A0: C9 19 1D 02 99 22 11 20  20 20 20 4F 46 20 56 45  |.....".    OF VE|
000011B0: 43 54 4F 52 53 2E 20 20  C6 4F 52 20 54 48 49 53  |CTORS.  .OR THIS|
000011C0: 20 52 45 41 53 4F 4E 2C  22 00 F5 19 1E 02 99 22  | REASON,"......"|
000011D0: 11 20 20 20 20 54 48 49  53 20 50 52 4F 47 52 41  |.    THIS PROGRA|
000011E0: 4D 20 49 53 20 52 45 43  4F 4D 4D 45 4E 44 45 44  |M IS RECOMMENDED|
000011F0: 20 46 4F 52 22 00 23 1A  20 02 99 22 11 20 20 20  | FOR".#. ..".   |
00001200: 20 53 54 55 44 45 4E 54  53 20 54 41 4B 49 4E 47  | STUDENTS TAKING|
00001210: 20 C7 52 41 44 45 20 31  33 20 C1 CC C7 C5 C2 D2  | .RADE 13 ......|
00001220: C1 2E 22 00 31 1A 22 02  8D 38 33 35 3A 8D 38 35  |..".1."..835:.85|
00001230: 30 00 5F 1A 26 02 99 22  20 20 20 20 20 11 11 D0  |0._.&.."     ...|
00001240: 52 4F 47 52 41 4D 20 CE  41 4D 45 3A 20 C1 4C 47  |ROGRAM .AME: .LG|
00001250: 45 42 52 41 49 43 20 D6  45 43 54 4F 52 53 22 00  |EBRAIC .ECTORS".|
00001260: 86 1A 27 02 99 22 20 20  20 20 20 D7 52 49 54 54  |..'.."     .RITT|
00001270: 45 4E 20 C2 59 20 20 3A  20 C4 2E 20 D3 2E 20 C3  |EN .Y  : .. .. .|
00001280: 4F 4F 50 45 52 22 00 AA  1A 28 02 99 22 20 20 20  |OOPER"...(.."   |
00001290: 20 20 D5 50 47 52 41 44  45 44 20 C2 59 20 3A 20  |  .PGRADED .Y : |
000012A0: D1 55 49 4E 43 59 20 CC  45 45 00 D5 1A 29 02 99  |.UINCY .EE...)..|
000012B0: 22 20 20 20 20 20 11 D4  48 49 53 20 50 52 4F 47  |"     ..HIS PROG|
000012C0: 52 41 4D 20 57 49 4C 4C  20 52 55 4E 20 4F 4E 20  |RAM WILL RUN ON |
000012D0: 41 4E 59 11 11 00 F5 1A  2C 02 99 22 20 20 20 20  |ANY.....,.."    |
000012E0: 20 20 20 20 20 D0 C5 D4  20 36 34 20 C3 CF CD D0  |     ... 64 ....|
000012F0: D5 D4 C5 D2 11 00 1A 1B  2D 02 99 22 20 20 20 20  |........-.."    |
00001300: 20 20 20 20 20 C3 CF CD  CD CF C4 CF D2 C5 20 36  |     ......... 6|
00001310: 34 20 C3 CF CD D0 D5 D4  C5 D2 00 23 1B 2E 02 8D  |4 .........#....|
00001320: 38 33 35 00 40 1B 4B 02  55 54 24 B2 22 20 41 4C  |835.@.K.UT$." AL|
00001330: 47 45 42 52 41 49 43 20  56 45 43 54 4F 52 53 22  |GEBRAIC VECTORS"|
00001340: 00 54 1B 4E 02 8B 55 5A  B2 31 A7 9E 55 50 25 3A  |.T.N..UZ.1..UP%:|
00001350: 89 32 31 37 00 5A 1B 57  02 8E 00 80 1B 58 02 8F  |.217.Z.W.....X..|
00001360: 20 2A 2A 20 50 52 4F 47  52 41 4D 20 4D 4F 44 49  | ** PROGRAM MODI|
00001370: 46 49 43 41 54 49 4F 4E  20 49 4E 53 54 20 2A 2A  |FICATION INST **|
00001380: 00 91 1B 59 02 99 22 93  22 3A 97 55 54 2C 55 4C  |...Y..".":.UT,UL|
00001390: 25 00 B1 1B 5D 02 55 50  B2 30 3A 55 47 24 B2 22  |%...].UP.0:UG$."|
000013A0: D0 52 4F 47 52 41 4D 20  CD 4F 44 22 3A 8D 38 35  |.ROGRAM .OD":.85|
000013B0: 30 00 BA 1B 94 02 8D 38  33 35 00 CE 1B B2 02 8B  |0......835......|
000013C0: 55 5A B2 31 A7 9E 55 50  25 3A 89 32 31 37 00 D4  |UZ.1..UP%:.217..|
000013D0: 1B BB 02 8E 00 F9 1B BC  02 8F 20 2A 2A 20 54 4F  |.......... ** TO|
000013E0: 20 55 53 45 20 38 30 33  32 20 4C 4F 41 44 20 43  | USE 8032 LOAD C|
000013F0: 42 4D 34 30 33 32 20 2A  2A 00 2F 1C C6 02 99 22  |BM4032 **./...."|
00001400: 93 11 11 11 05 42 45 46  4F 52 45 20 52 55 4E 4E  |.....BEFORE RUNN|
00001410: 49 4E 47 20 54 48 49 53  20 50 52 4F 47 52 41 4D  |ING THIS PROGRAM|
00001420: 20 4F 4E 20 41 4E 20 38  30 33 32 20 20 11 11 00  | ON AN 8032  ...|
00001430: 65 1C D0 02 99 22 20 20  20 20 20 20 4C 4F 41 44  |e...."      LOAD|
00001440: 20 54 48 45 20 27 43 42  4D 20 34 30 33 32 27 20  | THE 'CBM 4032' |
00001450: 50 52 4F 47 52 41 4D 11  11 11 11 11 11 11 11 11  |PROGRAM.........|
00001460: 11 11 11 11 22 00 70 1C  DA 02 9E 55 55 AA 37 31  |....".p....UU.71|
00001470: 00 76 1C E4 02 80 00 96  1C 20 03 8F 20 2A 2A 20  |.v....... .. ** |
00001480: 54 20 49 20 54 20 4C 20  45 20 20 20 50 20 41 20  |T I T L E   P A |
00001490: 47 20 45 20 2A 2A 00 CA  1C 22 03 99 22 93 11 1D  |G E **...".."...|
000014A0: 05 22 3B 3A 97 55 54 2C  55 55 25 3A 8B C2 28 35  |.";:.UT,UU%:..(5|
000014B0: 30 30 30 33 29 B2 30 A7  97 35 33 32 38 30 2C 31  |0003).0..53280,1|
000014C0: 34 3A 97 35 33 32 38 31  2C 36 00 E0 1C 24 03 81  |4:.53281,6...$..|
000014D0: 49 B2 31 A4 33 38 3A 99  22 12 A6 92 22 3B 3A 82  |I.1.38:."...";:.|
000014E0: 00 F8 1C 26 03 81 49 B2  31 A4 32 32 3A 99 22 11  |...&..I.1.22:.".|
000014F0: 9D 12 A6 92 22 3B 3A 82  00 10 1D 28 03 81 49 B2  |....";:....(..I.|
00001500: 31 A4 33 37 3A 99 22 9D  9D 12 A6 92 22 3B 3A 82  |1.37:.".....";:.|
00001510: 00 28 1D 2A 03 81 49 B2  31 A4 32 32 3A 99 22 91  |.(.*..I.1.22:.".|
00001520: 9D 12 A6 92 22 3B 3A 82  00 4D 1D 2C 03 99 22 13  |....";:..M.,..".|
00001530: 11 11 11 11 11 11 1D 1D  1D 1D 1D 1D 1D 1D 1D 1D  |................|
00001540: 1D 1D 1D 1D 1D 1D 1D 1D  12 A9 20 20 92 00 6F 1D  |..........  ..o.|
00001550: 2E 03 99 22 1D 1D 1D 1D  1D 1D 1D 1D 1D 1D 1D 1D  |..."............|
00001560: 1D 1D 1D 1D 1D 1D 12 20  92 20 20 12 20 92 A9 00  |....... .  . ...|
00001570: 90 1D 30 03 99 22 1D 1D  1D 1D 1D 1D 1D 1D 1D 1D  |..0.."..........|
00001580: 1D 1D 1D 1D 1D 1D 1D 1D  12 20 92 20 20 12 A3 DF  |......... .  ...|
00001590: 00 AE 1D 32 03 99 22 1D  1D 1D 1D 1D 1D 1D 1D 1D  |...2..".........|
000015A0: 1D 1D 1D 1D 1D 1D 1D 1D  1D DF 12 20 20 92 00 D6  |...........  ...|
000015B0: 1D 34 03 99 22 11 11 1D  1D 1D 1D 1D 1D 1D 1D 1D  |.4.."...........|
000015C0: 1D 1D 1D 43 20 4F 20 4D  20 4D 20 4F 20 44 20 4F  |...C O M M O D O|
000015D0: 20 52 20 45 11 11 00 F9  1D 36 03 99 22 1D 1D 1D  | R E.....6.."...|
000015E0: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 45 44 55 43  |............EDUC|
000015F0: 41 54 49 4F 4E 41 4C 11  11 00 18 1E 38 03 99 22  |ATIONAL.....8.."|
00001600: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 1D 1D 1D  |................|
00001610: 53 4F 46 54 57 41 52 45  00 33 1E 3A 03 8F 20 2A  |SOFTWARE.3.:.. *|
00001620: 2A 20 43 4F 4D 4D 4F 44  4F 52 45 20 4C 4F 47 4F  |* COMMODORE LOGO|
00001630: 20 2A 2A 00 6B 1E 3B 03  99 C8 28 55 44 24 2C 32  | **.k.;...(UD$,2|
00001640: 34 29 3B 22 1D 1D 1D 1D  1D 1D 1D 1D 1D 12 50 52  |4);"..........PR|
00001650: 45 53 53 20 53 50 41 43  45 20 42 41 52 20 4F 52  |ESS SPACE BAR OR|
00001660: 20 57 41 49 54 92 22 3A  49 B2 30 00 8D 1E 3C 03  | WAIT.":I.0...<.|
00001670: A1 41 24 3A 8B 41 24 B3  B1 22 20 22 A7 49 B2 49  |.A$:.A$.." ".I.I|
00001680: AA 31 3A 8B 49 B3 32 35  30 A7 38 32 38 00 B1 1E  |.1:.I.250.828...|
00001690: 3E 03 54 31 24 B2 22 22  3A 54 32 24 B2 22 22 3A  |>.T1$."":T2$."":|
000016A0: 54 33 24 B2 22 22 3A 54  34 24 B2 22 22 3A 49 B2  |T3$."":T4$."":I.|
000016B0: 30 00 BA 1E 40 03 89 33  30 30 00 D6 1E 43 03 8F  |0...@..300...C..|
000016C0: 20 2A 2A 20 53 50 41 43  45 20 42 41 52 20 50 52  | ** SPACE BAR PR|
000016D0: 45 53 53 20 2A 2A 00 0B  1F 48 03 99 C8 28 55 44  |ESS **...H...(UD|
000016E0: 24 2C 32 34 29 3B 22 1D  1D 1D 1D 1D 1D 12 50 52  |$,24);".......PR|
000016F0: 45 53 53 20 53 50 41 43  45 20 42 41 52 20 54 4F  |ESS SPACE BAR TO|
00001700: 20 43 4F 4E 54 49 4E 55  45 92 22 00 22 1F 4C 03  | CONTINUE.".".L.|
00001710: A1 55 49 24 3A 8B 55 49  24 B3 B1 22 20 22 A7 38  |.UI$:.UI$.." ".8|
00001720: 34 34 00 28 1F 4E 03 8E  00 48 1F 52 03 8F 20 2A  |44.(.N...H.R.. *|
00001730: 2A 20 50 41 47 45 20 44  45 53 49 47 4E 20 52 4F  |* PAGE DESIGN RO|
00001740: 55 54 49 4E 45 20 2A 2A  00 54 1F 54 03 55 50 B2  |UTINE **.T.T.UP.|
00001750: 55 50 AA 31 00 7E 1F 57  03 99 22 93 22 C8 28 55  |UP.1.~.W..".".(U|
00001760: 54 24 AA 55 50 24 2C 32  31 29 3B C9 28 55 50 24  |T$.UP$,21);.(UP$|
00001770: AA 55 47 24 AA C4 28 55  50 29 2C 31 38 29 00 AD  |.UG$..(UP),18)..|
00001780: 1F 5C 03 99 22 20 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |.\.." ----------|
00001790: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
000017A0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 22 00 E1 1F  |------------"...|
000017B0: 61 03 99 C8 28 55 44 24  2C 32 34 29 3B C8 28 55  |a...(UD$,24);.(U|
000017C0: 50 24 2C 36 29 3B 22 48  45 4C 50 20 2D 20 50 52  |P$,6);"HELP - PR|
000017D0: 45 53 53 20 20 20 48 20  3C 52 45 54 55 52 4E 3E  |ESS   H <RETURN>|
000017E0: 22 00 ED 1F 66 03 99 22  13 11 22 3A 8E 00 0C 20  |"...f.."..":... |
000017F0: 6B 03 8F 20 2A 2A 20 50  4C 45 41 53 45 20 57 41  |k.. ** PLEASE WA|
00001800: 49 54 20 52 45 4D 41 52  4B 20 2A 2A 00 42 20 70  |IT REMARK **.B p|
00001810: 03 99 C8 28 55 44 24 2C  32 34 29 3B 22 20 20 20  |...(UD$,24);"   |
00001820: 20 20 20 20 20 20 20 20  4F 4E 45 20 4D 4F 4D 45  |        ONE MOME|
00001830: 4E 54 20 50 4C 45 41 53  45 2E 2E 2E 20 20 20 20  |NT PLEASE...    |
00001840: 20 22 00 48 20 75 03 8E  00 65 20 84 03 8F 20 2A  | ".H u...e ... *|
00001850: 2A 20 53 45 54 20 55 50  20 56 41 52 49 41 42 4C  |* SET UP VARIABL|
00001860: 45 53 20 2A 2A 00 B0 20  85 03 55 58 24 B2 22 48  |ES **.. ..UX$."H|
00001870: 22 3A 86 55 51 25 28 31  30 30 30 29 3A 55 42 B2  |":.UQ%(1000):UB.|
00001880: 33 32 37 36 38 3A 55 31  B2 31 39 36 3A 55 32 B2  |32768:U1.196:U2.|
00001890: 31 39 37 3A 55 33 B2 31  39 38 3A 55 34 B2 32 31  |197:U3.198:U4.21|
000018A0: 36 3A 55 43 B2 31 36 37  3A 55 55 B2 31 30 32 34  |6:UC.167:UU.1024|
000018B0: 00 E7 20 86 03 55 54 B2  35 39 34 36 38 3A 55 55  |.. ..UT.59468:UU|
000018C0: 25 B2 31 32 3A 55 4C 25  B2 31 34 3A 55 50 25 B2  |%.12:UL%.14:UP%.|
000018D0: 31 31 34 36 3A 55 4D B2  33 32 37 36 38 3A 97 20  |1146:UM.32768:. |
000018E0: 35 30 30 30 33 2C 30 00  2A 21 87 03 8B C2 28 35  |50003,0.*!....(5|
000018F0: 30 30 30 33 29 B2 30 A7  55 42 B2 31 30 32 34 3A  |0003).0.UB.1024:|
00001900: 55 31 B2 32 30 39 3A 55  32 B2 32 31 30 3A 55 33  |U1.209:U2.210:U3|
00001910: B2 32 31 31 3A 55 34 B2  32 31 34 3A 55 43 B2 32  |.211:U4.214:UC.2|
00001920: 30 34 3A 55 55 B2 32 30  34 38 00 62 21 88 03 8B  |04:UU.2048.b!...|
00001930: C2 28 35 30 30 30 33 29  B2 30 A7 55 54 B2 35 33  |.(50003).0.UT.53|
00001940: 32 37 32 3A 55 55 25 B2  32 31 3A 55 4C 25 B2 32  |272:UU%.21:UL%.2|
00001950: 33 3A 55 50 25 B2 32 31  33 39 3A 55 4D B2 31 30  |3:UP%.2139:UM.10|
00001960: 32 34 00 86 21 89 03 55  44 24 B2 22 13 11 11 11  |24..!..UD$."....|
00001970: 11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
00001980: 11 11 11 11 11 22 00 B8  21 8A 03 55 50 24 B2 22  |....."..!..UP$."|
00001990: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000019A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000019B0: 20 20 20 20 20 20 20 22  00 D5 21 8B 03 55 54 24  |       "..!..UT$|
000019C0: B2 22 20 41 4C 47 45 42  52 41 49 43 20 56 45 43  |." ALGEBRAIC VEC|
000019D0: 54 4F 52 53 22 00 DB 21  8C 03 8E 00 F5 21 8E 03  |TORS"..!.....!..|
000019E0: 8F 20 2A 2A 20 53 45 54  20 56 41 52 49 41 42 4C  |. ** SET VARIABL|
000019F0: 45 53 20 2A 2A 00 FE 21  93 03 8D 39 30 30 00 19  |ES **..!...900..|
00001A00: 22 98 03 8F 20 2A 2A 20  43 48 45 43 4B 20 46 4F  |"... ** CHECK FO|
00001A10: 52 20 38 30 33 32 20 2A  2A 00 37 22 9D 03 99 22  |R 8032 **.7"..."|
00001A20: 93 22 3A 99 22 A0 22 3A  8F 20 53 48 49 46 54 45  |.":.".":. SHIFTE|
00001A30: 44 20 53 50 41 43 45 00  4E 22 A2 03 8B C2 28 55  |D SPACE.N"....(U|
00001A40: 42 AA 34 30 29 B3 B1 39  36 A7 8D 37 30 30 00 67  |B.40)..96..700.g|
00001A50: 22 A3 03 8F 20 2A 2A 20  4D 45 4D 4F 52 59 20 43  |"... ** MEMORY C|
00001A60: 48 45 43 4B 20 2A 2A 00  7B 22 A4 03 8B 20 B8 28  |HECK **.{"... .(|
00001A70: 30 29 B1 32 30 30 30 A7  39 33 37 00 A9 22 A5 03  |0).2000.937.."..|
00001A80: 99 22 93 11 11 05 54 48  49 53 20 4D 41 43 48 49  |."....THIS MACHI|
00001A90: 4E 45 20 44 4F 45 53 20  4E 4F 54 20 48 41 56 45  |NE DOES NOT HAVE|
00001AA0: 20 45 4E 4F 55 47 48 11  22 00 CD 22 A6 03 99 22  | ENOUGH.".."..."|
00001AB0: 4D 45 4D 4F 52 59 20 54  4F 20 52 55 4E 20 54 48  |MEMORY TO RUN TH|
00001AC0: 49 53 20 50 52 4F 47 52  41 4D 20 21 22 00 D8 22  |IS PROGRAM !".."|
00001AD0: A7 03 9E 55 55 AA 37 31  00 DE 22 A8 03 80 00 F8  |...UU.71..".....|
00001AE0: 22 A9 03 99 22 93 05 22  3A 8B C2 28 35 30 30 30  |"..."..":..(5000|
00001AF0: 33 29 B2 30 A7 39 36 32  00 27 23 AC 03 8F 20 2A  |3).0.962.'#... *|
00001B00: 2A 20 42 41 53 49 43 20  32 2E 30 20 20 4F 52 20  |* BASIC 2.0  OR |
00001B10: 20 34 2E 30 20 20 4F 52  20 20 43 2D 36 34 20 53  | 4.0  OR  C-64 S|
00001B20: 45 54 55 50 20 2A 2A 00  65 23 AD 03 97 31 30 37  |ETUP **.e#...107|
00001B30: 35 2C 31 33 33 3A 97 31  30 37 36 2C 31 34 34 3A  |5,133:.1076,144:|
00001B40: 97 31 30 37 37 2C 32 33  34 3A 97 31 30 37 39 2C  |.1077,234:.1079,|
00001B50: 34 3A 97 31 30 38 30 2C  31 33 33 3A 97 31 30 38  |4:.1080,133:.108|
00001B60: 31 2C 31 34 35 00 9B 23  AE 03 97 31 30 39 31 2C  |1,145..#...1091,|
00001B70: 31 35 35 3A 97 31 30 39  38 2C 31 33 33 3A 97 31  |155:.1098,133:.1|
00001B80: 30 39 39 2C 31 34 34 3A  97 31 31 30 30 2C 32 33  |099,144:.1100,23|
00001B90: 34 3A 97 31 31 30 33 2C  31 33 33 00 BD 23 AF 03  |4:.1103,133..#..|
00001BA0: 97 31 31 30 34 2C 31 34  35 3A 97 31 31 30 35 2C  |.1104,145:.1105,|
00001BB0: 32 33 34 3A 97 31 30 38  32 2C 32 33 34 00 D4 23  |234:.1082,234..#|
00001BC0: B1 03 8B C2 28 35 30 30  30 33 29 B3 B1 31 36 30  |....(50003)..160|
00001BD0: A7 39 35 35 00 03 24 B6  03 97 31 30 39 33 2C 38  |.955..$...1093,8|
00001BE0: 38 3A 97 31 30 39 34 2C  32 32 38 3A 97 31 30 39  |8:.1094,228:.109|
00001BF0: 37 2C 38 35 3A 97 31 31  30 32 2C 32 32 38 3A 89  |7,85:.1102,228:.|
00001C00: 39 36 35 00 18 24 BB 03  8B C2 28 35 30 30 30 33  |965..$....(50003|
00001C10: 29 B3 B1 31 A7 39 39 30  00 47 24 C0 03 97 31 30  |)..1.990.G$...10|
00001C20: 39 33 2C 34 39 3A 97 31  30 39 34 2C 32 33 30 3A  |93,49:.1094,230:|
00001C30: 97 31 30 39 37 2C 34 36  3A 97 31 31 30 32 2C 32  |.1097,46:.1102,2|
00001C40: 33 30 3A 89 39 36 35 00  81 24 C2 03 97 32 30 39  |30:.965..$...209|
00001C50: 39 2C 31 34 31 3A 97 32  31 30 30 2C 32 30 3A 97  |9,141:.2100,20:.|
00001C60: 32 31 30 31 2C 33 3A 97  32 31 30 33 2C 38 3A 97  |2101,3:.2103,8:.|
00001C70: 32 31 30 34 2C 31 34 31  3A 97 32 31 30 35 2C 32  |2104,141:.2105,2|
00001C80: 31 00 BD 24 C3 03 97 32  31 30 36 2C 33 3A 97 32  |1..$...2106,3:.2|
00001C90: 31 31 35 2C 31 34 35 3A  97 32 31 31 37 2C 35 32  |115,145:.2117,52|
00001CA0: 3A 97 32 31 31 38 2C 32  33 34 3A 97 32 31 32 31  |:.2118,234:.2121|
00001CB0: 2C 34 39 3A 97 32 31 32  32 2C 31 34 31 00 F7 24  |,49:.2122,141..$|
00001CC0: C4 03 97 32 31 32 33 2C  32 30 3A 97 32 31 32 34  |...2123,20:.2124|
00001CD0: 2C 33 3A 97 32 31 32 36  2C 32 33 34 3A 97 32 31  |,3:.2126,234:.21|
00001CE0: 32 37 2C 31 34 31 3A 97  32 31 32 38 2C 32 31 3A  |27,141:.2128,21:|
00001CF0: 97 32 31 32 39 2C 33 00  15 25 C5 03 9E 55 55 AA  |.2129,3..%...UU.|
00001D00: 34 38 3A 8F 20 44 49 53  41 42 4C 45 20 53 54 4F  |48:. DISABLE STO|
00001D10: 50 20 4B 45 59 00 26 25  CA 03 8D 38 30 30 3A 8F  |P KEY.&%...800:.|
00001D20: 20 54 49 54 4C 45 00 36  25 D4 03 89 33 30 30 3A  | TITLE.6%...300:|
00001D30: 8F 20 4D 45 4E 55 00 67  25 DE 03 99 22 93 54 48  |. MENU.g%...".TH|
00001D40: 45 20 50 47 4D 20 57 49  4C 4C 20 4E 4F 54 20 57  |E PGM WILL NOT W|
00001D50: 4F 52 4B 20 4F 4E 20 54  48 49 53 20 4D 41 43 48  |ORK ON THIS MACH|
00001D60: 49 4E 45 21 22 3A 80 00  9C 25 E8 03 8B 55 5A B2  |INE!":...%...UZ.|
00001D70: 31 A7 9E 55 50 25 3A 9E  55 50 25 3A 55 5A B2 30  |1..UP%:.UP%:UZ.0|
00001D80: 3A 8F 20 2A 2A 20 50 52  4F 47 52 41 4D 20 53 54  |:. ** PROGRAM ST|
00001D90: 41 52 54 53 20 48 45 52  45 20 2A 2A 00 C8 25 E9  |ARTS HERE **..%.|
00001DA0: 03 99 22 93 05 22 3B 3A  8C 3A 8B C2 28 35 30 30  |.."..";:.:..(500|
00001DB0: 30 33 29 B2 30 A7 97 35  33 32 38 31 2C 36 3A 97  |03).0..53281,6:.|
00001DC0: 35 33 32 38 30 2C 31 34  00 EF 25 F0 03 97 55 54  |53280,14..%...UT|
00001DD0: 2C 55 4C 25 3A 99 A3 31  34 29 22 11 11 11 11 11  |,UL%:..14)".....|
00001DE0: 11 11 C5 58 45 52 43 49  53 45 53 20 4F 4E 22 00  |...XERCISES ON".|
00001DF0: 26 26 F2 03 99 A3 31 32  29 22 11 11 C1 4C 47 45  |&&....12)"...LGE|
00001E00: 42 52 41 49 43 20 D6 45  43 54 4F 52 53 22 3A 99  |BRAIC .ECTORS":.|
00001E10: A3 31 33 29 22 11 11 42  59 20 C4 2E 20 D3 2E 20  |.13)"..BY .. .. |
00001E20: C3 4F 4F 50 45 52 00 36  26 F4 03 81 49 B2 31 A4  |.OOPER.6&...I.1.|
00001E30: 31 30 30 30 3A 82 00 55  26 06 04 96 A5 52 28 58  |1000:..U&....R(X|
00001E40: 29 B2 AB 58 AA B5 28 28  32 AC 58 AA 31 29 AC BB  |)..X..((2.X.1)..|
00001E50: 28 54 49 29 29 00 6D 26  10 04 8D 31 37 36 30 3A  |(TI)).m&...1760:|
00001E60: 8B 46 4C 24 B2 22 51 55  49 54 22 A7 8E 00 85 26  |.FL$."QUIT"....&|
00001E70: 1A 04 51 4E B2 51 4E AA  31 3A 8B 51 4E B1 4E 51  |..QN.QN.1:.QN.NQ|
00001E80: A7 31 31 30 30 00 8F 26  24 04 8D 31 39 35 30 00  |.1100..&$..1950.|
00001E90: 9E 26 2E 04 8D 20 38 33  35 3A 8D 38 37 35 00 A8  |.&... 835:.875..|
00001EA0: 26 42 04 89 31 30 35 30  00 CF 26 4C 04 8D 38 35  |&B..1050..&L..85|
00001EB0: 30 3A 99 A3 31 32 29 22  11 11 11 11 11 11 12 20  |0:..12)"....... |
00001EC0: 53 20 55 20 4D 20 4D 20  41 20 52 20 59 20 22 00  |S U M M A R Y ".|
00001ED0: F9 26 56 04 99 22 11 11  11 20 20 20 20 20 20 59  |.&V.."...      Y|
00001EE0: 4F 55 52 20 53 43 4F 52  45 20 49 53 22 4E 43 22  |OUR SCORE IS"NC"|
00001EF0: 4F 55 54 20 4F 46 22 4E  51 00 2A 27 60 04 99 22  |OUT OF"NQ.*'`.."|
00001F00: 20 20 20 20 20 20 28 22  CA 28 C4 28 B5 28 4E 43  |      (".(.(.(NC|
00001F10: AC 31 30 30 30 30 AD 4E  51 AA 2E 35 29 AD 31 30  |.10000.NQ..5).10|
00001F20: 30 29 2C 32 29 22 25 29  2E 22 00 5D 27 6A 04 99  |0),2)"%).".]'j..|
00001F30: 22 11 20 20 20 20 20 20  59 4F 55 20 54 4F 4F 4B  |".      YOU TOOK|
00001F40: 22 3B 3A 54 4D B2 B5 28  54 54 AD 33 36 30 30 29  |";:TM..(TT.3600)|
00001F50: 3A 99 54 4D 3B 22 4D 49  4E 2E 2C 22 3B 00 86 27  |:.TM;"MIN.,";..'|
00001F60: 74 04 41 B2 B5 28 28 54  54 AB 54 4D AC 33 36 30  |t.A..((TT.TM.360|
00001F70: 30 29 AD 36 AA 2E 35 29  AD 31 30 3A 99 41 3B 22  |0).6..5).10:.A;"|
00001F80: 53 45 43 2E 2C 22 00 C0  27 7E 04 99 22 20 20 20  |SEC.,"..'~.."   |
00001F90: 20 20 20 4F 52 22 3B B5  28 54 54 AD 36 AD 4E 51  |   OR";.(TT.6.NQ|
00001FA0: AA 2E 35 29 AD 31 30 3B  22 53 45 43 4F 4E 44 53  |..5).10;"SECONDS|
00001FB0: 20 50 45 52 20 51 55 45  53 54 49 4F 4E 2E 11 22  | PER QUESTION.."|
00001FC0: 00 CA 27 92 04 8D 20 38  33 35 00 D4 27 9C 04 89  |..'... 835..'...|
00001FD0: 31 30 34 30 00 FE 27 A6  04 41 4E 24 B2 22 22 3A  |1040..'..AN$."":|
00001FE0: 81 49 B2 31 A4 39 3A A1  41 24 3A 82 3A 4C 33 24  |.I.1.9:.A$:.:L3$|
00001FF0: B2 22 A6 9D 22 3A 4C 35  24 B2 22 20 9D 22 00 16  |."..":L5$." ."..|
00002000: 28 B0 04 A1 41 24 3A 8B  20 41 24 B3 B1 22 22 20  |(...A$:. A$.."" |
00002010: A7 20 31 32 37 30 00 26  28 BA 04 99 4C 33 24 3B  |. 1270.&(...L3$;|
00002020: 3A 41 54 B2 54 49 00 39  28 C4 04 8B 54 49 AB 41  |:AT.TI.9(...TI.A|
00002030: 54 B3 31 30 A7 31 32 32  30 00 4E 28 CE 04 A1 41  |T.10.1220.N(...A|
00002040: 24 3A 8B 41 24 B3 B1 22  22 A7 31 32 37 30 00 5E  |$:.A$.."".1270.^|
00002050: 28 D8 04 99 4C 35 24 3B  3A 41 54 B2 54 49 00 71  |(...L5$;:AT.TI.q|
00002060: 28 E2 04 8B 54 49 AB 41  54 B3 31 30 A7 31 32 35  |(...TI.AT.10.125|
00002070: 30 00 7B 28 EC 04 89 31  32 30 30 00 95 28 F6 04  |0.{(...1200..(..|
00002080: 8B C6 28 41 24 29 B2 31  33 AF 41 4E 24 B2 22 22  |..(A$).13.AN$.""|
00002090: A7 31 32 30 30 00 AC 28  00 05 91 4C 32 89 31 32  |.1200..(...L2.12|
000020A0: 39 30 2C 31 33 31 30 2C  31 33 30 30 00 CA 28 0A  |90,1310,1300..(.|
000020B0: 05 8B C6 28 41 24 29 B2  31 33 AF C3 28 41 4E 24  |...(A$).13..(AN$|
000020C0: 29 B3 B1 4C 4E A7 31 32  30 30 00 F2 28 14 05 8B  |)..LN.1200..(...|
000020D0: C6 28 41 24 29 B2 31 33  AF 28 C3 28 41 4E 24 29  |.(A$).13.(.(AN$)|
000020E0: B1 4C 4E B0 C3 28 41 4E  24 29 B2 30 29 A7 31 32  |.LN..(AN$).0).12|
000020F0: 30 30 00 16 29 1E 05 8B  C6 28 41 24 29 B2 31 33  |00..)....(A$).13|
00002100: A7 99 22 20 22 3A 4C 4E  B2 31 3A 4C 32 B2 31 3A  |.." ":LN.1:L2.1:|
00002110: 4C 38 B2 31 3A 8E 00 30  29 28 05 8B C6 28 41 24  |L8.1:..0)(...(A$|
00002120: 29 B2 32 30 AF 41 4E 24  B2 22 22 A7 31 32 30 30  |).20.AN$."".1200|
00002130: 00 5D 29 32 05 8B C6 28  41 24 29 B2 32 30 A7 99  |.])2...(A$).20..|
00002140: 41 24 3B 3A 41 4E 24 B2  C8 28 41 4E 24 2C C3 28  |A$;:AN$..(AN$,.(|
00002150: 41 4E 24 29 AB 31 29 3A  89 31 32 30 30 00 94 29  |AN$).1):.1200..)|
00002160: 3C 05 4C 39 B2 31 3A 8B  4C 38 B2 32 AF C6 28 41  |<.L9.1:.L8.2..(A|
00002170: 24 29 B1 36 34 AF C6 28  41 24 29 B3 39 31 A7 99  |$).64..(A$).91..|
00002180: 41 24 3B 3A 41 4E 24 B2  41 4E 24 AA 41 24 3A 89  |A$;:AN$.AN$.A$:.|
00002190: 31 32 30 30 00 BD 29 46  05 8B CA 28 4C 24 2C 4C  |1200..)F...(L$,L|
000021A0: 39 2C 31 29 B2 41 24 A7  99 41 24 3B 3A 41 4E 24  |9,1).A$..A$;:AN$|
000021B0: B2 41 4E 24 AA 41 24 3A  89 31 32 30 30 00 D9 29  |.AN$.A$:.1200..)|
000021C0: 50 05 4C 39 B2 4C 39 AA  31 3A 8B 4C 39 B3 B2 C3  |P.L9.L9.1:.L9...|
000021D0: 28 4C 24 29 A7 31 33 35  30 00 E3 29 5A 05 89 31  |(L$).1350..)Z..1|
000021E0: 32 30 30 00 1A 2A 64 05  99 22 28 59 20 4F 52 20  |200..*d.."(Y OR |
000021F0: 4E 29 20 22 3B 3A 4C 24  B2 22 59 4E 22 3A 55 4C  |N) ";:L$."YN":UL|
00002200: B2 31 3A 55 53 24 B2 22  59 4E 22 3A 8D 33 35 3A  |.1:US$."YN":.35:|
00002210: 41 4E 24 B2 55 52 24 20  3A 8E 00 57 2A 6E 05 41  |AN$.UR$ :..W*n.A|
00002220: B2 58 3A 8D 31 34 31 30  3A 56 24 B2 22 28 22 AA  |.X:.1410:V$."(".|
00002230: 41 24 AA 22 2C 22 3A 41  B2 59 3A 8D 31 34 31 30  |A$.",":A.Y:.1410|
00002240: 3A 56 24 B2 56 24 AA 41  24 AA 22 2C 22 3A 41 B2  |:V$.V$.A$.",":A.|
00002250: 5A 3A 8D 31 34 31 30 00  6A 2A 78 05 56 24 B2 56  |Z:.1410.j*x.V$.V|
00002260: 24 AA 41 24 AA 22 29 22  3A 8E 00 7D 2A 82 05 41  |$.A$.")":..}*..A|
00002270: 24 B2 C4 28 41 29 3A 8B  41 B3 30 A7 8E 00 8E 2A  |$..(A):.A.0....*|
00002280: 8C 05 41 24 B2 CA 28 41  24 2C 32 29 3A 8E 00 B3  |..A$..(A$,2):...|
00002290: 2A 96 05 58 B2 A5 52 28  48 4E 29 3A 59 B2 A5 52  |*..X..R(HN):Y..R|
000022A0: 28 48 4E 29 3A 5A B2 A5  52 28 48 4E 29 3A 89 31  |(HN):Z..R(HN):.1|
000022B0: 33 39 30 00 E9 2A A0 05  8D 31 34 33 30 3A 51 24  |390..*...1430:Q$|
000022C0: B2 56 24 3A 43 31 B2 58  3A 43 32 B2 59 3A 43 33  |.V$:C1.X:C2.Y:C3|
000022D0: B2 5A 3A 8D 31 34 33 30  3A 58 31 B2 58 3A 58 32  |.Z:.1430:X1.X:X2|
000022E0: B2 59 3A 58 33 B2 5A 3A  8E 00 14 2B AA 05 55 47  |.Y:X3.Z:...+..UG|
000022F0: 24 B2 22 43 52 4F 53 53  20 50 52 4F 44 55 43 54  |$."CROSS PRODUCT|
00002300: 22 3A 8D 31 34 34 30 3A  51 24 B2 51 24 AA 22 D6  |":.1440:Q$.Q$.".|
00002310: 22 AA 56 24 00 51 2B B4  05 58 B2 43 32 AC 58 33  |".V$.Q+..X.C2.X3|
00002320: AB 43 33 AC 58 32 3A 59  B2 43 33 AC 58 31 AB 43  |.C3.X2:Y.C3.X1.C|
00002330: 31 AC 58 33 3A 5A B2 43  31 AC 58 32 AB 43 32 AC  |1.X3:Z.C1.X2.C2.|
00002340: 58 31 3A 8D 31 33 39 30  3A 52 41 24 B2 56 24 3A  |X1:.1390:RA$.V$:|
00002350: 8E 00 7A 2B BE 05 55 47  24 B2 22 44 4F 54 20 50  |..z+..UG$."DOT P|
00002360: 52 4F 44 55 43 54 22 3A  8D 31 34 34 30 3A 51 24  |RODUCT":.1440:Q$|
00002370: B2 51 24 AA 22 D1 22 AA  56 24 00 A1 2B C8 05 41  |.Q$.".".V$..+..A|
00002380: B2 43 31 AC 58 31 AA 43  32 AC 58 32 AA 43 33 AC  |.C1.X1.C2.X2.C3.|
00002390: 58 33 3A 8D 31 34 31 30  3A 52 41 24 B2 41 24 3A  |X3:.1410:RA$.A$:|
000023A0: 8E 00 DD 2B D2 05 8D 31  34 34 30 3A 51 24 B2 51  |...+...1440:Q$.Q|
000023B0: 24 AA 22 2B 22 AA 56 24  3A 58 B2 43 31 AA 58 31  |$."+".V$:X.C1.X1|
000023C0: 3A 59 B2 43 32 AA 58 32  3A 5A B2 43 33 AA 58 33  |:Y.C2.X2:Z.C3.X3|
000023D0: 3A 8D 31 33 39 30 3A 52  41 24 B2 56 24 00 F2 2B  |:.1390:RA$.V$..+|
000023E0: D7 05 55 47 24 B2 22 41  44 44 49 54 49 4F 4E 22  |..UG$."ADDITION"|
000023F0: 3A 8E 00 2E 2C DC 05 8D  31 34 34 30 3A 51 24 B2  |:...,...1440:Q$.|
00002400: 51 24 AA 22 2D 22 AA 56  24 3A 58 B2 43 31 AB 58  |Q$."-".V$:X.C1.X|
00002410: 31 3A 59 B2 43 32 AB 58  32 3A 5A B2 43 33 AB 58  |1:Y.C2.X2:Z.C3.X|
00002420: 33 3A 8D 31 33 39 30 3A  52 41 24 B2 56 24 00 46  |3:.1390:RA$.V$.F|
00002430: 2C E1 05 55 47 24 B2 22  53 55 42 54 52 41 43 54  |,..UG$."SUBTRACT|
00002440: 49 4F 4E 22 3A 8E 00 85  2C E6 05 8D 31 34 34 30  |ION":...,...1440|
00002450: 3A 41 B2 58 3A 8D 31 34  31 30 3A 51 24 B2 41 24  |:A.X:.1410:Q$.A$|
00002460: AA 51 24 3A 58 B2 43 31  AC 41 3A 59 B2 43 32 AC  |.Q$:X.C1.A:Y.C2.|
00002470: 41 3A 5A B2 43 33 AC 41  3A 8D 31 33 39 30 3A 52  |A:Z.C3.A:.1390:R|
00002480: 41 24 B2 56 24 00 9E 2C  F0 05 55 47 24 B2 22 53  |A$.V$..,..UG$."S|
00002490: 43 41 4C 41 52 20 4D 55  4C 54 2E 22 3A 8E 00 B7  |CALAR MULT.":...|
000024A0: 2C FA 05 58 B2 B6 28 A5  52 28 35 29 29 3A 8B 58  |,..X..(.R(5)):.X|
000024B0: B2 30 A7 31 35 33 30 00  D7 2C 04 06 91 58 89 31  |.0.1530..,...X.1|
000024C0: 35 35 30 2C 31 35 37 30  2C 31 35 39 30 2C 31 36  |550,1570,1590,16|
000024D0: 31 30 2C 31 36 33 30 00  0E 2D 0E 06 8D 31 34 35  |10,1630..-...145|
000024E0: 30 3A 51 24 B2 22 D6 28  22 AA 51 24 AA 22 29 22  |0:Q$.".(".Q$.")"|
000024F0: 3A 58 31 B2 58 3A 58 32  B2 59 3A 58 33 B2 5A 3A  |:X1.X:X2.Y:X3.Z:|
00002500: 8D 31 34 33 30 3A 51 24  B2 56 24 AA 51 24 00 2D  |.1430:Q$.V$.Q$.-|
00002510: 2D 18 06 43 31 B2 58 3A  43 32 B2 59 3A 43 33 B2  |-..C1.X:C2.Y:C3.|
00002520: 5A 3A 8D 31 34 36 30 3A  89 31 36 33 35 00 64 2D  |Z:.1460:.1635.d-|
00002530: 22 06 8D 31 34 35 30 3A  51 24 B2 22 28 22 AA 51  |"..1450:Q$."(".Q|
00002540: 24 AA 22 29 D6 22 3A 43  31 B2 58 3A 43 32 B2 59  |$.").":C1.X:C2.Y|
00002550: 3A 43 33 B2 5A 3A 8D 31  34 33 30 3A 51 24 B2 51  |:C3.Z:.1430:Q$.Q|
00002560: 24 AA 56 24 00 83 2D 2C  06 58 31 B2 58 3A 58 32  |$.V$..-,.X1.X:X2|
00002570: B2 59 3A 58 33 B2 5A 3A  8D 31 34 36 30 3A 89 31  |.Y:X3.Z:.1460:.1|
00002580: 36 33 35 00 AF 2D 36 06  8D 31 34 35 30 3A 58 31  |635..-6..1450:X1|
00002590: B2 58 3A 58 32 B2 59 3A  58 33 B2 5A 3A 8D 31 34  |.X:X2.Y:X3.Z:.14|
000025A0: 33 30 3A 51 24 B2 56 24  AA 22 D1 22 AA 51 24 00  |30:Q$.V$.".".Q$.|
000025B0: CE 2D 40 06 43 31 B2 58  3A 43 32 B2 59 3A 43 33  |.-@.C1.X:C2.Y:C3|
000025C0: B2 5A 3A 8D 31 34 38 30  3A 89 31 36 33 35 00 FA  |.Z:.1480:.1635..|
000025D0: 2D 4A 06 8D 31 34 35 30  3A 58 31 B2 58 3A 58 32  |-J..1450:X1.X:X2|
000025E0: B2 59 3A 58 33 B2 5A 3A  8D 31 34 33 30 3A 51 24  |.Y:X3.Z:.1430:Q$|
000025F0: B2 51 24 AA 22 D1 22 AA  56 24 00 04 2E 54 06 89  |.Q$.".".V$...T..|
00002600: 31 36 30 30 00 40 2E 5E  06 8D 31 34 37 30 3A 4B  |1600.@.^..1470:K|
00002610: B2 41 3A 8D 31 34 33 30  3A 51 24 B2 51 24 AA 56  |.A:.1430:Q$.Q$.V|
00002620: 24 3A 58 B2 58 AC 4B 3A  59 B2 59 AC 4B 3A 5A B2  |$:X.X.K:Y.Y.K:Z.|
00002630: 5A AC 4B 3A 8D 31 33 39  30 3A 52 41 24 B2 56 24  |Z.K:.1390:RA$.V$|
00002640: 00 5C 2E 63 06 55 47 24  B2 22 54 52 49 50 4C 45  |.\.c.UG$."TRIPLE|
00002650: 20 50 52 4F 44 55 43 54  53 22 3A 8E 00 A3 2E 68  | PRODUCTS":....h|
00002660: 06 8D 31 34 34 30 3A 41  24 B2 22 46 49 4E 44 20  |..1440:A$."FIND |
00002670: 54 48 45 20 44 49 53 54  41 4E 43 45 20 42 45 54  |THE DISTANCE BET|
00002680: 57 45 45 4E 20 54 48 45  20 50 4F 49 4E 54 53 11  |WEEN THE POINTS.|
00002690: 22 3A 51 31 24 B2 51 24  AA 22 20 41 4E 44 20 22  |":Q1$.Q$." AND "|
000026A0: AA 56 24 00 E0 2E 72 06  51 24 B2 41 24 3A 41 24  |.V$...r.Q$.A$:A$|
000026B0: B2 22 22 3A 41 B2 BA 28  28 58 AB 43 31 29 AE 32  |."":A..((X.C1).2|
000026C0: AA 28 59 AB 43 32 29 AE  32 AA 28 5A AB 43 33 29  |.(Y.C2).2.(Z.C3)|
000026D0: AE 32 29 3A 8D 31 34 31  30 3A 52 41 24 B2 41 24  |.2):.1410:RA$.A$|
000026E0: 00 F5 2E 77 06 55 47 24  B2 22 44 49 53 54 41 4E  |...w.UG$."DISTAN|
000026F0: 43 45 22 3A 8E 00 3A 2F  7C 06 8D 31 34 34 30 3A  |CE":..:/|..1440:|
00002700: 41 24 B2 22 46 49 4E 44  20 54 48 45 20 41 4E 47  |A$."FIND THE ANG|
00002710: 4C 45 20 42 45 54 57 45  45 4E 20 54 48 45 20 56  |LE BETWEEN THE V|
00002720: 45 43 54 4F 52 53 11 22  3A 51 31 24 B2 51 24 AA  |ECTORS.":Q1$.Q$.|
00002730: 22 20 41 4E 44 20 22 AA  56 24 00 50 2F 81 06 8B  |" AND ".V$.P/...|
00002740: 58 B2 30 AF 59 B2 30 AF  5A B2 30 A7 31 36 36 30  |X.0.Y.0.Z.0.1660|
00002750: 00 69 2F 82 06 8B 43 31  B2 30 AF 43 32 B2 30 AF  |.i/...C1.0.C2.0.|
00002760: 43 33 B2 30 A7 31 36 36  30 00 A8 2F 86 06 51 24  |C3.0.1660../..Q$|
00002770: B2 41 24 3A 41 B2 28 58  AC 43 31 AA 59 AC 43 32  |.A$:A.(X.C1.Y.C2|
00002780: AA 5A AC 43 33 29 AD BA  28 28 58 AC 58 AA 59 AC  |.Z.C3)..((X.X.Y.|
00002790: 59 AA 5A AC 5A 29 AC 28  43 31 AE 32 AA 43 32 AE  |Y.Z.Z).(C1.2.C2.|
000027A0: 32 AA 43 33 AE 32 29 29  00 B7 2F 8B 06 8B 41 B2  |2.C3.2))../...A.|
000027B0: 30 A7 89 31 36 36 30 00  F0 2F 90 06 41 B2 C1 28  |0..1660../..A..(|
000027C0: B4 28 41 29 AC BA 28 31  AD 28 41 AC 41 29 AB 31  |.(A)..(1.(A.A).1|
000027D0: 29 29 AC 31 38 30 AD FF  3A 41 B2 B5 28 41 AA 2E  |)).180..:A..(A..|
000027E0: 35 29 3A 8B 41 B3 30 20  A7 41 B2 31 38 30 AA 41  |5):.A.0 .A.180.A|
000027F0: 00 0B 30 9A 06 52 41 24  B2 C4 28 41 29 3A 55 47  |..0..RA$..(A):UG|
00002800: 24 B2 22 41 4E 47 4C 45  22 3A 8E 00 24 30 A4 06  |$."ANGLE":..$0..|
00002810: 55 47 24 B2 22 41 52 45  41 20 4F 46 20 54 52 49  |UG$."AREA OF TRI|
00002820: 41 4E 47 22 00 61 30 A9  06 51 24 B2 22 46 49 4E  |ANG".a0..Q$."FIN|
00002830: 44 20 54 48 45 20 41 52  45 41 20 4F 46 20 54 52  |D THE AREA OF TR|
00002840: 49 41 4E 47 4C 45 20 41  42 43 2C 20 47 49 56 45  |IANGLE ABC, GIVE|
00002850: 4E 11 22 3A 51 31 24 B2  22 41 22 3A 8D 31 34 33  |N.":Q1$."A":.143|
00002860: 30 00 AB 30 AE 06 51 31  24 B2 51 31 24 AA 56 24  |0..0..Q1$.Q1$.V$|
00002870: AA 22 2C 20 42 22 3A 43  31 B2 58 3A 43 32 B2 59  |.", B":C1.X:C2.Y|
00002880: 3A 43 33 B2 5A 3A 8D 31  34 33 30 3A 51 31 24 B2  |:C3.Z:.1430:Q1$.|
00002890: 51 31 24 AA 56 24 AA 22  2C 20 43 22 3A 58 31 B2  |Q1$.V$.", C":X1.|
000028A0: 58 3A 58 32 B2 59 3A 58  33 B2 5A 00 F0 30 B8 06  |X:X2.Y:X3.Z..0..|
000028B0: 8D 31 34 33 30 3A 51 31  24 B2 51 31 24 AA 56 24  |.1430:Q1$.Q1$.V$|
000028C0: 3A 43 31 B2 43 31 AB 58  3A 43 32 B2 43 32 AB 59  |:C1.C1.X:C2.C2.Y|
000028D0: 3A 43 33 B2 43 33 AB 5A  3A 58 31 B2 58 31 AB 58  |:C3.C3.Z:X1.X1.X|
000028E0: 3A 58 32 B2 58 32 AB 59  3A 58 33 B2 58 33 AB 5A  |:X2.X2.Y:X3.X3.Z|
000028F0: 00 1E 31 C2 06 8D 31 34  36 30 3A 41 B2 BA 28 28  |..1...1460:A..((|
00002900: 58 AC 58 AA 59 AC 59 AA  5A AC 5A 29 AD 34 29 3A  |X.X.Y.Y.Z.Z).4):|
00002910: 8D 31 34 31 30 3A 52 41  24 B2 41 24 3A 8E 00 27  |.1410:RA$.A$:..'|
00002920: 31 CC 06 8D 38 35 30 00  61 31 CE 06 8B 43 48 B3  |1...850.a1...CH.|
00002930: 37 A7 99 22 11 20 20 20  53 49 4D 50 4C 49 46 59  |7..".   SIMPLIFY|
00002940: 3A 11 11 22 3A 99 22 1D  1D 1D 22 51 24 3A 99 22  |:..":."..."Q$:."|
00002950: 1D 1D 1D 11 3D 20 22 3B  3A 4C 24 B2 4C 36 24 3A  |....= ";:L$.L6$:|
00002960: 8E 00 99 31 D6 06 99 22  11 20 20 20 22 51 24 3A  |...1...".   "Q$:|
00002970: 99 22 20 20 20 22 51 31  24 3A 99 22 11 11 20 20  |."   "Q1$:."..  |
00002980: 20 41 4E 53 57 45 52 3A  20 22 3B 3A 4C 24 B2 4C  | ANSWER: ";:L$.L|
00002990: 34 24 AA 22 2D 2E 22 3A  8E 00 B4 31 E0 06 8F 20  |4$."-.":...1... |
000029A0: 2A 2A 20 44 4F 20 41 4E  20 45 58 45 52 43 49 53  |** DO AN EXERCIS|
000029B0: 45 20 2A 2A 00 E7 31 E1  06 4C 4E B2 31 3A 4C 32  |E **..1..LN.1:L2|
000029C0: B2 31 3A 4C 38 B2 31 3A  4C 34 24 B2 22 31 32 33  |.1:L8.1:L4$."123|
000029D0: 34 35 36 37 38 39 30 22  3A 4C 36 24 B2 4C 34 24  |4567890":L6$.L4$|
000029E0: AA 22 28 29 2C 2D 22 00  12 32 E2 06 99 22 93 11  |."(),-"..2..."..|
000029F0: 22 3A 97 55 54 2C 55 4C  25 3A 99 A3 31 32 29 22  |":.UT,UL%:..12)"|
00002A00: C1 CC C7 C5 C2 D2 C1 C9  C3 A0 D6 C5 C3 D4 CF D2  |................|
00002A10: D3 22 00 43 32 E3 06 99  22 11 20 2D 2D 2D 2D 2D  |.".C2...". -----|
00002A20: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00002A30: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00002A40: 2D 11 22 00 5E 32 EA 06  55 47 24 B2 22 41 52 45  |-.".^2..UG$."ARE|
00002A50: 41 20 4F 46 20 54 52 49  41 4E 47 4C 45 22 00 7A  |A OF TRIANGLE".z|
00002A60: 32 F9 06 99 22 20 20 20  20 20 31 2E 20 C4 4F 54  |2..."     1. .OT|
00002A70: 20 D0 52 4F 44 55 43 54  53 22 00 98 32 FE 06 99  | .RODUCTS"..2...|
00002A80: 22 20 20 20 20 20 32 2E  20 C3 52 4F 53 53 20 50  |"     2. .ROSS P|
00002A90: 52 4F 44 55 43 54 53 22  00 C7 32 03 07 99 22 20  |RODUCTS"..2..." |
00002AA0: 20 20 20 20 33 2E 20 C1  44 44 49 54 49 4F 4E 22  |    3. .DDITION"|
00002AB0: 3A 99 22 20 20 20 20 20  34 2E 20 D3 55 42 54 52  |:."     4. .UBTR|
00002AC0: 41 43 54 49 4F 4E 22 00  EC 32 08 07 99 22 20 20  |ACTION"..2..."  |
00002AD0: 20 20 20 35 2E 20 D3 43  41 4C 41 52 20 CD 55 4C  |   5. .CALAR .UL|
00002AE0: 54 49 50 4C 49 43 41 54  49 4F 4E 22 00 0B 33 12  |TIPLICATION"..3.|
00002AF0: 07 99 22 20 20 20 20 20  36 2E 20 D4 52 49 50 4C  |.."     6. .RIPL|
00002B00: 45 20 D0 52 4F 44 55 43  54 53 22 00 36 33 17 07  |E .RODUCTS".63..|
00002B10: 99 22 20 20 20 20 20 37  2E 20 C4 49 53 54 41 4E  |."     7. .ISTAN|
00002B20: 43 45 20 C2 45 54 57 45  45 4E 20 D4 57 4F 20 D0  |CE .ETWEEN .WO .|
00002B30: 4F 49 4E 54 53 22 00 5F  33 1C 07 99 22 20 20 20  |OINTS"._3..."   |
00002B40: 20 20 38 2E 20 C1 4E 47  4C 45 20 C2 45 54 57 45  |  8. .NGLE .ETWE|
00002B50: 45 4E 20 D4 57 4F 20 D6  45 43 54 4F 52 53 22 00  |EN .WO .ECTORS".|
00002B60: 81 33 1D 07 99 22 20 20  20 20 20 39 2E 20 C1 52  |.3..."     9. .R|
00002B70: 45 41 20 4F 46 20 41 20  D4 52 49 41 4E 47 4C 45  |EA OF A .RIANGLE|
00002B80: 22 00 89 33 1E 07 99 22  22 00 BA 33 20 07 99 22  |"..3...""..3 .."|
00002B90: 11 20 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |. --------------|
00002BA0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00002BB0: 2D 2D 2D 2D 2D 2D 2D 2D  11 22 00 EA 33 22 07 99  |--------."..3"..|
00002BC0: 22 20 20 C3 48 4F 4F 53  45 20 41 4E 20 45 58 45  |"  .HOOSE AN EXE|
00002BD0: 52 43 49 53 45 20 4F 52  20 45 4E 54 45 52 20 12  |RCISE OR ENTER .|
00002BE0: 51 92 55 49 54 2E 20 20  22 3B 00 24 34 26 07 4C  |Q.UIT.  ";.$4&.L|
00002BF0: 32 B2 32 3A 4C 24 B2 22  31 32 33 34 35 36 37 38  |2.2:L$."12345678|
00002C00: 39 22 3A 55 4C B2 31 3A  55 53 24 B2 22 31 32 33  |9":UL.1:US$."123|
00002C10: 34 35 36 37 38 39 51 22  3A 8D 33 35 3A 41 4E 24  |456789Q":.35:AN$|
00002C20: B2 55 52 24 00 45 34 28  07 46 4C 24 B2 22 22 3A  |.UR$.E4(.FL$."":|
00002C30: 8B 55 52 24 B2 22 51 22  A7 46 4C 24 B2 22 51 55  |.UR$."Q".FL$."QU|
00002C40: 49 54 22 3A 8E 00 72 34  2B 07 55 50 B2 30 3A 55  |IT":..r4+.UP.0:U|
00002C50: 47 24 B2 22 49 4E 46 4F  52 4D 41 54 49 4F 4E 22  |G$."INFORMATION"|
00002C60: 3A 99 22 93 22 3A 97 55  54 2C 55 55 25 3A 8D 38  |:.".":.UT,UU%:.8|
00002C70: 35 30 00 B2 34 30 07 43  48 24 B2 41 4E 24 3A 43  |50..40.CH$.AN$:C|
00002C80: 48 25 B2 30 3A 81 49 B2  31 A4 C3 28 41 4E 24 29  |H%.0:.I.1..(AN$)|
00002C90: 3A 43 48 25 B2 43 48 25  AA 32 AE C5 28 CA 28 41  |:CH%.CH%.2..(.(A|
00002CA0: 4E 24 2C 49 2C 31 29 29  3A 82 3A 99 22 11 11 11  |N$,I,1)):.:."...|
00002CB0: 11 22 00 D8 34 35 07 99  22 91 20 20 20 20 48 4F  |."..45..".    HO|
00002CC0: 57 20 4D 41 4E 59 20 51  55 45 53 54 49 4F 4E 53  |W MANY QUESTIONS|
00002CD0: 3F 20 20 20 9D 9D 22 3B  00 F8 34 3A 07 55 4C B2  |?   ..";..4:.UL.|
00002CE0: 32 20 3A 55 53 24 B2 22  48 30 31 32 33 34 35 36  |2 :US$."H0123456|
00002CF0: 37 38 39 22 3A 8D 33 35  00 0E 35 3C 07 8B 20 C5  |789":.35..5<.. .|
00002D00: 28 55 52 24 29 B2 30 20  A7 20 31 38 34 35 00 1C  |(UR$).0 . 1845..|
00002D10: 35 3F 07 4E 51 B2 C5 28  55 52 24 29 00 4A 35 44  |5?.NQ..(UR$).J5D|
00002D20: 07 99 22 11 11 11 20 20  20 20 57 48 41 54 20 49  |.."...    WHAT I|
00002D30: 53 20 54 48 45 20 4C 41  52 47 45 53 54 20 43 4F  |S THE LARGEST CO|
00002D40: 2D 4F 52 44 49 4E 41 54  45 22 00 73 35 45 07 99  |-ORDINATE".s5E..|
00002D50: 22 20 20 20 20 54 48 41  54 20 59 4F 55 20 57 41  |"    THAT YOU WA|
00002D60: 4E 54 20 54 4F 20 57 4F  52 4B 20 57 49 54 48 3F  |NT TO WORK WITH?|
00002D70: 20 22 3B 00 9F 35 46 07  55 4C B2 32 3A 55 53 24  | ";..5F.UL.2:US$|
00002D80: B2 22 48 30 31 32 33 34  35 36 37 38 39 22 3A 8D  |."H0123456789":.|
00002D90: 33 35 3A 41 4E 24 B2 55  52 24 3A 99 22 11 22 00  |35:AN$.UR$:.".".|
00002DA0: AD 35 49 07 48 4E B2 C5  28 41 4E 24 29 00 C2 35  |.5I.HN..(AN$)..5|
00002DB0: 4E 07 8B A8 28 43 48 25  AF 32 AE 38 29 A7 31 38  |N...(CH%.2.8).18|
00002DC0: 38 30 00 EF 35 4F 07 99  22 11 11 20 20 20 20 4E  |80..5O.."..    N|
00002DD0: 2E 42 2E 20 20 50 4C 45  41 53 45 20 47 49 56 45  |.B.  PLEASE GIVE|
00002DE0: 20 41 4E 47 4C 45 53 20  54 4F 20 54 48 45 22 00  | ANGLES TO THE".|
00002DF0: 17 36 50 07 99 22 20 20  20 20 4E 45 41 52 45 53  |.6P.."    NEARES|
00002E00: 54 20 44 45 47 52 45 45  20 41 4E 44 20 4E 4F 20  |T DEGREE AND NO |
00002E10: 44 45 47 52 45 45 22 00  40 36 51 07 99 22 20 20  |DEGREE".@6Q.."  |
00002E20: 20 20 53 49 47 4E 20 49  53 20 4E 45 43 45 53 53  |  SIGN IS NECESS|
00002E30: 41 52 59 2E 22 3A 8D 38  33 35 3A 89 31 39 32 30  |ARY.":.835:.1920|
00002E40: 00 56 36 58 07 8B 28 43  48 25 AF 32 AE 37 29 B2  |.V6X..(CH%.2.7).|
00002E50: 30 A7 31 39 30 30 00 7F  36 62 07 99 22 11 11 20  |0.1900..6b..".. |
00002E60: 20 20 20 4E 2E 42 2E 20  20 50 4C 45 41 53 45 20  |   N.B.  PLEASE |
00002E70: 47 49 56 45 20 44 49 53  54 41 4E 43 45 53 22 00  |GIVE DISTANCES".|
00002E80: B2 36 63 07 99 22 20 20  20 20 43 4F 52 52 45 43  |.6c.."    CORREC|
00002E90: 54 20 54 4F 20 34 20 44  45 43 49 4D 41 4C 20 50  |T TO 4 DECIMAL P|
00002EA0: 4C 41 43 45 53 2E 22 3A  8D 38 33 35 3A 89 31 39  |LACES.":.835:.19|
00002EB0: 32 30 00 C8 36 6C 07 8B  28 43 48 25 AF 32 AE 39  |20..6l..(CH%.2.9|
00002EC0: 29 B2 30 A7 31 39 32 30  00 F5 36 76 07 99 22 11  |).0.1920..6v..".|
00002ED0: 11 20 20 20 20 4E 2E 42  2E 20 20 50 4C 45 41 53  |.    N.B.  PLEAS|
00002EE0: 45 20 47 49 56 45 20 41  52 45 41 53 20 43 4F 52  |E GIVE AREAS COR|
00002EF0: 52 45 43 54 22 00 1D 37  77 07 99 22 20 20 20 20  |RECT"..7w.."    |
00002F00: 54 4F 20 46 4F 55 52 20  44 45 43 49 4D 41 4C 20  |TO FOUR DECIMAL |
00002F10: 50 4C 41 43 45 53 2E 22  3A 8D 38 33 35 00 26 37  |PLACES.":.835.&7|
00002F20: 80 07 8D 38 37 35 00 3B  37 94 07 4E 43 B2 30 3A  |...875.;7..NC.0:|
00002F30: 54 54 B2 30 3A 51 4E B2  30 3A 8E 00 5E 37 9E 07  |TT.0:QN.0:..^7..|
00002F40: 43 48 B2 B6 28 A5 52 28  39 29 29 3A 8B 28 32 AE  |CH..(.R(9)):.(2.|
00002F50: 43 48 AF 43 48 25 29 B2  30 A7 31 39 35 30 00 93  |CH.CH%).0.1950..|
00002F60: 37 A8 07 91 43 48 8D 31  34 37 30 2C 31 34 35 30  |7...CH.1470,1450|
00002F70: 2C 31 34 39 30 2C 31 35  30 30 2C 31 35 31 30 2C  |,1490,1500,1510,|
00002F80: 31 35 33 30 2C 31 36 34  30 2C 31 36 36 30 2C 31  |1530,1640,1660,1|
00002F90: 37 30 30 00 A2 37 BC 07  8D 31 37 34 30 3A 4C 32  |700..7...1740:L2|
00002FA0: B2 32 00 E8 37 C6 07 54  4D B2 54 49 3A 55 4C B2  |.2..7..TM.TI:UL.|
00002FB0: 31 30 3A 55 53 24 B2 22  2E 48 28 29 2C 30 31 32  |10:US$.".H(),012|
00002FC0: 33 34 35 36 37 38 39 2D  22 3A 8D 33 35 3A 41 4E  |3456789-":.35:AN|
00002FD0: 24 B2 55 52 24 3A 54 4D  B2 54 49 AB 54 4D 20 3A  |$.UR$:TM.TI.TM :|
00002FE0: 54 54 B2 54 54 AA 54 4D  00 08 38 DA 07 99 22 13  |TT.TT.TM..8...".|
00002FF0: 11 11 11 11 11 11 11 11  11 11 11 22 3B 3A 8B 43  |...........";:.C|
00003000: 48 B1 36 A7 32 30 34 30  00 30 38 E4 07 8B 41 4E  |H.6.2040.08...AN|
00003010: 24 B2 52 41 24 A7 99 A3  31 37 29 22 11 11 12 52  |$.RA$...17)"...R|
00003020: 49 47 48 54 21 22 3A 4E  43 B2 4E 43 AA 31 3A 8E  |IGHT!":NC.NC.1:.|
00003030: 00 65 38 EE 07 99 22 11  20 20 20 57 52 4F 4E 47  |.e8...".   WRONG|
00003040: 21 22 3A 99 22 11 20 20  20 54 48 45 20 43 4F 52  |!":.".   THE COR|
00003050: 52 45 43 54 20 41 4E 53  57 45 52 20 49 53 20 22  |RECT ANSWER IS "|
00003060: 52 41 24 3A 8E 00 9D 38  F8 07 41 4E 24 B2 C4 28  |RA$:...8..AN$..(|
00003070: C5 28 41 4E 24 29 29 3A  52 41 24 B2 C4 28 B5 28  |.(AN$)):RA$..(.(|
00003080: 28 C5 28 52 41 24 29 AA  2E 30 30 30 30 35 29 AC  |(.(RA$)..00005).|
00003090: 31 30 30 30 30 29 AD 31  30 30 30 30 29 00 C7 38  |10000).10000)..8|
000030A0: 02 08 8B B6 28 C5 28 41  4E 24 29 AB C5 28 52 41  |....(.(AN$)..(RA|
000030B0: 24 29 29 B3 2E 30 30 30  31 A7 41 4E 24 B2 52 41  |$))..0001.AN$.RA|
000030C0: 24 3A 89 32 30 32 30 00  D1 38 0C 08 89 32 30 33  |$:.2020..8...203|
000030D0: 30 00 D9 38 0F 27 41 B2  30 00 12 39 10 27 41 B2  |0..8.'A.0..9.'A.|
000030E0: C1 28 B4 28 41 29 AC BA  28 31 AD 28 41 AC 41 29  |.(.(A)..(1.(A.A)|
000030F0: AB 31 29 29 AC 31 38 30  AD FF 3A 41 B2 B5 28 41  |.1)).180..:A..(A|
00003100: AA 2E 35 29 3A 8B 41 B3  30 20 A7 41 B2 31 38 30  |..5):.A.0 .A.180|
00003110: AA 41 00 18 39 74 27 90  00 00 00                 |.A..9t'....     |
.......910.*.... ** ML STOP KEY DISABLE 
**.U...."X.=........X` ......LX.X.U.....
...X`.T...."XHHH.H.HHHHHHH.H.HX`111"....
.."HHHHHHH`1"...... ** 4 - POP ML SUBROU
TINE **.H.... **GENERAL INPUT ROUTINE **
.N...:.T...:...#.. +++ INPUT SECTION +++
...(.UR$."":UI$.""...*..UL.0.UL.80.%.-..
"  ..";:.UC,0.9.2..UI$:.UI$."".50.C.7..U
I$.G(13).C(UR$)..1..UC,1:." .";:.85.V.<.
.UI$.G(20).105...>.. C(UR$)..UL.50...A..
120:. CHECK FOR VALID CHARACTER...F.UR$.
UR$.UI$.I.K..UI$;.Q.P..50...U.. +++ CHEC
K FOR HELP REQUEST +++...Z..UR$.UX$.195:
. EXIT TO HELP ROUTINE.-._..UF.1..240.:.
D.UF.0:.:..S.F.. ++ CHECK DELETE ++.D.I.
.C(UR$).1.50.|.N.UR$.H(UR$,C(UR$).1)...S
..".  ..";:.50...X.. ++ CHECK FOR VALID 
CHARACTERS ++.G.}..C(US$).0.150.X....US.
1.C(US$)......UI$.J(US$,US,1)...........
..UI$."":....... ** STANDARD INPUT **...
...F(UI$).46...?....UI$.G(32)...\. ..F(U
I$).48.F(UI$).57.170.B.........F(UI$).6
5.F(UI$).90.180............F(UI$).193.F(
UI$).218.UI$."":..L....B(UT).UU%.UI$.G(F
(UI$).128):..R.........UI$."":....C.UF.1
:. +++ HELP ROUTINE EXIT +++...E..250...
H..245.5.M..UQ.UB.(U2%.256.U1%.U3%.2).Q.
R.UQ%(UQ.UB).B(UQ):.:.".".D.W.UZ.1:UV%.B
(UT).M.X..300...Y.UZ.0:US$.UJ$:UG$.UK$:U
P.UJ:UL.UK.I.Z..B(50003).0..53281,1:."."
;:.53281,6:.53280,14:.220.S....".";.....
UT$.UL$:.UT,UV%:.UQ.UB.(U2%.256.U1%.U3%.
3)......UQ,UQ%(UQ.UB):..#....U1,U1%./...
.U2,U2%.;....U4,U4%.I....U3,U3%.1.Q....3
5.....UD%.((U2%.256.U1%.U3%).UB).40:.H(U
D$,UD%.1):.......H(UD$,24);"            
          . HELP COMING .  ":......U1%.B
(U1):U2%.B(U2):U3%.B(U3):U4%.B(U4).....U
J$.US$:UJ.UL.....UJ$.US$:UK$.UG$:UJ.UP:U
K.UL.".....3.,.. ** MENU **.9.-.:.H...."
.":.UT,UU%:.B(50003).0..53281,9:.53280,8
.N./.:...1..".                MENU"...6.
." -------------------------------------
-"...;.."..       1.   ALGEBRAIC VECTORS
"...@.."..       2.   STUDENT INSTRUCTIO
NS".5.E.."..       3.   TEACHER INSTRUCT
IONS".Q.O.."..       4.   QUIT.."...T.."
 --------------------------------------"
...Y.."..       PRESS A NUMBER KEY (1-4)
 ";.S.^.UL.1:US$."1234":.35:. INPUT ROUT
INE...`.US$.""...C..E(UR$).1000,400,500,
396...H..300.+.... ** RE-ENABLE STOP KEY
 AND END **.Z....B(50003)..1.B(50003)..1
60.B(50003)..0.399......UU.71:.B(50003).
0..53281,6:.53280,14......"..":.......87
5:....... ** STUDENT INSTRUCTIONS **....
..".":.UT,UL%:.B(50003).0..53281,0:.5328
0,0.....UT$." ALGEBRAIC VECTORS".)...UP.
0:UG$."STUDENT INST":.850.Q...."..    TH
IS PROGRAM CONTAINS NINE"... ..".    EXE
RCISES DEALING WITH ALGEBRAIC":.".    VE
CTORS."......"...    YOU MAY CHOOSE NOT 
ONLY THE"......".    NUMBER OF QUESTIONS
 BUT ALSO THE"......".    SIZE OF THE NU
MBERS THAT YOU".0....".    WORK WITH.":.
835:.850.]...."....    YOU WILL NEED A C
ALCULATOR TO".|...."    DO THESE EXERCIS
ES."......"..    IF YOUR ANSWER IS A VEC
TOR,".K...."    PLEASE USE PARENTHESES A
ND"......"    COMMAS AS USUAL, FOR EXAMP
LE,":."    (3,-5,6)..+...."..    IMPORTA
NT:  DO NOT PUT IN".U...."    UNNECESSAR
Y SPACES OR COMMAS!!".C.B..835:.850...D.
."....    REMEMBER TO HIT <RETURN> AFTER
"...F.."   TYPING YOUR ANSWER. THIS TELL
S"...H.."   THE COMPUTER TO ACCEPT WHAT 
YOU"...J.."   HAVE TYPED..".%.L.."    TY
PE <H> AT ANY TIME TO RETURN".O.N.."   T
O THE MENU FOR HELP.  YOU WILL".Y.P.."  
 BE RETURNED TO THE PLACE IN THE"...R.."
   PROGRAM WHERE YOU LEFT OFF AS".L.T.."
   SOON AS THE OPTION FROM THE MENU"...V
.."   IS COMPLETE."......835.....UT$." A
LGEBRAIC VECTORS"......UZ.1..UP%:.217.#.
....D.... ** TEACHER INSTRUCTIONS **.T..
..".":.UT,UL%:.B(50003).0..53281,2:.5328
0,10.....UT$." ALGEBRAIC VECTORS":UP.0:U
G$."TEACHER INST.":.850......"..      TO
 THE BEST OF OUR KNOWLEDGE,."......"   T
HIS PROGRAM IS IN THE PUBLIC.".2...."   
DOMAIN.  IF THIS IS NOT THE CASE.".O....
"   PLEASE CONTACT:...".Y...."      COMM
ODORE BUSINESS MACHINES."......"        
  3370 PHARMACY AVE......."          AGI
NCOURT, ONTARIO"......"          CANADA 
  M1W 2K4"......"          (416) 499-429
2"...... 835:. 850:.;...."..    THIS PRO
GRAM CONTAINS NINE".Y....".    EXERCISES
 DEALING WITH ALGEBRAIC":.".    VECTORS.
"......"...    THE STUDENT NOT ONLY HAS 
CONTROL".S....".    OF THE NUMBER OF QUE
STIONS BUT"......".    ALSO THE SIZE OF 
THE NUMBERS".&....".    THAT HE WORKS WI
TH.":.835:.850.T....".....    AT THE END
 OF THE EXERCISE, A".....".    SUMMARY 
WILL BE DISPLAYED.  IT"......".    WILL 
SHOW THE SCORE AND ALSO THE"......".    
TIME TAKEN TO COMPLETE THE":.".    SECTI
ON."......835:.850.!...."...    THIS PRO
GRAM IS DESIGNED TO PRO-".L....".    VID
E BOTH PRACTICE AND REVIEW.".U....".    
A STUDENT USING THIS PROGRAM"......".   
 SHOULD ALREADY HAVE KNOWLEDGE".I....". 
   OF VECTORS.  FOR THIS REASON,"......"
.    THIS PROGRAM IS RECOMMENDED FOR".#.
 ..".    STUDENTS TAKING GRADE 13 ALGEBR
A.".1."..835:.850._.&.."     ..PROGRAM N
AME: ALGEBRAIC VECTORS"...'.."     WRITT
EN BY  : D. S. COOPER"...(.."     UPGRAD
ED BY : QUINCY LEE.U.).."     .THIS PROG
RAM WILL RUN ON ANY.....,.."         PET
 64 COMPUTER....-.."         COMMODORE 6
4 COMPUTER.#....835.@.K.UT$." ALGEBRAIC 
VECTORS".T.N..UZ.1..UP%:.217.Z.W.....X..
 ** PROGRAM MODIFICATION INST **...Y..".
":.UT,UL%...].UP.0:UG$."PROGRAM MOD":.85
0......835.N....UZ.1..UP%:.217.T........
.. ** TO USE 8032 LOAD CBM4032 **./.F.."
.....BEFORE RUNNING THIS PROGRAM ON AN 8
032  ...E.P.."      LOAD THE 'CBM 4032' 
PROGRAM.............".P.Z..UU.71.V......
. .. ** T I T L E   P A G E **.J.".."...
.";:.UT,UU%:.B(50003).0..53280,14:.53281
,6...$..I.1.38:."...";:....&..I.1.22:.".
....";:....(..I.1.37:.".....";:..(.*..I.
1.22:.".....";:..M.,..".................
..........  ..O...."................... 
.  . .....0.."................... .  ...
...2.."....................  ..V.4.."...
...........C O M M O D O R E.....6.."...
............EDUCATIONAL.....8.."........
........SOFTWARE.3.:.. ** COMMODORE LOGO
 **.K.;..H(UD$,24);"..........PRESS SPAC
E BAR OR WAIT.":I.0...<..A$:.A$.." ".I.I
.1:.I.250.828...>.T1$."":T2$."":T3$."":T
4$."":I.0...@..300.V.C.. ** SPACE BAR PR
ESS **...H..H(UD$,24);".......PRESS SPAC
E BAR TO CONTINUE.".".L..UI$:.UI$.." ".8
44.(.N...H.R.. ** PAGE DESIGN ROUTINE **
.T.T.UP.UP.1.~.W.."."H(UT$.UP$,21);I(UP$
.UG$.D(UP),18)...\.." ------------------
--------------------"...A..H(UD$,24);H(U
P$,6);"HELP - PRESS   H <RETURN>"...F.."
..":... K.. ** PLEASE WAIT REMARK **.B P
..H(UD$,24);"           ONE MOMENT PLEAS
E...     ".H U...E ... ** SET UP VARIABL
ES **.. ..UX$."H":.UQ%(1000):UB.32768:U1
.196:U2.197:U3.198:U4.216:UC.167:UU.1024
.. ..UT.59468:UU%.12:UL%.14:UP%.1146:UM.
32768:. 50003,0.*!...B(50003).0.UB.1024:
U1.209:U2.210:U3.211:U4.214:UC.204:UU.20
48.B!...B(50003).0.UT.53272:UU%.21:UL%.2
3:UP%.2139:UM.1024..!..UD$."............
............."..!..UP$."                
                       ".U!..UT$." ALGEB
RAIC VECTORS"..!.....!... ** SET VARIABL
ES **..!...900.."... ** CHECK FOR 8032 *
*.7"...".":." ":. SHIFTED SPACE.N"...B(U
B.40)..96..700.G"... ** MEMORY CHECK **.
{"... .(0).2000.937.."..."....THIS MACHI
NE DOES NOT HAVE ENOUGH.".M"..."MEMORY T
O RUN THIS PROGRAM !".X"...UU.71..".....
"..."..":.B(50003).0.962.'#... ** BASIC 
2.0  OR  4.0  OR  C-64 SETUP **.E#...107
5,133:.1076,144:.1077,234:.1079,4:.1080,
133:.1081,145..#...1091,155:.1098,133:.1
099,144:.1100,234:.1103,133..#...1104,14
5:.1105,234:.1082,234.T#...B(50003)..160
.955..$...1093,88:.1094,228:.1097,85:.11
02,228:.965..$...B(50003)..1.990.G$...10
93,49:.1094,230:.1097,46:.1102,230:.965.
.$B..2099,141:.2100,20:.2101,3:.2103,8:.
2104,141:.2105,21..$C..2106,3:.2115,145:
.2117,52:.2118,234:.2121,49:.2122,141..$
D..2123,20:.2124,3:.2126,234:.2127,141:.
2128,21:.2129,3..%E..UU.48:. DISABLE STO
P KEY.&%J..800:. TITLE.6%T..300:. MENU.G
%...".THE PGM WILL NOT WORK ON THIS MACH
INE!":...%...UZ.1..UP%:.UP%:UZ.0:. ** PR
OGRAM STARTS HERE **.H%..."..";:.:.B(500
03).0..53281,6:.53280,14..%...UT,UL%:..1
4)".......EXERCISES ON".&&....12)"..ALGE
BRAIC VECTORS":..13)"..BY D. S. COOPER.6
&...I.1.1000:..U&....R(X)..X..((2.X.1)..
(TI)).M&...1760:.FL$."QUIT"....&..QN.QN.
1:.QN.NQ.1100..&$..1950..&... 835:.875..
&B..1050.O&L..850:..12)"....... S U M M 
A R Y "..&V.."...      YOUR SCORE IS"NC"
OUT OF"NQ.*'`.."      ("J(D(.(NC.10000.N
Q..5).100),2)"%).".]'J..".      YOU TOOK
";:TM..(TT.3600):.TM;"MIN.,";..'T.A..((T
T.TM.3600).6..5).10:.A;"SEC.,"..'~.."   
   OR";.(TT.6.NQ..5).10;"SECONDS PER QUE
STION..".J'... 835.T'...1040..'..AN$."":
.I.1.9:.A$:.:L3$."..":L5$." ."..(...A$:.
 A$.."" . 1270.&(...L3$;:AT.TI.9(D..TI.A
T.10.1220.N(N..A$:.A$.."".1270.^(X..L5$;
:AT.TI.Q(...TI.AT.10.1250.{(...1200..(..
.F(A$).13.AN$."".1200..(...L2.1290,1310,
1300.J(...F(A$).13.C(AN$)..LN.1200..(...
F(A$).13.(C(AN$).LN.C(AN$).0).1200..)...
F(A$).13.." ":LN.1:L2.1:L8.1:..0)(..F(A$
).20.AN$."".1200.])2..F(A$).20..A$;:AN$.
H(AN$,C(AN$).1):.1200..)<.L9.1:.L8.2.F(A
$).64.F(A$).91..A$;:AN$.AN$.A$:.1200..)F
..J(L$,L9,1).A$..A$;:AN$.AN$.A$:.1200.Y)
P.L9.L9.1:.L9..C(L$).1350..)Z..1200..*D.
."(Y OR N) ";:L$."YN":UL.1:US$."YN":.35:
AN$.UR$ :..W*N.A.X:.1410:V$."(".A$.",":A
.Y:.1410:V$.V$.A$.",":A.Z:.1410.J*X.V$.V
$.A$.")":..}*..A$.D(A):.A.0....*..A$.J(A
$,2):...*..X..R(HN):Y..R(HN):Z..R(HN):.1
390..* ..1430:Q$.V$:C1.X:C2.Y:C3.Z:.1430
:X1.X:X2.Y:X3.Z:...+..UG$."CROSS PRODUCT
":.1440:Q$.Q$."V".V$.Q+..X.C2.X3.C3.X2:Y
.C3.X1.C1.X3:Z.C1.X2.C2.X1:.1390:RA$.V$:
..Z+..UG$."DOT PRODUCT":.1440:Q$.Q$."Q".
V$..+H.A.C1.X1.C2.X2.C3.X3:.1410:RA$.A$:
...+R..1440:Q$.Q$."+".V$:X.C1.X1:Y.C2.X2
:Z.C3.X3:.1390:RA$.V$..+W.UG$."ADDITION"
:...,...1440:Q$.Q$."-".V$:X.C1.X1:Y.C2.X
2:Z.C3.X3:.1390:RA$.V$.F,..UG$."SUBTRACT
ION":...,...1440:A.X:.1410:Q$.A$.Q$:X.C1
.A:Y.C2.A:Z.C3.A:.1390:RA$.V$..,..UG$."S
CALAR MULT.":...,..X..(.R(5)):.X.0.1530.
W,...X.1550,1570,1590,1610,1630..-...145
0:Q$."V(".Q$.")":X1.X:X2.Y:X3.Z:.1430:Q$
.V$.Q$.--..C1.X:C2.Y:C3.Z:.1460:.1635.D-
"..1450:Q$."(".Q$.")V":C1.X:C2.Y:C3.Z:.1
430:Q$.Q$.V$..-,.X1.X:X2.Y:X3.Z:.1460:.1
635..-6..1450:X1.X:X2.Y:X3.Z:.1430:Q$.V$
."Q".Q$.N-@.C1.X:C2.Y:C3.Z:.1480:.1635..
-J..1450:X1.X:X2.Y:X3.Z:.1430:Q$.Q$."Q".
V$...T..1600.@.^..1470:K.A:.1430:Q$.Q$.V
$:X.X.K:Y.Y.K:Z.Z.K:.1390:RA$.V$.\.C.UG$
."TRIPLE PRODUCTS":....H..1440:A$."FIND 
THE DISTANCE BETWEEN THE POINTS.":Q1$.Q$
." AND ".V$...R.Q$.A$:A$."":A..((X.C1).2
.(Y.C2).2.(Z.C3).2):.1410:RA$.A$...W.UG$
."DISTANCE":..:/|..1440:A$."FIND THE ANG
LE BETWEEN THE VECTORS.":Q1$.Q$." AND ".
V$.P/...X.0.Y.0.Z.0.1660.I/...C1.0.C2.0.
C3.0.1660../..Q$.A$:A.(X.C1.Y.C2.Z.C3)..
((X.X.Y.Y.Z.Z).(C1.2.C2.2.C3.2))../...A.
0..1660../..A.A(.(A)..(1.(A.A).1)).180..
:A..(A..5):.A.0 .A.180.A..0..RA$.D(A):UG
$."ANGLE":..$0..UG$."AREA OF TRIANG".A0.
.Q$."FIND THE AREA OF TRIANGLE ABC, GIVE
N.":Q1$."A":.1430..0..Q1$.Q1$.V$.", B":C
1.X:C2.Y:C3.Z:.1430:Q1$.Q1$.V$.", C":X1.
X:X2.Y:X3.Z..0...1430:Q1$.Q1$.V$:C1.C1.X
:C2.C2.Y:C3.C3.Z:X1.X1.X:X2.X2.Y:X3.X3.Z
..1B..1460:A..((X.X.Y.Y.Z.Z).4):.1410:RA
$.A$:..'1L..850.A1N..CH.7..".   SIMPLIFY
:..":."..."Q$:."....= ";:L$.L6$:...1V.."
.   "Q$:."   "Q1$:."..   ANSWER: ";:L$.L
4$."-.":...1... ** DO AN EXERCISE **..1.
.LN.1:L2.1:L8.1:L4$."1234567890":L6$.L4$
."(),-"..2..."..":.UT,UL%:..12)"ALGEBRAI
C VECTORS".C2...". ---------------------
-----------------.".^2..UG$."AREA OF TRI
ANGLE".Z2..."     1. DOT PRODUCTS"..2...
"     2. CROSS PRODUCTS".G2..."     3. A
DDITION":."     4. SUBTRACTION"..2..."  
   5. SCALAR MULTIPLICATION"..3..."     
6. TRIPLE PRODUCTS".63..."     7. DISTAN
CE BETWEEN TWO POINTS"._3..."     8. ANG
LE BETWEEN TWO VECTORS"..3..."     9. AR
EA OF A TRIANGLE"..3...""..3 ..". ------
--------------------------------."..3"..
"  CHOOSE AN EXERCISE OR ENTER .Q.UIT.  
";.$4&.L2.2:L$."123456789":UL.1:US$."123
456789Q":.35:AN$.UR$.E4(.FL$."":.UR$."Q"
.FL$."QUIT":..R4+.UP.0:UG$."INFORMATION"
:.".":.UT,UU%:.850..40.CH$.AN$:CH%.0:.I.
1.C(AN$):CH%.CH%.2.E(J(AN$,I,1)):.:."...
.".X45..".    HOW MANY QUESTIONS?   ..";
..4:.UL.2 :US$."H0123456789":.35..5<.. E
(UR$).0 . 1845..5?.NQ.E(UR$).J5D.."...  
  WHAT IS THE LARGEST CO-ORDINATE".S5E..
"    THAT YOU WANT TO WORK WITH? ";..5F.
UL.2:US$."H0123456789":.35:AN$.UR$:.".".
.5I.HN.E(AN$).B5N...(CH%.2.8).1880..5O..
"..    N.B.  PLEASE GIVE ANGLES TO THE".
.6P.."    NEAREST DEGREE AND NO DEGREE".
@6Q.."    SIGN IS NECESSARY.":.835:.1920
.V6X..(CH%.2.7).0.1900.6B.."..    N.B. 
 PLEASE GIVE DISTANCES"..6C.."    CORREC
T TO 4 DECIMAL PLACES.":.835:.1920.H6L..
(CH%.2.9).0.1920..6V.."..    N.B.  PLEAS
E GIVE AREAS CORRECT"..7W.."    TO FOUR 
DECIMAL PLACES.":.835.&7...875.;7..NC.0:
TT.0:QN.0:..^7..CH..(.R(9)):.(2.CH.CH%).
0.1950..7...CH.1470,1450,1490,1500,1510,
1530,1640,1660,1700..7...1740:L2.2..7F.T
M.TI:UL.10:US$.".H(),0123456789-":.35:AN
$.UR$:TM.TI.TM :TT.TT.TM..8Z..".........
...";:.CH.6.2040.08...AN$.RA$...17)"...R
IGHT!":NC.NC.1:..E8...".   WRONG!":.".  
 THE CORRECT ANSWER IS "RA$:...8..AN$.D(
E(AN$)):RA$.D(.((E(RA$)..00005).10000).1
0000).G8....(E(AN$).E(RA$))..0001.AN$.RA
$:.2020.Q8...2030.Y8.'A.0..9.'A.A(.(A)..
(1.(A.A).1)).180..:A..(A..5):.A.0 .A.180
.A..9T'....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL