SCREEN
FILE INFORMATION
FILENAME(S): SCREEN
FILE TYPE(S): PRG
FILE SIZE: 19.8K
FIRST SEEN: 2025-11-30 16:18:11
APPEARS ON: 1 disk(s)
FILE HASH
d11c99757636f9a0325030d209b6864af23449259b8c55e05550bba15f041d87
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| T 1 | SCREEN | PRG | BrainSkull, Leopold Zyka | 26 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0B 08 00 00 9E 32 30 37 33 00 00 00 20 52 |.......2073... R|
00000010: 08 4C 45 B7 20 52 08 4C 99 A4 20 52 08 AD FF 02 |.LE. R.L.. R....|
00000020: C9 64 F0 17 A9 3F 85 BB A9 08 85 BC A9 06 85 B7 |.d...?..........|
00000030: A9 00 85 B9 A2 00 A0 A0 20 D5 FF 68 68 4C 48 A0 |........ ..hhLH.|
00000040: 52 54 4C 2D 36 34 20 52 08 20 71 AF 20 5F 08 60 |RTL-64 R. q. _.`|
00000050: A2 01 60 A9 03 05 00 85 00 A9 FE 25 01 85 01 60 |..`........%...`|
00000060: 48 A9 03 05 00 85 00 A5 01 09 01 85 01 68 60 20 |H............h` |
00000070: 5F 08 20 47 A3 20 52 08 60 40 00 02 87 00 4D 02 |_. G. R.`@....M.|
00000080: 5A 02 00 00 5C 57 00 01 00 83 31 36 39 2C 34 2C |Z...\W....169,4,|
00000090: 31 37 30 2C 31 36 30 2C 37 2C 33 32 2C 31 38 36 |170,160,7,32,186|
000000A0: 2C 32 35 35 2C 31 36 39 2C 30 2C 33 32 2C 31 38 |,255,169,0,32,18|
000000B0: 39 2C 32 35 35 2C 33 32 2C 31 39 32 2C 32 35 35 |9,255,32,192,255|
000000C0: 2C 31 36 32 2C 34 2C 33 32 2C 32 30 31 2C 32 35 |,162,4,32,201,25|
000000D0: 35 2C 31 36 39 2C 30 2C 31 33 33 2C 32 35 31 2C |5,169,0,133,251,|
000000E0: 31 33 33 2C 32 35 33 2C 31 36 39 2C 34 2C 31 33 |133,253,169,4,13|
000000F0: 33 2C 32 35 32 2C 31 36 30 2C 30 2C 31 37 37 2C |3,252,160,0,177,|
00000100: 32 35 31 2C 32 30 31 2C 39 36 2C 32 30 38 2C 35 |251,201,96,208,5|
00000110: 2C 31 36 39 2C 33 32 2C 37 36 2C 31 34 33 2C 33 |,169,32,76,143,3|
00000120: 2C 31 36 39 2C 36 34 2C 35 36 2C 32 34 31 2C 32 |,169,64,56,241,2|
00000130: 35 31 2C 34 31 2C 33 32 2C 31 30 2C 31 34 31 2C |51,41,32,10,141,|
00000140: 32 35 31 2C 33 2C 31 37 37 2C 32 35 31 2C 34 31 |251,3,177,251,41|
00000150: 2C 36 34 2C 31 30 2C 31 33 2C 32 35 31 2C 33 2C |,64,10,13,251,3,|
00000160: 31 34 31 2C 32 35 31 2C 33 2C 31 37 37 2C 32 35 |141,251,3,177,25|
00000170: 31 2C 34 31 2C 31 32 37 2C 31 33 2C 32 35 31 2C |1,41,127,13,251,|
00000180: 33 2C 32 30 38 2C 32 2C 31 36 39 2C 36 34 2C 32 |3,208,2,169,64,2|
00000190: 30 31 2C 39 36 2C 32 30 38 2C 32 2C 31 36 39 2C |01,96,208,2,169,|
000001A0: 33 32 2C 33 32 2C 32 31 30 2C 32 35 35 2C 32 33 |32,32,210,255,23|
000001B0: 30 2C 32 35 33 2C 31 36 39 2C 34 30 2C 35 36 2C |0,253,169,40,56,|
000001C0: 32 32 39 2C 32 35 33 2C 32 30 38 2C 37 2C 31 33 |229,253,208,7,13|
000001D0: 33 2C 32 35 33 2C 31 36 39 2C 31 33 2C 33 32 2C |3,253,169,13,32,|
000001E0: 32 31 30 2C 32 35 35 2C 31 36 39 2C 31 31 31 2C |210,255,169,111,|
000001F0: 31 39 37 2C 32 35 31 2C 32 30 38 2C 36 2C 31 36 |197,251,208,6,16|
00000200: 39 2C 37 2C 31 39 37 2C 32 35 32 2C 32 34 30 2C |9,7,197,252,240,|
00000210: 31 36 2C 32 34 2C 31 36 35 2C 32 35 31 2C 31 30 |16,24,165,251,10|
00000220: 35 2C 31 2C 31 33 33 2C 32 35 31 2C 31 36 35 2C |5,1,133,251,165,|
00000230: 32 35 32 2C 31 30 35 2C 30 2C 31 33 33 2C 32 35 |252,105,0,133,25|
00000240: 32 2C 37 36 2C 39 31 2C 33 2C 39 36 00 00 00 54 |2,76,91,3,96...T|
00000250: 5B 09 56 4C 2D 53 43 52 45 45 4E 57 8D 03 C5 80 |[.VL-SCREENW....|
00000260: 50 8A 1A 13 11 11 11 11 11 11 11 11 11 11 11 11 |P...............|
00000270: 11 11 11 11 11 11 11 11 11 11 11 11 11 D2 02 8A |................|
00000280: 1A 39 39 39 39 39 39 39 39 39 39 39 39 39 39 39 |.999999999999999|
00000290: 39 39 39 39 39 39 39 39 39 39 39 D2 09 00 86 58 |99999999999....X|
000002A0: 25 28 31 30 30 29 3A 41 00 04 00 86 59 25 28 31 |%(100):A....Y%(1|
000002B0: 30 30 29 3A 41 00 06 00 86 50 24 28 31 30 30 29 |00):A....P$(100)|
000002C0: 3A 41 00 08 00 86 4C 25 28 31 30 30 29 3A 41 00 |:A....L%(100):A.|
000002D0: 0A 00 86 54 59 24 28 31 30 30 29 3A 41 00 0C 00 |...TY$(100):A...|
000002E0: 86 54 24 28 31 30 30 29 3A 41 00 0E 8A 00 D2 10 |.T$(100):A......|
000002F0: 8A 00 D2 17 81 D0 1E 89 27 42 00 1E 92 10 8A 01 |........'B......|
00000300: 20 01 D2 10 92 17 8A 01 2E 01 D2 17 46 8D 03 C6 | ...........F...|
00000310: B8 0E 89 64 2B 4F 05 48 F4 21 8D 03 C6 B8 0E 89 |...d+O.H.!......|
00000320: 60 2B 4F 10 80 D0 25 8D 03 C6 80 50 4A B0 2C 48 |`+O...%....PJ.,H|
00000330: F2 09 8D 03 C8 80 50 8D 03 C9 80 50 00 99 C7 28 |......P....P...(|
00000340: 31 34 29 3B C7 28 38 29 22 93 22 3A 88 90 50 20 |14);.(8)".":..P |
00000350: 00 00 86 50 88 90 50 21 00 00 89 0C 50 8D 02 86 |...P..P!....P...|
00000360: 80 50 8D 03 E8 B8 0E 89 FF 2B 4F 05 48 F4 33 00 |.P.......+O.H.3.|
00000370: 99 C8 28 59 24 2C 31 31 29 3B A3 39 29 3B 22 D4 |..(Y$,11);.9);".|
00000380: 59 50 45 20 12 4C 4F 41 44 22 3B C7 28 33 34 29 |YPE .LOAD";.(34)|
00000390: 3B 22 4E 45 57 4D 45 4E 55 22 3B C7 28 33 34 29 |;"NEWMENU";.(34)|
000003A0: 3B 22 2C 38 92 22 00 99 22 11 20 20 20 20 20 20 |;",8."..". |
000003B0: 20 20 20 20 20 20 20 D4 48 45 4E 20 54 59 50 45 | .HEN TYPE|
000003C0: 20 12 52 55 4E 92 22 3A 49 5E 03 00 80 3A 4A B3 | .RUN.":I^...:J.|
000003D0: D2 00 99 22 93 22 3A 88 90 54 04 00 00 80 50 4A |...".":..T....PJ|
000003E0: B0 2C 4A B3 26 00 99 22 93 22 00 99 A3 35 29 3B |.,J.&.."."...5);|
000003F0: 22 11 12 20 C3 4F 44 45 D7 52 49 54 45 52 20 D3 |".. .ODE.RITER .|
00000400: 59 53 54 45 4D 20 CD 41 49 4E 20 CD 45 4E 55 20 |YSTEM .AIN .ENU |
00000410: 92 22 00 99 A3 31 29 3B 22 11 11 11 D9 4F 55 20 |."...1);"....OU |
00000420: 48 41 56 45 20 54 48 45 20 46 4F 4C 4C 4F 57 49 |HAVE THE FOLLOWI|
00000430: 4E 47 20 4F 50 54 49 4F 4E 53 3A 22 00 99 A3 34 |NG OPTIONS:"...4|
00000440: 29 3B 22 11 44 2E 2E 2E 2E 2E C3 52 45 41 54 45 |);".D......REATE|
00000450: 20 41 20 44 41 54 41 20 45 4E 54 52 59 20 53 59 | A DATA ENTRY SY|
00000460: 53 54 45 4D 22 00 99 A3 34 29 3B 22 11 46 2E 2E |STEM"...4);".F..|
00000470: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |................|
00000480: C6 4F 52 4D 41 54 20 41 20 44 49 53 4B 22 00 99 |.ORMAT A DISK"..|
00000490: A3 34 29 3B 22 11 53 2E 2E 2E 2E 2E 2E 2E 2E 2E |.4);".S.........|
000004A0: 2E 2E 2E 2E D3 45 54 20 C4 49 53 50 4C 41 59 20 |.....ET .ISPLAY |
000004B0: 43 4F 4C 4F 52 53 22 00 99 A3 34 29 3B 22 11 55 |COLORS"...4);".U|
000004C0: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E D6 49 45 57 |.............IEW|
000004D0: 20 54 48 45 20 55 53 45 52 20 4E 4F 54 45 53 22 | THE USER NOTES"|
000004E0: 00 99 A3 34 29 3B 22 11 54 2E 2E 2E 2E 2E 2E 2E |...4);".T.......|
000004F0: D6 49 45 57 20 54 48 45 20 C4 49 53 4B 20 C9 20 |.IEW THE .ISK . |
00000500: 54 55 54 4F 52 49 41 4C 22 00 99 A3 34 29 3B 22 |TUTORIAL"...4);"|
00000510: 11 56 2E 2E 2E 2E 2E 2E D6 49 45 57 20 54 48 45 |.V.......IEW THE|
00000520: 20 C4 49 53 4B 20 C9 C9 20 54 55 54 4F 52 49 41 | .ISK .. TUTORIA|
00000530: 4C 22 00 99 A3 34 29 3B 22 11 58 2E 2E 2E 2E 2E |L"...4);".X.....|
00000540: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E C5 58 49 |..............XI|
00000550: 54 20 54 4F 20 C2 C1 D3 C9 C3 22 00 99 22 11 C5 |T TO .....".."..|
00000560: 4E 54 45 52 20 59 4F 55 52 20 43 48 4F 49 43 45 |NTER YOUR CHOICE|
00000570: 20 54 48 45 4E 20 50 52 45 53 53 20 12 D2 C5 D4 | THEN PRESS ....|
00000580: D5 D2 CE 92 20 12 20 92 22 3A 89 24 D1 2C 89 17 |.... . .":.$.,..|
00000590: D1 33 81 D1 3A 4A B6 EA 92 48 D2 41 92 41 8A 01 |.3..:J...H.A.A..|
000005A0: 44 2B 4F 05 48 F2 09 92 41 8A 01 53 2B 4F 05 48 |D+O.H...A..S+O.H|
000005B0: EF 68 92 41 8A 01 46 2B 4F 08 4A E8 0F 48 F4 1B |.h.A..F+O.J..H..|
000005C0: 92 41 8A 01 55 2B 4F 05 48 B0 FA 92 41 8A 01 54 |.A..U+O.H...A..T|
000005D0: 2B 4F 05 48 EF F8 92 41 8A 01 56 2B 4F 05 48 EF |+O.H...A..V+O.H.|
000005E0: B0 92 41 8A 01 58 2E 4F 05 48 F4 1B 00 99 C7 28 |..A..X.O.H.....(|
000005F0: 39 29 3A 5E 03 00 80 00 99 22 93 11 11 22 A3 35 |9):^....."...".5|
00000600: 29 3B 22 12 20 C3 52 45 41 54 45 20 41 20 C4 41 |);". .REATE A .A|
00000610: 54 41 20 C5 4E 54 52 59 20 D3 59 53 54 45 4D 20 |TA .NTRY .YSTEM |
00000620: 92 22 00 99 A3 32 29 3B 22 11 D9 4F 55 20 48 41 |."...2);"..OU HA|
00000630: 56 45 20 54 48 45 20 46 4F 4C 4C 4F 57 49 4E 47 |VE THE FOLLOWING|
00000640: 20 4F 50 54 49 4F 4E 53 3A 22 00 99 A3 34 29 3B | OPTIONS:"...4);|
00000650: 22 11 53 2E 2E 2E 2E 2E 2E 2E 2E 2E C3 52 45 41 |".S..........REA|
00000660: 54 45 20 41 20 53 43 52 45 45 4E 20 4C 41 59 4F |TE A SCREEN LAYO|
00000670: 55 54 22 00 99 A3 34 29 3B 22 11 41 2E 2E 2E 2E |UT"...4);".A....|
00000680: 2E 2E 2E 2E 2E 2E C3 52 45 41 54 45 20 41 4E 20 |.......REATE AN |
00000690: 41 50 50 4C 49 43 41 54 49 4F 4E 22 00 99 A3 34 |APPLICATION"...4|
000006A0: 29 3B 22 11 58 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |);".X...........|
000006B0: 2E D2 45 54 55 52 4E 20 54 4F 20 4D 41 49 4E 20 |..ETURN TO MAIN |
000006C0: 4D 45 4E 55 22 00 99 22 11 11 11 22 00 99 22 D4 |MENU".."..."..".|
000006D0: 4F 20 43 52 45 41 54 45 20 41 4E 20 41 50 50 4C |O CREATE AN APPL|
000006E0: 49 43 41 54 49 4F 4E 20 5B 53 45 4C 45 43 54 49 |ICATION [SELECTI|
000006F0: 4F 4E 20 12 41 92 5D 20 20 59 4F 55 20 4D 55 53 |ON .A.] YOU MUS|
00000700: 54 20 41 4C 52 45 41 44 59 20 48 41 56 45 20 22 |T ALREADY HAVE "|
00000710: 3B 00 99 22 43 52 45 41 54 45 44 20 41 20 53 43 |;.."CREATED A SC|
00000720: 52 45 45 4E 20 20 46 4F 52 4D 41 54 20 46 49 4C |REEN FORMAT FIL|
00000730: 45 20 57 49 54 48 20 53 45 4C 45 43 54 49 4F 4E |E WITH SELECTION|
00000740: 20 27 53 27 2E 22 00 99 22 11 C5 4E 54 45 52 20 | 'S'.".."..NTER |
00000750: 59 4F 55 52 20 43 48 4F 49 43 45 20 54 48 45 4E |YOUR CHOICE THEN|
00000760: 20 50 52 45 53 53 20 12 D2 C5 D4 D5 D2 CE 92 20 | PRESS ........ |
00000770: 12 20 92 22 3A 89 24 D1 2C 89 14 D1 33 81 D1 3A |. .":.$.,...3..:|
00000780: 4A B6 EA 92 48 D2 41 92 41 8A 01 53 2E 4F 05 48 |J...H.A.A..S.O.H|
00000790: F0 6B 48 ED A7 92 41 8A 01 41 2E 4F 05 48 F0 07 |.kH...A..A.O.H..|
000007A0: 8D 03 C5 B8 0E 80 2B 4F 0A 8A 01 41 D2 4F 48 ED |......+O...A.OH.|
000007B0: A7 4A E3 DD 4A B3 26 00 99 22 93 11 11 11 11 11 |.J..J.&.."......|
000007C0: 11 11 11 11 22 3B A3 34 29 22 D0 52 4F 47 52 41 |....";.4)".ROGRA|
000007D0: 4D 20 4C 4F 41 44 49 4E 47 2E 20 20 D0 4C 45 41 |M LOADING. .LEA|
000007E0: 53 45 20 57 41 49 54 2E 2E 2E 2E 22 00 93 22 43 |SE WAIT....".."C|
000007F0: 4F 44 45 47 45 4E 22 2C 38 3A 92 41 8A 01 58 2B |ODEGEN",8:.A..X+|
00000800: 4F 05 48 F4 1B 48 F2 09 4A E3 DD 00 99 22 93 11 |O.H..H..J...."..|
00000810: 11 11 11 11 11 11 11 11 22 3B A3 34 29 22 D0 52 |........";.4)".R|
00000820: 4F 47 52 41 4D 20 4C 4F 41 44 49 4E 47 2E 20 20 |OGRAM LOADING. |
00000830: D0 4C 45 41 53 45 20 57 41 49 54 2E 2E 2E 22 3A |.LEASE WAIT...":|
00000840: 8A 09 54 55 54 4F 52 49 41 4C 31 D2 56 48 B2 A9 |..TUTORIAL1.VH..|
00000850: 4A E3 DD 00 99 22 93 11 11 11 11 11 11 11 11 11 |J...."..........|
00000860: 22 3B A3 34 29 22 D0 52 4F 47 52 41 4D 20 4C 4F |";.4)".ROGRAM LO|
00000870: 41 44 49 4E 47 2E 20 20 D0 4C 45 41 53 45 20 57 |ADING. .LEASE W|
00000880: 41 49 54 2E 2E 2E 22 3A 8A 09 54 55 54 4F 52 49 |AIT...":..TUTORI|
00000890: 41 4C 32 D2 56 48 B2 A9 80 D0 5D 80 D0 64 81 D0 |AL2.VH....]..d..|
000008A0: 6B 8A 10 90 05 1C 9F 9C 1E 1F 9E 81 95 96 97 98 |k...............|
000008B0: 99 9A 9B D2 72 00 99 22 93 22 A3 31 33 29 22 D3 |....r..".".13)".|
000008C0: 45 54 20 C3 4F 4C 4F 52 20 CD 4F 44 45 22 00 99 |ET .OLOR .ODE"..|
000008D0: A3 35 29 22 11 11 5B 46 31 5D 20 53 45 54 53 20 |.5)"..[F1] SETS |
000008E0: 53 43 52 45 45 4E 20 43 4F 4C 4F 52 22 00 99 A3 |SCREEN COLOR"...|
000008F0: 35 29 22 11 5B 46 33 5D 20 53 45 54 53 20 42 4F |5)".[F3] SETS BO|
00000900: 52 44 45 52 20 43 4F 4C 4F 52 22 00 99 A3 35 29 |RDER COLOR"...5)|
00000910: 22 11 5B 46 35 5D 20 53 45 54 53 20 54 45 58 54 |".[F5] SETS TEXT|
00000920: 20 43 4F 4C 4F 52 22 00 99 A3 35 29 22 11 5B 46 | COLOR"...5)".[F|
00000930: 37 5D 20 52 45 54 55 52 4E 53 20 59 4F 55 20 54 |7] RETURNS YOU T|
00000940: 4F 20 4D 41 49 4E 20 4D 45 4E 55 22 3A 4A EE 14 |O MAIN MENU":J..|
00000950: 00 A1 41 41 24 3A 92 41 8A 00 2B 4F 05 48 EE B0 |..AA$:.A..+O.H..|
00000960: 92 41 89 85 B8 13 2B 4F 05 48 EE 6D 92 41 89 86 |.A....+O.H.m.A..|
00000970: B8 13 2B 4F 05 48 EE 51 92 41 89 87 B8 13 2B 4F |..+O.H.Q.A....+O|
00000980: 05 48 EE 35 92 41 89 88 B8 13 2B 4F 05 48 F4 1B |.H.5.A....+O.H..|
00000990: 48 EE B0 90 5D 81 01 D0 5D 90 5D 89 0F 2A 4F 05 |H...]...].]..*O.|
000009A0: 80 D0 5D 88 90 50 21 00 00 90 5D 50 48 EF 4B 90 |..]..P!...]PH.K.|
000009B0: 64 81 01 D0 64 90 64 89 0F 2A 4F 05 80 D0 64 88 |d...d.d..*O...d.|
000009C0: 90 50 20 00 00 90 64 50 48 EF 4B 90 6B 81 01 D0 |.P ...dPH.K.k...|
000009D0: 6B 90 6B 89 11 2A 4F 05 81 D0 6B 00 99 CA 28 43 |k.k..*O...k...(C|
000009E0: 4F 24 2C 43 33 2C 31 29 3A 48 EF 4B 00 99 00 99 |O$,C3,1):H.K....|
000009F0: A3 35 29 22 D4 48 49 53 20 4F 50 54 49 4F 4E 20 |.5)".HIS OPTION |
00000A00: 53 59 53 54 45 4D 20 49 53 20 41 4C 53 4F 20 20 |SYSTEM IS ALSO |
00000A10: 20 20 20 20 22 3B 00 99 22 20 20 20 20 20 20 20 | ";.." |
00000A20: 20 50 52 45 53 45 4E 54 20 49 4E 20 59 4F 55 52 | PRESENT IN YOUR|
00000A30: 20 41 50 50 4C 49 43 41 54 49 4F 4E 20 20 20 20 | APPLICATION |
00000A40: 20 20 20 20 20 22 3B 00 99 22 20 20 20 20 50 52 | ";.." PR|
00000A50: 4F 47 52 41 4D 2E 22 3A 4C 00 99 22 93 11 20 20 |OGRAM.":L..".. |
00000A60: 20 20 20 20 20 20 20 12 2A 2A 2A 20 C9 CD D0 CF | .*** ....|
00000A70: D2 D4 C1 CE D4 A0 CE CF D4 C5 20 2A 2A 2A 92 22 |.......... ***."|
00000A80: 00 99 22 11 20 20 20 C3 4F 44 45 D7 52 49 54 45 |..". .ODE.RITE|
00000A90: 52 20 41 4C 4C 4F 57 53 20 59 4F 55 20 54 48 45 |R ALLOWS YOU THE|
00000AA0: 20 4F 50 54 49 4F 4E 20 4F 46 20 20 20 44 45 53 | OPTION OF DES|
00000AB0: 49 47 4E 49 4E 47 20 59 4F 55 52 20 44 41 54 41 |IGNING YOUR DATA|
00000AC0: 20 45 4E 54 52 59 22 3B 00 99 22 20 50 52 4F 47 | ENTRY";.." PROG|
00000AD0: 52 41 4D 20 53 4F 20 20 20 20 54 48 41 54 20 49 |RAM SO THAT I|
00000AE0: 54 20 53 54 4F 52 45 53 20 59 4F 55 52 20 44 41 |T STORES YOUR DA|
00000AF0: 54 41 20 4F 4E 20 45 49 54 48 45 52 22 00 99 22 |TA ON EITHER".."|
00000B00: 20 59 4F 55 52 20 12 41 50 50 4C 49 43 41 54 49 | YOUR .APPLICATI|
00000B10: 4F 4E 20 44 49 53 4B 92 20 4F 52 20 41 20 53 45 |ON DISK. OR A SE|
00000B20: 50 41 52 41 54 45 20 20 20 20 20 12 44 41 54 41 |PARATE .DATA|
00000B30: 20 20 44 49 53 4B 92 2E 22 00 99 A3 33 29 22 11 | DISK.."...3)".|
00000B40: D9 4F 55 20 4D 55 53 54 20 4D 41 4B 45 20 54 48 |.OU MUST MAKE TH|
00000B50: 41 54 20 44 45 43 49 53 49 4F 4E 20 CE CF D7 21 |AT DECISION ...!|
00000B60: 11 22 00 99 A3 33 29 22 C9 46 20 59 4F 55 20 43 |."...3)".F YOU C|
00000B70: 48 4F 4F 53 45 20 54 4F 20 50 55 54 20 59 4F 55 |HOOSE TO PUT YOU|
00000B80: 52 20 44 41 54 41 20 46 49 4C 45 22 00 99 22 20 |R DATA FILE".." |
00000B90: 4F 4E 20 59 4F 55 52 20 41 50 50 4C 49 43 41 54 |ON YOUR APPLICAT|
00000BA0: 49 4F 4E 20 44 49 53 4B 2C 22 3B 00 99 22 20 41 |ION DISK,";.." A|
00000BB0: 42 4F 55 54 20 48 41 4C 46 20 20 20 20 4F 46 20 |BOUT HALF OF |
00000BC0: 59 4F 55 52 20 50 52 4F 47 52 41 4D 20 44 49 53 |YOUR PROGRAM DIS|
00000BD0: 4B 45 54 54 45 20 43 41 4E 20 42 45 20 55 53 45 |KETTE CAN BE USE|
00000BE0: 44 22 00 99 22 20 46 4F 52 20 44 41 54 41 2E 20 |D".." FOR DATA. |
00000BF0: D9 4F 55 20 53 48 4F 55 4C 44 20 4E 4F 54 20 45 |.OU SHOULD NOT E|
00000C00: 58 50 45 43 54 20 54 4F 22 00 99 22 20 48 41 56 |XPECT TO".." HAV|
00000C10: 45 20 4D 4F 52 45 20 54 48 41 4E 20 41 20 53 49 |E MORE THAN A SI|
00000C20: 4D 50 4C 45 20 12 44 41 54 41 20 45 4E 54 52 59 |MPLE .DATA ENTRY|
00000C30: 2F 22 00 99 22 20 12 52 45 50 4F 52 54 20 53 59 |/".." .REPORT SY|
00000C40: 53 54 45 4D 92 20 4F 4E 20 54 48 41 54 20 53 41 |STEM. ON THAT SA|
00000C50: 4D 45 20 44 49 53 4B 45 54 54 45 2E 22 3A 4A E3 |ME DISKETTE.":J.|
00000C60: 31 00 99 22 11 20 20 20 20 C9 46 20 59 4F 55 20 |1..". .F YOU |
00000C70: 50 4C 41 4E 20 54 4F 20 48 41 56 45 20 41 20 4C |PLAN TO HAVE A L|
00000C80: 41 52 47 45 20 44 41 54 41 20 20 20 20 20 46 49 |ARGE DATA FI|
00000C90: 4C 45 2C 20 4F 52 20 49 46 20 59 4F 55 20 50 4C |LE, OR IF YOU PL|
00000CA0: 41 4E 20 54 4F 22 3B 00 99 22 20 47 45 4E 45 52 |AN TO";.." GENER|
00000CB0: 41 54 45 20 41 20 4D 4F 52 45 20 45 4C 41 42 4F |ATE A MORE ELABO|
00000CC0: 52 41 54 45 20 44 41 54 41 20 45 4E 54 52 59 2F |RATE DATA ENTRY/|
00000CD0: 52 45 50 4F 52 54 20 53 59 53 54 45 4D 20 57 49 |REPORT SYSTEM WI|
00000CE0: 54 48 20 4E 55 4D 45 52 4F 55 53 22 3B 00 99 22 |TH NUMEROUS";.."|
00000CF0: 20 50 52 4F 47 52 41 4D 53 20 41 4E 44 20 50 45 | PROGRAMS AND PE|
00000D00: 52 48 41 50 53 20 59 4F 55 52 20 4F 57 4E 20 20 |RHAPS YOUR OWN |
00000D10: 43 55 53 54 4F 4D 49 5A 45 44 20 4D 45 4E 55 20 |CUSTOMIZED MENU |
00000D20: 44 45 53 49 47 4E 2C 20 49 54 20 49 53 20 22 3B |DESIGN, IT IS ";|
00000D30: 00 99 22 41 44 56 49 53 41 42 4C 45 20 54 4F 20 |.."ADVISABLE TO |
00000D40: 55 53 45 20 41 20 53 45 50 41 52 41 54 45 20 44 |USE A SEPARATE D|
00000D50: 49 53 4B 20 46 4F 52 20 59 4F 55 52 20 44 41 54 |ISK FOR YOUR DAT|
00000D60: 41 2E 22 3A 4A E3 31 00 99 22 20 20 20 20 20 20 |A.":J.1.." |
00000D70: 12 2A 2A 20 C4 41 54 41 20 C4 49 53 4B 20 D3 45 |.** .ATA .ISK .E|
00000D80: 4C 45 43 54 49 4F 4E 20 CD 45 4E 55 20 2A 2A 92 |LECTION .ENU **.|
00000D90: 22 00 99 22 11 11 20 20 20 20 D9 4F 55 20 48 41 |"..".. .OU HA|
00000DA0: 56 45 20 54 48 45 20 46 4F 4C 4C 4F 57 49 4E 47 |VE THE FOLLOWING|
00000DB0: 20 4F 50 54 49 4F 4E 53 3A 22 00 99 22 11 20 20 | OPTIONS:"..". |
00000DC0: 20 20 44 2E 2E 2E 2E 2E 2E 44 41 54 41 20 4F 4E | D......DATA ON|
00000DD0: 20 41 20 53 45 50 41 52 41 54 45 20 44 41 54 41 | A SEPARATE DATA|
00000DE0: 20 44 49 53 4B 22 00 99 22 11 20 20 20 20 41 2E | DISK"..". A.|
00000DF0: 2E 2E 2E 2E 2E 41 50 50 4C 49 43 41 54 49 4F 4E |.....APPLICATION|
00000E00: 20 50 52 4F 47 52 41 4D 20 41 4E 44 20 44 41 54 | PROGRAM AND DAT|
00000E10: 41 20 20 20 20 20 20 20 20 20 20 20 20 4F 4E 20 |A ON |
00000E20: 54 48 45 20 53 41 4D 45 20 44 49 53 4B 22 00 99 |THE SAME DISK"..|
00000E30: 22 11 20 20 20 20 46 2E 2E 2E 2E 2E 2E 46 4F 52 |". F......FOR|
00000E40: 4D 41 54 20 41 20 44 49 53 4B 22 00 99 22 11 11 |MAT A DISK".."..|
00000E50: D9 4F 55 20 4D 55 53 54 20 48 41 56 45 20 54 57 |.OU MUST HAVE TW|
00000E60: 4F 20 46 4F 52 4D 41 54 54 45 44 20 44 49 53 4B |O FORMATTED DISK|
00000E70: 53 20 52 45 41 44 59 20 49 46 20 59 4F 55 20 43 |S READY IF YOU C|
00000E80: 48 4F 4F 53 45 20 4F 50 54 49 4F 4E 20 12 44 92 |HOOSE OPTION .D.|
00000E90: 2E 22 00 99 22 11 D9 4F 55 20 4D 55 53 54 20 48 |.".."..OU MUST H|
00000EA0: 41 56 45 20 4F 4E 45 20 46 4F 52 4D 41 54 54 45 |AVE ONE FORMATTE|
00000EB0: 44 20 44 49 53 4B 20 52 45 41 44 59 20 20 49 46 |D DISK READY IF|
00000EC0: 20 59 4F 55 20 43 48 4F 4F 53 45 20 4F 50 54 49 | YOU CHOOSE OPTI|
00000ED0: 4F 4E 20 12 41 92 2E 22 00 99 22 11 11 C5 4E 54 |ON .A..".."...NT|
00000EE0: 45 52 20 59 4F 55 52 20 43 48 4F 49 43 45 20 54 |ER YOUR CHOICE T|
00000EF0: 48 45 4E 20 50 52 45 53 53 20 12 D2 C5 D4 D5 D2 |HEN PRESS ......|
00000F00: CE 92 20 12 20 92 22 3A 89 24 D1 2C 89 16 D1 33 |.. . .":.$.,...3|
00000F10: 81 D1 3A 4A B6 EA 92 48 D2 41 92 41 8A 01 44 2B |..:J...H.A.A..D+|
00000F20: 4F 37 8D 03 C5 82 50 00 99 22 93 11 11 11 11 11 |O7....P.."......|
00000F30: D9 4F 55 52 20 44 41 54 41 20 57 49 4C 4C 20 42 |.OUR DATA WILL B|
00000F40: 45 20 53 54 4F 52 45 44 20 4F 4E 20 41 20 53 45 |E STORED ON A SE|
00000F50: 50 41 52 41 54 45 22 3A 92 41 8A 01 44 2B 4F 1C |PARATE":.A..D+O.|
00000F60: 00 99 22 44 41 54 41 20 46 49 4C 45 20 44 49 53 |.."DATA FILE DIS|
00000F70: 4B 2E 22 3A 4A E3 31 48 E2 E0 92 41 8A 01 41 2E |K.":J.1H...A..A.|
00000F80: 4F 05 48 E8 2C 8D 03 C5 81 50 00 99 22 93 11 11 |O.H.,....P.."...|
00000F90: 11 11 11 20 20 20 D9 4F 55 52 20 44 41 54 41 20 |... .OUR DATA |
00000FA0: 57 49 4C 4C 20 42 45 20 53 54 4F 52 45 44 20 4F |WILL BE STORED O|
00000FB0: 4E 20 59 4F 55 52 22 00 99 22 20 41 50 50 4C 49 |N YOUR".." APPLI|
00000FC0: 43 41 54 49 4F 4E 20 44 49 53 4B 2E 22 3A 4A E3 |CATION DISK.":J.|
00000FD0: 31 48 E2 E0 92 41 8A 01 46 2E 4F 0B 00 99 22 93 |1H...A..F.O...".|
00000FE0: 22 3A 48 EA 99 4A E8 0F 00 99 22 93 22 3A 48 EA |":H..J....".":H.|
00000FF0: 99 00 99 22 93 22 00 99 00 99 00 99 22 11 20 20 |..."."......". |
00001000: 20 20 C9 4E 53 45 52 54 20 44 49 53 4B 20 54 4F | .NSERT DISK TO|
00001010: 20 42 45 20 46 4F 52 4D 41 54 54 45 44 20 49 4E | BE FORMATTED IN|
00001020: 22 00 99 22 20 20 20 20 20 20 20 20 20 20 20 20 |".." |
00001030: 20 20 20 44 52 49 56 45 20 22 3B B6 28 C2 28 39 | DRIVE ";.(.(9|
00001040: 36 38 29 AB 31 29 00 99 A3 38 29 22 11 12 2A 2A |68).1)...8)"..**|
00001050: 2A 20 C9 CD D0 CF D2 D4 C1 CE D4 20 CE CF D4 C5 |* ......... ....|
00001060: 21 20 2A 2A 2A 92 22 00 99 22 11 20 20 D2 45 4D |! ***."..". .EM|
00001070: 45 4D 42 45 52 20 54 48 41 54 20 46 4F 52 4D 41 |EMBER THAT FORMA|
00001080: 54 54 49 4E 47 20 57 49 4C 4C 20 44 45 53 54 52 |TTING WILL DESTR|
00001090: 4F 59 22 00 99 22 20 41 4E 59 20 49 4E 46 4F 52 |OY".." ANY INFOR|
000010A0: 4D 41 54 49 4F 4E 20 4F 4E 20 54 48 45 20 44 49 |MATION ON THE DI|
000010B0: 53 4B 20 21 22 00 99 22 11 11 20 D4 59 50 45 20 |SK !"..".. .YPE |
000010C0: 12 46 92 20 54 48 45 4E 20 12 D2 C5 D4 D5 D2 CE |.F. THEN .......|
000010D0: 92 20 54 4F 20 42 45 47 49 4E 20 46 4F 52 4D 41 |. TO BEGIN FORMA|
000010E0: 54 54 49 4E 47 22 00 99 C8 28 59 24 2C 32 32 29 |TTING"...(Y$,22)|
000010F0: 3B 00 99 22 11 20 D4 59 50 45 20 41 4E 59 20 4F |;..". .YPE ANY O|
00001100: 54 48 45 52 20 4B 45 59 20 54 48 45 4E 20 12 D2 |THER KEY THEN ..|
00001110: C5 D4 D5 D2 CE 92 20 54 4F 20 45 58 49 54 20 20 |...... TO EXIT |
00001120: 57 49 54 48 4F 55 54 20 46 4F 52 4D 41 54 54 49 |WITHOUT FORMATTI|
00001130: 4E 47 22 3A 89 14 D1 2C 89 18 D1 33 81 D1 3A 8A |NG":...,...3..:.|
00001140: 00 D2 48 4A B6 EA 92 48 8A 01 46 2E 4F 05 48 E3 |..HJ...H..F.O.H.|
00001150: DE 00 99 22 93 11 20 D0 4C 45 41 53 45 20 45 4E |...".. .LEASE EN|
00001160: 54 45 52 20 41 20 4E 41 4D 45 20 46 4F 52 20 54 |TER A NAME FOR T|
00001170: 48 45 20 44 49 53 4B 22 00 99 22 20 28 31 20 54 |HE DISK".." (1 T|
00001180: 4F 20 31 36 20 43 48 41 52 41 43 54 45 52 53 29 |O 16 CHARACTERS)|
00001190: 22 00 99 22 11 20 3F 22 3B 3A 82 D1 2C 89 D6 B8 |"..". ?";:..,...|
000011A0: 0E 81 01 D1 33 89 10 D1 3A 4A B6 EA 92 48 D2 79 |....3...:J...H.y|
000011B0: 92 79 B8 0F 80 2B 92 79 B8 0F 89 10 2A 07 4F 05 |.y...+.y....*.O.|
000011C0: 48 E6 AF 92 79 92 10 01 89 10 B8 14 D2 79 00 99 |H...y........y..|
000011D0: 00 99 22 11 11 20 20 20 20 20 12 2A 2A 2A D4 C8 |..".. .***..|
000011E0: C9 D3 A0 C9 D3 A0 D9 CF D5 D2 A0 CC C1 D3 D4 A0 |................|
000011F0: C3 C8 C1 CE C3 C5 2A 2A 2A 92 22 00 99 22 11 20 |......***."..". |
00001200: 20 C6 4F 52 4D 41 54 54 49 4E 47 20 41 20 44 49 | .ORMATTING A DI|
00001210: 53 4B 20 57 49 4C 4C 20 45 52 41 53 45 20 49 54 |SK WILL ERASE IT|
00001220: 21 21 22 00 99 22 11 20 20 CD 41 4B 45 20 53 55 |!!"..". .AKE SU|
00001230: 52 45 20 59 4F 55 52 20 C3 4F 44 45 D7 52 49 54 |RE YOUR .ODE.RIT|
00001240: 45 52 20 44 49 53 4B 20 49 53 20 22 00 99 22 20 |ER DISK IS ".." |
00001250: D7 D2 C9 D4 C5 20 D0 D2 CF D4 C5 C3 D4 C5 C4 20 |..... ......... |
00001260: 41 4E 44 20 CE CF D4 20 49 4E 20 54 48 45 20 44 |AND ... IN THE D|
00001270: 52 49 56 45 21 22 00 99 22 11 11 20 D4 59 50 45 |RIVE!"..".. .YPE|
00001280: 20 12 46 92 20 54 48 45 4E 20 12 D2 C5 D4 D5 D2 | .F. THEN ......|
00001290: CE 92 20 54 4F 20 42 45 47 49 4E 20 46 4F 52 4D |.. TO BEGIN FORM|
000012A0: 41 54 54 49 4E 47 22 00 99 C8 28 59 24 2C 32 32 |ATTING"...(Y$,22|
000012B0: 29 3B 00 99 22 11 20 D4 59 50 45 20 41 4E 59 20 |);..". .YPE ANY |
000012C0: 4F 54 48 45 52 20 4B 45 59 20 54 48 45 4E 20 12 |OTHER KEY THEN .|
000012D0: D2 C5 D4 D5 D2 CE 92 20 54 4F 20 45 58 49 54 20 |....... TO EXIT |
000012E0: 20 57 49 54 48 4F 55 54 20 46 4F 52 4D 41 54 54 | WITHOUT FORMATT|
000012F0: 49 4E 47 22 3A 89 14 D1 2C 89 18 D1 33 81 D1 3A |ING":...,...3..:|
00001300: 8A 00 D2 48 4A B6 EA 92 48 8A 01 46 2E 4F 05 48 |...HJ...H..F.O.H|
00001310: E3 DE 00 99 22 93 11 11 11 11 22 A3 31 35 29 22 |....".....".15)"|
00001320: C6 4F 52 4D 41 54 54 49 4E 47 22 3B 3A 81 D0 80 |.ORMATTING";:...|
00001330: 83 42 00 80 00 99 22 2E 22 3B 00 A0 31 35 00 9F |.B....".";..15..|
00001340: 31 35 2C 44 56 2C 31 35 00 98 31 35 2C 22 4E 22 |15,DV,15..15,"N"|
00001350: AA 44 52 24 AA 22 3A 22 3B 4E 41 24 3B 22 2C 30 |.DR$.":";NA$;",0|
00001360: 30 22 00 84 31 35 2C 45 52 2C 45 4D 24 00 A0 31 |0"..15,ER,EM$..1|
00001370: 35 3A 90 95 89 14 2D 4F 05 48 E4 2D 47 00 80 00 |5:....-O.H.-G...|
00001380: 99 22 11 11 22 00 99 22 2A 2A 2A 20 C4 49 53 4B |."..".."*** .ISK|
00001390: 20 46 4F 52 4D 41 54 20 45 52 52 4F 52 20 2A 2A | FORMAT ERROR **|
000013A0: 2A 22 00 99 45 52 2C 45 4D 24 00 99 22 11 D4 52 |*"..ER,EM$.."..R|
000013B0: 59 20 41 47 41 49 4E 20 4F 52 20 55 53 45 20 41 |Y AGAIN OR USE A|
000013C0: 4E 4F 54 48 45 52 20 44 49 53 4B 22 3A 4A E3 31 |NOTHER DISK":J.1|
000013D0: 48 E8 0F 00 99 22 93 C6 4F 52 4D 41 54 20 41 4E |H...."..ORMAT AN|
000013E0: 4F 54 48 45 52 20 44 49 53 4B 3F 20 28 59 2F 4E |OTHER DISK? (Y/N|
000013F0: 29 22 3B 3A 89 1B D1 2C 81 D1 33 81 D1 3A 4A B6 |)";:...,..3..:J.|
00001400: EA 92 48 D2 41 92 48 8A 01 59 2E 92 48 8A 01 4E |..H.A.H..Y..H..N|
00001410: 2E 06 4F 05 48 E4 2D 92 48 8A 01 59 2B 4F 05 48 |..O.H.-.H..Y+O.H|
00001420: E8 0F 4C 00 A0 31 35 00 9F 31 35 2C 38 2C 31 35 |..L..15..15,8,15|
00001430: 2C 22 49 30 22 00 A0 32 00 9F 32 2C 38 2C 32 2C |,"I0"..2..2,8,2,|
00001440: 22 43 4F 44 45 47 45 4E 22 3A 4A B5 6B 90 A3 80 |"CODEGEN":J.k...|
00001450: 2B 4F 07 00 A0 32 3A 4C 00 99 22 93 22 3B C8 28 |+O...2:L..".";.(|
00001460: 59 24 2C 31 30 29 22 20 D0 4C 41 43 45 20 54 48 |Y$,10)" .LACE TH|
00001470: 45 20 12 C3 4F 44 45 D7 52 49 54 45 52 92 20 44 |E ..ODE.RITER. D|
00001480: 49 53 4B 20 49 4E 20 44 52 49 56 45 20 30 22 00 |ISK IN DRIVE 0".|
00001490: 99 C8 28 59 24 2C 32 34 29 22 20 20 20 20 20 D0 |..(Y$,24)" .|
000014A0: 52 45 53 53 20 12 D2 C5 D4 D5 D2 CE 92 20 54 4F |RESS ........ TO|
000014B0: 20 43 4F 4E 54 49 4E 55 45 22 00 A1 41 41 24 3A | CONTINUE"..AA$:|
000014C0: 92 41 89 0D B8 13 2E 4F 05 48 E3 46 48 E3 DD 00 |.A.....O.H.FH...|
000014D0: 99 C8 28 59 24 2C 32 34 29 3B 22 20 20 20 20 20 |..(Y$,24);" |
000014E0: 20 20 D0 52 45 53 53 20 12 D2 C5 D4 D5 D2 CE 92 | .RESS ........|
000014F0: 20 54 4F 20 43 4F 4E 54 49 4E 55 45 22 00 A1 41 | TO CONTINUE"..A|
00001500: 41 24 3A 92 41 8A 00 2B 4F 05 48 E3 03 92 41 B8 |A$:.A..+O.H...A.|
00001510: 12 89 0D 2E 4F 05 48 E3 03 00 99 22 93 22 3A 4C |....O.H....".":L|
00001520: 92 4F 8A 01 41 2B 4F 05 48 F0 4F 00 A0 31 35 3A |.O..A+O.H.O..15:|
00001530: 8D 02 8A 80 50 00 99 22 93 11 11 20 12 20 D4 48 |....P.."... . .H|
00001540: 49 53 20 49 53 20 54 48 45 20 D3 43 52 45 45 4E |IS IS THE .CREEN|
00001550: 20 C6 4F 52 4D 41 54 20 C7 45 4E 45 52 41 54 4F | .ORMAT .ENERATO|
00001560: 52 20 92 22 00 99 A3 34 29 3B 22 11 11 D9 4F 55 |R ."...4);"...OU|
00001570: 20 48 41 56 45 20 54 48 45 53 45 20 4F 50 54 49 | HAVE THESE OPTI|
00001580: 4F 4E 53 3A 11 22 00 99 A3 32 29 3B 22 45 2E 2E |ONS:."...2);"E..|
00001590: 2E 2E C5 44 49 54 20 4F 52 20 43 52 45 41 54 45 |...DIT OR CREATE|
000015A0: 20 41 20 53 43 52 45 45 4E 20 4C 41 59 4F 55 54 | A SCREEN LAYOUT|
000015B0: 11 22 00 99 A3 32 29 3B 22 43 2E 2E 2E 2E 2E 2E |."...2);"C......|
000015C0: 2E 2E 2E 2E 2E 2E C3 48 41 4E 47 45 20 46 49 45 |.......HANGE FIE|
000015D0: 4C 44 20 50 4F 53 49 54 49 4F 4E 53 11 22 00 99 |LD POSITIONS."..|
000015E0: A3 32 29 3B 22 53 2E 2E 2E 2E 2E 2E 2E 2E D3 41 |.2);"S.........A|
000015F0: 56 45 20 53 43 52 45 45 4E 20 4C 41 59 4F 55 54 |VE SCREEN LAYOUT|
00001600: 20 54 4F 20 44 49 53 4B 11 22 00 99 A3 32 29 3B | TO DISK."...2);|
00001610: 22 4C 2E 2E 2E 2E 2E 2E CC 4F 41 44 20 53 43 52 |"L.......OAD SCR|
00001620: 45 45 4E 20 4C 41 59 4F 55 54 20 46 52 4F 4D 20 |EEN LAYOUT FROM |
00001630: 44 49 53 4B 11 22 00 99 A3 32 29 3B 22 58 2E 2E |DISK."...2);"X..|
00001640: 2E 2E 2E 2E C5 58 49 54 20 54 4F 20 53 59 53 54 |.....XIT TO SYST|
00001650: 45 4D 20 43 52 45 41 54 49 4F 4E 20 4D 45 4E 55 |EM CREATION MENU|
00001660: 11 11 11 22 00 99 A3 32 29 22 C5 4E 54 45 52 20 |..."...2)".NTER |
00001670: 59 4F 55 52 20 43 48 4F 49 43 45 20 54 48 45 4E |YOUR CHOICE THEN|
00001680: 20 50 52 45 53 53 20 12 D2 45 54 55 52 4E 92 22 | PRESS ..ETURN."|
00001690: 3B 3A 89 26 D1 2C 89 14 D1 33 81 D1 3A 4A B6 EA |;:.&.,...3..:J..|
000016A0: 92 48 D2 41 92 41 8A 01 45 2B 4F 08 4A E0 C6 48 |.H.A.A..E+O.J..H|
000016B0: E2 D5 92 41 8A 01 43 2B 4F 05 4A DA B5 92 41 8A |...A..C+O.J...A.|
000016C0: 01 53 2B 4F 08 4A B7 93 4A D0 94 92 41 8A 01 4C |.S+O.J..J...A..L|
000016D0: 2B 4F 08 4A B7 93 4A CB 3A 92 41 8A 01 58 2E 4F |+O.J..J.:.A..X.O|
000016E0: 05 48 E2 D5 00 99 22 93 11 11 11 11 11 11 11 C8 |.H....".........|
000016F0: 41 56 45 20 59 4F 55 20 53 41 56 45 44 20 59 4F |AVE YOU SAVED YO|
00001700: 55 52 20 53 43 52 45 45 4E 3F 20 28 59 2F 4E 29 |UR SCREEN? (Y/N)|
00001710: 22 3A 89 22 D1 2C 89 08 D1 33 81 D1 3A 4A B6 EA |":.".,...3..:J..|
00001720: 92 48 8A 01 59 2E 4F 05 48 E2 CB 4A B2 D9 8D 03 |.H..Y.O.H..J....|
00001730: C6 89 60 50 81 D0 25 48 F4 E6 4A BE 76 8D 02 8A |..`P..%H..J.v...|
00001740: 89 80 50 00 99 22 93 22 3A 81 D0 AA 89 17 42 00 |..P..".":.....B.|
00001750: AA 00 99 C8 28 59 24 2C 4E 29 53 50 24 22 20 22 |....(Y$,N)SP$" "|
00001760: 3A 46 81 D0 B1 80 D1 B8 81 D1 BF 90 C6 81 2B 4F |:F............+O|
00001770: 05 4A C8 B4 90 C6 80 2B 4F 05 80 D0 CD 81 D1 D4 |.J.....+O.......|
00001780: 80 D1 2C 81 D1 33 8D 04 00 B8 0E D1 DB 00 99 C8 |..,..3..........|
00001790: 28 59 24 2C 32 33 29 3B 22 2D 2D 2D 2D 2D 2D 2D |(Y$,23);"-------|
000017A0: 2D 2D 2D 2D 2D 2D 2D C3 4F 4C 3A 20 20 20 D2 4F |-------.OL: .O|
000017B0: 57 3A 20 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |W: ------------|
000017C0: 2D 22 3B 00 99 C8 28 59 24 2C 32 34 29 3B 22 20 |-";...(Y$,24);" |
000017D0: D0 52 45 53 53 20 12 C6 31 92 20 54 4F 20 52 45 |.RESS ..1. TO RE|
000017E0: 41 44 20 53 43 52 45 45 4E 20 12 C6 33 92 20 48 |AD SCREEN ..3. H|
000017F0: 41 52 44 43 4F 50 59 20 20 20 22 00 99 54 C8 28 |ARDCOPY "..T.(|
00001800: 59 24 2C 32 35 29 3B 22 20 20 20 12 C6 35 92 20 |Y$,25);" ..5. |
00001810: 54 4F 20 41 42 4F 52 54 20 45 44 49 54 49 4E 47 |TO ABORT EDITING|
00001820: 20 12 C6 37 92 20 46 4F 52 20 54 41 42 22 3B 00 | ..7. FOR TAB";.|
00001830: 99 C8 28 59 24 2C 32 33 29 3B A6 31 38 29 3B C9 |..(Y$,23);.18);.|
00001840: 28 22 20 20 22 AA C4 28 58 25 AA 31 29 2C 32 29 |(" "..(X%.1),2)|
00001850: 00 99 C8 28 59 24 2C 32 33 29 3B A6 32 35 29 3B |...(Y$,23);.25);|
00001860: C9 28 22 20 20 22 AA C4 28 59 25 29 2C 32 29 3A |.(" "..(Y%),2):|
00001870: 8D 03 D8 89 28 91 33 03 01 91 2C 01 D1 E9 91 E9 |....(.3...,.....|
00001880: 91 DB 89 80 07 50 00 99 C8 28 59 24 2C 59 25 29 |.....P...(Y$,Y%)|
00001890: 3B A3 58 25 29 3B 00 A1 41 24 3A 92 4F 8A 00 2B |;.X%);..A$:.O..+|
000018A0: 4F 05 48 DF 6A 92 4F 89 94 B8 13 2B 92 4F 89 22 |O.H.j.O....+.O."|
000018B0: B8 13 2B 07 92 4F 8A 01 2C 2B 07 92 4F 8A 01 3A |..+..O..,+..O..:|
000018C0: 2B 07 92 4F 8A 01 3B 2B 07 4F 05 48 DF 6A 92 4F |+..O..;+.O.H.j.O|
000018D0: 8A 01 90 2B 92 4F 8A 01 05 2B 07 92 4F 8A 01 1C |...+.O...+..O...|
000018E0: 2B 07 92 4F 8A 01 9F 2B 07 92 4F 8A 01 9C 2B 07 |+..O...+..O...+.|
000018F0: 92 4F 8A 01 1E 2B 07 92 4F 8A 01 1F 2B 07 92 4F |.O...+..O...+..O|
00001900: 8A 01 9E 2B 07 4F 05 48 DF D1 92 4F 89 86 B8 13 |...+.O.H...O....|
00001910: 2B 4F 08 4A B5 53 48 E0 80 92 4F B8 12 D0 F0 92 |+O.J.SH...O.....|
00001920: 4F 89 85 B8 13 2B 91 D4 81 2B 06 4F 05 48 C7 2F |O....+...+.O.H./|
00001930: 90 F0 89 87 2B 4F 05 48 B2 4D 91 2C 80 2B 4F 19 |....+O.H.M.,.+O.|
00001940: 90 F0 89 23 2B 90 F0 89 24 2B 07 90 F0 89 2E 2B |...#+...$+.....+|
00001950: 07 90 F0 89 2F 2B 07 4F 05 48 DB 69 90 F0 89 85 |..../+.O.H.i....|
00001960: 2B 91 D4 8D FF FF 2B 06 4F 05 48 DF D1 91 DB 89 |+.....+.O.H.....|
00001970: 9E 2B 90 F0 89 5E 2B 06 4F 05 48 DD F6 90 F0 89 |.+...^+.O.H.....|
00001980: 88 2B 4F 05 48 DB E4 90 F0 89 93 2B 4F 06 90 B1 |.+O.H......+O...|
00001990: 81 2B 4F 08 81 D1 D4 48 E0 BD 90 F0 89 93 2B 90 |.+O....H......+.|
000019A0: B1 82 2B 06 4F 05 48 DF 6A 90 F0 89 11 2B 90 F0 |..+.O.H.j....+..|
000019B0: 89 13 2B 07 90 F0 89 91 2B 07 90 F0 89 1D 2B 07 |..+.....+.....+.|
000019C0: 90 F0 89 9D 2B 07 90 F0 89 0D 2B 07 4F 05 48 DD |....+.....+.O.H.|
000019D0: A7 90 F0 89 14 2B 4F 05 48 DC 5E 91 E9 91 DB 50 |.....+O.H.^....P|
000019E0: 91 DB 89 1E 2B 4F 07 91 D4 18 D1 D4 00 99 C8 28 |....+O.........(|
000019F0: 59 24 2C 59 25 29 A6 58 25 29 41 24 3B 3A 90 F0 |Y$,Y%).X%)A$;:..|
00001A00: 89 5E 2B 4F 07 91 D4 18 D1 D4 91 2C 89 27 2B 91 |.^+O.......,.'+.|
00001A10: D4 8D FF FF 2B 06 4F 05 48 DD AD 91 2C 81 01 D1 |....+.O.H...,...|
00001A20: 2C 91 2C 89 28 2C 4F 10 80 D1 2C 91 33 81 01 D1 |,.,.(,O...,.3...|
00001A30: 33 91 33 89 16 2A 4F 0A 91 BF D1 33 91 B8 D1 2C |3.3..*O....3...,|
00001A40: 81 D0 CD 91 DB 89 9E 2B 90 F0 89 5E 2B 06 4F 05 |.......+...^+.O.|
00001A50: 48 DF D1 4A DB 8C 48 DF D1 91 E9 91 DB 50 91 D4 |H..J..H......P..|
00001A60: 8D FF FF 2B 90 F0 89 11 2B 90 F0 89 13 2B 91 33 |...+....+....+.3|
00001A70: 81 2E 06 07 90 F0 89 91 2B 07 06 4F 05 48 DC 64 |........+..O.H.d|
00001A80: 90 F0 89 13 2B 4F 0D 91 B8 D1 2C 91 BF D1 33 48 |....+O....,...3H|
00001A90: DC 64 90 F0 89 11 2B 4F 0D 91 33 81 01 D1 33 91 |.d....+O..3...3.|
00001AA0: 33 89 16 2A 4F 10 91 BF D1 33 90 B1 82 2B 91 2C |3..*O....3...+.,|
00001AB0: 91 B8 2D 06 4F 06 91 B8 D1 2C 90 F0 89 91 2B 4F |..-.O....,....+O|
00001AC0: 0D 91 33 81 02 D1 33 91 33 91 BF 2D 4F 06 89 16 |..3...3.3..-O...|
00001AD0: D1 33 90 F0 89 91 2B 90 B1 82 2B 06 4F 0D 91 33 |.3....+...+.O..3|
00001AE0: 91 BF 2B 91 2C 91 B8 2D 06 4F 06 91 B8 D1 2C 90 |..+.,..-.O....,.|
00001AF0: F0 89 1D 2E 4F 05 48 DC D1 91 2C 89 27 2B 91 D4 |....O.H...,.'+..|
00001B00: 8D FF FF 2B 06 4F 05 48 DC 64 91 2C 81 01 D1 2C |...+.O.H.d.,...,|
00001B10: 91 2C 89 27 2A 4F 05 80 D1 2C 90 B1 82 2B 91 33 |.,.'*O...,...+.3|
00001B20: 91 BF 2B 06 91 2C 80 2B 06 4F 06 91 B8 D1 2C 90 |..+..,.+.O....,.|
00001B30: F0 89 9D 2E 4F 05 48 DC 91 91 2C 80 2B 91 D4 8D |....O.H...,.+...|
00001B40: FF FF 2B 06 4F 05 48 DC 64 91 2C 81 02 D1 2C 91 |..+.O.H.d.,...,.|
00001B50: 2C 80 2D 4F 06 89 27 D1 2C 90 B1 82 2B 91 33 91 |,.-O..'.,...+.3.|
00001B60: BF 2B 06 91 2C 91 B8 2D 06 4F 06 89 27 D1 2C 90 |.+..,..-.O..'.,.|
00001B70: F0 89 0D 2E 4F 05 48 DC 64 91 D4 8D FF FF 2B 4F |....O.H.d.....+O|
00001B80: 05 48 DC 64 80 D1 2C 91 33 81 01 D1 33 91 33 89 |.H.d..,.3...3.3.|
00001B90: 16 2A 4F 0A 91 BF D1 33 91 B8 D1 2C 4A DB 8C 48 |.*O....3...,J..H|
00001BA0: DF D1 91 E9 B8 0E 89 80 02 89 1E 2B 4F 07 91 D4 |...........+O...|
00001BB0: 18 D1 D4 91 D4 8D FF FF 2B 91 2C 80 2B 06 4F 05 |........+.,.+.O.|
00001BC0: 48 DF 6A 00 99 C8 28 59 24 2C 59 25 29 3B A6 58 |H.j...(Y$,Y%);.X|
00001BD0: 25 29 3B 22 20 22 3A 91 2C 81 02 D1 2C 90 B1 82 |%);" ":.,...,...|
00001BE0: 2B 4F 07 91 33 91 BF 2B 4F 07 91 2C 91 B8 2D 4F |+O..3..+O..,..-O|
00001BF0: 0D 89 16 D1 33 89 27 D1 2C 48 DB EA 91 2C 80 2D |....3.'.,H...,.-|
00001C00: 4F 10 89 27 D1 2C 91 33 81 02 D1 33 91 33 81 2D |O..'.,.3...3.3.-|
00001C10: 4F 06 89 16 D1 33 4A DB 8C 48 DF D1 91 E9 91 DB |O....3J..H......|
00001C20: 50 91 2C 89 0A 01 89 27 2A 91 D4 8D FF FF 2B 06 |P.,....'*.....+.|
00001C30: 4F 05 48 DB 92 91 2C 89 0A 01 D1 2C 91 2C 89 28 |O.H...,....,.,.(|
00001C40: 2C 4F 10 80 D1 2C 91 33 81 01 D1 33 91 33 89 16 |,O...,.3...3.3..|
00001C50: 2A 4F 06 91 BF D1 33 90 B1 82 2B 4F 0D 91 33 91 |*O....3...+O..3.|
00001C60: BF 2B 91 2C 91 B8 2D 06 4F 06 91 B8 D1 2C 4A DB |.+.,..-.O....,J.|
00001C70: 8C 48 DF D1 8D 03 D8 89 28 91 33 03 01 91 2C 01 |.H......(.3...,.|
00001C80: B8 0E D1 DB 8D 03 D8 89 28 91 33 03 01 91 2C 01 |........(.3...,.|
00001C90: 91 DB 89 7F 06 50 4C 00 99 C8 28 59 24 2C 32 34 |.....PL...(Y$,24|
00001CA0: 29 3B 53 50 24 00 99 53 50 24 3B 00 99 C8 28 59 |);SP$..SP$;...(Y|
00001CB0: 24 2C 32 33 29 3B 22 C1 20 4C 49 4E 45 20 43 41 |$,23);". LINE CA|
00001CC0: 4E 20 4E 4F 54 20 53 54 41 52 54 20 57 49 54 48 |N NOT START WITH|
00001CD0: 20 2E 2C 20 2F 2C 20 23 2C 20 4F 52 20 24 2E 22 | ., /, #, OR $."|
00001CE0: 00 99 C8 28 59 24 2C 32 34 29 3B 22 D0 52 45 53 |...(Y$,24);".RES|
00001CF0: 53 20 12 D2 45 54 55 52 4E 92 20 54 4F 20 43 4F |S ..ETURN. TO CO|
00001D00: 4E 54 49 4E 55 45 22 3B 00 A1 41 24 3A 92 4F 89 |NTINUE";..A$:.O.|
00001D10: 0D B8 13 2E 4F 05 48 DA F8 00 99 C8 28 59 24 2C |....O.H.....(Y$,|
00001D20: 32 34 29 3B 53 50 24 3A 48 E0 73 00 99 22 93 22 |24);SP$:H.s.."."|
00001D30: 3B 00 A1 41 24 3A 92 4F 8A 00 2B 4F 05 48 DA CF |;..A$:.O..+O.H..|
00001D40: 00 99 C6 28 41 24 29 3A 48 DA CF 00 99 22 93 22 |...(A$):H...."."|
00001D50: 3A 8D 02 8A 89 80 50 90 C6 81 2B 4F 05 48 DA 19 |:.....P...+O.H..|
00001D60: 00 99 22 C5 52 52 4F 52 3A 20 CE 4F 20 53 43 52 |..".RROR: .O SCR|
00001D70: 45 45 4E 20 49 4E 20 4D 45 4D 4F 52 59 2E 22 00 |EEN IN MEMORY.".|
00001D80: 99 22 D9 4F 55 20 4D 55 53 54 20 46 49 52 53 54 |.".OU MUST FIRST|
00001D90: 20 43 52 45 41 54 45 20 4F 52 20 4C 4F 41 44 20 | CREATE OR LOAD |
00001DA0: 4F 4E 45 2E 22 00 99 C8 28 59 24 2C 32 34 29 22 |ONE."...(Y$,24)"|
00001DB0: D0 52 45 53 53 20 12 D2 C5 D4 D5 D2 CE 92 20 54 |.RESS ........ T|
00001DC0: 4F 20 52 45 54 55 52 4E 20 54 4F 20 54 48 45 20 |O RETURN TO THE |
00001DD0: 4D 45 4E 55 22 00 A1 41 24 3A 92 4F 89 0D B8 13 |MENU"..A$:.O....|
00001DE0: 2E 4F 05 48 DA 2B 4C 4A D3 66 00 99 22 93 22 3A |.O.H.+LJ.f..".":|
00001DF0: 4A C8 B4 80 D1 F7 91 F7 A1 04 D1 2C 91 F7 A1 06 |J..........,....|
00001E00: D1 33 00 99 C8 28 59 24 2C 32 33 29 3B 22 2D 2D |.3...(Y$,23);"--|
00001E10: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D C3 4F 4C 3A |------------.OL:|
00001E20: 20 20 20 D2 4F 57 3A 20 20 2D 2D 2D 2D 2D 2D 2D | .OW: -------|
00001E30: 2D 2D 2D 2D 2D 2D 22 3B 3A 8D 03 D8 91 F7 A1 06 |------";:.......|
00001E40: 89 28 03 01 91 F7 A1 04 01 B8 0E D1 DB 8D 03 D8 |.(..............|
00001E50: 91 F7 A1 06 89 28 03 01 91 F7 A1 04 01 91 DB 89 |.....(..........|
00001E60: 80 07 50 00 99 C8 28 59 24 2C 32 35 29 3B 22 20 |..P...(Y$,25);" |
00001E70: 20 20 D0 52 45 53 53 20 12 C6 31 92 20 54 4F 20 | .RESS ..1. TO |
00001E80: D2 45 54 55 52 4E 20 54 4F 20 54 48 45 20 4D 45 |.ETURN TO THE ME|
00001E90: 4E 55 22 3B 00 99 C8 28 59 24 2C 32 33 29 3B A6 |NU";...(Y$,23);.|
00001EA0: 31 38 29 3B C9 28 22 20 20 22 AA C4 28 58 25 AA |18);.(" "..(X%.|
00001EB0: 31 29 2C 32 29 00 99 C8 28 59 24 2C 32 33 29 3B |1),2)...(Y$,23);|
00001EC0: A6 32 35 29 3B C9 28 22 20 20 22 AA C4 28 59 25 |.25);.(" "..(Y%|
00001ED0: 29 2C 32 29 3A 8A 00 D2 FE 8A 00 D6 01 05 8A 00 |),2):...........|
00001EE0: D6 01 0C 91 F7 A2 0C 8A 01 54 2B 4F 0F 8A 05 CC |.........T+O....|
00001EF0: 41 42 45 4C D6 01 05 48 D8 56 8A 08 41 4C 50 48 |ABEL...H.V..ALPH|
00001F00: 41 4E 55 4D D6 01 05 91 F7 A2 0E 8A 01 44 2B 4F |ANUM.........D+O|
00001F10: 0B 8A 04 44 41 54 45 D6 01 05 91 F7 A2 0E 8A 01 |...DATE.........|
00001F20: 23 2B 4F 0A 8A 03 4E 55 4D D6 01 05 91 F7 A2 0E |#+O...NUM.......|
00001F30: 8A 01 24 2B 4F 0D 8A 06 44 4F 4C 4C 41 52 D6 01 |..$+O...DOLLAR..|
00001F40: 05 8A 10 CB 45 59 42 4F 41 52 44 20 45 4E 54 45 |....EYBOARD ENTE|
00001F50: 52 45 44 D2 FE 8A 05 CC 45 4E 20 3D 91 F7 A1 0A |RED.....EN =....|
00001F60: B8 10 01 D6 01 0C 91 F7 A2 0C 8A 01 50 2B 4F 1D |............P+O.|
00001F70: 8A 12 D0 52 4F 47 52 41 4D 20 43 41 4C 43 55 4C |...ROGRAM CALCUL|
00001F80: 41 54 45 44 D2 FE 8A 00 D6 01 0C 91 F7 A2 0C 8A |ATED............|
00001F90: 01 47 2B 4F 17 8A 0C C7 4C 4F 42 41 4C 20 54 4F |.G+O....LOBAL TO|
00001FA0: 54 41 4C D2 FE 8A 00 D6 01 0C 00 99 C8 28 59 24 |TAL..........(Y$|
00001FB0: 2C 32 34 29 3B 53 50 24 00 99 C8 28 59 24 2C 32 |,24);SP$...(Y$,2|
00001FC0: 34 29 3B 22 D4 59 50 45 3A 22 3B 5A 51 24 3B 22 |4);".YPE:";ZQ$;"|
00001FD0: 20 22 5A 53 24 3B 22 20 22 3B 4C 24 00 A1 41 24 | "ZS$;" ";L$..A$|
00001FE0: 3A 92 4F 8A 00 2B 4F 05 48 D8 24 92 4F B8 12 D0 |:.O..+O.H.$.O...|
00001FF0: F0 90 F0 89 0D 2B 4F 05 48 D7 B3 90 F0 89 85 2B |.....+O.H......+|
00002000: 4F 06 4A C7 CC 4C 8D 04 00 91 F7 A1 06 81 02 89 |O.J..L..........|
00002010: 28 03 01 91 F7 A1 04 01 91 DB 50 90 F0 89 9D 2E |(.........P.....|
00002020: 4F 05 48 D7 C7 91 F7 81 02 D1 F7 91 F7 80 2D 4F |O.H...........-O|
00002030: 07 94 01 13 D1 F7 48 D7 B6 91 F7 81 01 D1 F7 91 |......H.........|
00002040: F7 94 01 13 2A 4F 05 80 D1 F7 48 D9 C8 91 F7 A2 |....*O....H.....|
00002050: 08 B8 0F 91 F7 A1 0A B8 02 01 D1 3A 8A 00 D6 01 |...........:....|
00002060: 1A 81 D4 01 21 91 3A 42 01 21 96 01 1A 8A 01 20 |....!.:B.!..... |
00002070: 01 D6 01 1A 47 01 21 91 F7 A2 0C 8A 01 54 2B 4F |....G.!......T+O|
00002080: 25 8A 01 5E 91 F7 A2 08 01 8A 01 5E 01 D6 01 28 |%..^.......^...(|
00002090: 91 3A 82 01 D1 3A 96 01 1A 8A 02 20 20 01 D6 01 |.:...:..... ...|
000020A0: 1A 48 D6 F8 91 F7 A2 0E 8A 01 44 2B 4F 28 91 F7 |.H........D+O(..|
000020B0: A2 08 8A 08 2E 2E 2F 2E 2E 2F 2E 2E 01 D6 01 28 |....../../.....(|
000020C0: 91 3A 82 01 D1 3A 96 01 1A 8A 02 20 20 01 D6 01 |.:...:..... ...|
000020D0: 1A 48 D6 F8 91 F7 A2 0E 8A 01 41 2B 4F 15 91 F7 |.H........A+O...|
000020E0: A2 08 92 17 91 F7 A1 0A B8 14 01 D6 01 28 48 D6 |.............(H.|
000020F0: F8 91 F7 A2 08 92 17 91 F7 A1 0A 81 02 B8 14 01 |................|
00002100: 91 F7 A2 0E 01 D6 01 28 91 F7 A1 04 D1 2C 91 F7 |.......(.....,..|
00002110: A1 06 D1 33 00 99 C8 28 59 24 2C 32 33 29 3B A6 |...3...(Y$,23);.|
00002120: 31 38 29 3B C9 28 22 20 22 AA C4 28 58 25 AA 31 |18);.(" "..(X%.1|
00002130: 29 2C 32 29 00 99 C8 28 59 24 2C 32 33 29 3B A6 |),2)...(Y$,23);.|
00002140: 32 35 29 3B C9 28 22 20 22 AA C4 28 59 25 29 2C |25);.(" "..(Y%),|
00002150: 32 29 00 99 C8 28 59 24 2C 59 25 29 3B A6 58 25 |2)...(Y$,Y%);.X%|
00002160: 29 3B 22 12 22 3B 50 24 3B 22 92 22 00 A1 41 24 |);".";P$;"."..A$|
00002170: 3A 92 4F 8A 00 2B 4F 05 48 D6 94 92 4F B8 12 D0 |:.O..+O.H...O...|
00002180: F0 90 F0 89 85 2B 4F 12 91 F7 91 2C E1 04 91 F7 |.....+O....,....|
00002190: 91 33 E1 06 4A C7 CC 4C 90 F0 89 0D 2B 4F 18 00 |.3..J..L....+O..|
000021A0: 99 C8 28 59 24 2C 59 25 29 3B A6 58 25 29 3B 50 |..(Y$,Y%);.X%);P|
000021B0: 24 3A 48 D6 2C 90 F0 89 11 2B 90 F0 89 91 2B 07 |$:H.,....+....+.|
000021C0: 90 F0 89 1D 2B 07 90 F0 89 9D 2B 07 4F 05 48 D6 |....+.....+.O.H.|
000021D0: 1D 48 D6 94 91 F7 91 2C E1 04 91 F7 91 33 E1 06 |.H.....,.....3..|
000021E0: 48 D9 C8 90 F0 89 11 2B 4F 05 48 D5 66 90 F0 89 |H......+O.H.f...|
000021F0: 91 2B 4F 05 48 D4 9C 90 F0 89 1D 2B 4F 05 48 D3 |.+O.H......+O.H.|
00002200: D4 91 2C 80 2B 4F 05 48 D6 94 80 D4 01 21 94 01 |..,.+O.H.....!..|
00002210: 13 42 01 21 94 01 21 91 F7 2B 4F 05 48 D5 94 91 |.B.!..!..+O.H...|
00002220: 33 94 01 21 A1 06 2E 4F 05 48 D5 94 94 01 21 A2 |3..!...O.H....!.|
00002230: 0C 8A 01 54 2B 94 01 21 A2 0E 8A 01 44 2B 07 4F |...T+..!....D+.O|
00002240: 09 82 D5 01 2F 48 D5 B4 80 D5 01 2F 91 2C 94 01 |..../H...../.,..|
00002250: 21 A1 04 94 01 21 A2 08 B8 0F 01 94 01 21 A1 0A |!....!.......!..|
00002260: 01 95 01 2F 01 2B 4F 06 81 D5 01 36 47 01 21 95 |.../.+O....6G.!.|
00002270: 01 36 81 2B 4F 09 80 D5 01 36 48 D6 94 00 99 C8 |.6.+O....6H.....|
00002280: 28 59 24 2C 59 25 29 3B A6 58 25 29 3B 53 53 24 |(Y$,Y%);.X%);SS$|
00002290: 3A 91 2C 81 02 D1 2C 48 D6 EC 81 D0 1E 91 33 89 |:.,...,H......3.|
000022A0: 16 2B 4F 05 48 D6 94 80 D4 01 21 94 01 13 42 01 |.+O.H.....!...B.|
000022B0: 21 94 01 21 91 F7 2B 4F 05 48 D4 E8 94 01 21 A2 |!..!..+O.H....!.|
000022C0: 0C 8A 01 54 2B 94 01 21 A2 0E 8A 01 44 2B 07 4F |...T+..!....D+.O|
000022D0: 09 82 D5 01 2F 48 D5 24 80 D5 01 2F 91 33 90 1E |..../H.$.../.3..|
000022E0: 01 94 01 21 A1 06 2E 4F 05 48 D4 E8 91 2C 91 3A |...!...O.H...,.:|
000022F0: 01 94 01 21 A1 04 2A 91 2C 94 01 21 A1 04 94 01 |...!..*.,..!....|
00002300: 21 A2 08 B8 0F 01 94 01 21 A1 0A 01 95 01 2F 01 |!.......!...../.|
00002310: 2D 06 4F 06 81 D5 01 36 47 01 21 95 01 36 81 2B |-.O....6G.!..6.+|
00002320: 91 33 90 1E 01 89 16 2B 06 4F 09 80 D5 01 36 48 |.3.....+.O....6H|
00002330: D6 EC 95 01 36 81 2B 4F 0F 90 1E 81 01 D0 1E 80 |....6.+O........|
00002340: D5 01 36 48 D5 59 00 99 C8 28 59 24 2C 59 25 29 |..6H.Y...(Y$,Y%)|
00002350: 3B A6 58 25 29 3B 53 53 24 3A 91 33 90 1E 01 D1 |;.X%);SS$:.3....|
00002360: 33 48 D6 EC 81 D0 1E 91 33 81 2B 4F 05 48 D6 94 |3H......3.+O.H..|
00002370: 80 D4 01 21 94 01 13 42 01 21 91 F7 94 01 21 2B |...!...B.!....!+|
00002380: 4F 05 48 D4 1F 94 01 21 A2 0C 8A 01 54 2B 94 01 |O.H....!....T+..|
00002390: 21 A2 0E 8A 01 44 2B 07 4F 09 82 D5 01 2F 48 D4 |!....D+.O..../H.|
000023A0: 5B 80 D5 01 2F 91 33 90 1E 02 94 01 21 A1 06 2E |[.../.3.....!...|
000023B0: 4F 05 48 D4 1F 91 2C 91 3A 01 94 01 21 A1 04 2A |O.H...,.:...!..*|
000023C0: 91 2C 94 01 21 A1 04 94 01 21 A2 08 B8 0F 01 94 |.,..!....!......|
000023D0: 01 21 A1 0A 01 95 01 2F 01 2D 06 4F 06 81 D5 01 |.!...../.-.O....|
000023E0: 36 47 01 21 95 01 36 81 2B 91 33 90 1E 02 81 2B |6G.!..6.+.3....+|
000023F0: 06 4F 09 80 D5 01 36 48 D6 94 95 01 36 81 2B 4F |.O....6H....6.+O|
00002400: 0F 90 1E 81 01 D0 1E 80 D5 01 36 48 D4 90 00 99 |..........6H....|
00002410: C8 28 59 24 2C 59 25 29 3B A6 58 25 29 3B 53 53 |.(Y$,Y%);.X%);SS|
00002420: 24 3A 91 33 90 1E 02 D1 33 48 D6 EC 91 2C 91 3A |$:.3....3H...,.:|
00002430: 01 89 28 2B 4F 05 48 D6 94 80 D4 01 21 94 01 13 |..(+O.H.....!...|
00002440: 42 01 21 94 01 21 91 F7 2B 4F 05 48 D3 94 91 33 |B.!..!..+O.H...3|
00002450: 94 01 21 A1 06 2E 4F 05 48 D3 94 91 2C 91 3A 01 |..!...O.H...,.:.|
00002460: 94 01 21 A1 04 2B 4F 06 81 D5 01 36 47 01 21 95 |..!..+O....6G.!.|
00002470: 01 36 81 2B 4F 09 80 D5 01 36 48 D6 94 00 99 C8 |.6.+O....6H.....|
00002480: 28 59 24 2C 59 25 29 3B A6 58 25 29 3B 53 53 24 |(Y$,Y%);.X%);SS$|
00002490: 3A 91 2C 81 01 D1 2C 48 D6 EC 00 99 22 93 22 00 |:.,...,H....".".|
000024A0: 99 22 D4 48 49 53 20 4F 50 54 49 4F 4E 20 57 49 |.".HIS OPTION WI|
000024B0: 4C 4C 20 41 4C 4C 4F 57 20 59 4F 55 20 54 4F 20 |LL ALLOW YOU TO |
000024C0: 4D 4F 56 45 20 54 48 45 22 00 99 22 46 49 45 4C |MOVE THE".."FIEL|
000024D0: 44 53 20 41 52 4F 55 4E 44 20 54 48 45 20 53 43 |DS AROUND THE SC|
000024E0: 52 45 45 4E 20 54 4F 20 43 55 53 54 4F 4D 49 5A |REEN TO CUSTOMIZ|
000024F0: 45 22 00 99 22 59 4F 55 52 20 4C 41 59 4F 55 54 |E".."YOUR LAYOUT|
00002500: 2E 20 D4 4F 20 4D 4F 56 45 20 46 52 4F 4D 20 46 |. .O MOVE FROM F|
00002510: 49 45 4C 44 20 54 4F 20 46 49 45 4C 44 50 52 45 |IELD TO FIELDPRE|
00002520: 53 53 20 41 4E 59 20 4B 45 59 20 45 58 43 45 50 |SS ANY KEY EXCEP|
00002530: 54 22 3B 00 99 22 20 12 D2 C5 D4 D5 D2 CE 92 2C |T";.." ........,|
00002540: 20 4F 52 20 50 52 45 53 53 20 20 20 54 48 45 20 | OR PRESS THE |
00002550: 4C 45 46 54 20 12 C3 D2 D3 D2 92 20 54 4F 20 4D |LEFT ...... TO M|
00002560: 4F 56 45 20 42 41 43 4B 57 41 52 44 53 2E 22 3B |OVE BACKWARDS.";|
00002570: 00 99 22 20 20 D7 48 45 4E 20 20 54 48 45 20 43 |.." .HEN THE C|
00002580: 55 52 53 4F 52 20 49 53 20 4F 4E 20 54 48 45 20 |URSOR IS ON THE |
00002590: 46 49 45 4C 44 20 54 4F 20 42 45 20 4D 4F 56 45 |FIELD TO BE MOVE|
000025A0: 44 2C 22 3B 00 99 22 20 50 52 45 53 53 20 12 D2 |D,";.." PRESS ..|
000025B0: C5 D4 D5 D2 CE 92 20 54 4F 20 53 45 4C 45 43 54 |...... TO SELECT|
000025C0: 20 54 48 41 54 20 46 49 45 4C 44 2E 22 00 99 00 | THAT FIELD."...|
000025D0: 99 22 CE 4F 57 20 59 4F 55 20 4D 41 59 20 55 53 |.".OW YOU MAY US|
000025E0: 45 20 54 48 45 20 12 C3 D2 D3 D2 92 20 4B 45 59 |E THE ...... KEY|
000025F0: 53 20 54 4F 20 4D 4F 56 45 22 3B 00 99 22 20 20 |S TO MOVE";.." |
00002600: 20 54 48 45 20 53 45 4C 45 43 54 45 44 20 46 49 | THE SELECTED FI|
00002610: 45 4C 44 2E 20 D3 43 52 45 45 4E D7 52 49 54 45 |ELD. .CREEN.RITE|
00002620: 52 20 57 49 4C 4C 22 00 99 22 50 52 45 56 45 4E |R WILL".."PREVEN|
00002630: 54 20 46 49 45 4C 44 53 20 46 52 4F 4D 20 4F 56 |T FIELDS FROM OV|
00002640: 45 52 4C 41 50 50 49 4E 47 2E 22 00 99 00 99 22 |ERLAPPING."...."|
00002650: D7 48 45 4E 20 59 4F 55 20 48 41 56 45 20 4D 4F |.HEN YOU HAVE MO|
00002660: 56 45 44 20 54 48 45 20 46 49 45 4C 44 20 54 4F |VED THE FIELD TO|
00002670: 20 54 48 45 22 00 99 22 44 45 53 49 52 45 44 20 | THE".."DESIRED |
00002680: 50 4C 41 43 45 20 4F 4E 20 54 48 45 20 53 43 52 |PLACE ON THE SCR|
00002690: 45 45 4E 2C 20 50 52 45 53 53 20 20 20 20 20 20 |EEN, PRESS |
000026A0: 12 D2 C5 D4 D5 D2 CE 92 22 3B 00 99 22 20 54 4F |........";.." TO|
000026B0: 20 44 45 53 45 4C 45 43 54 20 54 48 41 54 20 46 | DESELECT THAT F|
000026C0: 49 45 4C 44 20 53 4F 20 54 48 41 54 20 20 20 59 |IELD SO THAT Y|
000026D0: 4F 55 20 4D 41 59 20 22 3B 00 99 22 47 4F 20 4F |OU MAY ";.."GO O|
000026E0: 4E 20 54 4F 20 41 4E 4F 54 48 45 52 2E 22 00 99 |N TO ANOTHER."..|
000026F0: 00 99 22 C1 54 20 41 4E 59 20 50 4F 49 4E 54 20 |..".T ANY POINT |
00002700: 59 4F 55 20 4D 41 59 20 50 52 45 53 53 20 54 48 |YOU MAY PRESS TH|
00002710: 45 20 12 C6 31 92 20 4B 45 59 20 54 4F 22 3B 00 |E ..1. KEY TO";.|
00002720: 99 22 52 45 54 55 52 4E 20 54 4F 20 54 48 45 20 |."RETURN TO THE |
00002730: 4D 45 4E 55 2E 22 00 99 C8 28 59 24 2C 32 34 29 |MENU."...(Y$,24)|
00002740: 3B 22 D0 52 45 53 53 20 12 D2 C5 D4 D5 D2 CE 92 |;".RESS ........|
00002750: 20 54 4F 20 42 45 47 49 4E 22 00 A1 41 24 3A 92 | TO BEGIN"..A$:.|
00002760: 4F 89 0D B8 13 2E 4F 05 48 D0 A6 4C 90 C6 80 2B |O.....O.H..L...+|
00002770: 4F 05 48 CB 6F 00 99 22 93 22 3A 4A CE 26 96 01 |O.H.o..".":J.&..|
00002780: 3D 8A 00 2B 4F 05 48 E2 CB 96 01 3D 8A 02 2F 53 |=..+O.H....=../S|
00002790: 01 D6 01 3D 00 A0 31 35 00 9F 31 35 2C 44 56 2C |...=..15..15,DV,|
000027A0: 31 35 00 98 31 35 2C 22 53 22 AA 44 52 24 AA 22 |15..15,"S".DR$."|
000027B0: 3A 22 46 24 00 A0 31 35 00 99 22 93 11 11 11 11 |:"F$..15..".....|
000027C0: 11 11 11 11 11 20 D3 41 56 49 4E 47 20 53 43 52 |..... .AVING SCR|
000027D0: 45 45 4E 20 27 22 3B 46 24 3B 22 27 20 50 4C 45 |EEN '";F$;"' PLE|
000027E0: 41 53 45 20 57 41 49 54 2E 22 00 9F 32 2C 44 56 |ASE WAIT."..2,DV|
000027F0: 2C 32 2C 44 52 24 AA 22 3A 22 AA 46 24 AA 22 2C |,2,DR$.":".F$.",|
00002800: 57 22 3A 80 D4 01 44 80 D4 01 4B 80 D4 01 52 80 |W":...D...K...R.|
00002810: D4 01 59 80 D4 01 21 94 01 13 42 01 21 94 01 21 |..Y...!...B.!..!|
00002820: A2 0C 8A 01 4B 2B 4F 0A 94 01 44 81 01 D4 01 44 |....K+O...D....D|
00002830: 94 01 21 A2 0C 8A 01 50 2B 4F 0A 94 01 4B 81 01 |..!....P+O...K..|
00002840: D4 01 4B 94 01 21 A2 0C 8A 01 47 2B 4F 0A 94 01 |..K..!....G+O...|
00002850: 52 81 01 D4 01 52 94 01 21 A2 0C 8A 01 54 2B 4F |R....R..!....T+O|
00002860: 0A 94 01 59 81 01 D4 01 59 47 01 21 00 98 32 2C |...Y....YG.!..2,|
00002870: 4E 46 3A 94 01 44 80 2B 4F 05 48 CF 3A 80 D4 01 |NF:..D.+O.H.:...|
00002880: 21 94 01 13 42 01 21 94 01 21 A2 0C 8A 01 4B 2E |!...B.!..!....K.|
00002890: 4F 05 48 CF 3E 00 98 32 2C 50 24 28 4A 29 00 98 |O.H.>..2,P$(J)..|
000028A0: 32 2C 58 25 28 4A 29 00 98 32 2C 59 25 28 4A 29 |2,X%(J)..2,Y%(J)|
000028B0: 00 98 32 2C 4C 25 28 4A 29 00 98 32 2C 54 24 28 |..2,L%(J)..2,T$(|
000028C0: 4A 29 3A 47 01 21 00 98 32 2C 4E 43 3A 94 01 4B |J):G.!..2,NC:..K|
000028D0: 80 2B 4F 05 48 CE E0 80 D4 01 21 94 01 13 42 01 |.+O.H.....!...B.|
000028E0: 21 94 01 21 A2 0C 8A 01 50 2E 4F 05 48 CE E4 00 |!..!....P.O.H...|
000028F0: 98 32 2C 50 24 28 4A 29 00 98 32 2C 58 25 28 4A |.2,P$(J)..2,X%(J|
00002900: 29 00 98 32 2C 59 25 28 4A 29 00 98 32 2C 4C 25 |)..2,Y%(J)..2,L%|
00002910: 28 4A 29 00 98 32 2C 54 24 28 4A 29 3A 47 01 21 |(J)..2,T$(J):G.!|
00002920: 00 98 32 2C 4E 47 3A 94 01 52 80 2B 4F 05 48 CE |..2,NG:..R.+O.H.|
00002930: 86 80 D4 01 21 94 01 13 42 01 21 94 01 21 A2 0C |....!...B.!..!..|
00002940: 8A 01 47 2E 4F 05 48 CE 8A 00 98 32 2C 50 24 28 |..G.O.H....2,P$(|
00002950: 4A 29 00 98 32 2C 58 25 28 4A 29 00 98 32 2C 59 |J)..2,X%(J)..2,Y|
00002960: 25 28 4A 29 00 98 32 2C 4C 25 28 4A 29 00 98 32 |%(J)..2,L%(J)..2|
00002970: 2C 54 24 28 4A 29 3A 47 01 21 00 98 32 2C 4E 54 |,T$(J):G.!..2,NT|
00002980: 3A 94 01 59 80 2B 4F 05 48 CE 2B 80 D4 01 21 94 |:..Y.+O.H.+...!.|
00002990: 01 13 42 01 21 94 01 21 A2 0C 8A 01 54 2E 4F 05 |..B.!..!....T.O.|
000029A0: 48 CE 2F 94 01 21 A2 08 8A 00 2B 4F 0B 94 01 21 |H./..!....+O...!|
000029B0: 89 A0 B8 13 E2 08 00 98 32 2C 50 24 28 4A 29 00 |........2,P$(J).|
000029C0: 98 32 2C 58 25 28 4A 29 00 98 32 2C 59 25 28 4A |.2,X%(J)..2,Y%(J|
000029D0: 29 3A 47 01 21 00 A0 32 3A 4C 00 99 22 D0 4C 45 |):G.!..2:L..".LE|
000029E0: 41 53 45 20 47 49 56 45 20 54 48 45 20 46 49 4C |ASE GIVE THE FIL|
000029F0: 45 20 4E 41 4D 45 20 28 55 50 20 54 4F 20 37 20 |E NAME (UP TO 7 |
00002A00: 20 20 20 20 20 4C 45 54 54 45 52 53 29 20 59 4F | LETTERS) YO|
00002A10: 55 20 57 49 53 48 20 54 4F 22 3B 00 99 22 20 55 |U WISH TO";.." U|
00002A20: 53 45 20 46 4F 52 20 59 4F 55 52 20 20 20 20 20 |SE FOR YOUR |
00002A30: 20 20 53 43 52 45 45 4E 20 4C 41 59 4F 55 54 2E | SCREEN LAYOUT.|
00002A40: 11 22 00 99 22 C3 4F 44 45 D7 52 49 54 45 52 20 |."..".ODE.RITER |
00002A50: 57 49 4C 4C 20 41 53 4B 20 59 4F 55 20 46 4F 52 |WILL ASK YOU FOR|
00002A60: 20 54 48 49 53 22 00 99 22 4E 41 4D 45 20 41 4E | THIS".."NAME AN|
00002A70: 44 20 57 49 4C 4C 20 53 41 56 45 20 59 4F 55 52 |D WILL SAVE YOUR|
00002A80: 20 47 45 4E 45 52 41 54 45 44 22 3B 00 99 00 99 | GENERATED";....|
00002A90: 22 41 50 50 4C 49 43 41 54 49 4F 4E 20 50 52 4F |"APPLICATION PRO|
00002AA0: 47 52 41 4D 20 55 4E 44 45 52 20 54 48 49 53 20 |GRAM UNDER THIS |
00002AB0: 4E 41 4D 45 2E 22 00 99 22 11 11 C6 49 4C 45 20 |NAME.".."...ILE |
00002AC0: 4E 41 4D 45 3A 20 22 3B 3A 87 D1 3A 89 D6 B8 0E |NAME: ";:..:....|
00002AD0: 81 01 D1 33 89 0B D1 2C 4A B6 EA 92 48 D6 01 3D |...3...,J...H..=|
00002AE0: 96 01 3D 8A 00 2B 4F 03 4C 00 99 22 93 11 11 11 |..=..+O.L.."....|
00002AF0: D9 4F 55 52 20 53 43 52 45 45 4E 20 4C 41 59 4F |.OUR SCREEN LAYO|
00002B00: 55 54 20 57 49 4C 4C 20 4E 4F 57 20 42 45 20 53 |UT WILL NOW BE S|
00002B10: 41 56 45 44 2E 22 3A 8D 03 C5 B8 0E D4 01 60 94 |AVED.":.......`.|
00002B20: 01 60 82 2E 4F 05 48 CC 24 00 99 22 11 D9 4F 55 |.`..O.H.$.."..OU|
00002B30: 20 48 41 56 45 20 45 4C 45 43 54 45 44 20 54 4F | HAVE ELECTED TO|
00002B40: 20 53 54 4F 52 45 20 59 4F 55 52 20 44 41 54 41 | STORE YOUR DATA|
00002B50: 20 4F 4E 20 41 53 45 50 41 52 41 54 45 20 44 41 | ON ASEPARATE DA|
00002B60: 54 41 20 44 49 53 4B 2E 20 20 22 3B 00 99 22 D4 |TA DISK. ";..".|
00002B70: 48 49 53 20 44 41 54 41 20 44 49 53 4B 20 57 49 |HIS DATA DISK WI|
00002B80: 4C 4C 41 4C 53 4F 20 48 4F 4C 44 20 59 4F 55 52 |LLALSO HOLD YOUR|
00002B90: 20 53 43 52 45 45 4E 20 4C 41 59 4F 55 54 2E 22 | SCREEN LAYOUT."|
00002BA0: 3B 00 99 22 20 CD 41 4B 45 20 53 55 52 45 20 59 |;.." .AKE SURE Y|
00002BB0: 4F 55 52 20 44 41 54 41 20 44 49 53 4B 20 49 53 |OUR DATA DISK IS|
00002BC0: 20 49 4E 20 44 52 49 56 45 20 22 3B B6 28 C2 28 | IN DRIVE ";.(.(|
00002BD0: 39 36 38 29 AB 31 29 3A 4A E3 31 4C 00 99 22 11 |968).1):J.1L..".|
00002BE0: D9 4F 55 52 20 41 50 50 4C 49 43 41 54 49 4F 4E |.OUR APPLICATION|
00002BF0: 20 50 52 4F 47 52 41 4D 2C 20 44 41 54 41 2C 20 | PROGRAM, DATA, |
00002C00: 41 4E 44 20 20 20 20 20 53 43 52 45 45 4E 20 4C |AND SCREEN L|
00002C10: 41 59 4F 55 54 20 57 49 4C 4C 20 41 4C 4C 20 42 |AYOUT WILL ALL B|
00002C20: 45 22 3B 00 99 22 20 53 54 4F 52 45 44 20 4F 4E |E";.." STORED ON|
00002C30: 20 59 4F 55 52 41 50 50 4C 49 43 41 54 49 4F 4E | YOURAPPLICATION|
00002C40: 20 44 49 53 4B 2E 20 20 CD 41 4B 45 20 53 55 52 | DISK. .AKE SUR|
00002C50: 45 20 59 4F 55 52 20 20 20 20 20 20 20 41 50 50 |E YOUR APP|
00002C60: 4C 49 43 41 54 49 4F 4E 20 44 49 53 4B 22 3B 00 |LICATION DISK";.|
00002C70: 99 22 20 49 53 20 49 4E 20 44 52 49 56 45 20 22 |." IS IN DRIVE "|
00002C80: 3B B6 28 C2 28 39 36 38 29 AB 31 29 3A 4A E3 31 |;.(.(968).1):J.1|
00002C90: 4C 00 99 22 93 11 11 11 C5 52 52 4F 52 3A CE 4F |L..".....RROR:.O|
00002CA0: 20 53 43 52 45 45 4E 20 4C 41 59 4F 55 54 20 49 | SCREEN LAYOUT I|
00002CB0: 4E 20 4D 45 4D 4F 52 59 20 54 4F 20 53 41 56 45 |N MEMORY TO SAVE|
00002CC0: 22 3A 4A E3 31 4C 4A C9 52 96 01 3D 8A 00 2B 4F |":J.1LJ.R..=..+O|
00002CD0: 05 48 E2 CB 96 01 3D 8A 02 2F 53 01 D6 01 3D 00 |.H....=../S...=.|
00002CE0: A0 31 35 00 9F 31 35 2C 44 56 2C 31 35 00 9F 32 |.15..15,DV,15..2|
00002CF0: 2C 44 56 2C 32 2C 44 52 24 AA 22 3A 22 AA 46 24 |,DV,2,DR$.":".F$|
00002D00: 3A 4A B5 6B 90 A3 89 3E 2E 4F 05 48 CA BD 00 99 |:J.k...>.O.H....|
00002D10: 00 99 22 11 11 C5 52 52 4F 52 3A 20 C6 49 4C 45 |.."...RROR: .ILE|
00002D20: 20 4E 4F 54 20 46 4F 55 4E 44 2E 22 3B C8 28 59 | NOT FOUND.";.(Y|
00002D30: 24 2C 32 30 29 3B 53 50 24 3B 3A 4A E3 31 00 A0 |$,20);SP$;:J.1..|
00002D40: 32 3A 4C 80 D4 01 21 80 D4 01 67 80 D0 1E 80 D4 |2:L...!...g.....|
00002D50: 01 52 80 D4 01 6E 00 84 32 2C 4C 3A 94 01 67 80 |.R...n..2,L:..g.|
00002D60: 2B 4F 05 48 CA 5B 94 01 21 D4 01 21 94 01 67 94 |+O.H.[..!..!..g.|
00002D70: 01 21 01 81 02 42 01 21 94 01 21 8A 01 4B E2 0C |.!...B.!..!..K..|
00002D80: 00 84 32 2C 50 24 28 4A 29 2C 58 25 28 4A 29 2C |..2,P$(J),X%(J),|
00002D90: 59 25 28 4A 29 2C 4C 25 28 4A 29 2C 54 24 28 4A |Y%(J),L%(J),T$(J|
00002DA0: 29 3A 47 01 21 00 84 32 2C 49 3A 90 1E 80 2B 4F |):G.!..2,I:...+O|
00002DB0: 05 48 CA 0E 94 01 21 D4 01 21 90 1E 94 01 21 01 |.H....!..!....!.|
00002DC0: 81 02 42 01 21 94 01 21 8A 01 50 E2 0C 00 84 32 |..B.!..!..P....2|
00002DD0: 2C 50 24 28 4A 29 2C 58 25 28 4A 29 2C 59 25 28 |,P$(J),X%(J),Y%(|
00002DE0: 4A 29 2C 4C 25 28 4A 29 2C 54 24 28 4A 29 3A 47 |J),L%(J),T$(J):G|
00002DF0: 01 21 00 84 32 2C 4E 47 3A 94 01 52 80 2B 4F 05 |.!..2,NG:..R.+O.|
00002E00: 48 C9 BE 94 01 21 D4 01 21 94 01 52 94 01 21 01 |H....!..!..R..!.|
00002E10: 81 02 42 01 21 94 01 21 8A 01 47 E2 0C 00 84 32 |..B.!..!..G....2|
00002E20: 2C 50 24 28 4A 29 2C 58 25 28 4A 29 2C 59 25 28 |,P$(J),X%(J),Y%(|
00002E30: 4A 29 2C 4C 25 28 4A 29 2C 54 24 28 4A 29 3A 47 |J),L%(J),T$(J):G|
00002E40: 01 21 00 84 32 2C 5A 3A 94 01 6E 80 2B 4F 05 48 |.!..2,Z:..n.+O.H|
00002E50: C9 62 94 01 21 D4 01 21 94 01 6E 94 01 21 01 81 |.b..!..!..n..!..|
00002E60: 02 42 01 21 94 01 21 8A 01 54 E2 0C 94 01 21 80 |.B.!..!..T....!.|
00002E70: E1 0A 00 84 32 2C 50 24 28 4A 29 2C 58 25 28 4A |....2,P$(J),X%(J|
00002E80: 29 2C 59 25 28 4A 29 3A 94 01 21 A2 08 89 A0 B8 |),Y%(J):..!.....|
00002E90: 13 2B 4F 09 94 01 21 8A 00 E2 08 47 01 21 94 01 |.+O...!....G.!..|
00002EA0: 21 81 02 D4 01 13 81 D0 C6 00 A0 32 3A 4C 00 99 |!..........2:L..|
00002EB0: 22 93 22 00 99 C8 28 59 24 2C 32 30 29 3B 22 20 |"."...(Y$,20);" |
00002EC0: D4 59 50 45 20 12 44 92 20 41 4E 44 20 12 D2 C5 |.YPE .D. AND ...|
00002ED0: D4 D5 D2 CE 92 20 46 4F 52 20 44 49 52 45 43 54 |..... FOR DIRECT|
00002EE0: 4F 52 59 22 00 99 22 13 11 11 11 11 20 C5 4E 54 |ORY".."..... .NT|
00002EF0: 45 52 20 54 48 45 20 46 49 4C 45 20 4E 41 4D 45 |ER THE FILE NAME|
00002F00: 20 59 4F 55 20 57 49 53 48 20 54 4F 20 4C 4F 41 | YOU WISH TO LOA|
00002F10: 44 2E 22 00 99 22 11 C6 49 4C 45 20 4E 41 4D 45 |D.".."..ILE NAME|
00002F20: 3A 20 22 3B 3A 87 D1 3A 89 D6 B8 0E 81 01 D1 33 |: ";:..:.......3|
00002F30: 89 0B D1 2C 4A B6 EA 92 48 D6 01 3D 96 01 3D 8A |...,J...H..=..=.|
00002F40: 01 44 2B 4F 08 4A AE 31 48 C9 52 4C 94 01 13 80 |.D+O.J.1H.RL....|
00002F50: 2D 4F 03 4C 80 D4 01 21 94 01 13 42 01 21 94 01 |-O.L...!...B.!..|
00002F60: 21 A2 0C 8A 01 54 2B 4F 29 00 99 C8 28 59 24 2C |!....T+O)...(Y$,|
00002F70: 59 25 28 4A 29 29 3B A6 58 25 28 4A 29 29 3B 22 |Y%(J));.X%(J));"|
00002F80: 5E 22 3B 50 24 28 4A 29 3B 22 5E 22 3A 48 C7 D1 |^";P$(J);"^":H..|
00002F90: 94 01 21 A2 0E 8A 01 44 2B 4F 2C 00 99 C8 28 59 |..!....D+O,...(Y|
00002FA0: 24 2C 59 25 28 4A 29 29 3B A6 58 25 28 4A 29 29 |$,Y%(J));.X%(J))|
00002FB0: 3B 50 24 28 4A 29 3B 22 2E 2E 2F 2E 2E 2F 2E 2E |;P$(J);"../../..|
00002FC0: 22 3A 48 C7 D1 94 01 21 A2 0E 8A 01 41 2B 4F 05 |":H....!....A+O.|
00002FD0: 48 C7 F9 00 99 C8 28 59 24 2C 59 25 28 4A 29 29 |H.....(Y$,Y%(J))|
00002FE0: 3B A6 58 25 28 4A 29 29 3B 50 24 28 4A 29 3B C8 |;.X%(J));P$(J);.|
00002FF0: 28 44 54 24 2C 4C 25 28 4A 29 AB 31 29 3B 54 24 |(DT$,L%(J).1);T$|
00003000: 28 4A 29 3A 48 C7 D1 00 99 C8 28 59 24 2C 59 25 |(J):H.....(Y$,Y%|
00003010: 28 4A 29 29 3B A6 58 25 28 4A 29 29 3B 50 24 28 |(J));.X%(J));P$(|
00003020: 4A 29 3B C8 28 44 54 24 2C 4C 25 28 4A 29 29 3A |J);.(DT$,L%(J)):|
00003030: 47 01 21 4C 00 99 22 93 22 3B C8 28 59 24 2C 35 |G.!L..".";.(Y$,5|
00003040: 29 22 D7 C1 D2 CE C9 CE C7 3A 20 C9 46 20 59 4F |)".......: .F YO|
00003050: 55 20 57 41 4E 54 20 59 4F 55 52 20 4E 45 57 20 |U WANT YOUR NEW |
00003060: 46 49 45 4C 44 22 00 99 22 50 4F 53 49 54 49 4F |FIELD".."POSITIO|
00003070: 4E 53 20 54 4F 20 42 45 20 4D 41 44 45 20 50 45 |NS TO BE MADE PE|
00003080: 52 4D 41 4E 45 4E 54 2E 22 3B 00 99 22 20 20 D9 |RMANENT.";.." .|
00003090: 4F 55 20 20 20 20 4D 55 53 54 20 53 41 56 45 20 |OU MUST SAVE |
000030A0: 59 4F 55 52 20 53 43 52 45 45 4E 20 42 45 46 4F |YOUR SCREEN BEFO|
000030B0: 52 45 20 45 58 49 54 49 4E 47 20 20 20 20 D3 43 |RE EXITING .C|
000030C0: 52 45 45 4E D7 52 49 54 45 52 2E 22 3A 4A E3 31 |REEN.RITER.":J.1|
000030D0: 4C 91 E9 91 E9 B8 0E 89 7F 06 50 00 99 C8 28 59 |L.........P...(Y|
000030E0: 24 2C 32 33 29 3B 53 50 24 3B 00 99 53 50 24 3B |$,23);SP$;..SP$;|
000030F0: 00 99 53 50 24 3B 3A 90 B1 82 2B 4F 05 48 C6 BB |..SP$;:...+O.H..|
00003100: 80 D4 01 75 94 01 13 42 01 75 94 01 75 8A 00 E2 |...u...B.u..u...|
00003110: 0C 94 01 75 8A 00 E2 0E 46 80 D4 01 7C 80 D4 01 |...u....F...|...|
00003120: 83 80 D0 CD 80 D4 01 8A 8D 04 00 D4 01 91 80 D1 |................|
00003130: F7 81 D5 01 98 80 D0 C6 8A 00 D6 01 9F 80 D5 01 |................|
00003140: A6 80 D5 01 AD 00 99 C8 28 59 24 2C 32 34 29 22 |........(Y$,24)"|
00003150: 20 20 20 20 20 20 20 20 20 20 20 20 20 D2 45 41 | .EA|
00003160: 44 49 4E 47 20 53 43 52 45 45 4E 22 3A 91 F7 81 |DING SCREEN":...|
00003170: 02 D4 01 13 94 01 91 8D 07 6F 2C 4F 09 91 F7 B8 |.........o,O....|
00003180: 00 D0 C6 4C 94 01 91 8D 07 6F 2A 4F 05 48 C6 94 |...L.....o*O.H..|
00003190: 91 F7 89 31 2A 4F 24 8A 1A CF 4E 4C 59 20 34 39 |...1*O$...NLY 49|
000031A0: 20 46 49 45 4C 44 53 20 41 52 45 20 41 4C 4C 4F | FIELDS ARE ALLO|
000031B0: 57 45 44 D6 01 B4 48 C0 22 94 01 91 8D 04 00 02 |WED...H.".......|
000031C0: 89 28 04 B8 01 89 28 03 94 01 91 8D 04 00 02 2E |.(....(.........|
000031D0: 90 C6 81 2E 07 4F 05 48 C5 FC 8A 22 D4 48 45 20 |.....O.H...".HE |
000031E0: 50 52 4F 4D 50 54 20 4D 41 59 20 4E 4F 54 20 42 |PROMPT MAY NOT B|
000031F0: 45 20 4F 4E 20 54 57 4F 20 4C 49 4E 45 53 D6 01 |E ON TWO LINES..|
00003200: B4 48 C0 22 94 01 91 B8 0E D1 DB 94 01 91 91 DB |.H."............|
00003210: 89 80 07 50 90 C6 80 2B 4F 12 94 01 91 81 02 94 |...P...+O.......|
00003220: 01 91 81 02 B8 0E 89 7F 06 50 90 C6 80 2B 91 DB |.........P...+..|
00003230: 89 20 2B 06 4F 0D 94 01 91 81 01 D4 01 91 48 C6 |. +.O.........H.|
00003240: 7C 96 01 9F 81 B8 14 8A 01 20 2B 4F 11 96 01 9F ||........ +O....|
00003250: 96 01 9F B8 0F 81 02 B8 15 D6 01 9F 96 01 9F B8 |................|
00003260: 0F 89 28 2A 4F 20 8A 16 C5 52 52 4F 52 20 49 4E |..(*O ...RROR IN|
00003270: 20 53 43 52 45 45 4E 20 4C 41 59 4F 55 54 D6 01 | SCREEN LAYOUT..|
00003280: B4 48 C0 22 90 C6 81 2B 91 DB 89 2E 2B 06 4F 05 |.H."...+....+.O.|
00003290: 48 C1 97 90 C6 82 2B 91 DB 89 23 2E 91 DB 89 24 |H.....+...#....$|
000032A0: 2E 06 91 DB 89 2E 2E 06 91 DB 89 2F 2E 06 06 4F |.........../...O|
000032B0: 05 48 C4 73 91 DB 89 1E 2B 90 C6 83 2E 06 4F 05 |.H.s....+.....O.|
000032C0: 48 C1 1E 91 DB 89 2F 2B 90 C6 82 2B 06 4F 18 81 |H...../+...+.O..|
000032D0: D4 01 8A 94 01 7C 81 01 D4 01 7C 91 F7 8A 01 44 |.....|....|....D|
000032E0: E2 0E 48 C1 11 91 DB 89 24 2B 90 C6 82 2B 06 4F |..H.....$+...+.O|
000032F0: 0C 91 F7 8A 01 24 E2 0E 48 C1 29 91 DB 89 23 2B |.....$..H.)...#+|
00003300: 90 C6 82 2B 06 4F 0C 91 F7 8A 01 23 E2 0E 48 C1 |...+.O.....#..H.|
00003310: 29 90 C6 83 2B 91 DB 89 1E 2B 06 4F 0C 91 F7 8A |)...+....+.O....|
00003320: 01 54 E2 0E 48 C1 85 90 C6 4D 06 C1 55 C1 29 C1 |.T..H....M..U.).|
00003330: 55 91 DB 89 23 2B 91 DB 89 24 2B 07 91 DB 89 2E |U...#+...$+.....|
00003340: 2B 07 91 DB 89 2F 2B 07 19 4F 16 4A C0 45 96 01 |+..../+..O.J.E..|
00003350: 9F 91 DB B8 13 01 D6 01 9F 81 D0 C6 48 C1 11 8A |............H...|
00003360: 26 C1 20 46 49 45 4C 44 20 43 41 4E 4E 4F 54 20 |&. FIELD CANNOT |
00003370: 53 54 41 52 54 20 57 49 54 48 20 2E 2C 2F 2C 23 |START WITH .,/,#|
00003380: 2C 20 4F 52 20 24 2E D6 01 B4 48 C0 22 91 F7 95 |, OR $....H."...|
00003390: 01 98 E1 0A 81 D5 01 98 91 F7 A2 0E 8A 00 2B 4F |..............+O|
000033A0: 09 91 F7 8A 01 41 E2 0E 94 01 91 94 01 91 B8 0E |.....A..........|
000033B0: 89 7F 06 50 91 F7 A2 0E 8A 01 44 2E 4F 05 48 C4 |...P......D.O.H.|
000033C0: 05 94 01 7C 82 2E 91 F7 A1 0A 86 2E 07 4F 2E 8A |...|.........O..|
000033D0: 24 C9 4E 56 41 4C 49 44 20 44 41 54 45 20 46 4F |$.NVALID DATE FO|
000033E0: 52 4D 41 54 20 49 4E 20 53 43 52 45 45 4E 20 4C |RMAT IN SCREEN L|
000033F0: 41 59 4F 55 54 D6 01 B4 48 C0 22 91 F7 A2 0E 8A |AYOUT...H.".....|
00003400: 01 44 2B 91 F7 A2 0E 8A 01 41 2B 07 4F 0F 91 F7 |.D+......A+.O...|
00003410: 8A 01 4B E2 0C 4A C0 CC 48 C2 12 4A C0 CC 00 99 |..K..J..H..J....|
00003420: C8 28 59 24 2C 32 34 29 3B 53 50 24 00 99 C8 28 |.(Y$,24);SP$...(|
00003430: 59 24 2C 32 33 29 22 20 12 4B 92 20 4B 45 59 45 |Y$,23)" .K. KEYE|
00003440: 44 20 20 12 50 92 20 50 52 4F 47 20 43 41 4C 43 |D .P. PROG CALC|
00003450: 20 20 4F 52 20 20 12 47 92 20 47 54 20 46 49 45 | OR .G. GT FIE|
00003460: 4C 44 22 3A 91 F7 A1 0A 89 09 2A 4F 30 8A 26 4E |LD":......*O0.&N|
00003470: 55 4D 45 52 49 43 20 46 49 45 4C 44 53 20 41 52 |UMERIC FIELDS AR|
00003480: 45 20 4C 49 4D 49 54 45 44 20 54 4F 20 39 20 44 |E LIMITED TO 9 D|
00003490: 49 47 49 54 53 D6 01 B4 48 C0 22 8A 00 D2 4F 89 |IGITS...H."...O.|
000034A0: 26 D1 2C 89 17 D1 33 81 D1 3A 4A B6 EA 92 48 D2 |&.,...3..:J...H.|
000034B0: 4F 92 4F 8A 01 4B 2E 92 4F 8A 01 50 2E 06 92 4F |O.O..K..O..P...O|
000034C0: 8A 01 47 2E 06 4F 05 48 C3 E2 91 F7 92 4F E2 0C |..G..O.H.....O..|
000034D0: 92 4F 8A 01 4B 2B 4F 05 48 C2 12 91 F7 A2 0E 8A |.O..K+O.H.......|
000034E0: 01 23 2B 4F 10 92 09 91 F7 A1 0A B8 14 D6 01 BB |.#+O............|
000034F0: 48 C2 D2 91 F7 A1 0A 82 2F 4F 0E 8A 04 30 2E 30 |H......./O...0.0|
00003500: 30 D6 01 BB 48 C2 D2 91 F7 A1 0A 83 2B 4F 0E 8A |0...H.......+O..|
00003510: 04 30 2E 39 39 D6 01 BB 48 C2 D2 92 09 91 F7 A1 |.0.99...H.......|
00003520: 0A 83 02 B8 14 8A 03 2E 39 39 01 D6 01 BB 00 99 |........99......|
00003530: C8 28 59 24 2C 32 33 29 3B 53 50 24 3B 00 99 53 |.(Y$,23);SP$;..S|
00003540: 50 24 3B 00 99 C8 28 59 24 2C 32 33 29 3B 22 D4 |P$;...(Y$,23);".|
00003550: 48 45 20 4D 41 58 20 46 4F 52 20 54 48 49 53 20 |HE MAX FOR THIS |
00003560: 46 49 45 4C 44 3A 20 22 3B C8 28 4D 58 24 AA 53 |FIELD: ";.(MX$.S|
00003570: 50 24 2C 31 36 29 00 99 C8 28 59 24 2C 32 34 29 |P$,16)...(Y$,24)|
00003580: 3B 22 C9 53 20 54 48 49 53 20 4F 4B 20 3F 20 28 |;".S THIS OK ? (|
00003590: 59 2F 4E 29 22 3B 3A 89 18 D1 33 89 13 D1 2C 81 |Y/N)";:...3...,.|
000035A0: D1 3A 4A B6 EA 92 48 8A 01 59 2E 92 48 8A 01 4E |.:J...H..Y..H..N|
000035B0: 2E 06 4F 15 00 99 C8 28 59 24 2C 32 34 29 3B 53 |..O....(Y$,24);S|
000035C0: 50 24 3B 3A 48 C2 8A 92 48 8A 01 4E 2B 4F 21 8A |P$;:H...H..N+O!.|
000035D0: 17 C3 48 41 4E 47 45 20 54 48 45 20 46 49 45 4C |..HANGE THE FIEL|
000035E0: 44 20 4C 45 4E 47 54 48 D6 01 B4 48 C0 22 00 99 |D LENGTH...H."..|
000035F0: C8 28 59 24 2C 32 33 29 53 50 24 3B 00 99 53 50 |.(Y$,23)SP$;..SP|
00003600: 24 3B 3A 91 F7 A2 0E 8A 01 44 2B 4F 07 91 F7 86 |$;:......D+O....|
00003610: E1 0A 00 99 C8 28 59 24 2C 32 34 29 A6 31 33 29 |.....(Y$,24).13)|
00003620: 22 D2 45 41 44 49 4E 47 20 53 43 52 45 45 4E 22 |".EADING SCREEN"|
00003630: 3A 80 D4 01 8A 91 F7 81 01 D1 F7 8A 00 D6 01 9F |:...............|
00003640: 80 D0 C6 91 F7 8A 00 E2 0E 80 D4 01 7C 91 DB 89 |............|...|
00003650: 20 2B 4F 05 48 C0 FE 4A C0 F0 94 01 91 94 01 91 | +O.H..J........|
00003660: B8 0E 89 80 07 50 48 C5 BF 91 F7 96 01 9F E2 08 |.....PH.........|
00003670: 8A 00 D6 01 9F 82 D0 C6 48 C1 11 91 F7 96 01 9F |........H.......|
00003680: E2 08 91 F7 8A 01 54 E2 0C 4A C0 CC 8A 00 D6 01 |......T..J......|
00003690: 9F 91 F7 81 01 D1 F7 80 D0 C6 80 D5 01 AD 80 D5 |................|
000036A0: 01 A6 91 F7 8A 00 E2 0E 48 C0 FE 4A C0 45 96 01 |........H..J.E..|
000036B0: 9F 91 DB B8 13 01 D6 01 9F 96 01 9F 81 B8 14 8A |................|
000036C0: 01 20 2B 4F 11 96 01 9F 96 01 9F B8 0F 81 02 B8 |. +O............|
000036D0: 15 D6 01 9F 48 C1 11 95 01 98 81 01 D5 01 98 48 |....H..........H|
000036E0: C1 11 8A 00 D6 01 9F 83 D0 C6 91 F7 80 E1 0A 94 |................|
000036F0: 01 91 81 01 D4 01 91 94 01 83 81 01 D4 01 83 48 |...............H|
00003700: C6 7C 94 01 91 81 01 D4 01 91 4A C0 F0 48 C6 94 |.|........J..H..|
00003710: 94 01 91 94 01 83 02 81 02 D4 01 C2 94 01 91 42 |...............B|
00003720: 01 C2 94 01 C2 94 01 C2 B8 0E 89 7F 06 50 46 80 |.............PF.|
00003730: D4 01 83 4C 91 F7 A2 0C 8A 01 54 2B 4F 07 91 F7 |...L......T+O...|
00003740: 80 E1 0A 94 01 91 91 F7 A2 08 B8 0F 91 F7 A1 0A |................|
00003750: 01 02 D5 01 C9 95 01 C9 80 2F 4F 08 8D 04 00 D5 |........./O.....|
00003760: 01 C9 95 01 C9 8D 04 00 02 89 28 04 D5 01 A6 95 |..........(.....|
00003770: 01 C9 8D 04 00 02 95 01 A6 89 28 03 02 D5 01 AD |..........(.....|
00003780: 91 F7 95 01 AD E1 04 91 F7 95 01 A6 81 01 E1 06 |................|
00003790: 91 F7 A2 0C 8A 01 54 2B 4F 0B 91 F7 95 01 AD 81 |......T+O.......|
000037A0: 02 E1 04 91 F7 A2 0E 8A 01 44 2B 4F 0B 91 F7 95 |.........D+O....|
000037B0: 01 AD 82 02 E1 04 80 D5 01 C9 4C 91 DB 89 3F 2A |..........L...?*|
000037C0: 91 DB 89 7F 2D 06 4F 09 91 DB 89 80 01 D1 DB 91 |....-.O.........|
000037D0: DB 89 20 2D 4F 09 91 DB 89 40 01 D1 DB 4C 00 99 |.. -O....@...L..|
000037E0: C8 28 59 24 2C 32 33 29 3B 53 50 24 3B 00 99 53 |.(Y$,23);SP$;..S|
000037F0: 50 24 3B 00 99 53 50 24 C8 28 59 24 2C 32 33 29 |P$;..SP$.(Y$,23)|
00003800: 3B 00 99 C8 28 53 50 24 2C B5 28 28 34 30 AB C3 |;...(SP$,.((40..|
00003810: 28 45 52 24 29 29 AD 32 29 29 3B 45 52 24 00 99 |(ER$)).2));ER$..|
00003820: C8 28 59 24 2C 32 34 29 22 D0 52 45 53 53 20 12 |.(Y$,24)".RESS .|
00003830: C6 92 20 54 4F 20 C6 49 58 20 45 52 52 4F 52 20 |.. TO .IX ERROR |
00003840: 41 4E 44 20 52 45 53 55 4D 45 20 52 45 41 44 49 |AND RESUME READI|
00003850: 4E 47 22 00 99 22 D0 52 45 53 53 20 12 D3 92 20 |NG"..".RESS ... |
00003860: 54 4F 20 D3 54 4F 50 20 52 45 41 44 49 4E 47 20 |TO .TOP READING |
00003870: 41 4E 44 20 52 45 44 4F 20 53 43 52 45 45 4E 22 |AND REDO SCREEN"|
00003880: 3B 00 A1 43 24 3A 96 01 9F 8A 01 46 2E 96 01 9F |;..C$:.....F....|
00003890: 8A 01 C6 2E 06 96 01 9F 8A 01 53 2E 06 96 01 9F |..........S.....|
000038A0: 8A 01 D3 2E 06 4F 05 48 BF 7F 94 01 91 94 01 83 |.....O.H........|
000038B0: 02 D4 01 C2 94 01 91 42 01 C2 94 01 C2 94 01 C2 |.......B........|
000038C0: B8 0E 89 7F 06 50 46 00 99 C8 28 59 24 2C 32 33 |.....PF...(Y$,23|
000038D0: 29 3B 53 50 24 3B 53 50 24 22 20 22 3B C8 28 59 |);SP$;SP$" ";.(Y|
000038E0: 24 2C 32 35 29 3B 53 50 24 3B 3A 96 01 9F 8A 01 |$,25);SP$;:.....|
000038F0: 53 2B 96 01 9F 8A 01 D3 2B 07 4F 14 81 D0 B1 80 |S+......+.O.....|
00003900: D1 B8 81 D1 BF 80 D1 2C 81 D1 33 48 E0 83 82 D0 |.......,..3H....|
00003910: B1 94 01 91 94 01 83 02 8D 04 00 02 89 28 04 81 |.............(..|
00003920: 01 D1 BF 94 01 91 94 01 83 02 91 BF 89 28 03 8D |.............(..|
00003930: 03 D8 01 02 D1 B8 91 B8 D1 2C 91 BF D1 33 94 01 |.........,...3..|
00003940: 91 94 01 83 02 D4 01 91 81 D5 01 98 8D 03 D8 89 |................|
00003950: 28 91 33 03 01 91 2C 01 B8 0E D1 DB 8A 00 D6 01 |(.3...,.........|
00003960: 9F 80 D4 01 7C 80 D4 01 83 80 D0 CD 80 D4 01 8A |....|...........|
00003970: 80 D0 C6 80 D5 01 AD 80 D5 01 A6 91 F7 8A 00 E2 |................|
00003980: 0E 91 F7 8A 00 E2 0C 48 E0 73 00 99 22 93 D4 48 |.......H.s.."..H|
00003990: 49 53 20 4F 50 54 49 4F 4E 20 41 4C 4C 4F 57 53 |IS OPTION ALLOWS|
000039A0: 20 59 4F 55 20 54 4F 20 43 52 45 41 54 45 20 4F | YOU TO CREATE O|
000039B0: 52 20 45 44 49 54 22 3B 00 99 22 46 49 45 4C 44 |R EDIT";.."FIELD|
000039C0: 20 54 59 50 45 53 2E 20 D5 53 45 20 54 48 45 20 | TYPES. .SE THE |
000039D0: 12 C3 D2 D3 D2 92 20 4B 45 59 53 20 54 4F 20 4D |...... KEYS TO M|
000039E0: 4F 56 45 20 20 22 3B 00 99 22 54 48 45 20 43 55 |OVE ";.."THE CU|
000039F0: 52 53 4F 52 20 41 52 4F 55 4E 44 20 54 48 45 20 |RSOR AROUND THE |
00003A00: 53 43 52 45 45 4E 2E 20 D5 53 45 20 54 48 45 20 |SCREEN. .SE THE |
00003A10: 20 22 3B 00 99 22 20 12 C4 C5 CC 92 20 4B 45 59 | ";.." ..... KEY|
00003A20: 20 54 4F 20 42 41 43 4B 53 50 41 43 45 2C 20 54 | TO BACKSPACE, T|
00003A30: 48 45 20 12 D2 C5 D4 D5 D2 CE 92 20 4B 45 59 20 |HE ........ KEY |
00003A40: 54 4F 22 00 99 22 4D 4F 56 45 20 54 4F 20 54 48 |TO".."MOVE TO TH|
00003A50: 45 20 4E 45 58 54 20 4C 49 4E 45 20 41 4E 44 20 |E NEXT LINE AND |
00003A60: 54 48 45 20 12 C6 37 92 20 4B 45 59 20 54 4F 22 |THE ..7. KEY TO"|
00003A70: 3B 00 99 22 20 54 41 42 20 4F 56 45 52 20 31 30 |;.." TAB OVER 10|
00003A80: 20 53 50 41 43 45 53 20 54 4F 20 54 48 45 20 52 | SPACES TO THE R|
00003A90: 49 47 48 54 2E 22 00 99 22 D0 52 4F 4D 50 54 53 |IGHT."..".ROMPTS|
00003AA0: 20 4D 55 53 54 20 42 45 20 49 4E 20 54 48 45 20 | MUST BE IN THE |
00003AB0: 46 4F 4C 4C 4F 57 49 4E 47 20 46 4F 52 4D 3A 11 |FOLLOWING FORM:.|
00003AC0: 22 00 99 A3 31 30 29 22 12 D0 52 4F 4D 50 54 92 |"...10)"..ROMPT.|
00003AD0: 20 20 12 CC 45 4E 47 54 48 92 22 00 99 A3 31 30 | ..ENGTH."...10|
00003AE0: 29 22 41 44 44 52 45 53 53 20 2E 2E 2E 2E 2E 2E |)"ADDRESS ......|
00003AF0: 22 00 99 22 11 D9 4F 55 20 4D 41 59 20 4C 45 41 |".."..OU MAY LEA|
00003B00: 56 45 20 41 4E 59 20 4E 55 4D 42 45 52 20 4F 46 |VE ANY NUMBER OF|
00003B10: 20 53 50 41 43 45 53 20 22 3B 00 99 22 20 20 20 | SPACES ";.." |
00003B20: 20 20 42 45 54 57 45 45 4E 20 54 48 45 20 50 52 | BETWEEN THE PR|
00003B30: 4F 4D 50 54 20 41 4E 44 20 54 48 45 20 44 4F 54 |OMPT AND THE DOT|
00003B40: 53 2E 20 D4 48 45 20 22 00 99 22 4E 55 4D 42 45 |S. .HE ".."NUMBE|
00003B50: 52 20 4F 46 20 44 4F 54 53 20 53 50 45 43 49 46 |R OF DOTS SPECIF|
00003B60: 49 45 53 20 54 48 45 20 4D 41 58 49 4D 55 4D 22 |IES THE MAXIMUM"|
00003B70: 00 99 22 4C 45 4E 47 54 48 20 46 4F 52 20 4B 45 |.."LENGTH FOR KE|
00003B80: 59 42 4F 41 52 44 2D 45 4E 54 45 52 45 44 20 46 |YBOARD-ENTERED F|
00003B90: 49 45 4C 44 53 2E 22 00 99 22 C6 4F 52 20 43 4F |IELDS."..".OR CO|
00003BA0: 4D 50 55 54 45 44 20 46 49 45 4C 44 53 2C 20 54 |MPUTED FIELDS, T|
00003BB0: 48 45 20 4E 55 4D 42 45 52 20 4F 46 20 44 4F 54 |HE NUMBER OF DOT|
00003BC0: 53 22 00 99 22 53 50 45 43 49 46 49 45 53 20 54 |S".."SPECIFIES T|
00003BD0: 48 45 20 4D 41 58 49 4D 55 4D 20 56 41 4C 55 45 |HE MAXIMUM VALUE|
00003BE0: 20 54 48 41 54 20 4D 41 59 20 42 45 22 00 99 22 | THAT MAY BE".."|
00003BF0: 45 4E 54 45 52 45 44 20 49 4E 20 54 48 41 54 20 |ENTERED IN THAT |
00003C00: 46 49 45 4C 44 2E 22 3A 4A E3 31 00 99 22 D7 48 |FIELD.":J.1..".H|
00003C10: 45 4E 20 59 4F 55 20 41 52 45 20 46 49 4E 49 53 |EN YOU ARE FINIS|
00003C20: 48 45 44 20 50 52 45 53 53 20 54 48 45 20 12 C6 |HED PRESS THE ..|
00003C30: 31 92 20 4B 45 59 2E 22 00 99 22 D3 43 52 45 45 |1. KEY."..".CREE|
00003C40: 4E D7 52 49 54 45 52 20 57 49 4C 4C 20 54 48 45 |N.RITER WILL THE|
00003C50: 4E 20 52 45 41 44 20 54 48 45 20 53 43 52 45 45 |N READ THE SCREE|
00003C60: 4E 22 00 99 22 41 4E 44 20 41 53 4B 20 57 48 45 |N".."AND ASK WHE|
00003C70: 54 48 45 52 20 45 41 43 48 20 4E 55 4D 45 52 49 |THER EACH NUMERI|
00003C80: 43 20 41 4E 44 20 44 4F 4C 4C 41 52 22 00 99 22 |C AND DOLLAR".."|
00003C90: 46 49 45 4C 44 20 49 53 20 54 4F 20 42 45 20 45 |FIELD IS TO BE E|
00003CA0: 4E 54 45 52 45 44 20 46 52 4F 4D 20 54 48 45 20 |NTERED FROM THE |
00003CB0: 4B 45 59 2D 22 00 99 22 42 4F 41 52 44 20 28 4B |KEY-".."BOARD (K|
00003CC0: 29 2C 20 43 41 4C 43 55 4C 41 54 45 44 20 42 59 |), CALCULATED BY|
00003CD0: 20 54 48 45 20 50 52 4F 47 52 41 4D 20 28 50 29 | THE PROGRAM (P)|
00003CE0: 22 3B 00 99 22 2C 4F 52 20 53 55 4D 4D 45 44 20 |";..",OR SUMMED |
00003CF0: 41 53 20 41 20 47 52 41 4E 44 20 54 4F 54 41 4C |AS A GRAND TOTAL|
00003D00: 20 46 49 45 4C 44 20 28 47 29 2E 22 00 99 22 11 | FIELD (G)."..".|
00003D10: C1 20 4C 41 42 45 4C 20 49 53 20 41 20 57 4F 52 |. LABEL IS A WOR|
00003D20: 44 20 4F 52 20 50 48 52 41 53 45 20 4E 4F 54 20 |D OR PHRASE NOT |
00003D30: 20 20 20 20 20 20 20 20 43 4F 4E 4E 45 43 54 45 | CONNECTE|
00003D40: 44 22 3B 00 99 22 20 57 49 54 48 20 44 41 54 41 |D";.." WITH DATA|
00003D50: 2E 20 20 D9 4F 55 20 4D 41 59 20 53 50 45 43 49 |. .OU MAY SPECI|
00003D60: 46 59 20 20 20 41 20 4C 41 42 45 4C 20 42 59 22 |FY A LABEL BY"|
00003D70: 3B 00 99 22 20 50 4C 41 43 49 4E 47 20 55 50 2D |;.." PLACING UP-|
00003D80: 41 52 52 4F 57 53 20 28 5E 29 20 20 20 20 20 20 |ARROWS (^) |
00003D90: 20 20 49 4D 4D 45 44 49 41 54 45 4C 59 20 42 45 | IMMEDIATELY BE|
00003DA0: 46 4F 52 45 20 41 4E 44 20 41 46 54 45 52 20 49 |FORE AND AFTER I|
00003DB0: 54 2E 22 00 99 22 11 11 C6 4F 52 20 45 58 41 4D |T.".."...OR EXAM|
00003DC0: 50 4C 45 3A 20 5E D4 48 49 53 20 49 53 20 41 20 |PLE: ^.HIS IS A |
00003DD0: 4C 41 42 45 4C 5E 22 3A 4A E3 31 00 99 22 C9 46 |LABEL^":J.1..".F|
00003DE0: 20 59 4F 55 20 57 49 53 48 20 59 4F 55 20 4D 41 | YOU WISH YOU MA|
00003DF0: 59 20 4D 41 52 4B 20 41 20 46 49 45 4C 44 20 41 |Y MARK A FIELD A|
00003E00: 53 20 4F 4E 45 22 3B 00 99 22 20 4F 46 20 54 48 |S ONE";.." OF TH|
00003E10: 52 45 45 20 53 50 45 43 49 41 4C 20 54 59 50 45 |REE SPECIAL TYPE|
00003E20: 53 3A 22 00 99 22 11 D4 4F 20 49 4E 44 49 43 41 |S:".."..O INDICA|
00003E30: 54 45 20 41 20 4E 55 4D 45 52 49 43 20 46 49 45 |TE A NUMERIC FIE|
00003E40: 4C 44 2C 20 53 55 42 53 54 49 54 55 45 20 41 20 |LD, SUBSTITUE A |
00003E50: 27 23 27 20 46 4F 52 20 54 48 45 20 4C 41 53 54 |'#' FOR THE LAST|
00003E60: 20 44 4F 54 2E 22 00 99 22 C6 4F 52 20 45 58 41 | DOT."..".OR EXA|
00003E70: 4D 50 4C 45 3A 20 C1 4D 4F 55 4E 54 20 2E 2E 2E |MPLE: .MOUNT ...|
00003E80: 2E 23 22 00 99 22 11 D4 4F 20 49 4E 44 49 43 41 |.#".."..O INDICA|
00003E90: 54 45 20 41 20 44 4F 4C 4C 41 52 20 46 49 45 4C |TE A DOLLAR FIEL|
00003EA0: 44 2C 20 53 55 42 53 54 49 54 55 45 20 41 20 20 |D, SUBSTITUE A |
00003EB0: 27 24 27 20 46 4F 52 20 54 48 45 20 4C 41 53 54 |'$' FOR THE LAST|
00003EC0: 20 44 4F 54 2E 22 00 99 22 C6 4F 52 20 45 58 41 | DOT."..".OR EXA|
00003ED0: 4D 50 4C 45 3A 20 D4 4F 54 41 4C 20 20 2E 2E 2E |MPLE: .OTAL ...|
00003EE0: 2E 24 11 22 00 99 22 D4 48 45 20 27 23 27 20 41 |.$."..".HE '#' A|
00003EF0: 4E 44 20 27 24 27 20 41 52 45 20 49 4E 43 4C 55 |ND '$' ARE INCLU|
00003F00: 44 45 44 20 49 4E 20 54 48 45 20 20 20 20 20 4C |DED IN THE L|
00003F10: 45 4E 47 54 48 20 43 4F 55 4E 54 20 28 46 4F 52 |ENGTH COUNT (FOR|
00003F20: 20 4B 45 59 42 4F 41 52 44 2D 22 3B 00 99 22 45 | KEYBOARD-";.."E|
00003F30: 4E 54 45 52 45 44 20 20 20 20 20 20 46 49 45 4C |NTERED FIEL|
00003F40: 44 53 29 2E 11 22 00 99 22 D0 52 4F 47 52 41 4D |DS).."..".ROGRAM|
00003F50: 20 43 41 4C 43 55 4C 41 54 45 44 20 46 49 45 4C | CALCULATED FIEL|
00003F60: 44 53 20 41 4E 44 20 47 52 41 4E 44 20 20 20 20 |DS AND GRAND |
00003F70: 20 54 4F 54 41 4C 20 46 49 45 4C 44 53 20 4D 55 | TOTAL FIELDS MU|
00003F80: 53 54 20 42 45 20 44 45 46 49 4E 45 44 22 00 99 |ST BE DEFINED"..|
00003F90: 22 55 53 49 4E 47 20 4E 55 4D 45 52 49 43 20 41 |"USING NUMERIC A|
00003FA0: 4E 44 20 44 4F 4C 4C 41 52 20 44 41 54 41 20 54 |ND DOLLAR DATA T|
00003FB0: 59 50 45 53 2E 22 00 99 22 11 D4 4F 20 49 4E 44 |YPES.".."..O IND|
00003FC0: 49 43 41 54 45 20 41 20 44 41 54 45 20 46 49 45 |ICATE A DATE FIE|
00003FD0: 4C 44 2C 20 45 4E 54 45 52 20 22 00 99 22 27 2E |LD, ENTER ".."'.|
00003FE0: 2E 2F 2E 2E 2F 2E 2E 27 20 49 4E 53 54 45 41 44 |./../..' INSTEAD|
00003FF0: 20 4F 46 20 54 48 45 20 55 53 55 41 4C 20 44 4F | OF THE USUAL DO|
00004000: 54 53 2E 22 00 99 22 C6 4F 52 20 45 58 41 4D 50 |TS."..".OR EXAMP|
00004010: 4C 45 3A 20 C4 41 54 45 20 2E 2E 2F 2E 2E 2F 2E |LE: .ATE ../../.|
00004020: 2E 22 3A 4A E3 31 4C 4A B3 BA 95 01 D0 4F 03 4C |.":J.1LJ.....O.L|
00004030: 00 99 22 93 22 C8 28 59 24 2C 31 30 29 22 20 D0 |..".".(Y$,10)" .|
00004040: 4C 41 43 45 20 54 48 45 20 12 C3 4F 44 45 D7 52 |LACE THE ..ODE.R|
00004050: 49 54 45 52 92 20 44 49 53 4B 20 49 4E 20 44 52 |ITER. DISK IN DR|
00004060: 49 56 45 20 30 22 3A 4A E3 31 4A B7 D9 92 41 8A |IVE 0":J.1J...A.|
00004070: 01 53 2B 90 C6 80 2B 06 4F 03 4C 8A 0B C1 50 50 |.S+...+.O.L...PP|
00004080: 4C 49 43 41 54 49 4F 4E D6 01 D7 8D 03 C5 B8 0E |LICATION........|
00004090: 82 2B 4F 0B 8A 04 44 41 54 41 D6 01 D7 00 A0 31 |.+O...DATA.....1|
000040A0: 35 00 9F 31 35 2C 44 56 2C 31 35 00 9F 32 2C 44 |5..15,DV,15..2,D|
000040B0: 56 2C 32 2C 44 52 24 AA 22 3A 43 4F 44 45 47 45 |V,2,DR$.":CODEGE|
000040C0: 4E 22 3A 4A B5 6B 00 A0 32 3A 90 A3 89 3E 2B 4F |N":J.k..2:...>+O|
000040D0: 03 4C 00 99 22 93 22 C8 28 59 24 2C 31 30 29 22 |.L..".".(Y$,10)"|
000040E0: D0 4C 41 43 45 20 54 48 45 20 12 22 3B 44 4D 24 |.LACE THE .";DM$|
000040F0: 3B 22 92 20 44 49 53 4B 20 49 4E 20 44 52 49 56 |;". DISK IN DRIV|
00004100: 45 20 22 3B B6 28 C2 28 39 36 38 29 AB 31 29 3A |E ";.(.(968).1):|
00004110: 4A E3 31 48 B7 93 00 99 C8 28 59 24 2C 59 25 29 |J.1H.....(Y$,Y%)|
00004120: 3B A6 58 25 AA 4A 29 3B 22 22 3B 3A 81 D4 01 21 |;.X%.J);"";:...!|
00004130: 8D 03 D7 89 28 91 33 03 01 91 2C 01 D4 01 DE 8A |....(.3...,.....|
00004140: 00 D2 48 94 01 21 81 2B 91 3A 81 2A 06 4F 06 8A |..H..!.+.:.*.O..|
00004150: 00 D2 48 94 01 DE 94 01 21 01 94 01 DE 94 01 21 |..H.....!......!|
00004160: 01 B8 0E 89 80 07 50 80 D4 01 E5 91 3A 42 01 E5 |......P.....:B..|
00004170: 94 01 DE 94 01 E5 01 88 90 54 01 00 00 01 8D 02 |.........T......|
00004180: 86 B8 0E 50 46 00 A1 4A 24 3A 96 01 EC 8A 00 2B |...PF..J$:.....+|
00004190: 4F 05 48 B6 7B 96 01 EC B8 12 D4 01 F3 94 01 F3 |O.H.{...........|
000041A0: 89 22 2B 4F 05 48 B6 7B 94 01 F3 89 20 2D 94 01 |."+O.H.{.... -..|
000041B0: F3 89 14 2E 06 94 01 F3 89 0D 2E 06 94 01 F3 89 |................|
000041C0: 80 2A 94 01 F3 89 C0 2D 06 07 94 01 F3 89 DA 2A |.*.....-.......*|
000041D0: 07 4F 05 48 B6 BD 94 01 F3 89 14 2E 4F 05 48 B5 |.O.H........O.H.|
000041E0: E2 94 01 21 81 2B 4F 05 48 B6 BD 94 01 21 81 02 |...!.+O.H....!..|
000041F0: D4 01 21 92 48 94 01 21 81 02 B8 14 D2 48 8A 01 |..!.H..!.....H..|
00004200: 20 D6 01 EC 00 99 C8 28 59 24 2C 59 25 29 3B A6 | ......(Y$,Y%);.|
00004210: 58 25 AA 4A 29 3B 22 20 22 3B 3A 48 B5 BD 94 01 |X%.J);" ";:H....|
00004220: F3 89 0D 2B 4F 17 94 01 DE 94 01 21 01 94 01 DE |...+O......!....|
00004230: 94 01 21 01 B8 0E 89 7F 06 50 4C 92 48 96 01 EC |..!......PL.H...|
00004240: 01 D2 48 00 99 C8 28 59 24 2C 59 25 29 3B A6 58 |..H...(Y$,Y%);.X|
00004250: 25 AA 4A AB 31 29 3B 4A 24 3B 3A 94 01 21 91 3A |%.J.1);J$;:..!.:|
00004260: 2B 4F 14 92 48 94 01 21 81 02 B8 14 96 01 EC 01 |+O..H..!........|
00004270: D2 48 48 B6 BD 94 01 F3 89 14 2E 4F 0A 94 01 21 |.HH........O...!|
00004280: 81 01 D4 01 21 48 B6 BD 00 A0 31 35 00 9F 31 35 |....!H....15..15|
00004290: 2C 38 2C 31 35 00 84 31 35 2C 41 24 2C 42 24 2C |,8,15..15,A$,B$,|
000042A0: 43 24 2C 44 24 3A 92 4F B8 11 D0 A3 4C 91 E9 91 |C$,D$:.O....L...|
000042B0: E9 B8 0E 89 7F 06 50 00 99 C8 28 59 24 2C 32 33 |......P...(Y$,23|
000042C0: 29 3B 53 50 24 3B 00 99 53 50 24 00 99 53 50 24 |);SP$;..SP$..SP$|
000042D0: 3B 00 99 C8 28 59 24 2C 32 33 29 22 12 50 92 52 |;...(Y$,23)".P.R|
000042E0: 49 4E 54 20 46 4F 52 20 48 41 52 44 43 4F 50 59 |INT FOR HARDCOPY|
000042F0: 20 3A 20 12 45 92 58 49 54 22 3A 89 1B D1 2C 89 | : .E.XIT":...,.|
00004300: 17 D1 33 81 D1 3A 4A B6 EA 92 48 8A 01 50 2B 4F |..3..:J...H..P+O|
00004310: 05 48 B4 D8 92 48 8A 01 45 2B 4F 0B 91 B8 D1 2C |.H...H..E+O....,|
00004320: 91 BF D1 33 4C 48 B5 06 00 A0 33 00 9F 33 2C 34 |...3LH....3..3,4|
00004330: 00 98 33 2C 22 22 00 A0 33 3A B8 1A 80 2E 4F 05 |..3,""..3:....O.|
00004340: 48 B4 15 00 99 C8 28 59 24 2C 32 33 29 3B 22 C9 |H.....(Y$,23);".|
00004350: 53 20 59 4F 55 52 20 50 52 49 4E 54 45 52 20 41 |S YOUR PRINTER A|
00004360: 20 C3 4F 4D 4D 4F 44 4F 52 45 3F 20 20 20 22 3B | .OMMODORE? ";|
00004370: 3A 89 21 D1 2C 89 17 D1 33 81 D1 3A 4A B6 EA 92 |:.!.,...3..:J...|
00004380: 48 8A 01 59 2E 92 48 8A 01 4E 2E 06 4F 05 48 B4 |H..Y..H..N..O.H.|
00004390: BD 92 48 8A 01 59 2B 4F 07 8D 03 40 87 50 92 48 |..H..Y+O...@.P.H|
000043A0: 8A 01 4E 2B 4F 08 8D 03 40 89 08 50 00 99 C8 28 |..N+O...@..P...(|
000043B0: 59 24 2C 32 33 29 3B 53 50 24 3B 00 99 C8 28 59 |Y$,23);SP$;...(Y|
000043C0: 24 2C 32 33 29 3B 22 20 20 20 20 D0 52 49 4E 54 |$,23);" .RINT|
000043D0: 49 4E 47 20 2E 2E 2E 22 00 A0 34 3A 8D 03 3C 51 |ING ..."..4:..<Q|
000043E0: 3A 00 98 34 00 A0 34 3A 48 B5 53 00 99 C8 28 59 |:..4..4:H.S...(Y|
000043F0: 24 2C 32 33 29 22 20 20 12 D0 52 49 4E 54 45 52 |$,23)" ..RINTER|
00004400: 20 CE 4F 54 20 D2 45 41 44 59 92 20 20 20 20 20 | .OT .EADY. |
00004410: 20 20 20 20 22 3A 81 D4 01 75 8D 04 B0 42 01 75 | ":...u...B.u|
00004420: 46 00 A0 33 3A 91 B8 D1 2C 91 BF D1 33 4C 8D 03 |F..3:...,...3L..|
00004430: 3C D0 1E 8D 03 BE 42 00 1E 00 87 44 37 3A 90 1E |<.....B....D7:..|
00004440: 94 02 08 50 46 4C 00 A0 34 00 A0 31 35 00 9F 31 |...PFL..4..15..1|
00004450: 35 2C 38 2C 31 35 2C 22 49 30 22 00 9F 34 2C 38 |5,8,15,"I0"..4,8|
00004460: 2C 34 2C 22 23 22 00 98 31 35 2C 22 55 31 22 3B |,4,"#"..15,"U1";|
00004470: 34 3B 30 3B 31 38 3B 30 00 98 31 35 2C 22 42 2D |4;0;18;0..15,"B-|
00004480: 50 3A 22 3B 34 3B 31 34 34 3A 8A 00 D6 02 0F 81 |P:";4;144:......|
00004490: D4 01 21 89 10 42 01 21 00 A1 23 34 2C 41 24 3A |..!..B.!..#4,A$:|
000044A0: 96 02 0F 92 4F 01 D6 02 0F 47 01 21 00 84 31 35 |....O....G.!..15|
000044B0: 2C 45 4E 24 2C 45 4D 24 00 A0 34 00 A0 31 35 3A |,EN$,EM$..4..15:|
000044C0: 96 02 0F 8A 10 C3 0F 04 05 D7 12 09 54 05 12 20 |............T.. |
000044D0: A0 04 31 A0 A0 2B D5 01 D0 4C 4A B3 BA 95 01 D0 |..1..+...LJ.....|
000044E0: 4F 03 4C 00 99 22 93 11 11 11 11 11 11 11 11 11 |O.L.."..........|
000044F0: 11 22 A3 36 29 3B 22 D4 48 49 53 20 49 53 20 41 |.".6);".HIS IS A|
00004500: 4E 20 55 4E 41 55 54 48 4F 52 49 5A 45 44 20 43 |N UNAUTHORIZED C|
00004510: 4F 50 59 22 3A 81 D0 1E 8D 05 DC 42 00 1E 46 88 |OPY":......B..F.|
00004520: 90 7C E2 00 00 51 3A 81 D0 1E 89 64 42 00 1E 90 |.|...Q:....dB...|
00004530: 1E 8A 00 E2 08 90 1E 8A 00 E2 0C 90 1E 8A 00 E2 |................|
00004540: 0E 90 1E 80 E1 04 90 1E 80 E1 06 90 1E 80 E1 0A |................|
00004550: 47 00 1E 80 D0 C6 4C 8D 03 C7 8D 02 86 B8 0E 50 |G.....L........P|
00004560: 8D 02 86 88 90 50 21 00 00 B8 0E 50 00 99 22 13 |.....P!....P..".|
00004570: 11 11 4C CF 22 3B C7 28 33 34 29 3B 46 4C 24 3B |..L.";.(34);FL$;|
00004580: C7 28 33 34 29 3B 22 2C 38 22 00 99 22 11 11 11 |.(34);",8".."...|
00004590: 11 52 55 4E 22 3A 49 89 C6 89 0B 50 8D 02 77 89 |.RUN":I....P..w.|
000045A0: 0D 50 8D 02 78 89 0D 50 00 99 22 13 22 3B 3A 5E |.P..x..P..".";:^|
000045B0: 03 00 80 00 99 C8 28 59 24 2C 32 34 29 3B 53 50 |......(Y$,24);SP|
000045C0: 24 3B 53 50 24 3B 00 99 C8 28 59 24 2C 32 34 29 |$;SP$;...(Y$,24)|
000045D0: 3B 22 20 20 D7 4F 55 4C 44 20 59 4F 55 20 4C 49 |;" .OULD YOU LI|
000045E0: 4B 45 20 54 4F 20 53 41 56 45 20 54 48 45 20 43 |KE TO SAVE THE C|
000045F0: 4F 4E 54 45 4E 54 53 22 00 99 22 20 4F 46 20 59 |ONTENTS".." OF Y|
00004600: 4F 55 52 20 43 55 52 52 45 4E 54 20 53 43 52 45 |OUR CURRENT SCRE|
00004610: 45 4E 20 3F 20 28 59 2F 4E 29 20 22 3B 3A 91 2C |EN ? (Y/N) ";:.,|
00004620: D5 02 1D 91 33 D5 02 24 89 21 D1 2C 89 19 D1 33 |....3..$.!.,...3|
00004630: 81 D1 3A 81 D4 01 21 4A B6 EA 92 48 D2 41 92 41 |..:...!J...H.A.A|
00004640: 8A 01 4E 2B 4F 05 48 B1 A2 92 41 8A 01 59 2E 92 |..N+O.H...A..Y..|
00004650: 41 8A 01 D9 2E 06 4F 05 48 B1 D8 48 C7 2F 00 99 |A.....O.H..H./..|
00004660: C8 28 59 24 2C 32 34 29 3B 53 50 24 3B 53 50 24 |.(Y$,24);SP$;SP$|
00004670: 3B 00 99 C8 28 59 24 2C 32 34 29 3B 00 99 22 20 |;...(Y$,24);.." |
00004680: 20 C1 42 4F 52 54 49 4E 47 20 57 49 4C 4C 20 43 | .BORTING WILL C|
00004690: 4C 45 41 52 20 59 4F 55 52 20 53 43 52 45 45 4E |LEAR YOUR SCREEN|
000046A0: 20 46 52 4F 4D 22 00 99 22 20 4D 45 4D 4F 52 59 | FROM".." MEMORY|
000046B0: 2E 20 CF 2E CB 2E 20 54 4F 20 41 42 4F 52 54 20 |. .... TO ABORT |
000046C0: 3F 20 28 59 2F 4E 29 20 22 3B 3A 89 20 D1 2C 89 |? (Y/N) ";:. .,.|
000046D0: 19 D1 33 81 D1 3A 4A B6 EA 92 48 8A 01 4E 2B 4F |..3..:J...H..N+O|
000046E0: 0F 95 02 1D D1 2C 95 02 24 D1 33 48 E0 3D 92 48 |.....,..$.3H.=.H|
000046F0: 8A 01 59 2E 92 48 8A 01 D9 2E 06 4F 05 48 B1 36 |..Y..H.....O.H.6|
00004700: 4A B2 D9 48 E2 D5 4A E3 DD 00 9F 32 2C 38 2C 32 |J..H..J....2,8,2|
00004710: 2C 22 4E 4F 54 45 53 22 00 84 32 2C 41 24 00 84 |,"NOTES"..2,A$..|
00004720: 32 2C 41 24 3A 81 D0 1E 89 09 42 00 1E 00 99 22 |2,A$:.....B...."|
00004730: 93 22 00 99 3A 81 D4 02 2B 89 14 42 02 2B 00 84 |."..:...+..B.+..|
00004740: 32 2C 41 24 00 99 41 24 3A 47 02 2B 00 99 C8 28 |2,A$..A$:G.+...(|
00004750: 59 24 2C 32 34 29 3B 22 20 12 C6 31 92 20 54 4F |Y$,24);" ..1. TO|
00004760: 20 43 4F 4E 54 49 4E 55 45 20 12 C6 33 92 20 54 | CONTINUE ..3. T|
00004770: 4F 20 50 52 49 4E 54 20 12 C6 35 92 20 54 4F 20 |O PRINT ..5. TO |
00004780: 45 58 49 54 22 3B 00 A1 42 24 3A 96 01 FA 89 87 |EXIT";..B$:.....|
00004790: B8 13 2B 4F 05 48 B0 33 96 01 FA 89 86 B8 13 2B |..+O.H.3.......+|
000047A0: 4F 1D 4A B5 53 00 99 C8 28 59 24 2C 32 33 29 3B |O.J.S...(Y$,23);|
000047B0: 53 50 24 00 99 53 50 24 3B 3A 48 B0 B4 96 01 FA |SP$..SP$;:H.....|
000047C0: 89 85 B8 13 2E 4F 05 48 B0 B4 47 00 1E 00 A0 32 |.....O.H..G....2|
000047D0: 3A 48 F4 1B 8D 03 C9 B8 0E 89 08 2E 8D 03 C9 B8 |:H..............|
000047E0: 0E 89 09 2E 06 4F 05 48 AF E6 8D 03 C9 B8 0E D0 |.....O.H........|
000047F0: 87 8D 03 C8 B8 0E B8 10 82 89 FF B8 16 D2 8E 92 |................|
00004800: 8E 8A 01 31 2B 4F 07 8A 01 30 D2 8E 92 8E 8A 01 |...1+O...0......|
00004810: 32 2B 4F 07 8A 01 31 D2 8E 4C 00 99 22 93 11 20 |2+O...1..L..".. |
00004820: 20 20 20 20 20 20 20 20 20 12 D3 59 53 54 45 4D | ..YSTEM|
00004830: 20 C3 4F 4E 46 49 47 55 52 41 54 49 4F 4E 92 22 | .ONFIGURATION."|
00004840: 00 99 C8 28 59 24 2C 36 29 3B 22 20 20 20 C8 4F |...(Y$,6);" .O|
00004850: 57 20 4D 41 4E 59 20 44 49 53 4B 20 44 52 49 56 |W MANY DISK DRIV|
00004860: 45 53 20 57 49 4C 4C 20 59 4F 55 22 00 99 C8 28 |ES WILL YOU"...(|
00004870: 59 24 2C 37 29 3B 22 20 20 20 20 20 20 42 45 20 |Y$,7);" BE |
00004880: 55 53 49 4E 47 20 28 31 20 4F 52 20 32 29 20 3F |USING (1 OR 2) ?|
00004890: 20 22 3B 3A 89 1B D1 2C 87 D1 33 81 D1 3A 4A B6 | ";:...,..3..:J.|
000048A0: EA 92 48 D2 8E 92 8E 8A 01 31 2B 4F 17 8D 03 C8 |..H......1+O....|
000048B0: 81 50 8A 01 30 D2 8E 89 08 D0 87 8D 03 C9 89 08 |.P..0...........|
000048C0: 50 4C 92 8E 8A 01 32 2B 4F 0F 8D 03 C8 82 50 8A |PL....2+O.....P.|
000048D0: 01 31 D2 8E 48 AF 26 48 AF E6 00 99 C8 28 59 24 |.1..H.&H.....(Y$|
000048E0: 2C 31 30 29 3B 22 20 20 20 C1 52 45 20 59 4F 55 |,10);" .RE YOU|
000048F0: 20 55 53 49 4E 47 20 54 57 4F 20 C3 4F 4D 4D 4F | USING TWO .OMMO|
00004900: 44 4F 52 45 20 31 35 34 31 22 00 99 22 20 20 20 |DORE 1541".." |
00004910: 20 20 20 44 49 53 4B 20 44 52 49 56 45 53 20 28 | DISK DRIVES (|
00004920: 59 2F 4E 29 20 3F 20 22 3B 3A 89 1B D1 2C 89 0B |Y/N) ? ";:...,..|
00004930: D1 33 81 D1 3A 4A B6 EA 92 48 8A 01 4E 2B 4F 0D |.3..:J...H..N+O.|
00004940: 89 08 D0 87 8D 03 C9 89 08 50 4C 92 48 8A 01 59 |.........PL.H..Y|
00004950: 2E 4F 05 48 AF 26 00 99 C8 28 59 24 2C 31 33 29 |.O.H.&...(Y$,13)|
00004960: 3B 22 20 20 20 20 D7 48 41 54 20 49 53 20 54 48 |;" .HAT IS TH|
00004970: 45 20 44 45 56 49 43 45 20 4E 55 4D 42 45 52 20 |E DEVICE NUMBER |
00004980: 46 4F 52 20 59 4F 55 52 22 00 99 22 20 20 53 45 |FOR YOUR".." SE|
00004990: 43 4F 4E 44 20 44 52 49 56 45 20 3F 20 22 3B 3A |COND DRIVE ? ";:|
000049A0: 89 12 D1 2C 89 0E D1 33 82 D1 3A 4A B6 EA 92 48 |...,...3..:J...H|
000049B0: 8A 00 2B 4F 05 48 AE AA 92 48 B8 11 D0 87 8A 01 |..+O.H...H......|
000049C0: 30 D2 8E 8D 03 C8 80 50 8D 03 C9 90 87 50 4C 00 |0......P.....PL.|
000049D0: 9F 31 2C 44 56 2C 30 2C 22 24 22 AA 44 52 24 3A |.1,DV,0,"$".DR$:|
000049E0: 8A 00 D6 02 32 80 D4 02 39 00 A1 23 31 2C 41 24 |....2...9..#1,A$|
000049F0: 2C 41 24 2C 41 24 2C 41 24 2C 41 24 2C 41 24 3A |,A$,A$,A$,A$,A$:|
00004A00: 89 13 D4 01 67 4A AC BA 96 01 FA D6 02 40 83 D4 |....gJ.......@..|
00004A10: 01 67 4A AC BA 96 01 FA D6 02 47 83 D4 01 67 4A |.gJ.......G...gJ|
00004A20: AC BA 96 01 FA D6 02 4E 4A AC 83 81 D0 1E 83 42 |.......NJ......B|
00004A30: 00 1E 00 A1 23 31 2C 42 24 3A 47 00 1E 81 D4 01 |....#1,B$:G.....|
00004A40: 21 89 FF 42 01 21 94 02 55 81 01 D4 02 55 94 02 |!..B.!..U....U..|
00004A50: 55 89 10 2A 4F 05 4A AC 07 89 1E D4 01 67 4A AB |U..*O.J......gJ.|
00004A60: B1 B8 1A 80 2E 4F 05 48 AD 2E 96 02 32 B8 0F 83 |.....O.H....2...|
00004A70: 2A 4F 0D 96 02 32 81 B8 14 B8 12 D4 02 5C 96 02 |*O...2.......\..|
00004A80: 32 82 89 FF B8 16 D6 02 32 96 02 32 B8 0F 84 2B |2.......2..2...+|
00004A90: 4F 20 94 02 5C 96 02 32 81 B8 14 B8 12 8D 01 00 |O ..\..2........|
00004AA0: 03 01 D4 02 5C 96 02 32 82 89 FF B8 16 D6 02 32 |....\..2.......2|
00004AB0: 94 02 39 94 02 5C 01 D4 02 39 00 99 C8 28 42 24 |..9..\...9...(B$|
00004AC0: AA 53 50 24 2C 31 38 29 2C 54 24 2C 42 4C 3A 47 |.SP$,18),T$,BL:G|
00004AD0: 01 21 8A 0B 42 4C 4F 43 4B 53 46 52 45 45 2E D6 |.!..BLOCKSFREE..|
00004AE0: 01 FA 8D 02 98 94 02 39 02 D4 02 39 94 02 39 D4 |.......9...9..9.|
00004AF0: 02 5C 80 B8 13 D6 02 32 00 99 C8 28 42 24 AA 53 |.\.....2...(B$.S|
00004B00: 50 24 2C 31 38 29 2C 54 24 2C 42 4C 3A 94 02 39 |P$,18),T$,BL:..9|
00004B10: 8D 02 98 2B 4F 24 00 99 22 11 20 20 20 20 20 2A |...+O$..". *|
00004B20: 2A 2A 20 CE 4F 20 46 49 4C 45 53 20 4F 4E 20 44 |** .O FILES ON D|
00004B30: 49 53 4B 20 2A 2A 2A 22 00 A0 31 3A 8D FF FF D4 |ISK ***"..1:....|
00004B40: 02 55 4A AC 07 4C 8A 00 D6 01 FA 81 D0 1E 94 01 |.UJ..L..........|
00004B50: 67 42 00 1E 00 A1 23 31 2C 41 24 3A 92 4F 89 20 |gB....#1,A$:.O. |
00004B60: B8 13 2B 92 4F 89 A0 B8 13 2B 07 4F 05 48 AC 87 |..+.O....+.O.H..|
00004B70: 96 01 FA 92 4F 01 D6 01 FA 47 00 1E 4C 00 99 C8 |....O....G..L...|
00004B80: 28 59 24 2C 32 29 22 93 20 C4 49 53 4B 20 CE 41 |(Y$,2)". .ISK .A|
00004B90: 4D 45 3A 20 22 3B 4E 24 00 99 C8 28 59 24 2C 33 |ME: ";N$...(Y$,3|
00004BA0: 29 22 20 C9 C4 3A 20 22 3B 49 24 3B A6 35 29 3B |)" ..: ";I$;.5);|
00004BB0: 22 CF 50 45 52 41 54 49 4E 47 20 D3 59 53 54 45 |".PERATING .YSTE|
00004BC0: 4D 3A 20 22 4F 53 24 00 99 C8 28 59 24 2C 35 29 |M: "OS$...(Y$,5)|
00004BD0: 22 20 C6 49 4C 45 20 CE 41 4D 45 22 3B A6 31 30 |" .ILE .AME";.10|
00004BE0: 29 3B 22 D4 59 50 45 22 3B A6 37 29 3B 22 C2 4C |);".YPE";.7);".L|
00004BF0: 4F 43 4B 53 22 00 99 3A 4C 00 99 C8 28 59 24 2C |OCKS"..:L...(Y$,|
00004C00: 32 34 29 22 D0 52 45 53 53 20 12 52 45 54 55 52 |24)".RESS .RETUR|
00004C10: 4E 92 20 54 4F 20 43 4F 4E 54 49 4E 55 45 2E 22 |N. TO CONTINUE."|
00004C20: 3B 00 A1 49 4E 24 3A 92 48 8A 00 2B 4F 05 48 AB |;..IN$:.H..+O.H.|
00004C30: DF 92 48 89 0D B8 13 2E 4F 05 48 AB DF 94 02 55 |..H.....O.H....U|
00004C40: 8D FF FF 2B 4F 03 4C 80 D4 02 55 4A AC 83 4C 8A |...+O.L...UJ..L.|
00004C50: 00 D6 01 FA 8A 00 D6 02 32 80 D4 01 91 81 D0 1E |........2.......|
00004C60: 94 01 67 42 00 1E 00 A1 23 31 2C 41 24 3A 92 4F |..gB....#1,A$:.O|
00004C70: 89 20 B8 13 2B 92 4F 89 A0 B8 13 2B 07 4F 05 48 |. ..+.O....+.O.H|
00004C80: AB 3A 92 4F 89 22 B8 13 2B 4F 0A 94 01 91 81 01 |.:.O."..+O......|
00004C90: D4 01 91 94 01 91 81 2B 4F 0E 96 01 FA 92 4F 01 |.......+O.....O.|
00004CA0: D6 01 FA 48 AB 3A 94 01 91 82 2B 4F 12 96 01 FA |...H.:....+O....|
00004CB0: 92 4F 01 D6 01 FA 80 D4 01 91 48 AB 3A 96 02 32 |.O........H.:..2|
00004CC0: 92 4F 01 D6 02 32 47 00 1E 00 A1 23 31 2C 41 24 |.O...2G....#1,A$|
00004CD0: 2C 41 24 3A 4C 5E 03 00 80 00 00 00 59 80 00 00 |,A$:L^......Y...|
00004CE0: 00 00 00 4E C9 00 00 00 00 00 53 D0 00 00 00 00 |...N......S.....|
00004CF0: 00 44 D4 00 00 00 00 00 49 00 00 00 00 00 00 4D |.D......I......M|
00004D00: 46 00 00 00 00 00 D8 80 00 00 00 00 00 D9 80 00 |F...............|
00004D10: 00 00 00 00 CC 80 00 00 00 00 00 41 C1 00 00 00 |...........A....|
00004D20: 00 00 49 CE 00 00 00 00 00 41 80 00 00 00 00 00 |..I......A......|
00004D30: 46 CC 00 00 00 00 00 43 31 00 00 00 00 00 43 32 |F......C1.....C2|
00004D40: 00 00 00 00 00 43 33 00 00 00 00 00 43 CF 00 00 |.....C3.....C...|
00004D50: 00 00 00 4E C1 00 00 00 00 00 54 52 00 00 00 00 |...N......TR....|
00004D60: 00 44 56 00 00 00 00 00 44 D2 00 00 00 00 00 45 |.DV.....D......E|
00004D70: 52 00 00 00 00 00 45 CD 00 00 00 00 00 45 53 00 |R.....E......ES.|
00004D80: 00 00 00 00 4E 00 00 00 00 00 00 52 53 00 00 00 |....N......RS...|
00004D90: 00 00 D8 CC 00 00 00 00 00 D9 CC 00 00 00 00 00 |................|
00004DA0: 46 4C 00 00 00 00 00 43 4C 00 00 00 00 00 CC C1 |FL.....CL.......|
00004DB0: 00 00 00 00 00 C3 80 00 00 00 00 00 54 00 00 00 |............T...|
00004DC0: 00 00 00 C1 C4 00 00 00 00 00 41 00 00 00 00 00 |..........A.....|
00004DD0: 00 CB 80 00 00 00 00 00 5A D1 00 00 00 00 00 5A |........Z......Z|
00004DE0: D3 00 00 00 00 00 4C 80 00 00 00 00 00 46 00 00 |......L......F..|
00004DF0: 00 00 00 00 53 D3 00 00 00 00 00 4A 00 00 00 00 |....S......J....|
00004E00: 00 00 50 80 00 00 00 00 00 C5 D6 00 00 00 00 00 |..P.............|
00004E10: C6 CC 00 00 00 00 00 46 80 00 00 00 00 00 4E 46 |.......F......NF|
00004E20: 00 00 00 00 00 4E 43 00 00 00 00 00 4E 47 00 00 |.....NC.....NG..|
00004E30: 00 00 00 4E 54 00 00 00 00 00 4E 44 00 00 00 00 |...NT.....ND....|
00004E40: 00 4C 00 00 00 00 00 00 5A 00 00 00 00 00 00 58 |.L......Z......X|
00004E50: 00 00 00 00 00 00 44 43 00 00 00 00 00 51 43 00 |......DC.....QC.|
00004E60: 00 00 00 00 43 44 00 00 00 00 00 51 00 00 00 00 |....CD.....Q....|
00004E70: 00 00 DA 80 00 00 00 00 00 43 80 00 00 00 00 00 |.........C......|
00004E80: C9 80 00 00 00 00 00 CA 80 00 00 00 00 00 45 D2 |..............E.|
00004E90: 00 00 00 00 00 4D D8 00 00 00 00 00 51 37 00 00 |.....M......Q7..|
00004EA0: 00 00 00 CA C3 00 00 00 00 00 C3 D7 00 00 00 00 |................|
00004EB0: 00 44 CD 00 00 00 00 00 41 44 00 00 00 00 00 4B |.D......AD.....K|
00004EC0: 4C 00 00 00 00 00 4A 80 00 00 00 00 00 49 49 00 |L.....J......II.|
00004ED0: 00 00 00 00 42 80 00 00 00 00 00 44 80 00 00 00 |....B......D....|
00004EE0: 00 00 44 37 00 00 00 00 00 48 C4 00 00 00 00 00 |..D7.....H......|
00004EF0: 45 CE 00 00 00 00 00 D8 D8 00 00 00 00 00 D9 D9 |E...............|
00004F00: 00 00 00 00 00 4B 00 00 00 00 00 00 54 80 00 00 |.....K......T...|
00004F10: 00 00 00 54 42 00 00 00 00 00 4E 80 00 00 00 00 |...TB.....N.....|
00004F20: 00 49 80 00 00 00 00 00 4F D3 00 00 00 00 00 43 |.I......O......C|
00004F30: 54 00 00 00 00 00 42 4C 00 00 00 00 00 00 00 10 |T.....BL........|
00004F40: 00 00 00 00 00 00 00 00 00 00 00 00 00 3B 58 DA |.............;X.|
00004F50: 55 FF FF 2F 0B D3 8D E4 92 D5 ED 30 F8 |U../.......0. |
.......2073... R.LE. R.L.. R....ID...?..
.............. U.HHLH RTL-64 R. Q. _.`
..`........%...`H............H` _. G. R.
`@....M.Z...\W....169,4,170,160,7,32,186
,255,169,0,32,189,255,32,192,255,162,4,3
2,201,255,169,0,133,251,133,253,169,4,13
3,252,160,0,177,251,201,96,208,5,169,32,
76,143,3,169,64,56,241,251,41,32,10,141,
251,3,177,251,41,64,10,13,251,3,141,251,
3,177,251,41,127,13,251,3,208,2,169,64,2
01,96,208,2,169,32,32,210,255,230,253,16
9,40,56,229,253,208,7,133,253,169,13,32,
210,255,169,111,197,251,208,6,169,7,197,
252,240,16,24,165,251,105,1,133,251,165,
252,105,0,133,252,76,91,3,96...T[.VL-SCR
EENW..E.P............................R..
.99999999999999999999999999R...X%(100):A
....Y%(100):A....P$(100):A....L%(100):A.
...TY$(100):A....T$(100):A....R...R..P..
'B...... .R.......R.F..F...D+O.H.!..F...
`+O..P%..F.PJ.,H....H.P..I.P..G(14);G(8)
".":..P ...P..P!....P....P.......+O.H.3.
.H(Y$,11);.9);"TYPE .LOAD";G(34);"NEWMEN
U";G(34);",8."..". THEN TYPE
.RUN.":I^...:J.R..".":..T....PJ.,J.&.."
."...5);".. CODEWRITER SYSTEM MAIN MENU
."...1);"...YOU HAVE THE FOLLOWING OPTIO
NS:"...4);".D.....CREATE A DATA ENTRY SY
STEM"...4);".F..................FORMAT A
DISK"...4);".S.............SET DISPLAY
COLORS"...4);".U............VIEW THE USE
R NOTES"...4);".T.......VIEW THE DISK I
TUTORIAL"...4);".V......VIEW THE DISK II
TUTORIAL"...4);".X..................EXI
T TO BASIC"..".ENTER YOUR CHOICE THEN PR
ESS .RETURN. . .":.$Q,..Q3.Q:J...HRA.A..
D+O.H...A..S+O.H.H.A..F+O.J..H...A..U+O.
H...A..T+O.H...A..V+O.H...A..X.O.H....G(
9):^....."...".5);". CREATE A DATA ENTRY
SYSTEM ."...2);".YOU HAVE THE FOLLOWING
OPTIONS:"...4);".S.........CREATE A SCR
EEN LAYOUT"...4);".A..........CREATE AN
APPLICATION"...4);".X............RETURN
TO MAIN MENU".."...".."TO CREATE AN APPL
ICATION [SELECTION .A.] YOU MUST ALREAD
Y HAVE ";.."CREATED A SCREEN FORMAT FIL
E WITH SELECTION 'S'."..".ENTER YOUR CHO
ICE THEN PRESS .RETURN. . .":.$Q,..Q3.Q:
J...HRA.A..S.O.H.KH...A..A.O.H....E...+O
...AROH..J..J.&.."..........";.4)"PROGRA
M LOADING. PLEASE WAIT....".."CODEGEN",
8:.A..X+O.H..H..J...."..........";.4)"PR
OGRAM LOADING. PLEASE WAIT...":..TUTORI
AL1RVH..J...."..........";.4)"PROGRAM LO
ADING. PLEASE WAIT...":..TUTORIAL2RVH..
.P].PD.PK..................RR..".".13)"S
ET COLOR MODE"...5)"..[F1] SETS SCREEN C
OLOR"...5)".[F3] SETS BORDER COLOR"...5)
".[F5] SETS TEXT COLOR"...5)".[F7] RETUR
NS YOU TO MAIN MENU":J....AA$:.A..+O.H..
.A....+O.H.M.A....+O.H.Q.A....+O.H.5.A..
..+O.H..H...]..P].]..*O..P]..P!...]PH.K.
D..PD.D..*O..PD..P ...DPH.K.K..PK.K..*O.
.PK..J(CO$,C3,1):H.K.....5)"THIS OPTION
SYSTEM IS ALSO ";.." PRESENT
IN YOUR APPLICATION ";.." PR
OGRAM.":L..".. .*** IMPORTANT NO
TE ***."..". CODEWRITER ALLOWS YOU THE
OPTION OF DESIGNING YOUR DATA ENTRY";
.." PROGRAM SO THAT IT STORES YOUR DA
TA ON EITHER".." YOUR .APPLICATION DISK.
OR A SEPARATE .DATA DISK.."...3)".
YOU MUST MAKE THAT DECISION NOW!."...3)"
IF YOU CHOOSE TO PUT YOUR DATA FILE".."
ON YOUR APPLICATION DISK,";.." ABOUT HAL
F OF YOUR PROGRAM DISKETTE CAN BE USE
D".." FOR DATA. YOU SHOULD NOT EXPECT TO
".." HAVE MORE THAN A SIMPLE .DATA ENTRY
/".." .REPORT SYSTEM. ON THAT SAME DISKE
TTE.":J.1..". IF YOU PLAN TO HAVE A L
ARGE DATA FILE, OR IF YOU PLAN TO";.
." GENERATE A MORE ELABORATE DATA ENTRY/
REPORT SYSTEM WITH NUMEROUS";.." PROGRAM
S AND PERHAPS YOUR OWN CUSTOMIZED MENU
DESIGN, IT IS ";.."ADVISABLE TO USE A SE
PARATE DISK FOR YOUR DATA.":J.1.."
.** DATA DISK SELECTION MENU **.".."..
YOU HAVE THE FOLLOWING OPTIONS:"..".
D......DATA ON A SEPARATE DATA DISK"..
". A......APPLICATION PROGRAM AND DAT
A ON THE SAME DISK"..". F.
.....FORMAT A DISK".."..YOU MUST HAVE TW
O FORMATTED DISKS READY IF YOU CHOOSE OP
TION .D.."..".YOU MUST HAVE ONE FORMATTE
D DISK READY IF YOU CHOOSE OPTION .A.."
.."..ENTER YOUR CHOICE THEN PRESS .RETUR
N. . .":.$Q,..Q3.Q:J...HRA.A..D+O7..E.P.
."......YOUR DATA WILL BE STORED ON A SE
PARATE":.A..D+O..."DATA FILE DISK.":J.1H
...A..A.O.H.,..E.P.."...... YOUR DATA
WILL BE STORED ON YOUR".." APPLICATION D
ISK.":J.1H...A..F.O...".":H..J....".":H.
..."."......". INSERT DISK TO BE FORM
ATTED IN".." DRIVE ";.(B(9
68).1)...8)"..*** IMPORTANT NOTE! ***.".
.". REMEMBER THAT FORMATTING WILL DESTR
OY".." ANY INFORMATION ON THE DISK !".."
.. TYPE .F. THEN .RETURN. TO BEGIN FORMA
TTING"..H(Y$,22);..". TYPE ANY OTHER KEY
THEN .RETURN. TO EXIT WITHOUT FORMATTI
NG":..Q,..Q3.Q:..RHJ...H..F.O.H....".. P
LEASE ENTER A NAME FOR THE DISK".." (1 T
O 16 CHARACTERS)"..". ?";:.Q,.V....Q3..Q
:J...HRY.Y...+.Y....*.O.H...Y.......RY..
..".. .***THIS IS YOUR LAST CHANCE**
*."..". FORMATTING A DISK WILL ERASE IT
!!"..". MAKE SURE YOUR CODEWRITER DISK
IS ".." WRITE PROTECTED AND NOT IN THE D
RIVE!"..".. TYPE .F. THEN .RETURN. TO BE
GIN FORMATTING"..H(Y$,22);..". TYPE ANY
OTHER KEY THEN .RETURN. TO EXIT WITHOUT
FORMATTING":..Q,..Q3.Q:..RHJ...H..F.O.H
....".....".15)"FORMATTING";:.P..B....".
";. 15..15,DV,15..15,"N".DR$.":";NA$;",0
0"..15,ER,EM$. 15:....-O.H.-G...."..".."
*** DISK FORMAT ERROR ***"..ER,EM$..".TR
Y AGAIN OR USE ANOTHER DISK":J.1H....".F
ORMAT ANOTHER DISK? (Y/N)";:..Q,.Q3.Q:J.
..HRA.H..Y..H..N..O.H.-.H..Y+O.H..L. 15.
.15,8,15,"I0". 2..2,8,2,"CODEGEN":J.K...
+O.. 2:L..".";H(Y$,10)" PLACE THE .CODEW
RITER. DISK IN DRIVE 0"..H(Y$,24)" P
RESS .RETURN. TO CONTINUE"..AA$:.A.....O
.H.FH....H(Y$,24);" PRESS .RETURN.
TO CONTINUE"..AA$:.A..+O.H...A.....O.H.
...".":L.O..A+O.H.O. 15:....P.."... . TH
IS IS THE SCREEN FORMAT GENERATOR ."...4
);"..YOU HAVE THESE OPTIONS:."...2);"E..
..EDIT OR CREATE A SCREEN LAYOUT."...2);
"C............CHANGE FIELD POSITIONS."..
.2);"S........SAVE SCREEN LAYOUT TO DISK
."...2);"L......LOAD SCREEN LAYOUT FROM
DISK."...2);"X......EXIT TO SYSTEM CREAT
ION MENU..."...2)"ENTER YOUR CHOICE THEN
PRESS .RETURN.";:.&Q,..Q3.Q:J...HRA.A..
E+O.J.FH.U.A..C+O.JZ..A..S+O.J..JP..A..L
+O.J..JK:.A..X.O.H.U.."........HAVE YOU
SAVED YOUR SCREEN? (Y/N)":."Q,..Q3.Q:J..
.H..Y.O.H.KJ.Y..F.`P.P%H..J.V.....P.."."
:.P...B....H(Y$,N)SP$" ":F.P..Q..Q..F.+O
.JH..F.+O..PM.QT.Q,.Q3.....Q...H(Y$,23);
"--------------COL: ROW: ------------
-";..H(Y$,24);" PRESS .F1. TO READ SCREE
N .F3. HARDCOPY "..TH(Y$,25);" .F5.
TO ABORT EDITING .F7. FOR TAB";..H(Y$,23
);.18);I(" ".D(X%.1),2)..H(Y$,23);.25);
I(" ".D(Y%),2):..X.(.3...,.Q........P..
H(Y$,Y%);.X%);..A$:.O..+O.H.J.O....+.O."
..+..O..,+..O..:+..O..;+.O.H.J.O...+.O..
.+..O...+..O...+..O...+..O...+..O...+..O
...+.O.H.Q.O....+O.J.SH...O..P..O....+.T
.+.O.HG/....+O.H.M.,.+O....#+...$+.....+
..../+.O.H.I....+.T...+.O.H.Q....+...^+.
O.H......+O.H......+O....+O..QTH......+.
..+.O.H.J....+....+.....+.....+.....+...
..+.O.H......+O.H.^....P....+O..T.QT..H(
Y$,Y%).X%)A$;:...^+O..T.QT.,.'+.T...+.O.
H...,..Q,.,.(,O..Q,.3..Q3.3..*O...Q3..Q,
.PM....+...^+.O.H.QJ..H.Q....P.T...+....
+....+.3........+..O.H.D....+O...Q,..Q3H
.D....+O..3..Q3.3..*O...Q3...+.,..-.O...
Q,....+O..3..Q3.3..-O...Q3....+...+.O..3
..+.,..-.O...Q,.....O.H.Q.,.'+.T...+.O.H
.D.,..Q,.,.'*O..Q,...+.3..+..,.+.O...Q,.
....O.H...,.+.T...+.O.H.D.,..Q,.,.-O..'Q
,...+.3..+..,..-.O..'Q,.....O.H.D.T...+O
.H.D.Q,.3..Q3.3..*O...Q3..Q,J..H.Q......
...+O..T.QT.T...+.,.+.O.H.J..H(Y$,Y%);.X
%);" ":.,..Q,...+O..3..+O..,..-O...Q3.'Q
,H...,.-O..'Q,.3..Q3.3.-O...Q3J..H.Q....
P.,....'*.T...+.O.H...,...Q,.,.(,O..Q,.3
..Q3.3..*O...Q3...+O..3..+.,..-.O...Q,J.
.H.Q..X.(.3...,...Q...X.(.3...,.....PL.
.H(Y$,24);SP$..SP$;..H(Y$,23);"A LINE CA
N NOT START WITH ., /, #, OR $."..H(Y$,2
4);"PRESS .RETURN. TO CONTINUE";..A$:.O.
....O.HZ...H(Y$,24);SP$:H.S..".";..A$:.O
..+O.HZO..F(A$):HZO..".":.....P.F.+O.HZ.
.."ERROR: NO SCREEN IN MEMORY.".."YOU MU
ST FIRST CREATE OR LOAD ONE."..H(Y$,24)"
PRESS .RETURN. TO RETURN TO THE MENU"..A
$:.O.....O.HZ+LJSF..".":JH..Q.....Q,....
Q3..H(Y$,23);"--------------COL: ROW:
-------------";:..X.....(.........Q...X
.....(............P..H(Y$,25);" PRESS
.F1. TO RETURN TO THE MENU";..H(Y$,23);.
18);I(" ".D(X%.1),2)..H(Y$,23);.25);I("
".D(Y%),2):..R...V....V........T+O...L
ABELV..HXV..ALPHANUMV........D+O...DATEV
........#+O...NUMV........$+O...DOLLARV.
...KEYBOARD ENTEREDR...LEN =.......V....
....P+O...PROGRAM CALCULATEDR...V.......
.G+O...GLOBAL TOTALR...V....H(Y$,24);SP$
..H(Y$,24);"TYPE:";ZQ$;" "ZS$;" ";L$..A$
:.O..+O.HX$.O..P.....+O.HW.....+O.JGLL..
........(.........P.....O.HWG....Q....-O
....Q.HW.....Q......*O..Q.HYH...........
..Q:..V...T.!.:B.!..... .V..G.!......T+O
%..^.......^.V.(.:..Q:..... .V..HV.....
..D+O(......../../...V.(.:..Q:..... .V.
.HV.......A+O..............V.(HV........
.............V.(....Q,....Q3..H(Y$,23);.
18);I(" ".D(X%.1),2)..H(Y$,23);.25);I("
".D(Y%),2)..H(Y$,Y%);.X%);".";P$;"."..A$
:.O..+O.HV..O..P.....+O....,.....3..JGLL
....+O...H(Y$,Y%);.X%);P$:HV,....+....+.
....+.....+.O.HV.HV....,.....3..HYH....+
O.HUF....+O.HT.....+O.HST.,.+O.HV..T.!..
.B.!..!..+O.HU..3..!...O.HU...!....T+..!
....D+.O..U./HU..U./.,..!....!.......!..
.../.+O..U.6G.!..6.+O..U.6HV...H(Y$,Y%);
.X%);SS$:.,..Q,HV..P..3..+O.HV..T.!...B.
!..!..+O.HT...!....T+..!....D+.O..U./HU$
.U./.3.....!...O.HT..,.:...!..*.,..!....
!.......!...../.-.O..U.6G.!..6.+.3.....+
.O..U.6HV...6.+O.....P..U.6HUY..H(Y$,Y%)
;.X%);SS$:.3...Q3HV..P..3.+O.HV..T.!...B
.!....!+O.HT...!....T+..!....D+.O..U./HT
[.U./.3.....!...O.HT..,.:...!..*.,..!...
.!.......!...../.-.O..U.6G.!..6.+.3....+
.O..U.6HV...6.+O.....P..U.6HT...H(Y$,Y%)
;.X%);SS$:.3...Q3HV..,.:..(+O.HV..T.!...
B.!..!..+O.HS..3..!...O.HS..,.:...!..+O.
.U.6G.!..6.+O..U.6HV...H(Y$,Y%);.X%);SS$
:.,..Q,HV...".".."THIS OPTION WILL ALLOW
YOU TO MOVE THE".."FIELDS AROUND THE SC
REEN TO CUSTOMIZE".."YOUR LAYOUT. TO MOV
E FROM FIELD TO FIELDPRESS ANY KEY EXCEP
T";.." .RETURN., OR PRESS THE LEFT .CR
SR. TO MOVE BACKWARDS.";.." WHEN THE C
URSOR IS ON THE FIELD TO BE MOVED,";.."
PRESS .RETURN. TO SELECT THAT FIELD."...
."NOW YOU MAY USE THE .CRSR. KEYS TO MOV
E";.." THE SELECTED FIELD. SCREENWRITE
R WILL".."PREVENT FIELDS FROM OVERLAPPIN
G."...."WHEN YOU HAVE MOVED THE FIELD TO
THE".."DESIRED PLACE ON THE SCREEN, PRE
SS .RETURN.";.." TO DESELECT THAT F
IELD SO THAT YOU MAY ";.."GO ON TO ANO
THER."...."AT ANY POINT YOU MAY PRESS TH
E .F1. KEY TO";.."RETURN TO THE MENU."..
H(Y$,24);"PRESS .RETURN. TO BEGIN"..A$:.
O.....O.HP.L.F.+O.HKO..".":JN&..=..+O.H.
K..=../S.V.=. 15..15,DV,15..15,"S".DR$."
:"F$. 15..".......... SAVING SCREEN '";F
$;"' PLEASE WAIT."..2,DV,2,DR$.":".F$.",
W":.T.D.T.K.T.R.T.Y.T.!...B.!..!....K+O.
..D..T.D..!....P+O...K..T.K..!....G+O...
R..T.R..!....T+O...Y..T.YG.!..2,NF:..D.+
O.HO:.T.!...B.!..!....K.O.HO>..2,P$(J)..
2,X%(J)..2,Y%(J)..2,L%(J)..2,T$(J):G.!..
2,NC:..K.+O.HN..T.!...B.!..!....P.O.HN..
.2,P$(J)..2,X%(J)..2,Y%(J)..2,L%(J)..2,T
$(J):G.!..2,NG:..R.+O.HN..T.!...B.!..!..
..G.O.HN...2,P$(J)..2,X%(J)..2,Y%(J)..2,
L%(J)..2,T$(J):G.!..2,NT:..Y.+O.HN+.T.!.
..B.!..!....T.O.HN/..!....+O...!. ......
2,P$(J)..2,X%(J)..2,Y%(J):G.!. 2:L.."PLE
ASE GIVE THE FILE NAME (UP TO 7 LET
TERS) YOU WISH TO";.." USE FOR YOUR
SCREEN LAYOUT..".."CODEWRITER WILL ASK
YOU FOR THIS".."NAME AND WILL SAVE YOUR
GENERATED";...."APPLICATION PROGRAM UND
ER THIS NAME.".."..FILE NAME: ";:.Q:.V..
..Q3..Q,J...HV.=..=..+O.L.."....YOUR SCR
EEN LAYOUT WILL NOW BE SAVED.":..E..T.`.
.`..O.HL$..".YOU HAVE ELECTED TO STORE Y
OUR DATA ON ASEPARATE DATA DISK. ";.."T
HIS DATA DISK WILLALSO HOLD YOUR SCREEN
LAYOUT.";.." MAKE SURE YOUR DATA DISK IS
IN DRIVE ";.(B(968).1):J.1L..".YOUR APP
LICATION PROGRAM, DATA, AND SCREEN L
AYOUT WILL ALL BE";.." STORED ON YOURAPP
LICATION DISK. MAKE SURE YOUR APP
LICATION DISK";.." IS IN DRIVE ";.(B(968
).1):J.1L.."....ERROR:NO SCREEN LAYOUT I
N MEMORY TO SAVE":J.1LJIR..=..+O.H.K..=.
./S.V.=. 15..15,DV,15..2,DV,2,DR$.":".F$
:J.K...>.O.HJ....."..ERROR: FILE NOT FOU
ND.";H(Y$,20);SP$;:J.1. 2:L.T.!.T.G.P..T
.R.T.N..2,L:..G.+O.HJ[..!T.!..G..!...B.!
..!..K....2,P$(J),X%(J),Y%(J),L%(J),T$(J
):G.!..2,I:...+O.HJ...!T.!....!...B.!..!
..P....2,P$(J),X%(J),Y%(J),L%(J),T$(J):G
.!..2,NG:..R.+O.HI...!T.!..R..!...B.!..!
..G....2,P$(J),X%(J),Y%(J),L%(J),T$(J):G
.!..2,Z:..N.+O.HIB..!T.!..N..!...B.!..!.
.T....!.....2,P$(J),X%(J),Y%(J):..!... .
.+O...!....G.!..!..T...PF. 2:L.."."..H(Y
$,20);" TYPE .D. AND .RETURN. FOR DIRECT
ORY".."..... ENTER THE FILE NAME YOU WIS
H TO LOAD."..".FILE NAME: ";:.Q:.V....Q3
..Q,J...HV.=..=..D+O.J.1HIRL....-O.L.T.!
...B.!..!....T+O)..H(Y$,Y%(J));.X%(J));"
^";P$(J);"^":HGQ..!....D+O,..H(Y$,Y%(J))
;.X%(J));P$(J);"../../..":HGQ..!....A+O.
HG...H(Y$,Y%(J));.X%(J));P$(J);H(DT$,L%(
J).1);T$(J):HGQ..H(Y$,Y%(J));.X%(J));P$(
J);H(DT$,L%(J)):G.!L..".";H(Y$,5)"WARNIN
G: IF YOU WANT YOUR NEW FIELD".."POSITIO
NS TO BE MADE PERMANENT.";.." YOU MU
ST SAVE YOUR SCREEN BEFORE EXITING SC
REENWRITER.":J.1L........P..H(Y$,23);SP
$;..SP$;..SP$;:...+O.HF..T.U...B.U..U...
...U....F.T.|.T...PM.T.....T...Q..U...PF
..V...U...U....H(Y$,24)" REA
DING SCREEN":....T.......O,O.....PFL....
.O*O.HF....1*O$..ONLY 49 FIELDS ARE ALLO
WEDV..H."........(....(..........F...O.H
E.."THE PROMPT MAY NOT BE ON TWO LINESV.
.H.".....Q.........P.F.+O..............
.P.F.+... +.O......T..HF|........ +O....
.........V........(*O ..ERROR IN SCREEN
LAYOUTV..H.".F.+....+.O.HA..F.+...#....$
.........../...O.HDS....+.F...O.HA..../+
.F.+.O..T....|..T.|....D..HA....$+.F.+.O
.....$..HA)...#+.F.+.O.....#..HA).F.+...
.+.O.....T..HA..FM.AUA)AU...#+...$+.....
+..../+..O.J.E........V...PFHA..&A FIELD
CANNOT START WITH .,/,#, OR $.V..H."...
.....U........+O.....A............P....
..D.O.HD...|.........O..$INVALID DATE FO
RMAT IN SCREEN LAYOUTV..H."......D+.....
.A+.O.....K..J.LHB.J.L..H(Y$,24);SP$..H(
Y$,23)" .K. KEYED .P. PROG CALC OR .G
. GT FIELD":......*O0.&NUMERIC FIELDS AR
E LIMITED TO 9 DIGITSV..H."..RO.&Q,..Q3.
Q:J...HRO.O..K..O..P...O..G..O.HC....O..
.O..K+O.HB.......#+O.........V..HBR.....
/O...0.00V..HBR.....+O...0.99V..HBR.....
........99.V....H(Y$,23);SP$;..SP$;..H(Y
$,23);"THE MAX FOR THIS FIELD: ";H(MX$.S
P$,16)..H(Y$,24);"IS THIS OK ? (Y/N)";:.
.Q3..Q,.Q:J...H..Y..H..N..O...H(Y$,24);S
P$;:HB..H..N+O!..CHANGE THE FIELD LENGTH
V..H."..H(Y$,23)SP$;..SP$;:......D+O....
....H(Y$,24).13)"READING SCREEN":.T.....
.Q...V...PF.......T.|... +O.H..J........
.....PHE..........V...PFHA............T.
.J.L..V......Q..PF.U...U........H..J.E..
......V.......... +O.............V..HA..
....U..HA...V...PF..........T.......T..H
F|.....T..J..HF..........T.B...B.B..B..B
....PF.T..L......T+O...................
..U.I..I./O....U.I..I.....(.U....I......
..(..U........................T+O.......
.........D+O...........U.IL...?*...-.O.
.....Q.... -O....@.Q.L..H(Y$,23);SP$;..S
P$;..SP$H(Y$,23);..H(SP$,.((40.C(ER$)).2
));ER$..H(Y$,24)"PRESS .F. TO FIX ERROR
AND RESUME READING".."PRESS .S. TO STOP
READING AND REDO SCREEN";..C$:.....F....
..F.......S.......S..O.H........T.B...B
.B..B..B....PF..H(Y$,23);SP$;SP$" ";H(Y
$,25);SP$;:.....S+.....S+.O..P..Q..Q..Q,
.Q3H...P.............(...Q...........(..
.X..Q...Q,..Q3.......T...U....X.(.3...,.
..Q...V...T.|.T...PM.T...PF.U...U.......
.......H.S..".THIS OPTION ALLOWS YOU TO
CREATE OR EDIT";.."FIELD TYPES. USE THE
.CRSR. KEYS TO MOVE ";.."THE CURSOR ARO
UND THE SCREEN. USE THE ";.." .DEL. KEY
TO BACKSPACE, THE .RETURN. KEY TO".."MO
VE TO THE NEXT LINE AND THE .F7. KEY TO"
;.." TAB OVER 10 SPACES TO THE RIGHT."..
"PROMPTS MUST BE IN THE FOLLOWING FORM:.
"...10)".PROMPT. .LENGTH."...10)"ADDRES
S ......"..".YOU MAY LEAVE ANY NUMBER OF
SPACES ";.." BETWEEN THE PROMPT AND
THE DOTS. THE ".."NUMBER OF DOTS SPECIF
IES THE MAXIMUM".."LENGTH FOR KEYBOARD-E
NTERED FIELDS.".."FOR COMPUTED FIELDS, T
HE NUMBER OF DOTS".."SPECIFIES THE MAXIM
UM VALUE THAT MAY BE".."ENTERED IN THAT
FIELD.":J.1.."WHEN YOU ARE FINISHED PRES
S THE .F1. KEY.".."SCREENWRITER WILL THE
N READ THE SCREEN".."AND ASK WHETHER EAC
H NUMERIC AND DOLLAR".."FIELD IS TO BE E
NTERED FROM THE KEY-".."BOARD (K), CALCU
LATED BY THE PROGRAM (P)";..",OR SUMMED
AS A GRAND TOTAL FIELD (G)."..".A LABEL
IS A WORD OR PHRASE NOT CONNECTE
D";.." WITH DATA. YOU MAY SPECIFY A L
ABEL BY";.." PLACING UP-ARROWS (^)
IMMEDIATELY BEFORE AND AFTER IT.".."..
FOR EXAMPLE: ^THIS IS A LABEL^":J.1.."IF
YOU WISH YOU MAY MARK A FIELD AS ONE";.
." OF THREE SPECIAL TYPES:"..".TO INDICA
TE A NUMERIC FIELD, SUBSTITUE A '#' FOR
THE LAST DOT.".."FOR EXAMPLE: AMOUNT ...
.#"..".TO INDICATE A DOLLAR FIELD, SUBST
ITUE A '$' FOR THE LAST DOT.".."FOR EXA
MPLE: TOTAL ....$.".."THE '#' AND '$' A
RE INCLUDED IN THE LENGTH COUNT (FOR
KEYBOARD-";.."ENTERED FIELDS).."..
"PROGRAM CALCULATED FIELDS AND GRAND
TOTAL FIELDS MUST BE DEFINED".."USING N
UMERIC AND DOLLAR DATA TYPES."..".TO IND
ICATE A DATE FIELD, ENTER ".."'../../..'
INSTEAD OF THE USUAL DOTS.".."FOR EXAMP
LE: DATE ../../..":J.1LJ....PO.L.."."H(Y
$,10)" PLACE THE .CODEWRITER. DISK IN DR
IVE 0":J.1J.Y.A..S+.F.+.O.L..APPLICATION
V.W..E...+O...DATAV.W. 15..15,DV,15..2,D
V,2,DR$.":CODEGEN":J.K. 2:...>+O.L.."."H
(Y$,10)"PLACE THE .";DM$;". DISK IN DRIV
E ";.(B(968).1):J.1H....H(Y$,Y%);.X%.J);
"";:.T.!..W.(.3...,.T....RH..!.+.:.*.O..
.RH.....!......!......P.T...:B..........
.T.........PF..J$:.....+O.H.{.....T.....
."+O.H.{.... -...................*.....-
......Z*.O.H........O.H....!.+O.H....!..
T.!.H..!....RH.. V....H(Y$,Y%);.X%.J);"
";:H.......+O......!......!.....PL.H...
.RH..H(Y$,Y%);.X%.J.1);J$;:..!.:+O..H..!
........RHH........O...!..T.!H... 15..15
,8,15..15,A$,B$,C$,D$:.O..P.L........P.
.H(Y$,23);SP$;..SP$..SP$;..H(Y$,23)".P.R
INT FOR HARDCOPY : .E.XIT":..Q,..Q3.Q:J.
..H..P+O.H.X.H..E+O...Q,..Q3LH... 3..3,4
..3,"". 3:....O.H....H(Y$,23);"IS YOUR P
RINTER A COMMODORE? ";:.!Q,..Q3.Q:J...
H..Y..H..N..O.H...H..Y+O...@.P.H..N+O...
@..P..H(Y$,23);SP$;..H(Y$,23);" PRINT
ING ...". 4:..<Q:..4. 4:H.S..H(Y$,23)"
.PRINTER NOT READY. ":.T.U...B.U
F. 3:..Q,..Q3L..<P....B....D7:.....PFL.
4. 15..15,8,15,"I0"..4,8,4,"#"..15,"U1";
4;0;18;0..15,"B-P:";4;144:..V...T.!..B.!
..#4,A$:....O.V..G.!..15,EN$,EM$. 4. 15:
.....C...W..T.. .1 +U.PLJ....PO.L.."..
.........".6);"THIS IS AN UNAUTHORIZED C
OPY":.P....B..F..|...Q:.P..DB...........
........................G...PFL..G.....P
.....P!....P.."...LO";G(34);FL$;G(34);",
8".."....RUN":I.F..P..W..P..X..P..".";:^
.....H(Y$,24);SP$;SP$;..H(Y$,24);" WOUL
D YOU LIKE TO SAVE THE CONTENTS".." OF Y
OUR CURRENT SCREEN ? (Y/N) ";:.,U...3U.$
.!Q,..Q3.Q:.T.!J...HRA.A..N+O.H...A..Y..
A..Y..O.H.XHG/..H(Y$,24);SP$;SP$;..H(Y$,
24);.." ABORTING WILL CLEAR YOUR SCREEN
FROM".." MEMORY. O.K. TO ABORT ? (Y/N)
";:. Q,..Q3.Q:J...H..N+O....Q,..$Q3H.=.H
..Y..H..Y..O.H.6J.YH.UJ....2,8,2,"NOTES"
..2,A$..2,A$:.P...B...."."..:.T.+..B.+..
2,A$..A$:G.+..H(Y$,24);" .F1. TO CONTINU
E .F3. TO PRINT .F5. TO EXIT";..B$:.....
..+O.H.3.......+O.J.S..H(Y$,23);SP$..SP$
;:H..........O.H..G... 2:H....I.......I.
.....O.H....I..P...H.........R.....1+O..
.0R.....2+O...1R.L..".. .SYSTEM
CONFIGURATION."..H(Y$,6);" HOW MANY D
ISK DRIVES WILL YOU"..H(Y$,7);" BE
USING (1 OR 2) ? ";:..Q,.Q3.Q:J...HR....
.1+O...H.P..0R...P...I..PL....2+O...H.P.
.1R.H.&H....H(Y$,10);" ARE YOU USING T
WO COMMODORE 1541".." DISK DRIVES (
Y/N) ? ";:..Q,..Q3.Q:J...H..N+O...P...I.
.PL.H..Y.O.H.&..H(Y$,13);" WHAT IS TH
E DEVICE NUMBER FOR YOUR".." SECOND DRI
VE ? ";:..Q,..Q3.Q:J...H..+O.H...H..P...
0R...H.P..I..PL..1,DV,0,"$".DR$:..V.2.T.
9..#1,A$,A$,A$,A$,A$,A$:..T.GJ.....V.@.T
.GJ.....V.G.T.GJ.....V.NJ...P..B....#1,B
$:G...T.!..B.!..U..T.U..U..*O.J....T.GJ.
.....O.H....2...*O...2.....T.\..2.....V.
2..2...+O ..\..2..........T.\..2.....V.2
..9..\.T.9..H(B$.SP$,18),T$,BL:G.!..BLOC
KSFREE.V.......9.T.9..9T.\...V.2..H(B$.S
P$,18),T$,BL:..9...+O$..". *** NO FI
LES ON DISK ***". 1:...T.UJ..L..V...P...
GB....#1,A$:.O. ..+.O. ..+.O.H......O.V.
.G..L..H(Y$,2)". DISK NAME: ";N$..H(Y$,3
)" ID: ";I$;.5);"OPERATING SYSTEM: "OS$.
.H(Y$,5)" FILE NAME";.10);"TYPE";.7);"BL
OCKS"..:L..H(Y$,24)"PRESS .RETURN. TO CO
NTINUE.";..IN$:.H..+O.H...H.....O.H....U
...+O.L.T.UJ..L..V....V.2.T...P...GB....
#1,A$:.O. ..+.O. ..+.O.H.:.O."..+O......
T......+O.....O.V..H.:....+O.....O.V...T
..H.:..2.O.V.2G....#1,A$,A$:L^......Y...
...NI.....SP.....DT.....I......MF.....X.
.....Y......L......AA.....IN.....A......
FL.....C1.....C2.....C3.....CO.....NA...
..TR.....DV.....DR.....ER.....EM.....ES.
....N......RS.....XL.....YL.....FL.....C
L.....LA.....C......T......AD.....A.....
.K......ZQ.....ZS.....L......F......SS..
...J......P......EV.....FL.....F......NF
.....NC.....NG.....NT.....ND.....L......
Z......X......DC.....QC.....CD.....Q....
..Z......C......I......J......ER.....MX.
....Q7.....JC.....CW.....DM.....AD.....K
L.....J......II.....B......D......D7....
.HD.....EN.....XX.....YY.....K......T...
...TB.....N......I......OS.....CT.....BL
.....................;XZU../.S...U.0.
> CLICK IMAGE PREVIEW FOR FULL MODAL