LUNAR.BAS
FILE INFORMATION
FILENAME(S): LUNAR.BAS
FILE TYPE(S): PRG
FILE SIZE: 14.8K
FIRST SEEN: 2025-11-30 18:05:25
APPEARS ON: 2 disk(s)
FILE HASH
8cb7d7d50d065d8ab9c8cf1d15ddc5b3535067910e297eec9b149db599d33bf5
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LOADSTAR 58 S 3 | LUNAR.BAS | PRG | Xii | 29 | 1 | DOWNLOAD FILE |
| LOADSTAR 58 S 3 | LUNAR.BAS | PRG | Sailor, Ganheden | 29 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 10 08 0A 00 8F 20 40 20 53 20 31 30 32 34 |....... @ S 1024|
00000010: 00 4E 08 14 00 86 59 25 28 31 32 2C 33 31 2C 32 |.N....Y%(12,31,2|
00000020: 29 2C 50 24 28 31 31 29 2C 4D 4F 24 28 31 32 29 |),P$(11),MO$(12)|
00000030: 2C 4D 24 28 31 32 29 2C 4D 4F 25 28 31 32 29 2C |,M$(12),MO%(12),|
00000040: 44 59 24 28 37 29 2C 57 25 28 37 2C 31 29 00 69 |DY$(7),W%(7,1).i|
00000050: 08 1E 00 53 58 B2 32 39 2E 35 33 30 35 38 38 3A |...SX.29.530588:|
00000060: 8F 40 20 45 20 33 38 30 30 00 7E 08 28 00 97 35 |.@ E 3800.~.(..5|
00000070: 33 32 34 38 AA 32 31 2C 30 3A 5A 25 B2 31 00 AC |3248.21,0:Z%.1..|
00000080: 08 32 00 8F 20 4C 55 4E 41 52 20 50 48 41 53 45 |.2.. LUNAR PHASE|
00000090: 20 43 41 4C 45 4E 44 41 52 20 4E 4F 52 4D 20 35 | CALENDAR NORM 5|
000000A0: 36 35 37 36 20 31 39 35 2C 31 39 36 00 CC 08 3C |6576 195,196...<|
000000B0: 00 97 35 36 35 37 36 2C 31 39 35 3A 97 36 34 38 |..56576,195:.648|
000000C0: 2C 34 3A 97 35 33 32 37 32 2C 32 31 00 0C 09 46 |,4:.53272,21...F|
000000D0: 00 8F 20 46 4F 52 20 31 35 32 35 2F 38 30 31 2F |.. FOR 1525/801/|
000000E0: 38 30 33 20 41 4E 44 20 45 50 53 4F 4E 20 46 58 |803 AND EPSON FX|
000000F0: 2D 38 30 20 50 52 49 4E 54 45 52 53 20 41 4E 44 |-80 PRINTERS AND|
00000100: 20 43 4F 4D 50 41 54 49 42 4C 45 53 00 44 09 50 | COMPATIBLES.D.P|
00000110: 00 56 49 43 B2 35 33 32 34 38 3A 97 32 30 34 30 |.VIC.53248:.2040|
00000120: 2C 31 35 3A 99 C7 28 31 34 32 29 22 93 08 22 3A |,15:..(142)"..":|
00000130: 8D 31 39 33 30 3A 8D 32 35 30 30 3A 97 32 30 34 |.1930:.2500:.204|
00000140: 31 2C 31 34 00 79 09 5A 00 97 35 33 32 38 37 2C |1,14.y.Z..53287,|
00000150: 33 3A 97 56 49 AA 32 39 2C 33 3A 97 35 33 32 37 |3:.VI.29,3:.5327|
00000160: 35 2C 32 35 35 3A 81 49 B2 39 36 30 A4 39 38 33 |5,255:.I.960.983|
00000170: 3A 97 49 2C 32 35 35 3A 82 00 99 09 64 00 81 49 |:.I,255:....d..I|
00000180: B2 39 38 34 A4 31 30 32 32 3A 97 49 2C 30 3A 82 |.984.1022:.I,0:.|
00000190: 3A 58 24 B2 C7 28 31 33 29 00 CC 09 6E 00 81 49 |:X$..(13)...n..I|
000001A0: B2 38 39 36 A4 39 31 39 3A 97 49 2C 32 35 35 3A |.896.919:.I,255:|
000001B0: 82 3A 81 49 B2 39 32 30 A4 39 35 39 3A 97 49 2C |.:.I.920.959:.I,|
000001C0: 30 3A 82 3A 97 35 33 32 38 38 2C 31 00 00 0A 78 |0:.:.53288,1...x|
000001D0: 00 97 32 31 34 2C 31 36 3A 99 3A 99 A3 37 29 22 |..214,16:.:..7)"|
000001E0: 12 50 4C 45 41 53 45 20 53 45 4C 45 43 54 20 54 |.PLEASE SELECT T|
000001F0: 59 50 45 20 4F 46 20 4F 55 54 50 55 54 3A 11 22 |YPE OF OUTPUT:."|
00000200: 00 21 0A 82 00 99 A3 37 29 22 12 31 2E 20 31 35 |.!.....7)".1. 15|
00000210: 32 35 20 4F 52 20 43 4F 4D 50 41 54 49 42 4C 45 |25 OR COMPATIBLE|
00000220: 22 00 49 0A 8C 00 99 A3 37 29 22 12 32 2E 20 45 |".I.....7)".2. E|
00000230: 50 53 4F 4E 20 46 58 2D 38 30 20 4F 52 20 43 4F |PSON FX-80 OR CO|
00000240: 4D 50 41 54 49 42 4C 45 22 00 6D 0A 96 00 99 A3 |MPATIBLE".m.....|
00000250: 37 29 22 12 33 2E 20 53 43 52 45 45 4E 22 3A 99 |7)".3. SCREEN":.|
00000260: A3 37 29 22 12 51 2E 20 51 55 49 54 22 00 98 0A |.7)".Q. QUIT"...|
00000270: A0 00 A1 41 24 3A 8D 32 35 37 30 3A 8B 28 41 24 |...A$:.2570:.(A$|
00000280: B3 22 31 22 B0 41 24 B1 22 33 22 29 AF 41 24 B3 |."1".A$."3").A$.|
00000290: B1 22 51 22 A7 31 36 30 00 C8 0A AA 00 8B 41 24 |."Q".160......A$|
000002A0: B2 22 51 22 A7 97 36 34 36 2C 30 3A 8D 32 35 38 |."Q"..646,0:.258|
000002B0: 30 3A 8D 32 35 34 30 3A 8D 33 31 36 30 3A 8D 32 |0:.2540:.3160:.2|
000002C0: 35 34 30 3A 89 31 32 30 00 00 0B B4 00 97 36 34 |540:.120......64|
000002D0: 36 2C 30 3A 8D 32 35 38 30 3A 8D 32 35 34 30 3A |6,0:.2580:.2540:|
000002E0: 97 32 31 34 2C 31 38 3A 99 3A 99 2C 22 12 98 20 |.214,18:.:.,".. |
000002F0: 20 20 20 53 45 54 54 49 4E 47 20 55 50 2E 2E 2E | SETTING UP...|
00000300: 00 0D 0B BE 00 50 52 B2 C5 28 41 24 29 00 1D 0B |.....PR..(A$)...|
00000310: C8 00 91 50 52 89 32 31 30 2C 32 33 30 00 66 0B |...PR.210,230.f.|
00000320: D2 00 81 49 B2 30 A4 31 31 3A 50 24 28 49 29 B2 |...I.0.11:P$(I).|
00000330: C7 28 38 29 3A 81 4A B2 31 A4 36 3A 87 50 3A 50 |.(8):.J.1.6:.P:P|
00000340: 24 28 49 29 B2 50 24 28 49 29 AA C7 28 50 29 3A |$(I).P$(I)..(P):|
00000350: 82 4A 3A 50 24 28 49 29 B2 50 24 28 49 29 AA C7 |.J:P$(I).P$(I)..|
00000360: 28 31 35 29 3A 82 00 6F 0B DC 00 89 32 35 30 00 |(15):..o....250.|
00000370: 95 0B E6 00 81 49 B2 30 A4 31 31 3A 50 24 28 49 |.....I.0.11:P$(I|
00000380: 29 B2 C7 28 32 37 29 AA 22 4B 22 AA C7 28 36 29 |)..(27)."K"..(6)|
00000390: AA C7 28 30 29 00 BC 0B F0 00 81 4A B2 31 A4 36 |..(0)......J.1.6|
000003A0: 3A 87 50 3A 50 24 28 49 29 B2 50 24 28 49 29 AA |:.P:P$(I).P$(I).|
000003B0: C7 28 50 AB 31 32 38 29 3A 82 3A 82 00 D8 0B FA |.(P.128):.:.....|
000003C0: 00 81 49 B2 31 A4 31 32 3A 87 4D 4F 24 28 49 29 |..I.1.12:.MO$(I)|
000003D0: 3A 82 3A 8D 33 32 30 30 00 EF 0B 04 01 81 49 B2 |:.:.3200......I.|
000003E0: 31 A4 31 32 3A 87 20 4D 4F 25 28 49 29 3A 82 00 |1.12:. MO%(I):..|
000003F0: 05 0C 0E 01 81 49 B2 31 A4 37 3A 87 20 44 59 24 |.....I.1.7:. DY$|
00000400: 28 49 29 3A 82 00 25 0C 18 01 8D 31 33 38 30 3A |(I):..%....1380:|
00000410: 8F 20 52 45 44 45 46 49 4E 45 20 43 48 41 52 41 |. REDEFINE CHARA|
00000420: 43 54 45 52 53 00 72 0C 22 01 83 31 32 38 2C 31 |CTERS.r."..128,1|
00000430: 32 38 2C 31 32 38 2C 31 32 38 2C 31 32 38 2C 31 |28,128,128,128,1|
00000440: 32 38 2C 31 32 38 2C 31 32 38 2C 31 32 38 2C 31 |28,128,128,128,1|
00000450: 39 34 2C 31 39 34 2C 31 38 38 2C 31 32 38 2C 31 |94,194,188,128,1|
00000460: 32 38 2C 31 32 38 2C 31 39 34 2C 32 35 34 2C 31 |28,128,194,254,1|
00000470: 38 38 00 BF 0C 2C 01 83 31 32 38 2C 31 32 38 2C |88...,..128,128,|
00000480: 31 32 38 2C 32 35 34 2C 32 35 34 2C 31 38 38 2C |128,254,254,188,|
00000490: 31 32 38 2C 31 32 38 2C 31 38 38 2C 32 35 34 2C |128,128,188,254,|
000004A0: 32 35 34 2C 31 38 38 2C 31 32 38 2C 31 38 38 2C |254,188,128,188,|
000004B0: 32 35 34 2C 32 35 34 2C 32 35 34 2C 31 38 38 00 |254,254,254,188.|
000004C0: 0C 0D 36 01 83 31 38 38 2C 32 35 34 2C 32 35 34 |..6..188,254,254|
000004D0: 2C 32 35 34 2C 32 35 34 2C 31 38 38 2C 31 38 38 |,254,254,188,188|
000004E0: 2C 32 35 34 2C 32 35 34 2C 32 35 34 2C 31 38 38 |,254,254,254,188|
000004F0: 2C 31 32 38 2C 31 38 38 2C 32 35 34 2C 32 35 34 |,128,188,254,254|
00000500: 2C 31 38 38 2C 31 32 38 2C 31 32 38 00 59 0D 40 |,188,128,128.Y.@|
00000510: 01 83 31 38 38 2C 32 35 34 2C 32 35 34 2C 31 32 |..188,254,254,12|
00000520: 38 2C 31 32 38 2C 31 32 38 2C 31 38 38 2C 32 35 |8,128,128,188,25|
00000530: 34 2C 31 39 34 2C 31 32 38 2C 31 32 38 2C 31 32 |4,194,128,128,12|
00000540: 38 2C 31 38 38 2C 31 39 34 2C 31 39 34 2C 31 32 |8,188,194,194,12|
00000550: 38 2C 31 32 38 2C 31 32 38 00 9A 0D 4A 01 83 22 |8,128,128...J.."|
00000560: 4A 41 4E 55 41 52 59 20 20 22 2C 22 46 45 42 52 |JANUARY ","FEBR|
00000570: 55 41 52 59 20 22 2C 22 4D 41 52 43 48 20 20 20 |UARY ","MARCH |
00000580: 20 22 2C 22 41 50 52 49 4C 20 20 20 20 22 2C 22 | ","APRIL ","|
00000590: 4D 41 59 20 20 20 20 20 20 22 00 DB 0D 54 01 83 |MAY "...T..|
000005A0: 22 4A 55 4E 45 20 20 20 20 20 22 2C 22 4A 55 4C |"JUNE ","JUL|
000005B0: 59 20 20 20 20 20 22 2C 22 41 55 47 55 53 54 20 |Y ","AUGUST |
000005C0: 20 20 22 2C 22 53 45 50 54 45 4D 42 45 52 22 2C | ","SEPTEMBER",|
000005D0: 22 4F 43 54 4F 42 45 52 20 20 22 00 F8 0D 5E 01 |"OCTOBER "...^.|
000005E0: 83 22 4E 4F 56 45 4D 42 45 52 20 22 2C 22 44 45 |."NOVEMBER ","DE|
000005F0: 43 45 4D 42 45 52 20 22 00 21 0E 68 01 83 33 31 |CEMBER ".!.h..31|
00000600: 2C 32 38 2C 33 31 2C 33 30 2C 33 31 2C 33 30 2C |,28,31,30,31,30,|
00000610: 33 31 2C 33 31 2C 33 30 2C 33 31 2C 33 30 2C 33 |31,31,30,31,30,3|
00000620: 31 00 34 0E 72 01 83 53 2C 4D 2C 54 2C 57 2C 54 |1.4.r..S,M,T,W,T|
00000630: 2C 46 2C 53 00 5A 0E 7C 01 8F 20 49 46 58 50 24 |,F,S.Z.|.. IFXP$|
00000640: 3D 22 33 22 54 48 45 4E 47 4F 53 55 42 32 33 34 |="3"THENGOSUB234|
00000650: 30 3A 47 4F 54 4F 31 39 39 30 00 98 0E 86 01 4C |0:GOTO1990.....L|
00000660: 59 25 B2 30 3A 8D 32 35 34 30 3A 97 32 31 34 2C |Y%.0:.2540:.214,|
00000670: 31 36 3A 99 3A 99 22 12 98 1D 1D 1D 1D 1D 1D 1D |16:.:.".........|
00000680: 49 4E 50 55 54 20 59 45 41 52 20 28 41 46 54 45 |INPUT YEAR (AFTE|
00000690: 52 20 31 35 38 33 29 22 00 B2 0E 90 01 8D 31 32 |R 1583)"......12|
000006A0: 39 30 3A 59 B2 56 3A 8B 59 B3 31 35 38 33 A7 33 |90:Y.V:.Y.1583.3|
000006B0: 39 30 00 E4 0E 9A 01 8D 32 35 34 30 3A 97 32 31 |90......2540:.21|
000006C0: 34 2C 31 36 3A 99 3A 99 A3 31 30 29 22 12 43 41 |4,16:.:..10)".CA|
000006D0: 4C 43 55 4C 41 54 49 4E 47 20 50 48 41 53 45 53 |LCULATING PHASES|
000006E0: 2E 2E 2E 22 00 24 0F A4 01 8B 59 AD 34 B2 B5 28 |...".$....Y.4..(|
000006F0: 59 AD 34 29 A7 4C 59 25 B2 31 3A 8B 28 59 AD 31 |Y.4).LY%.1:.(Y.1|
00000700: 30 30 B2 B5 28 59 AD 31 30 30 29 29 AF 28 59 AD |00..(Y.100)).(Y.|
00000710: 34 30 30 B3 B1 B5 28 59 AD 34 30 30 29 29 A7 4C |400...(Y.400)).L|
00000720: 59 25 B2 30 00 43 0F AE 01 4D 4F 25 28 32 29 B2 |Y%.0.C...MO%(2).|
00000730: 32 38 3A 8B 4C 59 25 B2 31 A7 4D 4F 25 28 32 29 |28:.LY%.1.MO%(2)|
00000740: B2 32 39 00 4F 0F B8 01 81 4D B2 31 A4 31 32 00 |.29.O....M.1.12.|
00000750: 88 0F C2 01 8B 4D B1 31 A7 97 32 31 34 2C 31 39 |.....M.1..214,19|
00000760: 3A 99 3A 99 A3 32 30 AB C3 28 4D 24 28 4D AB 31 |:.:..20..(M$(M.1|
00000770: 29 29 AD 32 29 22 12 98 20 20 20 20 20 20 20 20 |)).2)".. |
00000780: 20 20 20 20 20 20 20 22 00 B9 0F CC 01 97 32 31 | "......21|
00000790: 34 2C 31 39 3A 99 3A 99 A3 32 30 AB C3 28 4D 24 |4,19:.:..20..(M$|
000007A0: 28 4D 29 29 AD 32 29 22 12 98 22 4D 24 28 4D 29 |(M)).2)".."M$(M)|
000007B0: 3A 8B 4D B2 32 A7 34 39 30 00 F5 0F D6 01 81 44 |:.M.2.490......D|
000007C0: B2 31 A4 4D 4F 25 28 4D 29 3A 8D 31 31 35 30 3A |.1.MO%(M):.1150:|
000007D0: 59 25 28 4D 2C 44 2C 5A 25 29 B2 50 48 3A 8D 31 |Y%(M,D,Z%).PH:.1|
000007E0: 30 33 30 3A 59 25 28 4D 2C 44 2C 32 29 B2 44 59 |030:Y%(M,D,2).DY|
000007F0: 25 3A 82 3A 82 00 09 10 E0 01 89 35 30 30 3A 8F |%:.:.......500:.|
00000800: 20 50 52 49 4E 54 4F 55 54 00 45 10 EA 01 81 44 | PRINTOUT.E....D|
00000810: B2 31 A4 32 38 AA 4C 59 25 3A 8D 31 31 35 30 3A |.1.28.LY%:.1150:|
00000820: 59 25 28 4D 2C 44 2C 5A 25 29 B2 50 48 3A 8D 31 |Y%(M,D,Z%).PH:.1|
00000830: 30 33 30 3A 59 25 28 4D 2C 44 2C 32 29 B2 44 59 |030:Y%(M,D,2).DY|
00000840: 25 3A 82 3A 82 00 54 10 F4 01 8B 50 52 B2 33 A7 |%:.:..T....PR.3.|
00000850: 31 36 33 30 00 8A 10 FE 01 A0 34 3A 8D 32 35 34 |1630......4:.254|
00000860: 30 3A 97 32 31 34 2C 31 38 3A 99 3A 99 A3 39 29 |0:.214,18:.:..9)|
00000870: 22 12 98 53 45 54 20 55 50 20 50 52 49 4E 54 45 |"..SET UP PRINTE|
00000880: 52 2F 20 52 45 54 55 52 4E 22 00 A1 10 08 02 A1 |R/ RETURN"......|
00000890: 41 24 3A 8B 41 24 B3 B1 C7 28 31 33 29 A7 35 32 |A$:.A$...(13).52|
000008A0: 30 00 D4 10 12 02 4C 4E 24 B2 22 2D 2D 2D 2D 2D |0.....LN$."-----|
000008B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000008C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000008D0: 2D 2D 2D 22 00 0A 11 1C 02 4C 4E 24 B2 4C 4E 24 |---".....LN$.LN$|
000008E0: AA 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |."--------------|
000008F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000900: 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 1A 11 26 02 91 |---------"...&..|
00000910: 50 52 89 35 36 30 2C 35 38 30 00 50 11 30 02 9F |PR.560,580.P.0..|
00000920: 34 2C 34 3A 98 34 2C 4C 4E 24 3A 98 34 3A 98 34 |4,4:.4,LN$:.4:.4|
00000930: 2C A6 32 36 29 3B C7 28 31 34 29 22 4C 55 4E 41 |,.26);.(14)"LUNA|
00000940: 52 20 43 41 4C 45 4E 44 41 52 22 C7 28 31 35 29 |R CALENDAR".(15)|
00000950: 00 59 11 3A 02 89 35 39 30 00 8C 11 44 02 9F 34 |.Y.:..590...D..4|
00000960: 2C 34 2C 35 3A 98 34 2C 4C 4E 24 3A 98 34 3A 98 |,4,5:.4,LN$:.4:.|
00000970: 34 2C A6 32 36 29 3B C7 28 31 34 29 22 4C 55 4E |4,.26);.(14)"LUN|
00000980: 41 52 20 43 41 4C 45 4E 44 41 52 22 00 AC 11 4E |AR CALENDAR"...N|
00000990: 02 98 34 2C C7 28 31 30 29 3B A6 33 34 29 3B C7 |..4,.(10);.34);.|
000009A0: 28 31 34 29 3B 59 3B C7 28 31 30 29 00 C0 11 58 |(14);Y;.(10)...X|
000009B0: 02 8B 50 52 B2 31 A7 98 34 2C C7 28 31 35 29 3B |..PR.1..4,.(15);|
000009C0: 00 E8 11 62 02 98 34 2C A6 32 39 29 3B 3A 81 49 |...b..4,.29);:.I|
000009D0: B2 31 A4 31 31 3A 98 34 2C 50 24 28 49 29 3B 22 |.1.11:.4,P$(I);"|
000009E0: 20 22 3B 3A 82 3A 98 34 00 00 12 6C 02 98 34 3A | ";:.:.4...l..4:|
000009F0: 98 34 2C 4C 4E 24 3A 8D 36 33 30 3A 89 36 37 30 |.4,LN$:.630:.670|
00000A00: 00 4D 12 76 02 98 34 2C 22 20 20 20 20 20 20 20 |.M.v..4," |
00000A10: 20 20 20 20 20 30 20 30 20 30 20 30 20 30 20 30 | 0 0 0 0 0 0|
00000A20: 20 30 20 30 20 30 20 31 20 31 20 31 20 31 20 31 | 0 0 0 1 1 1 1 1|
00000A30: 20 31 20 31 20 31 20 31 20 31 20 32 20 32 20 32 | 1 1 1 1 1 2 2 2|
00000A40: 20 32 20 32 20 32 20 32 20 32 20 22 3B 00 5E 12 | 2 2 2 2 2 ";.^.|
00000A50: 80 02 98 34 2C 22 32 20 32 20 33 20 33 22 00 AB |...4,"2 2 3 3"..|
00000A60: 12 8A 02 98 34 2C 22 20 20 20 20 20 20 20 20 20 |....4," |
00000A70: 20 20 20 31 20 32 20 33 20 34 20 35 20 36 20 37 | 1 2 3 4 5 6 7|
00000A80: 20 38 20 39 20 30 20 31 20 32 20 33 20 34 20 35 | 8 9 0 1 2 3 4 5|
00000A90: 20 36 20 37 20 38 20 39 20 30 20 31 20 32 20 33 | 6 7 8 9 0 1 2 3|
00000AA0: 20 34 20 35 20 36 20 37 20 22 3B 00 BE 12 94 02 | 4 5 6 7 ";.....|
00000AB0: 98 34 2C 22 38 20 39 20 30 20 31 22 3A 8E 00 0B |.4,"8 9 0 1":...|
00000AC0: 13 9E 02 4D 4C 24 28 31 29 B2 22 2B 2D 2B 2D 2B |...ML$(1)."+-+-+|
00000AD0: 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B |-+-+-+-+-+-+-+-+|
00000AE0: 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B |-+-+-+-+-+-+-+-+|
00000AF0: 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B |-+-+-+-+-+-+-+-+|
00000B00: 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 22 00 58 13 A8 02 |-+-+-+-+-+".X...|
00000B10: 4D 4C 24 28 32 29 B2 22 2B 2D 2B 2D 2B 2D 2B 2D |ML$(2)."+-+-+-+-|
00000B20: 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D |+-+-+-+-+-+-+-+-|
00000B30: 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D |+-+-+-+-+-+-+-+-|
00000B40: 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D |+-+-+-+-+-+-+-+-|
00000B50: 2B 2D 2B 2D 2B 2D 2B 22 00 A3 13 B2 02 4D 53 24 |+-+-+-+".....MS$|
00000B60: 28 31 29 B2 22 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B |(1)."+-+-+-+-+-+|
00000B70: 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B |-+-+-+-+-+-+-+-+|
00000B80: 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B |-+-+-+-+-+-+-+-+|
00000B90: 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B |-+-+-+-+-+-+-+-+|
00000BA0: 2D 2B 22 00 EE 13 BC 02 4D 53 24 28 32 29 B2 22 |-+".....MS$(2)."|
00000BB0: 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D |+-+-+-+-+-+-+-+-|
00000BC0: 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D |+-+-+-+-+-+-+-+-|
00000BD0: 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D |+-+-+-+-+-+-+-+-|
00000BE0: 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 22 00 37 |+-+-+-+-+-+-+".7|
00000BF0: 14 C6 02 46 4C 24 28 31 29 B2 22 2B 2D 2B 2D 2B |...FL$(1)."+-+-+|
00000C00: 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B |-+-+-+-+-+-+-+-+|
00000C10: 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B |-+-+-+-+-+-+-+-+|
00000C20: 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B |-+-+-+-+-+-+-+-+|
00000C30: 2D 2B 2D 2B 2D 2B 22 00 80 14 D0 02 46 4C 24 28 |-+-+-+".....FL$(|
00000C40: 32 29 B2 22 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D |2)."+-+-+-+-+-+-|
00000C50: 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D |+-+-+-+-+-+-+-+-|
00000C60: 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D |+-+-+-+-+-+-+-+-|
00000C70: 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 22 |+-+-+-+-+-+-+-+"|
00000C80: 00 C7 14 DA 02 46 53 24 28 31 29 B2 22 2B 5A 2B |.....FS$(1)."+Z+|
00000C90: 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B |-+-+-+-+-+-+-+-+|
00000CA0: 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B |-+-+-+-+-+-+-+-+|
00000CB0: 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B |-+-+-+-+-+-+-+-+|
00000CC0: 2D 2B 2D 2B 2D 2B 22 00 0E 15 E4 02 46 53 24 28 |-+-+-+".....FS$(|
00000CD0: 32 29 B2 22 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D |2)."+-+-+-+-+-+-|
00000CE0: 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D |+-+-+-+-+-+-+-+-|
00000CF0: 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D |+-+-+-+-+-+-+-+-|
00000D00: 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 2D 2B 22 00 23 |+-+-+-+-+-+-+".#|
00000D10: 15 EE 02 81 4D B2 31 A4 31 32 3A 8B 4D B2 32 A7 |....M.1.12:.M.2.|
00000D20: 38 39 30 00 3A 15 F8 02 91 4D 4F 25 28 4D 29 AB |890.:....MO%(M).|
00000D30: 32 39 89 37 37 30 2C 38 33 30 00 56 15 02 03 98 |29.770,830.V....|
00000D40: 34 2C 22 20 20 20 20 20 20 20 20 20 20 20 22 3B |4," ";|
00000D50: 4D 53 24 28 31 29 00 6E 15 0C 03 98 34 2C 22 20 |MS$(1).n....4," |
00000D60: 22 3B 4D 4F 24 28 4D 29 3B 22 20 21 22 3B 00 A9 |";MO$(M);" !";..|
00000D70: 15 16 03 81 44 B2 31 A4 33 30 3A 98 34 2C 44 59 |....D.1.30:.4,DY|
00000D80: 24 28 59 25 28 4D 2C 44 2C 32 29 29 3B 22 21 22 |$(Y%(M,D,2));"!"|
00000D90: 3B 3A 82 3A 98 34 3A 98 34 2C 22 20 20 20 20 20 |;:.:.4:.4," |
00000DA0: 20 20 20 20 20 20 21 22 3B 00 D1 15 20 03 81 44 | !";... ..D|
00000DB0: B2 31 A4 33 30 3A 98 34 2C 50 24 28 59 25 28 4D |.1.30:.4,P$(Y%(M|
00000DC0: 2C 44 2C 5A 25 29 29 3B 22 21 22 3B 3A 82 3A 98 |,D,Z%));"!";:.:.|
00000DD0: 34 00 ED 15 2A 03 98 34 2C 22 20 20 20 20 20 20 |4...*..4," |
00000DE0: 20 20 20 20 20 22 3B 4D 53 24 28 32 29 00 F6 15 | ";MS$(2)...|
00000DF0: 34 03 89 38 38 30 00 12 16 3E 03 98 34 2C 22 20 |4..880...>..4," |
00000E00: 20 20 20 20 20 20 20 20 20 20 22 3B 4D 4C 24 28 | ";ML$(|
00000E10: 31 29 00 2A 16 48 03 98 34 2C 22 20 22 3B 4D 4F |1).*.H..4," ";MO|
00000E20: 24 28 4D 29 3B 22 20 21 22 3B 00 65 16 52 03 81 |$(M);" !";.e.R..|
00000E30: 44 B2 31 A4 33 31 3A 98 34 2C 44 59 24 28 59 25 |D.1.31:.4,DY$(Y%|
00000E40: 28 4D 2C 44 2C 32 29 29 3B 22 21 22 3B 3A 82 3A |(M,D,2));"!";:.:|
00000E50: 98 34 3A 98 34 2C 22 20 20 20 20 20 20 20 20 20 |.4:.4," |
00000E60: 20 20 21 22 3B 00 8D 16 5C 03 81 44 B2 31 A4 33 | !";...\..D.1.3|
00000E70: 31 3A 98 34 2C 50 24 28 59 25 28 4D 2C 44 2C 5A |1:.4,P$(Y%(M,D,Z|
00000E80: 25 29 29 3B 22 21 22 3B 3A 82 3A 98 34 00 A9 16 |%));"!";:.:.4...|
00000E90: 66 03 98 34 2C 22 20 20 20 20 20 20 20 20 20 20 |f..4," |
00000EA0: 20 22 3B 4D 4C 24 28 32 29 00 CF 16 70 03 82 3A | ";ML$(2)...p..:|
00000EB0: 8D 36 33 30 3A 98 34 2C 4C 4E 24 3A A0 34 3A 97 |.630:.4,LN$:.4:.|
00000EC0: 36 33 31 2C 33 32 3A 97 31 39 38 2C 31 3A 8A 00 |631,32:.198,1:..|
00000ED0: E2 16 7A 03 91 4C 59 25 AA 31 89 39 30 30 2C 39 |..z..LY%.1.900,9|
00000EE0: 36 30 00 FE 16 84 03 98 34 2C 22 20 20 20 20 20 |60......4," |
00000EF0: 20 20 20 20 20 20 22 3B 46 53 24 28 31 29 00 16 | ";FS$(1)..|
00000F00: 17 8E 03 98 34 2C 22 20 22 3B 4D 4F 24 28 4D 29 |....4," ";MO$(M)|
00000F10: 3B 22 20 21 22 3B 00 51 17 98 03 81 44 B2 31 A4 |;" !";.Q....D.1.|
00000F20: 32 38 3A 98 34 2C 44 59 24 28 59 25 28 4D 2C 44 |28:.4,DY$(Y%(M,D|
00000F30: 2C 32 29 29 3B 22 21 22 3B 3A 82 3A 98 34 3A 98 |,2));"!";:.:.4:.|
00000F40: 34 2C 22 20 20 20 20 20 20 20 20 20 20 20 21 22 |4," !"|
00000F50: 3B 00 79 17 A2 03 81 44 B2 31 A4 32 38 3A 98 34 |;.y....D.1.28:.4|
00000F60: 2C 50 24 28 59 25 28 4D 2C 44 2C 5A 25 29 29 3B |,P$(Y%(M,D,Z%));|
00000F70: 22 21 22 3B 3A 82 3A 98 34 00 95 17 AC 03 98 34 |"!";:.:.4......4|
00000F80: 2C 22 20 20 20 20 20 20 20 20 20 20 20 22 3B 46 |," ";F|
00000F90: 53 24 28 32 29 00 9E 17 B6 03 89 38 38 30 00 BA |S$(2)......880..|
00000FA0: 17 C0 03 98 34 2C 22 20 20 20 20 20 20 20 20 20 |....4," |
00000FB0: 20 20 22 3B 46 4C 24 28 31 29 00 D2 17 CA 03 98 | ";FL$(1)......|
00000FC0: 34 2C 22 20 22 3B 4D 4F 24 28 4D 29 3B 22 20 21 |4," ";MO$(M);" !|
00000FD0: 22 3B 00 0D 18 D4 03 81 44 B2 31 A4 32 39 3A 98 |";......D.1.29:.|
00000FE0: 34 2C 44 59 24 28 59 25 28 4D 2C 44 2C 32 29 29 |4,DY$(Y%(M,D,2))|
00000FF0: 3B 22 21 22 3B 3A 82 3A 98 34 3A 98 34 2C 22 20 |;"!";:.:.4:.4," |
00001000: 20 20 20 20 20 20 20 20 20 20 21 22 3B 00 35 18 | !";.5.|
00001010: DE 03 81 44 B2 31 A4 32 39 3A 98 34 2C 50 24 28 |...D.1.29:.4,P$(|
00001020: 59 25 28 4D 2C 44 2C 5A 25 29 29 3B 22 21 22 3B |Y%(M,D,Z%));"!";|
00001030: 3A 82 3A 98 34 00 51 18 E8 03 98 34 2C 22 20 20 |:.:.4.Q....4," |
00001040: 20 20 20 20 20 20 20 20 20 22 3B 46 4C 24 28 32 | ";FL$(2|
00001050: 29 00 5A 18 F2 03 89 38 38 30 00 64 18 FC 03 89 |).Z....880.d....|
00001060: 31 36 33 30 00 8C 18 06 04 4D 44 B2 4D 3A 59 59 |1630.....MD.M:YY|
00001070: B2 59 3A 8B 4D 44 B2 31 A7 4D 44 B2 31 33 3A 59 |.Y:.MD.1.MD.13:Y|
00001080: 59 B2 59 59 AB 31 3A 89 31 30 35 30 00 A4 18 10 |Y.YY.1:.1050....|
00001090: 04 8B 4D 44 B2 32 A7 4D 44 B2 31 34 3A 59 59 B2 |..MD.2.MD.14:YY.|
000010A0: 59 59 AB 31 00 ED 18 1A 04 4D 30 B2 4D 44 AB 32 |YY.1.....M0.MD.2|
000010B0: 3A 44 59 25 B2 28 32 2E 36 AC 4D 30 AB 2E 32 29 |:DY%.(2.6.M0..2)|
000010C0: AA 44 AA 59 59 AB 31 39 30 30 AA B5 28 28 59 59 |.D.YY.1900..((YY|
000010D0: AB 31 39 30 30 29 AD 34 29 3A 44 59 25 B2 44 59 |.1900).4):DY%.DY|
000010E0: 25 AA B5 28 31 39 AD 34 29 AB 32 AC 31 00 06 19 |%..(19.4).2.1...|
000010F0: 24 04 44 59 25 B2 44 59 25 AB B5 28 44 59 25 AD |$.DY%.DY%..(DY%.|
00001100: 37 29 AC 37 AA 31 00 1F 19 2E 04 8B 4D 44 B2 34 |7).7.1......MD.4|
00001110: B0 4D 44 B2 39 A7 44 59 25 B2 44 59 25 AA 31 00 |.MD.9.DY%.DY%.1.|
00001120: 3D 19 38 04 8B 4D 44 B2 31 33 A7 4D 44 B2 31 3A |=.8..MD.13.MD.1:|
00001130: 59 59 B2 59 59 AA 31 3A 89 31 31 31 30 00 5F 19 |YY.YY.1:.1110._.|
00001140: 42 04 8B 4D 44 B2 31 34 A7 4D 44 B2 32 3A 59 59 |B..MD.14.MD.2:YY|
00001150: B2 59 59 AA 31 3A 44 59 25 B2 44 59 25 AA 31 00 |.YY.1:DY%.DY%.1.|
00001160: 70 19 4C 04 8B 44 59 25 B2 38 A7 44 59 25 B2 31 |p.L..DY%.8.DY%.1|
00001170: 00 A6 19 56 04 8B 28 59 59 B2 32 31 30 30 AF 4D |...V..(YY.2100.M|
00001180: 44 B1 B2 33 29 B0 28 59 59 B1 32 31 30 30 29 A7 |D..3).(YY.2100).|
00001190: 44 59 25 B2 44 59 25 AB 31 3A 8B 44 59 25 B2 30 |DY%.DY%.1:.DY%.0|
000011A0: A7 44 59 25 B2 37 00 DC 19 60 04 8B 28 59 59 B2 |.DY%.7...`..(YY.|
000011B0: 32 32 30 30 AF 4D 44 B1 B2 33 29 B0 28 59 59 B1 |2200.MD..3).(YY.|
000011C0: 32 32 30 30 29 A7 44 59 25 B2 44 59 25 AB 31 3A |2200).DY%.DY%.1:|
000011D0: 8B 44 59 25 B2 30 A7 44 59 25 B2 37 00 12 1A 6A |.DY%.0.DY%.7...j|
000011E0: 04 8B 28 59 59 B2 32 33 30 30 AF 4D 44 B1 B2 33 |..(YY.2300.MD..3|
000011F0: 29 B0 28 59 59 B1 32 33 30 30 29 A7 44 59 25 B2 |).(YY.2300).DY%.|
00001200: 44 59 25 AB 31 3A 8B 44 59 25 B2 30 A7 44 59 25 |DY%.1:.DY%.0.DY%|
00001210: B2 37 00 18 1A 74 04 8E 00 26 1A 7E 04 51 B2 59 |.7...t...&.~.Q.Y|
00001220: AA 28 4D B3 33 29 00 60 1A 88 04 4A B2 B5 28 32 |.(M.3).`...J..(2|
00001230: 37 35 AC 4D AD 39 29 AB B5 28 28 37 AC 51 AA 37 |75.M.9)..((7.Q.7|
00001240: 29 AD 34 29 AA 33 36 37 AC 59 AA 44 AB B5 28 28 |).4).367.Y.D..((|
00001250: B5 28 51 AD 31 30 30 29 AA 31 29 AC 33 AD 34 29 |.(Q.100).1).3.4)|
00001260: 00 6E 1A 92 04 50 B2 4A AD 53 58 AA 2E 32 00 99 |.n...P.J.SX..2..|
00001270: 1A 9C 04 50 48 B2 50 AB B5 28 50 29 3A 50 48 B2 |...PH.P..(P):PH.|
00001280: B5 28 28 50 48 AC 31 32 29 AA 2E 35 29 3A 8B 50 |.((PH.12)..5):.P|
00001290: 48 B1 31 31 A7 50 48 B2 30 00 9F 1A A6 04 8E 00 |H.11.PH.0.......|
000012A0: A9 1A B0 04 8D 31 31 35 30 00 C4 1A BA 04 8B 50 |.....1150......P|
000012B0: 48 B2 30 A7 50 48 24 B2 22 4E 45 57 20 4D 4F 4F |H.0.PH$."NEW MOO|
000012C0: 4E 22 3A 8E 00 E6 1A C4 04 8B 50 48 B3 33 A7 50 |N":.......PH.3.P|
000012D0: 48 24 B2 22 57 41 58 49 4E 47 20 43 52 45 53 43 |H$."WAXING CRESC|
000012E0: 45 4E 54 22 3A 8E 00 06 1B CE 04 8B 50 48 B2 33 |ENT":.......PH.3|
000012F0: A7 50 48 24 B2 22 46 49 52 53 54 20 51 55 41 52 |.PH$."FIRST QUAR|
00001300: 54 45 52 22 3A 8E 00 27 1B D8 04 8B 50 48 B3 36 |TER":..'....PH.6|
00001310: A7 50 48 24 B2 22 57 41 58 49 4E 47 20 47 49 42 |.PH$."WAXING GIB|
00001320: 42 4F 55 53 22 3A 8E 00 43 1B E2 04 8B 50 48 B2 |BOUS":..C....PH.|
00001330: 36 A7 50 48 24 B2 22 46 55 4C 4C 20 4D 4F 4F 4E |6.PH$."FULL MOON|
00001340: 22 3A 8E 00 64 1B EC 04 8B 50 48 B3 39 A7 50 48 |":..d....PH.9.PH|
00001350: 24 B2 22 57 41 4E 49 4E 47 20 47 49 42 42 4F 55 |$."WANING GIBBOU|
00001360: 53 22 3A 8E 00 83 1B F6 04 8B 50 48 B2 39 A7 50 |S":.......PH.9.P|
00001370: 48 24 B2 22 4C 41 53 54 20 51 55 41 52 54 45 52 |H$."LAST QUARTER|
00001380: 22 3A 8E 00 9F 1B 00 05 50 48 24 B2 22 57 41 4E |":......PH$."WAN|
00001390: 49 4E 47 20 43 52 45 53 43 45 4E 54 22 3A 8E 00 |ING CRESCENT":..|
000013A0: CD 1B 0A 05 58 58 24 B2 22 9D 20 9D 3C 20 9D 9D |....XX$.". .< ..|
000013B0: 22 3A 42 24 B2 22 22 3A 46 47 B2 30 3A 99 22 11 |":B$."":FG.0:.".|
000013C0: 98 12 1D 1D 1D 1D 1D 1D 1D 3E 9D 22 3B 00 E1 1B |.........>.";...|
000013D0: 14 05 A1 41 24 3A 8B 41 24 B2 22 22 A7 31 33 30 |...A$:.A$."".130|
000013E0: 30 00 FF 1B 1E 05 8B 41 24 B2 C7 28 31 33 29 A7 |0......A$..(13).|
000013F0: 99 22 20 9D 22 3B 41 24 3B 3A 89 31 33 37 30 00 |." .";A$;:.1370.|
00001400: 36 1C 28 05 8B 41 24 B2 C7 28 32 30 29 AF 42 24 |6.(..A$..(20).B$|
00001410: B3 B1 22 22 A7 42 24 B2 C8 28 42 24 2C C3 28 42 |.."".B$..(B$,.(B|
00001420: 24 29 AB 31 29 3A 99 58 58 24 3B 3A 46 47 B2 30 |$).1):.XX$;:FG.0|
00001430: 3A 89 31 33 30 30 00 45 1C 32 05 8B 46 47 B2 31 |:.1300.E.2..FG.1|
00001440: A7 31 33 30 30 00 71 1C 3C 05 8B 41 24 B3 22 30 |.1300.q.<..A$."0|
00001450: 22 B0 41 24 B1 22 39 22 A7 31 33 30 30 3A 8F 20 |".A$."9".1300:. |
00001460: 4C 49 4D 49 54 20 54 4F 20 4E 55 4D 45 52 49 43 |LIMIT TO NUMERIC|
00001470: 53 00 95 1C 46 05 99 41 24 22 3E 9D 22 3B 3A 42 |S...F..A$">.";:B|
00001480: 24 B2 42 24 AA 41 24 3A 8B C3 28 42 24 29 B2 34 |$.B$.A$:..(B$).4|
00001490: A7 46 47 B2 31 00 A0 1C 50 05 89 20 31 33 30 30 |.FG.1...P.. 1300|
000014A0: 00 B6 1C 5A 05 56 B2 C5 28 42 24 29 3A 4C B2 C3 |...Z.V..(B$):L..|
000014B0: 28 42 24 29 3A 8E 00 D0 1C 64 05 81 49 B2 38 32 |(B$):....d..I.82|
000014C0: 38 A4 38 37 38 3A 87 41 3A 97 49 2C 41 3A 82 49 |8.878:.A:.I,A:.I|
000014D0: 00 E8 1C 6E 05 97 35 36 33 33 34 2C C2 28 35 36 |...n..56334,.(56|
000014E0: 33 33 34 29 AF 32 35 34 00 F8 1C 78 05 97 31 2C |334).254...x..1,|
000014F0: C2 28 31 29 AF 32 35 31 00 2F 1D 82 05 97 32 34 |.(1).251./....24|
00001500: 39 2C 30 3A 97 32 35 30 2C 32 30 38 3A 97 32 35 |9,0:.250,208:.25|
00001510: 31 2C 30 3A 97 32 35 32 2C 31 39 32 3A 97 32 35 |1,0:.252,192:.25|
00001520: 33 2C 30 3A 97 32 35 34 2C 38 3A 9E 38 32 38 00 |3,0:.254,8:.828.|
00001530: 4F 1D 8C 05 97 31 2C C2 28 31 29 B0 34 3A 97 35 |O....1,.(1).4:.5|
00001540: 36 33 33 34 2C C2 28 35 36 33 33 34 29 B0 31 00 |6334,.(56334).1.|
00001550: 5E 1D 96 05 87 41 3A 8B 41 B2 AB 31 A7 8E 00 9A |^....A:.A..1....|
00001560: 1D A0 05 4B B2 34 39 31 35 32 AA 28 38 AC 41 29 |...K.49152.(8.A)|
00001570: 3A 81 49 B2 30 A4 37 3A 87 42 3A 97 4B AA 49 2C |:.I.0.7:.B:.K.I,|
00001580: 42 3A 97 4B AA 31 30 32 34 AA 49 2C 32 35 35 AB |B:.K.1024.I,255.|
00001590: 42 3A 82 49 3A 89 31 34 33 30 00 BA 1D AA 05 97 |B:.I:.1430......|
000015A0: 35 36 35 37 36 2C 34 3A 97 35 33 32 37 32 2C 33 |56576,4:.53272,3|
000015B0: 32 3A 97 36 34 38 2C 32 30 30 00 C0 1D B4 05 8E |2:.648,200......|
000015C0: 00 0B 1E BE 05 83 20 20 31 36 35 2C 32 35 34 2C |...... 165,254,|
000015D0: 32 30 31 2C 30 30 30 2C 32 34 30 2C 30 32 34 2C |201,000,240,024,|
000015E0: 31 36 30 2C 30 30 30 2C 31 37 37 2C 32 34 39 2C |160,000,177,249,|
000015F0: 31 34 35 2C 32 35 31 2C 32 30 30 2C 31 39 32 2C |145,251,200,192,|
00001600: 32 35 35 2C 32 30 38 2C 32 34 37 00 56 1E C8 05 |255,208,247.V...|
00001610: 83 20 20 31 37 37 2C 32 34 39 2C 31 34 35 2C 32 |. 177,249,145,2|
00001620: 35 31 2C 32 33 30 2C 32 35 30 2C 32 33 30 2C 32 |51,230,250,230,2|
00001630: 35 32 2C 31 39 38 2C 32 35 34 2C 30 37 36 2C 30 |52,198,254,076,0|
00001640: 36 30 2C 30 30 33 2C 31 36 35 2C 32 35 33 2C 32 |60,003,165,253,2|
00001650: 30 31 2C 30 30 30 00 A1 1E D2 05 83 20 20 32 34 |01,000...... 24|
00001660: 30 2C 30 31 33 2C 32 33 30 2C 32 35 33 2C 31 36 |0,013,230,253,16|
00001670: 30 2C 30 30 30 2C 31 37 37 2C 32 34 39 2C 31 34 |0,000,177,249,14|
00001680: 35 2C 32 35 31 2C 32 30 30 2C 31 39 36 2C 32 35 |5,251,200,196,25|
00001690: 33 2C 32 30 38 2C 32 34 37 2C 30 39 36 2C 30 30 |3,208,247,096,00|
000016A0: 30 00 CA 1E DC 05 83 30 39 36 2C 30 30 30 2C 30 |0......096,000,0|
000016B0: 30 30 2C 30 30 30 2C 30 30 30 2C 30 30 30 2C 30 |00,000,000,000,0|
000016C0: 30 30 2C 30 30 30 2C 30 30 30 00 F3 1E E6 05 83 |00,000,000......|
000016D0: 30 39 37 2C 30 30 30 2C 30 31 32 2C 30 30 32 2C |097,000,012,002,|
000016E0: 30 30 32 2C 30 30 32 2C 30 30 32 2C 30 31 32 2C |002,002,002,012,|
000016F0: 30 30 30 00 1C 1F F0 05 83 30 39 38 2C 30 30 30 |000......098,000|
00001700: 2C 30 31 32 2C 30 30 36 2C 30 30 36 2C 30 30 36 |,012,006,006,006|
00001710: 2C 30 30 36 2C 30 31 32 2C 30 30 30 00 45 1F FA |,006,012,000.E..|
00001720: 05 83 30 39 39 2C 30 30 30 2C 30 31 32 2C 30 31 |..099,000,012,01|
00001730: 34 2C 30 31 34 2C 30 31 34 2C 30 31 34 2C 30 31 |4,014,014,014,01|
00001740: 32 2C 30 30 30 00 6E 1F 04 06 83 31 30 30 2C 30 |2,000.n....100,0|
00001750: 30 30 2C 30 31 32 2C 30 33 30 2C 30 33 30 2C 30 |00,012,030,030,0|
00001760: 33 30 2C 30 33 30 2C 30 31 32 2C 30 30 30 00 97 |30,030,012,000..|
00001770: 1F 0E 06 83 31 30 31 2C 30 30 30 2C 30 32 38 2C |....101,000,028,|
00001780: 30 36 32 2C 30 36 32 2C 30 36 32 2C 30 36 32 2C |062,062,062,062,|
00001790: 30 32 38 2C 30 30 30 00 C0 1F 18 06 83 31 30 32 |028,000......102|
000017A0: 2C 30 30 30 2C 30 36 30 2C 31 32 36 2C 31 32 36 |,000,060,126,126|
000017B0: 2C 31 32 36 2C 31 32 36 2C 30 36 30 2C 30 30 30 |,126,126,060,000|
000017C0: 00 E9 1F 22 06 83 31 30 33 2C 30 30 30 2C 30 35 |..."..103,000,05|
000017D0: 36 2C 31 32 34 2C 31 32 34 2C 31 32 34 2C 31 32 |6,124,124,124,12|
000017E0: 34 2C 30 35 36 2C 30 30 30 00 12 20 2C 06 83 31 |4,056,000.. ,..1|
000017F0: 30 34 2C 30 30 30 2C 30 34 38 2C 31 32 30 2C 31 |04,000,048,120,1|
00001800: 32 30 2C 31 32 30 2C 31 32 30 2C 30 34 38 2C 30 |20,120,120,048,0|
00001810: 30 30 00 3B 20 36 06 83 31 30 35 2C 30 30 30 2C |00.; 6..105,000,|
00001820: 30 34 38 2C 31 31 32 2C 31 31 32 2C 31 31 32 2C |048,112,112,112,|
00001830: 31 31 32 2C 30 34 38 2C 30 30 30 00 64 20 40 06 |112,048,000.d @.|
00001840: 83 31 30 36 2C 30 30 30 2C 30 34 38 2C 30 39 36 |.106,000,048,096|
00001850: 2C 30 39 36 2C 30 39 36 2C 30 39 36 2C 30 34 38 |,096,096,096,048|
00001860: 2C 30 30 30 00 8D 20 4A 06 83 31 30 37 2C 30 30 |,000.. J..107,00|
00001870: 30 2C 30 34 38 2C 30 36 34 2C 30 36 34 2C 30 36 |0,048,064,064,06|
00001880: 34 2C 30 36 34 2C 30 34 38 2C 30 30 30 00 95 20 |4,064,048,000.. |
00001890: 54 06 83 2D 31 00 BA 20 5E 06 97 35 33 32 34 38 |T..-1.. ^..53248|
000018A0: AA 32 31 2C 30 3A 20 8D 32 35 39 30 3A 8B 43 54 |.21,0: .2590:.CT|
000018B0: 24 B2 22 45 22 A7 32 31 39 30 00 C4 20 68 06 8D |$."E".2190.. h..|
000018C0: 31 34 35 30 00 EF 20 72 06 45 4D 24 B2 22 22 3A |1450.. r.EM$."":|
000018D0: 81 49 B2 31 36 30 A4 31 37 31 3A 45 4D 24 B2 45 |.I.160.171:EM$.E|
000018E0: 4D 24 AA C7 28 49 29 3A 82 3A 8D 33 33 33 30 00 |M$..(I):.:.3330.|
000018F0: 0F 21 7C 06 97 35 36 35 37 36 2C 31 39 35 3A 97 |.!|..56576,195:.|
00001900: 36 34 38 2C 34 3A 97 35 33 32 37 32 2C 32 31 00 |648,4:.53272,21.|
00001910: 2F 21 86 06 8D 32 30 34 30 3A 8D 31 39 34 30 3A |/!...2040:.1940:|
00001920: 8D 32 35 34 30 3A 97 32 31 34 2C 31 36 3A 99 00 |.2540:.214,16:..|
00001930: 42 21 90 06 99 2C 22 98 12 4F 50 54 49 4F 4E 53 |B!...,"..OPTIONS|
00001940: 3A 22 00 63 21 9A 06 99 2C 22 12 46 31 20 54 52 |:".c!...,".F1 TR|
00001950: 41 4E 53 4C 41 54 45 20 54 4F 20 45 4E 47 4C 49 |ANSLATE TO ENGLI|
00001960: 53 48 22 00 81 21 A4 06 99 2C 22 12 46 33 20 56 |SH"..!...,".F3 V|
00001970: 49 45 57 20 41 4E 4F 54 48 45 52 20 59 45 41 52 |IEW ANOTHER YEAR|
00001980: 22 00 A0 21 AE 06 99 2C 22 12 46 35 20 52 45 54 |"..!...,".F5 RET|
00001990: 55 52 4E 20 54 4F 20 43 41 4C 45 4E 44 41 52 22 |URN TO CALENDAR"|
000019A0: 00 B9 21 B8 06 99 2C 22 12 46 37 20 45 58 49 54 |..!...,".F7 EXIT|
000019B0: 20 50 52 4F 47 52 41 4D 22 00 E7 21 C2 06 A1 41 | PROGRAM"..!...A|
000019C0: 24 3A 8B 41 24 B3 B1 22 85 22 AF 41 24 B3 B1 22 |$:.A$..".".A$.."|
000019D0: 86 22 AF 41 24 B3 B1 22 87 22 AF 41 24 B3 B1 22 |.".A$..".".A$.."|
000019E0: 88 22 A7 31 37 33 30 00 F8 21 CC 06 8B 41 24 B2 |.".1730..!...A$.|
000019F0: 22 85 22 A7 32 31 39 30 00 06 22 D6 06 8B 41 24 |".".2190.."...A$|
00001A00: B2 22 86 22 A7 8A 00 17 22 E0 06 8B 41 24 B2 22 |."."...."...A$."|
00001A10: 87 22 A7 31 36 33 30 00 28 22 EA 06 8B 41 24 B2 |.".1630.("...A$.|
00001A20: 22 88 22 A7 31 37 38 30 00 55 22 F4 06 8A 20 20 |".".1780.U"... |
00001A30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001A40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001A50: 20 20 20 20 20 00 6D 22 FE 06 8F 20 4D 41 4A 4F | .m"... MAJO|
00001A60: 52 20 53 55 42 52 4F 55 54 49 4E 45 53 00 85 22 |R SUBROUTINES.."|
00001A70: 08 07 8D 20 31 31 35 30 3A 8F 20 50 48 41 53 45 |... 1150:. PHASE|
00001A80: 20 43 41 4C 43 00 A0 22 12 07 8D 20 31 32 30 30 | CALC.."... 1200|
00001A90: 3A 8F 20 4E 41 4D 45 20 4F 46 20 50 48 41 53 45 |:. NAME OF PHASE|
00001AA0: 00 BB 22 1C 07 8D 20 31 32 39 30 3A 8F 20 49 4E |.."... 1290:. IN|
00001AB0: 50 55 54 20 52 4F 55 54 49 4E 45 00 DC 22 26 07 |PUT ROUTINE.."&.|
00001AC0: 8D 20 31 33 38 30 3A 8F 20 52 45 44 45 46 49 4E |. 1380:. REDEFIN|
00001AD0: 45 20 43 48 41 52 41 43 54 45 52 53 00 F7 22 30 |E CHARACTERS.."0|
00001AE0: 07 8D 20 31 36 33 30 3A 8F 20 53 43 52 45 45 4E |.. 1630:. SCREEN|
00001AF0: 20 4F 55 54 50 55 54 00 12 23 3A 07 8D 20 35 31 | OUTPUT..#:.. 51|
00001B00: 30 3A 8F 20 50 52 49 4E 54 45 52 20 4F 55 54 50 |0:. PRINTER OUTP|
00001B10: 55 54 00 2A 23 44 07 8D 20 32 31 39 30 3A 8F 20 |UT.*#D.. 2190:. |
00001B20: 4D 4F 4E 54 48 20 4D 45 4E 55 00 41 23 4E 07 8D |MONTH MENU.A#N..|
00001B30: 20 32 35 34 30 3A 8F 20 43 4C 45 41 52 20 42 4F | 2540:. CLEAR BO|
00001B40: 58 00 7A 23 58 07 9F 31 35 2C 38 2C 31 35 2C 22 |X.z#X..15,8,15,"|
00001B50: 52 30 3A 48 45 4C 4C 4F 20 43 4F 4E 4E 45 43 54 |R0:HELLO CONNECT|
00001B60: 3D 48 45 4C 4C 4F 20 43 4F 4E 4E 45 43 54 22 3A |=HELLO CONNECT":|
00001B70: 84 31 35 2C 45 52 3A A0 31 35 00 99 23 62 07 97 |.15,ER:.15..#b..|
00001B80: 35 33 32 36 39 2C 30 3A 8B 20 45 52 B3 B1 36 33 |53269,0:. ER..63|
00001B90: 20 A7 20 99 22 93 22 3A 80 00 B9 23 6C 07 41 24 | . .".":...#l.A$|
00001BA0: B2 22 48 45 4C 4C 4F 20 43 4F 4E 4E 45 43 54 22 |."HELLO CONNECT"|
00001BB0: 3A 51 24 B2 C7 28 33 34 29 00 D4 23 76 07 99 22 |:Q$..(34)..#v.."|
00001BC0: 90 93 11 11 11 4C 4F 41 44 22 51 24 41 24 51 24 |.....LOAD"Q$A$Q$|
00001BD0: 22 2C 38 22 00 FD 23 80 07 99 22 11 11 11 11 52 |",8"..#..."....R|
00001BE0: 55 4E 13 22 3A 97 36 33 31 2C 31 33 3A 97 36 33 |UN.":.631,13:.63|
00001BF0: 32 2C 31 33 3A 97 31 39 38 2C 32 3A 80 00 07 24 |2,13:.198,2:...$|
00001C00: 8A 07 8D 32 30 34 30 00 42 24 94 07 97 32 31 34 |...2040.B$...214|
00001C10: 2C 31 34 3A 99 3A 99 22 20 20 9B 12 B8 B8 B8 B8 |,14:.:." ......|
00001C20: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
00001C30: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
00001C40: 98 22 00 7A 24 9E 07 81 49 B2 31 A4 33 3A 99 22 |.".z$...I.1.3:."|
00001C50: 20 20 12 20 20 20 20 20 20 20 20 20 20 20 20 20 | . |
00001C60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001C70: 20 20 20 20 20 20 20 22 3A 82 00 A9 24 A8 07 99 | ":...$...|
00001C80: 22 20 20 12 20 20 20 20 20 20 50 55 42 4C 49 53 |" . PUBLIS|
00001C90: 48 45 44 20 4F 4E 20 4C 4F 41 44 53 54 41 52 20 |HED ON LOADSTAR |
00001CA0: 23 35 38 20 20 20 20 20 22 00 D8 24 B2 07 99 22 |#58 "..$..."|
00001CB0: 20 20 12 20 20 20 20 53 55 42 53 43 52 49 50 54 | . SUBSCRIPT|
00001CC0: 49 4F 4E 53 20 31 2D 38 30 30 2D 38 33 31 2D 32 |IONS 1-800-831-2|
00001CD0: 36 39 34 20 20 20 20 22 00 07 25 BC 07 99 22 20 |694 "..%..." |
00001CE0: 20 12 20 20 20 43 48 41 4E 47 49 4E 47 20 54 48 | . CHANGING TH|
00001CF0: 49 53 20 4E 4F 54 49 43 45 20 49 53 20 49 4C 4C |IS NOTICE IS ILL|
00001D00: 45 47 41 4C 20 20 22 00 36 25 C6 07 99 22 20 20 |EGAL ".6%..." |
00001D10: 12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00001D20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001D30: 20 20 20 20 20 22 00 67 25 D0 07 99 22 20 20 97 | ".g%..." .|
00001D40: 12 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 |................|
00001D50: B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 |................|
00001D60: B9 B9 B9 B9 B9 13 22 00 A0 25 DA 07 41 55 24 B2 |......"..%..AU$.|
00001D70: 22 4C 55 4E 41 52 20 43 41 4C 45 4E 44 41 52 22 |"LUNAR CALENDAR"|
00001D80: 3A 97 32 31 34 2C 31 36 3A 99 3A 99 A6 32 30 AB |:.214,16:.:..20.|
00001D90: C3 28 41 55 24 29 AD 32 29 22 12 98 22 41 55 24 |.(AU$).2)".."AU$|
00001DA0: 00 D1 25 E4 07 41 55 24 B2 22 42 59 20 54 4F 4E |..%..AU$."BY TON|
00001DB0: 59 20 48 45 52 52 49 4E 47 54 4F 4E 20 20 28 43 |Y HERRINGTON (C|
00001DC0: 29 20 31 39 38 39 22 3A 97 32 31 34 2C 31 37 3A |) 1989":.214,17:|
00001DD0: 99 00 F0 25 EE 07 99 A6 32 30 AB C3 28 41 55 24 |...%....20..(AU$|
00001DE0: 29 AD 32 29 22 12 98 22 41 55 24 22 13 22 3A 8E |).2)".."AU$".":.|
00001DF0: 00 0C 26 F8 07 99 22 93 22 3A 97 35 33 32 38 31 |..&...".":.53281|
00001E00: 2C 30 3A 97 35 33 32 38 30 2C 31 31 00 38 26 02 |,0:.53280,11.8&.|
00001E10: 08 99 22 20 20 1C 2E 20 20 20 20 9A 4C 4F 41 44 |.." .. .LOAD|
00001E20: 53 54 41 52 20 9E 50 52 4F 55 44 4C 59 20 9A 50 |STAR .PROUDLY .P|
00001E30: 52 45 53 45 4E 54 53 22 00 6A 26 0C 08 99 22 20 |RESENTS".j&..." |
00001E40: 20 20 20 20 9E 2E 20 20 20 20 20 20 20 20 20 20 | .. |
00001E50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001E60: 20 97 2E 20 20 20 20 9F 2E 22 00 99 26 16 08 99 | .. .."..&...|
00001E70: 22 20 20 1F 2E 20 20 20 20 9E 60 60 AE 20 20 20 |" .. .``. |
00001E80: B2 20 B2 20 B0 AE B2 20 B0 60 AE 20 B0 60 AE 20 |. . ... .`. .`. |
00001E90: 97 2E 20 20 20 20 20 2E 22 00 C4 26 20 08 99 22 |.. ."..& .."|
00001EA0: 20 20 20 20 2E 20 20 20 20 9E 7D A0 20 20 7D 20 | . .}. } |
00001EB0: 7D 20 7D 7D 7D 20 AB 60 B3 20 7D B0 BD 20 20 20 |} }}} .`. }.. |
00001EC0: 20 1F 2E 22 00 ED 26 2A 08 99 22 20 20 20 20 20 | .."..&*.." |
00001ED0: 20 20 20 20 9E AD 60 BD 20 AD 60 BD 20 B1 AD BD | ..`. .`. ...|
00001EE0: 20 B1 20 B1 1F 2E 9E B1 AD 60 60 60 22 00 1B 27 | . ......```"..'|
00001EF0: 34 08 99 22 20 20 20 B0 60 AE 20 B0 60 AE 20 AE |4.." .`. .`. .|
00001F00: 20 20 20 B0 60 AE 20 B0 AE B2 20 B0 60 69 20 B0 | .`. ... .`i .|
00001F10: 60 AE 20 B0 60 AE 20 20 20 2E 22 00 47 27 3E 08 |`. .`. .".G'>.|
00001F20: 99 22 20 20 1F 2E 9E 7D 20 20 20 AB 60 B3 20 7D |." ...} .`. }|
00001F30: 20 20 20 AB B3 20 20 7D 7D 7D 20 7D 20 7D 20 AB | .. }}} } } .|
00001F40: 60 B3 20 7D B0 BD 22 00 75 27 48 08 99 22 20 20 |`. }..".u'H.." |
00001F50: 20 AD 60 BD 1C 2E 9E B1 20 B1 20 AD 60 BD 20 AD | .`..... . .`. .|
00001F60: 60 BD 20 B1 AD BD 20 AD 60 6B 20 B1 20 B1 20 B1 |`. ... .`k . . .|
00001F70: AD 60 60 60 22 00 A6 27 52 08 99 22 20 20 20 20 |.```"..'R.." |
00001F80: 20 20 20 20 20 20 20 20 20 20 20 20 1C 2E 20 20 | .. |
00001F90: 20 20 20 20 20 20 20 9E 2E 20 20 20 20 20 20 20 | .. |
00001FA0: 1F 2E 20 1C 2E 22 00 D0 27 5C 08 99 22 20 20 20 |.. .."..'\.." |
00001FB0: 9E 2E 20 20 20 9F 28 43 29 20 31 39 38 39 20 20 |.. .(C) 1989 |
00001FC0: 54 4F 4E 59 20 48 45 52 52 49 4E 47 54 4F 4E 22 |TONY HERRINGTON"|
00001FD0: 00 03 28 66 08 99 22 20 20 20 20 20 20 20 20 20 |..(f.." |
00001FE0: 20 20 20 20 1F 2E 20 97 2E 20 20 9E 2E 20 20 20 | .. .. .. |
00001FF0: 20 20 1F 2E 20 20 1C 2E 20 20 1F 2E 20 20 20 20 | .. .. .. |
00002000: 9E 2E 22 00 36 28 70 08 99 22 20 20 20 9F 2E 20 |..".6(p.." .. |
00002010: 1F 2E 20 20 20 9F 2E 20 20 20 20 20 20 20 20 20 |.. .. |
00002020: 20 2E 20 20 20 20 20 20 20 20 20 20 20 20 1C 2E | . ..|
00002030: 20 20 20 9F 2E 22 00 68 28 7A 08 99 22 20 1F A4 | ..".h(z.." ..|
00002040: A4 AF AF B9 B9 B9 A2 A2 A2 12 B8 B8 B8 B8 B8 B8 |................|
00002050: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 92 A2 A2 |................|
00002060: A2 B9 B9 AF AF A4 A4 22 00 9C 28 84 08 99 22 20 |......."..(..." |
00002070: 12 20 A4 A4 A4 AF AF AF AF A2 A2 A2 A2 A2 A2 92 |. ..............|
00002080: B8 B8 B8 B8 B8 B8 B8 B8 B8 12 A2 A2 A2 A2 A2 A2 |................|
00002090: A2 A2 AF AF AF AF A4 A4 20 22 3A 8E 00 B8 28 8E |........ ":...(.|
000020A0: 08 99 22 13 22 3B 3A 56 49 B2 35 33 32 34 38 3A |..".";:VI.53248:|
000020B0: 58 24 B2 C7 28 31 33 29 00 D0 28 98 08 81 49 B2 |X$..(13)..(...I.|
000020C0: 39 36 30 A4 39 38 33 3A 97 49 2C 32 35 35 3A 82 |960.983:.I,255:.|
000020D0: 00 E7 28 A2 08 81 49 B2 39 38 34 A4 31 30 32 32 |..(...I.984.1022|
000020E0: 3A 97 49 2C 30 3A 82 00 11 29 AC 08 81 49 B2 38 |:.I,0:...)...I.8|
000020F0: 39 36 A4 39 31 39 3A 97 49 2C 32 35 35 3A 82 3A |96.919:.I,255:.:|
00002100: 81 49 B2 39 32 30 A4 39 35 39 3A 97 49 2C 30 3A |.I.920.959:.I,0:|
00002110: 82 00 31 29 B6 08 97 35 36 35 37 36 2C 31 39 35 |..1)...56576,195|
00002120: 3A 97 36 34 38 2C 34 3A 97 35 33 32 37 32 2C 32 |:.648,4:.53272,2|
00002130: 31 00 64 29 C0 08 99 22 93 92 20 20 20 9B 12 A9 |1.d)...".. ...|
00002140: 20 20 A3 A3 B7 B7 B8 B8 92 A2 A2 B9 B9 AF AF A4 | ..............|
00002150: A4 A4 A4 AF AF B9 B9 A2 A2 12 B8 B8 B7 B7 A3 A3 |................|
00002160: 20 20 7F 22 00 94 29 CA 08 99 22 20 20 98 12 A9 | ."..)..." ...|
00002170: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002180: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002190: 20 20 7F 22 00 C4 29 D4 08 99 22 20 12 A9 20 4A | ."..)..." .. J|
000021A0: 41 4E 55 41 52 59 20 20 20 20 20 46 45 42 52 55 |ANUARY FEBRU|
000021B0: 41 52 59 20 20 20 20 20 4D 41 52 43 48 20 20 20 |ARY MARCH |
000021C0: 20 20 7F 22 00 F4 29 DE 08 99 22 20 12 20 20 41 | ."..)..." . A|
000021D0: 50 52 49 4C 20 20 20 20 20 20 20 4D 41 59 20 20 |PRIL MAY |
000021E0: 20 20 20 20 20 20 20 20 4A 55 4E 45 20 20 20 20 | JUNE |
000021F0: 20 20 20 22 00 24 2A E8 08 99 22 20 12 20 20 4A | ".$*..." . J|
00002200: 55 4C 59 20 20 20 20 20 20 20 20 41 55 47 55 53 |ULY AUGUS|
00002210: 54 20 20 20 20 20 20 20 53 45 50 54 45 4D 42 45 |T SEPTEMBE|
00002220: 52 20 20 22 00 55 2A F2 08 99 22 20 7F 12 20 4F |R ".U*..." .. O|
00002230: 43 54 4F 42 45 52 20 20 20 20 20 4E 4F 56 45 4D |CTOBER NOVEM|
00002240: 42 45 52 20 20 20 20 20 44 45 43 45 4D 42 45 52 |BER DECEMBER|
00002250: 20 20 92 A9 22 00 85 2A FC 08 99 22 20 20 7F 12 | .."..*..." ..|
00002260: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002270: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002280: 20 20 92 A9 22 00 B7 2A 06 09 99 22 20 20 20 97 | .."..*..." .|
00002290: 7F 12 20 20 A4 A4 AF AF B9 B9 A2 A2 92 B8 B8 B7 |.. ............|
000022A0: B7 A3 A3 A3 A3 B7 B7 B8 B8 12 A2 A2 B9 B9 AF AF |................|
000022B0: A4 A4 20 20 92 A9 22 00 E6 2A 10 09 99 22 20 20 |.. .."..*..." |
000022C0: 9B AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF |................|
000022D0: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF |................|
000022E0: AF AF AF AF AF 22 00 15 2B 1A 09 99 22 20 20 12 |....."..+..." .|
000022F0: A9 20 20 20 20 20 20 20 20 50 20 52 20 4F 20 4D |. P R O M|
00002300: 20 50 20 54 20 20 20 42 20 41 20 52 20 20 20 20 | P T B A R |
00002310: 20 20 20 7F 22 00 47 2B 24 09 99 22 20 98 AA 12 | .".G+$.." ...|
00002320: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002330: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002340: 20 20 20 20 92 A5 22 00 78 2B 2E 09 99 22 20 20 | ..".x+..." |
00002350: 97 7F 12 20 20 20 20 20 20 20 20 20 20 20 20 20 |... |
00002360: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002370: 20 20 20 20 20 92 A9 22 00 A6 2B 38 09 99 22 20 | .."..+8.." |
00002380: 20 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 | ...............|
00002390: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |................|
000023A0: B7 B7 B7 B7 B7 22 00 DC 2B 42 09 99 22 20 20 20 |....."..+B.." |
000023B0: 20 1F 2E 20 20 20 9E 2E 20 20 20 9C 2E 20 20 20 | .. .. .. |
000023C0: 97 2E 20 20 20 9F 2E 20 1F 2E 20 20 9E 2E 20 20 |.. .. .. .. |
000023D0: 20 9C 2E 20 98 2E 20 20 20 9C 2E 22 00 16 2C 4C | .. .. .."..,L|
000023E0: 09 99 22 20 20 2E 20 9F 2E 20 97 2E 20 9F 2E 20 |.." . .. .. .. |
000023F0: 9E 2E 20 20 9F 2E 20 20 20 98 2E 20 9C 2E 97 2E |.. .. .. ....|
00002400: 20 20 20 2E 20 20 9F 2E 20 20 20 20 97 2E 9F 2E | . .. ....|
00002410: 20 20 20 1F 2E 22 00 4B 2C 56 09 99 22 20 20 20 | ..".K,V.." |
00002420: 20 20 20 20 20 20 20 2E 20 97 2E 20 20 9E 2E 20 | . .. .. |
00002430: 9F 2E 20 20 20 20 98 2E 20 20 1C 2E 1F 2E 20 20 |.. .. .... |
00002440: 97 2E 20 1F 2E 20 20 20 9C 2E 22 00 7E 2C 60 09 |.. .. ..".~,`.|
00002450: 99 22 20 20 20 20 20 20 9F 2E 9C 2E 20 20 20 20 |." .... |
00002460: 20 20 1C 2E 20 97 2E 20 20 20 9E 2E 20 9F 2E 20 | .. .. .. .. |
00002470: 9C 2E 20 20 20 9E 2E 20 20 20 20 9F 2E 22 00 B6 |.. .. .."..|
00002480: 2C 6A 09 99 22 20 20 2E 20 1F 2E 20 20 20 20 81 |,j.." . .. .|
00002490: 2E 20 9F 2E 20 9C 2E 20 9E 2E 20 20 9F 2E 20 20 |. .. .. .. .. |
000024A0: 1F 2E 20 20 20 9F 2E 20 20 20 2E 20 97 2E 20 20 |.. .. . .. |
000024B0: 9C 2E 20 1F 2E 22 00 E5 2C 74 09 99 22 20 20 9E |.. .."..,t.." .|
000024C0: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
000024D0: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
000024E0: A4 A4 A4 A4 22 00 16 2D 7E 09 99 22 20 9B 12 A9 |...."..-~.." ...|
000024F0: 20 20 20 20 20 20 20 20 20 4F 20 55 20 54 20 50 | O U T P|
00002500: 20 55 20 54 20 20 20 42 20 41 20 52 20 20 20 20 | U T B A R |
00002510: 20 20 20 20 7F 22 00 47 2D 88 09 99 22 20 98 12 | .".G-..." ..|
00002520: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002530: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002540: 20 20 20 20 20 20 22 00 79 2D 92 09 99 22 20 97 | ".y-..." .|
00002550: DF 12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. |
00002560: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002570: 20 20 20 20 20 20 92 A9 22 00 A8 2D 9C 09 99 22 | .."..-..."|
00002580: 20 20 9E A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 | ..............|
00002590: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
000025A0: A3 A3 A3 A3 A3 A3 A3 22 00 E3 2D A6 09 99 22 20 |......."..-..." |
000025B0: 20 20 20 2E 20 1C 2E 20 9F 2E 9E 2E 20 20 1C 2E | . .. .... ..|
000025C0: 20 20 20 9E 2E 20 98 2E 20 20 1C 2E 20 9E 2E 20 | .. .. .. .. |
000025D0: 1C 2E 20 20 9E 2E 20 1C 2E 20 98 2E 20 9E 2E 20 |.. .. .. .. .. |
000025E0: 1C 2E 22 00 1B 2E B0 09 99 22 20 20 2E 20 20 20 |.."......" . |
000025F0: 20 20 9E 2E 1C 2E 20 98 2E 20 20 20 2E 20 20 20 | .... .. . |
00002600: 20 20 9E 2E 20 9F 2E 20 20 1C 2E 20 20 20 9F 2E | .. .. .. ..|
00002610: 20 20 2E 20 20 20 1C 2E 9B 22 3B 00 2B 2E BA 09 | . ...";.+...|
00002620: 99 22 13 22 3B 3A 89 32 37 31 30 00 4F 2E C4 09 |.".";:.2710.O...|
00002630: 97 36 34 36 2C C2 28 36 34 36 29 AA 31 3A 8B C2 |.646,.(646).1:..|
00002640: 28 36 34 36 29 B1 31 35 A7 97 36 34 36 2C 32 00 |(646).15..646,2.|
00002650: 75 2E CE 09 97 32 31 34 2C 32 33 3A 99 3A 99 A3 |u....214,23:.:..|
00002660: 31 32 29 22 50 52 45 53 53 20 53 50 41 43 45 20 |12)"PRESS SPACE |
00002670: 42 41 52 91 22 00 8B 2E D8 09 A1 41 24 3A 8B 41 |BAR."......A$:.A|
00002680: 24 B3 B1 22 20 22 A7 32 35 30 30 00 B8 2E E2 09 |$.." ".2500.....|
00002690: 97 36 34 36 2C 30 3A 97 32 31 34 2C 32 33 3A 99 |.646,0:.214,23:.|
000026A0: 3A 99 A3 31 32 29 22 50 52 45 53 53 20 53 50 41 |:..12)"PRESS SPA|
000026B0: 43 45 20 42 41 52 91 22 00 D0 2E EC 09 97 32 31 |CE BAR."......21|
000026C0: 34 2C 31 35 3A 99 22 98 22 3A 81 49 B2 31 A4 37 |4,15:.".":.I.1.7|
000026D0: 00 04 2F F6 09 99 22 1D 1D 12 20 20 20 20 20 20 |../..."... |
000026E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000026F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 1D 1D | ..|
00002700: 22 3B 3A 82 00 3B 2F 00 0A 99 22 13 92 11 11 11 |";:..;/...".....|
00002710: 11 11 11 11 11 11 11 1D 1D 1D 1D 1D 20 20 20 20 |............ |
00002720: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002730: 20 20 20 20 20 20 20 20 22 3A 8E 00 5F 2F 0A 0A | ":.._/..|
00002740: 97 36 34 36 2C C2 28 36 34 36 29 AA 31 3A 8B C2 |.646,.(646).1:..|
00002750: 28 36 34 36 29 B1 31 35 A7 97 36 34 36 2C 32 00 |(646).15..646,2.|
00002760: 8C 2F 14 0A 97 32 31 34 2C 32 33 3A 99 3A 99 A3 |./...214,23:.:..|
00002770: 31 30 29 22 50 4C 45 41 53 45 20 53 45 4C 45 43 |10)"PLEASE SELEC|
00002780: 54 20 4F 55 54 50 55 54 91 22 3A 8E 00 AC 2F 1E |T OUTPUT.":.../.|
00002790: 0A 97 35 36 35 37 36 2C 31 39 35 3A 97 36 34 38 |..56576,195:.648|
000027A0: 2C 34 3A 97 35 33 32 37 32 2C 32 31 00 E9 2F 28 |,4:.53272,21../(|
000027B0: 0A 8D 32 35 34 30 3A 97 32 31 34 2C 31 38 3A 99 |..2540:.214,18:.|
000027C0: 3A 99 A3 33 29 22 98 12 44 49 53 50 4C 41 59 20 |:..3)"..DISPLAY |
000027D0: 47 52 41 50 48 49 43 20 4F 52 20 45 4E 47 4C 49 |GRAPHIC OR ENGLI|
000027E0: 53 48 3F 20 28 47 2F 45 29 00 10 30 32 0A A1 43 |SH? (G/E)..02..C|
000027F0: 54 24 3A 8D 32 36 33 30 3A 8B 43 54 24 B3 B1 22 |T$:.2630:.CT$.."|
00002800: 47 22 AF 43 54 24 B3 B1 22 45 22 A7 32 36 31 30 |G".CT$.."E".2610|
00002810: 00 29 30 3C 0A 8D 32 35 34 30 3A 97 36 34 36 2C |.)0<..2540:.646,|
00002820: 30 3A 8D 32 36 34 30 3A 8E 00 4D 30 46 0A 97 36 |0:.2640:..M0F..6|
00002830: 34 36 2C C2 28 36 34 36 29 AA 31 3A 8B C2 28 36 |46,.(646).1:..(6|
00002840: 34 36 29 B1 31 35 A7 97 36 34 36 2C 32 00 89 30 |46).15..646,2..0|
00002850: 50 0A 97 32 31 34 2C 32 33 3A 99 3A 99 A3 32 29 |P..214,23:.:..2)|
00002860: 22 50 4C 45 41 53 45 20 53 45 4C 45 43 54 20 54 |"PLEASE SELECT T|
00002870: 59 50 45 20 4F 46 20 53 43 52 45 45 4E 20 44 49 |YPE OF SCREEN DI|
00002880: 53 50 4C 41 59 91 22 3A 8E 00 AA 30 5A 0A 8F 2A |SPLAY.":...0Z..*|
00002890: 2A 2A 2A 2A 2A 2A 2A 20 50 52 4F 4D 50 54 20 42 |******* PROMPT B|
000028A0: 41 52 2A 2A 2A 2A 2A 2A 2A 2A 00 E5 30 64 0A 97 |AR********..0d..|
000028B0: 32 31 34 2C 39 3A 99 3A 99 22 98 1D 1D 12 20 20 |214,9:.:.".... |
000028C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000028D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000028E0: 20 20 1D 1D 22 00 17 31 6E 0A 97 32 31 34 2C 39 | .."..1n..214,9|
000028F0: 3A 99 3A 97 31 39 39 2C 31 3A 99 22 98 22 A3 32 |:.:.199,1:.".".2|
00002900: 30 AB C3 28 50 4D 24 29 AD 32 29 50 4D 24 3A 50 |0..(PM$).2)PM$:P|
00002910: 4D 24 B2 22 22 3A 8E 00 38 31 78 0A 8F 2A 2A 2A |M$."":..81x..***|
00002920: 2A 2A 2A 2A 2A 20 4F 55 54 50 55 54 20 42 41 52 |***** OUTPUT BAR|
00002930: 2A 2A 2A 2A 2A 2A 2A 2A 00 74 31 82 0A 97 32 31 |********.t1...21|
00002940: 34 2C 31 39 3A 99 3A 99 22 98 1D 1D 12 20 20 20 |4,19:.:.".... |
00002950: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002960: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002970: 20 1D 1D 22 00 A7 31 8C 0A 97 32 31 34 2C 31 39 | .."..1...214,19|
00002980: 3A 99 3A 97 31 39 39 2C 31 3A 99 22 98 22 A3 32 |:.:.199,1:.".".2|
00002990: 30 AB C3 28 4F 50 24 29 AD 32 29 4F 50 24 3A 4F |0..(OP$).2)OP$:O|
000029A0: 50 24 B2 22 22 3A 8E 00 BE 31 96 0A 8F 20 4D 45 |P$."":...1... ME|
000029B0: 4E 55 20 47 45 54 20 52 4F 55 54 49 4E 45 00 F9 |NU GET ROUTINE..|
000029C0: 31 A0 0A 97 56 49 AA 32 31 2C 33 3A 97 56 49 AA |1...VI.21,3:.VI.|
000029D0: 31 2C 36 36 3A 97 56 49 AA 33 2C 36 36 3A 97 35 |1,66:.VI.3,66:.5|
000029E0: 33 32 37 37 2C 33 3A 97 56 49 2C 32 33 AA 32 34 |3277,3:.VI,23.24|
000029F0: 3A 97 56 49 AA 32 2C 39 35 00 35 32 AA 0A 97 56 |:.VI.2,95.52...V|
00002A00: 49 AA 34 30 2C 37 3A 97 56 49 AA 33 39 2C 37 3A |I.40,7:.VI.39,7:|
00002A10: 8D 32 38 35 30 3A 50 4D 24 B2 22 51 20 4F 52 20 |.2850:PM$."Q OR |
00002A20: 5E 20 54 4F 20 45 58 49 54 22 3A 8D 32 36 35 30 |^ TO EXIT":.2650|
00002A30: 3A 4D 55 B2 31 00 5E 32 B4 0A A1 41 24 3A 8D 32 |:MU.1.^2...A$:.2|
00002A40: 39 38 30 3A 8D 32 39 38 30 3A 8D 33 32 35 30 3A |980:.2980:.3250:|
00002A50: 8B 41 24 B2 22 5E 22 A7 41 24 B2 22 51 22 00 97 |.A$."^".A$."Q"..|
00002A60: 32 BE 0A 8B 41 24 B3 B1 22 1D 22 AF 41 24 B3 B1 |2...A$..".".A$..|
00002A70: 22 9D 22 AF 41 24 B3 B1 22 51 22 AF 41 24 B3 B1 |".".A$.."Q".A$..|
00002A80: 58 24 AF 41 24 B3 B1 22 91 22 AF 41 24 B3 B1 22 |X$.A$..".".A$.."|
00002A90: 11 22 A7 32 37 34 30 00 B7 32 C8 0A 8B 41 24 B2 |.".2740..2...A$.|
00002AA0: 22 1D 22 A7 4D 55 B2 4D 55 AA 31 3A 8B 4D 55 B2 |".".MU.MU.1:.MU.|
00002AB0: 31 33 A7 4D 55 B2 31 00 DD 32 D2 0A 8B 41 24 B2 |13.MU.1..2...A$.|
00002AC0: 22 9D 22 A7 4D 55 B2 4D 55 AB 31 3A 8D 32 39 38 |".".MU.MU.1:.298|
00002AD0: 30 3A 8B 4D 55 B3 31 A7 4D 55 B2 31 32 00 03 33 |0:.MU.1.MU.12..3|
00002AE0: DC 0A 8B 41 24 B2 22 91 22 A7 4D 55 B2 4D 55 AB |...A$.".".MU.MU.|
00002AF0: 33 3A 8D 32 39 38 30 3A 8B 4D 55 B3 31 A7 4D 55 |3:.2980:.MU.1.MU|
00002B00: B2 31 32 00 29 33 E6 0A 8B 41 24 B2 22 11 22 A7 |.12.)3...A$.".".|
00002B10: 4D 55 B2 4D 55 AA 33 3A 8D 32 39 38 30 3A 8B 4D |MU.MU.3:.2980:.M|
00002B20: 55 B1 31 32 A7 4D 55 B2 31 00 5E 33 F0 0A 8B 41 |U.12.MU.1.^3...A|
00002B30: 24 B2 58 24 A7 97 35 33 32 38 37 2C 37 3A 97 35 |$.X$..53287,7:.5|
00002B40: 33 32 38 38 2C 37 3A 8D 33 30 30 30 3A 8D 32 36 |3288,7:.3000:.26|
00002B50: 35 30 3A 8D 32 36 38 30 3A 89 32 37 34 30 00 92 |50:.2680:.2740..|
00002B60: 33 FA 0A 8B 41 24 B2 22 51 22 A7 50 4D 24 B2 22 |3...A$."Q".PM$."|
00002B70: 51 55 49 54 20 54 48 49 53 20 4D 45 4E 55 3F 20 |QUIT THIS MENU? |
00002B80: 28 59 2F 4E 29 22 3A 8D 32 36 35 30 3A 8D 33 30 |(Y/N)":.2650:.30|
00002B90: 39 30 00 9F 33 04 0B 97 56 49 AA 32 31 2C 30 00 |90..3...VI.21,0.|
00002BA0: E3 33 0E 0B 91 4D 55 8D 32 38 35 30 2C 32 38 36 |.3...MU.2850,286|
00002BB0: 30 2C 32 38 37 30 2C 32 38 38 30 2C 32 38 39 30 |0,2870,2880,2890|
00002BC0: 2C 32 39 30 30 2C 32 39 31 30 2C 32 39 32 30 2C |,2900,2910,2920,|
00002BD0: 32 39 33 30 2C 32 39 34 30 2C 32 39 35 30 2C 32 |2930,2940,2950,2|
00002BE0: 39 36 30 00 F6 33 18 0B 97 56 49 AA 32 31 2C 33 |960..3...VI.21,3|
00002BF0: 3A 89 32 37 34 30 00 27 34 22 0B 97 56 49 AA 31 |:.2740.'4"..VI.1|
00002C00: 36 2C 30 3A 97 56 49 2C 34 37 3A 97 56 49 AA 32 |6,0:.VI,47:.VI.2|
00002C10: 2C 39 35 3A 97 56 49 AA 31 2C 36 36 3A 97 56 49 |,95:.VI.1,66:.VI|
00002C20: AA 33 2C 36 36 3A 8E 00 5A 34 2C 0B 97 56 49 2C |.3,66:..Z4,..VI,|
00002C30: 31 33 36 3A 97 56 49 AA 32 2C 31 38 34 3A 97 56 |136:.VI.2,184:.V|
00002C40: 49 AA 31 36 2C 30 3A 97 56 49 AA 31 2C 36 36 3A |I.16,0:.VI.1,66:|
00002C50: 97 56 49 AA 33 2C 36 36 3A 8E 00 8C 34 36 0B 97 |.VI.3,66:...46..|
00002C60: 56 49 2C 32 34 30 3A 97 56 49 AA 32 2C 32 34 3A |VI,240:.VI.2,24:|
00002C70: 97 56 49 AA 31 36 2C 32 3A 97 56 49 AA 31 2C 36 |.VI.16,2:.VI.1,6|
00002C80: 36 3A 97 56 49 AA 33 2C 36 36 3A 8E 00 BD 34 40 |6:.VI.3,66:...4@|
00002C90: 0B 97 56 49 AA 31 36 2C 30 3A 97 56 49 2C 34 37 |..VI.16,0:.VI,47|
00002CA0: 3A 97 56 49 AA 32 2C 39 35 3A 97 56 49 AA 31 2C |:.VI.2,95:.VI.1,|
00002CB0: 37 34 3A 97 56 49 AA 33 2C 37 34 3A 8E 00 F0 34 |74:.VI.3,74:...4|
00002CC0: 4A 0B 97 56 49 2C 31 33 36 3A 97 56 49 AA 32 2C |J..VI,136:.VI.2,|
00002CD0: 31 38 34 3A 97 56 49 AA 31 36 2C 30 3A 97 56 49 |184:.VI.16,0:.VI|
00002CE0: AA 31 2C 37 34 3A 97 56 49 AA 33 2C 37 34 3A 8E |.1,74:.VI.3,74:.|
00002CF0: 00 22 35 54 0B 97 56 49 2C 32 34 30 3A 97 56 49 |."5T..VI,240:.VI|
00002D00: AA 32 2C 32 34 3A 97 56 49 AA 31 36 2C 32 3A 97 |.2,24:.VI.16,2:.|
00002D10: 56 49 AA 31 2C 37 34 3A 97 56 49 AA 33 2C 37 34 |VI.1,74:.VI.3,74|
00002D20: 3A 8E 00 53 35 5E 0B 97 56 49 AA 31 36 2C 30 3A |:..S5^..VI.16,0:|
00002D30: 97 56 49 2C 34 37 3A 97 56 49 AA 32 2C 39 35 3A |.VI,47:.VI.2,95:|
00002D40: 97 56 49 AA 31 2C 38 32 3A 97 56 49 AA 33 2C 38 |.VI.1,82:.VI.3,8|
00002D50: 32 3A 8E 00 86 35 68 0B 97 56 49 2C 31 33 36 3A |2:...5h..VI,136:|
00002D60: 97 56 49 AA 32 2C 31 38 34 3A 97 56 49 AA 31 36 |.VI.2,184:.VI.16|
00002D70: 2C 30 3A 97 56 49 AA 31 2C 38 32 3A 97 56 49 AA |,0:.VI.1,82:.VI.|
00002D80: 33 2C 38 32 3A 8E 00 B8 35 72 0B 97 56 49 2C 32 |3,82:...5r..VI,2|
00002D90: 34 30 3A 97 56 49 AA 32 2C 32 34 3A 97 56 49 AA |40:.VI.2,24:.VI.|
00002DA0: 31 36 2C 32 3A 97 56 49 AA 31 2C 38 32 3A 97 56 |16,2:.VI.1,82:.V|
00002DB0: 49 AA 33 2C 38 32 3A 8E 00 E9 35 7C 0B 97 56 49 |I.3,82:...5|..VI|
00002DC0: AA 31 36 2C 30 3A 97 56 49 2C 34 37 3A 97 56 49 |.16,0:.VI,47:.VI|
00002DD0: AA 32 2C 39 35 3A 97 56 49 AA 31 2C 39 30 3A 97 |.2,95:.VI.1,90:.|
00002DE0: 56 49 AA 33 2C 39 30 3A 8E 00 1C 36 86 0B 97 56 |VI.3,90:...6...V|
00002DF0: 49 2C 31 33 36 3A 97 56 49 AA 32 2C 31 38 34 3A |I,136:.VI.2,184:|
00002E00: 97 56 49 AA 31 36 2C 30 3A 97 56 49 AA 31 2C 39 |.VI.16,0:.VI.1,9|
00002E10: 30 3A 97 56 49 AA 33 2C 39 30 3A 8E 00 4E 36 90 |0:.VI.3,90:..N6.|
00002E20: 0B 97 56 49 2C 32 34 30 3A 97 56 49 AA 32 2C 32 |..VI,240:.VI.2,2|
00002E30: 34 3A 97 56 49 AA 31 36 2C 32 3A 97 56 49 AA 31 |4:.VI.16,2:.VI.1|
00002E40: 2C 39 30 3A 97 56 49 AA 33 2C 39 30 3A 8E 00 69 |,90:.VI.3,90:..i|
00002E50: 36 9A 0B 8F 2A 2A 2A 2A 2A 2A 2A 53 50 41 52 4B |6...*******SPARK|
00002E60: 4C 45 2A 2A 2A 2A 2A 2A 2A 00 89 36 A4 0B 97 BB |LE*******..6....|
00002E70: 28 54 49 29 AC 31 39 39 AA 35 35 38 31 36 2C BB |(TI).199.55816,.|
00002E80: 28 54 49 29 AC 31 33 AA 32 00 AA 36 AE 0B 97 BB |(TI).13.2..6....|
00002E90: 28 54 49 29 AC 34 30 AA 35 36 32 31 36 2C BB 28 |(TI).40.56216,.(|
00002EA0: 54 49 29 AC 31 33 AA 32 3A 8E 00 C6 36 B8 0B 8F |TI).13.2:...6...|
00002EB0: 2A 2A 2A 2A 4D 4F 4E 54 48 20 53 45 4C 45 43 54 |****MONTH SELECT|
00002EC0: 45 44 2A 2A 2A 2A 00 0D 37 C2 0B 50 4D 24 B2 22 |ED****..7..PM$."|
00002ED0: 43 55 52 53 4F 52 20 4B 45 59 53 20 54 4F 20 53 |CURSOR KEYS TO S|
00002EE0: 43 41 4E 20 4D 4F 4E 54 48 2F 5E 20 54 4F 20 45 |CAN MONTH/^ TO E|
00002EF0: 58 49 54 22 3A 8D 32 36 35 30 3A 4D B2 4D 55 3A |XIT":.2650:M.MU:|
00002F00: 44 B2 31 20 20 20 20 20 20 20 20 20 20 00 3E 37 |D.1 .>7|
00002F10: CC 0B 8D 31 32 30 30 3A 4F 50 24 B2 4D 24 28 4D |...1200:OP$.M$(M|
00002F20: 29 AA C4 28 44 29 AA 22 2C 22 AA C4 28 59 29 AA |)..(D).","..(Y).|
00002F30: 22 3A 20 22 AA 50 48 24 3A 8D 32 36 38 30 00 52 |": ".PH$:.2680.R|
00002F40: 37 D6 0B A1 41 24 3A 8D 32 39 38 30 3A 8D 32 39 |7...A$:.2980:.29|
00002F50: 38 30 00 8B 37 E0 0B 8B 41 24 B3 B1 22 1D 22 AF |80..7...A$..".".|
00002F60: 41 24 B3 B1 22 9D 22 AF 41 24 B3 B1 22 5E 22 AF |A$..".".A$.."^".|
00002F70: 41 24 B3 B1 58 24 AF 41 24 B3 B1 22 91 22 AF 41 |A$..X$.A$..".".A|
00002F80: 24 B3 B1 22 11 22 A7 33 30 33 30 00 B2 37 EA 0B |$..".".3030..7..|
00002F90: 8B 41 24 B2 22 1D 22 B0 41 24 B2 22 91 22 A7 44 |.A$.".".A$.".".D|
00002FA0: B2 44 AA 31 3A 8B 44 B1 4D 4F 25 28 4D 29 A7 44 |.D.1:.D.MO%(M).D|
00002FB0: B2 31 00 D9 37 F4 0B 8B 41 24 B2 22 9D 22 B0 41 |.1..7...A$.".".A|
00002FC0: 24 B2 22 11 22 A7 44 B2 44 AB 31 3A 8B 44 B3 31 |$.".".D.D.1:.D.1|
00002FD0: A7 44 B2 4D 4F 25 28 4D 29 00 E7 37 FE 0B 8B 41 |.D.MO%(M)..7...A|
00002FE0: 24 B2 22 5E 22 A7 8E 00 1E 38 08 0C 8D 31 32 30 |$."^"....8...120|
00002FF0: 30 3A 4F 50 24 B2 4D 24 28 4D 29 AA C4 28 44 29 |0:OP$.M$(M)..(D)|
00003000: AA 22 2C 22 AA C4 28 59 29 AA 22 3A 20 22 AA 50 |.","..(Y).": ".P|
00003010: 48 24 3A 8D 32 36 38 30 3A 89 33 30 33 30 00 3E |H$:.2680:.3030.>|
00003020: 38 12 0C 8F 2A 2A 2A 2A 2A 2A 2A 20 53 45 4C 45 |8...******* SELE|
00003030: 43 54 20 59 45 41 52 2A 2A 2A 2A 2A 2A 2A 00 5C |CT YEAR*******.\|
00003040: 38 1C 0C A1 41 24 3A 8B 41 24 B3 B1 22 59 22 AF |8...A$:.A$.."Y".|
00003050: 41 24 B3 B1 22 4E 22 A7 33 31 30 30 00 78 38 26 |A$.."N".3100.x8&|
00003060: 0C 50 4D 24 B2 22 20 22 3A 8D 32 36 35 30 3A 8B |.PM$." ":.2650:.|
00003070: 41 24 B2 22 4E 22 A7 8E 00 AD 38 30 0C 50 4D 24 |A$."N"....80.PM$|
00003080: B2 22 51 55 49 54 20 4F 52 20 47 4F 20 54 4F 20 |."QUIT OR GO TO |
00003090: 47 52 41 50 48 49 43 20 43 41 4C 45 4E 44 41 52 |GRAPHIC CALENDAR|
000030A0: 20 28 51 2F 43 29 22 3A 8D 32 36 35 30 00 D3 38 | (Q/C)":.2650..8|
000030B0: 3A 0C A1 41 24 3A 8B 41 24 B3 B1 22 51 22 AF 41 |:..A$:.A$.."Q".A|
000030C0: 24 B3 B1 22 47 22 AF 41 24 B3 B1 22 43 22 A7 33 |$.."G".A$.."C".3|
000030D0: 31 33 30 00 EB 38 44 0C 8B 41 24 B2 22 43 22 B0 |130..8D..A$."C".|
000030E0: 41 24 B2 22 47 22 A7 31 36 34 30 00 F5 38 4E 0C |A$."G".1640..8N.|
000030F0: 89 31 38 38 30 00 2C 39 58 0C 8D 32 35 34 30 3A |.1880.,9X..2540:|
00003100: 97 32 31 34 2C 31 38 3A 99 3A 99 A3 37 29 22 12 |.214,18:.:..7)".|
00003110: 98 51 55 49 54 3F 20 20 41 52 45 20 59 4F 55 20 |.QUIT? ARE YOU |
00003120: 53 55 52 45 3F 20 28 59 2F 4E 29 22 00 4A 39 62 |SURE? (Y/N)".J9b|
00003130: 0C A1 41 24 3A 8B 41 24 B3 B1 22 59 22 AF 41 24 |..A$:.A$.."Y".A$|
00003140: B3 B1 22 4E 22 A7 33 31 37 30 00 58 39 6C 0C 8B |.."N".3170.X9l..|
00003150: 41 24 B2 22 4E 22 A7 8E 00 62 39 76 0C 89 31 38 |A$."N"...b9v..18|
00003160: 38 30 00 7A 39 80 0C 8F 2A 2A 2A 2A 46 49 58 20 |80.z9...****FIX |
00003170: 4D 4F 4E 54 48 53 2A 2A 2A 2A 00 86 39 8A 0C 81 |MONTHS****..9...|
00003180: 49 B2 31 A4 31 32 00 A3 39 94 0C 4D 24 28 49 29 |I.1.12..9..M$(I)|
00003190: B2 22 22 3A 81 49 49 B2 31 A4 C3 28 4D 4F 24 28 |."":.II.1..(MO$(|
000031A0: 49 29 29 00 D2 39 9E 0C 41 24 B2 CA 28 4D 4F 24 |I))..9..A$..(MO$|
000031B0: 28 49 29 2C 49 49 2C 5A 25 29 3A 8B 41 24 B3 B1 |(I),II,Z%):.A$..|
000031C0: 22 20 22 A7 4D 24 28 49 29 B2 4D 24 28 49 29 AA |" ".M$(I).M$(I).|
000031D0: 41 24 00 DC 39 A8 0C 82 3A 82 3A 8E 00 F3 39 B2 |A$..9...:.:...9.|
000031E0: 0C 43 43 25 B2 43 43 25 AA 31 3A 8B 43 43 25 B3 |.CC%.CC%.1:.CC%.|
000031F0: 32 A7 8E 00 FD 39 BC 0C 43 43 25 B2 30 00 27 3A |2....9..CC%.0.':|
00003200: C6 0C 43 53 25 B2 43 53 25 AA 31 3A 8B 43 53 25 |..CS%.CS%.1:.CS%|
00003210: B1 34 A7 43 53 25 B2 31 3A 8F 20 53 50 52 49 54 |.4.CS%.1:. SPRIT|
00003220: 45 20 43 4F 4C 4F 52 00 41 3A D0 0C 91 43 53 25 |E COLOR.A:...CS%|
00003230: 8D 33 32 39 30 2C 33 33 30 30 2C 33 33 32 30 3A |.3290,3300,3320:|
00003240: 8E 00 59 3A DA 0C 97 35 33 32 38 37 2C 30 3A 97 |..Y:...53287,0:.|
00003250: 35 33 32 38 38 2C 30 3A 8E 00 73 3A E4 0C 97 35 |53288,0:..s:...5|
00003260: 33 32 38 37 2C 31 31 3A 97 35 33 32 38 38 2C 31 |3287,11:.53288,1|
00003270: 31 3A 8E 00 8D 3A EE 0C 97 35 33 32 38 37 2C 31 |1:...:...53287,1|
00003280: 32 3A 97 35 33 32 38 38 2C 31 31 3A 8E 00 A7 3A |2:.53288,11:...:|
00003290: F8 0C 97 35 33 32 38 37 2C 31 35 3A 97 35 33 32 |...53287,15:.532|
000032A0: 38 38 2C 31 35 3A 8E 00 ED 3A 02 0D 97 35 33 32 |88,15:...:...532|
000032B0: 38 30 2C 31 32 3A 97 35 33 32 38 31 2C 31 35 3A |80,12:.53281,15:|
000032C0: 99 22 93 92 20 97 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |.".. ...........|
000032D0: C0 C0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. |
000032E0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 22 00 29 3B |............".);|
000032F0: 0C 0D 99 22 20 C0 C0 C0 C0 C0 C0 C0 C0 20 20 20 |..." ........ |
00003300: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003310: 20 20 C0 C0 C0 C0 C0 C0 C0 C0 C0 22 3A 8B 56 49 | .........":.VI|
00003320: A7 97 56 49 AA 32 31 2C 30 00 58 3B 16 0D 99 22 |..VI.21,0.X;..."|
00003330: 20 60 60 60 60 60 60 60 60 60 60 60 60 20 20 20 | ```````````` |
00003340: 20 20 20 20 20 20 20 20 20 20 20 60 60 60 60 60 | `````|
00003350: 60 60 60 60 60 60 60 22 00 88 3B 20 0D 99 22 20 |```````"..; .." |
00003360: 12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00003370: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003380: 20 20 20 20 20 20 20 22 00 BA 3B 2A 0D 99 22 20 | "..;*.." |
00003390: 12 20 98 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |. ..............|
000033A0: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
000033B0: B8 B8 B8 B8 B8 B8 B8 97 20 22 00 EC 3B 34 0D 99 |........ "..;4..|
000033C0: 22 20 12 20 98 20 20 20 20 20 20 20 20 20 20 20 |" . . |
000033D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000033E0: 20 20 20 20 20 20 20 20 20 97 20 22 00 1E 3C 3E | . "..<>|
000033F0: 0D 99 22 20 12 20 98 20 20 20 20 20 20 20 20 20 |.." . . |
00003400: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003410: 20 20 20 20 20 20 20 20 20 20 20 97 20 22 00 50 | . ".P|
00003420: 3C 48 0D 99 22 20 12 20 92 60 60 60 60 B2 60 60 |<H.." . .````.``|
00003430: 60 B2 60 60 60 B2 60 60 60 B2 60 60 60 B2 60 60 |`.```.```.```.``|
00003440: 60 B2 60 60 60 B2 60 60 60 B2 60 60 60 12 20 22 |`.```.```.```. "|
00003450: 00 94 3C 52 0D 99 22 20 12 20 90 92 31 20 20 20 |..<R.." . ..1 |
00003460: 97 7D 90 32 20 20 97 7D 90 33 20 20 97 7D 90 34 |.}.2 .}.3 .}.4|
00003470: 20 20 97 7D 90 35 20 20 97 7D 90 36 20 20 97 7D | .}.5 .}.6 .}|
00003480: 90 37 20 20 97 7D 90 38 20 20 97 7D 90 39 20 20 |.7 .}.8 .}.9 |
00003490: 97 12 20 22 00 C6 3C 5C 0D 99 22 20 12 20 92 20 |.. "..<\.." . . |
000034A0: 20 20 20 7D 20 20 20 7D 20 20 20 7D 20 20 20 7D | } } } }|
000034B0: 20 20 20 7D 20 20 20 7D 20 20 20 7D 20 20 20 7D | } } } }|
000034C0: 20 20 20 12 20 22 00 F8 3C 66 0D 99 22 20 12 20 | . "..<f.." . |
000034D0: 92 20 20 20 20 7D 20 20 20 7D 20 20 20 7D 20 20 |. } } } |
000034E0: 20 7D 20 20 20 7D 20 20 20 7D 20 20 20 7D 20 20 | } } } } |
000034F0: 20 7D 20 20 20 12 20 22 00 2A 3D 70 0D 99 22 20 | } . ".*=p.." |
00003500: 12 20 92 60 60 60 60 7B 60 60 60 7B 60 60 60 7B |. .````{```{```{|
00003510: 60 60 60 7B 60 60 60 7B 60 60 60 7B 60 60 60 7B |```{```{```{```{|
00003520: 60 60 60 7B 60 60 60 12 20 22 00 6E 3D 7A 0D 99 |```{```. ".n=z..|
00003530: 22 20 12 20 90 92 31 30 20 20 97 7D 90 31 31 20 |" . ..10 .}.11 |
00003540: 97 7D 90 31 32 20 97 7D 90 31 33 20 97 7D 90 31 |.}.12 .}.13 .}.1|
00003550: 34 20 97 7D 90 31 35 20 97 7D 90 31 36 20 97 7D |4 .}.15 .}.16 .}|
00003560: 90 31 37 20 97 7D 90 31 38 20 97 12 20 22 00 A0 |.17 .}.18 .. "..|
00003570: 3D 84 0D 99 22 20 12 20 92 20 20 20 20 7D 20 20 |=..." . . } |
00003580: 20 7D 20 20 20 7D 20 20 20 7D 20 20 20 7D 20 20 | } } } } |
00003590: 20 7D 20 20 20 7D 20 20 20 7D A0 A0 20 12 20 22 | } } }.. . "|
000035A0: 00 D2 3D 8E 0D 99 22 20 12 20 92 20 20 20 20 7D |..=..." . . }|
000035B0: 20 20 20 7D 20 20 20 7D 20 20 20 7D 20 20 20 7D | } } } }|
000035C0: 20 20 20 7D 20 20 20 7D 20 20 20 7D 20 20 20 12 | } } } .|
000035D0: 20 22 00 04 3E 98 0D 99 22 20 12 20 92 60 60 60 | "..>..." . .```|
000035E0: 60 7B 60 60 60 7B 60 60 60 7B 60 60 60 7B 60 60 |`{```{```{```{``|
000035F0: 60 7B 60 60 60 7B 60 60 60 7B 60 60 60 7B 60 60 |`{```{```{```{``|
00003600: 60 12 20 22 00 48 3E A2 0D 99 22 20 12 20 90 92 |`. ".H>..." . ..|
00003610: 31 39 20 20 97 7D 90 32 30 20 97 7D 90 32 31 20 |19 .}.20 .}.21 |
00003620: 97 7D 90 32 32 20 97 7D 90 32 33 20 97 7D 90 32 |.}.22 .}.23 .}.2|
00003630: 34 20 97 7D 90 32 35 20 97 7D 90 32 36 20 97 7D |4 .}.25 .}.26 .}|
00003640: 90 32 37 20 97 12 20 22 00 7A 3E AC 0D 99 22 20 |.27 .. ".z>..." |
00003650: 12 20 92 20 20 20 20 7D 20 20 20 7D 20 20 20 7D |. . } } }|
00003660: 20 20 20 7D 20 20 20 7D 20 20 20 7D 20 20 20 7D | } } } }|
00003670: 20 20 20 7D 20 20 20 12 20 22 00 AC 3E B6 0D 99 | } . "..>...|
00003680: 22 20 12 20 92 20 20 20 20 7D 20 20 20 7D 20 20 |" . . } } |
00003690: 20 7D 20 20 20 7D 20 20 20 7D 20 20 20 7D 20 20 | } } } } |
000036A0: 20 7D 20 20 20 7D 20 20 20 12 20 22 00 DE 3E C0 | } } . "..>.|
000036B0: 0D 99 22 20 12 20 92 60 60 60 60 7B 60 60 60 7B |.." . .````{```{|
000036C0: 60 60 60 7B 60 60 60 7B 60 60 60 B1 60 60 60 B1 |```{```{```.```.|
000036D0: 60 60 60 B1 60 60 60 B1 60 60 60 12 20 22 00 1A |```.```.```. "..|
000036E0: 3F CA 0D 99 22 20 12 20 90 92 32 38 20 20 97 DD |?..." . ..28 ..|
000036F0: 90 32 39 20 97 DD 90 33 30 20 97 DD 90 33 31 20 |.29 ...30 ...31 |
00003700: 97 DD 12 20 20 43 55 52 53 4F 52 20 54 4F 20 50 |... CURSOR TO P|
00003710: 41 47 45 20 20 92 20 12 20 22 00 4E 3F D4 0D 99 |AGE . . ".N?...|
00003720: 22 20 12 20 92 20 20 20 20 DD 20 20 20 DD 20 20 |" . . . . |
00003730: 20 DD 20 20 20 DD 12 20 20 52 45 54 55 52 4E 20 | . .. RETURN |
00003740: 54 4F 20 45 58 49 54 20 20 92 20 12 20 22 00 82 |TO EXIT . . "..|
00003750: 3F DE 0D 99 22 20 12 20 92 20 20 20 20 7D 20 20 |?..." . . } |
00003760: 20 7D 20 20 20 7D 20 20 20 7D 12 B9 B9 B9 B9 B9 | } } }......|
00003770: B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 92 20 12 |.............. .|
00003780: 20 22 00 BB 3F E8 0D 99 22 20 B8 B8 B8 B8 B8 B8 | "..?..." ......|
00003790: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
000037A0: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 |................|
000037B0: 22 3A 4D B2 31 3A 8D 33 37 34 30 00 CE 3F F2 0D |":M.1:.3740..?..|
000037C0: 99 22 13 11 90 22 A3 31 37 29 59 22 05 22 00 E7 |."...".17)Y"."..|
000037D0: 3F FC 0D 99 22 13 11 11 11 11 11 11 11 11 11 11 |?..."...........|
000037E0: 05 22 3B 3A 44 B2 30 00 23 40 06 0E 81 44 B2 31 |.";:D.0.#@...D.1|
000037F0: A4 39 3A 99 22 05 1D 1D 1D 1D 22 CA 28 45 4D 24 |.9:.".....".(EM$|
00003800: 2C 59 25 28 4D 2C 44 2C 5A 25 29 AA 31 2C 5A 25 |,Y%(M,D,Z%).1,Z%|
00003810: 29 22 9D 22 3B 3A 82 3A 99 22 1D 1D 1D 1D 11 11 |)".";:.:."......|
00003820: 11 22 3B 00 60 40 10 0E 81 44 B2 31 30 A4 31 38 |.";.`@...D.10.18|
00003830: 3A 99 22 1D 1D 1D 1D 22 CA 28 45 4D 24 2C 59 25 |:."....".(EM$,Y%|
00003840: 28 4D 2C 44 2C 5A 25 29 AA 31 2C 5A 25 29 22 9D |(M,D,Z%).1,Z%)".|
00003850: 22 3B 3A 82 3A 99 22 1D 1D 1D 1D 11 11 11 22 3B |";:.:.".......";|
00003860: 00 9D 40 1A 0E 81 44 B2 31 39 A4 32 37 3A 99 22 |..@...D.19.27:."|
00003870: 1D 1D 1D 1D 22 CA 28 45 4D 24 2C 59 25 28 4D 2C |....".(EM$,Y%(M,|
00003880: 44 2C 5A 25 29 AA 31 2C 5A 25 29 22 9D 22 3B 3A |D,Z%).1,Z%)".";:|
00003890: 82 3A 99 22 1D 1D 1D 1D 11 11 11 22 3B 00 CE 40 |.:.".......";..@|
000038A0: 24 0E 81 44 B2 32 38 A4 33 31 3A 99 22 1D 1D 1D |$..D.28.31:."...|
000038B0: 1D 22 CA 28 45 4D 24 2C 59 25 28 4D 2C 44 2C 5A |.".(EM$,Y%(M,D,Z|
000038C0: 25 29 AA 31 2C 5A 25 29 22 9D 22 3B 3A 82 00 D8 |%).1,Z%)".";:...|
000038D0: 40 2E 0E 8D 33 37 34 30 00 FC 40 38 0E 99 22 13 |@...3740..@8..".|
000038E0: 11 11 11 11 11 12 98 22 A3 32 30 AB C3 28 4D 24 |.......".20..(M$|
000038F0: 28 4D 29 29 AD 32 29 4D 24 28 4D 29 00 10 41 42 |(M)).2)M$(M)..AB|
00003900: 0E 99 22 13 11 11 11 11 11 11 11 11 11 11 22 3B |.."...........";|
00003910: 00 30 41 4C 0E A1 41 24 3A 8B 41 24 B2 22 5E 22 |.0AL..A$:.A$."^"|
00003920: B0 41 24 B2 22 51 22 A7 41 24 B2 C7 28 31 33 29 |.A$."Q".A$..(13)|
00003930: 00 64 41 56 0E 8B 41 24 B3 B1 22 1D 22 AF 41 24 |.dAV..A$..".".A$|
00003940: B3 B1 22 91 22 AF 41 24 B3 B1 22 11 22 AF 41 24 |..".".A$..".".A$|
00003950: B3 B1 22 9D 22 AF 41 24 B3 B1 C7 28 31 33 29 A7 |..".".A$...(13).|
00003960: 33 36 36 30 00 74 41 60 0E 8B 41 24 B2 C7 28 31 |3660.tA`..A$..(1|
00003970: 33 29 A7 8E 00 97 41 6A 0E 8B 41 24 B2 22 1D 22 |3)....Aj..A$."."|
00003980: B0 41 24 B2 22 91 22 A7 4D B2 4D AA 31 3A 8B 4D |.A$.".".M.M.1:.M|
00003990: B1 31 32 A7 4D B2 31 00 BA 41 74 0E 8B 41 24 B2 |.12.M.1..At..A$.|
000039A0: 22 9D 22 B0 41 24 B2 22 11 22 A7 4D B2 4D AB 31 |".".A$.".".M.M.1|
000039B0: 3A 8B 4D B3 31 A7 4D B2 31 32 00 E8 41 7E 0E 99 |:.M.1.M.12..A~..|
000039C0: 22 13 11 11 11 11 11 98 1D 1D 12 1D 1D 20 20 20 |"............ |
000039D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000039E0: 20 20 20 20 20 20 20 22 00 0B 42 88 0E 99 22 13 | "..B...".|
000039F0: 11 11 11 11 11 12 22 A3 32 30 AB C3 28 4D 24 28 |......".20..(M$(|
00003A00: 4D 29 29 AD 32 29 4D 24 28 4D 29 00 2C 42 92 0E |M)).2)M$(M).,B..|
00003A10: 97 31 39 38 2C 30 3A 99 22 13 11 11 11 11 11 11 |.198,0:.".......|
00003A20: 11 11 11 11 22 3B 3A 89 33 35 39 30 00 50 42 9C |....";:.3590.PB.|
00003A30: 0E 97 32 31 34 2C 31 39 3A 99 3A 99 22 90 1D 1D |..214,19:.:."...|
00003A40: 1D 1D 1D 1D 1D 32 39 1D 1D 33 30 1D 1D 33 31 22 |.....29..30..31"|
00003A50: 00 7F 42 A6 0E 8B 4D 4F 25 28 4D 29 B2 32 38 A7 |..B...MO%(M).28.|
00003A60: 97 32 31 34 2C 31 39 3A 99 3A 99 22 1D 1D 1D 1D |.214,19:.:."....|
00003A70: 1D 1D 1D 9B 32 39 1D 1D 33 30 1D 1D 33 31 22 00 |....29..30..31".|
00003A80: AE 42 B0 0E 8B 4D 4F 25 28 4D 29 B2 32 39 A7 97 |.B...MO%(M).29..|
00003A90: 32 31 34 2C 31 39 3A 99 3A 99 22 1D 1D 1D 1D 1D |214,19:.:.".....|
00003AA0: 1D 1D 1D 1D 1D 1D 9B 33 30 1D 1D 33 31 22 00 DD |.......30..31"..|
00003AB0: 42 BA 0E 8B 4D 4F 25 28 4D 29 B2 33 30 A7 97 32 |B...MO%(M).30..2|
00003AC0: 31 34 2C 31 39 3A 99 3A 99 22 1D 1D 1D 1D 1D 1D |14,19:.:."......|
00003AD0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 9B 33 31 22 00 EA 42 |..........31"..B|
00003AE0: C4 0E 97 36 34 36 2C 31 3A 8E 00 F6 42 CE 0E 8F |...646,1:...B...|
00003AF0: 20 45 52 52 4F 52 00 2A 43 D8 0E 8D 32 35 34 30 | ERROR.*C...2540|
00003B00: 3A 97 32 31 34 2C 31 38 3A 99 3A 99 A3 39 29 22 |:.214,18:.:..9)"|
00003B10: 12 98 45 52 52 4F 52 21 20 54 52 59 20 41 47 41 |..ERROR! TRY AGA|
00003B20: 49 4E 3F 20 28 59 2F 4E 29 22 00 48 43 E2 0E A1 |IN? (Y/N)".HC...|
00003B30: 41 24 3A 8B 41 24 B3 B1 22 59 22 AF 41 24 B3 B1 |A$:.A$.."Y".A$..|
00003B40: 22 4E 22 A7 33 38 31 30 00 58 43 EC 0E 8B 41 24 |"N".3810.XC...A$|
00003B50: B2 22 59 22 A7 35 31 30 00 5E 43 F6 0E 8A 00 00 |."Y".510.^C.....|
00003B60: 00 |. |
....... @ S 1024.N....Y%(12,31,2),P$(11)
,MO$(12),M$(12),MO%(12),DY$(7),W%(7,1).I
...SX.29.530588:.@ E 3800.~.(..53248.21,
0:Z%.1...2.. LUNAR PHASE CALENDAR NORM 5
6576 195,196.L.<..56576,195:.648,4:.5327
2,21...F.. FOR 1525/801/803 AND EPSON FX
-80 PRINTERS AND COMPATIBLES.D.P.VIC.532
48:.2040,15:.G(142)"..":.1930:.2500:.204
1,14.Y.Z..53287,3:.VI.29,3:.53275,255:.I
.960.983:.I,255:....D..I.984.1022:.I,0:.
:X$.G(13).L.N..I.896.919:.I,255:.:.I.920
.959:.I,0:.:.53288,1...X..214,16:.:..7)"
.PLEASE SELECT TYPE OF OUTPUT:.".!.....7
)".1. 1525 OR COMPATIBLE".I.....7)".2. E
PSON FX-80 OR COMPATIBLE".M.....7)".3. S
CREEN":..7)".Q. QUIT"... ..A$:.2570:.(A$
."1".A$."3").A$.."Q".160.H....A$."Q"..64
6,0:.2580:.2540:.3160:.2540:.120......64
6,0:.2580:.2540:.214,18:.:.,".. SETTI
NG UP........PR.E(A$)...H..PR.210,230.F.
R..I.0.11:P$(I).G(8):.J.1.6:.P:P$(I).P$(
I).G(P):.J:P$(I).P$(I).G(15):..O....250.
.....I.0.11:P$(I).G(27)."K".G(6).G(0)...
...J.1.6:.P:P$(I).P$(I).G(P.128):.:..X..
..I.1.12:.MO$(I):.:.3200......I.1.12:. M
O%(I):.......I.1.7:. DY$(I):..%....1380:
. REDEFINE CHARACTERS.R."..128,128,128,1
28,128,128,128,128,128,194,194,188,128,1
28,128,194,254,188...,..128,128,128,254,
254,188,128,128,188,254,254,188,128,188,
254,254,254,188...6..188,254,254,254,254
,188,188,254,254,254,188,128,188,254,254
,188,128,128.Y.@..188,254,254,128,128,12
8,188,254,194,128,128,128,188,194,194,12
8,128,128...J.."JANUARY ","FEBRUARY ","
MARCH ","APRIL ","MAY "...T..
"JUNE ","JULY ","AUGUST ","SEP
TEMBER","OCTOBER "...^.."NOVEMBER ","DE
CEMBER ".!.H..31,28,31,30,31,30,31,31,30
,31,30,31.4.R..S,M,T,W,T,F,S.Z.|.. IFXP$
="3"THENGOSUB2340:GOTO1990.....LY%.0:.25
40:.214,16:.:.".........INPUT YEAR (AFTE
R 1583)"......1290:Y.V:.Y.1583.390......
2540:.214,16:.:..10)".CALCULATING PHASES
...".$....Y.4..(Y.4).LY%.1:.(Y.100..(Y.1
00)).(Y.400...(Y.400)).LY%.0.C...MO%(2).
28:.LY%.1.MO%(2).29.O....M.1.12...B..M.1
..214,19:.:..20.C(M$(M.1)).2)"..
"...L..214,19:.:..20.C(M$(M)).2)"
.."M$(M):.M.2.490...V..D.1.MO%(M):.1150:
Y%(M,D,Z%).PH:.1030:Y%(M,D,2).DY%:.:....
...500:. PRINTOUT.E....D.1.28.LY%:.1150:
Y%(M,D,Z%).PH:.1030:Y%(M,D,2).DY%:.:..T.
...PR.3.1630..... 4:.2540:.214,18:.:..9)
"..SET UP PRINTER/ RETURN"......A$:.A$..
G(13).520.T...LN$."---------------------
-------------------".....LN$.LN$."------
---------------------------------"...&..
PR.560,580.P.0..4,4:.4,LN$:.4:.4,.26);G(
14)"LUNAR CALENDAR"G(15).Y.:..590...D..4
,4,5:.4,LN$:.4:.4,.26);G(14)"LUNAR CALEN
DAR"...N..4,G(10);.34);G(14);Y;G(10)...X
..PR.1..4,G(15);...B..4,.29);:.I.1.11:.4
,P$(I);" ";:.:.4...L..4:.4,LN$:.630:.670
.M.V..4," 0 0 0 0 0 0 0 0 0 1
1 1 1 1 1 1 1 1 1 2 2 2 2 2 2 2 2 ";.^.
...4,"2 2 3 3"......4," 1 2 3
4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 2 3
4 5 6 7 ";......4,"8 9 0 1":......ML$(1
)."+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
-+-+-+-+-+-+-+-+-+-+-+-+-+".X...ML$(2)."
+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-
+-+-+-+-+-+-+-+-+-+-+-+".....MS$(1)."+-+
-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
-+-+-+-+-+-+-+-+-+".....MS$(2)."+-+-+-+-
+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-
+-+-+-+-+-+-+".7.F.FL$(1)."+-+-+-+-+-+-+
-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
-+-+-+"...P.FL$(2)."+-+-+-+-+-+-+-+-+-+-
+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+"
.G.Z.FS$(1)."+Z+-+-+-+-+-+-+-+-+-+-+-+-+
-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+".....FS$(
2)."+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-
+-+-+-+-+-+-+-+-+-+-+".#....M.1.12:.M.2.
890.:....MO%(M).29.770,830.V....4,"
";MS$(1).N....4," ";MO$(M);" !";..
....D.1.30:.4,DY$(Y%(M,D,2));"!";:.:.4:.
4," !";.Q. ..D.1.30:.4,P$(Y%(M
,D,Z%));"!";:.:.4...*..4," ";M
S$(2)...4..880...>..4," ";ML$(
1).*.H..4," ";MO$(M);" !";.E.R..D.1.31:.
4,DY$(Y%(M,D,2));"!";:.:.4:.4,"
!";...\..D.1.31:.4,P$(Y%(M,D,Z%));"!";
:.:.4...F..4," ";ML$(2).O.P..:
.630:.4,LN$: 4:.631,32:.198,1:....Z..LY%
.1.900,960......4," ";FS$(1)..
....4," ";MO$(M);" !";.Q....D.1.28:.4,DY
$(Y%(M,D,2));"!";:.:.4:.4," !"
;.Y....D.1.28:.4,P$(Y%(M,D,Z%));"!";:.:.
4......4," ";FS$(2)......880..
....4," ";FL$(1).R.J..4," ";MO
$(M);" !";...T..D.1.29:.4,DY$(Y%(M,D,2))
;"!";:.:.4:.4," !";.5....D.1.2
9:.4,P$(Y%(M,D,Z%));"!";:.:.4.Q....4,"
";FL$(2).Z....880.D....1630....
.MD.M:YY.Y:.MD.1.MD.13:YY.YY.1:.1050....
..MD.2.MD.14:YY.YY.1.....M0.MD.2:DY%.(2.
6.M0..2).D.YY.1900..((YY.1900).4):DY%.DY
%..(19.4).2.1...$.DY%.DY%..(DY%.7).7.1..
....MD.4.MD.9.DY%.DY%.1.=.8..MD.13.MD.1:
YY.YY.1:.1110._.B..MD.14.MD.2:YY.YY.1:DY
%.DY%.1.P.L..DY%.8.DY%.1...V..(YY.2100.M
D..3).(YY.2100).DY%.DY%.1:.DY%.0.DY%.7..
.`..(YY.2200.MD..3).(YY.2200).DY%.DY%.1:
.DY%.0.DY%.7...J..(YY.2300.MD..3).(YY.23
00).DY%.DY%.1:.DY%.0.DY%.7...T...&.~.Q.Y
.(M.3).`...J..(275.M.9)..((7.Q.7).4).367
.Y.D..((.(Q.100).1).3.4).N...P.J.SX..2..
...PH.P..(P):PH..((PH.12)..5):.PH.11.PH.
0............1150.D....PH.0.PH$."NEW MOO
N":....D..PH.3.PH$."WAXING CRESCENT":...
.N..PH.3.PH$."FIRST QUARTER":..'.X..PH.6
.PH$."WAXING GIBBOUS":..C....PH.6.PH$."F
ULL MOON":..D....PH.9.PH$."WANING GIBBOU
S":.......PH.9.PH$."LAST QUARTER":......
PH$."WANING CRESCENT":..M...XX$.". .< ..
":B$."":FG.0:."..........>.";......A$:.A
$."".1300......A$.G(13).." .";A$;:.1370.
6.(..A$.G(20).B$.."".B$.H(B$,C(B$).1):.X
X$;:FG.0:.1300.E.2..FG.1.1300.Q.<..A$."0
".A$."9".1300:. LIMIT TO NUMERICS...F..A
$">.";:B$.B$.A$:.C(B$).4.FG.1. .P.. 1300
...Z.V.E(B$):L.C(B$):..P.D..I.828.878:.A
:.I,A:.I...N..56334,B(56334).254...X..1,
B(1).251./....249,0:.250,208:.251,0:.252
,192:.253,0:.254,8:.828.O....1,B(1).4:.5
6334,B(56334).1.^....A:.A..1..... .K.491
52.(8.A):.I.0.7:.B:.K.I,B:.K.1024.I,255.
B:.I:.1430......56576,4:.53272,32:.648,2
00............ 165,254,201,000,240,024,
160,000,177,249,145,251,200,192,255,208,
247.V.H.. 177,249,145,251,230,250,230,2
52,198,254,076,060,003,165,253,201,000..
.R.. 240,013,230,253,160,000,177,249,14
5,251,200,196,253,208,247,096,000.J....0
96,000,000,000,000,000,000,000,000......
097,000,012,002,002,002,002,012,000.....
.098,000,012,006,006,006,006,012,000.E..
..099,000,012,014,014,014,014,012,000.N.
...100,000,012,030,030,030,030,012,000..
....101,000,028,062,062,062,062,028,000.
.....102,000,060,126,126,126,126,060,000
..."..103,000,056,124,124,124,124,056,00
0.. ,..104,000,048,120,120,120,120,048,0
00.; 6..105,000,048,112,112,112,112,048,
000.D @..106,000,048,096,096,096,096,048
,000.. J..107,000,048,064,064,064,064,04
8,000.. T..-1.. ^..53248.21,0: .2590:.CT
$."E".2190.D H..1450.. R.EM$."":.I.160.1
71:EM$.EM$.G(I):.:.3330..!|..56576,195:.
648,4:.53272,21./!...2040:.1940:.2540:.2
14,16:..B!...,"..OPTIONS:".C!...,".F1 TR
ANSLATE TO ENGLISH"..!...,".F3 VIEW ANOT
HER YEAR". !...,".F5 RETURN TO CALENDAR"
..!...,".F7 EXIT PROGRAM"..!B..A$:.A$.."
.".A$..".".A$..".".A$..".".1730..!L..A$.
".".2190.."V..A$."."...."...A$.".".1630.
("...A$.".".1780.U"...
.M"... MAJOR SUBROU
TINES.."... 1150:. PHASE CALC. "... 1200
:. NAME OF PHASE.."... 1290:. INPUT ROUT
INE.."&.. 1380:. REDEFINE CHARACTERS.."0
.. 1630:. SCREEN OUTPUT..#:.. 510:. PRIN
TER OUTPUT.*#D.. 2190:. MONTH MENU.A#N..
2540:. CLEAR BOX.Z#X..15,8,15,"R0:HELLO
CONNECT=HELLO CONNECT":.15,ER: 15..#B..
53269,0:. ER..63 . .".":...#L.A$."HELLO
CONNECT":Q$.G(34).T#V..".....LOAD"Q$A$Q$
",8"..#..."....RUN.":.631,13:.632,13:.19
8,2:...$...2040.B$...214,14:.:." ......
.................................".Z$...
I.1.3:." .
":...$..." . PUBLISHED ON L
OADSTAR #58 ".X$..." . SUBSCRIPT
IONS 1-800-831-2694 "..%..." . CHA
NGING THIS NOTICE IS ILLEGAL ".6%F.."
. ".G
%P.." .................................
......". %Z.AU$."LUNAR CALENDAR":.214,16
:.:..20.C(AU$).2)".."AU$.Q%..AU$."BY TON
Y HERRINGTON (C) 1989":.214,17:...%....
20.C(AU$).2)".."AU$".":...&...".":.53281
,0:.53280,11.8&..." .. .LOADSTAR .PR
OUDLY .PRESENTS".J&..." ..
.. .."..&..." ..
.``. . . ... .`. .`. .. .".D& .."
. .} } } }}} .`. }.. .."..&*
.." ..`. .`. ... . ......```"..'
4.." .`. .`. . .`. ... .`I .`. .`.
.".G'>.." ...} .`. } .. }}} } } .
`. }..".U'H.." .`..... . .`. .`. ... .
`K . . ..```"..'R.." ..
.. .. ..".P'\.." .. .(C
) 1989 TONY HERRINGTON"..(F.."
.. .. .. .. .. .. ..".6(P.
." .. .. .. . ..
..".H(Z.." ..........................
..............."..(..." . ..............
........................ ":...(...".";:V
I.53248:X$.G(13).P(...I.960.983:.I,255:.
..(...I.984.1022:.I,0:...)...I.896.919:.
I,255:.:.I.920.959:.I,0:..1)...56576,195
:.648,4:.53272,21.D)...".. ... ......
........................ "..)J.." ...
".D)T
.." .. JANUARY FEBRUARY MARCH
"..)..." . APRIL MAY
JUNE ".$*..." . JULY AUGUS
T SEPTEMBER ".U*..." . OCTOBER
NOVEMBER DECEMBER .."..*..." .
.."..*
..." .. ............................
.. .."..*..." ........................
............."..+..." .. P R O M
P T B A R ".G+$.." ...
..".X+..."
.. .."
..+8.." ...............................
....."..+B.." .. .. .. .. ..
.. .. .. .. .."..,L.." . .. .. ..
.. .. .. .... . .. .... ..".K
,V.." . .. .. .. .. ....
.. .. ..".~,`.." .... .. ..
.. .. .. .. .."..,J.." . .. .
. .. .. .. .. .. .. . .. .. .."..
,T.." .................................
...."..-~.." ... O U T P U T B
A R ".G-..." ..
".Y-..." ...
.."..-..."
....................................."
..-..." . .. .... .. .. .. .. ..
.. .. .. .. .. .."......" . .... .
. . .. .. .. .. . ...";.+...
.".";:.2710.O.D..646,B(646).1:.B(646).15
..646,2.U.N..214,23:.:..12)"PRESS SPACE
BAR."...X..A$:.A$.." ".2500......646,0:.
214,23:.:..12)"PRESS SPACE BAR.".P....21
4,15:.".":.I.1.7../..."...
..";:..;/...".....
............
":.._/...646,B(646).1:.B(646).15..646,2.
./...214,23:.:..10)"PLEASE SELECT OUTPUT
.":.../...56576,195:.648,4:.53272,21../(
..2540:.214,18:.:..3)"..DISPLAY GRAPHIC
OR ENGLISH? (G/E)..02..CT$:.2630:.CT$.."
G".CT$.."E".2610.)0<..2540:.646,0:.2640:
..M0F..646,B(646).1:.B(646).15..646,2..0
P..214,23:.:..2)"PLEASE SELECT TYPE OF S
CREEN DISPLAY.":...0Z..******** PROMPT B
AR********..0D..214,9:.:."....
.."..1N..214,9
:.:.199,1:.".".20.C(PM$).2)PM$:PM$."":..
81X..******** OUTPUT BAR********.T1...21
4,19:.:."....
.."..1...214,19:.:.199,1:.".".2
0.C(OP$).2)OP$:OP$."":...1... MENU GET R
OUTINE..1 ..VI.21,3:.VI.1,66:.VI.3,66:.5
3277,3:.VI,23.24:.VI.2,95.52...VI.40,7:.
VI.39,7:.2850:PM$."Q OR ^ TO EXIT":.2650
:MU.1.^2...A$:.2980:.2980:.3250:.A$."^".
A$."Q"..2...A$..".".A$..".".A$.."Q".A$..
X$.A$..".".A$..".".2740..2H..A$.".".MU.M
U.1:.MU.13.MU.1..2R..A$.".".MU.MU.1:.298
0:.MU.1.MU.12..3...A$.".".MU.MU.3:.2980:
.MU.1.MU.12.)3...A$.".".MU.MU.3:.2980:.M
U.12.MU.1.^3...A$.X$..53287,7:.53288,7:.
3000:.2650:.2680:.2740..3...A$."Q".PM$."
QUIT THIS MENU? (Y/N)":.2650:.3090..3...
VI.21,0..3...MU.2850,2860,2870,2880,2890
,2900,2910,2920,2930,2940,2950,2960..3..
.VI.21,3:.2740.'4"..VI.16,0:.VI,47:.VI.2
,95:.VI.1,66:.VI.3,66:..Z4,..VI,136:.VI.
2,184:.VI.16,0:.VI.1,66:.VI.3,66:...46..
VI,240:.VI.2,24:.VI.16,2:.VI.1,66:.VI.3,
66:...4@..VI.16,0:.VI,47:.VI.2,95:.VI.1,
74:.VI.3,74:...4J..VI,136:.VI.2,184:.VI.
16,0:.VI.1,74:.VI.3,74:.."5T..VI,240:.VI
.2,24:.VI.16,2:.VI.1,74:.VI.3,74:..S5^..
VI.16,0:.VI,47:.VI.2,95:.VI.1,82:.VI.3,8
2:...5H..VI,136:.VI.2,184:.VI.16,0:.VI.1
,82:.VI.3,82:...5R..VI,240:.VI.2,24:.VI.
16,2:.VI.1,82:.VI.3,82:...5|..VI.16,0:.V
I,47:.VI.2,95:.VI.1,90:.VI.3,90:...6...V
I,136:.VI.2,184:.VI.16,0:.VI.1,90:.VI.3,
90:..N6...VI,240:.VI.2,24:.VI.16,2:.VI.1
,90:.VI.3,90:..I6...*******SPARKLE******
*..6....(TI).199.55816,.(TI).13.2..6....
(TI).40.56216,.(TI).13.2:..F6...****MONT
H SELECTED****..7B.PM$."CURSOR KEYS TO S
CAN MONTH/^ TO EXIT":.2650:M.MU:D.1
.>7L..1200:OP$.M$(M).D(D).",".D(Y).
": ".PH$:.2680.R7V..A$:.2980:.2980..7...
A$..".".A$..".".A$.."^".A$..X$.A$..".".A
$..".".3030..7...A$.".".A$.".".D.D.1:.D.
MO%(M).D.1.Y7...A$.".".A$.".".D.D.1:.D.1
.D.MO%(M)..7...A$."^"....8...1200:OP$.M$
(M).D(D).",".D(Y).": ".PH$:.2680:.3030.>
8...******* SELECT YEAR*******.\8...A$:.
A$.."Y".A$.."N".3100.X8&.PM$." ":.2650:.
A$."N"....80.PM$."QUIT OR GO TO GRAPHIC
CALENDAR (Q/C)":.2650.S8:..A$:.A$.."Q".A
$.."G".A$.."C".3130..8D..A$."C".A$."G".1
640..8N..1880.,9X..2540:.214,18:.:..7)".
.QUIT? ARE YOU SURE? (Y/N)".J9B..A$:.A$
.."Y".A$.."N".3170.X9L..A$."N"...B9V..18
80.Z9...****FIX MONTHS****..9...I.1.12..
9..M$(I)."":.II.1.C(MO$(I)).R9..A$.J(MO$
(I),II,Z%):.A$.." ".M$(I).M$(I).A$..9...
:.:...9..CC%.CC%.1:.CC%.2....9..CC%.0.':
F.CS%.CS%.1:.CS%.4.CS%.1:. SPRITE COLOR.
A:P..CS%.3290,3300,3320:..Y:Z..53287,0:.
53288,0:..S:...53287,11:.53288,11:...:..
.53287,12:.53288,11:...:...53287,15:.532
88,15:...:...53280,12:.53281,15:.".. ...
.......... ............".);
..." ........ ......
...":.VI..VI.21,0.X;..." ````````````
````````````"..; .." .
"..;*.."
. ......................................
"..;4.." . .
. "..<>.." . .
. ".P<H.." . .````.``
`.```.```.```.```.```.```.```. "..<R.."
. ..1 .}.2 .}.3 .}.4 .}.5 .}.6 .}
.7 .}.8 .}.9 .. ".F<\.." . . } }
} } } } } } . "..<F.." .
. } } } } } } } } . "
.*=P.." . .````{```{```{```{```{```{```{
```{```. ".N=Z.." . ..10 .}.11 .}.12 .}
.13 .}.14 .}.15 .}.16 .}.17 .}.18 .. ".
=..." . . } } } } } } }
} . ".R=..." . . } } } } }
} } } . "..>..." . .````{```{``
`{```{```{```{```{```{```. ".H>..." . ..
19 .}.20 .}.21 .}.22 .}.23 .}.24 .}.25
.}.26 .}.27 .. ".Z>..." . . } } }
} } } } } . "..>..." . .
} } } } } } } } . "..>.
.." . .````{```{```{```{```.```.```.```.
```. "..?J.." . ..28 ...29 ...30 ...31
... CURSOR TO PAGE . . ".N?T.." . .
. . . .. RETURN TO EXIT . . "..
?..." . . } } } }..............
...... . "..?..." ......................
................":M.1:.3740.N?..."...".1
7)Y"."..?..."............";:D.0.#@...D.1
.9:."....."J(EM$,Y%(M,D,Z%).1,Z%)".";:.:
.".......";.`@...D.10.18:."...."J(EM$,Y%
(M,D,Z%).1,Z%)".";:.:.".......";..@...D.
19.27:."...."J(EM$,Y%(M,D,Z%).1,Z%)".";:
.:.".......";.N@$..D.28.31:."...."J(EM$,
Y%(M,D,Z%).1,Z%)".";:..X@...3740..@8..".
.......".20.C(M$(M)).2)M$(M)..AB..".....
......";.0AL..A$:.A$."^".A$."Q".A$.G(13)
.DAV..A$..".".A$..".".A$..".".A$..".".A$
..G(13).3660.TA`..A$.G(13)....AJ..A$."."
.A$.".".M.M.1:.M.12.M.1..AT..A$.".".A$."
.".M.M.1:.M.1.M.12..A~.."............
"..B...".......".
20.C(M$(M)).2)M$(M).,B...198,0:.".......
....";:.3590.PB...214,19:.:."........29.
.30..31".B...MO%(M).28..214,19:.:."....
....29..30..31"..B...MO%(M).29..214,19:.
:."............30..31"..B...MO%(M).30..2
14,19:.:."................31"..BD..646,1
:...BN.. ERROR.*CX..2540:.214,18:.:..9)"
..ERROR! TRY AGAIN? (Y/N)".HC...A$:.A$..
"Y".A$.."N".3810.XC...A$."Y".510.^C.....
.
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL