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

DIVISION

FILE INFORMATION

FILENAME(S): DIVISION

FILE TYPE(S): PRG

FILE SIZE: 4.2K

FIRST SEEN: 2025-11-30 21:27:54

APPEARS ON: 1 disk(s)

FILE HASH

0702167db56f64b7f8553efad08248fe44cb25a0c0c31e86212a04d2b7c83c64

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
LEERSPELLEN ALG DIVISION PRG DuncanTwain 9 2 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 1B 08 02 00 4C 41  24 B2 22 30 31 32 33 34  |......LA$."01234|
00000010: 35 36 37 38 39 55 4E 43  4C 45 22 00 28 08 05 00  |56789UNCLE".(...|
00000020: 58 B2 BB 28 AB 54 49 29  00 4E 08 0A 00 54 54 24  |X..(.TI).N...TT$|
00000030: B2 22 44 49 56 49 53 49  4F 4E 20 4F 46 20 4E 41  |."DIVISION OF NA|
00000040: 54 55 52 41 4C 20 4E 55  4D 42 45 52 53 22 00 76  |TURAL NUMBERS".v|
00000050: 08 0B 00 99 22 93 22 3B  A3 B5 28 28 34 30 AB C3  |....".";..((40..|
00000060: 28 54 54 24 29 29 AD 32  29 29 3B 22 12 22 3B 54  |(TT$)).2));".";T|
00000070: 54 24 3B 22 92 22 00 96  08 0C 00 99 22 11 22 3B  |T$;"."......".";|
00000080: A3 31 32 29 3B 22 42 59  20 44 2E 20 53 2E 20 43  |.12);"BY D. S. C|
00000090: 4F 4F 50 45 52 22 00 B6  08 0D 00 99 22 11 22 3B  |OOPER"......".";|
000000A0: A3 31 32 29 3B 22 53 43  48 52 45 49 42 45 52 2C  |.12);"SCHREIBER,|
000000B0: 20 31 39 38 30 22 00 DC  08 0E 00 99 22 11 11 11  | 1980"......"...|
000000C0: 11 11 49 46 20 59 4F 55  20 57 49 53 48 20 54 4F  |..IF YOU WISH TO|
000000D0: 20 47 49 56 45 20 55 50  20 4F 4E 22 00 FA 08 0F  | GIVE UP ON"....|
000000E0: 00 99 22 41 20 50 41 52  54 49 43 55 4C 41 52 20  |.."A PARTICULAR |
000000F0: 51 55 45 53 54 49 4F 4E  2C 22 00 24 09 11 00 99  |QUESTION,".$....|
00000100: 22 11 4A 55 53 54 20 54  59 50 45 20 27 55 4E 43  |".JUST TYPE 'UNC|
00000110: 4C 45 27 20 41 53 20 59  4F 55 52 20 41 4E 53 57  |LE' AS YOUR ANSW|
00000120: 45 52 2E 22 00 3F 09 15  00 99 22 13 11 11 11 11  |ER.".?....".....|
00000130: 11 11 11 11 11 11 11 11  11 11 11 11 11 11 22 00  |..............".|
00000140: 48 09 63 00 89 31 31 30  00 6C 09 64 00 99 22 11  |H.c..110.l.d..".|
00000150: 50 52 45 53 53 20 12 52  45 54 55 52 4E 92 20 54  |PRESS .RETURN. T|
00000160: 4F 20 43 4F 4E 54 49 4E  55 45 2E 22 00 7F 09 65  |O CONTINUE."...e|
00000170: 00 A1 41 24 3A 8B 41 24  B2 22 22 A7 31 30 31 00  |..A$:.A$."".101.|
00000180: 92 09 66 00 8B C6 28 41  24 29 B3 B1 31 33 A7 31  |..f...(A$)..13.1|
00000190: 30 31 00 A7 09 67 00 99  22 11 12 53 54 41 4E 44  |01...g.."..STAND|
000001A0: 20 42 59 92 22 3A 8E 00  B0 09 6E 00 8D 31 30 30  | BY.":....n..100|
000001B0: 00 B9 09 78 00 4B 4C B2  34 00 E5 09 7D 00 99 22  |...x.KL.4...}.."|
000001C0: 93 22 3B A3 B5 28 28 34  30 AB C3 28 54 54 24 29  |.";..((40..(TT$)|
000001D0: 29 AD 32 29 29 3B 22 12  22 3B 54 54 24 3B 22 92  |).2));".";TT$;".|
000001E0: 22 3A 8F 23 41 00 F7 09  7E 00 99 22 11 4F 50 54  |":.#A...~..".OPT|
000001F0: 49 4F 4E 53 3A 11 22 00  0E 0A 82 00 99 22 41 29  |IONS:."......"A)|
00000200: 20 4E 4F 20 52 45 4D 41  49 4E 44 45 52 22 00 2B  | NO REMAINDER".+|
00000210: 0A 87 00 99 22 42 29 20  52 45 4D 41 49 4E 44 45  |...."B) REMAINDE|
00000220: 52 20 50 4F 53 53 49 42  4C 45 22 00 56 0A 91 00  |R POSSIBLE".V...|
00000230: 99 22 11 50 52 45 53 53  20 54 48 45 20 12 4C 45  |.".PRESS THE .LE|
00000240: 54 54 45 52 92 20 4F 46  20 59 4F 55 52 20 43 48  |TTER. OF YOUR CH|
00000250: 4F 49 43 45 2E 22 00 69  0A 96 00 A1 41 24 3A 8B  |OICE.".i....A$:.|
00000260: 41 24 B2 22 22 A7 31 35  30 00 84 0A 97 00 8B C6  |A$."".150.......|
00000270: 28 41 24 29 B3 36 35 B0  C6 28 41 24 29 B1 36 36  |(A$).65..(A$).66|
00000280: A7 31 35 30 00 94 0A 98  00 43 48 24 B2 41 24 3A  |.150.....CH$.A$:|
00000290: 99 43 48 24 00 C1 0A C8  00 99 22 11 48 4F 57 20  |.CH$......".HOW |
000002A0: 42 49 47 20 43 41 4E 20  54 48 45 20 44 49 56 49  |BIG CAN THE DIVI|
000002B0: 53 4F 52 20 42 45 3F 20  22 3B 3A 8D 31 30 33 31  |SOR BE? ";:.1031|
000002C0: 32 00 F3 0A CD 00 44 56  B2 C5 28 41 4E 24 29 3A  |2.....DV..(AN$):|
000002D0: 8B 44 56 B3 32 A7 99 22  11 12 49 4C 4C 45 47 41  |.DV.2.."..ILLEGA|
000002E0: 4C 2D 2D 54 52 59 20 41  47 41 49 4E 21 22 3A 89  |L--TRY AGAIN!":.|
000002F0: 32 30 30 00 04 0B D2 00  8B 43 48 24 B2 22 41 22  |200......CH$."A"|
00000300: A7 32 33 30 00 32 0B D7  00 99 22 11 48 4F 57 20  |.230.2....".HOW |
00000310: 42 49 47 20 43 41 4E 20  54 48 45 20 44 49 56 49  |BIG CAN THE DIVI|
00000320: 44 45 4E 44 20 42 45 3F  20 22 3B 3A 8D 31 30 33  |DEND BE? ";:.103|
00000330: 31 32 00 65 0B DC 00 44  44 B2 C5 28 41 4E 24 29  |12.e...DD..(AN$)|
00000340: 3A 8B 44 44 B3 44 56 A7  99 22 11 12 49 4C 4C 45  |:.DD.DV.."..ILLE|
00000350: 47 41 4C 2D 2D 54 52 59  20 41 47 41 49 4E 21 22  |GAL--TRY AGAIN!"|
00000360: 3A 89 32 31 35 00 6E 0B  E1 00 89 33 30 30 00 9C  |:.215.n....300..|
00000370: 0B E6 00 99 22 11 48 4F  57 20 42 49 47 20 43 41  |....".HOW BIG CA|
00000380: 4E 20 54 48 45 20 51 55  4F 54 49 45 4E 54 20 42  |N THE QUOTIENT B|
00000390: 45 3F 20 22 3B 3A 8D 31  30 33 31 32 00 CE 0B EB  |E? ";:.10312....|
000003A0: 00 51 51 B2 C5 28 41 4E  24 29 3A 8B 51 51 B3 32  |.QQ..(AN$):.QQ.2|
000003B0: A7 99 22 11 12 49 4C 4C  45 47 41 4C 2D 2D 54 52  |.."..ILLEGAL--TR|
000003C0: 59 20 41 47 41 49 4E 21  22 3A 89 32 33 30 00 11  |Y AGAIN!":.230..|
000003D0: 0C 2C 01 99 22 11 48 4F  57 20 4D 41 4E 59 20 49  |.,..".HOW MANY I|
000003E0: 54 45 4D 53 20 44 4F 20  59 4F 55 20 57 41 4E 54  |TEMS DO YOU WANT|
000003F0: 20 49 4E 20 54 48 49 53  20 44 52 49 4C 4C 22 3B  | IN THIS DRILL";|
00000400: 3A 8D 31 30 33 31 32 3A  48 4D B2 C5 28 41 4E 24  |:.10312:HM..(AN$|
00000410: 29 00 24 0C 36 01 8B 48  4D B3 B1 B5 28 48 4D 29  |).$.6..HM...(HM)|
00000420: A7 33 35 30 00 32 0C 3B  01 8B 48 4D B3 31 A7 33  |.350.2.;..HM.1.3|
00000430: 35 30 00 40 0C 59 01 4B  4C B2 31 3A 89 33 36 30  |50.@.Y.KL.1:.360|
00000440: 00 60 0C 5E 01 99 22 11  12 49 4C 4C 45 47 41 4C  |.`.^.."..ILLEGAL|
00000450: 20 52 45 53 50 4F 4E 53  45 92 22 3A 89 33 30 30  | RESPONSE.":.300|
00000460: 00 82 0C 68 01 4E 51 B2  31 3A 41 54 B2 30 3A 4E  |...h.NQ.1:AT.0:N|
00000470: 57 B2 30 3A 4E 43 B2 30  3A 4E 46 B2 30 3A 4D 4B  |W.0:NC.0:NF.0:MK|
00000480: B2 30 00 95 0C 6D 01 99  22 11 12 53 54 41 4E 44  |.0...m.."..STAND|
00000490: 20 42 59 92 22 00 B5 0C  6F 01 8F 20 44 4F 20 41  | BY."...o.. DO A|
000004A0: 20 47 4F 53 55 42 20 54  4F 20 53 45 54 20 55 50  | GOSUB TO SET UP|
000004B0: 20 54 45 53 54 00 BF 0C  72 01 8D 31 30 30 30 00  | TEST...r..1000.|
000004C0: CA 0C 7C 01 8D 31 30 30  30 30 00 D5 0C 86 01 8D  |..|..10000......|
000004D0: 31 30 33 30 30 00 E0 0C  90 01 8D 31 31 30 30 30  |10300......11000|
000004E0: 00 F8 0C 9A 01 91 43 44  89 34 32 30 2C 35 30 30  |......CD.420,500|
000004F0: 2C 35 35 30 2C 36 31 30  00 0A 0D A4 01 8B 4E 57  |,550,610......NW|
00000500: B2 30 A7 4E 43 B2 4E 43  AA 31 00 1C 0D A5 01 8B  |.0.NC.NC.1......|
00000510: 4E 57 B1 30 A7 4E 46 B2  4E 46 AA 31 00 2F 0D A6  |NW.0.NF.NF.1./..|
00000520: 01 8B 4E 57 B2 31 A7 4D  4B B2 4D 4B AA 2E 35 00  |..NW.1.MK.MK..5.|
00000530: 43 0D A7 01 8B 4E 57 B2  32 A7 4D 4B B2 4D 4B AA  |C....NW.2.MK.MK.|
00000540: 2E 32 35 00 58 0D AE 01  99 22 11 12 52 49 47 48  |.25.X...."..RIGH|
00000550: 54 92 22 3A 8D 31 30 30  00 74 0D B8 01 4E 51 B2  |T.":.100.t...NQ.|
00000560: 4E 51 AA 31 3A 4E 57 B2  30 3A 8B 4E 51 B1 48 4D  |NQ.1:NW.0:.NQ.HM|
00000570: A7 37 30 30 00 7D 0D C2  01 89 33 37 30 00 97 0D  |.700.}....370...|
00000580: F4 01 99 22 11 57 52 4F  4E 47 2E 20 20 22 3B 3A  |...".WRONG.  ";:|
00000590: 4E 57 B2 4E 57 AA 31 00  A5 0D FE 01 8B 4E 57 B3  |NW.NW.1......NW.|
000005A0: 33 A7 36 30 30 00 AB 0D  08 02 99 00 CF 0D 12 02  |3.600...........|
000005B0: 99 22 11 54 48 45 20 43  4F 52 52 45 43 54 20 41  |.".THE CORRECT A|
000005C0: 4E 53 57 45 52 20 49 53  3A 22 3A 99 52 41 24 00  |NSWER IS:":.RA$.|
000005D0: DD 0D 1C 02 8D 31 30 30  3A 89 34 34 30 00 FC 0D  |.....100:.440...|
000005E0: 26 02 99 22 11 43 4C 4F  53 45 21 20 20 22 3B 3A  |&..".CLOSE!  ";:|
000005F0: 4E 57 B2 4E 57 AA 31 3A  89 35 31 30 00 0E 0E 58  |NW.NW.1:.510...X|
00000600: 02 99 22 54 52 59 20 41  47 41 49 4E 2E 22 00 33  |.."TRY AGAIN.".3|
00000610: 0E 5D 02 8D 39 31 30 3A  4D 54 B2 54 49 3A 8D 31  |.]..910:MT.TI:.1|
00000620: 30 30 3A 41 54 B2 41 54  AA 54 49 AB 4D 54 3A 89  |00:AT.AT.TI.MT:.|
00000630: 33 38 30 00 41 0E 62 02  4E 57 B2 33 3A 89 35 32  |380.A.b.NW.3:.52|
00000640: 30 00 69 0E BC 02 99 22  93 22 3B A3 B5 28 28 34  |0.i....".";..((4|
00000650: 30 AB C3 28 54 54 24 29  29 AD 32 29 29 3B 22 12  |0..(TT$)).2));".|
00000660: 22 3B 54 54 24 3B 22 92  22 00 7E 0E C1 02 8F 20  |";TT$;".".~.... |
00000670: 4F 50 54 49 4F 4E 20 4D  45 53 53 41 47 45 00 9B  |OPTION MESSAGE..|
00000680: 0E C2 02 99 22 11 4F 50  54 49 4F 4E 28 53 29 3A  |....".OPTION(S):|
00000690: 20 20 22 3B 43 48 24 3A  8F 23 41 00 BB 0E C6 02  |  ";CH$:.#A.....|
000006A0: 53 43 B2 B5 28 28 4E 43  AC 31 30 30 AD 48 4D AA  |SC..((NC.100.HM.|
000006B0: 2E 30 35 29 AC 31 30 29  AD 31 30 00 E0 0E C7 02  |.05).10).10.....|
000006C0: 4D 4B B2 B5 28 28 28 4E  43 AA 4D 4B 29 AC 31 30  |MK..(((NC.MK).10|
000006D0: 30 AD 48 4D AA 2E 30 35  29 AC 31 30 29 AD 31 30  |0.HM..05).10).10|
000006E0: 00 1A 0F CB 02 4D 4E B2  B5 28 41 54 AD 33 36 30  |.....MN..(AT.360|
000006F0: 30 29 3A 53 4E B2 28 41  54 AB 33 36 30 30 AC 4D  |0):SN.(AT.3600.M|
00000700: 4E 29 AD 36 30 3A 53 44  B2 B5 28 28 53 4E AA 2E  |N).60:SD..((SN..|
00000710: 30 35 29 AC 31 30 29 AD  31 30 00 5A 0F D0 02 54  |05).10).10.Z...T|
00000720: 32 B2 B5 28 28 28 41 54  AD 36 30 29 AD 48 4D AA  |2..(((AT.60).HM.|
00000730: 2E 30 35 29 AC 31 30 29  AD 31 30 3A 54 33 B2 B5  |.05).10).10:T3..|
00000740: 28 28 4E 43 AD 28 41 54  AD 33 36 30 30 29 AA 2E  |((NC.(AT.3600)..|
00000750: 30 35 29 AC 31 30 29 AD  31 30 00 81 0F DA 02 99  |05).10).10......|
00000760: 22 11 54 48 49 53 20 44  52 49 4C 4C 20 48 41 44  |".THIS DRILL HAD|
00000770: 22 3B 48 4D 3B 22 51 55  45 53 54 49 4F 4E 53 2C  |";HM;"QUESTIONS,|
00000780: 22 00 A2 0F DF 02 99 22  59 4F 55 20 43 4F 52 52  |"......"YOU CORR|
00000790: 45 43 54 4C 59 20 41 4E  53 57 45 52 45 44 22 3B  |ECTLY ANSWERED";|
000007A0: 4E 43 00 C9 0F E4 02 99  22 59 4F 55 52 20 53 43  |NC......"YOUR SC|
000007B0: 4F 52 45 20 49 53 20 12  22 3B CA 28 C4 28 53 43  |ORE IS .";.(.(SC|
000007C0: 29 2C 32 29 3B 22 92 25  22 00 D7 0F E9 02 8B 4E  |),2);".%"......N|
000007D0: 46 B2 30 A7 37 36 30 00  FD 0F EE 02 99 22 1D 1D  |F.0.760......"..|
000007E0: 28 41 4C 53 4F 2C 20 59  4F 55 20 52 45 43 4F 56  |(ALSO, YOU RECOV|
000007F0: 45 52 45 44 20 46 52 4F  4D 22 3B 4E 46 00 2B 10  |ERED FROM";NF.+.|
00000800: F3 02 99 22 1D 1D 1D 41  4E 20 41 44 4A 55 53 54  |..."...AN ADJUST|
00000810: 45 44 20 53 43 4F 52 45  20 57 4F 55 4C 44 20 42  |ED SCORE WOULD B|
00000820: 45 22 3B 4D 4B 3B 22 9D  25 29 22 00 49 10 F8 02  |E";MK;".%)".I...|
00000830: 99 22 11 54 4F 54 41 4C  20 54 49 4D 45 20 54 41  |.".TOTAL TIME TA|
00000840: 4B 45 4E 20 57 41 53 22  3B 00 57 10 FD 02 8B 4D  |KEN WAS";.W....M|
00000850: 4E B2 30 A7 37 37 35 00  71 10 02 03 99 4D 4E 3B  |N.0.775.q....MN;|
00000860: 22 4D 49 4E 55 54 45 53  2C 22 3A 99 A3 32 30 29  |"MINUTES,":..20)|
00000870: 3B 00 84 10 07 03 99 53  44 3B 22 53 45 43 4F 4E  |;......SD;"SECON|
00000880: 44 53 2E 22 00 B9 10 0C  03 99 22 54 48 41 54 27  |DS."......"THAT'|
00000890: 53 20 12 22 3B CA 28 C4  28 54 32 29 2C 32 29 3B  |S .";.(.(T2),2);|
000008A0: 22 92 20 53 45 43 4F 4E  44 53 20 50 45 52 20 51  |". SECONDS PER Q|
000008B0: 55 45 53 54 49 4F 4E 2E  22 00 E9 10 11 03 99 22  |UESTION."......"|
000008C0: 59 4F 55 20 44 49 44 22  3B 54 33 3B 22 43 4F 52  |YOU DID";T3;"COR|
000008D0: 52 45 43 54 20 41 4E 53  57 45 52 53 20 50 45 52  |RECT ANSWERS PER|
000008E0: 20 4D 49 4E 55 54 45 2E  22 00 FB 10 20 03 8D 32  | MINUTE."... ..2|
000008F0: 30 30 30 30 3A 8D 32 31  30 30 30 00 42 11 25 03  |0000:.21000.B.%.|
00000900: 99 22 11 44 4F 20 59 4F  55 20 57 41 4E 54 20 54  |.".DO YOU WANT T|
00000910: 48 45 20 53 41 4D 45 20  4F 50 54 49 4F 4E 28 53  |HE SAME OPTION(S|
00000920: 29 20 28 59 20 4F 52 20  4E 29 3F 22 3A 8F 20 3F  |) (Y OR N)?":. ?|
00000930: 26 38 31 30 2D 38 34 30  3F 26 47 4F 54 4F 31 31  |&810-840?&GOTO11|
00000940: 30 3F 00 55 11 2A 03 A1  41 24 3A 8B 41 24 B2 22  |0?.U.*..A$:.A$."|
00000950: 22 A7 38 31 30 00 65 11  34 03 8B 41 24 B2 22 4E  |".810.e.4..A$."N|
00000960: 22 A7 31 32 30 00 7B 11  3E 03 8B 41 24 B2 22 59  |".120.{.>..A$."Y|
00000970: 22 A7 99 22 93 22 3A 89  33 30 30 00 84 11 48 03  |"..".":.300...H.|
00000980: 89 38 31 30 00 B8 11 84  03 97 33 33 37 34 37 2C  |.810......33747,|
00000990: 33 3A 97 33 33 37 34 38  2C 31 32 3A 97 33 33 37  |3:.33748,12:.337|
000009A0: 34 39 2C 31 35 3A 97 33  33 37 35 30 2C 33 3A 97  |49,15:.33750,3:.|
000009B0: 33 33 37 35 31 2C 31 31  00 D1 11 85 03 97 33 33  |33751,11......33|
000009C0: 37 35 33 2C 39 3A 97 33  33 37 35 34 2C 31 39 3A  |753,9:.33754,19:|
000009D0: 8E 00 06 12 8E 03 97 33  33 37 35 36 2C 31 38 3A  |.......33756,18:|
000009E0: 97 33 33 37 35 37 2C 32  31 3A 97 33 33 37 35 38  |.33757,21:.33758|
000009F0: 2C 31 34 3A 97 33 33 37  35 39 2C 31 34 3A 97 33  |,14:.33759,14:.3|
00000A00: 33 37 36 30 2C 39 00 29  12 8F 03 97 33 33 37 36  |3760,9.)....3376|
00000A10: 31 2C 31 34 3A 97 33 33  37 36 32 2C 37 3A 8E 3A  |1,14:.33762,7:.:|
00000A20: 8F 20 52 55 4E 4E 49 4E  47 00 48 12 98 03 81 49  |. RUNNING.H....I|
00000A30: 39 B2 33 33 37 35 36 A4  33 33 37 36 32 3A 97 49  |9.33756.33762:.I|
00000A40: 39 2C 33 32 3A 82 49 39  00 70 12 99 03 97 33 33  |9,32:.I9.p....33|
00000A50: 37 35 36 2C 31 35 3A 97  33 33 37 35 37 2C 36 3A  |756,15:.33757,6:|
00000A60: 97 33 33 37 35 38 2C 36  3A 8E 3A 8F 20 4F 46 46  |.33758,6:.:. OFF|
00000A70: 00 8D 12 E8 03 56 B2 31  AA B5 28 44 56 AC BB 28  |.....V.1..(DV..(|
00000A80: 31 29 29 3A 8B 56 B2 31  A7 31 30 30 30 00 9F 12  |1)):.V.1.1000...|
00000A90: ED 03 8B 43 48 24 B2 22  42 22 A7 31 31 30 30 00  |...CH$."B".1100.|
00000AA0: C8 12 F2 03 51 B2 31 AA  B5 28 51 51 AC BB 28 31  |....Q.1..(QQ..(1|
00000AB0: 29 29 3A 44 B2 56 AC 51  3A 52 41 24 B2 CA 28 C4  |)):D.V.Q:RA$..(.|
00000AC0: 28 51 29 2C 32 29 3A 8E  00 F0 12 4C 04 44 B2 56  |(Q),2):....L.D.V|
00000AD0: AA B5 28 BB 28 32 29 AC  28 44 44 AB 56 29 29 3A  |..(.(2).(DD.V)):|
00000AE0: 51 B2 B5 28 44 AD 56 29  3A 52 B2 44 AB 51 AC 56  |Q..(D.V):R.D.Q.V|
00000AF0: 00 14 13 56 04 52 41 24  B2 C4 28 51 29 AA 22 20  |...V.RA$..(Q)." |
00000B00: 57 49 54 48 20 52 45 4D  41 49 4E 44 45 52 22 AA  |WITH REMAINDER".|
00000B10: C4 28 52 29 00 1A 13 14  05 8E 00 42 13 10 27 99  |.(R).......B..'.|
00000B20: 22 93 22 3B A3 B5 28 28  34 30 AB C3 28 54 54 24  |".";..((40..(TT$|
00000B30: 29 29 AD 32 29 29 3B 22  12 22 3B 54 54 24 3B 22  |)).2));".";TT$;"|
00000B40: 92 22 00 65 13 15 27 99  22 11 23 22 3B 4E 51 3B  |.".e..'.".#";NQ;|
00000B50: A3 31 39 29 3B 48 4D 3B  22 49 54 45 4D 20 44 52  |.19);HM;"ITEM DR|
00000B60: 49 4C 4C 11 22 00 7E 13  1B 27 99 22 4F 50 54 49  |ILL.".~..'."OPTI|
00000B70: 4F 4E 3A 20 20 22 3B 43  48 24 3B 22 11 22 00 A4  |ON:  ";CH$;"."..|
00000B80: 13 2E 27 99 22 11 11 11  11 22 3B A3 31 32 29 3B  |..'."....";.12);|
00000B90: 22 A5 9D 11 A5 9D 91 91  CF A3 A3 A3 A3 A3 A3 A3  |"...............|
00000BA0: A3 A3 A3 22 00 DC 13 33  27 99 A3 31 31 AB C3 28  |..."...3'..11..(|
00000BB0: C4 28 56 29 29 29 3B 56  3B 22 1D 22 3B 44 3B 22  |.(V)));V;".";D;"|
00000BC0: 91 91 22 3B C8 28 22 9D  9D 9D 9D 9D 9D 9D 9D 9D  |..";.(".........|
00000BD0: 9D 22 2C C3 28 C4 28 51  29 29 29 3B 00 E2 13 3B  |.",.(.(Q)));...;|
00000BE0: 28 8E 00 F6 13 3C 28 8D  39 30 30 3A 8D 39 31 30  |(....<(.900:.910|
00000BF0: 3A 4D 54 B2 54 49 00 FF  13 46 28 4B 4C B2 31 00  |:MT.TI...F(KL.1.|
00000C00: 13 14 47 28 8F 23 4D 20  53 54 41 52 54 53 20 48  |..G(.#M STARTS H|
00000C10: 45 52 45 00 1E 14 48 28  41 4E 24 B2 22 22 00 34  |ERE...H(AN$."".4|
00000C20: 14 49 28 A1 41 24 3A 8B  41 24 B3 B1 22 22 A7 31  |.I(.A$:.A$.."".1|
00000C30: 30 33 33 30 00 47 14 4A  28 99 22 12 20 92 9D 22  |0330.G.J(.". .."|
00000C40: 3B 3A 4D 55 B2 54 49 00  5B 14 4B 28 8B 54 49 AB  |;:MU.TI.[.K(.TI.|
00000C50: 4D 55 B3 31 30 A7 31 30  33 31 35 00 71 14 4C 28  |MU.10.10315.q.L(|
00000C60: A1 41 24 3A 8B 41 24 B3  B1 22 22 A7 31 30 33 33  |.A$:.A$.."".1033|
00000C70: 30 00 82 14 4D 28 99 22  20 9D 22 3B 3A 4D 55 B2  |0...M(." .";:MU.|
00000C80: 54 49 00 96 14 4E 28 8B  54 49 AB 4D 55 B3 31 30  |TI...N(.TI.MU.10|
00000C90: A7 31 30 33 31 38 00 A1  14 4F 28 89 31 30 33 31  |.10318...O(.1031|
00000CA0: 33 00 BC 14 5A 28 8B C6  28 41 24 29 B2 31 33 AF  |3...Z(..(A$).13.|
00000CB0: 41 4E 24 B2 22 22 A7 31  30 33 31 33 00 D7 14 5B  |AN$."".10313...[|
00000CC0: 28 8B C6 28 41 24 29 B2  32 30 AF 41 4E 24 B2 22  |(..(A$).20.AN$."|
00000CD0: 22 A7 31 30 33 31 33 00  01 15 5C 28 8B C6 28 41  |".10313...\(..(A|
00000CE0: 24 29 B2 32 30 AF C3 28  41 4E 24 29 B2 31 A7 41  |$).20..(AN$).1.A|
00000CF0: 4E 24 B2 22 22 3A 99 41  24 3B 3A 89 31 30 33 31  |N$."":.A$;:.1031|
00000D00: 33 00 2F 15 5D 28 8B C6  28 41 24 29 B2 32 30 A7  |3./.](..(A$).20.|
00000D10: 99 41 24 3B 3A 41 4E 24  B2 C8 28 41 4E 24 2C C3  |.A$;:AN$..(AN$,.|
00000D20: 28 41 4E 24 29 AB 31 29  3A 89 31 30 33 31 33 00  |(AN$).1):.10313.|
00000D30: 43 15 5E 28 8B C6 28 41  24 29 B2 31 33 A7 31 30  |C.^(..(A$).13.10|
00000D40: 33 35 30 00 4C 15 5F 28  49 49 B2 31 00 77 15 60  |350.L._(II.1.w.`|
00000D50: 28 8B 41 24 B2 CA 28 4C  41 24 2C 49 49 2C 31 29  |(.A$..(LA$,II,1)|
00000D60: A7 99 41 24 3B 3A 41 4E  24 B2 41 4E 24 AA 41 24  |..A$;:AN$.AN$.A$|
00000D70: 3A 89 31 30 33 31 33 00  95 15 61 28 49 49 B2 49  |:.10313...a(II.I|
00000D80: 49 AA 31 3A 8B 49 49 B3  B2 C3 28 4C 41 24 29 A7  |I.1:.II...(LA$).|
00000D90: 31 30 33 33 36 00 A0 15  62 28 89 31 30 33 31 33  |10336...b(.10313|
00000DA0: 00 AA 15 6E 28 99 22 20  22 3B 00 B8 15 6F 28 8B  |...n(." ";...o(.|
00000DB0: 4B 4C B2 34 A7 99 3A 8E  00 DB 15 73 28 8B 4B 4C  |KL.4..:....s(.KL|
00000DC0: B2 32 B0 43 48 24 B2 22  41 22 A7 99 3A 99 22 11  |.2.CH$."A"..:.".|
00000DD0: 11 11 11 22 3A 89 31 30  33 39 39 00 FD 15 75 28  |...":.10399...u(|
00000DE0: 8B 41 4E 24 B2 22 55 4E  43 4C 45 22 A7 99 3A 99  |.AN$."UNCLE"..:.|
00000DF0: 22 11 11 11 11 22 3A 89  31 30 33 39 39 00 28 16  |"....":.10399.(.|
00000E00: 78 28 4B 4C B2 32 3A 51  41 24 B2 41 4E 24 3A 99  |x(KL.2:QA$.AN$:.|
00000E10: 22 20 20 52 45 4D 41 49  4E 44 45 52 3A 20 20 22  |"  REMAINDER:  "|
00000E20: 3B 3A 89 31 30 33 31 32  00 3F 16 9F 28 41 54 B2  |;:.10312.?..(AT.|
00000E30: 41 54 AA 54 49 AB 4D 54  3A 8D 39 32 30 3A 8E 00  |AT.TI.MT:.920:..|
00000E40: 5A 16 F8 2A 8F 20 44 45  43 49 44 45 20 41 4E 53  |Z..*. DECIDE ANS|
00000E50: 57 45 52 20 53 54 41 54  55 53 00 6C 16 F9 2A 8F  |WER STATUS.l..*.|
00000E60: 20 52 49 47 48 54 2D 2D  43 44 3D 31 00 7E 16 FA  | RIGHT--CD=1.~..|
00000E70: 2A 8F 20 57 52 4F 4E 47  2D 2D 43 44 3D 32 00 90  |*. WRONG--CD=2..|
00000E80: 16 FB 2A 8F 20 43 4C 4F  53 45 2D 2D 43 44 3D 33  |..*. CLOSE--CD=3|
00000E90: 00 A2 16 FC 2A 8F 20 55  4E 43 4C 45 2D 2D 43 44  |....*. UNCLE--CD|
00000EA0: 3D 34 00 BA 16 07 2B 8B  41 4E 24 B2 22 55 4E 43  |=4....+.AN$."UNC|
00000EB0: 4C 45 22 A7 43 44 B2 34  3A 8E 00 CD 16 0C 2B 8B  |LE".CD.4:.....+.|
00000EC0: 43 48 24 B2 22 42 22 A7  31 31 31 30 30 00 E2 16  |CH$."B".11100...|
00000ED0: 11 2B 8B 51 B2 C5 28 41  4E 24 29 A7 43 44 B2 31  |.+.Q..(AN$).CD.1|
00000EE0: 3A 8E 00 ED 16 16 2B 43  44 B2 32 3A 8E 00 03 17  |:.....+CD.2:....|
00000EF0: 5C 2B 8B 51 B3 B1 C5 28  51 41 24 29 A7 43 44 B2  |\+.Q...(QA$).CD.|
00000F00: 32 3A 8E 00 19 17 66 2B  8B 52 B3 B1 C5 28 41 4E  |2:....f+.R...(AN|
00000F10: 24 29 A7 43 44 B2 33 3A  8E 00 24 17 70 2B 43 44  |$).CD.3:..$.p+CD|
00000F20: B2 31 3A 8E 00 3A 17 20  4E 8F 20 4D 45 53 53 41  |.1:..:. N. MESSA|
00000F30: 47 45 20 53 45 43 54 49  4F 4E 00 63 17 21 4E 8F  |GE SECTION.c.!N.|
00000F40: 20 53 45 4C 45 43 54 20  56 41 4C 55 45 20 4F 46  | SELECT VALUE OF|
00000F50: 20 43 44 20 54 4F 20 50  49 43 4B 20 4D 45 53 53  | CD TO PICK MESS|
00000F60: 41 47 45 00 7F 17 25 4E  8B 48 4D B1 34 AF 4E 43  |AGE...%N.HM.4.NC|
00000F70: AA 4E 46 B3 48 4D AD 32  A7 43 44 B2 33 3A 8E 00  |.NF.HM.2.CD.3:..|
00000F80: 97 17 26 4E 8B 48 4D B3  35 AF 53 43 B2 31 30 30  |..&N.HM.5.SC.100|
00000F90: A7 43 44 B2 32 3A 8E 00  A8 17 27 4E 8B 48 4D B3  |.CD.2:....'N.HM.|
00000FA0: 35 A7 43 44 B2 31 3A 8E  00 BA 17 28 4E 8B 4E 43  |5.CD.1:....(N.NC|
00000FB0: B2 48 4D A7 43 44 B2 34  3A 8E 00 CF 17 29 4E 8B  |.HM.CD.4:....)N.|
00000FC0: 4E 43 AA 4E 46 B2 48 4D  A7 43 44 B2 32 3A 8E 00  |NC.NF.HM.CD.2:..|
00000FD0: D8 17 84 4E 43 44 B2 31  00 DE 17 07 52 8E 00 FE  |...NCD.1....R...|
00000FE0: 17 08 52 91 43 44 89 32  31 30 31 30 2C 32 31 30  |..R.CD.21010,210|
00000FF0: 31 31 2C 32 31 30 31 32  2C 32 31 30 31 33 00 04  |11,21012,21013..|
00001000: 18 12 52 8E 00 25 18 13  52 99 22 11 22 3B A3 31  |..R..%..R.".";.1|
00001010: 33 29 3B 22 2D 2D 57 45  4C 4C 20 44 4F 4E 45 2D  |3);"--WELL DONE-|
00001020: 2D 11 22 3A 8E 00 53 18  14 52 99 22 11 22 3B A3  |-.":..S..R.".";.|
00001030: 37 29 3B 22 47 45 54 20  48 45 4C 50 20 46 52 4F  |7);"GET HELP FRO|
00001040: 4D 20 59 4F 55 52 20 54  45 41 43 48 45 52 21 11  |M YOUR TEACHER!.|
00001050: 22 3A 8E 00 5C 18 15 52  99 22 11 22 00 74 18 16  |":..\..R.".".t..|
00001060: 52 99 A3 31 34 29 3B 22  D3 D3 D3 D3 D3 D3 D3 D3  |R..14);"........|
00001070: D3 D3 D3 22 00 8C 18 17  52 99 A3 31 34 29 3B 22  |..."....R..14);"|
00001080: D3 46 41 4E 54 41 53 54  49 43 D3 22 00 A4 18 18  |.FANTASTIC."....|
00001090: 52 99 A3 31 34 29 3B 22  D3 D3 D3 D3 D3 D3 D3 D3  |R..14);"........|
000010A0: D3 D3 D3 22 00 AC 18 19  52 99 3A 8E 00 00 00 49  |..."....R.:....I|
......LA$."0123456789UNCLE".(...X..(.TI)
.N...TT$."DIVISION OF NATURAL NUMBERS".V
....".";..((40.C(TT$)).2));".";TT$;"."..
....".";.12);"BY D. S. COOPER"......".";
.12);"SCHREIBER, 1980"......".....IF YOU
 WISH TO GIVE UP ON"......"A PARTICULAR 
QUESTION,".$....".JUST TYPE 'UNCLE' AS Y
OUR ANSWER.".?...."...................".
H.C..110.L.D..".PRESS .RETURN. TO CONTIN
UE."..E..A$:.A$."".101...F..F(A$)..13.1
01...G.."..STAND BY.":....N..100...X.KL.
4...}..".";..((40.C(TT$)).2));".";TT$;".
":.#A...~..".OPTIONS:."......"A) NO REMA
INDER".+...."B) REMAINDER POSSIBLE".V...
.".PRESS THE .LETTER. OF YOUR CHOICE.".I
....A$:.A$."".150......F(A$).65.F(A$).66
.150.....CH$.A$:.CH$.A.H..".HOW BIG CAN 
THE DIVISOR BE? ";:.10312...M.DV.E(AN$):
.DV.2.."..ILLEGAL--TRY AGAIN!":.200...R.
.CH$."A".230.2.W..".HOW BIG CAN THE DIVI
DEND BE? ";:.10312.E...DD.E(AN$):.DD.DV.
."..ILLEGAL--TRY AGAIN!":.215.N....300..
....".HOW BIG CAN THE QUOTIENT BE? ";:.1
0312.N...QQ.E(AN$):.QQ.2.."..ILLEGAL--TR
Y AGAIN!":.230...,..".HOW MANY ITEMS DO 
YOU WANT IN THIS DRILL";:.10312:HM.E(AN$
).$.6..HM...(HM).350.2.;..HM.1.350.@.Y.K
L.1:.360.`.^.."..ILLEGAL RESPONSE.":.300
...H.NQ.1:AT.0:NW.0:NC.0:NF.0:MK.0...M..
"..STAND BY."...O.. DO A GOSUB TO SET UP
 TEST...R..1000.J.|..10000.U....10300...
...11000......CD.420,500,550,610......NW
.0.NC.NC.1......NW.0.NF.NF.1./....NW.1.M
K.MK..5.C....NW.2.MK.MK..25.X...."..RIGH
T.":.100.T...NQ.NQ.1:NW.0:.NQ.HM.700.}.B
..370......".WRONG.  ";:NW.NW.1......NW.
3.600.......O....".THE CORRECT ANSWER IS
:":.RA$......100:.440...&..".CLOSE!  ";:
NW.NW.1:.510...X.."TRY AGAIN.".3.]..910:
MT.TI:.100:AT.AT.TI.MT:.380.A.B.NW.3:.52
0.I....".";..((40.C(TT$)).2));".";TT$;".
".~.A.. OPTION MESSAGE...B..".OPTION(S):
  ";CH$:.#A...F.SC..((NC.100.HM..05).10)
.10...G.MK..(((NC.MK).100.HM..05).10).10
...K.MN..(AT.3600):SN.(AT.3600.MN).60:SD
..((SN..05).10).10.Z.P.T2..(((AT.60).HM.
.05).10).10:T3..((NC.(AT.3600)..05).10).
10...Z..".THIS DRILL HAD";HM;"QUESTIONS,
"......"YOU CORRECTLY ANSWERED";NC.I....
"YOUR SCORE IS .";J(D(SC),2);".%".W....N
F.0.760......"..(ALSO, YOU RECOVERED FRO
M";NF.+...."...AN ADJUSTED SCORE WOULD B
E";MK;".%)".I....".TOTAL TIME TAKEN WAS"
;.W....MN.0.775.Q....MN;"MINUTES,":..20)
;......SD;"SECONDS."......"THAT'S .";J(D
(T2),2);". SECONDS PER QUESTION."......"
YOU DID";T3;"CORRECT ANSWERS PER MINUTE.
"... ..20000:.21000.B.%..".DO YOU WANT T
HE SAME OPTION(S) (Y OR N)?":. ?&810-840
?&GOTO110?.U.*..A$:.A$."".810.E.4..A$."N
".120.{.>..A$."Y"..".":.300...H..810....
..33747,3:.33748,12:.33749,15:.33750,3:.
33751,11.Q....33753,9:.33754,19:.......3
3756,18:.33757,21:.33758,14:.33759,14:.3
3760,9.)....33761,14:.33762,7:.:. RUNNIN
G.H....I9.33756.33762:.I9,32:.I9.P....33
756,15:.33757,6:.33758,6:.:. OFF.....V.1
..(DV..(1)):.V.1.1000......CH$."B".1100.
H...Q.1..(QQ..(1)):D.V.Q:RA$.J(D(Q),2):.
...L.D.V..(.(2).(DD.V)):Q..(D.V):R.D.Q.V
...V.RA$.D(Q)." WITH REMAINDER".D(R)....
...B..'.".";..((40.C(TT$)).2));".";TT$;"
.".E..'.".#";NQ;.19);HM;"ITEM DRILL.".~.
.'."OPTION:  ";CH$;"."....'."....";.12);
".......O.........."...3'..11.C(D(V)));V
;".";D;"..";H("..........",C(D(Q)));...;
(....<(.900:.910:MT.TI...F(KL.1...G(.#M 
STARTS HERE...H(AN$."".4.I(.A$:.A$.."".1
0330.G.J(.". ..";:MU.TI.[.K(.TI.MU.10.10
315.Q.L(.A$:.A$.."".10330...M(." .";:MU.
TI...N(.TI.MU.10.10318...O(.10313...Z(.F
(A$).13.AN$."".10313.W.[(.F(A$).20.AN$."
".10313...\(.F(A$).20.C(AN$).1.AN$."":.A
$;:.10313./.](.F(A$).20..A$;:AN$.H(AN$,C
(AN$).1):.10313.C.^(.F(A$).13.10350.L._(
II.1.W.`(.A$.J(LA$,II,1)..A$;:AN$.AN$.A$
:.10313...A(II.II.1:.II..C(LA$).10336. .
B(.10313...N(." ";...O(.KL.4..:....S(.KL
.2.CH$."A"..:."....":.10399...U(.AN$."UN
CLE"..:."....":.10399.(.X(KL.2:QA$.AN$:.
"  REMAINDER:  ";:.10312.?..(AT.AT.TI.MT
:.920:..Z..*. DECIDE ANSWER STATUS.L..*.
 RIGHT--CD=1.~..*. WRONG--CD=2....*. CLO
SE--CD=3....*. UNCLE--CD=4....+.AN$."UNC
LE".CD.4:..M..+.CH$."B".11100....+.Q.E(A
N$).CD.1:.....+CD.2:....\+.Q..E(QA$).CD.
2:....F+.R..E(AN$).CD.3:..$.P+CD.1:..:. 
N. MESSAGE SECTION.C.!N. SELECT VALUE OF
 CD TO PICK MESSAGE..%N.HM.4.NC.NF.HM.2
.CD.3:....&N.HM.5.SC.100.CD.2:....'N.HM.
5.CD.1:....(N.NC.HM.CD.4:..O.)N.NC.NF.HM
.CD.2:..X..NCD.1....R.....R.CD.21010,210
11,21012,21013....R..%..R.".";.13);"--WE
LL DONE--.":..S..R.".";.7);"GET HELP FRO
M YOUR TEACHER!.":..\..R.".".T..R..14);"
SSSSSSSSSSS"....R..14);"SFANTASTICS"....
R..14);"SSSSSSSSSSS"....R.:....I
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL