B.T.C. DIVIDE.C3
FILE INFORMATION
FILENAME(S): B.T.C. DIVIDE.C3
FILE TYPE(S): PRG
FILE SIZE: 10.2K
FIRST SEEN: 2025-11-30 01:08:42
APPEARS ON: 2 disk(s)
FILE HASH
be49d357b775e455a7e3edb3960cae6b6a61ad77fc31ab1acb128834c5e586fd
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FREESOFT DISK NR | B.T.C. DIVIDE.C3 | PRG | Treasure Chest - Wolfgang Rauprich | 16 | 6 | DOWNLOAD FILE |
| L EHRNEN | B.T.C. DIVIDE.C3 | PRG | Treasure Chest - Wolfgang Rauprich | 16 | 6 | 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 8D 14 03 A9 08 8D 15 03 58 60 20 EA |"x.=........X` .|
00000040: FF A9 FF 85 91 4C 34 EA 78 A9 31 8D 14 03 A9 EA |.....L4.x.1.....|
00000050: 8D 15 03 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 08 09 28 00 97 55 4F 2C 30 3A 55 52 24 B2 22 |...(..UO,0:UR$."|
00000100: 22 3A 55 49 24 B2 22 22 00 18 09 2A 00 8B 55 4C |":UI$.""...*..UL|
00000110: B2 30 A7 55 4C B2 38 30 00 2B 09 2D 00 99 22 20 |.0.UL.80.+.-.." |
00000120: 20 9D 9D 22 3B 3A 97 55 43 2C 30 00 3F 09 32 00 | ..";:.UC,0.?.2.|
00000130: A1 55 49 24 3A 8B 55 49 24 B2 22 22 A7 35 30 00 |.UI$:.UI$."".50.|
00000140: 69 09 37 00 8B 55 49 24 B2 C7 28 31 33 29 AF C3 |i.7..UI$..(13)..|
00000150: 28 55 52 24 29 B1 B2 31 A7 97 55 43 2C 31 3A 99 |(UR$)..1..UC,1:.|
00000160: 22 20 9D 22 3B 3A 89 38 35 00 7C 09 3C 00 8B 55 |" .";:.85.|.<..U|
00000170: 49 24 B2 C7 28 32 30 29 A7 31 30 35 00 90 09 3E |I$..(20).105...>|
00000180: 00 8B 20 C3 28 55 52 24 29 B2 B1 55 4C A7 35 30 |.. .(UR$)..UL.50|
00000190: 00 B5 09 41 00 8D 31 32 30 3A 8F 20 43 48 45 43 |...A..120:. CHEC|
000001A0: 4B 20 46 4F 52 20 56 41 4C 49 44 20 43 48 41 52 |K FOR VALID CHAR|
000001B0: 41 43 54 45 52 00 C5 09 46 00 55 52 24 B2 55 52 |ACTER...F.UR$.UR|
000001C0: 24 AA 55 49 24 00 CF 09 4B 00 99 55 49 24 3B 00 |$.UI$...K..UI$;.|
000001D0: D7 09 50 00 89 35 30 00 FC 09 55 00 8F 20 2B 2B |..P..50...U.. ++|
000001E0: 2B 20 43 48 45 43 4B 20 46 4F 52 20 48 45 4C 50 |+ CHECK FOR HELP|
000001F0: 20 52 45 51 55 45 53 54 20 2B 2B 2B 00 24 0A 5A | REQUEST +++.$.Z|
00000200: 00 8B 55 52 24 B2 55 58 24 A7 31 39 35 3A 8F 20 |..UR$.UX$.195:. |
00000210: 45 58 49 54 20 54 4F 20 48 45 4C 50 20 52 4F 55 |EXIT TO HELP ROU|
00000220: 54 49 4E 45 00 33 0A 5F 00 8B 55 46 B2 31 A7 8D |TINE.3._..UF.1..|
00000230: 32 34 30 00 40 0A 64 00 55 46 B2 30 3A 99 3A 8E |240.@.d.UF.0:.:.|
00000240: 00 59 0A 66 00 8F 20 2B 2B 20 43 48 45 43 4B 20 |.Y.f.. ++ CHECK |
00000250: 44 45 4C 45 54 45 20 2B 2B 00 6A 0A 69 00 8B C3 |DELETE ++.j.i...|
00000260: 28 55 52 24 29 B3 31 A7 35 30 00 82 0A 6E 00 55 |(UR$).1.50...n.U|
00000270: 52 24 B2 C8 28 55 52 24 2C C3 28 55 52 24 29 AB |R$..(UR$,.(UR$).|
00000280: 31 29 00 94 0A 73 00 99 22 9D 20 20 9D 9D 22 3B |1)...s..". ..";|
00000290: 3A 89 35 30 00 BB 0A 78 00 8F 20 2B 2B 20 43 48 |:.50...x.. ++ CH|
000002A0: 45 43 4B 20 46 4F 52 20 56 41 4C 49 44 20 43 48 |ECK FOR VALID CH|
000002B0: 41 52 41 43 54 45 52 53 20 2B 2B 00 CD 0A 7D 00 |ARACTERS ++...}.|
000002C0: 8B C3 28 55 53 24 29 B2 30 A7 31 35 30 00 DE 0A |..(US$).0.150...|
000002D0: 82 00 81 55 53 B2 31 A4 C3 28 55 53 24 29 00 F5 |...US.1..(US$)..|
000002E0: 0A 87 00 8B 55 49 24 B2 CA 28 55 53 24 2C 55 53 |....UI$..(US$,US|
000002F0: 2C 31 29 A7 8E 00 FB 0A 8C 00 82 00 08 0B 91 00 |,1).............|
00000300: 55 49 24 B2 22 22 3A 8E 00 23 0B 96 00 8F 20 2A |UI$."":..#.... *|
00000310: 2A 20 53 54 41 4E 44 41 52 44 20 49 4E 50 55 54 |* STANDARD INPUT|
00000320: 20 2A 2A 00 34 0B 98 00 8B C6 28 55 49 24 29 B2 | **.4.....(UI$).|
00000330: 34 36 A7 8E 00 45 0B 9B 00 8B 55 49 24 B2 C7 28 |46...E....UI$..(|
00000340: 33 32 29 A7 8E 00 62 0B A0 00 8B C6 28 55 49 24 |32)...b.....(UI$|
00000350: 29 B3 34 38 B0 C6 28 55 49 24 29 B1 35 37 A7 31 |).48..(UI$).57.1|
00000360: 37 30 00 68 0B A5 00 8E 00 85 0B AA 00 8B C6 28 |70.h...........(|
00000370: 55 49 24 29 B3 36 35 B0 C6 28 55 49 24 29 B1 39 |UI$).65..(UI$).9|
00000380: 30 A7 31 38 30 00 8B 0B AF 00 8E 00 AF 0B B4 00 |0.180...........|
00000390: 8B C6 28 55 49 24 29 B3 31 39 33 B0 C6 28 55 49 |..(UI$).193..(UI|
000003A0: 24 29 B1 32 31 38 A7 55 49 24 B2 22 22 3A 8E 00 |$).218.UI$."":..|
000003B0: D2 0B B9 00 8B C2 28 55 54 29 B2 55 55 25 A7 55 |......(UT).UU%.U|
000003C0: 49 24 B2 C7 28 C6 28 55 49 24 29 AB 31 32 38 29 |I$..(.(UI$).128)|
000003D0: 3A 8E 00 D8 0B BB 00 8E 00 E5 0B BE 00 55 49 24 |:............UI$|
000003E0: B2 22 22 3A 8E 00 0A 0C C3 00 55 46 B2 31 3A 8F |."":......UF.1:.|
000003F0: 20 2B 2B 2B 20 48 45 4C 50 20 52 4F 55 54 49 4E | +++ HELP ROUTIN|
00000400: 45 20 45 58 49 54 20 2B 2B 2B 00 13 0C C5 00 8D |E EXIT +++......|
00000410: 32 35 30 00 1C 0C C8 00 8D 32 34 35 00 3B 0C CD |250......245.;..|
00000420: 00 81 55 51 B2 55 42 A4 28 55 32 25 AC 32 35 36 |..UQ.UB.(U2%.256|
00000430: AA 55 31 25 AA 55 33 25 AB 32 29 00 57 0C D2 00 |.U1%.U3%.2).W...|
00000440: 55 51 25 28 55 51 AB 55 42 29 B2 C2 28 55 51 29 |UQ%(UQ.UB)..(UQ)|
00000450: 3A 82 3A 99 22 93 22 00 6A 0C D7 00 55 5A B2 31 |:.:.".".j...UZ.1|
00000460: 3A 55 56 25 B2 C2 28 55 54 29 00 73 0C D8 00 89 |:UV%..(UT).s....|
00000470: 33 30 30 00 98 0C D9 00 55 5A B2 30 3A 55 53 24 |300.....UZ.0:US$|
00000480: B2 55 4A 24 3A 55 47 24 B2 55 4B 24 3A 55 50 B2 |.UJ$:UG$.UK$:UP.|
00000490: 55 4A 3A 55 4C B2 55 4B 00 CF 0C DA 00 8B C2 28 |UJ:UL.UK.......(|
000004A0: 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C |50003).0..53281,|
000004B0: 31 3A 99 22 93 22 3B 3A 97 35 33 32 38 31 2C 36 |1:.".";:.53281,6|
000004C0: 3A 97 35 33 32 38 30 2C 31 34 3A 89 32 32 30 00 |:.53280,14:.220.|
000004D0: D9 0C DB 00 99 22 93 22 3B 00 08 0D DC 00 55 54 |.....".";.....UT|
000004E0: 24 B2 55 4C 24 3A 97 55 54 2C 55 56 25 3A 81 55 |$.UL$:.UT,UV%:.U|
000004F0: 51 B2 55 42 A4 28 55 32 25 AC 32 35 36 AA 55 31 |Q.UB.(U2%.256.U1|
00000500: 25 AA 55 33 25 AB 33 29 00 2A 0D E1 00 97 55 51 |%.U3%.3).*....UQ|
00000510: 2C 55 51 25 28 55 51 AB 55 42 29 3A 82 3A 8B 46 |,UQ%(UQ.UB):.:.F|
00000520: 4C B2 31 A7 46 4C B2 30 3A 8E 00 36 0D E6 00 97 |L.1.FL.0:..6....|
00000530: 55 31 2C 55 31 25 00 42 0D E8 00 97 55 32 2C 55 |U1,U1%.B....U2,U|
00000540: 32 25 00 4E 0D E9 00 97 55 34 2C 55 34 25 00 5C |2%.N....U4,U4%.\|
00000550: 0D EA 00 97 55 33 2C 55 33 25 AB 31 00 64 0D EB |....U3,U3%.1.d..|
00000560: 00 89 33 35 00 96 0D F0 00 55 44 25 B2 28 28 55 |..35.....UD%.((U|
00000570: 32 25 AC 32 35 36 AA 55 31 25 AA 55 33 25 29 AB |2%.256.U1%.U3%).|
00000580: 55 42 29 AD 34 30 3A 99 C8 28 55 44 24 2C 55 44 |UB).40:..(UD$,UD|
00000590: 25 AA 31 29 3A 8E 00 D1 0D F5 00 99 C8 28 55 44 |%.1):........(UD|
000005A0: 24 2C 32 34 29 3B 22 20 20 20 20 20 20 20 20 20 |$,24);" |
000005B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 12 20 48 | . H|
000005C0: 45 4C 50 20 43 4F 4D 49 4E 47 20 92 20 20 22 3A |ELP COMING . ":|
000005D0: 8E 00 FD 0D FA 00 55 31 25 B2 C2 28 55 31 29 3A |......U1%..(U1):|
000005E0: 55 32 25 B2 C2 28 55 32 29 3A 55 33 25 B2 C2 28 |U2%..(U2):U3%..(|
000005F0: 55 33 29 3A 55 34 25 B2 C2 28 55 34 29 00 25 0E |U3):U4%..(U4).%.|
00000600: FB 00 55 4A 24 B2 55 53 24 3A 55 4B 24 B2 55 47 |..UJ$.US$:UK$.UG|
00000610: 24 3A 55 4C 24 B2 55 54 24 3A 55 4A B2 55 50 3A |$:UL$.UT$:UJ.UP:|
00000620: 55 4B B2 55 4C 00 2B 0E FF 00 8E 00 3C 0E 2C 01 |UK.UL.+.....<.,.|
00000630: 8F 20 2A 2A 20 4D 45 4E 55 20 2A 2A 00 42 0E 2D |. ** MENU **.B.-|
00000640: 01 3A 00 71 0E 2E 01 99 22 93 22 3A 97 55 54 2C |.:.q....".":.UT,|
00000650: 55 55 25 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 |UU%:..(50003).0.|
00000660: 97 35 33 32 38 31 2C 39 3A 97 35 33 32 38 30 2C |.53281,9:.53280,|
00000670: 38 00 77 0E 2F 01 3A 00 94 0E 31 01 99 22 13 20 |8.w./.:...1..". |
00000680: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4D | M|
00000690: 45 4E 55 22 00 C3 0E 36 01 99 22 20 2D 2D 2D 2D |ENU"...6.." ----|
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 2D 2D 2D 2D 2D 2D 2D |----------------|
000006C0: 2D 2D 22 00 EC 0E 3B 01 99 22 11 11 20 20 20 20 |--"...;..".. |
000006D0: 20 20 20 31 2E 20 20 20 42 45 47 49 4E 20 42 2E | 1. BEGIN B.|
000006E0: 54 2E 43 2E 20 44 49 56 49 44 45 22 00 16 0F 40 |T.C. DIVIDE"...@|
000006F0: 01 99 22 11 11 20 20 20 20 20 20 20 32 2E 20 20 |..".. 2. |
00000700: 20 53 54 55 44 45 4E 54 20 49 4E 53 54 52 55 43 | STUDENT INSTRUC|
00000710: 54 49 4F 4E 53 22 00 40 0F 45 01 99 22 11 11 20 |TIONS".@.E..".. |
00000720: 20 20 20 20 20 20 33 2E 20 20 20 54 45 41 43 48 | 3. TEACH|
00000730: 45 52 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 22 |ER INSTRUCTIONS"|
00000740: 00 6D 0F 4A 01 99 22 11 11 20 20 20 20 20 20 20 |.m.J..".. |
00000750: 34 2E 20 20 20 4D 4F 44 49 46 49 43 41 54 49 4F |4. MODIFICATIO|
00000760: 4E 20 4F 46 20 50 52 4F 47 52 41 4D 22 00 89 0F |N OF PROGRAM"...|
00000770: 4F 01 99 22 11 11 20 20 20 20 20 20 20 35 2E 20 |O..".. 5. |
00000780: 20 20 51 55 49 54 11 11 22 00 B8 0F 54 01 99 22 | QUIT.."...T.."|
00000790: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | ---------------|
000007A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000007B0: 2D 2D 2D 2D 2D 2D 2D 22 00 E3 0F 59 01 99 22 11 |-------"...Y..".|
000007C0: 11 20 20 20 20 20 20 20 50 52 45 53 53 20 41 20 |. PRESS A |
000007D0: 4E 55 4D 42 45 52 20 4B 45 59 20 28 31 2D 35 29 |NUMBER KEY (1-5)|
000007E0: 20 22 3B 00 0C 10 5E 01 55 4C B2 31 3A 55 53 24 | ";...^.UL.1:US$|
000007F0: B2 22 31 32 33 34 35 22 3A 8D 33 35 3A 8F 20 49 |."12345":.35:. I|
00000800: 4E 50 55 54 20 52 4F 55 54 49 4E 45 00 17 10 60 |NPUT ROUTINE...`|
00000810: 01 55 53 24 B2 22 22 00 38 10 63 01 91 C5 28 55 |.US$."".8.c...(U|
00000820: 52 24 29 8D 31 30 30 30 2C 34 30 30 2C 35 30 30 |R$).1000,400,500|
00000830: 2C 36 30 30 2C 33 39 36 00 41 10 68 01 89 33 30 |,600,396.A.h..30|
00000840: 30 00 68 10 8B 01 8F 20 2A 2A 20 52 45 2D 45 4E |0.h.... ** RE-EN|
00000850: 41 42 4C 45 20 53 54 4F 50 20 4B 45 59 20 41 4E |ABLE STOP KEY AN|
00000860: 44 20 45 4E 44 20 2A 2A 00 97 10 8C 01 8B C2 28 |D END **.......(|
00000870: 35 30 30 30 33 29 B3 B1 31 AF C2 28 35 30 30 30 |50003)..1..(5000|
00000880: 33 29 B3 B1 31 36 30 AF C2 28 35 30 30 30 33 29 |3)..160..(50003)|
00000890: B3 B1 30 A7 33 39 39 00 C1 10 8D 01 9E 55 55 AA |..0.399......UU.|
000008A0: 37 31 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 |71:..(50003).0..|
000008B0: 35 33 32 38 31 2C 36 3A 97 35 33 32 38 30 2C 31 |53281,6:.53280,1|
000008C0: 34 00 CD 10 8E 01 99 22 9A 93 22 3A 80 00 D8 10 |4......"..":....|
000008D0: 8F 01 8D 38 37 35 3A 8E 00 F9 10 90 01 8F 20 2A |...875:....... *|
000008E0: 2A 20 53 54 55 44 45 4E 54 20 49 4E 53 54 52 55 |* STUDENT INSTRU|
000008F0: 43 54 49 4F 4E 53 20 2A 2A 00 28 11 95 01 99 22 |CTIONS **.(...."|
00000900: 93 22 3A 97 55 54 2C 55 4C 25 3A 8B C2 28 35 30 |.":.UT,UL%:..(50|
00000910: 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C 30 3A |003).0..53281,0:|
00000920: 97 35 33 32 38 30 2C 30 00 4E 11 9A 01 55 48 B2 |.53280,0.N...UH.|
00000930: 31 3A 55 50 B2 30 3A 55 47 24 B2 22 D3 54 55 44 |1:UP.0:UG$.".TUD|
00000940: 45 4E 54 20 C9 4E 53 54 22 3A 8D 38 35 30 00 7F |ENT .NST":.850..|
00000950: 11 9B 01 99 22 11 11 11 20 20 D4 48 49 53 20 50 |...."... .HIS P|
00000960: 52 4F 47 52 41 4D 20 57 49 4C 4C 20 54 45 53 54 |ROGRAM WILL TEST|
00000970: 20 59 4F 55 52 20 41 44 44 49 54 49 4F 4E 22 00 | YOUR ADDITION".|
00000980: AE 11 9C 01 99 22 11 20 53 4B 49 4C 4C 53 2E 20 |.....". SKILLS. |
00000990: D9 4F 55 27 4C 4C 20 42 45 20 47 49 56 45 4E 20 |.OU'LL BE GIVEN |
000009A0: 33 30 20 51 55 45 53 54 49 4F 4E 53 2E 22 00 DB |30 QUESTIONS."..|
000009B0: 11 A9 01 99 22 11 20 D2 49 47 48 54 20 41 4E 53 |....". .IGHT ANS|
000009C0: 57 45 52 53 20 53 43 4F 52 45 20 50 4F 49 4E 54 |WERS SCORE POINT|
000009D0: 53 20 46 4F 52 20 59 4F 55 2C 22 00 0B 12 AA 01 |S FOR YOU,".....|
000009E0: 99 22 11 20 42 55 54 20 57 52 4F 4E 47 20 41 4E |.". BUT WRONG AN|
000009F0: 53 57 45 52 53 20 53 43 4F 52 45 20 50 4F 49 4E |SWERS SCORE POIN|
00000A00: 54 53 20 46 4F 52 20 4D 45 2E 22 00 39 12 AE 01 |TS FOR ME.".9...|
00000A10: 99 22 11 20 C9 46 20 59 4F 55 20 54 41 4B 45 20 |.". .F YOU TAKE |
00000A20: 4C 4F 4E 47 45 52 20 54 48 41 4E 20 54 48 45 20 |LONGER THAN THE |
00000A30: 54 49 4D 45 20 59 4F 55 22 00 66 12 AF 01 99 22 |TIME YOU".f...."|
00000A40: 11 20 43 48 4F 4F 53 45 20 41 54 20 54 48 45 20 |. CHOOSE AT THE |
00000A50: 53 54 41 52 54 20 4F 46 20 54 48 45 20 50 52 4F |START OF THE PRO|
00000A60: 47 52 41 4D 2C 22 00 89 12 B0 01 99 22 11 20 54 |GRAM,"......". T|
00000A70: 48 45 4E 20 49 54 27 53 20 41 20 50 4F 49 4E 54 |HEN IT'S A POINT|
00000A80: 20 46 4F 52 20 4D 45 2E 22 00 9D 12 B1 01 8D 20 | FOR ME."...... |
00000A90: 38 33 35 3A 55 48 B2 31 3A 8D 38 35 30 00 CF 12 |835:UH.1:.850...|
00000AA0: B2 01 99 22 11 11 11 11 20 D4 48 45 20 51 55 45 |...".... .HE QUE|
00000AB0: 53 54 49 4F 4E 53 20 41 52 45 20 44 49 56 49 44 |STIONS ARE DIVID|
00000AC0: 45 44 20 49 4E 54 4F 20 54 57 4F 20 31 35 22 00 |ED INTO TWO 15".|
00000AD0: FB 12 B3 01 99 22 11 20 51 55 45 53 54 49 4F 4E |.....". QUESTION|
00000AE0: 20 52 4F 55 4E 44 53 2E 20 D2 4F 55 4E 44 20 32 | ROUNDS. .OUND 2|
00000AF0: 20 49 53 20 48 41 52 44 45 52 22 00 27 13 B4 01 | IS HARDER".'...|
00000B00: 99 22 11 20 42 55 54 20 45 41 43 48 20 51 55 45 |.". BUT EACH QUE|
00000B10: 53 54 49 4F 4E 20 53 43 4F 52 45 53 20 32 20 50 |STION SCORES 2 P|
00000B20: 4F 49 4E 54 53 21 22 00 56 13 B8 01 99 22 11 11 |OINTS!".V...."..|
00000B30: 20 D2 45 4D 45 4D 42 45 52 20 54 4F 20 50 52 45 | .EMEMBER TO PRE|
00000B40: 53 53 20 12 52 45 54 55 52 4E 92 20 41 46 54 45 |SS .RETURN. AFTE|
00000B50: 52 20 45 41 43 48 00 86 13 B9 01 99 22 11 20 41 |R EACH......". A|
00000B60: 4E 53 57 45 52 2E 20 20 C7 CF CF C4 20 CC D5 C3 |NSWER. .... ...|
00000B70: CB 2D 2D 2D 28 41 4E 44 20 54 48 49 4E 4B 20 46 |.---(AND THINK F|
00000B80: 41 53 54 21 29 22 00 90 13 BA 01 8D 20 38 33 35 |AST!)"...... 835|
00000B90: 00 9A 13 E0 01 8D 20 38 35 30 00 C5 13 E1 01 99 |...... 850......|
00000BA0: 22 11 11 20 20 20 20 20 D4 4F 20 41 44 56 41 4E |".. .O ADVAN|
00000BB0: 43 45 20 46 52 4F 4D 20 4F 4E 45 20 51 55 45 53 |CE FROM ONE QUES|
00000BC0: 54 49 4F 4E 22 00 EE 13 E2 01 99 22 11 20 54 4F |TION"......". TO|
00000BD0: 20 54 48 45 20 4E 45 58 54 20 50 52 45 53 53 20 | THE NEXT PRESS |
00000BE0: 54 48 45 20 D3 D0 C1 C3 C5 20 42 41 52 22 00 1E |THE ..... BAR"..|
00000BF0: 14 E3 01 99 22 11 11 1D 1D 1D 1D 1D C9 46 20 41 |...."........F A|
00000C00: 54 20 41 4E 59 20 54 49 4D 45 20 59 4F 55 20 57 |T ANY TIME YOU W|
00000C10: 49 53 48 20 54 4F 20 52 45 54 55 52 4E 22 00 4C |ISH TO RETURN".L|
00000C20: 14 E4 01 99 22 11 20 54 4F 20 54 48 45 20 CD C5 |....". TO THE ..|
00000C30: CE D5 20 50 52 45 53 53 20 48 20 3C 52 45 54 55 |.. PRESS H <RETU|
00000C40: 52 4E 3E 20 4F 52 20 4A 55 53 54 22 00 69 14 E5 |RN> OR JUST".i..|
00000C50: 01 99 22 11 20 48 20 44 55 52 49 4E 47 20 54 48 |..". H DURING TH|
00000C60: 45 20 44 52 49 4C 4C 2E 22 00 72 14 E9 01 8D 38 |E DRILL.".r....8|
00000C70: 33 35 00 86 14 EA 01 8B 55 5A B2 31 A7 9E 55 50 |35......UZ.1..UP|
00000C80: 25 3A 89 32 31 37 00 8C 14 F3 01 8E 00 AD 14 F4 |%:.217..........|
00000C90: 01 8F 20 2A 2A 20 54 45 41 43 48 45 52 20 49 4E |.. ** TEACHER IN|
00000CA0: 53 54 52 55 43 54 49 4F 4E 53 20 2A 2A 00 DD 14 |STRUCTIONS **...|
00000CB0: F5 01 99 22 93 22 3A 97 55 54 2C 55 4C 25 3A 8B |...".":.UT,UL%:.|
00000CC0: C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 |.(50003).0..5328|
00000CD0: 31 2C 32 3A 97 35 33 32 38 30 2C 31 30 00 03 15 |1,2:.53280,10...|
00000CE0: F6 01 55 48 B2 31 3A 55 50 B2 30 3A 55 47 24 B2 |..UH.1:UP.0:UG$.|
00000CF0: 22 D4 45 41 43 48 45 52 20 C9 4E 53 54 22 3A 8D |".EACHER .NST":.|
00000D00: 38 35 30 00 31 15 F7 01 99 22 11 11 20 20 20 20 |850.1....".. |
00000D10: 20 20 D4 4F 20 54 48 45 20 42 45 53 54 20 4F 46 | .O THE BEST OF|
00000D20: 20 4F 55 52 20 4B 4E 4F 57 4C 45 44 47 45 2C 11 | OUR KNOWLEDGE,.|
00000D30: 22 00 5A 15 F8 01 99 22 20 20 20 54 48 49 53 20 |".Z...." THIS |
00000D40: 50 52 4F 47 52 41 4D 20 49 53 20 49 4E 20 54 48 |PROGRAM IS IN TH|
00000D50: 45 20 50 55 42 4C 49 43 11 22 00 86 15 F9 01 99 |E PUBLIC."......|
00000D60: 22 20 20 20 44 4F 4D 41 49 4E 2E 20 20 C9 46 20 |" DOMAIN. .F |
00000D70: 54 48 49 53 20 49 53 20 4E 4F 54 20 54 48 45 20 |THIS IS NOT THE |
00000D80: 43 41 53 45 11 22 00 A3 15 FA 01 99 22 20 20 20 |CASE."......" |
00000D90: 50 4C 45 41 53 45 20 43 4F 4E 54 41 43 54 3A 11 |PLEASE CONTACT:.|
00000DA0: 11 11 22 00 CD 15 FB 01 99 22 20 20 20 20 20 20 |.."......" |
00000DB0: C3 4F 4D 4D 4F 44 4F 52 45 20 C2 55 53 49 4E 45 |.OMMODORE .USINE|
00000DC0: 53 53 20 CD 41 43 48 49 4E 45 53 11 22 00 F0 15 |SS .ACHINES."...|
00000DD0: FC 01 99 22 20 20 20 20 20 20 20 20 20 20 33 33 |..." 33|
00000DE0: 37 30 20 D0 48 41 52 4D 41 43 59 20 C1 56 45 2E |70 .HARMACY .VE.|
00000DF0: 00 14 16 FD 01 99 22 20 20 20 20 20 20 20 20 20 |......" |
00000E00: 20 C1 47 49 4E 43 4F 55 52 54 2C 20 CF 4E 54 41 | .GINCOURT, .NTA|
00000E10: 52 49 4F 22 00 36 16 FE 01 99 22 20 20 20 20 20 |RIO".6...." |
00000E20: 20 20 20 20 20 C3 41 4E 41 44 41 20 20 20 CD 31 | .ANADA .1|
00000E30: D7 20 32 CB 34 22 00 56 16 FF 01 99 22 20 20 20 |. 2.4".V...." |
00000E40: 20 20 20 20 20 20 20 28 34 31 36 29 20 34 39 39 | (416) 499|
00000E50: 2D 34 32 39 32 22 00 71 16 00 02 55 48 B2 31 3A |-4292".q...UH.1:|
00000E60: 55 50 B2 31 3A 8D 20 38 33 35 3A 8D 20 38 35 30 |UP.1:. 835:. 850|
00000E70: 3A 00 9B 16 01 02 99 22 20 20 20 20 20 11 11 D0 |:......" ...|
00000E80: 52 4F 47 52 41 4D 20 CE 41 4D 45 3A 20 C2 2E D4 |ROGRAM .AME: ...|
00000E90: 2E C3 2E 20 C4 49 56 49 44 45 11 00 C2 16 02 02 |... .IVIDE......|
00000EA0: 99 22 20 20 20 20 20 D7 52 49 54 54 45 4E 20 C2 |." .RITTEN .|
00000EB0: 59 20 20 3A 20 D3 49 4D 4F 4E 20 D4 41 59 4C 4F |Y : .IMON .AYLO|
00000EC0: 52 11 00 E6 16 03 02 99 22 20 20 20 20 20 D5 50 |R......." .P|
00000ED0: 47 52 41 44 45 44 20 C2 59 20 3A 20 CE 45 49 4C |GRADED .Y : .EIL|
00000EE0: 20 C8 55 4E 54 11 00 11 17 04 02 99 22 20 20 20 | .UNT......." |
00000EF0: 20 20 11 D4 48 49 53 20 50 52 4F 47 52 41 4D 20 | ..HIS PROGRAM |
00000F00: 57 49 4C 4C 20 52 55 4E 20 4F 4E 20 41 4E 59 11 |WILL RUN ON ANY.|
00000F10: 11 00 31 17 07 02 99 22 20 20 20 20 20 20 20 20 |..1...." |
00000F20: 20 D0 C5 D4 20 36 34 20 C3 CF CD D0 D5 D4 C5 D2 | ... 64 ........|
00000F30: 11 00 56 17 08 02 99 22 20 20 20 20 20 20 20 20 |..V...." |
00000F40: 20 C3 CF CD CD CF C4 CF D2 C5 20 36 34 20 C3 CF | ......... 64 ..|
00000F50: CD D0 D5 D4 C5 D2 00 5F 17 09 02 8D 38 33 35 00 |......._....835.|
00000F60: 73 17 4E 02 8B 55 5A B2 31 A7 9E 55 50 25 3A 89 |s.N..UZ.1..UP%:.|
00000F70: 32 31 37 00 79 17 57 02 8E 00 9F 17 58 02 8F 20 |217.y.W.....X.. |
00000F80: 2A 2A 20 50 52 4F 47 52 41 4D 20 4D 4F 44 49 46 |** PROGRAM MODIF|
00000F90: 49 43 41 54 49 4F 4E 20 49 4E 53 54 20 2A 2A 00 |ICATION INST **.|
00000FA0: B0 17 59 02 99 22 93 22 3A 97 55 54 2C 55 4C 25 |..Y..".":.UT,UL%|
00000FB0: 00 D5 17 5D 02 55 48 B2 31 3A 55 50 B2 30 3A 55 |...].UH.1:UP.0:U|
00000FC0: 47 24 B2 22 D0 52 4F 47 52 41 4D 20 CD 4F 44 22 |G$.".ROGRAM .OD"|
00000FD0: 3A 8D 38 35 30 00 06 18 62 02 99 22 11 11 11 20 |:.850...b.."... |
00000FE0: C2 59 20 43 48 41 4E 47 49 4E 47 20 54 48 45 20 |.Y CHANGING THE |
00000FF0: 4D 55 4C 54 49 50 4C 49 43 41 54 49 4F 4E 20 46 |MULTIPLICATION F|
00001000: 41 43 54 4F 52 22 00 36 18 67 02 99 22 11 20 4F |ACTOR".6.g..". O|
00001010: 46 20 52 4E 44 28 31 29 20 4F 52 20 54 48 45 20 |F RND(1) OR THE |
00001020: 41 44 44 49 54 49 4F 4E 20 4E 55 4D 42 45 52 20 |ADDITION NUMBER |
00001030: 41 46 54 45 52 22 00 61 18 6C 02 99 22 11 20 49 |AFTER".a.l..". I|
00001040: 54 20 4F 4E 20 4C 49 4E 45 53 20 31 36 36 30 20 |T ON LINES 1660 |
00001050: 41 4E 44 20 31 36 37 30 20 46 4F 52 20 54 48 45 |AND 1670 FOR THE|
00001060: 22 00 8E 18 71 02 99 22 11 20 46 49 52 53 54 20 |"...q..". FIRST |
00001070: 52 4F 55 4E 44 20 41 4E 44 20 4C 49 4E 45 53 20 |ROUND AND LINES |
00001080: 31 39 35 30 20 41 4E 44 20 31 39 36 30 22 00 B8 |1950 AND 1960"..|
00001090: 18 76 02 99 22 11 20 46 4F 52 20 54 48 45 20 53 |.v..". FOR THE S|
000010A0: 45 43 4F 4E 44 20 44 52 49 4C 4C 20 52 4F 55 4E |ECOND DRILL ROUN|
000010B0: 44 2C 20 54 48 45 20 22 00 E5 18 7B 02 99 22 11 |D, THE "...{..".|
000010C0: 20 50 4F 53 53 49 42 4C 45 20 56 41 4C 55 45 53 | POSSIBLE VALUES|
000010D0: 20 46 4F 52 20 54 48 45 20 44 49 56 49 53 4F 52 | FOR THE DIVISOR|
000010E0: 20 41 4E 44 22 00 08 19 80 02 99 22 11 20 44 49 | AND"......". DI|
000010F0: 56 49 44 45 4E 44 20 57 49 4C 4C 20 42 45 20 43 |VIDEND WILL BE C|
00001100: 48 41 4E 47 45 44 2E 22 00 11 19 94 02 8D 38 33 |HANGED."......83|
00001110: 35 00 25 19 B2 02 8B 55 5A B2 31 A7 9E 55 50 25 |5.%....UZ.1..UP%|
00001120: 3A 89 32 31 37 00 2B 19 BB 02 8E 00 50 19 BC 02 |:.217.+.....P...|
00001130: 8F 20 2A 2A 20 54 4F 20 55 53 45 20 38 30 33 32 |. ** TO USE 8032|
00001140: 20 4C 4F 41 44 20 43 42 4D 34 30 33 32 20 2A 2A | LOAD CBM4032 **|
00001150: 00 86 19 C6 02 99 22 93 11 11 11 05 42 45 46 4F |......".....BEFO|
00001160: 52 45 20 52 55 4E 4E 49 4E 47 20 54 48 49 53 20 |RE RUNNING THIS |
00001170: 50 52 4F 47 52 41 4D 20 4F 4E 20 41 4E 20 38 30 |PROGRAM ON AN 80|
00001180: 33 32 20 20 11 11 00 BC 19 D0 02 99 22 20 20 20 |32 ........" |
00001190: 20 20 20 4C 4F 41 44 20 54 48 45 20 27 43 42 4D | LOAD THE 'CBM|
000011A0: 20 34 30 33 32 27 20 50 52 4F 47 52 41 4D 11 11 | 4032' PROGRAM..|
000011B0: 11 11 11 11 11 11 11 11 11 11 11 22 00 C7 19 DA |..........."....|
000011C0: 02 9E 55 55 AA 37 31 00 CD 19 E4 02 80 00 ED 19 |..UU.71.........|
000011D0: 20 03 8F 20 2A 2A 20 54 20 49 20 54 20 4C 20 45 | .. ** T I T L E|
000011E0: 20 20 20 50 20 41 20 47 20 45 20 2A 2A 00 21 1A | P A G E **.!.|
000011F0: 22 03 99 22 93 11 1D 05 22 3B 3A 97 55 54 2C 55 |".."....";:.UT,U|
00001200: 55 25 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 |U%:..(50003).0..|
00001210: 35 33 32 38 30 2C 31 34 3A 97 35 33 32 38 31 2C |53280,14:.53281,|
00001220: 36 00 37 1A 24 03 81 49 B2 31 A4 33 38 3A 99 22 |6.7.$..I.1.38:."|
00001230: 12 A6 92 22 3B 3A 82 00 4F 1A 26 03 81 49 B2 31 |...";:..O.&..I.1|
00001240: A4 32 32 3A 99 22 11 9D 12 A6 92 22 3B 3A 82 00 |.22:.".....";:..|
00001250: 67 1A 28 03 81 49 B2 31 A4 33 37 3A 99 22 9D 9D |g.(..I.1.37:."..|
00001260: 12 A6 92 22 3B 3A 82 00 7F 1A 2A 03 81 49 B2 31 |...";:....*..I.1|
00001270: A4 32 32 3A 99 22 91 9D 12 A6 92 22 3B 3A 82 00 |.22:.".....";:..|
00001280: A4 1A 2C 03 99 22 13 11 11 11 11 11 11 1D 1D 1D |..,.."..........|
00001290: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 |................|
000012A0: A9 20 20 92 00 C6 1A 2E 03 99 22 1D 1D 1D 1D 1D |. .......".....|
000012B0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 20 92 |.............. .|
000012C0: 20 20 12 20 92 A9 00 E7 1A 30 03 99 22 1D 1D 1D | . .....0.."...|
000012D0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 |................|
000012E0: 20 92 20 20 12 A3 DF 00 05 1B 32 03 99 22 1D 1D | . ......2.."..|
000012F0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001300: DF 12 20 20 92 00 2D 1B 34 03 99 22 11 11 1D 1D |.. ..-.4.."....|
00001310: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 43 20 4F 20 4D 20 |..........C O M |
00001320: 4D 20 4F 20 44 20 4F 20 52 20 45 11 11 00 50 1B |M O D O R E...P.|
00001330: 36 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |6.."............|
00001340: 1D 1D 1D 45 44 55 43 41 54 49 4F 4E 41 4C 11 11 |...EDUCATIONAL..|
00001350: 00 6F 1B 38 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D |.o.8..".........|
00001360: 1D 1D 1D 1D 1D 1D 1D 53 4F 46 54 57 41 52 45 00 |.......SOFTWARE.|
00001370: 8A 1B 3A 03 8F 20 2A 2A 20 43 4F 4D 4D 4F 44 4F |..:.. ** COMMODO|
00001380: 52 45 20 4C 4F 47 4F 20 2A 2A 00 C2 1B 3B 03 99 |RE LOGO **...;..|
00001390: C8 28 55 44 24 2C 32 34 29 3B 22 1D 1D 1D 1D 1D |.(UD$,24);".....|
000013A0: 1D 1D 1D 1D 12 50 52 45 53 53 20 53 50 41 43 45 |.....PRESS SPACE|
000013B0: 20 42 41 52 20 4F 52 20 57 41 49 54 92 22 3A 49 | BAR OR WAIT.":I|
000013C0: B2 30 00 E4 1B 3C 03 A1 41 24 3A 8B 41 24 B3 B1 |.0...<..A$:.A$..|
000013D0: 22 20 22 A7 49 B2 49 AA 31 3A 8B 49 B3 32 35 30 |" ".I.I.1:.I.250|
000013E0: A7 38 32 38 00 08 1C 3E 03 54 31 24 B2 22 22 3A |.828...>.T1$."":|
000013F0: 54 32 24 B2 22 22 3A 54 33 24 B2 22 22 3A 54 34 |T2$."":T3$."":T4|
00001400: 24 B2 22 22 3A 49 B2 30 00 11 1C 40 03 89 33 30 |$."":I.0...@..30|
00001410: 30 00 2D 1C 43 03 8F 20 2A 2A 20 53 50 41 43 45 |0.-.C.. ** SPACE|
00001420: 20 42 41 52 20 50 52 45 53 53 20 2A 2A 00 68 1C | BAR PRESS **.h.|
00001430: 48 03 97 55 4F 2C 30 3A 99 C8 28 55 44 24 2C 32 |H..UO,0:..(UD$,2|
00001440: 34 29 3B 22 1D 1D 1D 1D 1D 1D 12 50 52 45 53 53 |4);".......PRESS|
00001450: 20 53 50 41 43 45 20 42 41 52 20 54 4F 20 43 4F | SPACE BAR TO CO|
00001460: 4E 54 49 4E 55 45 92 22 00 7F 1C 4C 03 A1 55 49 |NTINUE."...L..UI|
00001470: 24 3A 8B 55 49 24 B3 B1 22 20 22 A7 38 34 34 00 |$:.UI$.." ".844.|
00001480: 85 1C 4E 03 8E 00 A5 1C 52 03 8F 20 2A 2A 20 50 |..N.....R.. ** P|
00001490: 41 47 45 20 44 45 53 49 47 4E 20 52 4F 55 54 49 |AGE DESIGN ROUTI|
000014A0: 4E 45 20 2A 2A 00 B1 1C 54 03 55 50 B2 55 50 AA |NE **...T.UP.UP.|
000014B0: 31 00 DB 1C 57 03 99 22 93 22 C8 28 55 54 24 AA |1...W..".".(UT$.|
000014C0: 55 50 24 2C 32 31 29 3B C9 28 55 50 24 AA 55 47 |UP$,21);.(UP$.UG|
000014D0: 24 AA C4 28 55 50 29 2C 31 38 29 00 0A 1D 5C 03 |$..(UP),18)...\.|
000014E0: 99 22 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |." -------------|
000014F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001500: 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 19 1D 60 03 8B |---------"...`..|
00001510: 55 48 B3 B1 30 A7 38 37 30 00 4D 1D 61 03 99 C8 |UH..0.870.M.a...|
00001520: 28 55 44 24 2C 32 34 29 3B C8 28 55 50 24 2C 37 |(UD$,24);.(UP$,7|
00001530: 29 3B 22 48 45 4C 50 20 2D 20 50 52 45 53 53 20 |);"HELP - PRESS |
00001540: 20 20 48 20 3C 52 45 54 55 52 4E 3E 22 00 5E 1D | H <RETURN>".^.|
00001550: 66 03 55 48 B2 30 3A 99 22 13 11 22 3A 8E 00 7D |f.UH.0:."..":..}|
00001560: 1D 6B 03 8F 20 2A 2A 20 50 4C 45 41 53 45 20 57 |.k.. ** PLEASE W|
00001570: 41 49 54 20 52 45 4D 41 52 4B 20 2A 2A 00 B3 1D |AIT REMARK **...|
00001580: 70 03 99 C8 28 55 44 24 2C 32 34 29 3B 22 20 20 |p...(UD$,24);" |
00001590: 20 20 20 20 20 20 20 20 20 4F 4E 45 20 4D 4F 4D | ONE MOM|
000015A0: 45 4E 54 20 50 4C 45 41 53 45 2E 2E 2E 20 20 20 |ENT PLEASE... |
000015B0: 20 20 22 00 B9 1D 75 03 8E 00 D6 1D 84 03 8F 20 | "...u........ |
000015C0: 2A 2A 20 53 45 54 20 55 50 20 56 41 52 49 41 42 |** SET UP VARIAB|
000015D0: 4C 45 53 20 2A 2A 00 21 1E 85 03 55 58 24 B2 22 |LES **.!...UX$."|
000015E0: 48 22 3A 86 55 51 25 28 31 30 30 30 29 3A 55 42 |H":.UQ%(1000):UB|
000015F0: B2 33 32 37 36 38 3A 55 31 B2 31 39 36 3A 55 32 |.32768:U1.196:U2|
00001600: B2 31 39 37 3A 55 33 B2 31 39 38 3A 55 34 B2 32 |.197:U3.198:U4.2|
00001610: 31 36 3A 55 43 B2 31 36 37 3A 55 55 B2 31 30 32 |16:UC.167:UU.102|
00001620: 34 00 5F 1E 86 03 55 54 B2 35 39 34 36 38 3A 55 |4._...UT.59468:U|
00001630: 55 25 B2 31 32 3A 55 4C 25 B2 31 34 3A 55 50 25 |U%.12:UL%.14:UP%|
00001640: B2 31 31 34 36 3A 55 4D B2 33 32 37 36 38 3A 55 |.1146:UM.32768:U|
00001650: 4F B2 31 35 38 3A 97 20 35 30 30 30 33 2C 30 00 |O.158:. 50003,0.|
00001660: A2 1E 87 03 8B C2 28 35 30 30 30 33 29 B2 30 A7 |......(50003).0.|
00001670: 55 42 B2 31 30 32 34 3A 55 31 B2 32 30 39 3A 55 |UB.1024:U1.209:U|
00001680: 32 B2 32 31 30 3A 55 33 B2 32 31 31 3A 55 34 B2 |2.210:U3.211:U4.|
00001690: 32 31 34 3A 55 43 B2 32 30 34 3A 55 55 B2 32 30 |214:UC.204:UU.20|
000016A0: 34 38 00 E1 1E 88 03 8B C2 28 35 30 30 30 33 29 |48.......(50003)|
000016B0: B2 30 A7 55 54 B2 35 33 32 37 32 3A 55 55 25 B2 |.0.UT.53272:UU%.|
000016C0: 32 31 3A 55 4C 25 B2 32 33 3A 55 50 25 B2 32 31 |21:UL%.23:UP%.21|
000016D0: 33 39 3A 55 4D B2 31 30 32 34 3A 55 4F B2 31 39 |39:UM.1024:UO.19|
000016E0: 38 00 05 1F 89 03 55 44 24 B2 22 13 11 11 11 11 |8.....UD$.".....|
000016F0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00001700: 11 11 11 11 22 00 37 1F 8A 03 55 50 24 B2 22 20 |....".7...UP$." |
00001710: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001720: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001730: 20 20 20 20 20 20 22 00 85 1F 8B 03 55 54 24 B2 | ".....UT$.|
00001740: 22 20 C2 2E D4 2E C3 2E 20 C4 C9 D6 C9 C4 C5 A0 |" ...... .......|
00001750: A0 A0 A0 A0 22 3A 8F 20 50 4C 41 43 45 20 50 52 |....":. PLACE PR|
00001760: 4F 47 52 41 4D 20 54 49 54 4C 45 20 48 45 52 45 |OGRAM TITLE HERE|
00001770: 20 21 21 21 21 21 21 21 21 21 21 21 21 21 21 21 | !!!!!!!!!!!!!!!|
00001780: 21 21 2A 2A 2A 00 8B 1F 8C 03 8E 00 A5 1F 8E 03 |!!***...........|
00001790: 8F 20 2A 2A 20 53 45 54 20 56 41 52 49 41 42 4C |. ** SET VARIABL|
000017A0: 45 53 20 2A 2A 00 AE 1F 93 03 8D 39 30 30 00 C9 |ES **......900..|
000017B0: 1F 98 03 8F 20 2A 2A 20 43 48 45 43 4B 20 46 4F |.... ** CHECK FO|
000017C0: 52 20 38 30 33 32 20 2A 2A 00 E7 1F 9D 03 99 22 |R 8032 **......"|
000017D0: 93 22 3A 99 22 A0 22 3A 8F 20 53 48 49 46 54 45 |.":.".":. SHIFTE|
000017E0: 44 20 53 50 41 43 45 00 FE 1F A2 03 8B C2 28 55 |D SPACE.......(U|
000017F0: 42 AA 34 30 29 B3 B1 39 36 A7 8D 37 30 30 00 17 |B.40)..96..700..|
00001800: 20 A3 03 8F 20 2A 2A 20 4D 45 4D 4F 52 59 20 43 | ... ** MEMORY C|
00001810: 48 45 43 4B 20 2A 2A 00 2B 20 A4 03 8B 20 B8 28 |HECK **.+ ... .(|
00001820: 30 29 B1 32 30 30 30 A7 39 33 37 00 59 20 A5 03 |0).2000.937.Y ..|
00001830: 99 22 93 11 11 05 54 48 49 53 20 4D 41 43 48 49 |."....THIS MACHI|
00001840: 4E 45 20 44 4F 45 53 20 4E 4F 54 20 48 41 56 45 |NE DOES NOT HAVE|
00001850: 20 45 4E 4F 55 47 48 11 22 00 7D 20 A6 03 99 22 | ENOUGH.".} ..."|
00001860: 4D 45 4D 4F 52 59 20 54 4F 20 52 55 4E 20 54 48 |MEMORY TO RUN TH|
00001870: 49 53 20 50 52 4F 47 52 41 4D 20 21 22 00 88 20 |IS PROGRAM !".. |
00001880: A7 03 9E 55 55 AA 37 31 00 8E 20 A8 03 80 00 A8 |...UU.71.. .....|
00001890: 20 A9 03 99 22 93 05 22 3A 8B C2 28 35 30 30 30 | ..."..":..(5000|
000018A0: 33 29 B2 30 A7 39 36 32 00 D7 20 AC 03 8F 20 2A |3).0.962.. ... *|
000018B0: 2A 20 42 41 53 49 43 20 32 2E 30 20 20 4F 52 20 |* BASIC 2.0 OR |
000018C0: 20 34 2E 30 20 20 4F 52 20 20 43 2D 36 34 20 53 | 4.0 OR C-64 S|
000018D0: 45 54 55 50 20 2A 2A 00 15 21 AD 03 97 31 30 37 |ETUP **..!...107|
000018E0: 35 2C 31 33 33 3A 97 31 30 37 36 2C 31 34 34 3A |5,133:.1076,144:|
000018F0: 97 31 30 37 37 2C 32 33 34 3A 97 31 30 37 39 2C |.1077,234:.1079,|
00001900: 34 3A 97 31 30 38 30 2C 31 33 33 3A 97 31 30 38 |4:.1080,133:.108|
00001910: 31 2C 31 34 35 00 4B 21 AE 03 97 31 30 39 31 2C |1,145.K!...1091,|
00001920: 31 35 35 3A 97 31 30 39 38 2C 31 33 33 3A 97 31 |155:.1098,133:.1|
00001930: 30 39 39 2C 31 34 34 3A 97 31 31 30 30 2C 32 33 |099,144:.1100,23|
00001940: 34 3A 97 31 31 30 33 2C 31 33 33 00 6D 21 AF 03 |4:.1103,133.m!..|
00001950: 97 31 31 30 34 2C 31 34 35 3A 97 31 31 30 35 2C |.1104,145:.1105,|
00001960: 32 33 34 3A 97 31 30 38 32 2C 32 33 34 00 84 21 |234:.1082,234..!|
00001970: B1 03 8B C2 28 35 30 30 30 33 29 B3 B1 31 36 30 |....(50003)..160|
00001980: A7 39 35 35 00 B3 21 B6 03 97 31 30 39 33 2C 38 |.955..!...1093,8|
00001990: 38 3A 97 31 30 39 34 2C 32 32 38 3A 97 31 30 39 |8:.1094,228:.109|
000019A0: 37 2C 38 35 3A 97 31 31 30 32 2C 32 32 38 3A 89 |7,85:.1102,228:.|
000019B0: 39 36 35 00 C8 21 BB 03 8B C2 28 35 30 30 30 33 |965..!....(50003|
000019C0: 29 B3 B1 31 A7 39 39 30 00 F7 21 C0 03 97 31 30 |)..1.990..!...10|
000019D0: 39 33 2C 34 39 3A 97 31 30 39 34 2C 32 33 30 3A |93,49:.1094,230:|
000019E0: 97 31 30 39 37 2C 34 36 3A 97 31 31 30 32 2C 32 |.1097,46:.1102,2|
000019F0: 33 30 3A 89 39 36 35 00 31 22 C2 03 97 32 30 39 |30:.965.1"...209|
00001A00: 39 2C 31 34 31 3A 97 32 31 30 30 2C 32 30 3A 97 |9,141:.2100,20:.|
00001A10: 32 31 30 31 2C 33 3A 97 32 31 30 33 2C 38 3A 97 |2101,3:.2103,8:.|
00001A20: 32 31 30 34 2C 31 34 31 3A 97 32 31 30 35 2C 32 |2104,141:.2105,2|
00001A30: 31 00 6D 22 C3 03 97 32 31 30 36 2C 33 3A 97 32 |1.m"...2106,3:.2|
00001A40: 31 31 35 2C 31 34 35 3A 97 32 31 31 37 2C 35 32 |115,145:.2117,52|
00001A50: 3A 97 32 31 31 38 2C 32 33 34 3A 97 32 31 32 31 |:.2118,234:.2121|
00001A60: 2C 34 39 3A 97 32 31 32 32 2C 31 34 31 00 A7 22 |,49:.2122,141.."|
00001A70: C4 03 97 32 31 32 33 2C 32 30 3A 97 32 31 32 34 |...2123,20:.2124|
00001A80: 2C 33 3A 97 32 31 32 36 2C 32 33 34 3A 97 32 31 |,3:.2126,234:.21|
00001A90: 32 37 2C 31 34 31 3A 97 32 31 32 38 2C 32 31 3A |27,141:.2128,21:|
00001AA0: 97 32 31 32 39 2C 33 00 C5 22 C5 03 9E 55 55 AA |.2129,3.."...UU.|
00001AB0: 34 38 3A 8F 20 44 49 53 41 42 4C 45 20 53 54 4F |48:. DISABLE STO|
00001AC0: 50 20 4B 45 59 00 D6 22 CA 03 8D 38 30 30 3A 8F |P KEY.."...800:.|
00001AD0: 20 54 49 54 4C 45 00 E6 22 D4 03 89 33 30 30 3A | TITLE.."...300:|
00001AE0: 8F 20 4D 45 4E 55 00 17 23 DE 03 99 22 93 54 48 |. MENU..#...".TH|
00001AF0: 45 20 50 47 4D 20 57 49 4C 4C 20 4E 4F 54 20 57 |E PGM WILL NOT W|
00001B00: 4F 52 4B 20 4F 4E 20 54 48 49 53 20 4D 41 43 48 |ORK ON THIS MACH|
00001B10: 49 4E 45 21 22 3A 80 00 4C 23 E8 03 8B 55 5A B2 |INE!":..L#...UZ.|
00001B20: 31 A7 9E 55 50 25 3A 9E 55 50 25 3A 55 5A B2 30 |1..UP%:.UP%:UZ.0|
00001B30: 3A 8F 20 2A 2A 20 50 52 4F 47 52 41 4D 20 53 54 |:. ** PROGRAM ST|
00001B40: 41 52 54 53 20 48 45 52 45 20 2A 2A 00 78 23 E9 |ARTS HERE **.x#.|
00001B50: 03 99 22 93 05 22 3B 3A 8C 3A 8B C2 28 35 30 30 |.."..";:.:..(500|
00001B60: 30 33 29 B2 30 A7 97 35 33 32 38 31 2C 36 3A 97 |03).0..53281,6:.|
00001B70: 35 33 32 38 30 2C 31 34 00 8C 23 FC 03 4C B2 30 |53280,14..#..L.0|
00001B80: 3A 59 B2 30 3A 4F B2 30 3A 50 B2 30 00 9F 23 06 |:Y.0:O.0:P.0..#.|
00001B90: 04 58 58 B2 BB 28 AB 54 49 29 3A 58 58 B2 30 00 |.XX..(.TI):XX.0.|
00001BA0: C2 23 10 04 55 47 24 B2 22 44 49 56 2E 20 47 41 |.#..UG$."DIV. GA|
00001BB0: 4D 45 22 3A 8F 20 50 41 47 45 20 48 45 41 44 49 |ME":. PAGE HEADI|
00001BC0: 4E 47 00 CE 23 1A 04 97 55 54 2C 55 4C 25 00 F4 |NG..#...UT,UL%..|
00001BD0: 23 B0 04 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |#...************|
00001BE0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001BF0: 2A 2A 2A 2A 00 1A 24 BA 04 8F 2A 20 43 48 41 4E |****..$...* CHAN|
00001C00: 47 45 53 20 4D 41 44 45 20 42 59 20 48 49 4E 20 |GES MADE BY HIN |
00001C10: 4A 41 4E 47 20 41 4E 44 20 2A 00 40 24 C4 04 8F |JANG AND *.@$...|
00001C20: 2A 20 20 20 50 52 4F 47 52 45 53 53 49 56 45 20 |* PROGRESSIVE |
00001C30: 50 52 4F 47 52 41 4D 49 4E 47 20 20 20 20 20 2A |PROGRAMING *|
00001C40: 00 66 24 CE 04 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.f$...**********|
00001C50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001C60: 2A 2A 2A 2A 2A 2A 00 8C 24 D8 04 99 22 93 11 11 |******..$..."...|
00001C70: 11 11 11 11 11 20 C9 27 4D 20 43 41 4C 4C 45 44 |..... .'M CALLED|
00001C80: 20 54 48 45 20 27 C3 36 34 27 2E 22 00 B0 24 E2 | THE '.64'."..$.|
00001C90: 04 99 22 11 20 D7 48 41 54 20 49 53 20 59 4F 55 |..". .HAT IS YOU|
00001CA0: 52 20 46 49 52 53 54 20 4E 41 4D 45 3F 20 22 3B |R FIRST NAME? ";|
00001CB0: 00 D0 24 EC 04 55 53 24 B2 22 22 3A 55 4C B2 31 |..$..US$."":UL.1|
00001CC0: 30 3A 8D 20 33 35 3A 4E 41 4D 45 24 B2 55 52 24 |0:. 35:NAME$.UR$|
00001CD0: 00 E6 24 F6 04 4E 41 4D 45 24 B2 C8 28 4E 41 4D |..$..NAME$..(NAM|
00001CE0: 45 24 2C 31 30 29 00 01 25 00 05 8B 4E 41 4D 45 |E$,10)..%...NAME|
00001CF0: 24 B2 22 A0 22 A7 99 22 91 22 3B 3A 89 31 32 36 |$."."..".";:.126|
00001D00: 30 00 24 25 0A 05 8F 20 20 47 41 4D 45 53 20 57 |0.$%... GAMES W|
00001D10: 52 49 54 54 45 4E 20 49 4E 20 43 41 4E 20 40 20 |RITTEN IN CAN @ |
00001D20: 4F 49 53 45 00 3C 25 14 05 8F 20 49 4E 20 54 4F |OISE.<%... IN TO|
00001D30: 52 4F 4E 54 4F 20 43 41 4E 41 44 41 00 62 25 1E |RONTO CANADA.b%.|
00001D40: 05 8F 20 54 52 41 4E 53 4C 41 54 45 44 20 46 4F |.. TRANSLATED FO|
00001D50: 52 20 55 53 45 20 4F 4E 20 43 4F 4D 4D 4F 44 4F |R USE ON COMMODO|
00001D60: 52 45 00 80 25 28 05 8F 20 50 45 54 20 42 59 20 |RE..%(.. PET BY |
00001D70: 2A 20 53 49 4D 4F 4E 20 54 41 59 4C 4F 52 20 2A |* SIMON TAYLOR *|
00001D80: 00 A1 25 32 05 8F 20 46 4F 52 20 4D 49 43 52 4F |..%2.. FOR MICRO|
00001D90: 20 43 4F 4D 50 55 54 45 52 20 4C 49 42 52 41 52 | COMPUTER LIBRAR|
00001DA0: 59 00 C5 25 3C 05 8F 20 4E 4F 52 54 48 20 59 4F |Y..%<.. NORTH YO|
00001DB0: 52 4B 20 42 4F 41 52 44 20 4F 46 20 45 44 55 43 |RK BOARD OF EDUC|
00001DC0: 41 54 49 4F 4E 00 E9 25 46 05 8F 20 57 49 4C 4C |ATION..%F.. WILL|
00001DD0: 4F 57 44 41 4C 45 2C 20 4F 4E 54 41 52 49 4F 20 |OWDALE, ONTARIO |
00001DE0: 4A 55 4E 45 20 31 39 38 30 00 18 26 64 05 99 22 |JUNE 1980..&d.."|
00001DF0: 11 11 20 CE 4F 57 20 22 4E 41 4D 45 24 22 2C 20 |.. .OW "NAME$", |
00001E00: 48 4F 57 20 4D 41 4E 59 20 53 45 43 4F 4E 44 53 |HOW MANY SECONDS|
00001E10: 20 44 4F 20 59 4F 55 22 00 4A 26 6E 05 99 22 11 | DO YOU".J&n..".|
00001E20: 20 57 49 53 48 20 54 4F 20 41 4E 53 57 45 52 20 | WISH TO ANSWER |
00001E30: 45 41 43 48 20 51 55 45 53 54 49 4F 4E 20 3F 20 |EACH QUESTION ? |
00001E40: 20 20 20 20 9D 9D 9D 9D 22 3B 00 72 26 78 05 55 | ....";.r&x.U|
00001E50: 4C B2 32 3A 55 53 24 B2 22 30 31 32 33 34 35 36 |L.2:US$."0123456|
00001E60: 37 38 39 48 22 3A 8D 20 33 35 3A 54 4D 24 B2 55 |789H":. 35:TM$.U|
00001E70: 52 24 00 80 26 82 05 54 4D B2 C5 28 54 4D 24 29 |R$..&..TM..(TM$)|
00001E80: 00 9B 26 8C 05 8B 20 54 4D B2 30 20 A7 20 99 22 |..&... TM.0 . ."|
00001E90: 91 91 22 3B 3A 89 20 31 33 39 30 00 A7 26 72 06 |..";:. 1390..&r.|
00001EA0: 81 53 B2 31 A4 31 35 00 D4 26 74 06 55 50 B2 53 |.S.1.15..&t.UP.S|
00001EB0: AB 31 3A 8F 20 51 55 45 53 54 49 4F 4E 20 4E 55 |.1:. QUESTION NU|
00001EC0: 4D 42 45 52 20 4F 4E 20 50 41 47 45 20 48 45 41 |MBER ON PAGE HEA|
00001ED0: 44 49 4E 47 00 0C 27 75 06 55 47 24 B2 22 D1 55 |DING..'u.UG$.".U|
00001EE0: 45 53 54 49 4F 4E 20 23 22 3A 8D 20 38 35 30 3A |ESTION #":. 850:|
00001EF0: 99 C8 28 55 44 24 2C 32 34 29 3B A3 32 34 29 3B |..(UD$,24);.24);|
00001F00: 22 20 20 20 20 20 20 20 20 13 11 22 00 49 27 77 |" ..".I'w|
00001F10: 06 99 22 11 20 20 20 20 20 20 20 20 20 20 2A 2A |..". **|
00001F20: 2A 2A 20 D2 4F 55 4E 44 20 31 20 2A 2A 2A 2A 22 |** .OUND 1 ****"|
00001F30: 3A 99 3A 99 A3 32 30 29 22 20 20 D0 C5 D4 20 20 |:.:..20)" ... |
00001F40: 20 20 22 3B 4E 41 4D 45 24 00 61 27 79 06 99 22 | ";NAME$.a'y.."|
00001F50: 11 11 22 3B A3 32 32 29 3B 4F 3B A3 33 30 29 3B |..";.22);O;.30);|
00001F60: 50 00 7D 27 7C 06 41 B2 B5 28 BB 28 31 29 AC 39 |P.}'|.A..(.(1).9|
00001F70: 29 AA 31 3A 8F 20 44 49 56 49 53 4F 52 00 99 27 |).1:. DIVISOR..'|
00001F80: 86 06 42 B2 B5 28 BB 28 31 29 AC 31 33 29 3A 8F |..B..(.(1).13):.|
00001F90: 20 44 49 56 49 44 45 4E 44 00 A1 27 90 06 43 B2 | DIVIDEND..'..C.|
00001FA0: 42 00 BD 27 9A 06 99 22 20 20 20 20 22 3B 41 AC |B..'..." ";A.|
00001FB0: 42 3B 22 2F 22 3B 41 3B 22 3D 20 22 3B 00 CC 27 |B;"/";A;"= ";..'|
00001FC0: A4 06 5A 54 B2 54 49 3A 5A 43 B2 32 00 DC 27 AE |..ZT.TI:ZC.2..'.|
00001FD0: 06 81 54 B2 31 A4 54 4D AC 33 2E 39 00 F2 27 B8 |..T.1.TM.3.9..'.|
00001FE0: 06 A1 5A 24 3A 8B 5A 24 B3 B1 22 22 A7 31 37 35 |..Z$:.Z$.."".175|
00001FF0: 30 04 00 2D 28 C2 06 8B 5A 54 B3 B2 54 49 A7 99 |0..-(...ZT..TI..|
00002000: CA 28 22 12 92 22 2C 5A 43 2C 31 29 3B 22 20 9D |.("..",ZC,1);" .|
00002010: 22 3B 3A 5A 43 B2 33 AB 5A 43 3A 5A 54 B2 54 49 |";:ZC.3.ZC:ZT.TI|
00002020: AA 31 35 3A 82 54 3A 89 31 38 33 30 04 00 38 28 |.15:.T:.1830..8(|
00002030: CC 06 89 31 37 32 30 04 00 74 28 D6 06 99 22 92 |...1720..t(...".|
00002040: 20 9D 22 3B 3A 8B 20 5A 24 B2 22 48 22 B0 20 5A | .";:. Z$."H". Z|
00002050: 24 B2 22 C8 22 A7 54 45 24 B2 54 49 24 3A 50 4F |$.".".TE$.TI$:PO|
00002060: B2 B9 28 30 29 3A 99 22 20 22 3A 46 4C B2 31 3A |..(0):." ":FL.1:|
00002070: 8D 31 39 35 00 9F 28 D8 06 8B 5A 24 B2 22 48 22 |.195..(...Z$."H"|
00002080: A7 99 C8 28 55 44 24 2C 31 30 29 3B A3 50 4F 29 |...(UD$,10);.PO)|
00002090: 3B 3A 54 49 24 B2 54 45 24 3A 89 31 37 32 30 00 |;:TI$.TE$:.1720.|
000020A0: BB 28 DB 06 8B C6 28 5A 24 29 B2 31 33 A7 44 B2 |.(....(Z$).13.D.|
000020B0: C5 28 43 24 29 3A 89 31 37 39 30 00 C4 28 E0 06 |.(C$):.1790..(..|
000020C0: 99 5A 24 3B 00 EE 28 EA 06 8B C6 28 5A 24 29 B2 |.Z$;..(....(Z$).|
000020D0: 32 30 A7 44 B2 C3 28 43 24 29 3A 43 24 B2 C8 28 |20.D..(C$):C$..(|
000020E0: 43 24 2C 44 AB 31 29 3A 89 31 37 32 30 04 00 02 |C$,D.1):.1720...|
000020F0: 29 F4 06 43 24 B2 43 24 AA 5A 24 3A 89 31 37 32 |)..C$.C$.Z$:.172|
00002100: 30 04 00 13 29 FE 06 8B 43 24 B2 22 22 A7 31 37 |0...)...C$."".17|
00002110: 32 30 04 00 4D 29 08 07 8B 43 B2 44 A7 99 22 11 |20..M)...C.D..".|
00002120: 22 3A 99 22 20 20 20 20 20 C3 4F 52 52 45 43 54 |":." .ORRECT|
00002130: 22 3B 3A 50 B2 50 AA 31 3A 99 C8 28 55 44 24 2C |";:P.P.1:..(UD$,|
00002140: 39 29 A3 33 30 29 50 3A 89 31 38 32 30 00 58 29 |9).30)P:.1820.X)|
00002150: 12 07 89 31 38 34 30 04 00 62 29 1C 07 43 24 B2 |...1840..b)..C$.|
00002160: 22 22 00 6C 29 1F 07 8D 20 38 33 35 00 7B 29 22 |"".l)... 835.{)"|
00002170: 07 82 20 53 3A 89 20 31 38 36 30 00 A2 29 26 07 |.. S:. 1860..)&.|
00002180: 99 22 92 20 9D 22 3A 99 3A 99 22 20 20 20 20 20 |.". .":.:." |
00002190: CE 4F 54 20 46 41 53 54 20 45 4E 4F 55 47 48 21 |.OT FAST ENOUGH!|
000021A0: 22 3B 00 D5 29 30 07 99 22 11 22 3A 99 22 20 20 |";..)0..".":." |
000021B0: 20 20 20 C1 4E 53 57 45 52 20 49 53 3A 20 22 43 | .NSWER IS: "C|
000021C0: 3A 4F B2 4F AA 31 3A 99 C8 28 55 44 24 2C 39 29 |:O.O.1:..(UD$,9)|
000021D0: A3 32 32 29 4F 00 DF 29 3A 07 43 24 B2 22 22 00 |.22)O..):.C$."".|
000021E0: E9 29 3D 07 8D 20 38 33 35 00 F1 29 3F 07 82 20 |.)=.. 835..)?.. |
000021F0: 53 00 0E 2A 44 07 55 47 24 B2 22 D3 43 4F 52 49 |S..*D.UG$.".CORI|
00002200: 4E 47 22 3A 55 50 B2 30 3A 8D 20 38 35 30 00 3D |NG":UP.0:. 850.=|
00002210: 2A 46 07 99 22 11 11 11 11 11 11 11 11 20 20 20 |*F.."........ |
00002220: 20 20 20 20 20 20 D3 4F 20 46 41 52 2C 20 54 48 | .O FAR, TH|
00002230: 45 20 53 43 4F 52 49 4E 47 20 49 53 22 00 64 2A |E SCORING IS".d*|
00002240: 4E 07 99 22 11 20 20 20 20 20 20 20 20 20 22 4F |N..". "O|
00002250: 22 50 4F 49 4E 54 22 3B 3A 8B 4F B3 B1 31 A7 99 |"POINT";:.O..1..|
00002260: 22 53 22 3B 00 9B 2A 58 07 99 22 20 46 4F 52 20 |"S";..*X.." FOR |
00002270: D0 C5 D4 20 41 4E 44 22 3A 99 22 11 20 20 20 20 |... AND":.". |
00002280: 20 20 20 20 20 22 50 22 50 4F 49 4E 54 22 3B 3A | "P"POINT";:|
00002290: 8B 50 B3 B1 31 A7 99 22 53 22 3B 00 B2 2A 62 07 |.P..1.."S";..*b.|
000022A0: 99 22 20 46 4F 52 20 22 4E 41 4D 45 24 22 2E 22 |." FOR "NAME$"."|
000022B0: 3A 99 00 BC 2A 6C 07 8D 20 38 33 35 00 CA 2A 94 |:...*l.. 835..*.|
000022C0: 07 81 53 B2 31 20 A4 20 31 35 00 F7 2A 96 07 55 |..S.1 . 15..*..U|
000022D0: 50 B2 53 AB 31 3A 8F 20 51 55 45 53 54 49 4F 4E |P.S.1:. QUESTION|
000022E0: 20 4E 55 4D 42 45 52 20 4F 4E 20 50 41 47 45 20 | NUMBER ON PAGE |
000022F0: 48 45 41 44 49 4E 47 00 2F 2B 97 07 55 47 24 B2 |HEADING./+..UG$.|
00002300: 22 D1 55 45 53 54 49 4F 4E 20 23 22 3A 8D 20 38 |".UESTION #":. 8|
00002310: 35 30 3A 99 C8 28 55 44 24 2C 32 34 29 3B A3 32 |50:..(UD$,24);.2|
00002320: 34 29 3B 22 20 20 20 20 20 20 20 20 13 11 22 00 |4);" ..".|
00002330: 6B 2B 99 07 99 22 11 20 20 20 20 20 20 20 20 20 |k+...". |
00002340: 20 2A 2A 2A 2A 20 D2 4F 55 4E 44 20 32 20 2A 2A | **** .OUND 2 **|
00002350: 2A 2A 11 22 3A 99 A3 32 30 29 22 20 20 D0 C5 D4 |**.":..20)" ...|
00002360: 20 20 20 20 22 3B 4E 41 4D 45 24 00 83 2B 9B 07 | ";NAME$..+..|
00002370: 99 22 11 11 22 3B A3 32 32 29 3B 59 3B A3 33 30 |."..";.22);Y;.30|
00002380: 29 3B 4C 00 9F 2B 9E 07 41 B2 B5 28 BB 28 31 29 |);L..+..A..(.(1)|
00002390: AC 35 29 AA 38 3A 8F 20 44 49 56 49 53 4F 52 00 |.5).8:. DIVISOR.|
000023A0: BD 2B A8 07 42 B2 B5 28 BB 28 31 29 AC 31 32 29 |.+..B..(.(1).12)|
000023B0: AA 31 3A 8F 20 44 49 56 49 44 45 4E 44 00 C5 2B |.1:. DIVIDEND..+|
000023C0: B2 07 43 B2 42 00 E1 2B BC 07 99 22 20 20 20 20 |..C.B..+..." |
000023D0: 22 3B 41 AC 42 3B 22 2F 22 3B 41 3B 22 3D 20 22 |";A.B;"/";A;"= "|
000023E0: 3B 00 F0 2B C6 07 5A 54 B2 54 49 3A 5A 43 B2 32 |;..+..ZT.TI:ZC.2|
000023F0: 00 00 2C D0 07 81 56 B2 31 A4 54 4D AC 33 2E 39 |..,...V.1.TM.3.9|
00002400: 00 16 2C DA 07 A1 5A 24 3A 8B 5A 24 B3 B1 22 22 |..,...Z$:.Z$..""|
00002410: A7 32 30 34 30 04 00 51 2C E4 07 8B 5A 54 B3 B2 |.2040..Q,...ZT..|
00002420: 54 49 A7 99 CA 28 22 12 92 22 2C 5A 43 2C 31 29 |TI...("..",ZC,1)|
00002430: 3B 22 20 9D 22 3B 3A 5A 43 B2 33 AB 5A 43 3A 5A |;" .";:ZC.3.ZC:Z|
00002440: 54 B2 54 49 AA 31 35 3A 82 56 3A 89 32 31 32 30 |T.TI.15:.V:.2120|
00002450: 04 00 5C 2C EE 07 89 32 30 31 30 04 00 97 2C F8 |..\,...2010...,.|
00002460: 07 99 22 92 20 9D 22 3B 3A 8B 20 5A 24 B2 22 48 |..". .";:. Z$."H|
00002470: 22 B0 5A 24 B2 22 C8 22 A7 54 45 24 B2 54 49 24 |".Z$.".".TE$.TI$|
00002480: 3A 50 4F B2 B9 28 30 29 3A 99 22 20 22 3A 46 4C |:PO..(0):." ":FL|
00002490: B2 31 3A 8D 31 39 35 00 C2 2C FA 07 8B 5A 24 B2 |.1:.195..,...Z$.|
000024A0: 22 48 22 A7 99 C8 28 55 44 24 2C 31 30 29 3B A3 |"H"...(UD$,10);.|
000024B0: 50 4F 29 3B 3A 54 49 24 B2 54 45 24 3A 89 32 30 |PO);:TI$.TE$:.20|
000024C0: 31 30 00 DE 2C FD 07 8B C6 28 5A 24 29 B2 31 33 |10..,....(Z$).13|
000024D0: A7 44 B2 C5 28 43 24 29 3A 89 32 30 38 30 00 E7 |.D..(C$):.2080..|
000024E0: 2C 02 08 99 5A 24 3B 00 11 2D 0C 08 8B C6 28 5A |,...Z$;..-....(Z|
000024F0: 24 29 B2 32 30 A7 44 B2 C3 28 43 24 29 3A 43 24 |$).20.D..(C$):C$|
00002500: B2 C8 28 43 24 2C 44 AB 31 29 3A 89 32 30 31 30 |..(C$,D.1):.2010|
00002510: 04 00 25 2D 16 08 43 24 B2 43 24 AA 5A 24 3A 89 |..%-..C$.C$.Z$:.|
00002520: 32 30 31 30 04 00 36 2D 20 08 8B 43 24 B2 22 22 |2010..6- ..C$.""|
00002530: A7 32 30 31 30 04 00 6F 2D 2A 08 8B 43 B2 44 A7 |.2010..o-*..C.D.|
00002540: 99 22 11 22 3A 99 22 20 20 20 20 20 C3 4F 52 52 |.".":." .ORR|
00002550: 45 43 54 22 3A 4C B2 4C AA 32 3A 99 C8 28 55 44 |ECT":L.L.2:..(UD|
00002560: 24 2C 39 29 A3 33 30 29 4C 3A 89 32 31 31 30 00 |$,9).30)L:.2110.|
00002570: 7A 2D 34 08 89 32 31 33 30 04 00 84 2D 3E 08 43 |z-4..2130...->.C|
00002580: 24 B2 22 22 00 8E 2D 41 08 8D 20 38 33 35 00 9C |$.""..-A.. 835..|
00002590: 2D 44 08 82 20 53 3A 89 32 31 35 30 00 C3 2D 48 |-D.. S:.2150..-H|
000025A0: 08 99 22 92 20 9D 22 3A 99 3A 99 22 20 20 20 20 |..". .":.:." |
000025B0: 20 CE 4F 54 20 46 41 53 54 20 45 4E 4F 55 47 48 | .OT FAST ENOUGH|
000025C0: 21 22 3B 00 E9 2D 52 08 99 22 11 22 3A 99 22 20 |!";..-R..".":." |
000025D0: 20 20 20 20 C1 4E 53 57 45 52 20 49 53 3A 20 22 | .NSWER IS: "|
000025E0: 43 3A 99 3A 59 B2 59 AA 32 00 F9 2D 5C 08 43 24 |C:.:Y.Y.2..-\.C$|
000025F0: B2 22 22 3A 8D 20 38 33 35 00 01 2E 5E 08 82 20 |."":. 835...^.. |
00002600: 53 00 07 2E 66 08 8F 00 28 2E 68 08 55 47 24 B2 |S...f...(.h.UG$.|
00002610: 22 D3 43 4F 52 49 4E 47 22 3A 55 50 B2 31 3A 55 |".CORING":UP.1:U|
00002620: 48 B2 31 3A 8D 38 35 30 00 51 2E 70 08 99 22 20 |H.1:.850.Q.p.." |
00002630: 20 20 20 20 20 20 20 20 20 2A 2A 20 12 D2 4F 55 | ** ..OU|
00002640: 4E 44 20 31 20 D4 4F 54 41 4C 53 92 20 2A 2A 11 |ND 1 .OTALS. **.|
00002650: 22 00 88 2E 7A 08 99 22 20 20 20 20 20 20 20 20 |"...z.." |
00002660: 20 20 20 D0 C5 D4 20 48 41 44 22 4F 22 50 4F 49 | ... HAD"O"POI|
00002670: 4E 54 2E 22 3B 3A 8B 4F B3 B1 31 A7 99 22 9D 53 |NT.";:.O..1..".S|
00002680: 2E 22 3A 89 32 31 39 30 00 8E 2E 84 08 99 00 CA |.":.2190........|
00002690: 2E 8E 08 99 22 11 20 20 20 20 20 20 20 20 20 20 |....". |
000026A0: 20 22 4E 41 4D 45 24 22 20 48 41 44 22 50 22 50 | "NAME$" HAD"P"P|
000026B0: 4F 49 4E 54 2E 22 3B 3A 8B 50 B3 B1 31 A7 99 22 |OINT.";:.P..1.."|
000026C0: 9D 53 2E 22 3A 89 32 32 31 30 00 D0 2E 98 08 99 |.S.":.2210......|
000026D0: 00 FA 2E A2 08 99 22 11 20 20 20 20 20 20 20 20 |......". |
000026E0: 20 20 2A 2A 20 12 D2 4F 55 4E 44 20 32 20 D4 4F | ** ..OUND 2 .O|
000026F0: 54 41 4C 53 92 20 2A 2A 11 22 00 31 2F AC 08 99 |TALS. **.".1/...|
00002700: 22 20 20 20 20 20 20 20 20 20 20 20 D0 C5 D4 20 |" ... |
00002710: 48 41 53 22 59 22 50 4F 49 4E 54 2E 22 3B 3A 8B |HAS"Y"POINT.";:.|
00002720: 59 B3 B1 31 A7 99 22 9D 53 2E 22 3A 89 32 32 34 |Y..1..".S.":.224|
00002730: 30 00 37 2F B6 08 99 00 73 2F C0 08 99 22 11 20 |0.7/....s/...". |
00002740: 20 20 20 20 20 20 20 20 20 20 22 4E 41 4D 45 24 | "NAME$|
00002750: 22 20 48 41 53 22 4C 22 50 4F 49 4E 54 2E 22 3B |" HAS"L"POINT.";|
00002760: 3A 8B 4C B3 B1 31 A7 99 22 9D 53 2E 22 3A 89 32 |:.L..1..".S.":.2|
00002770: 32 36 30 00 79 2F CA 08 99 00 89 2F D4 08 59 B2 |260.y/...../..Y.|
00002780: 59 AA 4F 3A 4C B2 4C AA 50 00 B1 2F DE 08 99 22 |Y.O:L.L.P../..."|
00002790: 11 20 20 20 20 20 20 20 20 20 20 20 2A 2A 20 12 |. ** .|
000027A0: C7 D2 C1 CE C4 20 D4 CF D4 C1 CC D3 92 20 2A 2A |..... ....... **|
000027B0: 22 00 E9 2F E8 08 99 22 11 20 20 20 20 20 20 20 |"../...". |
000027C0: 20 20 20 20 D0 C5 D4 20 48 41 53 22 59 22 50 4F | ... HAS"Y"PO|
000027D0: 49 4E 54 2E 22 3B 3A 8B 59 B3 B1 31 A7 99 22 9D |INT.";:.Y..1..".|
000027E0: 53 2E 22 3A 89 32 33 30 30 00 EF 2F F2 08 99 00 |S.":.2300../....|
000027F0: 25 30 FC 08 99 22 11 20 20 20 20 20 20 20 20 20 |%0...". |
00002800: 20 20 22 4E 41 4D 45 24 22 20 48 41 53 22 4C 22 | "NAME$" HAS"L"|
00002810: 50 4F 49 4E 54 2E 22 3B 3A 8B 4C B3 B1 31 A7 99 |POINT.";:.L..1..|
00002820: 22 9D 53 2E 22 00 2B 30 06 09 99 00 59 30 10 09 |".S.".+0....Y0..|
00002830: 99 22 11 20 20 20 20 20 20 20 20 D7 41 4E 54 20 |.". .ANT |
00002840: 54 4F 20 50 4C 41 59 20 41 47 41 49 4E 20 22 4E |TO PLAY AGAIN "N|
00002850: 41 4D 45 24 22 3F 20 22 3B 00 77 30 1A 09 55 53 |AME$"? ";.w0..US|
00002860: 24 B2 22 59 4E 22 3A 55 4C B2 31 3A 8D 20 33 35 |$."YN":UL.1:. 35|
00002870: 3A 57 24 B2 55 52 24 00 A5 30 24 09 8B 57 24 B2 |:W$.UR$..0$..W$.|
00002880: 22 59 22 A7 20 4C B2 30 3A 59 B2 30 3A 4F B2 30 |"Y". L.0:Y.0:O.0|
00002890: 3A 50 B2 30 3A 99 22 93 11 11 11 11 11 22 3A 89 |:P.0:."......":.|
000028A0: 20 31 33 38 30 00 B4 30 2E 09 8B 57 24 B2 22 4E | 1380..0...W$."N|
000028B0: 22 A7 20 8E 00 CE 30 38 09 99 22 91 20 20 20 20 |". ...08..". |
000028C0: 20 9D 9D 9D 9D 9D 22 3B 3A 89 32 33 33 30 00 D8 | .....";:.2330..|
000028D0: 30 42 09 8D 20 38 35 30 00 DE 30 56 09 8E 00 00 |0B.. 850..0V....|
000028E0: 00 |. |
.......910.*.... ** ML STOP KEY DISABLE
**.U...."X.=........X` ......L4.X.1.....
...X`.T...."XHHH.H.HHHHHHH.H.HX`111"....
.."HHHHHHH`1"...... ** 4 - POP ML SUBROU
TINE **.H.... **GENERAL INPUT ROUTINE **
.N...:.T...:...#.. +++ INPUT SECTION +++
...(..UO,0:UR$."":UI$.""...*..UL.0.UL.80
.+.-.." ..";:.UC,0.?.2..UI$:.UI$."".50.
I.7..UI$.G(13).C(UR$)..1..UC,1:." .";:.8
5.|.<..UI$.G(20).105...>.. C(UR$)..UL.50
...A..120:. CHECK FOR VALID CHARACTER.E.
F.UR$.UR$.UI$.O.K..UI$;.W.P..50...U.. ++
+ CHECK FOR HELP REQUEST +++.$.Z..UR$.UX
$.195:. EXIT TO HELP ROUTINE.3._..UF.1..
240.@.D.UF.0:.:..Y.F.. ++ CHECK DELETE +
+.J.I..C(UR$).1.50...N.UR$.H(UR$,C(UR$).
1)...S..". ..";:.50...X.. ++ CHECK FOR
VALID CHARACTERS ++.M.}..C(US$).0.150...
...US.1.C(US$)......UI$.J(US$,US,1).....
........UI$."":..#.... ** STANDARD INPUT
**.4....F(UI$).46...E....UI$.G(32)...B.
..F(UI$).48.F(UI$).57.170.H..........F(
UI$).65.F(UI$).90.180............F(UI$).
193.F(UI$).218.UI$."":..R....B(UT).UU%.U
I$.G(F(UI$).128):..X.........UI$."":....
C.UF.1:. +++ HELP ROUTINE EXIT +++...E..
250...H..245.;.M..UQ.UB.(U2%.256.U1%.U3%
.2).W.R.UQ%(UQ.UB).B(UQ):.:.".".J.W.UZ.1
:UV%.B(UT).S.X..300...Y.UZ.0:US$.UJ$:UG$
.UK$:UP.UJ:UL.UK.O.Z..B(50003).0..53281,
1:.".";:.53281,6:.53280,14:.220.Y...."."
;.....UT$.UL$:.UT,UV%:.UQ.UB.(U2%.256.U1
%.U3%.3).*....UQ,UQ%(UQ.UB):.:.FL.1.FL.0
:..6....U1,U1%.B....U2,U2%.N....U4,U4%.\
....U3,U3%.1.D....35.....UD%.((U2%.256.U
1%.U3%).UB).40:.H(UD$,UD%.1):..Q....H(UD
$,24);" . HELP COMI
NG . ":......U1%.B(U1):U2%.B(U2):U3%.B(
U3):U4%.B(U4).%...UJ$.US$:UK$.UG$:UL$.UT
$:UJ.UP:UK.UL.+.....<.,.. ** MENU **.B.-
.:.Q....".":.UT,UU%:.B(50003).0..53281,9
:.53280,8.W./.:...1..". M
ENU".C.6.." ----------------------------
----------"...;..".. 1. BEGIN B.
T.C. DIVIDE"...@..".. 2. STUDENT
INSTRUCTIONS".@.E..".. 3. TEACH
ER INSTRUCTIONS".M.J..".. 4. MOD
IFICATION OF PROGRAM"...O..".. 5.
QUIT.."...T.." -----------------------
---------------"...Y..".. PRESS A
NUMBER KEY (1-5) ";...^.UL.1:US$."12345"
:.35:. INPUT ROUTINE...`.US$."".8.C..E(U
R$).1000,400,500,600,396.A.H..300.H....
** RE-ENABLE STOP KEY AND END **......B(
50003)..1.B(50003)..160.B(50003)..0.399.
A....UU.71:.B(50003).0..53281,6:.53280,1
4.M...."..":..X....875:....... ** STUDEN
T INSTRUCTIONS **.(....".":.UT,UL%:.B(50
003).0..53281,0:.53280,0.N...UH.1:UP.0:U
G$."STUDENT INST":.850....."... THIS P
ROGRAM WILL TEST YOUR ADDITION"......".
SKILLS. YOU'LL BE GIVEN 30 QUESTIONS."..
....". RIGHT ANSWERS SCORE POINTS FOR YO
U,"......". BUT WRONG ANSWERS SCORE POIN
TS FOR ME.".9....". IF YOU TAKE LONGER T
HAN THE TIME YOU".F....". CHOOSE AT THE
START OF THE PROGRAM,"......". THEN IT'S
A POINT FOR ME."...... 835:UH.1:.850.O.
...".... THE QUESTIONS ARE DIVIDED INTO
TWO 15"......". QUESTION ROUNDS. ROUND 2
IS HARDER".'....". BUT EACH QUESTION SC
ORES 2 POINTS!".V....".. REMEMBER TO PRE
SS .RETURN. AFTER EACH......". ANSWER.
GOOD LUCK---(AND THINK FAST!)"...... 835
...... 850.E....".. TO ADVANCE FROM
ONE QUESTION"......". TO THE NEXT PRESS
THE SPACE BAR"......".......IF AT ANY TI
ME YOU WISH TO RETURN".L....". TO THE ME
NU PRESS H <RETURN> OR JUST".I....". H D
URING THE DRILL.".R....835......UZ.1..UP
%:.217............ ** TEACHER INSTRUCTIO
NS **......".":.UT,UL%:.B(50003).0..5328
1,2:.53280,10.....UH.1:UP.0:UG$."TEACHER
INST":.850.1....".. TO THE BEST OF
OUR KNOWLEDGE,.".Z...." THIS PROGRAM
IS IN THE PUBLIC."......" DOMAIN. IF
THIS IS NOT THE CASE."......" PLEASE C
ONTACT:...".M...." COMMODORE BUSINE
SS MACHINES."......" 3370 PHARM
ACY AVE......." AGINCOURT, ONTA
RIO".6...." CANADA M1W 2K4".V
...." (416) 499-4292".Q...UH.1:
UP.1:. 835:. 850:......" ..PROGRAM N
AME: B.T.C. DIVIDE..B...." WRITTEN B
Y : SIMON TAYLOR......." UPGRADED B
Y : NEIL HUNT......." .THIS PROGRAM
WILL RUN ON ANY...1...." PET 64
COMPUTER..V...." COMMODORE 64 CO
MPUTER._....835.S.N..UZ.1..UP%:.217.Y.W.
....X.. ** PROGRAM MODIFICATION INST **.
..Y..".":.UT,UL%.U.].UH.1:UP.0:UG$."PROG
RAM MOD":.850...B.."... BY CHANGING THE
MULTIPLICATION FACTOR".6.G..". OF RND(1)
OR THE ADDITION NUMBER AFTER".A.L..". I
T ON LINES 1660 AND 1670 FOR THE"...Q.."
. FIRST ROUND AND LINES 1950 AND 1960"..
.V..". FOR THE SECOND DRILL ROUND, THE "
...{..". POSSIBLE VALUES FOR THE DIVISOR
AND"......". DIVIDEND WILL BE CHANGED."
......835.%....UZ.1..UP%:.217.+.....P...
. ** TO USE 8032 LOAD CBM4032 **...F..".
....BEFORE RUNNING THIS PROGRAM ON AN 80
32 .....P.." LOAD THE 'CBM 4032' P
ROGRAM.............".G.Z..UU.71.M.......
.. ** T I T L E P A G E **.!.".."....
";:.UT,UU%:.B(50003).0..53280,14:.53281,
6.7.$..I.1.38:."...";:..O.&..I.1.22:."..
...";:..G.(..I.1.37:.".....";:...*..I.1
.22:.".....";:....,.."..................
......... ..F...."................... .
. .....0.."................... . ....
..2..".................... ..-.4.."....
..........C O M M O D O R E...P.6.."....
...........EDUCATIONAL...O.8..".........
.......SOFTWARE...:.. ** COMMODORE LOGO
**.B.;..H(UD$,24);"..........PRESS SPACE
BAR OR WAIT.":I.0...<..A$:.A$.." ".I.I.
1:.I.250.828...>.T1$."":T2$."":T3$."":T4
$."":I.0...@..300.-.C.. ** SPACE BAR PRE
SS **.H.H..UO,0:.H(UD$,24);".......PRESS
SPACE BAR TO CONTINUE."..L..UI$:.UI$..
" ".844...N.....R.. ** PAGE DESIGN ROUTI
NE **...T.UP.UP.1...W.."."H(UT$.UP$,21);
I(UP$.UG$.D(UP),18)...\.." -------------
-------------------------"...`..UH..0.87
0.M.A..H(UD$,24);H(UP$,7);"HELP - PRESS
H <RETURN>".^.F.UH.0:."..":..}.K.. **
PLEASE WAIT REMARK **...P..H(UD$,24);"
ONE MOMENT PLEASE... "...U.
..V.... ** SET UP VARIABLES **.!...UX$."
H":.UQ%(1000):UB.32768:U1.196:U2.197:U3.
198:U4.216:UC.167:UU.1024._...UT.59468:U
U%.12:UL%.14:UP%.1146:UM.32768:UO.158:.
50003,0......B(50003).0.UB.1024:U1.209:U
2.210:U3.211:U4.214:UC.204:UU.2048......
B(50003).0.UT.53272:UU%.21:UL%.23:UP%.21
39:UM.1024:UO.198.....UD$.".............
............".7...UP$."
".....UT$." B.T.C.
DIVIDE ":. PLACE PROGRAM TITLE HERE
!!!!!!!!!!!!!!!!!***............ ** SET
VARIABLES **......900.I.... ** CHECK FO
R 8032 **......".":." ":. SHIFTED SPACE.
.....B(UB.40)..96..700.. ... ** MEMORY C
HECK **.+ ... .(0).2000.937.Y ..."....TH
IS MACHINE DOES NOT HAVE ENOUGH.".} ..."
MEMORY TO RUN THIS PROGRAM !".. ...UU.71
.. ..... ..."..":.B(50003).0.962.W ... *
* BASIC 2.0 OR 4.0 OR C-64 SETUP **.
.!...1075,133:.1076,144:.1077,234:.1079,
4:.1080,133:.1081,145.K!...1091,155:.109
8,133:.1099,144:.1100,234:.1103,133.M!..
.1104,145:.1105,234:.1082,234..!...B(500
03)..160.955..!...1093,88:.1094,228:.109
7,85:.1102,228:.965.H!...B(50003)..1.990
..!...1093,49:.1094,230:.1097,46:.1102,2
30:.965.1"B..2099,141:.2100,20:.2101,3:.
2103,8:.2104,141:.2105,21.M"C..2106,3:.2
115,145:.2117,52:.2118,234:.2121,49:.212
2,141.."D..2123,20:.2124,3:.2126,234:.21
27,141:.2128,21:.2129,3.E"E..UU.48:. DIS
ABLE STOP KEY.V"J..800:. TITLE.."T..300:
. MENU..#...".THE PGM WILL NOT WORK ON T
HIS MACHINE!":..L#...UZ.1..UP%:.UP%:UZ.0
:. ** PROGRAM STARTS HERE **.X#..."..";:
.:.B(50003).0..53281,6:.53280,14..#..L.0
:Y.0:O.0:P.0..#..XX..(.TI):XX.0.B#..UG$.
"DIV. GAME":. PAGE HEADING.N#...UT,UL%..
#...********************************..$.
..* CHANGES MADE BY HIN JANG AND *.@$D..
* PROGRESSIVE PROGRAMING *.F$N..**
******************************..$X.."...
..... I'M CALLED THE 'C64'."..$...". WHA
T IS YOUR FIRST NAME? ";.P$..US$."":UL.1
0:. 35:NAME$.UR$..$..NAME$.H(NAME$,10)..
%...NAME$." "..".";:.1260.$%... GAMES W
RITTEN IN CAN @ OISE.<%... IN TORONTO CA
NADA.B%... TRANSLATED FOR USE ON COMMODO
RE..%(.. PET BY * SIMON TAYLOR *..%2.. F
OR MICRO COMPUTER LIBRARY.E%<.. NORTH YO
RK BOARD OF EDUCATION..%F.. WILLOWDALE,
ONTARIO JUNE 1980..&D..".. NOW "NAME$",
HOW MANY SECONDS DO YOU".J&N..". WISH TO
ANSWER EACH QUESTION ? ....";.R&X.U
L.2:US$."0123456789H":. 35:TM$.UR$..&..T
M.E(TM$)..&... TM.0 . ."..";:. 1390..&R.
.S.1.15.T&T.UP.S.1:. QUESTION NUMBER ON
PAGE HEADING..'U.UG$."QUESTION #":. 850:
.H(UD$,24);.24);" ..".I'W..".
**** ROUND 1 ****":.:..20)" PET
";NAME$.A'Y.."..";.22);O;.30);P.}'|.A.
.(.(1).9).1:. DIVISOR..'..B..(.(1).13):.
DIVIDEND..'..C.B..'..." ";A.B;"/";A;
"= ";.L'..ZT.TI:ZC.2..'...T.1.TM.3.9..'.
..Z$:.Z$.."".1750..-(B..ZT..TI..J("..",Z
C,1);" .";:ZC.3.ZC:ZT.TI.15:.T:.1830..8(
L..1720..T(V..". .";:. Z$."H". Z$."H".TE
$.TI$:PO..(0):." ":FL.1:.195..(X..Z$."H"
..H(UD$,10);.PO);:TI$.TE$:.1720..(...F(Z
$).13.D.E(C$):.1790.D(...Z$;..(...F(Z$).
20.D.C(C$):C$.H(C$,D.1):.1720...)..C$.C$
.Z$:.1720...)...C$."".1720..M)...C.D..".
":." CORRECT";:P.P.1:.H(UD$,9).30)P:
.1820.X)...1840..B)..C$."".L)... 835.{)"
.. S:. 1860..)&..". .":.:." NOT FAST
ENOUGH!";.U)0..".":." ANSWER IS: "C
:O.O.1:.H(UD$,9).22)O..):.C$.""..)=.. 83
5..)?.. S..*D.UG$."SCORING":UP.0:. 850.=
*F.."........ SO FAR, THE SCORIN
G IS".D*N..". "O"POINT";:.O..1..
"S";..*X.." FOR PET AND":.". "P"
POINT";:.P..1.."S";..*B.." FOR "NAME$"."
:...*L.. 835.J*...S.1 . 15..*..UP.S.1:.
QUESTION NUMBER ON PAGE HEADING./+..UG$.
"QUESTION #":. 850:.H(UD$,24);.24);"
..".K+...". **** ROUND 2 **
**.":..20)" PET ";NAME$..+..."..";.2
2);Y;.30);L..+..A..(.(1).5).8:. DIVISOR.
.+..B..(.(1).12).1:. DIVIDEND.E+..C.B..+
..." ";A.B;"/";A;"= ";..+F.ZT.TI:ZC.2
..,P..V.1.TM.3.9..,Z..Z$:.Z$.."".2040..Q
,...ZT..TI..J("..",ZC,1);" .";:ZC.3.ZC:Z
T.TI.15:.V:.2120..\,...2010...,...". .";
:. Z$."H".Z$."H".TE$.TI$:PO..(0):." ":FL
.1:.195.B,...Z$."H"..H(UD$,10);.PO);:TI$
.TE$:.2010..,...F(Z$).13.D.E(C$):.2080..
,...Z$;..-...F(Z$).20.D.C(C$):C$.H(C$,D.
1):.2010..%-..C$.C$.Z$:.2010..6- ..C$.""
.2010..O-*..C.D..".":." CORRECT":L.L
.2:.H(UD$,9).30)L:.2110.Z-4..2130...->.C
$.""..-A.. 835..-D.. S:.2150.C-H..". .":
.:." NOT FAST ENOUGH!";..-R..".":."
ANSWER IS: "C:.:Y.Y.2..-\.C$."":. 83
5...^.. S...F...(.H.UG$."SCORING":UP.1:U
H.1:.850.Q.P.." ** .ROUND 1 TOT
ALS. **."...Z.." PET HAD"O"POI
NT.";:.O..1..".S.":.2190.......J....".
"NAME$" HAD"P"POINT.";:.P..1.."
.S.":.2210.P..........". ** .RO
UND 2 TOTALS. **.".1/..." PET
HAS"Y"POINT.";:.Y..1..".S.":.2240.7/....
S/...". "NAME$" HAS"L"POINT.";
:.L..1..".S.":.2260.Y/J..../T.Y.Y.O:L.L.
P../...". ** .GRAND TOTALS. **
"../...". PET HAS"Y"POINT.";:.
Y..1..".S.":.2300../....%0...".
"NAME$" HAS"L"POINT.";:.L..1..".S.".+0
....Y0...". WANT TO PLAY AGAIN "N
AME$"? ";.W0..US$."YN":UL.1:. 35:W$.UR$.
.0$..W$."Y". L.0:Y.0:O.0:P.0:."......":.
1380..0...W$."N". ..N08..". .....";
:.2330.X0B.. 850..0V.....
> CLICK IMAGE PREVIEW FOR FULL MODAL