BIGTIME.C2
FILE INFORMATION
FILENAME(S): BIGTIME.C2
FILE TYPE(S): PRG
FILE SIZE: 9.7K
FIRST SEEN: 2025-11-30 01:07:54
APPEARS ON: 2 disk(s)
FILE HASH
00017fa084f4a3db05ee14370b0a64067acc5d90725c3fea4ac5397f5269d1f1
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FREESOFT DISK NR | BIGTIME.C2 | PRG | Treasure Chest - Wolfgang Rauprich | 29 | 6 | DOWNLOAD FILE |
| D IVERSE | BIGTIME.C2 | PRG | Treasure Chest - Wolfgang Rauprich | 29 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 04 0A 04 01 00 89 39 31 30 00 2A 04 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 04 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 04 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 04 05 00 99 22 68 68 68 68 68 |111"......"hhhhh|
00000080: 68 68 60 31 22 00 A7 04 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 04 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 04 0F 00 3A 00 F2 |UTINE **.....:..|
000000D0: 04 14 00 8F 20 2A 2A 20 54 4F 20 4F 55 52 20 42 |.... ** TO OUR B|
000000E0: 45 53 54 20 4B 4E 4F 57 4C 45 44 47 45 20 54 48 |EST KNOWLEDGE TH|
000000F0: 49 53 00 0F 05 15 00 8F 20 20 20 20 50 52 4F 47 |IS...... PROG|
00000100: 52 41 4D 20 49 53 20 46 52 45 45 20 46 4F 52 00 |RAM IS FREE FOR.|
00000110: 2F 05 16 00 8F 20 20 20 20 44 55 50 4C 49 43 41 |/.... DUPLICA|
00000120: 54 49 4F 4E 20 49 4E 20 43 41 4E 41 44 41 2E 00 |TION IN CANADA..|
00000130: 4C 05 17 00 8F 20 20 20 20 49 46 20 59 4F 55 20 |L.... IF YOU |
00000140: 48 41 56 45 20 43 4F 4E 54 41 52 59 00 69 05 18 |HAVE CONTARY.i..|
00000150: 00 8F 20 20 20 20 49 4E 46 4F 52 4D 41 54 49 4F |.. INFORMATIO|
00000160: 4E 2C 20 50 4C 45 41 53 45 00 8F 05 19 00 8F 20 |N, PLEASE...... |
00000170: 20 20 20 43 4F 4E 54 41 43 54 20 43 4F 4D 4D 4F | CONTACT COMMO|
00000180: 44 4F 52 45 20 43 41 4E 41 44 41 20 41 4E 44 00 |DORE CANADA AND.|
00000190: B5 05 1A 00 8F 20 20 20 20 45 56 45 52 59 20 45 |..... EVERY E|
000001A0: 46 46 4F 52 54 20 57 49 4C 4C 20 42 45 20 4D 41 |FFORT WILL BE MA|
000001B0: 44 45 20 54 4F 00 D6 05 1B 00 8F 20 20 20 20 57 |DE TO...... W|
000001C0: 49 54 48 44 52 41 57 20 43 4F 50 49 45 53 20 4F |ITHDRAW COPIES O|
000001D0: 46 20 54 48 49 53 00 E8 05 1C 00 8F 20 20 20 20 |F THIS...... |
000001E0: 50 52 4F 47 52 41 4D 2E 00 EE 05 1E 00 3A 00 0A |PROGRAM......:..|
000001F0: 06 23 00 8F 20 2B 2B 2B 20 49 4E 50 55 54 20 53 |.#.. +++ INPUT S|
00000200: 45 43 54 49 4F 4E 20 2B 2B 2B 00 22 06 28 00 97 |ECTION +++.".(..|
00000210: 55 4F 2C 30 3A 55 52 24 B2 22 22 3A 55 49 24 B2 |UO,0:UR$."":UI$.|
00000220: 22 22 00 32 06 2A 00 8B 55 4C B2 30 A7 55 4C B2 |"".2.*..UL.0.UL.|
00000230: 38 30 00 3C 06 2D 00 97 55 43 2C 30 00 50 06 32 |80.<.-..UC,0.P.2|
00000240: 00 A1 55 49 24 3A 8B 55 49 24 B2 22 22 A7 35 30 |..UI$:.UI$."".50|
00000250: 00 7A 06 37 00 8B 55 49 24 B2 C7 28 31 33 29 AF |.z.7..UI$..(13).|
00000260: C3 28 55 52 24 29 B1 B2 31 A7 97 55 43 2C 31 3A |.(UR$)..1..UC,1:|
00000270: 99 22 20 9D 22 3B 3A 89 38 35 00 8D 06 3C 00 8B |." .";:.85...<..|
00000280: 55 49 24 B2 C7 28 32 30 29 A7 31 30 35 00 A1 06 |UI$..(20).105...|
00000290: 3E 00 8B 20 C3 28 55 52 24 29 B2 B1 55 4C A7 35 |>.. .(UR$)..UL.5|
000002A0: 30 00 C6 06 41 00 8D 31 32 30 3A 8F 20 43 48 45 |0...A..120:. CHE|
000002B0: 43 4B 20 46 4F 52 20 56 41 4C 49 44 20 43 48 41 |CK FOR VALID CHA|
000002C0: 52 41 43 54 45 52 00 D6 06 46 00 55 52 24 B2 55 |RACTER...F.UR$.U|
000002D0: 52 24 AA 55 49 24 00 E0 06 4B 00 99 55 49 24 3B |R$.UI$...K..UI$;|
000002E0: 00 E8 06 50 00 89 35 30 00 2C 07 54 00 22 50 4C |...P..50.,.T."PL|
000002F0: 55 52 41 4C 53 2E 43 30 22 20 20 20 20 20 20 20 |URALS.C0" |
00000300: 50 52 47 20 20 20 20 20 20 20 20 20 20 20 53 20 |PRG S |
00000310: 94 20 20 20 22 30 3A 42 49 47 54 49 4D 45 2E 43 |. "0:BIGTIME.C|
00000320: 32 22 2C 38 3A 20 20 20 20 50 52 47 00 51 07 55 |2",8: PRG.Q.U|
00000330: 00 8F 20 2B 2B 2B 20 43 48 45 43 4B 20 46 4F 52 |.. +++ CHECK FOR|
00000340: 20 48 45 4C 50 20 52 45 51 55 45 53 54 20 2B 2B | HELP REQUEST ++|
00000350: 2B 00 79 07 5A 00 8B 55 52 24 B2 55 58 24 A7 31 |+.y.Z..UR$.UX$.1|
00000360: 39 35 3A 8F 20 45 58 49 54 20 54 4F 20 48 45 4C |95:. EXIT TO HEL|
00000370: 50 20 52 4F 55 54 49 4E 45 00 88 07 5F 00 8B 55 |P ROUTINE..._..U|
00000380: 46 B2 31 A7 8D 32 34 30 00 95 07 64 00 55 46 B2 |F.1..240...d.UF.|
00000390: 30 3A 99 3A 8E 00 AE 07 66 00 8F 20 2B 2B 20 43 |0:.:....f.. ++ C|
000003A0: 48 45 43 4B 20 44 45 4C 45 54 45 20 2B 2B 00 BF |HECK DELETE ++..|
000003B0: 07 69 00 8B C3 28 55 52 24 29 B3 31 A7 35 30 00 |.i...(UR$).1.50.|
000003C0: D7 07 6E 00 55 52 24 B2 C8 28 55 52 24 2C C3 28 |..n.UR$..(UR$,.(|
000003D0: 55 52 24 29 AB 31 29 00 E9 07 73 00 99 22 9D 20 |UR$).1)...s..". |
000003E0: 20 9D 9D 22 3B 3A 89 35 30 00 10 08 78 00 8F 20 | ..";:.50...x.. |
000003F0: 2B 2B 20 43 48 45 43 4B 20 46 4F 52 20 56 41 4C |++ CHECK FOR VAL|
00000400: 49 44 20 43 48 41 52 41 43 54 45 52 53 20 2B 2B |ID CHARACTERS ++|
00000410: 00 22 08 7D 00 8B C3 28 55 53 24 29 B2 30 A7 31 |.".}...(US$).0.1|
00000420: 35 30 00 33 08 82 00 81 55 53 B2 31 A4 C3 28 55 |50.3....US.1..(U|
00000430: 53 24 29 00 4A 08 87 00 8B 55 49 24 B2 CA 28 55 |S$).J....UI$..(U|
00000440: 53 24 2C 55 53 2C 31 29 A7 8E 00 50 08 8C 00 82 |S$,US,1)...P....|
00000450: 00 5D 08 91 00 55 49 24 B2 22 22 3A 8E 00 78 08 |.]...UI$."":..x.|
00000460: 96 00 8F 20 2A 2A 20 53 54 41 4E 44 41 52 44 20 |... ** STANDARD |
00000470: 49 4E 50 55 54 20 2A 2A 00 89 08 98 00 8B C6 28 |INPUT **.......(|
00000480: 55 49 24 29 B2 34 36 A7 8E 00 9A 08 9B 00 8B 55 |UI$).46........U|
00000490: 49 24 B2 C7 28 33 32 29 A7 8E 00 B7 08 A0 00 8B |I$..(32)........|
000004A0: C6 28 55 49 24 29 B3 34 38 B0 C6 28 55 49 24 29 |.(UI$).48..(UI$)|
000004B0: B1 35 37 A7 31 37 30 00 BD 08 A5 00 8E 00 DA 08 |.57.170.........|
000004C0: AA 00 8B C6 28 55 49 24 29 B3 36 35 B0 C6 28 55 |....(UI$).65..(U|
000004D0: 49 24 29 B1 39 30 A7 31 38 30 00 E0 08 AF 00 8E |I$).90.180......|
000004E0: 00 04 09 B4 00 8B C6 28 55 49 24 29 B3 31 39 33 |.......(UI$).193|
000004F0: B0 C6 28 55 49 24 29 B1 32 31 38 A7 55 49 24 B2 |..(UI$).218.UI$.|
00000500: 22 22 3A 8E 00 27 09 B9 00 8B C2 28 55 54 29 B2 |"":..'.....(UT).|
00000510: 55 55 25 A7 55 49 24 B2 C7 28 C6 28 55 49 24 29 |UU%.UI$..(.(UI$)|
00000520: AB 31 32 38 29 3A 8E 00 2D 09 BB 00 8E 00 3A 09 |.128):..-.....:.|
00000530: BE 00 55 49 24 B2 22 22 3A 8E 00 5F 09 C3 00 55 |..UI$."":.._...U|
00000540: 46 B2 31 3A 8F 20 2B 2B 2B 20 48 45 4C 50 20 52 |F.1:. +++ HELP R|
00000550: 4F 55 54 49 4E 45 20 45 58 49 54 20 2B 2B 2B 00 |OUTINE EXIT +++.|
00000560: 68 09 C5 00 8D 32 35 30 00 71 09 C8 00 8D 32 34 |h....250.q....24|
00000570: 35 00 90 09 CD 00 81 55 51 B2 55 42 A4 28 55 32 |5......UQ.UB.(U2|
00000580: 25 AC 32 35 36 AA 55 31 25 AA 55 33 25 AB 32 29 |%.256.U1%.U3%.2)|
00000590: 00 AC 09 D2 00 55 51 25 28 55 51 AB 55 42 29 B2 |.....UQ%(UQ.UB).|
000005A0: C2 28 55 51 29 3A 82 3A 99 22 93 22 00 BF 09 D7 |.(UQ):.:."."....|
000005B0: 00 55 5A B2 31 3A 55 56 25 B2 C2 28 55 54 29 00 |.UZ.1:UV%..(UT).|
000005C0: C8 09 D8 00 89 33 30 30 00 0C 0A D9 00 55 5A B2 |.....300.....UZ.|
000005D0: 30 3A 55 53 24 B2 55 4A 24 3A 55 47 24 B2 55 4B |0:US$.UJ$:UG$.UK|
000005E0: 24 3A 55 50 B2 55 4A 3A 55 4C B2 55 4B 3A 8B C2 |$:UP.UJ:UL.UK:..|
000005F0: 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 |(50003).0..53281|
00000600: 2C 36 3A 97 35 33 32 38 30 2C 31 34 00 41 0A DC |,6:.53280,14.A..|
00000610: 00 55 54 24 B2 55 4C 24 3A 99 22 93 22 3B 3A 97 |.UT$.UL$:.".";:.|
00000620: 55 54 2C 55 56 25 3A 81 55 51 B2 55 42 A4 28 55 |UT,UV%:.UQ.UB.(U|
00000630: 32 25 AC 32 35 36 AA 55 31 25 AA 55 33 25 AB 33 |2%.256.U1%.U3%.3|
00000640: 29 00 56 0A E1 00 97 55 51 2C 55 51 25 28 55 51 |).V....UQ,UQ%(UQ|
00000650: AB 55 42 29 3A 82 00 62 0A E6 00 97 55 31 2C 55 |.UB):..b....U1,U|
00000660: 31 25 00 6E 0A E8 00 97 55 32 2C 55 32 25 00 7A |1%.n....U2,U2%.z|
00000670: 0A E9 00 97 55 34 2C 55 34 25 00 88 0A EA 00 97 |....U4,U4%......|
00000680: 55 33 2C 55 33 25 AB 31 00 90 0A EB 00 89 33 35 |U3,U3%.1......35|
00000690: 00 C2 0A F0 00 55 44 25 B2 28 28 55 32 25 AC 32 |.....UD%.((U2%.2|
000006A0: 35 36 AA 55 31 25 AA 55 33 25 29 AB 55 42 29 AD |56.U1%.U3%).UB).|
000006B0: 34 30 3A 99 C8 28 55 44 24 2C 55 44 25 AA 31 29 |40:..(UD$,UD%.1)|
000006C0: 3A 8E 00 FD 0A F5 00 99 C8 28 55 44 24 2C 32 34 |:........(UD$,24|
000006D0: 29 3B 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |);" |
000006E0: 20 20 20 20 20 20 20 20 20 12 20 48 45 4C 50 20 | . HELP |
000006F0: 43 4F 4D 49 4E 47 20 92 20 20 22 3A 8E 00 29 0B |COMING . ":..).|
00000700: FA 00 55 31 25 B2 C2 28 55 31 29 3A 55 32 25 B2 |..U1%..(U1):U2%.|
00000710: C2 28 55 32 29 3A 55 33 25 B2 C2 28 55 33 29 3A |.(U2):U3%..(U3):|
00000720: 55 34 25 B2 C2 28 55 34 29 00 51 0B FB 00 55 4A |U4%..(U4).Q...UJ|
00000730: 24 B2 55 53 24 3A 55 4B 24 B2 55 47 24 3A 55 4C |$.US$:UK$.UG$:UL|
00000740: 24 B2 55 54 24 3A 55 4A B2 55 50 3A 55 4B B2 55 |$.UT$:UJ.UP:UK.U|
00000750: 4C 00 57 0B FF 00 8E 00 68 0B 2C 01 8F 20 2A 2A |L.W.....h.,.. **|
00000760: 20 4D 45 4E 55 20 2A 2A 00 6E 0B 2D 01 3A 00 9D | MENU **.n.-.:..|
00000770: 0B 2E 01 99 22 93 22 3A 97 55 54 2C 55 55 25 3A |....".":.UT,UU%:|
00000780: 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 |..(50003).0..532|
00000790: 38 31 2C 39 3A 97 35 33 32 38 30 2C 38 00 A3 0B |81,9:.53280,8...|
000007A0: 2F 01 3A 00 C0 0B 31 01 99 22 13 20 20 20 20 20 |/.:...1..". |
000007B0: 20 20 20 20 20 20 20 20 20 20 20 4D 45 4E 55 22 | MENU"|
000007C0: 00 EF 0B 36 01 99 22 20 2D 2D 2D 2D 2D 2D 2D 2D |...6.." --------|
000007D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000007E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 |--------------".|
000007F0: 0E 0C 3B 01 99 22 11 11 20 20 20 20 20 20 20 31 |..;..".. 1|
00000800: 2E 20 20 20 42 49 47 54 49 4D 45 20 20 22 00 35 |. BIGTIME ".5|
00000810: 0C 40 01 99 22 11 11 20 20 20 20 20 20 20 32 2E |.@..".. 2.|
00000820: 20 20 20 55 53 45 52 20 49 4E 53 54 52 55 43 54 | USER INSTRUCT|
00000830: 49 4F 4E 53 22 00 51 0C 4F 01 99 22 11 11 20 20 |IONS".Q.O..".. |
00000840: 20 20 20 20 20 33 2E 20 20 20 51 55 49 54 11 11 | 3. QUIT..|
00000850: 22 00 80 0C 54 01 99 22 20 2D 2D 2D 2D 2D 2D 2D |"...T.." -------|
00000860: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000870: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 |---------------"|
00000880: 00 AB 0C 59 01 99 22 11 11 20 20 20 20 20 20 20 |...Y..".. |
00000890: 50 52 45 53 53 20 41 20 4E 55 4D 42 45 52 20 4B |PRESS A NUMBER K|
000008A0: 45 59 20 28 31 2D 33 29 20 22 3B 00 D2 0C 5E 01 |EY (1-3) ";...^.|
000008B0: 55 4C B2 31 3A 55 53 24 B2 22 31 32 33 22 3A 8D |UL.1:US$."123":.|
000008C0: 33 35 3A 8F 20 49 4E 50 55 54 20 52 4F 55 54 49 |35:. INPUT ROUTI|
000008D0: 4E 45 00 E4 0C 5F 01 8B C3 28 55 52 24 29 B1 31 |NE..._...(UR$).1|
000008E0: A7 33 30 30 00 EF 0C 60 01 55 53 24 B2 22 22 00 |.300...`.US$."".|
000008F0: 08 0D 63 01 91 C5 28 55 52 24 29 8D 31 30 30 30 |..c...(UR$).1000|
00000900: 2C 34 30 30 2C 33 39 36 00 22 0D 64 01 8B C5 28 |,400,396.".d...(|
00000910: 55 52 24 29 B2 32 AF 5A 24 B2 22 48 22 A7 31 33 |UR$).2.Z$."H".13|
00000920: 33 30 00 2B 0D 68 01 89 33 30 30 00 52 0D 8B 01 |30.+.h..300.R...|
00000930: 8F 20 2A 2A 20 52 45 2D 45 4E 41 42 4C 45 20 53 |. ** RE-ENABLE S|
00000940: 54 4F 50 20 4B 45 59 20 41 4E 44 20 45 4E 44 20 |TOP KEY AND END |
00000950: 2A 2A 00 81 0D 8C 01 8B C2 28 35 30 30 30 33 29 |**.......(50003)|
00000960: B3 B1 31 AF C2 28 35 30 30 30 33 29 B3 B1 31 36 |..1..(50003)..16|
00000970: 30 AF C2 28 35 30 30 30 33 29 B3 B1 30 A7 33 39 |0..(50003)..0.39|
00000980: 39 00 AB 0D 8D 01 9E 55 55 AA 37 31 3A 8B C2 28 |9......UU.71:..(|
00000990: 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C |50003).0..53281,|
000009A0: 36 3A 97 35 33 32 38 30 2C 31 34 00 B7 0D 8E 01 |6:.53280,14.....|
000009B0: 99 22 9A 93 22 3A 80 00 C2 0D 8F 01 8D 38 37 35 |."..":.......875|
000009C0: 3A 8E 00 E3 0D 90 01 8F 20 2A 2A 20 53 54 55 44 |:....... ** STUD|
000009D0: 45 4E 54 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 |ENT INSTRUCTIONS|
000009E0: 20 2A 2A 00 12 0E 95 01 99 22 93 22 3A 97 55 54 | **......".":.UT|
000009F0: 2C 55 4C 25 3A 8B C2 28 35 30 30 30 33 29 B2 30 |,UL%:..(50003).0|
00000A00: A7 97 35 33 32 38 31 2C 30 3A 97 35 33 32 38 30 |..53281,0:.53280|
00000A10: 2C 30 00 30 0E 9A 01 55 50 B2 30 3A 55 47 24 B2 |,0.0...UP.0:UG$.|
00000A20: 22 D5 53 45 52 20 C9 4E 53 54 22 3A 8D 38 35 30 |".SER .NST":.850|
00000A30: 00 61 0E B8 01 99 22 11 20 D4 48 49 53 20 50 52 |.a....". .HIS PR|
00000A40: 4F 47 52 41 4D 20 53 49 4D 55 4C 41 54 45 53 20 |OGRAM SIMULATES |
00000A50: 41 20 44 49 47 49 54 41 4C 20 43 4C 4F 43 4B 2E |A DIGITAL CLOCK.|
00000A60: 22 00 90 0E BA 01 99 22 20 D9 4F 55 20 43 41 4E |"......" .OU CAN|
00000A70: 20 43 48 4F 4F 53 45 20 45 49 54 48 45 52 20 41 | CHOOSE EITHER A|
00000A80: 20 31 32 20 48 4F 55 52 20 46 4F 52 4D 41 54 22 | 12 HOUR FORMAT"|
00000A90: 00 BF 0E BC 01 99 22 11 20 4F 52 20 41 20 32 34 |......". OR A 24|
00000AA0: 20 48 4F 55 52 20 46 4F 52 4D 41 54 2E 20 D9 4F | HOUR FORMAT. .O|
00000AB0: 55 20 43 41 4E 20 41 4C 53 4F 20 53 45 54 22 00 |U CAN ALSO SET".|
00000AC0: ED 0E BE 01 99 22 11 20 41 4E 20 41 4C 41 52 4D |.....". AN ALARM|
00000AD0: 2E 20 28 D4 48 45 20 41 4C 41 52 4D 20 49 53 20 |. (.HE ALARM IS |
00000AE0: 52 41 54 48 45 52 20 51 55 49 45 54 22 00 1D 0F |RATHER QUIET"...|
00000AF0: C0 01 99 22 11 20 54 48 4F 55 47 48 20 41 4E 44 |...". THOUGH AND|
00000B00: 20 50 52 4F 42 41 42 4C 59 20 57 49 4C 4C 20 4E | PROBABLY WILL N|
00000B10: 4F 54 20 57 41 4B 45 20 59 4F 55 20 22 00 42 0F |OT WAKE YOU ".B.|
00000B20: C2 01 99 22 11 20 55 50 20 46 52 4F 4D 20 59 4F |...". UP FROM YO|
00000B30: 55 52 20 46 52 45 4E 43 48 20 43 4C 41 53 53 2E |UR FRENCH CLASS.|
00000B40: 29 22 00 72 0F C4 01 99 22 11 11 20 D4 59 50 45 |)".r....".. .YPE|
00000B50: 20 3C 48 3E 20 41 54 20 41 4E 59 20 54 49 4D 45 | <H> AT ANY TIME|
00000B60: 20 54 4F 20 52 45 54 55 52 4E 20 54 4F 20 54 48 | TO RETURN TO TH|
00000B70: 45 22 00 82 0F C6 01 99 22 11 20 4D 45 4E 55 2E |E"......". MENU.|
00000B80: 20 22 00 8B 0F E5 01 8D 38 33 35 00 9F 0F EA 01 | "......835.....|
00000B90: 8B 55 5A B2 31 A7 9E 55 50 25 3A 89 32 31 37 00 |.UZ.1..UP%:.217.|
00000BA0: A5 0F F3 01 8E 00 C6 0F F4 01 8F 20 2A 2A 20 54 |........... ** T|
00000BB0: 45 41 43 48 45 52 20 49 4E 53 54 52 55 43 54 49 |EACHER INSTRUCTI|
00000BC0: 4F 4E 53 20 2A 2A 00 F6 0F F5 01 99 22 93 22 3A |ONS **......".":|
00000BD0: 97 55 54 2C 55 4C 25 3A 8B C2 28 35 30 30 30 33 |.UT,UL%:..(50003|
00000BE0: 29 B2 30 A7 97 35 33 32 38 31 2C 32 3A 97 35 33 |).0..53281,2:.53|
00000BF0: 32 38 30 2C 31 30 00 17 10 F6 01 55 50 B2 30 3A |280,10.....UP.0:|
00000C00: 55 47 24 B2 22 D4 45 41 43 48 45 52 20 C9 4E 53 |UG$.".EACHER .NS|
00000C10: 54 22 3A 8D 38 35 30 00 45 10 F7 01 99 22 11 11 |T":.850.E...."..|
00000C20: 20 20 20 20 20 20 D4 4F 20 54 48 45 20 42 45 53 | .O THE BES|
00000C30: 54 20 4F 46 20 4F 55 52 20 4B 4E 4F 57 4C 45 44 |T OF OUR KNOWLED|
00000C40: 47 45 2C 11 22 00 6E 10 F8 01 99 22 20 20 20 54 |GE,.".n...." T|
00000C50: 48 49 53 20 50 52 4F 47 52 41 4D 20 49 53 20 49 |HIS PROGRAM IS I|
00000C60: 4E 20 54 48 45 20 50 55 42 4C 49 43 11 22 00 9A |N THE PUBLIC."..|
00000C70: 10 F9 01 99 22 20 20 20 44 4F 4D 41 49 4E 2E 20 |...." DOMAIN. |
00000C80: 20 C9 46 20 54 48 49 53 20 49 53 20 4E 4F 54 20 | .F THIS IS NOT |
00000C90: 54 48 45 20 43 41 53 45 11 22 00 B7 10 FA 01 99 |THE CASE."......|
00000CA0: 22 20 20 20 50 4C 45 41 53 45 20 43 4F 4E 54 41 |" PLEASE CONTA|
00000CB0: 43 54 3A 11 11 11 22 00 E1 10 FB 01 99 22 20 20 |CT:..."......" |
00000CC0: 20 20 20 20 C3 4F 4D 4D 4F 44 4F 52 45 20 C2 55 | .OMMODORE .U|
00000CD0: 53 49 4E 45 53 53 20 CD 41 43 48 49 4E 45 53 11 |SINESS .ACHINES.|
00000CE0: 22 00 04 11 FC 01 99 22 20 20 20 20 20 20 20 20 |"......" |
00000CF0: 20 20 33 33 37 30 20 D0 48 41 52 4D 41 43 59 20 | 3370 .HARMACY |
00000D00: C1 56 45 2E 00 28 11 FD 01 99 22 20 20 20 20 20 |.VE..(...." |
00000D10: 20 20 20 20 20 C1 47 49 4E 43 4F 55 52 54 2C 20 | .GINCOURT, |
00000D20: CF 4E 54 41 52 49 4F 22 00 4A 11 FE 01 99 22 20 |.NTARIO".J...." |
00000D30: 20 20 20 20 20 20 20 20 20 C3 41 4E 41 44 41 20 | .ANADA |
00000D40: 20 20 CD 31 D7 20 32 CB 34 22 00 6A 11 FF 01 99 | .1. 2.4".j....|
00000D50: 22 20 20 20 20 20 20 20 20 20 20 28 34 31 36 29 |" (416)|
00000D60: 20 34 39 39 2D 34 32 39 32 22 00 80 11 00 02 55 | 499-4292".....U|
00000D70: 50 B2 31 3A 8D 20 38 33 35 3A 8D 20 38 35 30 3A |P.1:. 835:. 850:|
00000D80: 00 AA 11 01 02 99 22 20 20 20 20 20 11 11 D0 52 |......" ...R|
00000D90: 4F 47 52 41 4D 20 CE 41 4D 45 3A 20 D0 52 4F 47 |OGRAM .AME: .ROG|
00000DA0: 52 41 4D 20 D4 49 54 4C 45 11 00 CC 11 02 02 99 |RAM .ITLE.......|
00000DB0: 22 20 20 20 20 20 D7 52 49 54 54 45 4E 20 C2 59 |" .RITTEN .Y|
00000DC0: 20 20 3A 20 D5 4E 4B 4E 4F 57 4E 11 00 F0 11 03 | : .NKNOWN.....|
00000DD0: 02 99 22 20 20 20 20 20 D5 50 47 52 41 44 45 44 |.." .PGRADED|
00000DE0: 20 C2 59 20 3A 20 D9 4F 55 52 20 CE 41 4D 45 11 | .Y : .OUR .AME.|
00000DF0: 00 1B 12 04 02 99 22 20 20 20 20 20 11 D4 48 49 |......" ..HI|
00000E00: 53 20 50 52 4F 47 52 41 4D 20 57 49 4C 4C 20 52 |S PROGRAM WILL R|
00000E10: 55 4E 20 4F 4E 20 41 4E 59 11 11 00 42 12 05 02 |UN ON ANY...B...|
00000E20: 99 22 20 20 20 20 20 20 20 20 20 C2 C1 D3 C9 C3 |." .....|
00000E30: A0 32 2E 30 20 D0 C5 D4 20 C3 CF CD D0 D5 D4 C5 |.2.0 ... .......|
00000E40: D2 11 00 69 12 06 02 99 22 20 20 20 20 20 20 20 |...i...." |
00000E50: 20 20 C2 C1 D3 C9 C3 20 34 2E 30 20 D0 C5 D4 A0 | ..... 4.0 ....|
00000E60: C3 CF CD D0 D5 D4 C5 D2 11 00 8B 12 07 02 99 22 |..............."|
00000E70: 20 20 20 20 20 20 20 20 20 38 30 33 32 20 C3 C2 | 8032 ..|
00000E80: CD 20 C3 CF CD D0 D5 D4 C5 D2 11 00 B0 12 08 02 |. ..............|
00000E90: 99 22 20 20 20 20 20 20 20 20 20 C3 CF CD CD CF |." .....|
00000EA0: C4 CF D2 C5 20 36 34 20 C3 CF CD D0 D5 D4 C5 D2 |.... 64 ........|
00000EB0: 00 B9 12 09 02 8D 38 33 35 00 C2 12 44 02 8D 38 |......835...D..8|
00000EC0: 33 35 00 D6 12 4E 02 8B 55 5A B2 31 A7 9E 55 50 |35...N..UZ.1..UP|
00000ED0: 25 3A 89 32 31 37 00 DC 12 57 02 8E 00 02 13 58 |%:.217...W.....X|
00000EE0: 02 8F 20 2A 2A 20 50 52 4F 47 52 41 4D 20 4D 4F |.. ** PROGRAM MO|
00000EF0: 44 49 46 49 43 41 54 49 4F 4E 20 49 4E 53 54 20 |DIFICATION INST |
00000F00: 2A 2A 00 13 13 59 02 99 22 93 22 3A 97 55 54 2C |**...Y..".":.UT,|
00000F10: 55 4C 25 00 33 13 5D 02 55 50 B2 30 3A 55 47 24 |UL%.3.].UP.0:UG$|
00000F20: B2 22 D0 52 4F 47 52 41 4D 20 CD 4F 44 22 3A 8D |.".ROGRAM .OD":.|
00000F30: 38 35 30 00 3C 13 94 02 8D 38 33 35 00 50 13 B2 |850.<....835.P..|
00000F40: 02 8B 55 5A B2 31 A7 9E 55 50 25 3A 89 32 31 37 |..UZ.1..UP%:.217|
00000F50: 00 56 13 BB 02 8E 00 7B 13 BC 02 8F 20 2A 2A 20 |.V.....{.... ** |
00000F60: 54 4F 20 55 53 45 20 38 30 33 32 20 4C 4F 41 44 |TO USE 8032 LOAD|
00000F70: 20 43 42 4D 34 30 33 32 20 2A 2A 00 B1 13 C6 02 | CBM4032 **.....|
00000F80: 99 22 93 11 11 11 05 42 45 46 4F 52 45 20 52 55 |.".....BEFORE RU|
00000F90: 4E 4E 49 4E 47 20 54 48 49 53 20 50 52 4F 47 52 |NNING THIS PROGR|
00000FA0: 41 4D 20 4F 4E 20 41 4E 20 38 30 33 32 20 20 11 |AM ON AN 8032 .|
00000FB0: 11 00 E7 13 D0 02 99 22 20 20 20 20 20 20 4C 4F |......." LO|
00000FC0: 41 44 20 54 48 45 20 27 43 42 4D 20 34 30 33 32 |AD THE 'CBM 4032|
00000FD0: 27 20 50 52 4F 47 52 41 4D 11 11 11 11 11 11 11 |' PROGRAM.......|
00000FE0: 11 11 11 11 11 11 22 00 F2 13 DA 02 9E 55 55 AA |......"......UU.|
00000FF0: 37 31 00 F8 13 E4 02 80 00 1D 14 1D 03 8F 20 2A |71............ *|
00001000: 2A 20 54 4F 20 55 53 45 20 38 30 33 32 20 4C 4F |* TO USE 8032 LO|
00001010: 41 44 20 43 42 4D 34 30 33 32 20 2A 2A 00 68 14 |AD CBM4032 **.h.|
00001020: 1E 03 99 22 93 11 11 11 42 45 46 4F 52 45 20 52 |..."....BEFORE R|
00001030: 55 4E 4E 49 4E 47 20 54 48 49 53 20 50 52 4F 47 |UNNING THIS PROG|
00001040: 52 41 4D 20 4F 4E 20 41 4E 20 38 30 33 32 20 20 |RAM ON AN 8032 |
00001050: 11 11 4C 4F 41 44 20 43 42 4D 20 34 30 33 32 20 |..LOAD CBM 4032 |
00001060: 50 52 4F 47 52 41 4D 22 00 74 14 1F 03 9E 31 30 |PROGRAM".t....10|
00001070: 39 33 3A 80 00 94 14 20 03 8F 20 2A 2A 20 54 20 |93:.... .. ** T |
00001080: 49 20 54 20 4C 20 45 20 20 20 50 20 41 20 47 20 |I T L E P A G |
00001090: 45 20 2A 2A 00 C8 14 22 03 99 22 93 11 1D 05 22 |E **...".."...."|
000010A0: 3B 3A 97 55 54 2C 55 55 25 3A 8B C2 28 35 30 30 |;:.UT,UU%:..(500|
000010B0: 30 33 29 B2 30 A7 97 35 33 32 38 30 2C 31 34 3A |03).0..53280,14:|
000010C0: 97 35 33 32 38 31 2C 36 00 DE 14 24 03 81 49 B2 |.53281,6...$..I.|
000010D0: 31 A4 33 38 3A 99 22 12 A6 92 22 3B 3A 82 00 F6 |1.38:."...";:...|
000010E0: 14 26 03 81 49 B2 31 A4 32 32 3A 99 22 11 9D 12 |.&..I.1.22:."...|
000010F0: A6 92 22 3B 3A 82 00 0E 15 28 03 81 49 B2 31 A4 |..";:....(..I.1.|
00001100: 33 37 3A 99 22 9D 9D 12 A6 92 22 3B 3A 82 00 26 |37:.".....";:..&|
00001110: 15 2A 03 81 49 B2 31 A4 32 32 3A 99 22 91 9D 12 |.*..I.1.22:."...|
00001120: A6 92 22 3B 3A 82 00 4B 15 2C 03 99 22 13 11 11 |..";:..K.,.."...|
00001130: 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001140: 1D 1D 1D 1D 1D 1D 12 A9 20 20 92 00 6D 15 2E 03 |........ ..m...|
00001150: 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |."..............|
00001160: 1D 1D 1D 1D 12 20 92 20 20 12 20 92 A9 00 8E 15 |..... . . .....|
00001170: 30 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |0.."............|
00001180: 1D 1D 1D 1D 1D 1D 12 20 92 20 20 12 A3 DF 00 AC |....... . .....|
00001190: 15 32 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |.2.."...........|
000011A0: 1D 1D 1D 1D 1D 1D 1D DF 12 20 20 92 00 D4 15 34 |......... ....4|
000011B0: 03 99 22 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |..".............|
000011C0: 1D 43 20 4F 20 4D 20 4D 20 4F 20 44 20 4F 20 52 |.C O M M O D O R|
000011D0: 20 45 11 11 00 F7 15 36 03 99 22 1D 1D 1D 1D 1D | E.....6..".....|
000011E0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 45 44 55 43 41 54 |..........EDUCAT|
000011F0: 49 4F 4E 41 4C 11 11 00 16 16 38 03 99 22 1D 1D |IONAL.....8.."..|
00001200: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 53 4F |..............SO|
00001210: 46 54 57 41 52 45 00 31 16 3A 03 8F 20 2A 2A 20 |FTWARE.1.:.. ** |
00001220: 43 4F 4D 4D 4F 44 4F 52 45 20 4C 4F 47 4F 20 2A |COMMODORE LOGO *|
00001230: 2A 00 69 16 3B 03 99 C8 28 55 44 24 2C 32 34 29 |*.i.;...(UD$,24)|
00001240: 3B 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 50 52 45 53 |;"..........PRES|
00001250: 53 20 53 50 41 43 45 20 42 41 52 20 4F 52 20 57 |S SPACE BAR OR W|
00001260: 41 49 54 92 22 3A 49 B2 30 00 8B 16 3C 03 A1 41 |AIT.":I.0...<..A|
00001270: 24 3A 8B 41 24 B3 B1 22 20 22 A7 49 B2 49 AA 31 |$:.A$.." ".I.I.1|
00001280: 3A 8B 49 B3 32 35 30 A7 38 32 38 00 AF 16 3E 03 |:.I.250.828...>.|
00001290: 54 31 24 B2 22 22 3A 54 32 24 B2 22 22 3A 54 33 |T1$."":T2$."":T3|
000012A0: 24 B2 22 22 3A 54 34 24 B2 22 22 3A 49 B2 30 00 |$."":T4$."":I.0.|
000012B0: B8 16 40 03 89 33 30 30 00 D4 16 43 03 8F 20 2A |..@..300...C.. *|
000012C0: 2A 20 53 50 41 43 45 20 42 41 52 20 50 52 45 53 |* SPACE BAR PRES|
000012D0: 53 20 2A 2A 00 0F 17 48 03 97 55 4F 2C 30 3A 99 |S **...H..UO,0:.|
000012E0: C8 28 55 44 24 2C 32 34 29 3B 22 1D 1D 1D 1D 1D |.(UD$,24);".....|
000012F0: 1D 12 50 52 45 53 53 20 53 50 41 43 45 20 42 41 |..PRESS SPACE BA|
00001300: 52 20 54 4F 20 43 4F 4E 54 49 4E 55 45 92 22 00 |R TO CONTINUE.".|
00001310: 26 17 4C 03 A1 55 49 24 3A 8B 55 49 24 B3 B1 22 |&.L..UI$:.UI$.."|
00001320: 20 22 A7 38 34 34 00 2C 17 4E 03 8E 00 4C 17 52 | ".844.,.N...L.R|
00001330: 03 8F 20 2A 2A 20 50 41 47 45 20 44 45 53 49 47 |.. ** PAGE DESIG|
00001340: 4E 20 52 4F 55 54 49 4E 45 20 2A 2A 00 58 17 54 |N ROUTINE **.X.T|
00001350: 03 55 50 B2 55 50 AA 31 00 7C 17 57 03 99 22 93 |.UP.UP.1.|.W..".|
00001360: 22 C8 28 55 54 24 AA 55 50 24 2C 32 31 29 3B C9 |".(UT$.UP$,21);.|
00001370: 28 55 50 24 AA 55 47 24 2C 31 38 29 00 AB 17 5C |(UP$.UG$,18)...\|
00001380: 03 99 22 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.." ------------|
00001390: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000013A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 BA 17 60 03 |----------"...`.|
000013B0: 8B 55 48 B3 B1 30 A7 38 37 30 00 EE 17 61 03 99 |.UH..0.870...a..|
000013C0: C8 28 55 44 24 2C 32 34 29 3B C8 28 55 50 24 2C |.(UD$,24);.(UP$,|
000013D0: 37 29 3B 22 48 45 4C 50 20 2D 20 50 52 45 53 53 |7);"HELP - PRESS|
000013E0: 20 20 20 48 20 3C 52 45 54 55 52 4E 3E 22 00 FF | H <RETURN>"..|
000013F0: 17 66 03 55 48 B2 30 3A 99 22 13 11 22 3A 8E 00 |.f.UH.0:."..":..|
00001400: 1E 18 6B 03 8F 20 2A 2A 20 50 4C 45 41 53 45 20 |..k.. ** PLEASE |
00001410: 57 41 49 54 20 52 45 4D 41 52 4B 20 2A 2A 00 54 |WAIT REMARK **.T|
00001420: 18 70 03 99 C8 28 55 44 24 2C 32 34 29 3B 22 20 |.p...(UD$,24);" |
00001430: 20 20 20 20 20 20 20 20 20 20 4F 4E 45 20 4D 4F | ONE MO|
00001440: 4D 45 4E 54 20 50 4C 45 41 53 45 2E 2E 2E 20 20 |MENT PLEASE... |
00001450: 20 20 20 22 00 5A 18 75 03 8E 00 77 18 84 03 8F | ".Z.u...w....|
00001460: 20 2A 2A 20 53 45 54 20 55 50 20 56 41 52 49 41 | ** SET UP VARIA|
00001470: 42 4C 45 53 20 2A 2A 00 C2 18 85 03 55 58 24 B2 |BLES **.....UX$.|
00001480: 22 48 22 3A 86 55 51 25 28 31 30 30 30 29 3A 55 |"H":.UQ%(1000):U|
00001490: 42 B2 33 32 37 36 38 3A 55 31 B2 31 39 36 3A 55 |B.32768:U1.196:U|
000014A0: 32 B2 31 39 37 3A 55 33 B2 31 39 38 3A 55 34 B2 |2.197:U3.198:U4.|
000014B0: 32 31 36 3A 55 43 B2 31 36 37 3A 55 55 B2 31 30 |216:UC.167:UU.10|
000014C0: 32 34 00 00 19 86 03 55 54 B2 35 39 34 36 38 3A |24.....UT.59468:|
000014D0: 55 55 25 B2 31 32 3A 55 4C 25 B2 31 34 3A 55 50 |UU%.12:UL%.14:UP|
000014E0: 25 B2 31 31 34 36 3A 55 4D B2 33 32 37 36 38 3A |%.1146:UM.32768:|
000014F0: 55 4F B2 31 35 38 3A 97 20 35 30 30 30 33 2C 30 |UO.158:. 50003,0|
00001500: 00 43 19 87 03 8B C2 28 35 30 30 30 33 29 B2 30 |.C.....(50003).0|
00001510: A7 55 42 B2 31 30 32 34 3A 55 31 B2 32 30 39 3A |.UB.1024:U1.209:|
00001520: 55 32 B2 32 31 30 3A 55 33 B2 32 31 31 3A 55 34 |U2.210:U3.211:U4|
00001530: B2 32 31 34 3A 55 43 B2 32 30 34 3A 55 55 B2 32 |.214:UC.204:UU.2|
00001540: 30 34 38 00 82 19 88 03 8B C2 28 35 30 30 30 33 |048.......(50003|
00001550: 29 B2 30 A7 55 54 B2 35 33 32 37 32 3A 55 55 25 |).0.UT.53272:UU%|
00001560: B2 32 31 3A 55 4C 25 B2 32 33 3A 55 50 25 B2 32 |.21:UL%.23:UP%.2|
00001570: 31 33 39 3A 55 4D B2 31 30 32 34 3A 55 4F B2 31 |139:UM.1024:UO.1|
00001580: 39 38 00 A6 19 89 03 55 44 24 B2 22 13 11 11 11 |98.....UD$."....|
00001590: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000015A0: 11 11 11 11 11 22 00 D8 19 8A 03 55 50 24 B2 22 |.....".....UP$."|
000015B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000015C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000015D0: 20 20 20 20 20 20 20 22 00 26 1A 8B 03 55 54 24 | ".&...UT$|
000015E0: B2 22 20 C2 C9 C7 D4 C9 CD C5 20 20 20 20 20 20 |." ....... |
000015F0: 20 A0 A0 A0 A0 22 3A 8F 20 50 4C 41 43 45 20 50 | ....":. PLACE P|
00001600: 52 4F 47 52 41 4D 20 54 49 54 4C 45 20 48 45 52 |ROGRAM TITLE HER|
00001610: 45 20 21 21 21 21 21 21 21 21 21 21 21 21 21 21 |E !!!!!!!!!!!!!!|
00001620: 21 21 21 2A 2A 2A 00 2C 1A 8C 03 8E 00 46 1A 8E |!!!***.,.....F..|
00001630: 03 8F 20 2A 2A 20 53 45 54 20 56 41 52 49 41 42 |.. ** SET VARIAB|
00001640: 4C 45 53 20 2A 2A 00 52 1A 90 03 86 20 41 24 28 |LES **.R.... A$(|
00001650: 39 29 00 5B 1A 93 03 8D 39 30 30 00 61 1A 94 03 |9).[....900.a...|
00001660: 3A 00 67 1A 95 03 3A 00 82 1A 98 03 8F 20 2A 2A |:.g...:...... **|
00001670: 20 43 48 45 43 4B 20 46 4F 52 20 38 30 33 32 20 | CHECK FOR 8032 |
00001680: 2A 2A 00 A0 1A 9D 03 99 22 93 22 3A 99 22 A0 22 |**......".":."."|
00001690: 3A 8F 20 53 48 49 46 54 45 44 20 53 50 41 43 45 |:. SHIFTED SPACE|
000016A0: 00 B7 1A A2 03 8B C2 28 55 42 AA 34 30 29 B3 B1 |.......(UB.40)..|
000016B0: 39 36 A7 8D 37 30 30 00 D0 1A A3 03 8F 20 2A 2A |96..700...... **|
000016C0: 20 4D 45 4D 4F 52 59 20 43 48 45 43 4B 20 2A 2A | MEMORY CHECK **|
000016D0: 00 E4 1A A4 03 8B 20 B8 28 30 29 B1 32 30 30 30 |...... .(0).2000|
000016E0: A7 39 33 37 00 12 1B A5 03 99 22 93 11 11 05 54 |.937......"....T|
000016F0: 48 49 53 20 4D 41 43 48 49 4E 45 20 44 4F 45 53 |HIS MACHINE DOES|
00001700: 20 4E 4F 54 20 48 41 56 45 20 45 4E 4F 55 47 48 | NOT HAVE ENOUGH|
00001710: 11 22 00 36 1B A6 03 99 22 4D 45 4D 4F 52 59 20 |.".6...."MEMORY |
00001720: 54 4F 20 52 55 4E 20 54 48 49 53 20 50 52 4F 47 |TO RUN THIS PROG|
00001730: 52 41 4D 20 21 22 00 41 1B A7 03 9E 55 55 AA 37 |RAM !".A....UU.7|
00001740: 31 00 47 1B A8 03 80 00 61 1B A9 03 99 22 93 05 |1.G.....a...."..|
00001750: 22 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 39 36 |":..(50003).0.96|
00001760: 32 00 90 1B AC 03 8F 20 2A 2A 20 42 41 53 49 43 |2...... ** BASIC|
00001770: 20 32 2E 30 20 20 4F 52 20 20 34 2E 30 20 20 4F | 2.0 OR 4.0 O|
00001780: 52 20 20 43 2D 36 34 20 53 45 54 55 50 20 2A 2A |R C-64 SETUP **|
00001790: 00 CE 1B AD 03 97 31 30 37 35 2C 31 33 33 3A 97 |......1075,133:.|
000017A0: 31 30 37 36 2C 31 34 34 3A 97 31 30 37 37 2C 32 |1076,144:.1077,2|
000017B0: 33 34 3A 97 31 30 37 39 2C 34 3A 97 31 30 38 30 |34:.1079,4:.1080|
000017C0: 2C 31 33 33 3A 97 31 30 38 31 2C 31 34 35 00 04 |,133:.1081,145..|
000017D0: 1C AE 03 97 31 30 39 31 2C 31 35 35 3A 97 31 30 |....1091,155:.10|
000017E0: 39 38 2C 31 33 33 3A 97 31 30 39 39 2C 31 34 34 |98,133:.1099,144|
000017F0: 3A 97 31 31 30 30 2C 32 33 34 3A 97 31 31 30 33 |:.1100,234:.1103|
00001800: 2C 31 33 33 00 26 1C AF 03 97 31 31 30 34 2C 31 |,133.&....1104,1|
00001810: 34 35 3A 97 31 31 30 35 2C 32 33 34 3A 97 31 30 |45:.1105,234:.10|
00001820: 38 32 2C 32 33 34 00 3D 1C B1 03 8B C2 28 35 30 |82,234.=.....(50|
00001830: 30 30 33 29 B3 B1 31 36 30 A7 39 35 35 00 6C 1C |003)..160.955.l.|
00001840: B6 03 97 31 30 39 33 2C 38 38 3A 97 31 30 39 34 |...1093,88:.1094|
00001850: 2C 32 32 38 3A 97 31 30 39 37 2C 38 35 3A 97 31 |,228:.1097,85:.1|
00001860: 31 30 32 2C 32 32 38 3A 89 39 36 35 00 81 1C BB |102,228:.965....|
00001870: 03 8B C2 28 35 30 30 30 33 29 B3 B1 31 A7 39 39 |...(50003)..1.99|
00001880: 30 00 B0 1C C0 03 97 31 30 39 33 2C 34 39 3A 97 |0......1093,49:.|
00001890: 31 30 39 34 2C 32 33 30 3A 97 31 30 39 37 2C 34 |1094,230:.1097,4|
000018A0: 36 3A 97 31 31 30 32 2C 32 33 30 3A 89 39 36 35 |6:.1102,230:.965|
000018B0: 00 EA 1C C2 03 97 32 30 39 39 2C 31 34 31 3A 97 |......2099,141:.|
000018C0: 32 31 30 30 2C 32 30 3A 97 32 31 30 31 2C 33 3A |2100,20:.2101,3:|
000018D0: 97 32 31 30 33 2C 38 3A 97 32 31 30 34 2C 31 34 |.2103,8:.2104,14|
000018E0: 31 3A 97 32 31 30 35 2C 32 31 00 26 1D C3 03 97 |1:.2105,21.&....|
000018F0: 32 31 30 36 2C 33 3A 97 32 31 31 35 2C 31 34 35 |2106,3:.2115,145|
00001900: 3A 97 32 31 31 37 2C 35 32 3A 97 32 31 31 38 2C |:.2117,52:.2118,|
00001910: 32 33 34 3A 97 32 31 32 31 2C 34 39 3A 97 32 31 |234:.2121,49:.21|
00001920: 32 32 2C 31 34 31 00 60 1D C4 03 97 32 31 32 33 |22,141.`....2123|
00001930: 2C 32 30 3A 97 32 31 32 34 2C 33 3A 97 32 31 32 |,20:.2124,3:.212|
00001940: 36 2C 32 33 34 3A 97 32 31 32 37 2C 31 34 31 3A |6,234:.2127,141:|
00001950: 97 32 31 32 38 2C 32 31 3A 97 32 31 32 39 2C 33 |.2128,21:.2129,3|
00001960: 00 7E 1D C5 03 9E 55 55 AA 34 38 3A 8F 20 44 49 |.~....UU.48:. DI|
00001970: 53 41 42 4C 45 20 53 54 4F 50 20 4B 45 59 00 8F |SABLE STOP KEY..|
00001980: 1D CA 03 8D 38 30 30 3A 8F 20 54 49 54 4C 45 00 |....800:. TITLE.|
00001990: 9F 1D D4 03 89 33 30 30 3A 8F 20 4D 45 4E 55 00 |.....300:. MENU.|
000019A0: D0 1D DE 03 99 22 93 54 48 45 20 50 47 4D 20 57 |.....".THE PGM W|
000019B0: 49 4C 4C 20 4E 4F 54 20 57 4F 52 4B 20 4F 4E 20 |ILL NOT WORK ON |
000019C0: 54 48 49 53 20 4D 41 43 48 49 4E 45 21 22 3A 80 |THIS MACHINE!":.|
000019D0: 00 05 1E E8 03 8B 55 5A B2 31 A7 9E 55 50 25 3A |......UZ.1..UP%:|
000019E0: 9E 55 50 25 3A 55 5A B2 30 3A 8F 20 2A 2A 20 50 |.UP%:UZ.0:. ** P|
000019F0: 52 4F 47 52 41 4D 20 53 54 41 52 54 53 20 48 45 |ROGRAM STARTS HE|
00001A00: 52 45 20 2A 2A 00 31 1E E9 03 99 22 93 05 22 3B |RE **.1...."..";|
00001A10: 3A 8C 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 |:.:..(50003).0..|
00001A20: 35 33 32 38 31 2C 36 3A 97 35 33 32 38 30 2C 31 |53281,6:.53280,1|
00001A30: 34 00 5A 1E 1A 04 99 22 93 22 3A 97 55 54 2C 55 |4.Z....".":.UT,U|
00001A40: 4C 25 3A 8F 20 52 45 56 49 53 45 44 20 42 59 20 |L%:. REVISED BY |
00001A50: 4A 4F 48 4E 20 4B 41 43 55 52 00 71 1E 24 04 8C |JOHN KACUR.q.$..|
00001A60: 3A 55 48 B2 31 3A 55 47 24 B2 22 22 3A 8D 38 35 |:UH.1:UG$."":.85|
00001A70: 30 00 9B 1E 25 04 99 22 11 11 20 C4 4F 20 59 4F |0...%..".. .O YO|
00001A80: 55 20 57 41 4E 54 20 54 48 45 20 41 4C 41 52 4D |U WANT THE ALARM|
00001A90: 20 4F 50 54 49 4F 4E 3F 20 22 3B 00 B1 1E 26 04 | OPTION? ";...&.|
00001AA0: 55 53 24 B2 22 59 4E 22 3A 55 4C B2 31 3A 8D 33 |US$."YN":UL.1:.3|
00001AB0: 35 00 C3 1E 27 04 8B 55 52 24 B2 22 59 22 A7 41 |5...'..UR$."Y".A|
00001AC0: 4C B2 31 00 D5 1E 28 04 8B 55 52 24 B2 22 4E 22 |L.1...(..UR$."N"|
00001AD0: A7 41 4C B2 30 00 0B 1F 29 04 99 22 11 11 11 20 |.AL.0...).."... |
00001AE0: CF D0 D4 C9 CF CE D3 3A 22 3A 99 22 11 11 20 20 |.......:":.".. |
00001AF0: 20 20 20 20 20 20 41 29 20 31 32 2E 30 30 20 48 | A) 12.00 H|
00001B00: 4F 55 52 20 46 4F 52 4D 41 54 22 00 31 1F 2A 04 |OUR FORMAT".1.*.|
00001B10: 99 22 11 20 20 20 20 20 20 20 20 42 29 20 32 34 |.". B) 24|
00001B20: 2E 30 30 20 48 4F 55 52 20 46 4F 52 4D 41 54 2E |.00 HOUR FORMAT.|
00001B30: 22 00 66 1F 2B 04 99 22 11 11 20 20 20 20 20 20 |".f.+..".. |
00001B40: 20 20 C5 4E 54 45 52 20 CF 50 54 49 4F 4E 20 2D | .NTER .PTION -|
00001B50: 3E 20 22 3B 3A 55 53 24 B2 22 41 42 22 3A 55 4C |> ";:US$."AB":UL|
00001B60: B2 31 3A 8D 33 35 00 78 1F 2C 04 8B 55 52 24 B2 |.1:.35.x.,..UR$.|
00001B70: 22 41 22 A7 4F 50 B2 31 00 94 1F 4C 04 8F 20 42 |"A".OP.1...L.. B|
00001B80: 49 47 20 54 49 4D 45 20 32 2E 30 20 4E 4F 4E 2D |IG TIME 2.0 NON-|
00001B90: 53 54 4F 50 00 B5 1F 56 04 8F 20 4F 52 49 47 49 |STOP...V.. ORIGI|
00001BA0: 4E 41 4C 4C 59 20 42 59 20 53 43 4F 54 54 20 4D |NALLY BY SCOTT M|
00001BB0: 41 55 43 55 53 00 D1 1F 60 04 8F 20 4D 4F 44 49 |AUCUS...`.. MODI|
00001BC0: 46 49 45 44 20 42 59 20 42 2E 20 53 45 49 4C 45 |FIED BY B. SEILE|
00001BD0: 52 00 D7 1F 6A 04 8F 00 FA 1F 74 04 81 49 B2 30 |R...j.....t..I.0|
00001BE0: A4 39 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.9 |
00001BF0: 20 20 20 20 20 20 20 20 20 20 00 0F 20 7E 04 8F | .. ~..|
00001C00: 20 53 45 54 20 55 50 20 41 20 44 49 47 49 54 00 | SET UP A DIGIT.|
00001C10: 1B 20 88 04 81 4A B2 31 20 A4 35 00 23 20 92 04 |. ...J.1 .5.# ..|
00001C20: 87 41 24 00 43 20 9C 04 8F 20 4D 4F 56 45 20 43 |.A$.C ... MOVE C|
00001C30: 55 52 53 4F 52 20 44 4F 57 4E 20 26 20 33 20 4C |URSOR DOWN & 3 L|
00001C40: 45 46 54 00 5D 20 A6 04 41 24 28 49 29 B2 41 24 |EFT.] ..A$(I).A$|
00001C50: 28 49 29 AA 41 24 AA 22 11 9D 9D 9D 22 00 65 20 |(I).A$."....".e |
00001C60: B0 04 82 20 4A 00 6D 20 BA 04 87 41 24 00 8A 20 |... J.m ...A$.. |
00001C70: C4 04 8F 20 4D 4F 56 45 20 43 55 52 53 4F 52 20 |... MOVE CURSOR |
00001C80: 52 49 47 48 54 20 26 20 55 50 00 A6 20 CE 04 41 |RIGHT & UP.. ..A|
00001C90: 24 28 49 29 B2 41 24 28 49 29 AA 41 24 AA 22 1D |$(I).A$(I).A$.".|
00001CA0: 91 91 91 91 91 22 00 AD 20 D8 04 82 49 00 BC 20 |.....".. ...I.. |
00001CB0: D9 04 8B 41 4C B2 30 A7 31 32 36 30 00 FD 20 DA |...AL.0.1260.. .|
00001CC0: 04 99 22 93 22 3A 97 55 54 2C 55 55 25 3A 99 22 |..".":.UT,UU%:."|
00001CD0: 11 11 11 11 20 50 4C 45 41 53 45 20 54 59 50 45 |.... PLEASE TYPE|
00001CE0: 20 54 48 45 20 54 49 4D 45 20 59 4F 55 20 57 41 | THE TIME YOU WA|
00001CF0: 4E 54 20 54 48 45 20 41 4C 41 52 4D 22 00 20 21 |NT THE ALARM". !|
00001D00: DB 04 99 22 11 11 20 20 20 20 20 20 20 20 20 20 |...".. |
00001D10: 20 20 20 20 20 20 20 20 4D 49 4E 55 54 45 53 22 | MINUTES"|
00001D20: 00 48 21 DD 04 99 22 20 20 20 20 20 20 20 20 20 |.H!..." |
00001D30: 20 20 20 20 48 4F 55 52 53 C0 AE 20 C2 20 B0 C0 | HOURS.. . ..|
00001D40: 53 45 43 4F 4E 44 53 22 00 68 21 DE 04 99 22 20 |SECONDS".h!..." |
00001D50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001D60: 20 20 DD 20 C2 20 DD 22 00 89 21 DF 04 99 22 20 | . . ."..!..." |
00001D70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001D80: 20 20 48 48 4D 4D 53 53 22 00 BA 21 E0 04 99 C8 | HHMMSS"..!....|
00001D90: 28 55 44 24 2C 31 34 29 22 20 20 20 20 20 20 20 |(UD$,14)" |
00001DA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001DB0: 20 20 9D 9D 9D 9D 9D 9D 22 3B 00 E0 21 E1 04 55 | ......";..!..U|
00001DC0: 53 24 B2 22 30 31 32 33 34 35 36 37 38 39 22 3A |S$."0123456789":|
00001DD0: 55 4C B2 36 3A 8D 33 35 3A 41 4C 24 B2 55 52 24 |UL.6:.35:AL$.UR$|
00001DE0: 00 F5 21 E2 04 8B C3 28 41 4C 24 29 B3 B1 36 A7 |..!....(AL$)..6.|
00001DF0: 89 31 32 34 32 00 08 22 E7 04 8F 20 41 53 4B 20 |.1242.."... ASK |
00001E00: 46 4F 52 20 54 49 4D 45 00 47 22 EC 04 99 22 93 |FOR TIME.G"...".|
00001E10: 22 3A 97 55 54 2C 55 55 25 3A 99 22 11 11 11 11 |":.UT,UU%:."....|
00001E20: 11 20 20 20 20 20 20 20 20 20 50 4C 45 41 53 45 |. PLEASE|
00001E30: 20 54 59 50 45 20 54 48 45 20 43 55 52 52 45 4E | TYPE THE CURREN|
00001E40: 54 20 54 49 4D 45 22 00 6A 22 F6 04 99 22 11 11 |T TIME".j"..."..|
00001E50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001E60: 20 20 4D 49 4E 55 54 45 53 22 00 92 22 00 05 99 | MINUTES".."...|
00001E70: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 48 4F |" HO|
00001E80: 55 52 53 C0 AE 20 C2 20 B0 C0 53 45 43 4F 4E 44 |URS.. . ..SECOND|
00001E90: 53 22 00 B2 22 0A 05 99 22 20 20 20 20 20 20 20 |S".."..." |
00001EA0: 20 20 20 20 20 20 20 20 20 20 20 20 DD 20 C2 20 | . . |
00001EB0: DD 22 00 D3 22 0E 05 99 22 20 20 20 20 20 20 20 |.".."..." |
00001EC0: 20 20 20 20 20 20 20 20 20 20 20 20 48 48 4D 4D | HHMM|
00001ED0: 53 53 22 00 04 23 10 05 99 C8 28 55 44 24 2C 31 |SS"..#....(UD$,1|
00001EE0: 34 29 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |4)" |
00001EF0: 20 20 20 20 20 20 20 20 20 20 20 20 9D 9D 9D 9D | ....|
00001F00: 9D 9D 22 3B 00 29 23 12 05 55 53 24 B2 22 30 31 |..";.)#..US$."01|
00001F10: 32 33 34 35 36 37 38 39 22 3A 55 4C B2 36 3A 8D |23456789":UL.6:.|
00001F20: 33 35 3A 41 24 B2 55 52 24 00 3D 23 14 05 8B C3 |35:A$.UR$.=#....|
00001F30: 28 41 24 29 B3 B1 36 A7 89 31 32 39 36 00 51 23 |(A$)..6..1296.Q#|
00001F40: 1E 05 8F 20 53 45 54 20 54 49 4D 45 20 48 45 52 |... SET TIME HER|
00001F50: 45 00 5C 23 28 05 54 49 24 B2 41 24 00 73 23 32 |E.\#(.TI$.A$.s#2|
00001F60: 05 8F 20 44 52 41 57 20 22 54 49 4D 45 22 20 57 |.. DRAW "TIME" W|
00001F70: 4F 52 44 00 7D 23 3C 05 8D 32 32 36 30 00 93 23 |ORD.}#<..2260..#|
00001F80: 46 05 8F 20 44 52 41 57 20 42 4F 52 44 45 52 20 |F.. DRAW BORDER |
00001F90: 42 4F 58 00 9D 23 50 05 8D 32 30 39 30 00 B0 23 |BOX..#P..2090..#|
00001FA0: 5A 05 8F 2A 2A 4D 41 49 4E 20 4C 4F 4F 50 2A 2A |Z..**MAIN LOOP**|
00001FB0: 00 D2 23 64 05 8F 20 50 4F 53 49 54 49 4F 4E 20 |..#d.. POSITION |
00001FC0: 43 55 52 53 4F 52 20 41 54 31 53 54 20 44 49 47 |CURSOR AT1ST DIG|
00001FD0: 49 54 00 EC 23 6E 05 99 22 13 11 11 11 11 11 11 |IT..#n..".......|
00001FE0: 11 11 11 11 1D 1D 1D 1D 1D 1D 22 3B 00 09 24 78 |..........";..$x|
00001FF0: 05 8F 20 44 52 41 57 20 4E 55 4D 45 52 41 4C 53 |.. DRAW NUMERALS|
00002000: 20 46 4F 52 20 54 49 4D 45 00 14 24 82 05 81 49 | FOR TIME..$...I|
00002010: B2 31 A4 36 00 2C 24 8C 05 99 41 24 28 C5 28 CA |.1.6.,$...A$(.(.|
00002020: 28 54 49 24 2C 49 2C 31 29 29 29 3B 00 4E 24 96 |(TI$,I,1)));.N$.|
00002030: 05 8F 20 49 4E 53 45 52 54 20 43 4F 4C 4F 4E 20 |.. INSERT COLON |
00002040: 54 57 45 45 4E 20 48 48 2D 4D 4D 2D 53 53 00 6C |TWEEN HH-MM-SS.l|
00002050: 24 A0 05 8B 49 B2 32 B0 49 B2 34 A7 99 22 11 D7 |$...I.2.I.4.."..|
00002060: 9D 11 11 11 D7 1D 91 91 91 91 22 3B 00 91 24 A5 |..........";..$.|
00002070: 05 8B 4F 50 B2 31 AF C5 28 54 49 24 29 B1 31 32 |..OP.1..(TI$).12|
00002080: 36 30 30 30 A7 54 49 24 B2 22 30 30 30 30 30 30 |6000.TI$."000000|
00002090: 22 00 AA 24 A6 05 8B 41 4C 24 B2 54 49 24 A7 8D |"..$...AL$.TI$..|
000020A0: 35 30 30 30 3A 8D 35 30 30 30 00 C7 24 A7 05 A1 |5000:.5000..$...|
000020B0: 5A 24 3A 8B 5A 24 B2 22 48 22 A7 20 9C 3A 8D 39 |Z$:.Z$."H". .:.9|
000020C0: 30 30 3A 89 33 30 30 00 CF 24 AA 05 82 20 49 00 |00:.300..$... I.|
000020D0: DA 24 B4 05 89 20 31 33 39 30 00 F3 24 BE 05 8F |.$... 1390..$...|
000020E0: 20 44 49 47 49 54 53 20 44 41 54 41 20 53 54 52 | DIGITS DATA STR|
000020F0: 49 4E 47 00 FE 24 C8 05 83 22 CE A3 CD 22 00 09 |ING..$..."..."..|
00002100: 25 D2 05 83 22 A5 A0 A7 22 00 14 25 DC 05 83 22 |%..."..."..%..."|
00002110: A5 A0 A7 22 00 1F 25 E6 05 83 22 A5 A0 A7 22 00 |..."..%..."...".|
00002120: 2A 25 F0 05 83 22 A5 A0 A7 22 00 35 25 FA 05 83 |*%..."...".5%...|
00002130: 22 CD A4 CE 22 00 40 25 04 06 83 22 20 CE A5 22 |"...".@%..." .."|
00002140: 00 4B 25 0E 06 83 22 20 20 A5 22 00 56 25 18 06 |.K%..." .".V%..|
00002150: 83 22 20 20 A5 22 00 61 25 22 06 83 22 20 20 A5 |." .".a%".." .|
00002160: 22 00 6C 25 2C 06 83 22 20 20 A5 22 00 77 25 36 |".l%,.." .".w%6|
00002170: 06 83 22 A4 A4 CC 22 00 82 25 40 06 83 22 CE A3 |.."..."..%@.."..|
00002180: CD 22 00 8D 25 4A 06 83 22 20 20 A7 22 00 98 25 |."..%J.." ."..%|
00002190: 54 06 83 22 20 A4 CE 22 00 A3 25 5E 06 83 22 CE |T.." .."..%^..".|
000021A0: 20 20 22 00 AE 25 68 06 83 22 A5 20 20 22 00 B9 | "..%h..". "..|
000021B0: 25 72 06 83 22 CC A4 A4 22 00 C4 25 7C 06 83 22 |%r.."..."..%|.."|
000021C0: CE A3 CD 22 00 CF 25 86 06 83 22 20 20 A7 22 00 |..."..%..." .".|
000021D0: DA 25 90 06 83 22 20 A4 CE 22 00 E5 25 9A 06 83 |.%..." .."..%...|
000021E0: 22 20 20 CD 22 00 F0 25 A4 06 83 22 20 20 A7 22 |" ."..%..." ."|
000021F0: 00 FB 25 AE 06 83 22 CD A4 CE 22 00 06 26 B8 06 |..%..."..."..&..|
00002200: 83 22 A5 A0 A5 22 00 11 26 C2 06 83 22 A5 A0 A5 |."..."..&..."...|
00002210: 22 00 1C 26 CC 06 83 22 CC A4 CC 22 00 27 26 D6 |"..&..."...".'&.|
00002220: 06 83 22 20 20 A5 22 00 32 26 E0 06 83 22 20 20 |.." .".2&..." |
00002230: A5 22 00 3D 26 EA 06 83 22 20 20 A5 22 00 49 26 |.".=&..." .".I&|
00002240: F4 06 83 20 22 CF A3 A3 22 00 55 26 FE 06 83 20 |... "...".U&... |
00002250: 22 CC A4 20 22 00 61 26 08 07 83 20 22 20 20 CD |".. ".a&... " .|
00002260: 22 00 6D 26 12 07 83 20 22 20 20 A7 22 00 79 26 |".m&... " .".y&|
00002270: 1C 07 83 20 22 20 20 A7 22 00 85 26 26 07 83 20 |... " ."..&&.. |
00002280: 22 CD A4 CE 22 00 91 26 30 07 83 20 22 CE A3 CD |"..."..&0.. "...|
00002290: 22 00 9D 26 3A 07 83 20 22 A5 20 20 22 00 A9 26 |"..&:.. ". "..&|
000022A0: 44 07 83 20 22 CC A4 20 22 00 B5 26 4E 07 83 20 |D.. ".. "..&N.. |
000022B0: 22 A5 A0 CD 22 00 C1 26 58 07 83 20 22 A5 A0 A7 |"..."..&X.. "...|
000022C0: 22 00 CD 26 62 07 83 20 22 CD A4 CE 22 00 D9 26 |"..&b.. "..."..&|
000022D0: 6C 07 83 20 22 CF A3 D0 22 00 E5 26 76 07 83 20 |l.. "..."..&v.. |
000022E0: 22 20 20 CE 22 00 F1 26 80 07 83 20 22 20 CE 20 |" ."..&... " . |
000022F0: 22 00 FD 26 8A 07 83 20 22 A7 20 20 22 00 09 27 |"..&... ". "..'|
00002300: 94 07 83 20 22 A7 20 20 22 00 15 27 9E 07 83 20 |... ". "..'... |
00002310: 22 A7 20 20 22 00 21 27 A8 07 83 20 22 CE A3 CD |". ".!'... "...|
00002320: 22 00 2D 27 B2 07 83 20 22 A5 A0 A7 22 00 39 27 |".-'... "...".9'|
00002330: BC 07 83 20 22 CD A4 CE 22 00 45 27 C6 07 83 20 |... "...".E'... |
00002340: 22 CE 20 CD 22 00 51 27 D0 07 83 20 22 A5 A0 A7 |". .".Q'... "...|
00002350: 22 00 5D 27 DA 07 83 20 22 CD A4 CE 22 00 69 27 |".]'... "...".i'|
00002360: E4 07 83 20 22 CE A3 CD 22 00 75 27 EE 07 83 20 |... "...".u'... |
00002370: 22 A5 20 A7 22 00 81 27 F8 07 83 20 22 CD A4 BA |". ."..'... "...|
00002380: 22 00 8D 27 02 08 83 20 22 20 20 A7 22 00 99 27 |"..'... " ."..'|
00002390: 0C 08 83 20 22 20 20 A7 22 00 A5 27 16 08 83 20 |... " ."..'... |
000023A0: 22 CD A4 CE 22 00 C4 27 20 08 8F 20 57 52 49 54 |"..."..' .. WRIT|
000023B0: 45 20 42 4F 52 44 45 52 53 20 46 4F 52 20 44 49 |E BORDERS FOR DI|
000023C0: 47 49 54 53 00 CE 27 2A 08 99 22 20 22 3B 00 E4 |GITS..'*.." ";..|
000023D0: 27 34 08 81 49 B2 31 A4 33 37 3A 99 22 A4 22 3B |'4..I.1.37:.".";|
000023E0: 3A 82 3A 99 00 13 28 3E 08 99 22 A7 CD 20 20 20 |:.:...(>..".. |
000023F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002400: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002410: CE A5 22 00 1E 28 48 08 81 49 B2 31 A4 32 00 4F |.."..(H..I.1.2.O|
00002420: 28 52 08 99 22 A7 22 A6 49 29 22 CD 22 A6 33 35 |(R..".".I)".".35|
00002430: AB 32 AC 49 29 22 CE 22 A6 49 29 22 A5 22 20 20 |.2.I)".".I)"." |
00002440: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 | .|
00002450: 55 28 5C 08 82 00 90 28 66 08 99 22 A7 20 20 20 |U(\....(f..". |
00002460: CF 22 3B 3A 81 49 B2 31 A4 32 39 3A 99 22 A3 22 |.";:.I.1.29:."."|
00002470: 3B 3A 82 3A 99 22 D0 20 20 20 A5 22 20 20 20 20 |;:.:.". ." |
00002480: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002490: 00 9B 28 70 08 81 49 B2 31 A4 38 00 B8 28 7A 08 |..(p..I.1.8..(z.|
000024A0: 99 22 A7 20 20 20 A5 22 A6 32 39 29 22 A7 20 20 |.". .".29)". |
000024B0: 20 A5 22 20 20 20 20 20 00 BE 28 84 08 82 00 F8 | ." ..(.....|
000024C0: 28 8E 08 99 22 A7 20 20 20 CC 22 3B 3A 81 49 B2 |(...". .";:.I.|
000024D0: 31 A4 32 39 3A 99 22 A4 22 3B 3A 82 3A 99 22 BA |1.29:.".";:.:.".|
000024E0: 20 20 20 A5 22 20 20 20 20 20 20 20 20 20 20 20 | ." |
000024F0: 20 20 20 20 20 20 20 20 00 06 29 98 08 81 49 B2 | ..)...I.|
00002500: 32 A4 31 A9 AB 31 00 26 29 A2 08 99 22 A7 22 A6 |2.1..1.&)...".".|
00002510: 49 29 22 CE 22 A6 33 35 AB 32 AC 49 29 22 CD 22 |I)".".35.2.I)"."|
00002520: A6 49 29 22 A5 22 00 2C 29 AC 08 82 00 5B 29 B6 |.I)".".,)....[).|
00002530: 08 99 22 A7 CE 20 20 20 20 20 20 20 20 20 20 20 |..".. |
00002540: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002550: 20 20 20 20 20 20 20 20 CD A5 22 00 96 29 C0 08 | .."..)..|
00002560: 99 22 20 22 3B 3A 81 49 B2 31 A4 33 37 3A 99 22 |." ";:.I.1.37:."|
00002570: A3 22 3B 3A 82 3A 99 20 20 20 20 20 20 20 20 20 |.";:.:. |
00002580: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002590: 20 20 20 20 20 20 00 9C 29 CA 08 8E 00 AE 29 D4 | ..).....).|
000025A0: 08 8F 20 54 49 4D 45 20 48 45 41 44 45 52 00 B8 |.. TIME HEADER..|
000025B0: 29 DE 08 99 22 93 22 3B 00 C1 29 E8 08 57 B2 31 |)...".";..)..W.1|
000025C0: 30 00 DE 29 F2 08 99 A6 57 29 22 A3 D0 A3 A3 A0 |0..)....W)".....|
000025D0: A3 CF A0 A7 CD 20 20 CE A5 20 CF A3 A3 22 00 FB |..... .. ..."..|
000025E0: 29 FC 08 99 A6 57 29 22 20 A7 20 20 20 20 A5 20 |)....W)" . . |
000025F0: A7 20 CD CE 20 A5 20 CC A4 20 22 00 18 2A 06 09 |. .. . .. "..*..|
00002600: 99 A6 57 29 22 20 A7 A0 A0 A0 A0 A5 A0 A7 A0 A0 |..W)" ..........|
00002610: A0 A0 A5 A0 A5 A0 A0 22 00 35 2A 10 09 99 A6 57 |.......".5*....W|
00002620: 29 22 20 A7 20 20 20 A4 CC A0 A7 20 20 20 20 A5 |)" . .... .|
00002630: 20 CC A4 A4 22 00 3B 2A 1A 09 8E 00 53 2A 88 13 | ...".;*....S*..|
00002640: 97 35 39 34 36 37 2C 31 36 3A 97 35 39 34 36 36 |.59467,16:.59466|
00002650: 2C 31 33 00 6F 2A 89 13 81 52 B2 31 38 35 A4 38 |,13.o*...R.185.8|
00002660: 30 A9 AB 33 3A 97 35 39 34 36 34 2C 52 3A 82 00 |0..3:.59464,R:..|
00002670: 87 2A 8A 13 97 35 39 34 36 34 2C 30 3A 81 4C B2 |.*...59464,0:.L.|
00002680: 31 A4 32 30 30 3A 82 00 A4 2A 8B 13 81 52 B2 32 |1.200:...*...R.2|
00002690: 30 35 A4 31 30 35 A9 AB 33 3A 97 35 39 34 36 34 |05.105..3:.59464|
000026A0: 2C 52 3A 82 00 C0 2A 8C 13 81 52 B2 31 30 35 A4 |,R:...*...R.105.|
000026B0: 32 35 35 A9 33 3A 97 35 39 34 36 34 2C 52 3A 82 |255.3:.59464,R:.|
000026C0: 00 D6 2A 8D 13 97 35 39 34 36 37 2C 30 3A 97 35 |..*...59467,0:.5|
000026D0: 39 34 36 36 2C 30 00 DC 2A 8E 13 8E 00 00 00 |9466,0..*...... |
.......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...:...... ** TO OUR BEST KNOWLEDGE TH
IS...... PROGRAM IS FREE FOR./....
DUPLICATION IN CANADA..L.... IF YOU
HAVE CONTARY.I.... INFORMATION, PLEAS
E...... CONTACT COMMODORE CANADA AND.
..... EVERY EFFORT WILL BE MADE TO.V.
... WITHDRAW COPIES OF THIS......
PROGRAM......:...#.. +++ INPUT SECTION +
++.".(..UO,0:UR$."":UI$."".2.*..UL.0.UL.
80.<.-..UC,0.P.2..UI$:.UI$."".50.Z.7..UI
$.G(13).C(UR$)..1..UC,1:." .";:.85...<..
UI$.G(20).105...>.. C(UR$)..UL.50.F.A..1
20:. CHECK FOR VALID CHARACTER.V.F.UR$.U
R$.UI$...K..UI$;...P..50.,.T."PLURALS.C0
" PRG S . "0:BIGTIME.C
2",8: PRG.Q.U.. +++ CHECK FOR HELP RE
QUEST +++.Y.Z..UR$.UX$.195:. EXIT TO HEL
P ROUTINE..._..UF.1..240...D.UF.0:.:....
F.. ++ CHECK DELETE ++...I..C(UR$).1.50.
W.N.UR$.H(UR$,C(UR$).1)...S..". ..";:.5
0...X.. ++ CHECK FOR VALID CHARACTERS ++
.".}..C(US$).0.150.3....US.1.C(US$).J...
.UI$.J(US$,US,1)...P.....]...UI$."":..X.
... ** STANDARD INPUT **......F(UI$).46.
.......UI$.G(32)..... ..F(UI$).48.F(UI$)
.57.170.......Z....F(UI$).65.F(UI$).90.1
80............F(UI$).193.F(UI$).218.UI$.
"":..'....B(UT).UU%.UI$.G(F(UI$).128):..
-.....:...UI$."":.._.C.UF.1:. +++ HELP R
OUTINE EXIT +++.H.E..250.Q.H..245...M..U
Q.UB.(U2%.256.U1%.U3%.2)...R.UQ%(UQ.UB).
B(UQ):.:."."...W.UZ.1:UV%.B(UT).H.X..300
...Y.UZ.0:US$.UJ$:UG$.UK$:UP.UJ:UL.UK:.B
(50003).0..53281,6:.53280,14.A...UT$.UL$
:.".";:.UT,UV%:.UQ.UB.(U2%.256.U1%.U3%.3
).V....UQ,UQ%(UQ.UB):..B....U1,U1%.N....
U2,U2%.Z....U4,U4%......U3,U3%.1......35
.B...UD%.((U2%.256.U1%.U3%).UB).40:.H(UD
$,UD%.1):.......H(UD$,24);"
. HELP COMING . ":..)...U1%.B(
U1):U2%.B(U2):U3%.B(U3):U4%.B(U4).Q...UJ
$.US$:UK$.UG$:UL$.UT$:UJ.UP:UK.UL.W.....
H.,.. ** MENU **.N.-.:......".":.UT,UU%:
.B(50003).0..53281,9:.53280,8.../.:...1.
.". MENU"...6.." --------
------------------------------"...;.."..
1. BIGTIME ".5.@..".. 2.
USER INSTRUCTIONS".Q.O..".. 3.
QUIT.."...T.." -----------------------
---------------"...Y..".. PRESS A
NUMBER KEY (1-3) ";.R.^.UL.1:US$."123":.
35:. INPUT ROUTINE..._..C(UR$).1.300...`
.US$.""...C..E(UR$).1000,400,396.".D..E(
UR$).2.Z$."H".1330.+.H..300.R.... ** RE-
ENABLE STOP KEY AND END **......B(50003)
..1.B(50003)..160.B(50003)..0.399......U
U.71:.B(50003).0..53281,6:.53280,14.....
."..":..B....875:....... ** STUDENT INST
RUCTIONS **......".":.UT,UL%:.B(50003).0
..53281,0:.53280,0.0...UP.0:UG$."USER IN
ST":.850.A....". THIS PROGRAM SIMULATES
A DIGITAL CLOCK."......" YOU CAN CHOOSE
EITHER A 12 HOUR FORMAT"......". OR A 24
HOUR FORMAT. YOU CAN ALSO SET"......".
AN ALARM. (THE ALARM IS RATHER QUIET"...
...". THOUGH AND PROBABLY WILL NOT WAKE
YOU ".B.B..". UP FROM YOUR FRENCH CLASS.
)".R.D..".. TYPE <H> AT ANY TIME TO RETU
RN TO THE"...F..". MENU. "......835.....
.UZ.1..UP%:.217.......F.... ** TEACHER I
NSTRUCTIONS **......".":.UT,UL%:.B(50003
).0..53281,2:.53280,10.....UP.0:UG$."TEA
CHER INST":.850.E....".. TO THE BES
T OF OUR KNOWLEDGE,.".N...." THIS PROG
RAM IS IN THE PUBLIC."......" DOMAIN.
IF THIS IS NOT THE CASE."......" PLEA
SE CONTACT:..."......" COMMODORE BU
SINESS MACHINES."......" 3370 P
HARMACY AVE..(...." AGINCOURT,
ONTARIO".J...." CANADA M1W 2K
4".J...." (416) 499-4292".....U
P.1:. 835:. 850:......" ..PROGRAM NA
ME: PROGRAM TITLE..L...." WRITTEN BY
: UNKNOWN......." UPGRADED BY : YO
UR NAME......." .THIS PROGRAM WILL R
UN ON ANY...B...." BASIC 2.0 PET
COMPUTER..I...." BASIC 4.0 PET
COMPUTER......." 8032 CBM COMPUT
ER......." COMMODORE 64 COMPUTER
......835.B.D..835.V.N..UZ.1..UP%:.217..
.W.....X.. ** PROGRAM MODIFICATION INST
**...Y..".":.UT,UL%.3.].UP.0:UG$."PROGRA
M MOD":.850.<....835.P....UZ.1..UP%:.217
.V.....{.... ** TO USE 8032 LOAD CBM4032
**...F..".....BEFORE RUNNING THIS PROGR
AM ON AN 8032 .....P.." LOAD THE '
CBM 4032' PROGRAM............."...Z..UU.
71............ ** TO USE 8032 LOAD CBM40
32 **.H...."....BEFORE RUNNING THIS PROG
RAM ON AN 8032 ..LOAD CBM 4032 PROGRAM"
.T....1093:.... .. ** T I T L E P A G
E **.H.".."....";:.UT,UU%:.B(50003).0..5
3280,14:.53281,6...$..I.1.38:."...";:...
.&..I.1.22:.".....";:....(..I.1.37:."...
..";:..&.*..I.1.22:.".....";:..K.,.."...
........................ ..M...."......
............. . . .....0.."............
....... . ......2.."...................
. ..T.4.."..............C O M M O D O R
E.....6.."...............EDUCATIONAL...
..8.."................SOFTWARE.1.:.. **
COMMODORE LOGO **.I.;..H(UD$,24);"......
....PRESS SPACE BAR OR WAIT.":I.0...<..A
$:.A$.." ".I.I.1:.I.250.828...>.T1$."":T
2$."":T3$."":T4$."":I.0...@..300.T.C.. *
* SPACE BAR PRESS **...H..UO,0:.H(UD$,24
);".......PRESS SPACE BAR TO CONTINUE.".
&.L..UI$:.UI$.." ".844.,.N...L.R.. ** PA
GE DESIGN ROUTINE **.X.T.UP.UP.1.|.W..".
"H(UT$.UP$,21);I(UP$.UG$,18)...\.." ----
----------------------------------"...`.
.UH..0.870...A..H(UD$,24);H(UP$,7);"HELP
- PRESS H <RETURN>"...F.UH.0:."..":..
..K.. ** PLEASE WAIT REMARK **.T.P..H(UD
$,24);" ONE MOMENT PLEASE...
".Z.U...W.... ** SET UP VARIABLES **.
B...UX$."H":.UQ%(1000):UB.32768:U1.196:U
2.197:U3.198:U4.216:UC.167:UU.1024.....U
T.59468:UU%.12:UL%.14:UP%.1146:UM.32768:
UO.158:. 50003,0.C....B(50003).0.UB.1024
:U1.209:U2.210:U3.211:U4.214:UC.204:UU.2
048......B(50003).0.UT.53272:UU%.21:UL%.
23:UP%.2139:UM.1024:UO.198.....UD$."....
.....................".X...UP$."
".&...UT$
." BIGTIME ":. PLACE PROGRAM T
ITLE HERE !!!!!!!!!!!!!!!!!***.,.....F..
.. ** SET VARIABLES **.R.... A$(9).[....
900.A...:.G...:...... ** CHECK FOR 8032
**. ....".":." ":. SHIFTED SPACE......B(
UB.40)..96..700.P.... ** MEMORY CHECK **
...... .(0).2000.937......"....THIS MACH
INE DOES NOT HAVE ENOUGH.".6...."MEMORY
TO RUN THIS PROGRAM !".A....UU.71.G.....
A...."..":.B(50003).0.962...... ** BASIC
2.0 OR 4.0 OR C-64 SETUP **.N....10
75,133:.1076,144:.1077,234:.1079,4:.1080
,133:.1081,145......1091,155:.1098,133:.
1099,144:.1100,234:.1103,133.&....1104,1
45:.1105,234:.1082,234.=....B(50003)..16
0.955.L....1093,88:.1094,228:.1097,85:.1
102,228:.965......B(50003)..1.990......1
093,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 ST
OP KEY...J..800:. TITLE...T..300:. MENU.
P....".THE PGM WILL NOT WORK ON THIS MAC
HINE!":.......UZ.1..UP%:.UP%:UZ.0:. ** P
ROGRAM STARTS HERE **.1...."..";:.:.B(50
003).0..53281,6:.53280,14.Z....".":.UT,U
L%:. REVISED BY JOHN KACUR.Q.$..:UH.1:UG
$."":.850...%..".. DO YOU WANT THE ALARM
OPTION? ";...&.US$."YN":UL.1:.35.C.'..U
R$."Y".AL.1.U.(..UR$."N".AL.0...).."...
OPTIONS:":.".. A) 12.00 HOUR FORM
AT".1.*..". B) 24.00 HOUR FORMAT.
".F.+..".. ENTER OPTION -> ";:US$
."AB":UL.1:.35.X.,..UR$."A".OP.1...L.. B
IG TIME 2.0 NON-STOP...V.. ORIGINALLY BY
SCOTT MAUCUS.Q.`.. MODIFIED BY B. SEILE
R.W.J.....T..I.0.9
.. ~.. SET UP A DIGIT.. ...J.1 .5.# ..
.A$.C ... MOVE CURSOR DOWN & 3 LEFT.] ..
A$(I).A$(I).A$."....".E ... J.M ...A$..
D.. MOVE CURSOR RIGHT & UP.. N.A$(I).A$(
I).A$."......".. X..I.. Y..AL.0.1260.. Z
..".":.UT,UU%:.".... PLEASE TYPE THE TIM
E YOU WANT THE ALARM". !..."..
MINUTES".H!..." HOUR
S.. B ..SECONDS".H!..."
. B ."..!..." HHMMSS
"..!...H(UD$,14)"
......";..!..US$."0123456789":UL.6:.35
:AL$.UR$..!...C(AL$)..6..1242.."... ASK
FOR TIME.G"...".":.UT,UU%:.".....
PLEASE TYPE THE CURRENT TIME".J"..."..
MINUTES".."..."
HOURS.. B ..SECONDS".."..."
. B .".S"..."
HHMMSS"..#...H(UD$,14)"
......";.)#..US$."0123456789
":UL.6:.35:A$.UR$.=#...C(A$)..6..1296.Q#
... SET TIME HERE.\#(.TI$.A$.S#2.. DRAW
"TIME" WORD.}#<..2260..#F.. DRAW BORDER
BOX..#P..2090..#Z..**MAIN LOOP**.R#D.. P
OSITION CURSOR AT1ST DIGIT..#N..".......
..........";..$X.. DRAW NUMERALS FOR TIM
E..$...I.1.6.,$...A$(E(J(TI$,I,1)));.N$.
.. INSERT COLON TWEEN HH-MM-SS.L$ ..I.2.
I.4..".W....W.....";..$...OP.1.E(TI$).12
6000.TI$."000000"..$...AL$.TI$..5000:.50
00.G$...Z$:.Z$."H". .:.900:.300.O$... I.
Z$... 1390..$... DIGITS DATA STRING..$H.
."N.M"..%R..". ."..%...". ."..%...". .".
*%...". .".5%..."M.N".@%..." N.".K%..."
.".V%..." .".A%".." .".L%,.." .".W%6
.."..L"..%@.."N.M"..%J.." ."..%T.." .N"
..%^.."N "..%H..". "..%R.."L..".D%|.."
N.M".O%..." .".Z%..." .N"..%..." M"..%
..." ."..%..."M.N"..&...". ."..&B..". .
"..&L.."L.L".'&V.." .".2&..." .".=&...
" .".I&... "O..".U&... "L. ".A&... " M
".M&... " .".Y&... " ."..&&.. "M.N"..&
0.. "N.M"..&:.. ". "..&D.. "L. "..&N..
". M".A&X.. ". .".M&B.. "M.N".Y&L.. "O.P
"..&V.. " N"..&... " N "..&... ". "..'
... ". "..'... ". ".!'... "N.M".-'...
". .".9'... "M.N".E'F.. "N M".Q'P.. ". .
".]'Z.. "M.N".I'... "N.M".U'... ". ."..'
... "M.."..'... " ."..'... " ."..'...
"M.N".D' .. WRITE BORDERS FOR DIGITS.N'*
.." ";..'4..I.1.37:.".";:.:...(>..".M
N."..(H.
.I.1.2.O(R..".".I)"M".35.2.I)"N".I)"."
.U(\....(F..". O";:.I.1
.29:.".";:.:."P ."
..(P..I.1.8..(Z..". .".29)". ."
..(.....(...". L";:.I.1.29:.".";:.:.".
." ..)...I.2.1..1.&
)...".".I)"N".35.2.I)"M".I)".".,)....[).
..".N
M."..)..." ";:.I.1.37:.".";:.:.
..)J....)T.. TIME
HEADER..)...".";.A)..W.10..)....W)".P..
.O .M N. O.."..)....W)" . . . MN . L
. "..*....W)" . . . . . ".5*....W
)" . .L . . L..".;*....S*...59467,1
6:.59466,13.O*...R.185.80..3:.59464,R:..
.*...59464,0:.L.1.200:...*...R.205.105..
3:.59464,R:...*...R.105.255.3:.59464,R:.
.V*...59467,0:.59466,0..*......
> CLICK IMAGE PREVIEW FOR FULL MODAL