PAGE54-65
FILE INFORMATION
FILENAME(S): PAGE54-65
FILE TYPE(S): SEQ
FILE SIZE: 25.8K
FIRST SEEN: 2025-10-20 14:30:31
APPEARS ON: 1 disk(s)
FILE HASH
2a366e1c72071b6d340d3ec36cf79ca367d8fa98153e032e73ede5c2e4f736dd
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| G PD 30 | PAGE54-65 | SEQ | Treasure Chest - Klaus Der Suhler | 7 | 17 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 C7 C5 CF |... ...| 00000010: D3 20 CB 45 52 4E 41 4C 20 D2 4F 55 54 49 4E 45 |. .ERNAL .OUTINE| 00000020: 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |S | 00000030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000040: 20 20 20 20 20 20 20 31 2D 35 31 0D 0D 0D 20 20 | 1-51... | 00000050: 20 20 20 20 20 20 20 20 C6 55 4E 43 54 49 4F 4E | .UNCTION| 00000060: 20 CE 41 4D 45 3A 20 D3 C1 D6 C5 0D 20 20 20 20 | .AME: ..... | 00000070: 20 20 20 20 20 20 D0 55 52 50 4F 53 45 3A 20 D3 | .URPOSE: .| 00000080: 41 56 45 20 4D 45 4D 4F 52 59 20 54 4F 20 41 20 |AVE MEMORY TO A | 00000090: 46 49 4C 45 2E 0D 20 20 20 20 20 20 20 20 20 20 |FILE.. | 000000A0: C3 41 4C 4C 20 41 44 44 52 45 53 53 3A 20 24 C3 |.ALL ADDRESS: $.| 000000B0: 31 C5 C4 0D 20 20 20 20 20 20 20 20 20 20 C9 4E |1... .N| 000000C0: 50 55 54 20 52 45 51 55 49 52 45 4D 45 4E 54 53 |PUT REQUIREMENTS| 000000D0: 3A 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |:. | 000000E0: 20 24 31 34 2D 24 31 35 20 20 20 D0 4F 49 4E 54 | $14-$15 .OINT| 000000F0: 45 52 20 54 4F 20 49 4E 46 4F 52 4D 41 54 49 4F |ER TO INFORMATIO| 00000100: 4E 20 53 45 43 54 4F 52 20 44 41 54 41 2E 0D 20 |N SECTOR DATA.. | 00000110: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 31 | $1| 00000120: 36 20 20 20 20 20 20 20 23 20 44 49 52 45 43 54 |6 # DIRECT| 00000130: 4F 52 59 20 53 45 43 54 4F 52 53 20 54 4F 20 53 |ORY SECTORS TO S| 00000140: 4B 49 50 20 46 49 52 53 54 2E 0D 20 20 20 20 20 |KIP FIRST.. | 00000150: 20 20 20 20 20 C5 52 52 4F 52 53 3A 20 D3 45 45 | .RRORS: .EE| 00000160: 20 C1 50 50 45 4E 44 49 58 0D 0D 20 20 20 20 20 | .PPENDIX.. | 00000170: 20 20 20 20 20 C4 45 53 43 52 49 50 54 49 4F 4E | .ESCRIPTION| 00000180: 3A 20 D4 48 49 53 20 52 4F 55 54 49 4E 45 20 57 |: .HIS ROUTINE W| 00000190: 49 4C 4C 20 53 41 56 45 20 4D 45 4D 4F 52 59 20 |ILL SAVE MEMORY | 000001A0: 54 4F 20 41 20 46 49 4C 45 3B 20 45 41 43 48 20 |TO A FILE; EACH | 000001B0: 53 45 43 54 4F 52 0D 20 20 20 20 20 20 20 20 20 |SECTOR. | 000001C0: 20 49 53 20 56 45 52 49 46 49 45 44 20 41 46 54 | IS VERIFIED AFT| 000001D0: 45 52 20 54 48 45 20 57 52 49 54 45 20 49 53 20 |ER THE WRITE IS | 000001E0: 46 49 4E 49 53 48 45 44 2E 20 20 D4 48 45 20 49 |FINISHED. .HE I| 000001F0: 4E 46 4F 20 53 45 43 54 4F 52 20 48 41 53 20 41 |NFO SECTOR HAS A| 00000200: 4C 4C 0D 20 20 20 20 20 20 20 20 20 20 54 48 45 |LL. THE| 00000210: 20 4E 45 43 45 53 53 41 52 59 20 49 4E 46 4F 52 | NECESSARY INFOR| 00000220: 4D 41 54 49 4F 4E 2E 20 20 49 45 2E 20 20 53 54 |MATION. IE. ST| 00000230: 41 52 54 20 41 4E 44 20 53 54 4F 50 20 20 41 44 |ART AND STOP AD| 00000240: 44 52 45 53 53 45 53 2C 20 20 46 49 4C 45 0D 20 |DRESSES, FILE. | 00000250: 20 20 20 20 20 20 20 20 20 54 59 50 45 20 20 41 | TYPE A| 00000260: 4E 44 20 20 53 54 52 55 43 54 55 52 45 2E 20 20 |ND STRUCTURE. | 00000270: C9 54 20 20 4D 55 53 54 20 41 4C 53 4F 20 43 4F |.T MUST ALSO CO| 00000280: 4E 54 41 49 4E 20 54 48 45 20 41 44 44 52 45 53 |NTAIN THE ADDRES| 00000290: 53 20 20 4F 46 20 20 54 48 45 0D 20 20 20 20 20 |S OF THE. | 000002A0: 20 20 20 20 20 46 49 4C 45 4E 41 4D 45 20 20 53 | FILENAME S| 000002B0: 54 52 49 4E 47 20 53 4F 4D 45 57 48 45 52 45 20 |TRING SOMEWHERE | 000002C0: 49 4E 20 4D 45 4D 4F 52 59 2C 20 49 4E 20 54 48 |IN MEMORY, IN TH| 000002D0: 45 20 46 49 52 53 54 20 54 57 4F 20 42 59 54 45 |E FIRST TWO BYTE| 000002E0: 53 2E 20 20 C9 46 0D 20 20 20 20 20 20 20 20 20 |S. .F. | 000002F0: 20 54 48 45 20 46 49 4C 45 20 49 53 20 41 20 D6 | THE FILE IS A .| 00000300: CC C9 D2 20 46 49 4C 45 2C 20 54 48 45 20 4D 45 |... FILE, THE ME| 00000310: 4D 4F 52 59 20 49 53 20 53 41 56 45 44 20 54 4F |MORY IS SAVED TO| 00000320: 20 43 48 41 49 4E 20 30 2E 20 CC 4F 43 41 54 49 | CHAIN 0. .OCATI| 00000330: 4F 4E 0D 20 20 20 20 20 20 20 20 20 20 24 31 36 |ON. $16| 00000340: 20 20 53 50 45 43 49 46 49 45 53 20 54 48 45 20 | SPECIFIES THE | 00000350: 4E 55 4D 42 45 52 20 4F 46 20 44 49 52 45 43 54 |NUMBER OF DIRECT| 00000360: 4F 52 59 20 53 45 43 54 4F 52 53 20 54 4F 20 53 |ORY SECTORS TO S| 00000370: 4B 49 50 20 46 4F 52 20 C4 C9 D2 C4 D3 CB 0D 20 |KIP FOR ....... | 00000380: 20 20 20 20 20 20 20 20 20 41 4E 44 20 C8 CF CC | AND ...| 00000390: C5 2E 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 C6 |..... .| 000003A0: 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 3A 20 D3 C1 |UNCTION .AME: ..| 000003B0: D6 C5 32 0D 20 20 20 20 20 20 20 20 20 20 D0 55 |..2. .U| 000003C0: 52 50 4F 53 45 3A 20 D3 41 56 45 20 4D 45 4D 4F |RPOSE: .AVE MEMO| 000003D0: 52 59 20 54 4F 20 53 50 45 43 49 46 49 45 44 20 |RY TO SPECIFIED | 000003E0: 53 45 43 54 4F 52 53 20 4F 4E 20 54 48 45 20 44 |SECTORS ON THE D| 000003F0: 49 53 4B 2E 0D 20 20 20 20 20 20 20 20 20 20 C3 |ISK.. .| 00000400: 41 4C 4C 20 41 44 44 52 45 53 53 3A 20 24 C3 31 |ALL ADDRESS: $.1| 00000410: C6 39 0D 20 20 20 20 20 20 20 20 20 20 C9 4E 50 |.9. .NP| 00000420: 55 54 20 52 45 51 55 49 52 45 4D 45 4E 54 53 3A |UT REQUIREMENTS:| 00000430: 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. | 00000440: 24 30 C5 2D 24 30 C6 20 20 20 D0 4F 49 4E 54 45 |$0.-$0. .OINTE| 00000450: 52 20 54 4F 20 4C 49 53 54 20 4F 46 20 54 52 41 |R TO LIST OF TRA| 00000460: 43 4B 53 20 41 4E 44 20 53 45 43 54 4F 52 53 20 |CKS AND SECTORS | 00000470: 54 4F 20 55 53 45 2E 0D 20 20 20 20 20 20 20 20 |TO USE.. | 00000480: 20 20 20 20 20 20 20 24 31 30 2D 24 31 31 20 20 | $10-$11 | 00000490: 20 D3 54 41 52 54 20 41 44 44 52 45 53 53 20 4F | .TART ADDRESS O| 000004A0: 46 20 4D 45 4D 4F 52 59 20 54 4F 20 42 45 20 53 |F MEMORY TO BE S| 000004B0: 41 56 45 44 2E 0D 20 20 20 20 20 20 20 20 20 20 |AVED.. | 000004C0: D0 52 45 50 41 52 41 54 4F 52 59 20 52 4F 55 54 |.REPARATORY ROUT| 000004D0: 49 4E 45 53 3A 20 C6 C1 CC CC CF C3 0D 20 20 20 |INES: ....... | 000004E0: 20 20 20 20 20 20 20 C5 52 52 4F 52 53 3A 20 D3 | .RRORS: .| 000004F0: 45 45 20 C1 50 50 45 4E 44 49 58 0D 0D 20 20 20 |EE .PPENDIX.. | 00000500: 20 20 20 20 20 20 20 C4 45 53 43 52 49 50 54 49 | .ESCRIPTI| 00000510: 4F 4E 3A 20 20 D4 48 49 53 20 52 4F 55 54 49 4E |ON: .HIS ROUTIN| 00000520: 45 20 49 53 20 43 41 4C 4C 45 44 20 42 59 20 D3 |E IS CALLED BY .| 00000530: C1 D6 C5 20 54 4F 20 41 43 54 55 41 4C 4C 59 20 |... TO ACTUALLY | 00000540: 53 41 56 45 20 54 48 45 0D 20 20 20 20 20 20 20 |SAVE THE. | 00000550: 20 20 20 4D 45 4D 4F 52 59 2E 20 20 C1 4C 4C 20 | MEMORY. .LL | 00000560: 20 4F 46 20 54 48 45 20 53 45 43 54 4F 52 53 20 | OF THE SECTORS | 00000570: 53 48 4F 55 4C 44 20 48 41 56 45 20 41 4C 52 45 |SHOULD HAVE ALRE| 00000580: 41 44 59 20 42 45 45 4E 20 20 41 4C 4C 4F 43 41 |ADY BEEN ALLOCA| 00000590: 54 45 44 2E 0D 20 20 20 20 20 20 20 20 20 20 D4 |TED.. .| 000005A0: 48 49 53 20 20 52 4F 55 54 49 4E 45 20 20 53 54 |HIS ROUTINE ST| 000005B0: 4F 50 53 20 53 41 56 49 4E 47 20 4D 45 4D 4F 52 |OPS SAVING MEMOR| 000005C0: 59 20 57 48 45 4E 20 54 52 41 43 4B 20 30 20 49 |Y WHEN TRACK 0 I| 000005D0: 53 20 46 4F 55 4E 44 20 20 49 4E 20 20 54 48 45 |S FOUND IN THE| 000005E0: 0D 20 20 20 20 20 20 20 20 20 20 4C 49 53 54 20 |. LIST | 000005F0: 4F 46 20 54 52 41 43 4B 53 20 41 4E 44 20 53 45 |OF TRACKS AND SE| 00000600: 43 54 4F 52 53 2E 0D 0D 0D 20 20 20 20 20 20 20 |CTORS.... | 00000610: 20 20 20 C6 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 | .UNCTION .AME| 00000620: 3A 20 D3 C4 31 36 31 36 0D 20 20 20 20 20 20 20 |: ..1616. | 00000630: 20 20 20 D0 55 52 50 4F 53 45 3A 20 D3 49 47 4E | .URPOSE: .IGN| 00000640: 45 44 20 31 36 20 42 49 54 20 42 59 20 31 36 20 |ED 16 BIT BY 16 | 00000650: 42 49 54 20 44 49 56 49 53 49 4F 4E 2E 0D 20 20 |BIT DIVISION.. | 00000660: 20 20 20 20 20 20 20 20 C3 41 4C 4C 20 41 44 44 | .ALL ADD| 00000670: 52 45 53 53 3A 20 24 C3 31 36 C3 0D 20 20 20 20 |RESS: $.16.. | 00000680: 20 20 20 20 20 20 C9 4E 50 55 54 20 52 45 51 55 | .NPUT REQU| 00000690: 49 52 45 4D 45 4E 54 53 3A 0D 20 20 20 20 20 20 |IREMENTS:. | 000006A0: 20 20 20 20 20 20 20 20 20 D9 20 20 20 20 20 20 | . | 000006B0: 20 20 20 D4 48 45 20 41 44 44 52 45 53 53 20 4F | .HE ADDRESS O| 000006C0: 46 20 54 48 45 20 31 36 20 42 49 54 20 44 49 56 |F THE 16 BIT DIV| 000006D0: 49 53 4F 52 2E 0D 20 20 20 20 20 20 20 20 20 20 |ISOR.. | 000006E0: 20 20 20 20 20 D8 20 20 20 20 20 20 20 20 20 D4 | . .| 000006F0: 48 45 20 41 44 44 52 45 53 53 20 4F 46 20 54 48 |HE ADDRESS OF TH| 00000700: 45 20 31 36 20 42 49 54 20 44 49 56 49 44 45 4E |E 16 BIT DIVIDEN| 00000710: 44 2E 0D 20 20 20 20 20 20 20 20 20 20 CF 55 54 |D.. .UT| 00000720: 50 55 54 3A 0D 20 20 20 20 20 20 20 20 20 20 20 |PUT:. | 00000730: 20 20 20 20 D8 20 20 20 20 20 20 20 20 20 D4 48 | . .H| 00000740: 45 20 41 44 44 52 45 53 53 20 4F 46 20 54 48 45 |E ADDRESS OF THE| 00000750: 20 31 36 20 42 49 54 20 51 55 4F 54 49 45 4E 54 | 16 BIT QUOTIENT| 00000760: 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. | 00000770: 20 24 31 32 2D 24 31 33 20 20 20 D4 48 45 20 31 | $12-$13 .HE 1| 00000780: 36 20 42 49 54 20 52 45 4D 41 49 4E 44 45 52 2E |6 BIT REMAINDER.| 00000790: 0D 0D 20 20 20 20 20 20 20 20 20 20 C4 45 53 43 |.. .ESC| 000007A0: 52 49 50 54 49 4F 4E 3A 20 D4 48 49 53 20 52 4F |RIPTION: .HIS RO| 000007B0: 55 54 49 4E 45 20 49 53 20 4F 4E 45 20 4F 46 20 |UTINE IS ONE OF | 000007C0: 54 48 45 20 C7 C5 CF D3 20 4D 41 54 48 20 52 4F |THE .... MATH RO| 000007D0: 55 54 49 4E 45 53 2E 20 D8 20 41 4E 44 0D 20 20 |UTINES. . AND. | 000007E0: 20 20 20 20 20 20 20 20 D9 20 45 41 43 48 20 48 | . EACH H| 000007F0: 41 56 45 20 54 48 45 20 41 44 44 52 45 53 53 20 |AVE THE ADDRESS | 00000800: 4F 46 20 41 20 54 45 52 4D 20 49 4E 20 54 48 45 |OF A TERM IN THE| 00000810: 20 44 49 56 49 53 49 4F 4E 2E 20 C2 4F 54 48 20 | DIVISION. .OTH | 00000820: 54 45 52 4D 53 20 41 52 45 0D 20 20 20 20 20 20 |TERMS ARE. | 00000830: 20 20 20 20 4D 41 44 45 20 50 4F 53 49 54 49 56 | MADE POSITIV| 00000840: 45 20 57 49 54 48 20 C1 C2 D3 31 36 2E 20 D5 C4 |E WITH ...16. ..| 00000850: 31 36 31 36 20 49 53 20 54 48 45 4E 20 43 41 4C |1616 IS THEN CAL| 00000860: 4C 45 44 3B 20 49 46 20 54 48 45 20 52 45 53 55 |LED; IF THE RESU| 00000870: 4C 54 20 4F 46 0D 20 20 20 20 20 20 20 20 20 20 |LT OF. | 00000880: 54 48 45 20 44 49 56 49 53 49 4F 4E 20 53 48 4F |THE DIVISION SHO| 00000890: 55 4C 44 20 42 45 20 4E 45 47 41 54 49 56 45 2C |ULD BE NEGATIVE,| 000008A0: 20 CE C5 C7 31 36 20 49 53 20 43 41 4C 4C 45 44 | ...16 IS CALLED| 000008B0: 2E 20 D4 48 45 20 51 55 4F 54 49 45 4E 54 20 49 |. .HE QUOTIENT I| 000008C0: 53 0D 20 20 20 20 20 20 20 20 20 20 53 54 4F 52 |S. STOR| 000008D0: 45 44 20 20 49 4E 20 50 4C 41 43 45 20 4F 46 20 |ED IN PLACE OF | 000008E0: 54 48 45 20 4F 52 49 47 49 4E 41 4C 20 44 49 56 |THE ORIGINAL DIV| 000008F0: 49 44 45 4E 44 20 54 48 41 54 20 D8 20 50 4F 49 |IDEND THAT . POI| 00000900: 4E 54 45 44 20 54 4F 2E 20 20 D4 48 45 0D 20 20 |NTED TO. .HE. | 00000910: 20 20 20 20 20 20 20 20 44 49 56 49 44 45 4E 44 | DIVIDEND| 00000920: 20 20 49 53 20 4C 45 46 54 20 55 4E 54 4F 55 43 | IS LEFT UNTOUC| 00000930: 48 45 44 2E 20 20 D4 48 45 20 52 45 4D 41 49 4E |HED. .HE REMAIN| 00000940: 44 45 52 20 49 53 20 41 4C 57 41 59 53 20 41 20 |DER IS ALWAYS A | 00000950: 20 50 4F 53 49 54 49 56 45 0D 20 20 20 20 20 20 | POSITIVE. | 00000960: 20 20 20 20 49 4E 54 45 47 45 52 2E 0D 0D 0D 0D | INTEGER.....| 00000970: 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 20 20 20 20 20 20 |.......... | 00000980: 20 20 20 20 C7 C5 CF D3 20 CB 45 52 4E 41 4C 20 | .... .ERNAL | 00000990: D2 4F 55 54 49 4E 45 53 20 20 20 20 20 20 20 20 |.OUTINES | 000009A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000009B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2D | 1-| 000009C0: 35 32 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 C6 |52... .| 000009D0: 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 3A 20 D3 C5 |UNCTION .AME: ..| 000009E0: CC C2 D3 D7 0D 20 20 20 20 20 20 20 20 20 20 D0 |..... .| 000009F0: 55 52 50 4F 53 45 3A 20 D3 45 4C 45 43 54 53 20 |URPOSE: .ELECTS | 00000A00: 54 48 45 20 C2 45 52 4B 45 4C 45 59 20 D3 4F 46 |THE .ERKELEY .OF| 00000A10: 54 57 4F 52 4B 53 20 46 4F 4E 54 2E 0D 20 20 20 |TWORKS FONT.. | 00000A20: 20 20 20 20 20 20 20 C3 41 4C 4C 20 41 44 44 52 | .ALL ADDR| 00000A30: 45 53 53 3A 20 24 C3 31 34 C2 0D 20 20 20 20 20 |ESS: $.14.. | 00000A40: 20 20 20 20 20 CF 55 54 50 55 54 3A 0D 20 20 20 | .UTPUT:. | 00000A50: 20 20 20 20 20 20 20 20 20 20 20 20 24 32 36 20 | $26 | 00000A60: 20 20 20 20 20 20 23 20 50 49 58 45 4C 53 20 41 | # PIXELS A| 00000A70: 42 4F 56 45 20 4C 49 4E 45 20 4F 46 20 50 52 49 |BOVE LINE OF PRI| 00000A80: 4E 54 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 |NT.. | 00000A90: 20 20 20 24 32 37 2D 24 32 38 20 20 20 D4 48 45 | $27-$28 .HE| 00000AA0: 20 4E 55 4D 42 45 52 20 4F 46 20 42 59 54 45 53 | NUMBER OF BYTES| 00000AB0: 20 49 4E 20 54 48 45 20 42 49 54 20 53 54 52 45 | IN THE BIT STRE| 00000AC0: 41 4D 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 |AM.. | 00000AD0: 20 20 20 24 32 39 20 20 20 20 20 20 20 D4 48 45 | $29 .HE| 00000AE0: 20 50 4F 49 4E 54 20 53 49 5A 45 2E 0D 20 20 20 | POINT SIZE.. | 00000AF0: 20 20 20 20 20 20 20 20 20 20 20 20 24 32 C1 2D | $2.-| 00000B00: 24 32 C2 20 20 20 D4 48 45 20 50 4F 49 4E 54 45 |$2. .HE POINTE| 00000B10: 52 20 54 4F 20 54 48 45 20 54 41 42 4C 45 20 4F |R TO THE TABLE O| 00000B20: 46 20 49 4E 44 49 43 45 53 20 49 4E 54 4F 20 54 |F INDICES INTO T| 00000B30: 48 45 20 42 49 54 0D 20 20 20 20 20 20 20 20 20 |HE BIT. | 00000B40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000B50: 53 54 52 45 41 4D 2E 0D 20 20 20 20 20 20 20 20 |STREAM.. | 00000B60: 20 20 20 20 20 20 20 24 32 C3 2D 24 32 C4 20 20 | $2.-$2. | 00000B70: 20 D4 48 45 20 50 4F 49 4E 54 45 52 20 54 4F 20 | .HE POINTER TO | 00000B80: 54 48 45 20 42 49 54 20 53 54 52 45 41 4D 2E 0D |THE BIT STREAM..| 00000B90: 0D 20 20 20 20 20 20 20 20 20 20 C4 45 53 43 52 |. .ESCR| 00000BA0: 49 50 54 49 4F 4E 3A 20 20 D4 48 49 53 20 52 4F |IPTION: .HIS RO| 00000BB0: 55 54 49 4E 45 20 53 49 4D 50 4C 59 20 43 4F 50 |UTINE SIMPLY COP| 00000BC0: 49 45 53 20 54 48 45 20 46 4F 4E 54 20 48 45 41 |IES THE FONT HEA| 00000BD0: 44 45 52 20 44 41 54 41 20 46 4F 52 0D 20 20 20 |DER DATA FOR. | 00000BE0: 20 20 20 20 20 20 20 54 48 45 20 C2 D3 D7 20 46 | THE ... F| 00000BF0: 4F 4E 54 20 54 4F 20 5A 45 52 4F 20 50 41 47 45 |ONT TO ZERO PAGE| 00000C00: 20 46 4F 52 20 55 53 45 20 42 59 20 C4 D3 D0 C3 | FOR USE BY ....| 00000C10: C8 D2 20 41 4E 44 20 C4 D3 D0 D4 D8 D4 2E 0D 0D |.. AND .........| 00000C20: 0D 20 20 20 20 20 20 20 20 20 20 C6 55 4E 43 54 |. .UNCT| 00000C30: 49 4F 4E 20 CE 41 4D 45 3A 20 D3 C5 D4 D0 C1 D4 |ION .AME: ......| 00000C40: 0D 20 20 20 20 20 20 20 20 20 20 D0 55 52 50 4F |. .URPO| 00000C50: 53 45 3A 20 D3 45 54 53 20 54 48 45 20 43 55 52 |SE: .ETS THE CUR| 00000C60: 52 45 4E 54 20 46 49 4C 4C 20 50 41 54 54 45 52 |RENT FILL PATTER| 00000C70: 4E 2E 0D 20 20 20 20 20 20 20 20 20 20 C3 41 4C |N.. .AL| 00000C80: 4C 20 41 44 44 52 45 53 53 3A 20 24 C3 31 33 39 |L ADDRESS: $.139| 00000C90: 0D 20 20 20 20 20 20 20 20 20 20 C9 4E 50 55 54 |. .NPUT| 00000CA0: 20 52 45 51 55 49 52 45 4D 45 4E 54 53 3A 0D 20 | REQUIREMENTS:. | 00000CB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 C1 20 | . | 00000CC0: 20 20 20 20 20 20 20 20 D4 48 45 20 50 41 54 54 | .HE PATT| 00000CD0: 45 52 4E 20 4E 55 4D 42 45 52 20 28 30 2D 33 31 |ERN NUMBER (0-31| 00000CE0: 29 2E 0D 0D 20 20 20 20 20 20 20 20 20 20 C4 45 |)... .E| 00000CF0: 53 43 52 49 50 54 49 4F 4E 3A 20 20 D4 48 49 53 |SCRIPTION: .HIS| 00000D00: 20 20 52 4F 55 54 49 4E 45 20 53 45 54 53 20 54 | ROUTINE SETS T| 00000D10: 48 45 20 46 49 4C 4C 20 50 41 54 54 45 52 4E 20 |HE FILL PATTERN | 00000D20: 55 53 45 44 20 42 59 20 20 D0 C6 C9 CC CC 2C 0D |USED BY .....,.| 00000D30: 20 20 20 20 20 20 20 20 20 20 D0 C6 C9 CC CC 32 | .....2| 00000D40: 2C 20 D0 C2 CF D8 20 41 4E 44 20 D0 C2 CF D8 32 |, .... AND ....2| 00000D50: 2E 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 C6 55 |.... .U| 00000D60: 4E 43 54 49 4F 4E 20 CE 41 4D 45 3A 20 D3 D0 D2 |NCTION .AME: ...| 00000D70: CF C6 C6 0D 20 20 20 20 20 20 20 20 20 20 D0 55 |.... .U| 00000D80: 52 50 4F 53 45 3A 20 D4 55 52 4E 53 20 4F 46 46 |RPOSE: .URNS OFF| 00000D90: 20 41 20 53 50 52 49 54 45 2E 0D 20 20 20 20 20 | A SPRITE.. | 00000DA0: 20 20 20 20 20 C3 41 4C 4C 20 41 44 44 52 45 53 | .ALL ADDRES| 00000DB0: 53 3A 20 24 C3 31 C4 35 0D 20 20 20 20 20 20 20 |S: $.1.5. | 00000DC0: 20 20 20 C9 4E 50 55 54 20 52 45 51 55 49 52 45 | .NPUT REQUIRE| 00000DD0: 4D 45 4E 54 53 3A 0D 20 20 20 20 20 20 20 20 20 |MENTS:. | 00000DE0: 20 20 20 20 20 20 24 30 38 20 20 20 20 20 20 20 | $08 | 00000DF0: D3 50 52 49 54 45 20 4E 55 4D 42 45 52 20 28 30 |.PRITE NUMBER (0| 00000E00: 2D 37 29 2E 0D 20 20 20 20 20 20 20 20 20 20 D0 |-7).. .| 00000E10: 52 45 50 41 52 41 54 4F 52 59 20 52 4F 55 54 49 |REPARATORY ROUTI| 00000E20: 4E 45 53 3A 20 C3 CF D0 D9 D3 D0 2C 20 D0 CF D3 |NES: ......, ...| 00000E30: D3 D0 D2 2C 20 D3 D0 D2 CF CE 0D 0D 20 20 20 20 |..., ....... | 00000E40: 20 20 20 20 20 20 C4 45 53 43 52 49 50 54 49 4F | .ESCRIPTIO| 00000E50: 4E 3A 20 20 D4 48 49 53 20 52 4F 55 54 49 4E 45 |N: .HIS ROUTINE| 00000E60: 20 54 55 52 4E 53 20 54 48 45 20 53 50 52 49 54 | TURNS THE SPRIT| 00000E70: 45 20 4F 46 46 2C 20 53 4F 20 54 48 41 54 20 49 |E OFF, SO THAT I| 00000E80: 54 20 49 53 20 4E 4F 0D 20 20 20 20 20 20 20 20 |T IS NO. | 00000E90: 20 20 4C 4F 4E 47 45 52 20 56 49 53 49 42 4C 45 | LONGER VISIBLE| 00000EA0: 2E 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 C6 55 |.... .U| 00000EB0: 4E 43 54 49 4F 4E 20 CE 41 4D 45 3A 20 D3 D0 D2 |NCTION .AME: ...| 00000EC0: CF CE 0D 20 20 20 20 20 20 20 20 20 20 D0 55 52 |... .UR| 00000ED0: 50 4F 53 45 3A 20 D4 55 52 4E 53 20 4F 4E 20 41 |POSE: .URNS ON A| 00000EE0: 20 53 50 52 49 54 45 2E 0D 20 20 20 20 20 20 20 | SPRITE.. | 00000EF0: 20 20 20 C3 41 4C 4C 20 41 44 44 52 45 53 53 3A | .ALL ADDRESS:| 00000F00: 20 24 C3 31 C4 32 0D 20 20 20 20 20 20 20 20 20 | $.1.2. | 00000F10: 20 C9 4E 50 55 54 20 52 45 51 55 49 52 45 4D 45 | .NPUT REQUIREME| 00000F20: 4E 54 53 3A 0D 20 20 20 20 20 20 20 20 20 20 20 |NTS:. | 00000F30: 20 20 20 20 24 30 38 20 20 20 20 20 20 20 D3 50 | $08 .P| 00000F40: 52 49 54 45 20 4E 55 4D 42 45 52 20 28 30 2D 37 |RITE NUMBER (0-7| 00000F50: 29 2E 0D 20 20 20 20 20 20 20 20 20 20 D0 52 45 |).. .RE| 00000F60: 50 41 52 41 54 4F 52 59 20 52 4F 55 54 49 4E 45 |PARATORY ROUTINE| 00000F70: 53 3A 20 C3 CF D0 D9 D3 D0 2C 20 D0 CF D3 D3 D0 |S: ......, .....| 00000F80: D2 0D 0D 20 20 20 20 20 20 20 20 20 20 C4 45 53 |... .ES| 00000F90: 43 52 49 50 54 49 4F 4E 3A 20 20 D4 48 49 53 20 |CRIPTION: .HIS | 00000FA0: 20 52 4F 55 54 49 4E 45 20 20 54 55 52 4E 53 20 | ROUTINE TURNS | 00000FB0: 54 48 45 20 53 50 52 49 54 45 20 4F 4E 2C 20 20 |THE SPRITE ON, | 00000FC0: 53 4F 20 54 48 41 54 20 49 54 20 20 49 53 0D 20 |SO THAT IT IS. | 00000FD0: 20 20 20 20 20 20 20 20 20 56 49 53 49 42 4C 45 | VISIBLE| 00000FE0: 2E 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D |................| 00000FF0: 0D 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 C7 C5 |.... ..| 00001000: CF D3 20 CB 45 52 4E 41 4C 20 D2 4F 55 54 49 4E |.. .ERNAL .OUTIN| 00001010: 45 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |ES | 00001020: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001030: 20 20 20 20 20 20 20 20 31 2D 35 33 0D 0D 0D 20 | 1-53... | 00001040: 20 20 20 20 20 20 20 20 20 C6 55 4E 43 54 49 4F | .UNCTIO| 00001050: 4E 20 CE 41 4D 45 3A 20 D3 D4 C1 D2 D4 0D 20 20 |N .AME: ...... | 00001060: 20 20 20 20 20 20 20 20 D0 55 52 50 4F 53 45 3A | .URPOSE:| 00001070: 20 D2 45 53 54 41 52 54 53 20 54 48 45 20 54 49 | .ESTARTS THE TI| 00001080: 4D 45 52 20 4F 4E 20 41 20 54 49 4D 45 44 20 45 |MER ON A TIMED E| 00001090: 56 45 4E 54 2E 0D 20 20 20 20 20 20 20 20 20 20 |VENT.. | 000010A0: C3 41 4C 4C 20 41 44 44 52 45 53 53 3A 20 24 C3 |.ALL ADDRESS: $.| 000010B0: 31 31 35 0D 20 20 20 20 20 20 20 20 20 20 C9 4E |115. .N| 000010C0: 50 55 54 20 52 45 51 55 49 52 45 4D 45 4E 54 53 |PUT REQUIREMENTS| 000010D0: 3A 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |:. | 000010E0: 20 D8 20 20 20 20 20 20 20 20 20 D4 48 45 20 49 | . .HE I| 000010F0: 4E 44 45 58 20 49 4E 54 4F 20 54 48 45 20 43 4F |NDEX INTO THE CO| 00001100: 4D 4D 41 4E 44 20 54 41 42 4C 45 20 41 54 20 24 |MMAND TABLE AT $| 00001110: 38 37 31 39 2E 0D 20 20 20 20 20 20 20 20 20 20 |8719.. | 00001120: D0 52 45 50 41 52 41 54 4F 52 59 20 52 4F 55 54 |.REPARATORY ROUT| 00001130: 49 4E 45 53 3A 20 C3 CD C4 D4 C2 CC 0D 0D 20 20 |INES: ........ | 00001140: 20 20 20 20 20 20 20 20 C4 45 53 43 52 49 50 54 | .ESCRIPT| 00001150: 49 4F 4E 3A 20 D4 48 49 53 20 52 4F 55 54 49 4E |ION: .HIS ROUTIN| 00001160: 45 20 52 45 53 45 54 53 20 42 49 54 20 35 20 4F |E RESETS BIT 5 O| 00001170: 46 20 41 20 53 50 45 43 49 46 49 43 20 43 4F 4D |F A SPECIFIC COM| 00001180: 4D 41 4E 44 20 42 59 54 45 0D 20 20 20 20 20 20 |MAND BYTE. | 00001190: 20 20 20 20 49 4E 20 54 48 45 20 54 41 42 4C 45 | IN THE TABLE| 000011A0: 20 41 54 20 24 38 37 31 39 2E 20 20 D4 48 49 53 | AT $8719. .HIS| 000011B0: 20 45 4E 41 42 4C 45 53 20 54 48 45 20 41 53 53 | ENABLES THE ASS| 000011C0: 4F 43 49 41 54 45 44 20 43 4F 55 4E 54 45 52 2E |OCIATED COUNTER.| 000011D0: 20 D4 48 49 53 0D 20 20 20 20 20 20 20 20 20 20 | .HIS. | 000011E0: 52 4F 55 54 49 4E 45 20 20 49 53 20 20 54 48 45 |ROUTINE IS THE| 000011F0: 20 20 43 4F 4D 50 4C 45 4D 45 4E 54 20 20 54 4F | COMPLEMENT TO| 00001200: 20 D3 D4 CF D0 2E 20 20 D4 48 49 53 20 20 52 4F | ..... .HIS RO| 00001210: 55 54 49 4E 45 20 20 49 53 20 20 CE CF D4 20 20 |UTINE IS ... | 00001220: 41 0D 20 20 20 20 20 20 20 20 20 20 52 45 50 4C |A. REPL| 00001230: 41 43 45 4D 45 4E 54 20 20 46 4F 52 20 C5 CE C1 |ACEMENT FOR ...| 00001240: C2 CC C5 2E 20 20 D4 48 49 53 20 52 4F 55 54 49 |.... .HIS ROUTI| 00001250: 4E 45 20 44 4F 45 53 20 4E 4F 54 20 43 4F 50 59 |NE DOES NOT COPY| 00001260: 20 54 48 45 20 20 54 49 4D 45 52 27 53 0D 20 20 | THE TIMER'S. | 00001270: 20 20 20 20 20 20 20 20 49 4E 49 54 49 41 4C 20 | INITIAL | 00001280: 56 41 4C 55 45 20 41 53 20 44 4F 45 53 20 C5 CE |VALUE AS DOES ..| 00001290: C1 C2 CC C5 2E 0D 0D 0D 20 20 20 20 20 20 20 20 |........ | 000012A0: 20 20 C6 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 3A | .UNCTION .AME:| 000012B0: 20 D3 D4 CF D0 0D 20 20 20 20 20 20 20 20 20 20 | ..... | 000012C0: D0 55 52 50 4F 53 45 3A 20 D3 54 4F 50 53 20 54 |.URPOSE: .TOPS T| 000012D0: 48 45 20 54 49 4D 45 52 20 4F 4E 20 41 20 54 49 |HE TIMER ON A TI| 000012E0: 4D 45 44 20 45 56 45 4E 54 2E 0D 20 20 20 20 20 |MED EVENT.. | 000012F0: 20 20 20 20 20 C3 41 4C 4C 20 41 44 44 52 45 53 | .ALL ADDRES| 00001300: 53 3A 20 24 C3 31 31 32 0D 20 20 20 20 20 20 20 |S: $.112. | 00001310: 20 20 20 C9 4E 50 55 54 20 52 45 51 55 49 52 45 | .NPUT REQUIRE| 00001320: 4D 45 4E 54 53 3A 0D 20 20 20 20 20 20 20 20 20 |MENTS:. | 00001330: 20 20 20 20 20 20 D8 20 20 20 20 20 20 20 20 20 | . | 00001340: D4 48 45 20 49 4E 44 45 58 20 49 4E 54 4F 20 54 |.HE INDEX INTO T| 00001350: 48 45 20 43 4F 4D 4D 41 4E 44 20 54 41 42 4C 45 |HE COMMAND TABLE| 00001360: 20 41 54 20 24 38 37 31 39 2E 0D 20 20 20 20 20 | AT $8719.. | 00001370: 20 20 20 20 20 D0 52 45 50 41 52 41 54 4F 52 59 | .REPARATORY| 00001380: 20 52 4F 55 54 49 4E 45 53 3A 20 C3 CD C4 D4 C2 | ROUTINES: .....| 00001390: CC 0D 0D 20 20 20 20 20 20 20 20 20 20 C4 45 53 |... .ES| 000013A0: 43 52 49 50 54 49 4F 4E 3A 20 20 D4 48 49 53 20 |CRIPTION: .HIS | 000013B0: 52 4F 55 54 49 4E 45 20 53 45 54 53 20 42 49 54 |ROUTINE SETS BIT| 000013C0: 20 35 20 4F 46 20 41 20 53 50 45 43 49 46 49 43 | 5 OF A SPECIFIC| 000013D0: 20 43 4F 4D 4D 41 4E 44 20 20 42 59 54 45 0D 20 | COMMAND BYTE. | 000013E0: 20 20 20 20 20 20 20 20 20 49 4E 20 20 54 48 45 | IN THE| 000013F0: 20 54 41 42 4C 45 20 41 54 20 24 38 37 31 39 2E | TABLE AT $8719.| 00001400: 20 20 D4 48 49 53 20 50 52 45 56 45 4E 54 53 20 | .HIS PREVENTS | 00001410: 54 48 45 20 41 53 53 4F 43 49 41 54 45 44 20 54 |THE ASSOCIATED T| 00001420: 49 4D 45 52 20 20 46 52 4F 4D 0D 20 20 20 20 20 |IMER FROM. | 00001430: 20 20 20 20 20 52 55 4E 4E 49 4E 47 2E 20 D4 48 | RUNNING. .H| 00001440: 49 53 20 52 4F 55 54 49 4E 45 20 49 53 20 54 48 |IS ROUTINE IS TH| 00001450: 45 20 43 4F 4D 50 4C 45 4D 45 4E 54 20 54 4F 20 |E COMPLEMENT TO | 00001460: D3 D4 C1 D2 D4 2E 0D 0D 0D 20 20 20 20 20 20 20 |......... | 00001470: 20 20 20 C6 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 | .UNCTION .AME| 00001480: 3A 20 D3 D4 D2 C3 CD D0 0D 20 20 20 20 20 20 20 |: ....... | 00001490: 20 20 20 D0 55 52 50 4F 53 45 3A 20 C3 4F 4D 50 | .URPOSE: .OMP| 000014A0: 41 52 45 20 54 57 4F 20 53 54 52 49 4E 47 53 20 |ARE TWO STRINGS | 000014B0: 46 4F 52 20 45 51 55 41 4C 49 54 59 2E 0D 20 20 |FOR EQUALITY.. | 000014C0: 20 20 20 20 20 20 20 20 C3 41 4C 4C 20 41 44 44 | .ALL ADD| 000014D0: 52 45 53 53 3A 20 24 C3 32 36 C2 0D 20 20 20 20 |RESS: $.26.. | 000014E0: 20 20 20 20 20 20 C9 4E 50 55 54 20 52 45 51 55 | .NPUT REQU| 000014F0: 49 52 45 4D 45 4E 54 53 3A 0D 20 20 20 20 20 20 |IREMENTS:. | 00001500: 20 20 20 20 20 20 20 20 20 D8 20 20 20 20 20 20 | . | 00001510: 20 20 20 C1 44 44 52 45 53 53 20 4F 46 20 41 20 | .DDRESS OF A | 00001520: 5A 45 52 4F 20 50 41 47 45 20 50 4F 49 4E 54 45 |ZERO PAGE POINTE| 00001530: 52 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 |R.. | 00001540: 20 20 D9 20 20 20 20 20 20 20 20 20 C1 44 44 52 | . .DDR| 00001550: 45 53 53 20 4F 46 20 41 20 5A 45 52 4F 20 50 41 |ESS OF A ZERO PA| 00001560: 47 45 20 50 4F 49 4E 54 45 52 2E 0D 20 20 20 20 |GE POINTER.. | 00001570: 20 20 20 20 20 20 CF 55 54 50 55 54 3A 0D 20 20 | .UTPUT:. | 00001580: 20 20 20 20 20 20 20 20 20 20 20 20 20 DA 20 46 | . F| 00001590: 4C 41 47 20 20 20 20 D3 45 54 20 41 43 43 4F 52 |LAG .ET ACCOR| 000015A0: 44 49 4E 47 4C 59 2E 0D 0D 20 20 20 20 20 20 20 |DINGLY... | 000015B0: 20 20 20 C4 45 53 43 52 49 50 54 49 4F 4E 3A 20 | .ESCRIPTION: | 000015C0: 20 D4 48 45 20 20 D8 20 41 4E 44 20 D9 20 52 45 | .HE . AND . RE| 000015D0: 47 49 53 54 45 52 53 20 50 4F 49 4E 54 20 54 4F |GISTERS POINT TO| 000015E0: 20 5A 45 52 4F 20 50 41 47 45 20 50 4F 49 4E 54 | ZERO PAGE POINT| 000015F0: 45 52 53 2E 0D 20 20 20 20 20 20 20 20 20 20 D4 |ERS.. .| 00001600: 48 45 20 54 57 4F 20 53 54 52 49 4E 47 53 20 41 |HE TWO STRINGS A| 00001610: 52 45 20 43 4F 4D 50 41 52 45 44 20 55 50 20 54 |RE COMPARED UP T| 00001620: 4F 20 41 20 5A 45 52 4F 20 42 59 54 45 2E 20 D4 |O A ZERO BYTE. .| 00001630: 48 45 20 DA 20 46 4C 41 47 20 49 53 20 53 45 54 |HE . FLAG IS SET| 00001640: 0D 20 20 20 20 20 20 20 20 20 20 41 43 43 4F 52 |. ACCOR| 00001650: 44 49 4E 47 4C 59 2E 0D 0D 0D 20 20 20 20 20 20 |DINGLY.... | 00001660: 20 20 20 20 C6 55 4E 43 54 49 4F 4E 20 CE 41 4D | .UNCTION .AM| 00001670: 45 3A 20 D3 D4 D2 C3 D0 D9 0D 20 20 20 20 20 20 |E: ....... | 00001680: 20 20 20 20 D0 55 52 50 4F 53 45 3A 20 C3 4F 50 | .URPOSE: .OP| 00001690: 59 20 41 20 53 54 52 49 4E 47 2E 0D 20 20 20 20 |Y A STRING.. | 000016A0: 20 20 20 20 20 20 C3 41 4C 4C 20 41 44 44 52 45 | .ALL ADDRE| 000016B0: 53 53 3A 20 24 C3 32 36 35 0D 20 20 20 20 20 20 |SS: $.265. | 000016C0: 20 20 20 20 C9 4E 50 55 54 20 52 45 51 55 49 52 | .NPUT REQUIR| 000016D0: 45 4D 45 4E 54 53 3A 0D 20 20 20 20 20 20 20 20 |EMENTS:. | 000016E0: 20 20 20 20 20 20 20 D8 20 20 20 20 20 20 20 20 | . | 000016F0: 20 C1 44 44 52 45 53 53 20 4F 46 20 5A 45 52 4F | .DDRESS OF ZERO| 00001700: 20 50 41 47 45 20 53 4F 55 52 43 45 20 50 4F 49 | PAGE SOURCE POI| 00001710: 4E 54 45 52 2E 0D 20 20 20 20 20 20 20 20 20 20 |NTER.. | 00001720: 20 20 20 20 20 D9 20 20 20 20 20 20 20 20 20 C1 | . .| 00001730: 44 44 52 45 53 53 20 4F 46 20 5A 45 52 4F 20 50 |DDRESS OF ZERO P| 00001740: 41 47 45 20 44 45 53 54 49 4E 41 54 49 4F 4E 20 |AGE DESTINATION | 00001750: 50 4F 49 4E 54 45 52 2E 0D 0D 20 20 20 20 20 20 |POINTER... | 00001760: 20 20 20 20 C4 45 53 43 52 49 50 54 49 4F 4E 3A | .ESCRIPTION:| 00001770: 20 20 D4 48 45 20 20 D8 20 41 4E 44 20 D9 20 52 | .HE . AND . R| 00001780: 45 47 49 53 54 45 52 53 20 50 4F 49 4E 54 20 54 |EGISTERS POINT T| 00001790: 4F 20 5A 45 52 4F 20 50 41 47 45 20 50 4F 49 4E |O ZERO PAGE POIN| 000017A0: 54 45 52 53 2E 0D 20 20 20 20 20 20 20 20 20 20 |TERS.. | 000017B0: C4 41 54 41 20 49 53 20 43 4F 50 49 45 44 20 55 |.ATA IS COPIED U| 000017C0: 50 20 54 4F 20 41 4E 44 20 49 4E 43 4C 55 44 49 |P TO AND INCLUDI| 000017D0: 4E 47 20 41 20 5A 45 52 4F 20 42 59 54 45 2E 20 |NG A ZERO BYTE. | 000017E0: 20 D4 48 49 53 20 52 4F 55 54 49 4E 45 20 20 49 | .HIS ROUTINE I| 000017F0: 53 0D 20 20 20 20 20 20 20 20 20 20 55 53 45 44 |S. USED| 00001800: 20 54 4F 20 43 4F 50 59 20 53 54 52 49 4E 47 53 | TO COPY STRINGS| 00001810: 20 42 59 20 53 45 54 54 49 4E 47 20 C1 20 54 4F | BY SETTING . TO| 00001820: 20 5A 45 52 4F 20 41 4E 44 20 43 41 4C 4C 49 4E | ZERO AND CALLIN| 00001830: 47 20 C2 CC CB CD CF D6 2E 0D 0D 0D 0D 0D 0D 0D |G ..............| 00001840: 0D 0D 0D 0D 0D 0D 0D 20 20 20 20 20 20 20 20 20 |....... | 00001850: 20 C7 C5 CF D3 20 CB 45 52 4E 41 4C 20 D2 4F 55 | .... .ERNAL .OU| 00001860: 54 49 4E 45 53 20 20 20 20 20 20 20 20 20 20 20 |TINES | 00001870: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001880: 20 20 20 20 20 20 20 20 20 20 20 31 2D 35 34 0D | 1-54.| 00001890: 0D 0D 20 20 20 20 20 20 20 20 20 20 C6 55 4E 43 |.. .UNC| 000018A0: 54 49 4F 4E 20 CE 41 4D 45 3A 20 D3 D9 D3 C5 D2 |TION .AME: .....| 000018B0: D2 0D 20 20 20 20 20 20 20 20 20 20 D0 55 52 50 |.. .URP| 000018C0: 4F 53 45 3A 20 C4 52 41 57 20 41 20 53 59 53 54 |OSE: .RAW A SYST| 000018D0: 45 4D 20 45 52 52 4F 52 20 57 49 4E 44 4F 57 2C |EM ERROR WINDOW,| 000018E0: 20 41 4E 44 20 48 41 4C 54 20 53 59 53 54 45 4D | AND HALT SYSTEM| 000018F0: 2E 0D 20 20 20 20 20 20 20 20 20 20 C3 41 4C 4C |.. .ALL| 00001900: 20 41 44 44 52 45 53 53 3A 20 24 C3 32 C3 32 0D | ADDRESS: $.2.2.| 00001910: 0D 20 20 20 20 20 20 20 20 20 20 C4 45 53 43 52 |. .ESCR| 00001920: 49 50 54 49 4F 4E 3A 20 20 C1 20 20 57 49 4E 44 |IPTION: . WIND| 00001930: 4F 57 20 20 49 53 20 44 52 41 57 4E 20 57 49 54 |OW IS DRAWN WIT| 00001940: 48 20 54 48 45 20 4D 45 53 53 41 47 45 20 27 D3 |H THE MESSAGE '.| 00001950: 59 53 54 45 4D 20 20 45 52 52 4F 52 0D 20 20 20 |YSTEM ERROR. | 00001960: 20 20 20 20 20 20 20 4E 45 41 52 20 20 24 58 58 | NEAR $XX| 00001970: 58 58 27 2C 20 20 57 48 45 52 45 20 20 58 58 58 |XX', WHERE XXX| 00001980: 58 20 49 53 20 54 48 45 20 48 45 58 20 41 44 44 |X IS THE HEX ADD| 00001990: 52 45 53 53 20 4F 46 20 54 48 45 20 20 CA D3 D2 |RESS OF THE ...| 000019A0: 20 20 D3 D9 D3 C5 D2 D2 0D 20 20 20 20 20 20 20 | ....... | 000019B0: 20 20 20 49 4E 53 54 52 55 43 54 49 4F 4E 2E 20 | INSTRUCTION. | 000019C0: 20 D3 49 4E 43 45 20 20 54 48 45 20 53 59 53 54 | .INCE THE SYST| 000019D0: 45 4D 20 45 52 52 4F 52 20 57 49 4E 44 4F 57 20 |EM ERROR WINDOW | 000019E0: 48 41 53 20 4E 4F 20 57 41 59 20 4F 46 20 20 42 |HAS NO WAY OF B| 000019F0: 45 49 4E 47 0D 20 20 20 20 20 20 20 20 20 20 43 |EING. C| 00001A00: 4C 4F 53 45 44 2C 20 C7 C5 CF D3 20 53 49 4D 50 |LOSED, .... SIMP| 00001A10: 4C 59 20 53 49 54 53 20 49 4E 20 49 54 53 20 4D |LY SITS IN ITS M| 00001A20: 41 49 4E 20 4C 4F 4F 50 20 46 4F 52 45 56 45 52 |AIN LOOP FOREVER| 00001A30: 2E 20 D4 48 45 20 C2 D2 CB 20 56 45 43 54 4F 52 |. .HE ... VECTOR| 00001A40: 0D 20 20 20 20 20 20 20 20 20 20 41 54 20 24 38 |. AT $8| 00001A50: 34 C1 C6 2D 24 38 34 C2 30 20 49 53 20 49 4E 49 |4..-$84.0 IS INI| 00001A60: 54 49 41 4C 4C 59 20 53 45 54 20 54 4F 20 54 48 |TIALLY SET TO TH| 00001A70: 49 53 20 52 4F 55 54 49 4E 45 2E 0D 0D 0D 20 20 |IS ROUTINE.... | 00001A80: 20 20 20 20 20 20 20 20 C6 55 4E 43 54 49 4F 4E | .UNCTION| 00001A90: 20 CE 41 4D 45 3A 20 D4 C1 C2 CC C5 0D 20 20 20 | .AME: ...... | 00001AA0: 20 20 20 20 20 20 20 D0 55 52 50 4F 53 45 3A 20 | .URPOSE: | 00001AB0: C3 52 45 41 54 45 20 41 20 4C 49 53 54 20 4F 46 |.REATE A LIST OF| 00001AC0: 20 46 49 4C 45 4E 41 4D 45 53 2E 0D 20 20 20 20 | FILENAMES.. | 00001AD0: 20 20 20 20 20 20 C3 41 4C 4C 20 41 44 44 52 45 | .ALL ADDRE| 00001AE0: 53 53 3A 20 24 C3 32 33 C2 0D 20 20 20 20 20 20 |SS: $.23.. | 00001AF0: 20 20 20 20 C9 4E 50 55 54 20 52 45 51 55 49 52 | .NPUT REQUIR| 00001B00: 45 4D 45 4E 54 53 3A 0D 20 20 20 20 20 20 20 20 |EMENTS:. | 00001B10: 20 20 20 20 20 20 20 24 30 C5 2D 24 30 C6 20 20 | $0.-$0. | 00001B20: 20 D0 4F 49 4E 54 45 52 20 54 4F 20 42 55 46 46 | .OINTER TO BUFF| 00001B30: 45 52 20 41 52 45 41 20 46 4F 52 20 46 49 4C 45 |ER AREA FOR FILE| 00001B40: 20 4E 41 4D 45 53 2E 0D 20 20 20 20 20 20 20 20 | NAMES.. | 00001B50: 20 20 20 20 20 20 20 24 31 30 20 20 20 20 20 20 | $10 | 00001B60: 20 C7 C5 CF D3 20 46 49 4C 45 20 54 59 50 45 2E | .... FILE TYPE.| 00001B70: 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. | 00001B80: 24 31 31 20 20 20 20 20 20 20 CD 41 58 49 4D 55 |$11 .AXIMU| 00001B90: 4D 20 4E 55 4D 42 45 52 20 4F 46 20 46 49 4C 45 |M NUMBER OF FILE| 00001BA0: 20 4E 41 4D 45 53 2E 0D 20 20 20 20 20 20 20 20 | NAMES.. | 00001BB0: 20 20 20 20 20 20 20 24 31 36 2D 24 31 37 20 20 | $16-$17 | 00001BC0: 20 D0 4F 49 4E 54 45 52 20 54 4F 20 43 4C 41 53 | .OINTER TO CLAS| 00001BD0: 53 2E 0D 20 20 20 20 20 20 20 20 20 20 CF 55 54 |S.. .UT| 00001BE0: 50 55 54 3A 0D 20 20 20 20 20 20 20 20 20 20 20 |PUT:. | 00001BF0: 20 20 20 20 24 31 31 20 20 20 20 20 20 20 CE 55 | $11 .U| 00001C00: 4D 42 45 52 20 4F 46 20 46 49 4C 45 53 20 4E 4F |MBER OF FILES NO| 00001C10: 54 20 46 4F 55 4E 44 2E 0D 20 20 20 20 20 20 20 |T FOUND.. | 00001C20: 20 20 20 20 20 20 20 20 D4 48 45 20 54 41 42 4C | .HE TABL| 00001C30: 45 20 49 53 20 46 49 4C 4C 45 44 20 57 49 54 48 |E IS FILLED WITH| 00001C40: 20 46 49 4C 45 4E 41 4D 45 53 2E 0D 20 20 20 20 | FILENAMES.. | 00001C50: 20 20 20 20 20 20 C5 52 52 4F 52 53 3A 20 D3 45 | .RRORS: .E| 00001C60: 45 20 C1 50 50 45 4E 44 49 58 20 C9 2E 0D 0D 20 |E .PPENDIX .... | 00001C70: 20 20 20 20 20 20 20 20 20 C4 45 53 43 52 49 50 | .ESCRIP| 00001C80: 54 49 4F 4E 3A 20 20 D4 48 49 53 20 20 49 53 20 |TION: .HIS IS | 00001C90: 41 20 56 45 52 59 20 55 53 45 46 55 4C 20 52 4F |A VERY USEFUL RO| 00001CA0: 55 54 49 4E 45 2E 20 20 C7 49 56 45 4E 20 41 20 |UTINE. .IVEN A | 00001CB0: C7 C5 CF D3 20 20 46 49 4C 45 0D 20 20 20 20 20 |.... FILE. | 00001CC0: 20 20 20 20 20 54 59 50 45 2C 20 20 41 20 20 4C | TYPE, A L| 00001CD0: 49 53 54 20 4F 46 20 46 49 4C 45 53 20 57 49 54 |IST OF FILES WIT| 00001CE0: 48 20 54 48 41 54 20 54 59 50 45 20 49 53 20 43 |H THAT TYPE IS C| 00001CF0: 52 45 41 54 45 44 2E 20 20 C9 46 20 54 48 45 20 |REATED. .F THE | 00001D00: 20 43 4C 41 53 53 0D 20 20 20 20 20 20 20 20 20 | CLASS. | 00001D10: 20 50 4F 49 4E 54 45 52 20 20 49 53 20 4E 4F 4E | POINTER IS NON| 00001D20: 2D 5A 45 52 4F 20 54 48 45 4E 20 45 41 43 48 20 |-ZERO THEN EACH | 00001D30: 46 49 4C 45 27 53 20 49 4E 46 4F 20 53 45 43 54 |FILE'S INFO SECT| 00001D40: 4F 52 20 49 53 20 43 48 45 43 4B 45 44 20 20 46 |OR IS CHECKED F| 00001D50: 4F 52 0D 20 20 20 20 20 20 20 20 20 20 50 52 4F |OR. PRO| 00001D60: 50 45 52 20 20 43 4C 41 53 53 2E 20 20 D4 48 49 |PER CLASS. .HI| 00001D70: 53 20 49 53 20 48 4F 57 20 C7 C5 CF 50 41 49 4E |S IS HOW ...PAIN| 00001D80: 54 20 41 4E 44 20 C7 C5 CF 57 52 49 54 45 20 43 |T AND ...WRITE C| 00001D90: 41 4E 20 42 4F 54 48 20 43 52 45 41 54 45 0D 20 |AN BOTH CREATE. | 00001DA0: 20 20 20 20 20 20 20 20 20 C1 50 50 4C 49 43 41 | .PPLICA| 00001DB0: 54 49 4F 4E 20 20 C4 41 54 41 20 20 46 49 4C 45 |TION .ATA FILE| 00001DC0: 53 20 20 41 4E 44 20 4E 4F 54 20 20 53 45 45 20 |S AND NOT SEE | 00001DD0: 20 45 41 43 48 20 20 4F 54 48 45 52 53 20 20 46 | EACH OTHERS F| 00001DE0: 49 4C 45 53 2E 20 20 D4 48 45 0D 20 20 20 20 20 |ILES. .HE. | 00001DF0: 20 20 20 20 20 46 49 4C 45 4E 41 4D 45 53 20 41 | FILENAMES A| 00001E00: 52 45 20 54 45 58 54 20 53 54 52 49 4E 47 53 20 |RE TEXT STRINGS | 00001E10: 57 49 54 48 20 5A 45 52 4F 20 42 59 54 45 20 54 |WITH ZERO BYTE T| 00001E20: 45 52 4D 49 4E 41 54 4F 52 53 2E 20 C5 41 43 48 |ERMINATORS. .ACH| 00001E30: 20 45 4E 54 52 59 0D 20 20 20 20 20 20 20 20 20 | ENTRY. | 00001E40: 20 49 53 20 49 4E 44 45 58 45 44 20 57 49 54 48 | IS INDEXED WITH| 00001E50: 20 41 20 4D 55 4C 54 49 50 4C 45 20 4F 46 20 31 | A MULTIPLE OF 1| 00001E60: 37 20 28 31 36 20 42 59 54 45 20 46 49 4C 45 4E |7 (16 BYTE FILEN| 00001E70: 41 4D 45 20 4D 41 58 2E 20 50 4C 55 53 20 5A 45 |AME MAX. PLUS ZE| 00001E80: 52 4F 0D 20 20 20 20 20 20 20 20 20 20 42 59 54 |RO. BYT| 00001E90: 45 29 2E 20 20 CC 4F 43 41 54 49 4F 4E 20 20 24 |E). .OCATION $| 00001EA0: 31 31 20 48 41 53 20 54 48 45 20 4E 55 4D 42 45 |11 HAS THE NUMBE| 00001EB0: 52 20 4F 46 20 54 41 42 4C 45 20 45 4E 54 52 49 |R OF TABLE ENTRI| 00001EC0: 45 53 20 4E 4F 54 20 46 49 4C 4C 45 44 2E 0D 20 |ES NOT FILLED.. | 00001ED0: 20 20 20 20 20 20 20 20 20 D4 4F 20 20 47 45 54 | .O GET| 00001EE0: 20 54 48 45 20 4E 55 4D 42 45 52 20 4F 46 20 46 | THE NUMBER OF F| 00001EF0: 49 4C 45 53 20 41 43 54 55 41 4C 4C 59 20 46 4F |ILES ACTUALLY FO| 00001F00: 55 4E 44 2C 20 20 54 48 49 53 20 56 41 4C 55 45 |UND, THIS VALUE| 00001F10: 20 20 4D 55 53 54 20 20 42 45 0D 20 20 20 20 20 | MUST BE. | 00001F20: 20 20 20 20 20 53 55 42 54 52 41 43 54 45 44 20 | SUBTRACTED | 00001F30: 46 52 4F 4D 20 54 48 45 20 4F 52 49 47 49 4E 41 |FROM THE ORIGINA| 00001F40: 4C 20 4D 41 58 49 4D 55 4D 20 42 55 46 46 45 52 |L MAXIMUM BUFFER| 00001F50: 20 4C 45 4E 47 54 48 2E 0D 0D 0D 20 20 20 20 20 | LENGTH.... | 00001F60: 20 20 20 20 20 C6 55 4E 43 54 49 4F 4E 20 CE 41 | .UNCTION .A| 00001F70: 4D 45 3A 20 D4 C2 CC CA CD D0 0D 20 20 20 20 20 |ME: ....... | 00001F80: 20 20 20 20 20 D0 55 52 50 4F 53 45 3A 20 CA 55 | .URPOSE: .U| 00001F90: 4D 50 20 54 48 52 4F 55 47 48 20 41 20 54 41 42 |MP THROUGH A TAB| 00001FA0: 4C 45 2E 0D 20 20 20 20 20 20 20 20 20 20 C3 41 |LE.. .A| 00001FB0: 4C 4C 20 41 44 44 52 45 53 53 3A 20 24 C3 32 C1 |LL ADDRESS: $.2.| 00001FC0: 34 0D 20 20 20 20 20 20 20 20 20 20 C9 4E 50 55 |4. .NPU| 00001FD0: 54 20 52 45 51 55 49 52 45 4D 45 4E 54 53 3A 0D |T REQUIREMENTS:.| 00001FE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 C1 | .| 00001FF0: 20 20 20 20 20 20 20 20 20 CF 46 46 53 45 54 20 | .FFSET | 00002000: 49 4E 54 4F 20 54 41 42 4C 45 2E 0D 20 20 20 20 |INTO TABLE.. | 00002010: 20 20 20 20 20 20 20 20 20 20 20 24 33 C4 2D 24 | $3.-$| 00002020: 33 C5 20 20 20 D4 41 42 4C 45 20 41 44 44 52 45 |3. .ABLE ADDRE| 00002030: 53 53 2E 0D 0D 20 20 20 20 20 20 20 20 20 20 C4 |SS... .| 00002040: 45 53 43 52 49 50 54 49 4F 4E 3A 20 20 D4 48 49 |ESCRIPTION: .HI| 00002050: 53 20 52 4F 55 54 49 4E 45 20 49 53 20 43 41 4C |S ROUTINE IS CAL| 00002060: 4C 45 44 20 42 59 20 41 4C 4C 20 4F 46 20 54 48 |LED BY ALL OF TH| 00002070: 45 20 52 4F 55 54 49 4E 45 53 20 20 54 48 41 54 |E ROUTINES THAT| 00002080: 0D 20 20 20 20 20 20 20 20 20 20 48 41 56 45 20 |. HAVE | 00002090: 20 49 4E 4C 49 4E 45 20 44 41 54 41 2E 20 20 D4 | INLINE DATA. .| 000020A0: 48 45 59 20 41 4C 4C 20 53 45 54 20 24 33 C4 2D |HEY ALL SET $3.-| 000020B0: 24 33 C5 20 54 4F 20 54 48 45 20 52 45 54 55 52 |$3. TO THE RETUR| 000020C0: 4E 20 41 44 44 52 45 53 53 20 4F 46 0D 20 20 20 |N ADDRESS OF. | 000020D0: 20 20 20 20 20 20 20 54 48 45 20 20 43 41 4C 4C | THE CALL| 000020E0: 45 52 2C 20 20 49 4E 44 45 58 20 4F 46 46 20 4F |ER, INDEX OFF O| 000020F0: 46 20 54 48 49 53 20 50 4F 49 4E 54 45 52 20 54 |F THIS POINTER T| 00002100: 4F 20 47 45 54 20 54 48 45 49 52 20 20 44 41 54 |O GET THEIR DAT| 00002110: 41 2C 20 20 54 48 45 4E 0D 20 20 20 20 20 20 20 |A, THEN. | 00002120: 20 20 20 43 41 4C 4C 20 20 54 48 45 20 41 50 50 | CALL THE APP| 00002130: 52 4F 50 52 49 41 54 45 20 52 4F 55 54 49 4E 45 |ROPRIATE ROUTINE| 00002140: 2E 20 20 D7 48 45 4E 20 54 48 45 20 52 4F 55 54 |. .HEN THE ROUT| 00002150: 49 4E 45 20 46 49 4E 49 53 48 45 53 2C 20 20 C1 |INE FINISHES, .| 00002160: 20 20 49 53 0D 20 20 20 20 20 20 20 20 20 20 4C | IS. L| 00002170: 4F 41 44 45 44 20 57 49 54 48 20 54 48 45 20 44 |OADED WITH THE D| 00002180: 41 54 41 20 54 41 42 4C 45 27 53 20 4C 45 4E 47 |ATA TABLE'S LENG| 00002190: 54 48 20 41 4E 44 20 54 48 49 53 20 52 4F 55 54 |TH AND THIS ROUT| 000021A0: 49 4E 45 20 49 53 20 43 41 4C 4C 45 44 20 54 4F |INE IS CALLED TO| 000021B0: 0D 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 |. RETUR| 000021C0: 4E 20 43 4F 4E 54 52 4F 4C 20 54 4F 20 54 48 45 |N CONTROL TO THE| 000021D0: 20 43 41 4C 4C 45 52 20 41 46 54 45 52 20 54 48 | CALLER AFTER TH| 000021E0: 45 20 44 41 54 41 20 54 41 42 4C 45 2E 0D 0D 0D |E DATA TABLE....| 000021F0: 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 20 20 20 20 |............ | 00002200: 20 20 20 20 20 20 C7 C5 CF D3 20 CB 45 52 4E 41 | .... .ERNA| 00002210: 4C 20 D2 4F 55 54 49 4E 45 53 20 20 20 20 20 20 |L .OUTINES | 00002220: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00002230: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00002240: 31 2D 35 35 0D 0D 0D 20 20 20 20 20 20 20 20 20 |1-55... | 00002250: 20 C6 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 3A 20 | .UNCTION .AME: | 00002260: D4 C5 D3 D4 0D 20 20 20 20 20 20 20 20 20 20 D0 |..... .| 00002270: 55 52 50 4F 53 45 3A 20 D4 45 53 54 53 20 54 48 |URPOSE: .ESTS TH| 00002280: 45 20 56 41 4C 55 45 20 4F 46 20 41 20 50 4F 49 |E VALUE OF A POI| 00002290: 4E 54 20 4F 4E 20 54 48 45 20 48 49 52 45 53 20 |NT ON THE HIRES | 000022A0: 53 43 52 45 45 4E 2E 0D 20 20 20 20 20 20 20 20 |SCREEN.. | 000022B0: 20 20 C3 41 4C 4C 20 41 44 44 52 45 53 53 3A 20 | .ALL ADDRESS: | 000022C0: 24 C3 31 33 C6 0D 20 20 20 20 20 20 20 20 20 20 |$.13.. | 000022D0: C9 4E 50 55 54 20 52 45 51 55 49 52 45 4D 45 4E |.NPUT REQUIREMEN| 000022E0: 54 53 3A 0D 20 20 20 20 20 20 20 20 20 20 20 20 |TS:. | 000022F0: 20 20 20 24 30 38 2D 24 30 39 20 20 20 D4 48 45 | $08-$09 .HE| 00002300: 20 43 4F 4C 55 4D 4E 20 4E 55 4D 42 45 52 2E 0D | COLUMN NUMBER..| 00002310: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 | $| 00002320: 31 38 20 20 20 20 20 20 20 D4 48 45 20 52 4F 57 |18 .HE ROW| 00002330: 20 4E 55 4D 42 45 52 2E 0D 20 20 20 20 20 20 20 | NUMBER.. | 00002340: 20 20 20 CF 55 54 50 55 54 3A 0D 20 20 20 20 20 | .UTPUT:. | 00002350: 20 20 20 20 20 20 20 20 20 20 C3 20 46 4C 41 47 | . FLAG| 00002360: 20 49 53 20 53 45 54 20 54 4F 20 54 48 45 20 56 | IS SET TO THE V| 00002370: 41 4C 55 45 20 4F 46 20 54 48 45 20 50 49 58 45 |ALUE OF THE PIXE| 00002380: 4C 2E 0D 0D 20 20 20 20 20 20 20 20 20 20 C4 45 |L... .E| 00002390: 53 43 52 49 50 54 49 4F 4E 3A 20 D4 45 53 54 53 |SCRIPTION: .ESTS| 000023A0: 20 57 48 45 54 48 45 52 20 4F 52 20 4E 4F 54 20 | WHETHER OR NOT | 000023B0: 41 20 47 49 56 45 4E 20 50 49 58 45 4C 20 49 53 |A GIVEN PIXEL IS| 000023C0: 20 4F 4E 20 4F 52 20 4E 4F 54 2E 20 D4 48 45 0D | ON OR NOT. .HE.| 000023D0: 20 20 20 20 20 20 20 20 20 20 43 41 52 52 59 20 | CARRY | 000023E0: 46 4C 41 47 20 49 53 20 53 45 54 20 54 4F 20 54 |FLAG IS SET TO T| 000023F0: 48 45 20 56 41 4C 55 45 20 4F 46 20 54 48 45 20 |HE VALUE OF THE | 00002400: 50 49 58 45 4C 2E 0D 0D 0D 20 20 20 20 20 20 20 |PIXEL.... | 00002410: 20 20 20 C6 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 | .UNCTION .AME| 00002420: 3A 20 D4 D2 C1 C3 C5 0D 20 20 20 20 20 20 20 20 |: ...... | 00002430: 20 20 D0 55 52 50 4F 53 45 3A 20 C3 52 45 41 54 | .URPOSE: .REAT| 00002440: 45 20 41 20 54 41 42 4C 45 20 4F 46 20 54 52 41 |E A TABLE OF TRA| 00002450: 43 4B 53 20 41 4E 44 20 53 45 43 54 4F 52 53 2E |CKS AND SECTORS.| 00002460: 0D 20 20 20 20 20 20 20 20 20 20 C3 41 4C 4C 20 |. .ALL | 00002470: 41 44 44 52 45 53 53 3A 20 24 C3 32 30 35 0D 20 |ADDRESS: $.205. | 00002480: 20 20 20 20 20 20 20 20 20 C9 4E 50 55 54 20 52 | .NPUT R| 00002490: 45 51 55 49 52 45 4D 45 4E 54 53 3A 0D 20 20 20 |EQUIREMENTS:. | 000024A0: 20 20 20 20 20 20 20 20 20 20 20 20 24 30 34 20 | $04 | 000024B0: 20 20 20 20 20 20 C9 4E 49 54 49 41 4C 20 54 52 | .NITIAL TR| 000024C0: 41 43 4B 20 4E 55 4D 42 45 52 2E 0D 20 20 20 20 |ACK NUMBER.. | 000024D0: 20 20 20 20 20 20 20 20 20 20 20 24 30 35 20 20 | $05 | 000024E0: 20 20 20 20 20 C9 4E 49 54 49 41 4C 20 53 45 43 | .NITIAL SEC| 000024F0: 54 4F 52 20 4E 55 4D 42 45 52 2E 0D 20 20 20 20 |TOR NUMBER.. | 00002500: 20 20 20 20 20 20 20 20 20 20 20 24 30 38 2D 24 | $08-$| 00002510: 30 39 20 20 20 C1 44 44 52 45 53 53 20 4F 46 20 |09 .DDRESS OF | 00002520: 54 41 42 4C 45 20 54 4F 20 42 45 20 43 52 45 41 |TABLE TO BE CREA| 00002530: 54 45 44 2E 0D 20 20 20 20 20 20 20 20 20 20 CF |TED.. .| 00002540: 55 54 50 55 54 3A 0D 20 20 20 20 20 20 20 20 20 |UTPUT:. | 00002550: 20 20 20 20 20 20 D4 41 42 4C 45 20 20 50 4F 49 | .ABLE POI| 00002560: 4E 54 45 44 20 20 54 4F 20 42 59 20 24 30 38 2D |NTED TO BY $08-| 00002570: 24 30 39 20 49 53 20 46 49 4C 4C 45 44 20 57 49 |$09 IS FILLED WI| 00002580: 54 48 20 41 4C 4C 20 54 48 45 20 20 54 52 41 43 |TH ALL THE TRAC| 00002590: 4B 53 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 |KS. | 000025A0: 20 20 41 4E 44 20 53 45 43 54 4F 52 53 20 4C 49 | AND SECTORS LI| 000025B0: 4E 4B 45 44 20 54 4F 20 54 48 45 20 49 4E 49 54 |NKED TO THE INIT| 000025C0: 49 41 4C 20 53 45 43 54 4F 52 2E 0D 20 20 20 20 |IAL SECTOR.. | 000025D0: 20 20 20 20 20 20 C5 52 52 4F 52 53 3A 20 D3 45 | .RRORS: .E| 000025E0: 45 20 C1 50 50 45 4E 44 49 58 0D 0D 20 20 20 20 |E .PPENDIX.. | 000025F0: 20 20 20 20 20 20 C4 45 53 43 52 49 50 54 49 4F | .ESCRIPTIO| 00002600: 4E 3A 20 20 C7 49 56 45 4E 20 20 41 4E 20 49 4E |N: .IVEN AN IN| 00002610: 49 54 49 41 4C 20 54 52 41 43 4B 20 41 4E 44 20 |ITIAL TRACK AND | 00002620: 20 53 45 43 54 4F 52 2C 20 20 54 48 49 53 20 20 | SECTOR, THIS | 00002630: 52 4F 55 54 49 4E 45 0D 20 20 20 20 20 20 20 20 |ROUTINE. | 00002640: 20 20 54 52 41 43 45 53 20 20 41 20 43 48 41 49 | TRACES A CHAI| 00002650: 4E 20 41 4E 44 20 52 45 54 55 52 4E 53 20 41 20 |N AND RETURNS A | 00002660: 4C 49 53 54 20 4F 46 20 41 4C 4C 20 54 48 45 20 |LIST OF ALL THE | 00002670: 54 52 41 43 4B 53 20 41 4E 44 20 20 53 45 43 54 |TRACKS AND SECT| 00002680: 4F 52 53 0D 20 20 20 20 20 20 20 20 20 20 45 4E |ORS. EN| 00002690: 43 4F 55 4E 54 45 52 45 44 2E 20 20 D4 48 49 53 |COUNTERED. .HIS| 000026A0: 20 52 4F 55 54 49 4E 45 20 55 53 45 53 20 54 48 | ROUTINE USES TH| 000026B0: 45 20 42 55 46 46 45 52 20 41 54 20 24 38 30 30 |E BUFFER AT $800| 000026C0: 30 2D 24 38 30 C6 C6 20 54 4F 20 52 45 41 44 0D |0-$80.. TO READ.| 000026D0: 20 20 20 20 20 20 20 20 20 20 54 48 45 20 53 45 | THE SE| 000026E0: 43 54 4F 52 53 2E 0D 0D 0D 20 20 20 20 20 20 20 |CTORS.... | 000026F0: 20 20 20 C6 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 | .UNCTION .AME| 00002700: 3A 20 D5 C4 31 36 31 36 0D 20 20 20 20 20 20 20 |: ..1616. | 00002710: 20 20 20 D0 55 52 50 4F 53 45 3A 20 D5 4E 53 49 | .URPOSE: .NSI| 00002720: 47 4E 45 44 20 31 36 20 42 49 54 20 42 59 20 31 |GNED 16 BIT BY 1| 00002730: 36 20 42 49 54 20 44 49 56 49 53 49 4F 4E 2E 0D |6 BIT DIVISION..| 00002740: 20 20 20 20 20 20 20 20 20 20 C3 41 4C 4C 20 41 | .ALL A| 00002750: 44 44 52 45 53 53 3A 20 24 C3 31 36 39 0D 20 20 |DDRESS: $.169. | 00002760: 20 20 20 20 20 20 20 20 C9 4E 50 55 54 20 52 45 | .NPUT RE| 00002770: 51 55 49 52 45 4D 45 4E 54 53 3A 0D 20 20 20 20 |QUIREMENTS:. | 00002780: 20 20 20 20 20 20 20 20 20 20 20 D9 20 20 20 20 | . | 00002790: 20 20 20 20 20 D4 48 45 20 41 44 44 52 45 53 53 | .HE ADDRESS| 000027A0: 20 4F 46 20 54 48 45 20 31 36 20 42 49 54 20 44 | OF THE 16 BIT D| 000027B0: 49 56 49 53 4F 52 2E 0D 20 20 20 20 20 20 20 20 |IVISOR.. | 000027C0: 20 20 20 20 20 20 20 D8 20 20 20 20 20 20 20 20 | . | 000027D0: 20 D4 48 45 20 41 44 44 52 45 53 53 20 4F 46 20 | .HE ADDRESS OF | 000027E0: 54 48 45 20 31 36 20 42 49 54 20 44 49 56 49 44 |THE 16 BIT DIVID| 000027F0: 45 4E 44 2E 0D 20 20 20 20 20 20 20 20 20 20 CF |END.. .| 00002800: 55 54 50 55 54 3A 0D 20 20 20 20 20 20 20 20 20 |UTPUT:. | 00002810: 20 20 20 20 20 20 D8 20 20 20 20 20 20 20 20 20 | . | 00002820: D4 48 45 20 41 44 44 52 45 53 53 20 4F 46 20 54 |.HE ADDRESS OF T| 00002830: 48 45 20 31 36 20 42 49 54 20 51 55 4F 54 49 45 |HE 16 BIT QUOTIE| 00002840: 4E 54 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 |NT.. | 00002850: 20 20 20 24 31 32 2D 24 31 33 20 20 20 D4 48 45 | $12-$13 .HE| 00002860: 20 31 36 20 42 49 54 20 52 45 4D 41 49 4E 44 45 | 16 BIT REMAINDE| 00002870: 52 2E 0D 0D 20 20 20 20 20 20 20 20 20 20 C4 45 |R... .E| 00002880: 53 43 52 49 50 54 49 4F 4E 3A 20 D4 48 49 53 20 |SCRIPTION: .HIS | 00002890: 52 4F 55 54 49 4E 45 20 49 53 20 4F 4E 45 20 4F |ROUTINE IS ONE O| 000028A0: 46 20 54 48 45 20 C7 C5 CF D3 20 4D 41 54 48 20 |F THE .... MATH | 000028B0: 52 4F 55 54 49 4E 45 53 2E 20 D8 20 41 4E 44 0D |ROUTINES. . AND.| 000028C0: 20 20 20 20 20 20 20 20 20 20 D9 20 20 45 41 43 | . EAC| 000028D0: 48 20 48 41 56 45 20 54 48 45 20 41 44 44 52 45 |H HAVE THE ADDRE| 000028E0: 53 53 20 4F 46 20 41 20 54 45 52 4D 20 49 4E 20 |SS OF A TERM IN | 000028F0: 54 48 45 20 44 49 56 49 53 49 4F 4E 2E 20 20 D4 |THE DIVISION. .| 00002900: 48 45 20 51 55 4F 54 49 45 4E 54 0D 20 20 20 20 |HE QUOTIENT. | 00002910: 20 20 20 20 20 20 49 53 20 20 53 54 4F 52 45 44 | IS STORED| 00002920: 20 49 4E 20 50 4C 41 43 45 20 4F 46 20 54 48 45 | IN PLACE OF THE| 00002930: 20 4F 52 49 47 49 4E 41 4C 20 44 49 56 49 44 45 | ORIGINAL DIVIDE| 00002940: 4E 44 20 54 48 41 54 20 D8 20 20 50 4F 49 4E 54 |ND THAT . POINT| 00002950: 45 44 20 20 54 4F 2E 0D 20 20 20 20 20 20 20 20 |ED TO.. | 00002960: 20 20 D4 48 45 20 44 49 56 49 44 45 4E 44 20 49 | .HE DIVIDEND I| 00002970: 53 20 4C 45 46 54 20 55 4E 54 4F 55 43 48 45 44 |S LEFT UNTOUCHED| 00002980: 2E 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D |................| 00002990: 0D 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 C7 C5 |.... ..| 000029A0: CF D3 20 CB 45 52 4E 41 4C 20 D2 4F 55 54 49 4E |.. .ERNAL .OUTIN| 000029B0: 45 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |ES | 000029C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000029D0: 20 20 20 20 20 20 20 20 31 2D 35 36 0D 0D 0D 20 | 1-56... | 000029E0: 20 20 20 20 20 20 20 20 20 C6 55 4E 43 54 49 4F | .UNCTIO| 000029F0: 4E 20 CE 41 4D 45 3A 20 D5 CD 31 36 31 36 0D 20 |N .AME: ..1616. | 00002A00: 20 20 20 20 20 20 20 20 20 D0 55 52 50 4F 53 45 | .URPOSE| 00002A10: 3A 20 D5 4E 53 49 47 4E 45 44 20 31 36 20 42 49 |: .NSIGNED 16 BI| 00002A20: 54 20 42 59 20 31 36 20 42 49 54 20 4D 55 4C 54 |T BY 16 BIT MULT| 00002A30: 49 50 4C 59 2E 0D 20 20 20 20 20 20 20 20 20 20 |IPLY.. | 00002A40: C3 41 4C 4C 20 41 44 44 52 45 53 53 3A 20 24 C3 |.ALL ADDRESS: $.| 00002A50: 31 36 36 0D 20 20 20 20 20 20 20 20 20 20 C9 4E |166. .N| 00002A60: 50 55 54 20 52 45 51 55 49 52 45 4D 45 4E 54 53 |PUT REQUIREMENTS| 00002A70: 3A 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |:. | 00002A80: 20 D9 20 20 20 20 20 20 20 20 20 D4 48 45 20 41 | . .HE A| 00002A90: 44 44 52 45 53 53 20 4F 46 20 54 48 45 20 31 36 |DDRESS OF THE 16| 00002AA0: 20 42 49 54 20 4D 55 4C 54 49 50 4C 49 45 52 2E | BIT MULTIPLIER.| 00002AB0: 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. | 00002AC0: D8 20 20 20 20 20 20 20 20 20 D4 48 45 20 41 44 |. .HE AD| 00002AD0: 44 52 45 53 53 20 4F 46 20 54 48 45 20 31 36 20 |DRESS OF THE 16 | 00002AE0: 42 49 54 20 4D 55 4C 54 49 50 4C 49 43 41 4E 44 |BIT MULTIPLICAND| 00002AF0: 2E 0D 20 20 20 20 20 20 20 20 20 20 CF 55 54 50 |.. .UTP| 00002B00: 55 54 3A 0D 20 20 20 20 20 20 20 20 20 20 20 20 |UT:. | 00002B10: 20 20 20 D8 20 20 20 20 20 20 20 20 20 D4 48 45 | . .HE| 00002B20: 20 41 44 44 52 45 53 53 20 4F 46 20 54 48 45 20 | ADDRESS OF THE | 00002B30: 31 36 20 42 49 54 20 52 45 53 55 4C 54 2E 0D 0D |16 BIT RESULT...| 00002B40: 20 20 20 20 20 20 20 20 20 20 C4 45 53 43 52 49 | .ESCRI| 00002B50: 50 54 49 4F 4E 3A 20 D4 48 49 53 20 52 4F 55 54 |PTION: .HIS ROUT| 00002B60: 49 4E 45 20 49 53 20 4F 4E 45 20 4F 46 20 54 48 |INE IS ONE OF TH| 00002B70: 45 20 C7 C5 CF D3 20 4D 41 54 48 20 52 4F 55 54 |E .... MATH ROUT| 00002B80: 49 4E 45 53 2E 20 D8 20 41 4E 44 0D 20 20 20 20 |INES. . AND. | 00002B90: 20 20 20 20 20 20 D9 20 45 41 43 48 20 48 41 56 | . EACH HAV| 00002BA0: 45 20 20 54 48 45 20 20 41 44 44 52 45 53 53 20 |E THE ADDRESS | 00002BB0: 20 4F 46 20 41 20 54 45 52 4D 20 49 4E 20 54 48 | OF A TERM IN TH| 00002BC0: 45 20 20 4D 55 4C 54 49 50 4C 49 43 41 54 49 4F |E MULTIPLICATIO| 00002BD0: 4E 2E 20 20 D4 48 45 0D 20 20 20 20 20 20 20 20 |N. .HE. | 00002BE0: 20 20 52 45 53 55 4C 54 20 49 53 20 20 53 54 4F | RESULT IS STO| 00002BF0: 52 45 44 20 20 49 4E 20 20 50 4C 41 43 45 20 4F |RED IN PLACE O| 00002C00: 46 20 54 48 45 20 20 4F 52 49 47 49 4E 41 4C 20 |F THE ORIGINAL | 00002C10: 4D 55 4C 54 49 50 4C 49 43 41 4E 44 20 54 48 41 |MULTIPLICAND THA| 00002C20: 54 20 D8 0D 20 20 20 20 20 20 20 20 20 20 50 4F |T .. PO| 00002C30: 49 4E 54 45 44 20 54 4F 2E 20 20 D4 48 45 20 4D |INTED TO. .HE M| 00002C40: 55 4C 54 49 50 4C 49 45 52 20 50 4F 49 4E 54 45 |ULTIPLIER POINTE| 00002C50: 44 20 54 4F 20 42 59 20 D9 20 49 53 20 55 4E 54 |D TO BY . IS UNT| 00002C60: 4F 55 43 48 45 44 2E 0D 0D 0D 20 20 20 20 20 20 |OUCHED.... | 00002C70: 20 20 20 20 C6 55 4E 43 54 49 4F 4E 20 CE 41 4D | .UNCTION .AM| 00002C80: 45 3A 20 D5 CD 31 36 38 0D 20 20 20 20 20 20 20 |E: ..168. | 00002C90: 20 20 20 D0 55 52 50 4F 53 45 3A 20 D5 4E 53 49 | .URPOSE: .NSI| 00002CA0: 47 4E 45 44 20 38 20 42 49 54 20 42 59 20 31 36 |GNED 8 BIT BY 16| 00002CB0: 20 42 49 54 20 4D 55 4C 54 49 50 4C 59 2E 0D 20 | BIT MULTIPLY.. | 00002CC0: 20 20 20 20 20 20 20 20 20 C3 41 4C 4C 20 41 44 | .ALL AD| 00002CD0: 44 52 45 53 53 3A 20 24 C3 31 36 33 0D 20 20 20 |DRESS: $.163. | 00002CE0: 20 20 20 20 20 20 20 C9 4E 50 55 54 20 52 45 51 | .NPUT REQ| 00002CF0: 55 49 52 45 4D 45 4E 54 53 3A 0D 20 20 20 20 20 |UIREMENTS:. | 00002D00: 20 20 20 20 20 20 20 20 20 20 D9 20 20 20 20 20 | . | 00002D10: 20 20 20 20 D4 48 45 20 41 44 44 52 45 53 53 20 | .HE ADDRESS | 00002D20: 4F 46 20 54 48 45 20 38 20 42 49 54 20 4D 55 4C |OF THE 8 BIT MUL| 00002D30: 54 49 50 4C 49 45 52 2E 0D 20 20 20 20 20 20 20 |TIPLIER.. | 00002D40: 20 20 20 20 20 20 20 20 D8 20 20 20 20 20 20 20 | . | 00002D50: 20 20 D4 48 45 20 41 44 44 52 45 53 53 20 4F 46 | .HE ADDRESS OF| 00002D60: 20 54 48 45 20 31 36 20 42 49 54 20 4D 55 4C 54 | THE 16 BIT MULT| 00002D70: 49 50 4C 49 43 41 4E 44 2E 0D 20 20 20 20 20 20 |IPLICAND.. | 00002D80: 20 20 20 20 CF 55 54 50 55 54 3A 0D 20 20 20 20 | .UTPUT:. | 00002D90: 20 20 20 20 20 20 20 20 20 20 20 D8 20 20 20 20 | . | 00002DA0: 20 20 20 20 20 D4 48 45 20 41 44 44 52 45 53 53 | .HE ADDRESS| 00002DB0: 20 4F 46 20 54 48 45 20 31 36 20 42 49 54 20 50 | OF THE 16 BIT P| 00002DC0: 52 4F 44 55 43 54 2E 0D 0D 20 20 20 20 20 20 20 |RODUCT... | 00002DD0: 20 20 20 C4 45 53 43 52 49 50 54 49 4F 4E 3A 20 | .ESCRIPTION: | 00002DE0: D4 48 49 53 20 52 4F 55 54 49 4E 45 20 49 53 20 |.HIS ROUTINE IS | 00002DF0: 4F 4E 45 20 4F 46 20 54 48 45 20 C7 C5 CF D3 20 |ONE OF THE .... | 00002E00: 4D 41 54 48 20 52 4F 55 54 49 4E 45 53 2E 20 D8 |MATH ROUTINES. .| 00002E10: 20 41 4E 44 0D 20 20 20 20 20 20 20 20 20 20 D9 | AND. .| 00002E20: 20 20 45 41 43 48 20 20 48 41 56 45 20 54 48 45 | EACH HAVE THE| 00002E30: 20 41 44 44 52 45 53 53 20 4F 46 20 41 20 54 45 | ADDRESS OF A TE| 00002E40: 52 4D 20 49 4E 20 20 54 48 45 20 20 4D 55 4C 54 |RM IN THE MULT| 00002E50: 49 50 4C 49 43 41 54 49 4F 4E 2E 20 20 D4 48 45 |IPLICATION. .HE| 00002E60: 0D 20 20 20 20 20 20 20 20 20 20 52 45 53 55 4C |. RESUL| 00002E70: 54 20 20 49 53 20 20 53 54 4F 52 45 44 20 49 4E |T IS STORED IN| 00002E80: 20 50 4C 41 43 45 20 4F 46 20 54 48 45 20 4F 52 | PLACE OF THE OR| 00002E90: 49 47 49 4E 41 4C 20 4D 55 4C 54 49 50 4C 49 43 |IGINAL MULTIPLIC| 00002EA0: 41 4E 44 20 20 54 48 41 54 20 20 D8 0D 20 20 20 |AND THAT .. | 00002EB0: 20 20 20 20 20 20 20 50 4F 49 4E 54 45 44 20 20 | POINTED | 00002EC0: 54 4F 2E 20 20 D4 48 45 20 42 59 54 45 20 46 4F |TO. .HE BYTE FO| 00002ED0: 4C 4C 4F 57 49 4E 47 20 54 48 45 20 4D 55 4C 54 |LLOWING THE MULT| 00002EE0: 49 50 4C 49 45 52 20 49 53 20 53 45 54 20 20 54 |IPLIER IS SET T| 00002EF0: 4F 20 20 5A 45 52 4F 2C 0D 20 20 20 20 20 20 20 |O ZERO,. | 00002F00: 20 20 20 54 48 45 4E 20 43 4F 4E 54 52 4F 4C 20 | THEN CONTROL | 00002F10: 50 41 53 53 45 53 20 54 4F 20 D5 CD 31 36 31 36 |PASSES TO ..1616| 00002F20: 2E 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 C6 55 |.... .U| 00002F30: 4E 43 54 49 4F 4E 20 CE 41 4D 45 3A 20 D5 CD D5 |NCTION .AME: ...| 00002F40: CC 38 38 0D 20 20 20 20 20 20 20 20 20 20 D0 55 |.88. .U| 00002F50: 52 50 4F 53 45 3A 20 D5 4E 53 49 47 4E 45 44 20 |RPOSE: .NSIGNED | 00002F60: 38 20 42 49 54 20 42 59 20 38 20 42 49 54 20 4D |8 BIT BY 8 BIT M| 00002F70: 55 4C 54 49 50 4C 59 2E 0D 20 20 20 20 20 20 20 |ULTIPLY.. | 00002F80: 20 20 20 C3 41 4C 4C 20 41 44 44 52 45 53 53 3A | .ALL ADDRESS:| 00002F90: 20 24 C3 31 36 30 0D 20 20 20 20 20 20 20 20 20 | $.160. | 00002FA0: 20 C9 4E 50 55 54 20 52 45 51 55 49 52 45 4D 45 | .NPUT REQUIREME| 00002FB0: 4E 54 53 3A 0D 20 20 20 20 20 20 20 20 20 20 20 |NTS:. | 00002FC0: 20 20 20 20 D9 20 20 20 20 20 20 20 20 20 D4 48 | . .H| 00002FD0: 45 20 41 44 44 52 45 53 53 20 4F 46 20 54 48 45 |E ADDRESS OF THE| 00002FE0: 20 4D 55 4C 54 49 50 4C 49 45 52 2E 0D 20 20 20 | MULTIPLIER.. | 00002FF0: 20 20 20 20 20 20 20 20 20 20 20 20 D8 20 20 20 | . | 00003000: 20 20 20 20 20 20 D4 48 45 20 41 44 44 52 45 53 | .HE ADDRES| 00003010: 53 20 4F 46 20 54 48 45 20 4D 55 4C 54 49 50 4C |S OF THE MULTIPL| 00003020: 49 43 41 4E 44 2E 0D 20 20 20 20 20 20 20 20 20 |ICAND.. | 00003030: 20 CF 55 54 50 55 54 3A 0D 20 20 20 20 20 20 20 | .UTPUT:. | 00003040: 20 20 20 20 20 20 20 20 D8 20 20 20 20 20 20 20 | . | 00003050: 20 20 D4 48 45 20 41 44 44 52 45 53 53 20 4F 46 | .HE ADDRESS OF| 00003060: 20 54 48 45 20 31 36 20 42 49 54 20 50 52 4F 44 | THE 16 BIT PROD| 00003070: 55 43 54 2E 0D 0D 20 20 20 20 20 20 20 20 20 20 |UCT... | 00003080: C4 45 53 43 52 49 50 54 49 4F 4E 3A 20 D4 48 49 |.ESCRIPTION: .HI| 00003090: 53 20 52 4F 55 54 49 4E 45 20 49 53 20 4F 4E 45 |S ROUTINE IS ONE| 000030A0: 20 4F 46 20 54 48 45 20 C7 C5 CF D3 20 4D 41 54 | OF THE .... MAT| 000030B0: 48 20 52 4F 55 54 49 4E 45 53 2E 20 D8 20 41 4E |H ROUTINES. . AN| 000030C0: 44 0D 20 20 20 20 20 20 20 20 20 20 D9 20 20 45 |D. . E| 000030D0: 41 43 48 20 20 48 41 56 45 20 54 48 45 20 41 44 |ACH HAVE THE AD| 000030E0: 44 52 45 53 53 20 4F 46 20 41 20 54 45 52 4D 20 |DRESS OF A TERM | 000030F0: 49 4E 20 20 54 48 45 20 20 4D 55 4C 54 49 50 4C |IN THE MULTIPL| 00003100: 49 43 41 54 49 4F 4E 2E 20 20 D4 48 45 0D 20 20 |ICATION. .HE. | 00003110: 20 20 20 20 20 20 20 20 52 45 53 55 4C 54 20 20 | RESULT | 00003120: 49 53 20 20 53 54 4F 52 45 44 20 49 4E 20 50 4C |IS STORED IN PL| 00003130: 41 43 45 20 4F 46 20 54 48 45 20 4F 52 49 47 49 |ACE OF THE ORIGI| 00003140: 4E 41 4C 20 4D 55 4C 54 49 50 4C 49 43 41 4E 44 |NAL MULTIPLICAND| 00003150: 20 20 54 48 41 54 20 20 D8 0D 20 20 20 20 20 20 | THAT .. | 00003160: 20 20 20 20 50 4F 49 4E 54 45 44 20 54 4F 2E 20 | POINTED TO. | 00003170: 20 D4 48 45 20 56 41 4C 55 45 20 54 48 41 54 20 | .HE VALUE THAT | 00003180: D9 20 50 4F 49 4E 54 53 20 54 4F 20 49 53 20 4C |. POINTS TO IS L| 00003190: 45 46 54 20 55 4E 54 4F 55 43 48 45 44 2E 0D 0D |EFT UNTOUCHED...| 000031A0: 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D |................| 000031B0: 0D 0D 20 20 20 20 20 20 20 20 20 20 C7 C5 CF D3 |.. ....| 000031C0: 20 CB 45 52 4E 41 4C 20 D2 4F 55 54 49 4E 45 53 | .ERNAL .OUTINES| 000031D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000031E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000031F0: 20 20 20 20 20 20 31 2D 35 37 0D 0D 0D 20 20 20 | 1-57... | 00003200: 20 20 20 20 20 20 20 C6 55 4E 43 54 49 4F 4E 20 | .UNCTION | 00003210: CE 41 4D 45 3A 20 D5 D0 C4 C1 D4 C5 0D 20 20 20 |.AME: ....... | 00003220: 20 20 20 20 20 20 20 D0 55 52 50 4F 53 45 3A 20 | .URPOSE: | 00003230: D5 50 44 41 54 45 20 41 20 D6 CC C9 D2 20 46 49 |.PDATE A .... FI| 00003240: 4C 45 2E 0D 20 20 20 20 20 20 20 20 20 20 C3 41 |LE.. .A| 00003250: 4C 4C 20 41 44 44 52 45 53 53 3A 20 24 C3 32 39 |LL ADDRESS: $.29| 00003260: 35 0D 20 20 20 20 20 20 20 20 20 20 CF 55 54 50 |5. .UTP| 00003270: 55 54 3A 0D 20 20 20 20 20 20 20 20 20 20 20 20 |UT:. | 00003280: 20 20 20 24 38 34 39 38 20 20 20 20 20 C3 4C 45 | $8498 .LE| 00003290: 41 52 45 44 20 54 4F 20 24 30 30 2E 0D 20 20 20 |ARED TO $00.. | 000032A0: 20 20 20 20 20 20 20 D0 52 45 50 41 52 41 54 4F | .REPARATO| 000032B0: 52 59 20 52 4F 55 54 49 4E 45 53 3A 20 D6 CF D0 |RY ROUTINES: ...| 000032C0: C5 CE 0D 20 20 20 20 20 20 20 20 20 20 C5 52 52 |... .RR| 000032D0: 4F 52 53 3A 20 D3 45 45 20 C1 50 50 45 4E 44 49 |ORS: .EE .PPENDI| 000032E0: 58 20 C9 2E 0D 0D 20 20 20 20 20 20 20 20 20 20 |X .... | 000032F0: C4 45 53 43 52 49 50 54 49 4F 4E 3A 20 D4 48 49 |.ESCRIPTION: .HI| 00003300: 53 20 52 4F 55 54 49 4E 45 20 57 52 49 54 45 53 |S ROUTINE WRITES| 00003310: 20 54 48 45 20 4F 50 45 4E 20 D6 CC C9 D2 20 46 | THE OPEN .... F| 00003320: 49 4C 45 27 53 20 D6 CC C9 D2 20 53 45 43 54 4F |ILE'S .... SECTO| 00003330: 52 0D 20 20 20 20 20 20 20 20 20 20 54 4F 20 20 |R. TO | 00003340: 44 49 53 4B 20 20 41 4E 44 20 55 50 44 41 54 45 |DISK AND UPDATE| 00003350: 53 20 54 48 45 20 46 49 4C 45 27 53 20 44 49 52 |S THE FILE'S DIR| 00003360: 45 43 54 4F 52 59 20 45 4E 54 52 59 20 4F 4E 20 |ECTORY ENTRY ON | 00003370: 20 44 49 53 4B 20 20 28 D4 49 4D 45 2C 0D 20 20 | DISK (.IME,. | 00003380: 20 20 20 20 20 20 20 20 44 41 54 45 20 41 4E 44 | DATE AND| 00003390: 20 46 49 4C 45 20 53 49 5A 45 29 2E 20 20 D4 48 | FILE SIZE). .H| 000033A0: 49 53 20 4F 50 45 52 41 54 49 4F 4E 20 49 53 20 |IS OPERATION IS | 000033B0: 4E 4F 54 20 50 45 52 46 4F 52 4D 45 44 20 49 46 |NOT PERFORMED IF| 000033C0: 20 4C 4F 43 41 54 49 4F 4E 0D 20 20 20 20 20 20 | LOCATION. | 000033D0: 20 20 20 20 24 38 34 39 38 20 20 49 53 20 5A 45 | $8498 IS ZE| 000033E0: 52 4F 20 54 4F 20 53 54 41 52 54 20 57 49 54 48 |RO TO START WITH| 000033F0: 2E 20 20 D4 48 41 54 20 4C 4F 43 41 54 49 4F 4E |. .HAT LOCATION| 00003400: 20 49 53 20 41 20 46 4C 41 47 20 54 48 41 54 20 | IS A FLAG THAT | 00003410: 54 45 4C 4C 53 0D 20 20 20 20 20 20 20 20 20 20 |TELLS. | 00003420: 57 48 45 54 48 45 52 20 54 48 45 20 46 49 4C 45 |WHETHER THE FILE| 00003430: 20 48 41 53 20 42 45 45 4E 20 41 4C 54 45 52 45 | HAS BEEN ALTERE| 00003440: 44 20 4F 52 20 4E 4F 54 2E 20 20 D4 48 49 53 20 |D OR NOT. .HIS | 00003450: 52 4F 55 54 49 4E 45 20 49 53 20 43 41 4C 4C 45 |ROUTINE IS CALLE| 00003460: 44 0D 20 20 20 20 20 20 20 20 20 20 42 59 20 D6 |D. BY .| 00003470: C3 CC CF D3 C5 2E 0D 0D 0D 20 20 20 20 20 20 20 |......... | 00003480: 20 20 20 C6 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 | .UNCTION .AME| 00003490: 3A 20 D6 C3 CC CF D3 C5 0D 20 20 20 20 20 20 20 |: ....... | 000034A0: 20 20 20 D0 55 52 50 4F 53 45 3A 20 C3 4C 4F 53 | .URPOSE: .LOS| 000034B0: 45 20 41 20 D6 CC C9 D2 20 46 49 4C 45 2E 0D 20 |E A .... FILE.. | 000034C0: 20 20 20 20 20 20 20 20 20 C3 41 4C 4C 20 41 44 | .ALL AD| 000034D0: 44 52 45 53 53 3A 20 24 C3 32 37 37 0D 20 20 20 |DRESS: $.277. | 000034E0: 20 20 20 20 20 20 20 CF 55 54 50 55 54 3A 0D 20 | .UTPUT:. | 000034F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 38 | $8| 00003500: 38 37 33 20 20 20 20 20 C3 4C 45 41 52 45 44 20 |873 .LEARED | 00003510: 54 4F 20 24 30 30 2E 0D 20 20 20 20 20 20 20 20 |TO $00.. | 00003520: 20 20 D0 52 45 50 41 52 41 54 4F 52 59 20 52 4F | .REPARATORY RO| 00003530: 55 54 49 4E 45 53 3A 20 D6 CF D0 C5 CE 0D 20 20 |UTINES: ...... | 00003540: 20 20 20 20 20 20 20 20 C5 52 52 4F 52 53 3A 20 | .RRORS: | 00003550: D3 45 45 20 C1 50 50 45 4E 44 49 58 20 C9 2E 0D |.EE .PPENDIX ...| 00003560: 0D 20 20 20 20 20 20 20 20 20 20 C4 45 53 43 52 |. .ESCR| 00003570: 49 50 54 49 4F 4E 3A 20 20 D4 48 45 20 20 D6 CC |IPTION: .HE ..| 00003580: C9 D2 20 20 53 45 43 54 4F 52 20 49 53 20 52 45 |.. SECTOR IS RE| 00003590: 57 52 49 54 54 45 4E 20 54 4F 20 54 48 45 20 44 |WRITTEN TO THE D| 000035A0: 49 53 4B 20 41 4E 44 20 20 54 48 45 0D 20 20 20 |ISK AND THE. | 000035B0: 20 20 20 20 20 20 20 44 49 52 45 43 54 4F 52 59 | DIRECTORY| 000035C0: 20 20 49 53 20 20 55 50 44 41 54 45 44 20 57 49 | IS UPDATED WI| 000035D0: 54 48 20 41 20 4E 45 57 20 54 49 4D 45 2C 20 20 |TH A NEW TIME, | 000035E0: 44 41 54 45 20 41 4E 44 20 20 46 49 4C 45 20 20 |DATE AND FILE | 000035F0: 53 49 5A 45 20 20 42 59 0D 20 20 20 20 20 20 20 |SIZE BY. | 00003600: 20 20 20 43 41 4C 4C 49 4E 47 20 20 D5 D0 C4 C1 | CALLING ....| 00003610: D4 C5 2E 20 20 CC 4F 43 41 54 49 4F 4E 20 24 38 |... .OCATION $8| 00003620: 38 37 33 20 49 53 20 54 48 45 20 54 52 41 43 4B |873 IS THE TRACK| 00003630: 20 4E 55 4D 42 45 52 20 4F 46 20 54 48 45 20 20 | NUMBER OF THE | 00003640: D6 CC C9 D2 0D 20 20 20 20 20 20 20 20 20 20 53 |..... S| 00003650: 45 43 54 4F 52 2E 20 20 C2 59 20 43 4C 45 41 52 |ECTOR. .Y CLEAR| 00003660: 49 4E 47 20 49 54 2C 20 20 C7 C5 CF D3 20 53 41 |ING IT, .... SA| 00003670: 59 53 20 54 48 41 54 20 54 48 45 20 46 49 4C 45 |YS THAT THE FILE| 00003680: 20 49 53 20 4E 4F 20 4C 4F 4E 47 45 52 20 49 4E | IS NO LONGER IN| 00003690: 0D 20 20 20 20 20 20 20 20 20 20 4D 45 4D 4F 52 |. MEMOR| 000036A0: 59 2E 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 C6 |Y.... .| 000036B0: 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 3A 20 D6 CC |UNCTION .AME: ..| 000036C0: C9 CE C5 0D 20 20 20 20 20 20 20 20 20 20 D0 55 |.... .U| 000036D0: 52 50 4F 53 45 3A 20 C4 52 41 57 53 20 41 20 56 |RPOSE: .RAWS A V| 000036E0: 45 52 54 49 43 41 4C 20 4C 49 4E 45 20 4F 4E 20 |ERTICAL LINE ON | 000036F0: 54 48 45 20 53 43 52 45 45 4E 2E 0D 20 20 20 20 |THE SCREEN.. | 00003700: 20 20 20 20 20 20 C3 41 4C 4C 20 41 44 44 52 45 | .ALL ADDRE| 00003710: 53 53 3A 20 24 C3 31 32 31 0D 20 20 20 20 20 20 |SS: $.121. | 00003720: 20 20 20 20 C9 4E 50 55 54 20 52 45 51 55 49 52 | .NPUT REQUIR| 00003730: 45 4D 45 4E 54 53 3A 0D 20 20 20 20 20 20 20 20 |EMENTS:. | 00003740: 20 20 20 20 20 20 20 C1 20 20 20 20 20 20 20 20 | . | 00003750: 20 D4 48 45 20 41 43 54 55 41 4C 20 42 49 54 20 | .HE ACTUAL BIT | 00003760: 50 41 54 54 45 52 4E 20 46 4F 52 20 54 48 45 20 |PATTERN FOR THE | 00003770: 4C 49 4E 45 2E 0D 20 20 20 20 20 20 20 20 20 20 |LINE.. | 00003780: 20 20 20 20 20 24 30 38 20 20 20 20 20 20 20 D4 | $08 .| 00003790: 48 45 20 54 4F 50 20 4D 41 52 47 49 4E 2E 0D 20 |HE TOP MARGIN.. | 000037A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 30 | $0| 000037B0: 39 20 20 20 20 20 20 20 D4 48 45 20 42 4F 54 54 |9 .HE BOTT| 000037C0: 4F 4D 20 4D 41 52 47 49 4E 2E 0D 20 20 20 20 20 |OM MARGIN.. | 000037D0: 20 20 20 20 20 20 20 20 20 20 24 30 C1 2D 24 30 | $0.-$0| 000037E0: C2 20 20 20 D4 48 45 20 52 49 47 48 54 20 4D 41 |. .HE RIGHT MA| 000037F0: 52 47 49 4E 2E 0D 0D 20 20 20 20 20 20 20 20 20 |RGIN... | 00003800: 20 C4 45 53 43 52 49 50 54 49 4F 4E 3A 20 20 D4 | .ESCRIPTION: .| 00003810: 48 49 53 20 20 52 4F 55 54 49 4E 45 20 20 44 52 |HIS ROUTINE DR| 00003820: 41 57 53 20 41 20 56 45 52 54 49 43 41 4C 20 4C |AWS A VERTICAL L| 00003830: 49 4E 45 20 4F 4E 20 20 54 48 45 20 20 48 49 52 |INE ON THE HIR| 00003840: 45 53 0D 20 20 20 20 20 20 20 20 20 20 53 43 52 |ES. SCR| 00003850: 45 45 4E 20 49 4E 20 41 20 47 49 56 45 4E 20 50 |EEN IN A GIVEN P| 00003860: 41 54 54 45 52 4E 2E 20 D3 45 45 20 41 4C 53 4F |ATTERN. .EE ALSO| 00003870: 20 D2 CF D7 C1 C4 D2 2E 0D 0D 0D 0D 0D 0D 0D 0D | ...............| 00003880: 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 20 20 |.............. | 00003890: 20 20 20 20 20 20 20 20 C7 C5 CF D3 20 CB 45 52 | .... .ER| 000038A0: 4E 41 4C 20 D2 4F 55 54 49 4E 45 53 20 20 20 20 |NAL .OUTINES | 000038B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000038C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000038D0: 20 20 31 2D 35 38 0D 0D 0D 20 20 20 20 20 20 20 | 1-58... | 000038E0: 20 20 20 C6 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 | .UNCTION .AME| 000038F0: 3A 20 D6 CC CF C1 C4 0D 20 20 20 20 20 20 20 20 |: ...... | 00003900: 20 20 D0 55 52 50 4F 53 45 3A 20 CC 4F 41 44 20 | .URPOSE: .OAD | 00003910: 41 20 D6 CC C9 D2 20 43 48 41 49 4E 2E 0D 20 20 |A .... CHAIN.. | 00003920: 20 20 20 20 20 20 20 20 C3 41 4C 4C 20 41 44 44 | .ALL ADD| 00003930: 52 45 53 53 3A 20 24 C3 32 38 C3 0D 20 20 20 20 |RESS: $.28.. | 00003940: 20 20 20 20 20 20 C9 4E 50 55 54 20 52 45 51 55 | .NPUT REQU| 00003950: 49 52 45 4D 45 4E 54 53 3A 0D 20 20 20 20 20 20 |IREMENTS:. | 00003960: 20 20 20 20 20 20 20 20 20 24 30 36 2D 24 30 37 | $06-$07| 00003970: 20 20 20 CD 41 58 49 4D 55 4D 20 42 59 54 45 20 | .AXIMUM BYTE | 00003980: 43 4F 55 4E 54 20 4F 46 20 4C 4F 41 44 2E 0D 20 |COUNT OF LOAD.. | 00003990: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 31 | $1| 000039A0: 30 2D 24 31 31 20 20 20 CC 4F 41 44 20 41 44 44 |0-$11 .OAD ADD| 000039B0: 52 45 53 53 2E 0D 20 20 20 20 20 20 20 20 20 20 |RESS.. | 000039C0: 20 20 20 20 20 24 38 34 39 36 20 20 20 20 20 C3 | $8496 .| 000039D0: 55 52 52 45 4E 54 20 43 48 41 49 4E 20 4E 55 4D |URRENT CHAIN NUM| 000039E0: 42 45 52 2E 0D 20 20 20 20 20 20 20 20 20 20 CF |BER.. .| 000039F0: 55 54 50 55 54 3A 0D 20 20 20 20 20 20 20 20 20 |UTPUT:. | 00003A00: 20 20 20 20 20 20 24 38 33 30 32 2D 24 38 33 C6 | $8302-$83.| 00003A10: C6 20 D4 41 42 4C 45 20 4F 46 20 54 52 41 43 4B |. .ABLE OF TRACK| 00003A20: 53 20 41 4E 44 20 53 45 43 54 4F 52 53 20 54 48 |S AND SECTORS TH| 00003A30: 41 54 20 57 45 52 45 20 4C 4F 41 44 45 44 2E 0D |AT WERE LOADED..| 00003A40: 20 20 20 20 20 20 20 20 20 20 D0 52 45 50 41 52 | .REPAR| 00003A50: 41 54 4F 52 59 20 52 4F 55 54 49 4E 45 53 3A 20 |ATORY ROUTINES: | 00003A60: D6 CF D0 C5 CE 0D 20 20 20 20 20 20 20 20 20 20 |...... | 00003A70: C5 52 52 4F 52 53 3A 20 D3 45 45 20 C1 50 50 45 |.RRORS: .EE .PPE| 00003A80: 4E 44 49 58 20 C9 2E 0D 0D 20 20 20 20 20 20 20 |NDIX .... | 00003A90: 20 20 20 C4 45 53 43 52 49 50 54 49 4F 4E 3A 20 | .ESCRIPTION: | 00003AA0: 20 D4 48 49 53 20 20 52 4F 55 54 49 4E 45 20 20 | .HIS ROUTINE | 00003AB0: 4C 4F 41 44 53 20 54 48 45 20 43 55 52 52 45 4E |LOADS THE CURREN| 00003AC0: 54 20 43 48 41 49 4E 20 20 42 59 20 20 43 41 4C |T CHAIN BY CAL| 00003AD0: 4C 49 4E 47 0D 20 20 20 20 20 20 20 20 20 20 CC |LING. .| 00003AE0: C3 C8 C1 C9 CE 2E 0D 0D 0D 20 20 20 20 20 20 20 |......... | 00003AF0: 20 20 20 C6 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 | .UNCTION .AME| 00003B00: 3A 20 D6 CF D0 C5 CE 0D 20 20 20 20 20 20 20 20 |: ...... | 00003B10: 20 20 D0 55 52 50 4F 53 45 3A 20 CF 50 45 4E 53 | .URPOSE: .PENS| 00003B20: 20 41 20 D6 CC C9 D2 20 46 49 4C 45 2E 0D 20 20 | A .... FILE.. | 00003B30: 20 20 20 20 20 20 20 20 C3 41 4C 4C 20 41 44 44 | .ALL ADD| 00003B40: 52 45 53 53 3A 20 24 C3 32 37 34 0D 20 20 20 20 |RESS: $.274. | 00003B50: 20 20 20 20 20 20 C9 4E 50 55 54 20 52 45 51 55 | .NPUT REQU| 00003B60: 49 52 45 4D 45 4E 54 53 3A 0D 20 20 20 20 20 20 |IREMENTS:. | 00003B70: 20 20 20 20 20 20 20 20 20 24 30 32 2D 24 30 33 | $02-$03| 00003B80: 20 20 20 D0 4F 49 4E 54 45 52 20 54 4F 20 46 49 | .OINTER TO FI| 00003B90: 4C 45 20 4E 41 4D 45 2E 0D 20 20 20 20 20 20 20 |LE NAME.. | 00003BA0: 20 20 20 CF 55 54 50 55 54 3A 0D 20 20 20 20 20 | .UTPUT:. | 00003BB0: 20 20 20 20 20 20 20 20 20 20 24 30 34 20 20 20 | $04 | 00003BC0: 20 20 20 20 D4 52 41 43 4B 20 4F 46 20 D6 CC C9 | .RACK OF ...| 00003BD0: D2 20 53 45 43 54 4F 52 2E 0D 20 20 20 20 20 20 |. SECTOR.. | 00003BE0: 20 20 20 20 20 20 20 20 20 24 30 35 20 20 20 20 | $05 | 00003BF0: 20 20 20 D3 45 43 54 4F 52 20 4F 46 20 D6 CC C9 | .ECTOR OF ...| 00003C00: D2 20 53 45 43 54 4F 52 2E 0D 20 20 20 20 20 20 |. SECTOR.. | 00003C10: 20 20 20 20 20 20 20 20 20 24 30 C3 2D 24 30 C4 | $0.-$0.| 00003C20: 20 20 20 D0 4F 49 4E 54 45 52 20 54 4F 20 46 49 | .OINTER TO FI| 00003C30: 4C 45 27 53 20 44 49 52 45 43 54 4F 52 59 20 45 |LE'S DIRECTORY E| 00003C40: 4E 54 52 59 2E 0D 20 20 20 20 20 20 20 20 20 20 |NTRY.. | 00003C50: 20 20 20 20 20 24 38 31 30 30 2D 24 38 31 C6 C6 | $8100-$81..| 00003C60: 20 C6 49 4C 45 27 53 20 D6 CC C9 D2 20 53 45 43 | .ILE'S .... SEC| 00003C70: 54 4F 52 2E 0D 20 20 20 20 20 20 20 20 20 20 20 |TOR.. | 00003C80: 20 20 20 20 24 38 34 39 36 20 20 20 20 20 C9 4E | $8496 .N| 00003C90: 49 54 49 41 4C 20 43 48 41 49 4E 20 23 20 28 D3 |ITIAL CHAIN # (.| 00003CA0: 48 4F 55 4C 44 20 42 45 20 30 29 2E 0D 20 20 20 |HOULD BE 0).. | 00003CB0: 20 20 20 20 20 20 20 20 20 20 20 20 24 38 34 39 | $849| 00003CC0: 37 20 20 20 20 20 CE 55 4D 42 45 52 20 4F 46 20 |7 .UMBER OF | 00003CD0: 43 48 41 49 4E 53 2E 0D 20 20 20 20 20 20 20 20 |CHAINS.. | 00003CE0: 20 20 20 20 20 20 20 24 38 34 39 38 20 20 20 20 | $8498 | 00003CF0: 20 C3 4C 45 41 52 45 44 20 54 4F 20 24 30 30 2E | .LEARED TO $00.| 00003D00: 20 28 D6 CC C9 D2 20 46 49 4C 45 20 4D 4F 44 49 | (.... FILE MODI| 00003D10: 46 49 45 44 29 2E 0D 20 20 20 20 20 20 20 20 20 |FIED).. | 00003D20: 20 20 20 20 20 20 24 38 34 39 39 2D 24 38 34 39 | $8499-$849| 00003D30: C1 20 C6 49 4C 45 20 53 49 5A 45 2E 0D 20 20 20 |. .ILE SIZE.. | 00003D40: 20 20 20 20 20 20 20 20 20 20 20 20 24 38 38 36 | $886| 00003D50: C6 20 20 20 20 20 D4 52 41 43 4B 20 4F 46 20 46 |. .RACK OF F| 00003D60: 49 4C 45 27 53 20 44 49 52 45 43 54 4F 52 59 20 |ILE'S DIRECTORY | 00003D70: 45 4E 54 52 59 2E 0D 20 20 20 20 20 20 20 20 20 |ENTRY.. | 00003D80: 20 20 20 20 20 20 24 38 38 37 30 20 20 20 20 20 | $8870 | 00003D90: D3 45 43 54 4F 52 20 4F 46 20 46 49 4C 45 27 53 |.ECTOR OF FILE'S| 00003DA0: 20 44 49 52 45 43 54 4F 52 59 20 45 4E 54 52 59 | DIRECTORY ENTRY| 00003DB0: 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. | 00003DC0: 20 24 38 38 37 31 2D 24 38 38 37 32 20 D0 4F 49 | $8871-$8872 .OI| 00003DD0: 4E 54 45 52 20 54 4F 20 44 49 52 45 43 54 4F 52 |NTER TO DIRECTOR| 00003DE0: 59 20 45 4E 54 52 59 2E 0D 20 20 20 20 20 20 20 |Y ENTRY.. | 00003DF0: 20 20 20 20 20 20 20 20 24 38 38 37 33 20 20 20 | $8873 | 00003E00: 20 20 D4 52 41 43 4B 20 46 4F 52 20 D6 CC C9 D2 | .RACK FOR ....| 00003E10: 20 53 45 43 54 4F 52 2E 0D 20 20 20 20 20 20 20 | SECTOR.. | 00003E20: 20 20 20 20 20 20 20 20 24 38 38 37 34 20 20 20 | $8874 | 00003E30: 20 20 D3 45 43 54 4F 52 20 46 4F 52 20 D6 CC C9 | .ECTOR FOR ...| 00003E40: D2 20 53 45 43 54 4F 52 2E 0D 20 20 20 20 20 20 |. SECTOR.. | 00003E50: 20 20 20 20 C5 52 52 4F 52 53 3A 20 D3 45 45 20 | .RRORS: .EE | 00003E60: C1 50 50 45 4E 44 49 58 20 C9 2E 0D 0D 20 20 20 |.PPENDIX .... | 00003E70: 20 20 20 20 20 20 20 C4 45 53 43 52 49 50 54 49 | .ESCRIPTI| 00003E80: 4F 4E 3A 20 20 D4 48 49 53 20 52 4F 55 54 49 4E |ON: .HIS ROUTIN| 00003E90: 45 20 4F 50 45 4E 53 20 41 20 D6 CC C9 D2 20 46 |E OPENS A .... F| 00003EA0: 49 4C 45 2C 20 41 4E 44 20 53 45 54 53 20 55 50 |ILE, AND SETS UP| 00003EB0: 20 41 4C 4C 20 54 48 45 0D 20 20 20 20 20 20 20 | ALL THE. | 00003EC0: 20 20 20 56 41 52 49 41 42 4C 45 53 20 41 53 53 | VARIABLES ASS| 00003ED0: 4F 43 49 41 54 45 44 20 57 49 54 48 20 49 54 2E |OCIATED WITH IT.| 00003EE0: 20 CF 4E 4C 59 20 4F 4E 45 20 D6 CC C9 D2 20 46 | .NLY ONE .... F| 00003EF0: 49 4C 45 20 43 41 4E 20 42 45 20 4F 50 45 4E 20 |ILE CAN BE OPEN | 00003F00: 41 54 20 41 0D 20 20 20 20 20 20 20 20 20 20 54 |AT A. T| 00003F10: 49 4D 45 20 44 55 45 20 54 4F 20 54 48 45 20 46 |IME DUE TO THE F| 00003F20: 41 43 54 20 54 48 41 54 20 54 48 45 53 45 20 56 |ACT THAT THESE V| 00003F30: 41 52 49 41 42 4C 45 53 20 41 52 45 20 47 4C 4F |ARIABLES ARE GLO| 00003F40: 42 41 4C 2E 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D |BAL.............| 00003F50: 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 20 20 20 20 |............ | 00003F60: 20 20 20 20 20 20 C7 C5 CF D3 20 CB 45 52 4E 41 | .... .ERNA| 00003F70: 4C 20 D2 4F 55 54 49 4E 45 53 20 20 20 20 20 20 |L .OUTINES | 00003F80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00003F90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00003FA0: 31 2D 35 39 0D 0D 0D 20 20 20 20 20 20 20 20 20 |1-59... | 00003FB0: 20 C6 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 3A 20 | .UNCTION .AME: | 00003FC0: D6 D3 C1 D6 C5 0D 20 20 20 20 20 20 20 20 20 20 |...... | 00003FD0: D0 55 52 50 4F 53 45 3A 20 D3 41 56 45 20 4D 45 |.URPOSE: .AVE ME| 00003FE0: 4D 4F 52 59 20 54 4F 20 41 20 D6 CC C9 D2 20 43 |MORY TO A .... C| 00003FF0: 48 41 49 4E 2E 0D 20 20 20 20 20 20 20 20 20 20 |HAIN.. | 00004000: C3 41 4C 4C 20 41 44 44 52 45 53 53 3A 20 24 C3 |.ALL ADDRESS: $.| 00004010: 32 38 C6 0D 20 20 20 20 20 20 20 20 20 20 C9 4E |28.. .N| 00004020: 50 55 54 20 52 45 51 55 49 52 45 4D 45 4E 54 53 |PUT REQUIREMENTS| 00004030: 3A 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |:. | 00004040: 20 24 30 36 2D 24 30 37 20 20 20 CC 45 4E 47 54 | $06-$07 .ENGT| 00004050: 48 20 4F 46 20 53 41 56 45 2E 0D 20 20 20 20 20 |H OF SAVE.. | 00004060: 20 20 20 20 20 20 20 20 20 20 24 31 30 2D 24 31 | $10-$1| 00004070: 31 20 20 20 C1 44 44 52 45 53 53 20 4F 46 20 4D |1 .DDRESS OF M| 00004080: 45 4D 4F 52 59 20 54 4F 20 42 45 20 53 41 56 45 |EMORY TO BE SAVE| 00004090: 44 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 |D.. | 000040A0: 20 20 24 38 34 39 36 20 20 20 20 20 D6 CC C9 D2 | $8496 ....| 000040B0: 20 43 48 41 49 4E 20 4E 55 4D 42 45 52 2E 0D 20 | CHAIN NUMBER.. | 000040C0: 20 20 20 20 20 20 20 20 20 CF 55 54 50 55 54 3A | .UTPUT:| 000040D0: 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. | 000040E0: 24 38 33 30 30 2D 24 38 33 C6 C6 20 D4 41 42 4C |$8300-$83.. .ABL| 000040F0: 45 20 4F 46 20 54 52 41 43 4B 53 20 41 4E 44 20 |E OF TRACKS AND | 00004100: 53 45 43 54 4F 52 53 20 54 48 41 54 20 57 45 52 |SECTORS THAT WER| 00004110: 45 20 53 41 56 45 44 20 54 4F 2E 0D 20 20 20 20 |E SAVED TO.. | 00004120: 20 20 20 20 20 20 D0 52 45 50 41 52 41 54 4F 52 | .REPARATOR| 00004130: 59 20 52 4F 55 54 49 4E 45 53 3A 20 D6 CF D0 C5 |Y ROUTINES: ....| 00004140: CE 0D 20 20 20 20 20 20 20 20 20 20 C5 52 52 4F |.. .RRO| 00004150: 52 53 3A 20 D3 45 45 20 C1 50 50 45 4E 44 49 58 |RS: .EE .PPENDIX| 00004160: 20 C9 2E 0D 0D 20 20 20 20 20 20 20 20 20 20 C4 | .... .| 00004170: 45 53 43 52 49 50 54 49 4F 4E 3A 20 20 D4 48 49 |ESCRIPTION: .HI| 00004180: 53 20 20 52 4F 55 54 49 4E 45 20 20 53 41 56 45 |S ROUTINE SAVE| 00004190: 53 20 41 20 42 4C 4F 43 4B 20 4F 46 20 4D 45 4D |S A BLOCK OF MEM| 000041A0: 4F 52 59 20 20 54 4F 20 20 41 20 20 D6 CC C9 D2 |ORY TO A ....| 000041B0: 0D 20 20 20 20 20 20 20 20 20 20 43 48 41 49 4E |. CHAIN| 000041C0: 2E 20 C9 46 20 54 48 45 20 43 48 41 49 4E 20 41 |. .F THE CHAIN A| 000041D0: 4C 52 45 41 44 59 20 45 58 49 53 54 45 44 2C 20 |LREADY EXISTED, | 000041E0: 54 48 45 4E 20 49 54 20 49 53 20 44 45 4C 45 54 |THEN IT IS DELET| 000041F0: 45 44 20 46 49 52 53 54 2E 20 C9 46 0D 20 20 20 |ED FIRST. .F. | 00004200: 20 20 20 20 20 20 20 54 48 45 20 20 4C 45 4E 47 | THE LENG| 00004210: 54 48 20 20 4F 46 20 54 48 45 20 53 41 56 45 20 |TH OF THE SAVE | 00004220: 49 53 20 30 2C 20 20 54 48 45 4E 20 4E 4F 20 53 |IS 0, THEN NO S| 00004230: 41 56 45 20 49 53 20 20 50 45 52 46 4F 52 4D 45 |AVE IS PERFORME| 00004240: 44 2E 20 20 D4 48 49 53 0D 20 20 20 20 20 20 20 |D. .HIS. | 00004250: 20 20 20 57 4F 55 4C 44 20 41 4C 4C 4F 57 20 54 | WOULD ALLOW T| 00004260: 48 49 53 20 52 4F 55 54 49 4E 45 20 54 4F 20 42 |HIS ROUTINE TO B| 00004270: 45 20 55 53 45 44 20 41 53 20 41 20 44 45 4C 45 |E USED AS A DELE| 00004280: 54 45 20 43 48 41 49 4E 20 46 55 4E 43 54 49 4F |TE CHAIN FUNCTIO| 00004290: 4E 2E 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 C6 |N.... .| 000042A0: 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 3A 20 D7 C8 |UNCTION .AME: ..| 000042B0: C1 D4 C9 D3 0D 20 20 20 20 20 20 20 20 20 20 D0 |..... .| 000042C0: 55 52 50 4F 53 45 3A 20 D7 48 4F 20 4B 4E 4F 57 |URPOSE: .HO KNOW| 000042D0: 53 3F 0D 20 20 20 20 20 20 20 20 20 20 C3 41 4C |S?. .AL| 000042E0: 4C 20 41 44 44 52 45 53 53 3A 20 24 C3 31 39 36 |L ADDRESS: $.196| 000042F0: 0D 20 20 20 20 20 20 20 20 20 20 CF 55 54 50 55 |. .UTPU| 00004300: 54 3A 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 |T:. | 00004310: 20 20 24 30 32 2D 24 30 33 20 20 20 D6 41 4C 55 | $02-$03 .ALU| 00004320: 45 20 46 52 4F 4D 20 24 39 C6 32 37 2D 24 39 C6 |E FROM $9.27-$9.| 00004330: 32 38 20 28 24 33 C5 36 36 29 2E 0D 0D 20 20 20 |28 ($3.66)... | 00004340: 20 20 20 20 20 20 20 C4 45 53 43 52 49 50 54 49 | .ESCRIPTI| 00004350: 4F 4E 3A 20 D4 48 49 53 20 52 4F 55 54 49 4E 45 |ON: .HIS ROUTINE| 00004360: 20 53 45 45 4D 53 20 54 4F 20 48 41 56 45 20 41 | SEEMS TO HAVE A| 00004370: 42 53 4F 4C 55 54 45 4C 59 20 4E 4F 20 50 55 52 |BSOLUTELY NO PUR| 00004380: 50 4F 53 45 2E 20 C9 54 0D 20 20 20 20 20 20 20 |POSE. .T. | 00004390: 20 20 20 43 4F 50 49 45 53 20 20 41 20 56 45 43 | COPIES A VEC| 000043A0: 54 4F 52 20 46 52 4F 4D 20 24 39 C6 32 37 2D 24 |TOR FROM $9.27-$| 000043B0: 39 C6 32 38 20 28 24 33 C5 36 36 29 20 54 4F 20 |9.28 ($3.66) TO | 000043C0: 20 24 30 32 2D 24 30 33 2E 20 20 CC 4F 43 41 54 | $02-$03. .OCAT| 000043D0: 49 4F 4E 53 0D 20 20 20 20 20 20 20 20 20 20 24 |IONS. $| 000043E0: 39 C6 32 37 20 20 41 4E 44 20 24 39 C6 32 38 20 |9.27 AND $9.28 | 000043F0: 41 52 45 20 43 48 45 43 4B 45 44 20 42 59 20 41 |ARE CHECKED BY A| 00004400: 4E 4F 54 48 45 52 20 52 4F 55 54 49 4E 45 20 41 |NOTHER ROUTINE A| 00004410: 54 20 42 4F 4F 54 55 50 2E 20 20 C9 46 20 49 54 |T BOOTUP. .F IT| 00004420: 0D 20 20 20 20 20 20 20 20 20 20 49 53 20 5A 45 |. IS ZE| 00004430: 52 4F 20 54 48 45 4E 20 54 48 45 20 46 49 52 53 |RO THEN THE FIRS| 00004440: 54 20 D6 CC C9 D2 20 43 48 41 49 4E 20 4F 46 20 |T .... CHAIN OF | 00004450: 54 48 45 20 4B 45 52 4E 41 4C 20 28 24 39 30 30 |THE KERNAL ($900| 00004460: 30 2D 24 39 C6 C6 C6 29 20 20 49 53 0D 20 20 20 |0-$9...) IS. | 00004470: 20 20 20 20 20 20 20 52 45 57 52 49 54 54 45 4E | REWRITTEN| 00004480: 20 20 54 4F 20 20 54 48 45 20 20 44 49 53 4B 2E | TO THE DISK.| 00004490: 20 20 D4 48 49 53 20 20 4D 41 59 20 42 45 20 41 | .HIS MAY BE A| 000044A0: 20 20 52 45 4D 4E 41 4E 54 20 20 4F 46 20 20 54 | REMNANT OF T| 000044B0: 48 45 20 20 C7 C5 CF D3 0D 20 20 20 20 20 20 20 |HE ..... | 000044C0: 20 20 20 44 45 56 45 4C 4F 50 4D 45 4E 54 20 20 | DEVELOPMENT | 000044D0: 45 4E 56 49 52 4F 4E 4D 45 4E 54 20 4F 52 20 49 |ENVIRONMENT OR I| 000044E0: 54 20 4D 41 59 20 42 45 20 53 4F 4D 45 20 4B 49 |T MAY BE SOME KI| 000044F0: 4E 44 20 4F 46 20 4B 45 52 4E 41 4C 20 56 45 52 |ND OF KERNAL VER| 00004500: 53 49 4F 4E 0D 20 20 20 20 20 20 20 20 20 20 4E |SION. N| 00004510: 55 4D 42 45 52 2E 20 D4 48 45 20 43 4F 44 45 20 |UMBER. .HE CODE | 00004520: 4C 4F 4F 4B 53 20 4C 49 4B 45 20 54 48 49 53 3A |LOOKS LIKE THIS:| 00004530: 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. | 00004540: 20 CC C4 C1 20 24 39 C6 32 38 0D 20 20 20 20 20 | ... $9.28. | 00004550: 20 20 20 20 20 20 20 20 20 20 20 D3 D4 C1 20 24 | ... $| 00004560: 30 33 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 |03. | 00004570: 20 20 20 CC C4 C1 20 24 39 C6 32 37 0D 20 20 20 | ... $9.27. | 00004580: 20 20 20 20 20 20 20 20 20 20 20 20 20 D3 D4 C1 | ...| 00004590: 20 24 30 32 0D 20 20 20 20 20 20 20 20 20 20 20 | $02. | 000045A0: 20 20 20 20 20 D2 D4 D3 0D 0D 0D 0D 0D 0D 0D 0D | ...........| 000045B0: 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D |................| 000045C0: 0D 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 C7 C5 |.... ..| 000045D0: CF D3 20 CB 45 52 4E 41 4C 20 D2 4F 55 54 49 4E |.. .ERNAL .OUTIN| 000045E0: 45 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |ES | 000045F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00004600: 20 20 20 20 20 20 20 20 31 2D 36 30 0D 0D 0D 20 | 1-60... | 00004610: 20 20 20 20 20 20 20 20 20 C6 55 4E 43 54 49 4F | .UNCTIO| 00004620: 4E 20 CE 41 4D 45 3A 20 D7 C9 CE C4 CF D7 0D 20 |N .AME: ....... | 00004630: 20 20 20 20 20 20 20 20 20 D0 55 52 50 4F 53 45 | .URPOSE| 00004640: 3A 20 D0 52 4F 43 45 53 53 20 41 20 57 49 4E 44 |: .ROCESS A WIND| 00004650: 4F 57 20 44 45 53 43 52 49 50 54 4F 52 2E 0D 20 |OW DESCRIPTOR.. | 00004660: 20 20 20 20 20 20 20 20 20 C3 41 4C 4C 20 41 44 | .ALL AD| 00004670: 44 52 45 53 53 3A 20 24 C3 32 35 36 0D 20 20 20 |DRESS: $.256. | 00004680: 20 20 20 20 20 20 20 C9 4E 50 55 54 20 52 45 51 | .NPUT REQ| 00004690: 55 49 52 45 4D 45 4E 54 53 3A 0D 20 20 20 20 20 |UIREMENTS:. | 000046A0: 20 20 20 20 20 20 20 20 20 20 24 30 32 2D 24 30 | $02-$0| 000046B0: 33 20 20 20 D0 4F 49 4E 54 45 52 20 54 4F 20 57 |3 .OINTER TO W| 000046C0: 49 4E 44 4F 57 20 44 45 53 43 52 49 50 54 4F 52 |INDOW DESCRIPTOR| 000046D0: 2E 0D 20 20 20 20 20 20 20 20 20 20 CF 55 54 50 |.. .UTP| 000046E0: 55 54 3A 0D 20 20 20 20 20 20 20 20 20 20 20 20 |UT:. | 000046F0: 20 20 20 24 30 32 20 20 20 20 20 20 20 D7 49 4E | $02 .IN| 00004700: 44 4F 57 20 43 4F 4D 4D 41 4E 44 20 54 48 41 54 |DOW COMMAND THAT| 00004710: 20 43 4C 4F 53 45 44 20 54 48 45 20 57 49 4E 44 | CLOSED THE WIND| 00004720: 4F 57 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 |OW.. | 00004730: 20 20 20 24 38 35 31 C4 20 20 20 20 20 D7 49 4E | $851. .IN| 00004740: 44 4F 57 20 43 4F 4D 4D 41 4E 44 20 54 48 41 54 |DOW COMMAND THAT| 00004750: 20 43 4C 4F 53 45 44 20 54 48 45 20 57 49 4E 44 | CLOSED THE WIND| 00004760: 4F 57 2E 0D 0D 20 20 20 20 20 20 20 20 20 20 C4 |OW... .| 00004770: 45 53 43 52 49 50 54 49 4F 4E 3A 20 20 CC 49 4B |ESCRIPTION: .IK| 00004780: 45 20 20 CD C5 CE D5 2C 20 20 54 48 49 53 20 49 |E ...., THIS I| 00004790: 53 20 41 4E 4F 54 48 45 52 20 56 45 52 59 20 50 |S ANOTHER VERY P| 000047A0: 4F 57 45 52 46 55 4C 20 52 4F 55 54 49 4E 45 2E |OWERFUL ROUTINE.| 000047B0: 0D 20 20 20 20 20 20 20 20 20 20 C7 49 56 45 4E |. .IVEN| 000047C0: 20 20 41 20 20 44 45 53 43 52 49 50 54 49 4F 4E | A DESCRIPTION| 000047D0: 20 4F 46 20 54 48 45 20 57 49 4E 44 4F 57 27 53 | OF THE WINDOW'S| 000047E0: 20 20 43 4F 4D 4D 41 4E 44 53 2C 20 45 56 45 52 | COMMANDS, EVER| 000047F0: 59 54 48 49 4E 47 20 20 47 45 54 53 0D 20 20 20 |YTHING GETS. | 00004800: 20 20 20 20 20 20 20 48 41 4E 44 4C 45 44 2E 20 | HANDLED. | 00004810: 20 D4 48 45 20 46 4F 52 4D 41 54 20 4F 46 20 54 | .HE FORMAT OF T| 00004820: 48 45 20 57 49 4E 44 4F 57 20 44 45 53 43 52 49 |HE WINDOW DESCRI| 00004830: 50 54 4F 52 20 49 53 20 41 53 20 46 4F 4C 4C 4F |PTOR IS AS FOLLO| 00004840: 57 53 3A 0D 20 20 20 20 20 20 20 20 20 20 20 20 |WS:. | 00004850: 20 20 20 2E C2 D9 D4 C5 20 D7 49 4E 44 4F 57 20 | ..... .INDOW | 00004860: 54 59 50 45 2E 0D 20 20 20 20 20 20 20 20 20 20 |TYPE.. | 00004870: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 C2 | .| 00004880: 49 54 20 37 20 20 20 20 20 D7 49 4E 44 4F 57 20 |IT 7 .INDOW | 00004890: 20 53 49 5A 45 20 20 46 4F 4C 4C 4F 57 53 3B 20 | SIZE FOLLOWS; | 000048A0: 20 20 4F 54 48 45 52 57 49 53 45 2C 20 20 55 53 | OTHERWISE, US| 000048B0: 45 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |E. | 000048C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000048D0: 20 20 20 20 20 53 54 41 4E 44 41 52 44 20 20 57 | STANDARD W| 000048E0: 49 4E 44 4F 57 20 20 53 49 5A 45 20 52 4F 57 53 |INDOW SIZE ROWS| 000048F0: 20 34 30 20 20 54 4F 20 20 31 33 35 2C 0D 20 20 | 40 TO 135,. | 00004900: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00004910: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00004920: 20 43 4F 4C 55 4D 4E 53 20 37 32 20 54 4F 20 32 | COLUMNS 72 TO 2| 00004930: 36 33 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 |63.. | 00004940: 20 20 20 20 20 20 20 20 20 20 20 20 20 C2 49 54 | .IT| 00004950: 53 20 30 2D 34 20 20 C6 49 4C 4C 20 50 41 54 54 |S 0-4 .ILL PATT| 00004960: 45 52 4E 20 46 4F 52 20 53 48 41 44 4F 57 2E 20 |ERN FOR SHADOW. | 00004970: 20 C9 46 20 5A 45 52 4F 2C 20 20 54 48 45 4E 0D | .F ZERO, THEN.| 00004980: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00004990: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000049A0: 20 20 20 4E 4F 20 53 48 41 44 4F 57 20 49 53 20 | NO SHADOW IS | 000049B0: 44 52 41 57 4E 2E 0D 20 20 20 20 20 20 20 20 20 |DRAWN.. | 000049C0: 20 20 20 20 20 20 D4 48 45 20 20 46 4F 4C 4C 4F | .HE FOLLO| 000049D0: 57 49 4E 47 20 20 53 49 58 20 42 59 54 45 53 20 |WING SIX BYTES | 000049E0: 41 52 45 20 4F 4E 4C 59 20 50 52 45 53 45 4E 54 |ARE ONLY PRESENT| 000049F0: 20 49 46 20 42 49 54 20 37 20 20 4F 46 20 20 54 | IF BIT 7 OF T| 00004A00: 48 45 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 |HE. | 00004A10: 20 20 57 49 4E 44 4F 57 20 54 59 50 45 20 49 53 | WINDOW TYPE IS| 00004A20: 20 53 45 54 2E 0D 20 20 20 20 20 20 20 20 20 20 | SET.. | 00004A30: 20 20 20 20 20 2E C2 D9 D4 C5 20 D4 4F 50 20 4D | ..... .OP M| 00004A40: 41 52 47 49 4E 2E 0D 20 20 20 20 20 20 20 20 20 |ARGIN.. | 00004A50: 20 20 20 20 20 20 2E C2 D9 D4 C5 20 C2 4F 54 54 | ..... .OTT| 00004A60: 4F 4D 20 4D 41 52 47 49 4E 2E 0D 20 20 20 20 20 |OM MARGIN.. | 00004A70: 20 20 20 20 20 20 20 20 20 20 2E D7 CF D2 C4 20 | ..... | 00004A80: CC 45 46 54 20 4D 41 52 47 49 4E 2E 0D 20 20 20 |.EFT MARGIN.. | 00004A90: 20 20 20 20 20 20 20 20 20 20 20 20 2E D7 CF D2 | ....| 00004AA0: C4 20 D2 49 47 48 54 20 4D 41 52 47 49 4E 2E 0D |. .IGHT MARGIN..| 00004AB0: 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. | 00004AC0: 2E C2 D9 D4 C5 20 C3 4F 4D 4D 41 4E 44 20 42 59 |..... .OMMAND BY| 00004AD0: 54 45 53 20 46 4F 4C 4C 4F 57 45 44 20 42 59 20 |TES FOLLOWED BY | 00004AE0: 57 48 41 54 45 56 45 52 20 44 41 54 41 20 49 53 |WHATEVER DATA IS| 00004AF0: 20 4E 45 45 44 45 44 2E 0D 0D 20 20 20 20 20 20 | NEEDED... | 00004B00: 20 20 20 20 C1 4C 4C 20 54 48 45 20 43 4C 49 43 | .LL THE CLIC| 00004B10: 4B 20 42 4F 58 20 44 45 53 43 52 49 50 54 4F 52 |K BOX DESCRIPTOR| 00004B20: 53 20 41 52 45 20 53 54 4F 52 45 44 20 49 4E 20 |S ARE STORED IN | 00004B30: 41 20 54 41 42 4C 45 20 41 54 20 24 38 38 30 C3 |A TABLE AT $880.| 00004B40: 2C 20 46 4F 52 0D 20 20 20 20 20 20 20 20 20 20 |, FOR. | 00004B50: C7 C5 CF D3 20 54 4F 20 50 52 4F 43 45 53 53 20 |.... TO PROCESS | 00004B60: 54 48 45 4D 2E 20 20 D4 48 49 53 20 4C 49 4D 49 |THEM. .HIS LIMI| 00004B70: 54 53 20 54 48 45 20 4E 55 4D 42 45 52 20 4F 46 |TS THE NUMBER OF| 00004B80: 20 43 4C 49 43 4B 20 42 4F 58 45 53 20 49 4E 20 | CLICK BOXES IN | 00004B90: 41 0D 20 20 20 20 20 20 20 20 20 20 57 49 4E 44 |A. WIND| 00004BA0: 4F 57 20 20 54 4F 20 20 38 2E 20 20 D3 45 56 45 |OW TO 8. .EVE| 00004BB0: 52 41 4C 20 20 4D 45 4D 4F 52 59 20 20 4C 4F 43 |RAL MEMORY LOC| 00004BC0: 41 54 49 4F 4E 53 20 20 41 52 45 20 20 53 41 56 |ATIONS ARE SAV| 00004BD0: 45 44 20 20 50 52 49 4F 52 20 20 54 4F 0D 20 20 |ED PRIOR TO. | 00004BE0: 20 20 20 20 20 20 20 20 50 52 4F 43 45 53 53 49 | PROCESSI| 00004BF0: 4E 47 20 54 48 45 20 57 49 4E 44 4F 57 3B 20 20 |NG THE WINDOW; | 00004C00: 41 4C 53 4F 20 54 48 45 20 53 54 41 43 4B 20 50 |ALSO THE STACK P| 00004C10: 4F 49 4E 54 45 52 20 41 4E 44 20 52 45 54 55 52 |OINTER AND RETUR| 00004C20: 4E 20 41 44 44 52 45 53 53 0D 20 20 20 20 20 20 |N ADDRESS. | 00004C30: 20 20 20 20 41 52 45 20 20 53 41 56 45 44 2E 20 | ARE SAVED. | 00004C40: 20 C1 46 54 45 52 20 54 48 45 20 57 49 4E 44 4F | .FTER THE WINDO| 00004C50: 57 20 49 53 20 44 52 41 57 4E 2C 20 20 43 4F 4E |W IS DRAWN, CON| 00004C60: 54 52 4F 4C 20 50 41 53 53 45 53 20 20 42 41 43 |TROL PASSES BAC| 00004C70: 4B 20 20 54 4F 0D 20 20 20 20 20 20 20 20 20 20 |K TO. | 00004C80: CD C1 C9 CE 2E 20 C3 CC D3 D7 C9 CE 20 4D 55 53 |..... ...... MUS| 00004C90: 54 20 42 45 20 43 41 4C 4C 45 44 20 54 4F 20 52 |T BE CALLED TO R| 00004CA0: 45 54 55 52 4E 20 54 4F 20 54 48 45 20 43 41 4C |ETURN TO THE CAL| 00004CB0: 4C 45 52 2E 20 D4 48 45 52 45 46 4F 52 45 20 49 |LER. .HEREFORE I| 00004CC0: 54 0D 20 20 20 20 20 20 20 20 20 20 49 53 20 20 |T. IS | 00004CD0: 45 53 53 45 4E 54 49 41 4C 20 20 54 48 41 54 20 |ESSENTIAL THAT | 00004CE0: 20 53 4F 4D 45 20 20 4D 45 41 4E 53 20 20 4F 46 | SOME MEANS OF| 00004CF0: 20 20 43 4C 4F 53 49 4E 47 20 20 41 20 20 57 49 | CLOSING A WI| 00004D00: 4E 44 4F 57 20 20 45 58 49 53 54 53 2C 0D 20 20 |NDOW EXISTS,. | 00004D10: 20 20 20 20 20 20 20 20 4F 54 48 45 52 57 49 53 | OTHERWIS| 00004D20: 45 20 20 41 20 20 53 49 54 55 41 54 49 4F 4E 20 |E A SITUATION | 00004D30: 20 4C 49 4B 45 20 D3 D9 D3 C5 D2 D2 20 57 49 4C | LIKE ...... WIL| 00004D40: 4C 20 4F 43 43 55 52 20 28 D3 45 45 20 20 54 48 |L OCCUR (.EE TH| 00004D50: 45 20 20 D3 D9 D3 C5 D2 D2 0D 20 20 20 20 20 20 |E ....... | 00004D60: 20 20 20 20 52 4F 55 54 49 4E 45 20 46 4F 52 20 | ROUTINE FOR | 00004D70: 4D 4F 52 45 20 49 4E 46 4F 29 2E 0D 20 20 20 20 |MORE INFO).. | 00004D80: 20 20 20 20 20 20 20 20 20 20 20 D4 48 45 20 43 | .HE C| 00004D90: 4F 4D 4D 41 4E 44 20 54 48 41 54 20 43 4C 4F 53 |OMMAND THAT CLOS| 00004DA0: 45 53 20 54 48 45 20 57 49 4E 44 4F 57 20 49 53 |ES THE WINDOW IS| 00004DB0: 20 54 48 45 20 56 41 4C 55 45 20 52 45 54 55 52 | THE VALUE RETUR| 00004DC0: 4E 45 44 20 20 54 4F 0D 20 20 20 20 20 20 20 20 |NED TO. | 00004DD0: 20 20 54 48 45 20 55 53 45 52 2E 20 20 49 45 2E | THE USER. IE.| 00004DE0: 20 20 49 46 20 41 20 43 4C 49 43 4B 20 42 4F 58 | IF A CLICK BOX| 00004DF0: 20 43 4C 4F 53 45 53 20 54 48 45 20 57 49 4E 44 | CLOSES THE WIND| 00004E00: 4F 57 20 54 48 45 4E 20 54 48 45 20 43 4F 4D 4D |OW THEN THE COMM| 00004E10: 41 4E 44 0D 20 20 20 20 20 20 20 20 20 20 4E 55 |AND. NU| 00004E20: 4D 42 45 52 20 20 54 48 41 54 20 20 44 52 45 57 |MBER THAT DREW| 00004E30: 20 54 48 45 20 43 4C 49 43 4B 20 42 4F 58 20 49 | THE CLICK BOX I| 00004E40: 53 20 52 45 54 55 52 4E 45 44 2E 20 20 C8 4F 57 |S RETURNED. .OW| 00004E50: 45 56 45 52 20 49 54 20 49 53 20 20 54 48 45 0D |EVER IT IS THE.| 00004E60: 20 20 20 20 20 20 20 20 20 20 55 53 45 52 27 53 | USER'S| 00004E70: 20 20 52 4F 55 54 49 4E 45 27 53 20 20 52 45 53 | ROUTINE'S RES| 00004E80: 50 4F 4E 53 49 42 49 4C 49 54 59 20 20 54 4F 20 |PONSIBILITY TO | 00004E90: 53 45 54 20 54 48 45 20 56 41 4C 55 45 20 20 4F |SET THE VALUE O| 00004EA0: 46 20 20 4C 4F 43 41 54 49 4F 4E 0D 20 20 20 20 |F LOCATION. | 00004EB0: 20 20 20 20 20 20 24 38 35 31 C4 20 49 46 20 41 | $851. IF A| 00004EC0: 20 55 53 45 52 20 43 4C 49 43 4B 20 42 4F 58 20 | USER CLICK BOX | 00004ED0: 49 53 20 54 4F 20 43 4C 4F 53 45 20 54 48 45 20 |IS TO CLOSE THE | 00004EE0: 57 49 4E 44 4F 57 2E 20 20 C3 4F 4D 4D 41 4E 44 |WINDOW. .OMMAND| 00004EF0: 20 23 31 33 20 49 53 0D 20 20 20 20 20 20 20 20 | #13 IS. | 00004F00: 20 20 41 4E 4F 54 48 45 52 20 4F 4E 45 20 54 48 | ANOTHER ONE TH| 00004F10: 41 54 20 43 41 4E 20 43 4C 4F 53 45 20 54 48 45 |AT CAN CLOSE THE| 00004F20: 20 57 49 4E 44 4F 57 2E 20 20 D5 53 45 52 20 52 | WINDOW. .SER R| 00004F30: 4F 55 54 49 4E 45 53 20 44 4F 20 4E 4F 54 20 48 |OUTINES DO NOT H| 00004F40: 41 56 45 0D 20 20 20 20 20 20 20 20 20 20 54 4F |AVE. TO| 00004F50: 20 43 4C 4F 53 45 20 54 48 45 20 57 49 4E 44 4F | CLOSE THE WINDO| 00004F60: 57 20 42 55 54 20 54 48 45 59 20 4D 41 59 20 49 |W BUT THEY MAY I| 00004F70: 46 20 54 48 45 59 20 53 4F 20 44 45 53 49 52 45 |F THEY SO DESIRE| 00004F80: 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. | 00004F90: 20 D4 48 45 20 20 46 4F 4C 4C 4F 57 49 4E 47 20 | .HE FOLLOWING | 00004FA0: 20 49 53 20 41 20 4C 49 53 54 20 4F 46 20 54 48 | IS A LIST OF TH| 00004FB0: 45 20 4D 45 4D 4F 52 59 20 41 44 44 52 45 53 53 |E MEMORY ADDRESS| 00004FC0: 45 53 20 53 54 4F 52 45 44 20 20 42 59 0D 20 20 |ES STORED BY. | 00004FD0: 20 20 20 20 20 20 20 20 54 48 45 20 57 49 4E 44 | THE WIND| 00004FE0: 4F 57 20 50 52 4F 43 45 53 53 4F 52 3A 0D 20 20 |OW PROCESSOR:. | 00004FF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 24 32 32 | $22| 00005000: 2D 24 33 38 20 20 20 24 38 34 39 C2 2D 24 38 34 |-$38 $849.-$84| 00005010: C3 30 20 20 20 20 24 38 36 C3 30 2D 24 38 37 C4 |.0 $86.0-$87.| 00005020: 33 20 20 20 20 24 38 C6 C6 38 2D 24 38 C6 C6 C6 |3 $8..8-$8...| 00005030: 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. | 00005040: 24 33 C6 2D 24 34 30 20 20 20 24 C4 30 30 30 2D |$3.-$40 $.000-| 00005050: 24 C4 30 31 30 20 20 20 20 24 C4 30 31 C2 2D 24 |$.010 $.01.-$| 00005060: C4 30 31 C4 20 20 20 20 24 C4 30 32 35 2D 24 C4 |.01. $.025-$.| 00005070: 30 32 36 0D 20 20 20 20 20 20 20 20 20 20 20 20 |026. | 00005080: 20 20 20 24 C4 30 31 35 20 20 20 20 20 24 C4 30 | $.015 $.0| 00005090: 32 38 2D 24 C4 30 32 C5 0D 0D 0D 0D 0D 0D 0D 0D |28-$.02.........| 000050A0: 0D 0D 0D 0D 0D 0D 0D 0D 20 20 20 20 20 20 20 20 |........ | 000050B0: 20 20 C7 C5 CF D3 20 CB 45 52 4E 41 4C 20 D2 4F | .... .ERNAL .O| 000050C0: 55 54 49 4E 45 53 20 20 20 20 20 20 20 20 20 20 |UTINES | 000050D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000050E0: 20 20 20 20 20 20 20 20 20 20 20 20 31 2D 36 31 | 1-61| 000050F0: 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 |... | 00005100: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00005110: 20 D7 49 4E 44 4F 57 20 D0 52 4F 43 45 53 53 4F | .INDOW .ROCESSO| 00005120: 52 20 C3 4F 4D 4D 41 4E 44 53 0D 0D 20 20 20 20 |R .OMMANDS.. | 00005130: 20 20 20 20 20 20 30 20 20 20 20 CE 4F 20 44 41 | 0 .O DA| 00005140: 54 41 2E 20 D4 48 49 53 20 43 4F 4D 4D 41 4E 44 |TA. .HIS COMMAND| 00005150: 20 45 4E 44 53 20 54 48 45 20 57 49 4E 44 4F 57 | ENDS THE WINDOW| 00005160: 20 44 45 53 43 52 49 50 54 4F 52 2E 0D 20 20 20 | DESCRIPTOR.. | 00005170: 20 20 20 20 20 20 20 31 20 20 20 20 D4 48 45 20 | 1 .HE | 00005180: 44 41 54 41 20 46 4F 52 20 54 48 49 53 20 43 4F |DATA FOR THIS CO| 00005190: 4D 4D 41 4E 44 20 49 53 20 54 48 45 20 43 4F 4C |MMAND IS THE COL| 000051A0: 55 4D 4E 20 4F 46 46 53 45 54 20 49 4E 20 42 59 |UMN OFFSET IN BY| 000051B0: 54 45 53 20 20 41 4E 44 0D 20 20 20 20 20 20 20 |TES AND. | 000051C0: 20 20 20 20 20 20 20 20 54 48 45 20 52 4F 57 20 | THE ROW | 000051D0: 4F 46 46 53 45 54 20 49 4E 20 50 49 58 45 4C 53 |OFFSET IN PIXELS| 000051E0: 2E 20 20 C4 52 41 57 20 41 4E 20 27 CF CB 27 20 |. .RAW AN '..' | 000051F0: 43 4C 49 43 4B 20 42 4F 58 2E 0D 20 20 20 20 20 |CLICK BOX.. | 00005200: 20 20 20 20 20 32 20 20 20 20 D4 48 45 20 20 44 | 2 .HE D| 00005210: 41 54 41 20 46 4F 52 20 54 48 49 53 20 43 4F 4D |ATA FOR THIS COM| 00005220: 4D 41 4E 44 20 49 53 20 54 48 45 20 43 4F 4C 55 |MAND IS THE COLU| 00005230: 4D 4E 20 4F 46 46 53 45 54 20 49 4E 20 42 59 54 |MN OFFSET IN BYT| 00005240: 45 53 20 41 4E 44 0D 20 20 20 20 20 20 20 20 20 |ES AND. | 00005250: 20 20 20 20 20 20 54 48 45 20 52 4F 57 20 4F 46 | THE ROW OF| 00005260: 46 53 45 54 20 49 4E 20 50 49 58 45 4C 53 2E 20 |FSET IN PIXELS. | 00005270: 20 C4 52 41 57 20 41 20 27 C3 41 4E 43 45 4C 27 | .RAW A '.ANCEL'| 00005280: 20 43 4C 49 43 4B 20 42 4F 58 2E 0D 20 20 20 20 | CLICK BOX.. | 00005290: 20 20 20 20 20 20 33 20 20 20 20 D4 48 45 20 44 | 3 .HE D| 000052A0: 41 54 41 20 46 4F 52 20 54 48 49 53 20 43 4F 4D |ATA FOR THIS COM| 000052B0: 4D 41 4E 44 20 49 53 20 54 48 45 20 43 4F 4C 55 |MAND IS THE COLU| 000052C0: 4D 4E 20 4F 46 46 53 45 54 20 49 4E 20 42 59 54 |MN OFFSET IN BYT| 000052D0: 45 53 20 20 41 4E 44 0D 20 20 20 20 20 20 20 20 |ES AND. | 000052E0: 20 20 20 20 20 20 20 54 48 45 20 52 4F 57 20 4F | THE ROW O| 000052F0: 46 46 53 45 54 20 49 4E 20 50 49 58 45 4C 53 2E |FFSET IN PIXELS.| 00005300: 20 20 C4 52 41 57 20 41 20 27 D9 45 53 27 20 43 | .RAW A '.ES' C| 00005310: 4C 49 43 4B 20 42 4F 58 2E 0D 20 20 20 20 20 20 |LICK BOX.. | 00005320: 20 20 20 20 34 20 20 20 20 D4 48 45 20 44 41 54 | 4 .HE DAT| 00005330: 41 20 46 4F 52 20 54 48 49 53 20 43 4F 4D 4D 41 |A FOR THIS COMMA| 00005340: 4E 44 20 49 53 20 54 48 45 20 43 4F 4C 55 4D 4E |ND IS THE COLUMN| 00005350: 20 4F 46 46 53 45 54 20 49 4E 20 42 59 54 45 53 | OFFSET IN BYTES| 00005360: 20 20 41 4E 44 0D 20 20 20 20 20 20 20 20 20 20 | AND. | 00005370: 20 20 20 20 20 54 48 45 20 52 4F 57 20 4F 46 46 | THE ROW OFF| 00005380: 53 45 54 20 49 4E 20 50 49 58 45 4C 53 2E 20 20 |SET IN PIXELS. | 00005390: C4 52 41 57 20 41 20 27 CE 4F 27 20 43 4C 49 43 |.RAW A '.O' CLIC| 000053A0: 4B 20 42 4F 58 2E 0D 20 20 20 20 20 20 20 20 20 |K BOX.. | 000053B0: 20 35 20 20 20 20 D4 48 45 20 20 44 41 54 41 20 | 5 .HE DATA | 000053C0: 46 4F 52 20 54 48 49 53 20 43 4F 4D 4D 41 4E 44 |FOR THIS COMMAND| 000053D0: 20 49 53 20 54 48 45 20 43 4F 4C 55 4D 4E 20 4F | IS THE COLUMN O| 000053E0: 46 46 53 45 54 20 49 4E 20 42 59 54 45 53 20 41 |FFSET IN BYTES A| 000053F0: 4E 44 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 |ND. | 00005400: 20 20 54 48 45 20 52 4F 57 20 4F 46 46 53 45 54 | THE ROW OFFSET| 00005410: 20 49 4E 20 50 49 58 45 4C 53 2E 20 20 C4 52 41 | IN PIXELS. .RA| 00005420: 57 20 41 4E 20 27 CF 50 45 4E 27 20 43 4C 49 43 |W AN '.PEN' CLIC| 00005430: 4B 20 42 4F 58 2E 0D 20 20 20 20 20 20 20 20 20 |K BOX.. | 00005440: 20 36 20 20 20 20 D4 48 45 20 44 41 54 41 20 46 | 6 .HE DATA F| 00005450: 4F 52 20 54 48 49 53 20 43 4F 4D 4D 41 4E 44 20 |OR THIS COMMAND | 00005460: 49 53 20 54 48 45 20 43 4F 4C 55 4D 4E 20 4F 46 |IS THE COLUMN OF| 00005470: 46 53 45 54 20 49 4E 20 42 59 54 45 53 20 20 41 |FSET IN BYTES A| 00005480: 4E 44 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 |ND. | 00005490: 20 20 54 48 45 20 52 4F 57 20 4F 46 46 53 45 54 | THE ROW OFFSET| 000054A0: 20 49 4E 20 50 49 58 45 4C 53 2E 20 20 C4 52 41 | IN PIXELS. .RA| 000054B0: 57 20 41 20 27 C4 49 53 4B 27 20 43 4C 49 43 4B |W A '.ISK' CLICK| 000054C0: 20 42 4F 58 2E 0D 20 20 20 20 20 20 20 20 20 20 | BOX.. | 000054D0: 37 2D 31 30 20 C1 52 45 20 55 4E 44 45 46 49 4E |7-10 .RE UNDEFIN| 000054E0: 45 44 20 43 4F 4D 4D 41 4E 44 53 2E 0D 20 20 20 |ED COMMANDS.. | 000054F0: 20 20 20 20 20 20 20 31 31 20 20 20 D4 48 45 20 | 11 .HE | 00005500: 20 44 41 54 41 20 20 46 4F 52 20 54 48 49 53 20 | DATA FOR THIS | 00005510: 43 4F 4D 4D 41 4E 44 20 49 53 20 54 48 45 20 43 |COMMAND IS THE C| 00005520: 4F 4C 55 4D 4E 20 4F 46 46 53 45 54 20 49 4E 20 |OLUMN OFFSET IN | 00005530: 20 50 49 58 45 4C 53 2C 0D 20 20 20 20 20 20 20 | PIXELS,. | 00005540: 20 20 20 20 20 20 20 20 54 48 45 20 52 4F 57 20 | THE ROW | 00005550: 4F 46 46 53 45 54 20 49 4E 20 50 49 58 45 4C 53 |OFFSET IN PIXELS| 00005560: 2C 20 20 41 4E 44 20 54 48 45 20 41 44 44 52 45 |, AND THE ADDRE| 00005570: 53 53 20 4F 46 20 41 20 54 45 58 54 20 53 54 52 |SS OF A TEXT STR| 00005580: 49 4E 47 2E 0D 20 20 20 20 20 20 20 20 20 20 20 |ING.. | 00005590: 20 20 20 20 D4 48 49 53 20 20 43 4F 4D 4D 41 4E | .HIS COMMAN| 000055A0: 44 20 20 44 49 53 50 4C 41 59 53 20 20 54 48 45 |D DISPLAYS THE| 000055B0: 20 54 45 58 54 20 53 54 52 49 4E 47 20 20 41 54 | TEXT STRING AT| 000055C0: 20 20 54 48 45 20 20 53 50 45 43 49 46 49 45 44 | THE SPECIFIED| 000055D0: 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. | 000055E0: 4F 46 46 53 45 54 20 49 4E 20 54 48 45 20 57 49 |OFFSET IN THE WI| 000055F0: 4E 44 4F 57 2E 0D 20 20 20 20 20 20 20 20 20 20 |NDOW.. | 00005600: 31 32 20 20 20 D4 48 45 20 20 44 41 54 41 20 46 |12 .HE DATA F| 00005610: 4F 52 20 54 48 49 53 20 43 4F 4D 4D 41 4E 44 20 |OR THIS COMMAND | 00005620: 49 53 20 54 48 45 20 43 4F 4C 55 4D 4E 20 4F 46 |IS THE COLUMN OF| 00005630: 46 53 45 54 20 20 49 4E 20 20 50 49 58 45 4C 53 |FSET IN PIXELS| 00005640: 2C 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |,. | 00005650: 20 54 48 45 20 20 52 4F 57 20 20 4F 46 46 53 45 | THE ROW OFFSE| 00005660: 54 20 20 49 4E 20 20 50 49 58 45 4C 53 20 41 4E |T IN PIXELS AN| 00005670: 44 20 5A 45 52 4F 20 50 41 47 45 20 20 41 44 44 |D ZERO PAGE ADD| 00005680: 52 45 53 53 20 20 4F 46 20 20 54 48 45 0D 20 20 |RESS OF THE. | 00005690: 20 20 20 20 20 20 20 20 20 20 20 20 20 41 44 44 | ADD| 000056A0: 52 45 53 53 20 4F 46 20 41 20 54 45 58 54 20 53 |RESS OF A TEXT S| 000056B0: 54 52 49 4E 47 2E 20 D4 48 49 53 20 43 4F 4D 4D |TRING. .HIS COMM| 000056C0: 41 4E 44 20 49 53 20 53 49 4D 49 4C 41 52 20 54 |AND IS SIMILAR T| 000056D0: 4F 20 43 4F 4D 4D 41 4E 44 0D 20 20 20 20 20 20 |O COMMAND. | 000056E0: 20 20 20 20 20 20 20 20 20 31 31 2C 20 45 58 43 | 11, EXC| 000056F0: 45 50 54 20 46 4F 52 20 49 54 53 20 4D 45 54 48 |EPT FOR ITS METH| 00005700: 4F 44 20 4F 46 20 41 44 44 52 45 53 53 49 4E 47 |OD OF ADDRESSING| 00005710: 20 54 48 45 20 53 54 52 49 4E 47 2E 0D 20 20 20 | THE STRING.. | 00005720: 20 20 20 20 20 20 20 31 33 20 20 20 D4 48 45 20 | 13 .HE | 00005730: 20 44 41 54 41 20 46 4F 52 20 54 48 49 53 20 43 | DATA FOR THIS C| 00005740: 4F 4D 4D 41 4E 44 20 49 53 20 54 48 45 20 43 4F |OMMAND IS THE CO| 00005750: 4C 55 4D 4E 20 4F 46 46 53 45 54 20 20 49 4E 20 |LUMN OFFSET IN | 00005760: 20 50 49 58 45 4C 53 2C 0D 20 20 20 20 20 20 20 | PIXELS,. | 00005770: 20 20 20 20 20 20 20 20 54 48 45 20 20 52 4F 57 | THE ROW| 00005780: 20 4F 46 46 53 45 54 20 49 4E 20 50 49 58 45 4C | OFFSET IN PIXEL| 00005790: 53 2C 20 20 5A 45 52 4F 20 50 41 47 45 20 41 44 |S, ZERO PAGE AD| 000057A0: 44 52 45 53 53 20 4F 46 20 54 48 45 20 41 44 44 |DRESS OF THE ADD| 000057B0: 52 45 53 53 0D 20 20 20 20 20 20 20 20 20 20 20 |RESS. | 000057C0: 20 20 20 20 4F 46 20 20 54 48 45 20 20 54 45 58 | OF THE TEX| 000057D0: 54 20 20 42 55 46 46 45 52 20 54 4F 20 42 45 20 |T BUFFER TO BE | 000057E0: 55 53 45 44 20 42 59 20 C9 CE D0 D5 D4 20 20 41 |USED BY ..... A| 000057F0: 4E 44 20 20 54 48 45 20 20 4D 41 58 49 4D 55 4D |ND THE MAXIMUM| 00005800: 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. | 00005810: 4C 45 4E 47 54 48 20 4F 46 20 54 48 45 20 49 4E |LENGTH OF THE IN| 00005820: 50 55 54 20 42 55 46 46 45 52 2E 20 20 D3 45 45 |PUT BUFFER. .EE| 00005830: 20 C9 CE D0 D5 D4 20 46 4F 52 20 4D 4F 52 45 20 | ..... FOR MORE | 00005840: 49 4E 46 4F 52 4D 41 54 49 4F 4E 2E 0D 20 20 20 |INFORMATION.. | 00005850: 20 20 20 20 20 20 20 31 34 20 20 20 D3 45 54 20 | 14 .ET | 00005860: 54 48 45 20 56 45 43 54 4F 52 20 41 54 20 24 38 |THE VECTOR AT $8| 00005870: 34 C1 39 2D 24 38 34 C1 C1 20 54 4F 20 43 4C 4F |4.9-$84.. TO CLO| 00005880: 53 45 20 54 48 45 20 57 49 4E 44 4F 57 2E 20 C7 |SE THE WINDOW. .| 00005890: 45 4E 45 52 41 4C 4C 59 0D 20 20 20 20 20 20 20 |ENERALLY. | 000058A0: 20 20 20 20 20 20 20 20 55 53 45 44 20 57 49 54 | USED WIT| 000058B0: 48 20 43 4F 4D 4D 41 4E 44 20 31 33 2E 0D 20 20 |H COMMAND 13.. | 000058C0: 20 20 20 20 20 20 20 20 31 35 20 20 20 D4 48 45 | 15 .HE| 000058D0: 20 44 41 54 41 20 46 4F 52 20 54 48 49 53 20 43 | DATA FOR THIS C| 000058E0: 4F 4D 4D 41 4E 44 20 49 53 20 54 48 45 20 41 44 |OMMAND IS THE AD| 000058F0: 44 52 45 53 53 20 4F 46 20 41 20 C7 D2 D0 C8 C9 |DRESS OF A .....| 00005900: C3 20 43 4F 4D 4D 41 4E 44 0D 20 20 20 20 20 20 |. COMMAND. | 00005910: 20 20 20 20 20 20 20 20 20 54 41 42 4C 45 2E 20 | TABLE. | 00005920: 20 D3 45 45 20 C7 D2 D0 C8 C9 C3 20 46 4F 52 20 | .EE ...... FOR | 00005930: 46 55 52 54 48 45 52 20 49 4E 46 4F 52 4D 41 54 |FURTHER INFORMAT| 00005940: 49 4F 4E 2E 0D 20 20 20 20 20 20 20 20 20 20 31 |ION.. 1| 00005950: 36 20 20 20 D4 48 45 20 44 41 54 41 20 46 4F 52 |6 .HE DATA FOR| 00005960: 20 54 48 49 53 20 43 4F 4D 4D 41 4E 44 20 49 53 | THIS COMMAND IS| 00005970: 20 54 48 45 20 43 4F 4C 55 4D 4E 20 4F 46 46 53 | THE COLUMN OFFS| 00005980: 45 54 20 49 4E 20 50 49 58 45 4C 53 20 41 4E 44 |ET IN PIXELS AND| 00005990: 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. | 000059A0: 54 48 45 20 20 52 4F 57 20 20 4F 46 46 53 45 54 |THE ROW OFFSET| 000059B0: 20 49 4E 20 50 49 58 45 4C 53 2E 20 20 D4 48 49 | IN PIXELS. .HI| 000059C0: 53 20 43 4F 4D 4D 41 4E 44 20 4F 50 45 4E 53 20 |S COMMAND OPENS | 000059D0: 41 20 20 53 43 52 4F 4C 4C 49 4E 47 0D 20 20 20 |A SCROLLING. | 000059E0: 20 20 20 20 20 20 20 20 20 20 20 20 57 49 4E 44 | WIND| 000059F0: 4F 57 20 4F 46 20 46 49 4C 45 4E 41 4D 45 53 2E |OW OF FILENAMES.| 00005A00: 20 20 CC 4F 43 41 54 49 4F 4E 53 20 24 31 30 20 | .OCATIONS $10 | 00005A10: 41 4E 44 20 24 31 36 2D 24 31 37 20 4D 55 53 54 |AND $16-$17 MUST| 00005A20: 20 42 45 20 20 53 45 54 0D 20 20 20 20 20 20 20 | BE SET. | 00005A30: 20 20 20 20 20 20 20 20 50 52 49 4F 52 20 20 54 | PRIOR T| 00005A40: 4F 20 20 43 41 4C 4C 49 4E 47 20 D7 C9 CE C4 CF |O CALLING .....| 00005A50: D7 20 28 D3 45 45 20 D4 C1 C2 CC C5 20 46 4F 52 |. (.EE ..... FOR| 00005A60: 20 4D 4F 52 45 20 20 49 4E 46 4F 52 4D 41 54 49 | MORE INFORMATI| 00005A70: 4F 4E 29 2E 0D 20 20 20 20 20 20 20 20 20 20 20 |ON).. | 00005A80: 20 20 20 20 D4 48 45 20 46 49 4C 45 4E 41 4D 45 | .HE FILENAME| 00005A90: 53 20 41 52 45 20 53 54 4F 52 45 44 20 41 54 20 |S ARE STORED AT | 00005AA0: 24 38 33 30 30 2D 24 38 33 C6 C6 2C 20 20 54 4F |$8300-$83.., TO| 00005AB0: 20 41 20 4D 41 58 49 4D 55 4D 20 4F 46 20 31 35 | A MAXIMUM OF 15| 00005AC0: 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. | 00005AD0: 46 49 4C 45 4E 41 4D 45 53 2E 20 20 CC 4F 43 41 |FILENAMES. .OCA| 00005AE0: 54 49 4F 4E 20 20 24 38 38 35 C3 20 20 57 49 4C |TION $885. WIL| 00005AF0: 4C 20 52 45 54 55 52 4E 20 54 48 45 20 20 49 4E |L RETURN THE IN| 00005B00: 44 45 58 20 20 4F 46 20 20 54 48 45 0D 20 20 20 |DEX OF THE. | 00005B10: 20 20 20 20 20 20 20 20 20 20 20 20 53 45 4C 45 | SELE| 00005B20: 43 54 45 44 20 20 46 49 4C 45 20 20 4E 41 4D 45 |CTED FILE NAME| 00005B30: 2E 20 20 C9 46 20 4D 4F 52 45 20 54 48 41 4E 20 |. .F MORE THAN | 00005B40: 36 20 46 49 4C 45 53 20 41 52 45 20 20 46 4F 55 |6 FILES ARE FOU| 00005B50: 4E 44 2C 20 20 54 48 45 0D 20 20 20 20 20 20 20 |ND, THE. | 00005B60: 20 20 20 20 20 20 20 20 53 55 42 57 49 4E 44 4F | SUBWINDO| 00005B70: 57 20 57 49 4C 4C 20 48 41 56 45 20 41 20 43 4C |W WILL HAVE A CL| 00005B80: 49 43 4B 20 42 4F 58 20 46 4F 52 20 53 43 52 4F |ICK BOX FOR SCRO| 00005B90: 4C 4C 49 4E 47 20 54 48 45 20 4C 49 53 54 2E 0D |LLING THE LIST..| 00005BA0: 20 20 20 20 20 20 20 20 20 20 31 37 20 20 20 D4 | 17 .| 00005BB0: 48 45 20 44 41 54 41 20 46 4F 52 20 54 48 49 53 |HE DATA FOR THIS| 00005BC0: 20 43 4F 4D 4D 41 4E 44 20 49 53 20 54 48 45 20 | COMMAND IS THE | 00005BD0: 41 44 44 52 45 53 53 20 4F 46 20 54 48 45 20 52 |ADDRESS OF THE R| 00005BE0: 4F 55 54 49 4E 45 20 20 46 4F 52 0D 20 20 20 20 |OUTINE FOR. | 00005BF0: 20 20 20 20 20 20 20 20 20 20 20 42 55 54 54 4F | BUTTO| 00005C00: 4E 20 50 52 45 53 53 45 44 2E 20 20 D4 48 49 53 |N PRESSED. .HIS| 00005C10: 20 43 4F 4D 4D 41 4E 44 20 53 45 54 53 20 54 48 | COMMAND SETS TH| 00005C20: 45 20 56 45 43 54 4F 52 20 41 54 20 24 38 34 C1 |E VECTOR AT $84.| 00005C30: 39 2D 24 38 34 C1 C1 0D 20 20 20 20 20 20 20 20 |9-$84... | 00005C40: 20 20 20 20 20 20 20 54 4F 20 41 20 55 53 45 52 | TO A USER| 00005C50: 20 53 50 45 43 49 46 49 45 44 20 52 4F 55 54 49 | SPECIFIED ROUTI| 00005C60: 4E 45 2E 0D 20 20 20 20 20 20 20 20 20 20 31 38 |NE.. 18| 00005C70: 20 20 20 D4 48 45 20 44 41 54 41 20 46 4F 52 20 | .HE DATA FOR | 00005C80: 54 48 49 53 20 43 4F 4D 4D 41 4E 44 20 49 53 20 |THIS COMMAND IS | 00005C90: 54 48 45 20 43 4F 4C 55 4D 4E 20 4F 46 46 53 45 |THE COLUMN OFFSE| 00005CA0: 54 20 49 4E 20 42 59 54 45 53 2C 20 54 48 45 0D |T IN BYTES, THE.| 00005CB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 | R| 00005CC0: 4F 57 20 20 4F 46 46 53 45 54 20 20 49 4E 20 20 |OW OFFSET IN | 00005CD0: 50 49 58 45 4C 53 20 41 4E 44 20 54 48 45 20 41 |PIXELS AND THE A| 00005CE0: 44 44 52 45 53 53 20 4F 46 20 41 20 55 53 45 52 |DDRESS OF A USER| 00005CF0: 27 53 20 20 38 20 20 42 59 54 45 0D 20 20 20 20 |'S 8 BYTE. | 00005D00: 20 20 20 20 20 20 20 20 20 20 20 43 4C 49 43 4B | CLICK| 00005D10: 20 42 4F 58 20 44 45 53 43 52 49 50 54 49 4F 4E | BOX DESCRIPTION| 00005D20: 2C 20 49 4E 20 54 48 45 20 46 4F 4C 4C 4F 57 49 |, IN THE FOLLOWI| 00005D30: 4E 47 20 46 4F 52 4D 41 54 3A 0D 20 20 20 20 20 |NG FORMAT:. | 00005D40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00005D50: 20 20 20 20 23 42 59 54 45 53 20 20 20 20 C4 45 | #BYTES .E| 00005D60: 53 43 52 49 50 54 49 4F 4E 0D 20 20 20 20 20 20 |SCRIPTION. | 00005D70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00005D80: 20 20 20 20 20 20 32 20 20 20 20 20 20 C1 44 44 | 2 .DD| 00005D90: 52 45 53 53 20 4F 46 20 47 52 41 50 48 49 43 20 |RESS OF GRAPHIC | 00005DA0: 44 41 54 41 2E 0D 20 20 20 20 20 20 20 20 20 20 |DATA.. | 00005DB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00005DC0: 20 20 32 20 20 20 20 20 20 CE 4F 54 20 55 53 45 | 2 .OT USE| 00005DD0: 44 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 |D.. | 00005DE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 | 1| 00005DF0: 20 20 20 20 20 20 D7 49 44 54 48 20 4F 46 20 42 | .IDTH OF B| 00005E00: 4F 58 20 49 4E 20 42 59 54 45 53 2E 0D 20 20 20 |OX IN BYTES.. | 00005E10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00005E20: 20 20 20 20 20 20 20 20 20 31 20 20 20 20 20 20 | 1 | 00005E30: C8 45 49 47 48 54 20 4F 46 20 42 4F 58 20 49 4E |.EIGHT OF BOX IN| 00005E40: 20 50 49 58 45 4C 53 2E 0D 20 20 20 20 20 20 20 | PIXELS.. | 00005E50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00005E60: 20 20 20 20 20 32 20 20 20 20 20 20 C1 44 44 52 | 2 .DDR| 00005E70: 45 53 53 20 4F 46 20 52 4F 55 54 49 4E 45 20 54 |ESS OF ROUTINE T| 00005E80: 4F 20 50 52 4F 43 45 53 53 20 54 48 49 53 20 42 |O PROCESS THIS B| 00005E90: 4F 58 2E 0D 20 20 20 20 20 20 20 20 20 20 31 39 |OX.. 19| 00005EA0: 20 20 20 D4 48 45 20 20 44 41 54 41 20 20 46 4F | .HE DATA FO| 00005EB0: 52 20 20 54 48 49 53 20 20 43 4F 4D 4D 41 4E 44 |R THIS COMMAND| 00005EC0: 20 20 49 53 20 20 54 48 45 20 20 41 44 44 52 45 | IS THE ADDRE| 00005ED0: 53 53 20 20 4F 46 20 20 41 20 20 55 53 45 52 0D |SS OF A USER.| 00005EE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 | S| 00005EF0: 55 42 52 4F 55 54 49 4E 45 2E 20 20 D4 48 49 53 |UBROUTINE. .HIS| 00005F00: 20 43 4F 4D 4D 41 4E 44 20 43 41 4C 4C 53 20 54 | COMMAND CALLS T| 00005F10: 48 45 20 55 53 45 52 27 53 20 53 55 42 52 4F 55 |HE USER'S SUBROU| 00005F20: 54 49 4E 45 2E 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 20 |TINE........... | 00005F30: 20 20 20 20 20 20 20 20 20 C7 C5 CF D3 20 CB 45 | .... .E| 00005F40: 52 4E 41 4C 20 D2 4F 55 54 49 4E 45 53 20 20 20 |RNAL .OUTINES | 00005F50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00005F60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00005F70: 20 20 20 31 2D 36 32 0D 0D 0D 20 20 20 20 20 20 | 1-62... | 00005F80: 20 20 20 20 C6 55 4E 43 54 49 4F 4E 20 CE 41 4D | .UNCTION .AM| 00005F90: 45 3A 20 D7 D2 31 38 30 0D 20 20 20 20 20 20 20 |E: ..180. | 00005FA0: 20 20 20 D0 55 52 50 4F 53 45 3A 20 D7 52 49 54 | .URPOSE: .RIT| 00005FB0: 45 20 54 52 41 43 4B 20 31 38 20 53 45 43 54 4F |E TRACK 18 SECTO| 00005FC0: 52 20 30 20 42 41 43 4B 20 54 4F 20 44 49 53 4B |R 0 BACK TO DISK| 00005FD0: 2E 0D 20 20 20 20 20 20 20 20 20 20 C3 41 4C 4C |.. .ALL| 00005FE0: 20 41 44 44 52 45 53 53 3A 20 24 C3 32 34 C1 0D | ADDRESS: $.24..| 00005FF0: 20 20 20 20 20 20 20 20 20 20 C9 4E 50 55 54 20 | .NPUT | 00006000: 52 45 51 55 49 52 45 4D 45 4E 54 53 3A 0D 20 20 |REQUIREMENTS:. | 00006010: 20 20 20 20 20 20 20 20 20 20 20 20 20 24 38 32 | $82| 00006020: 30 30 2D 24 38 32 C6 C6 20 C4 41 54 41 20 46 4F |00-$82.. .ATA FO| 00006030: 52 20 54 52 41 43 4B 20 31 38 20 53 45 43 54 4F |R TRACK 18 SECTO| 00006040: 52 20 30 2E 0D 20 20 20 20 20 20 20 20 20 20 CF |R 0.. .| 00006050: 55 54 50 55 54 3A 0D 20 20 20 20 20 20 20 20 20 |UTPUT:. | 00006060: 20 20 20 20 20 20 24 30 34 20 20 20 20 20 20 20 | $04 | 00006070: 24 31 32 2C 20 54 52 41 43 4B 20 4E 55 4D 42 45 |$12, TRACK NUMBE| 00006080: 52 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 |R.. | 00006090: 20 20 24 30 35 20 20 20 20 20 20 20 24 30 30 2C | $05 $00,| 000060A0: 20 53 45 43 54 4F 52 20 4E 55 4D 42 45 52 2E 0D | SECTOR NUMBER..| 000060B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 | $| 000060C0: 30 C1 2D 24 30 C2 20 20 20 24 38 32 30 30 2C 20 |0.-$0. $8200, | 000060D0: 41 44 44 52 45 53 53 20 4F 46 20 42 55 46 46 45 |ADDRESS OF BUFFE| 000060E0: 52 20 41 52 45 41 2E 0D 20 20 20 20 20 20 20 20 |R AREA.. | 000060F0: 20 20 C5 52 52 4F 52 53 3A 20 D3 45 45 20 C1 50 | .RRORS: .EE .P| 00006100: 50 45 4E 44 49 58 20 C9 2E 0D 0D 20 20 20 20 20 |PENDIX .... | 00006110: 20 20 20 20 20 C4 45 53 43 52 49 50 54 49 4F 4E | .ESCRIPTION| 00006120: 3A 20 20 D4 48 49 53 20 20 52 4F 55 54 49 4E 45 |: .HIS ROUTINE| 00006130: 20 53 45 54 53 20 55 50 20 54 48 45 20 50 4F 49 | SETS UP THE POI| 00006140: 4E 54 45 52 53 20 46 4F 52 20 D7 D2 C9 D4 C5 2C |NTERS FOR .....,| 00006150: 20 20 54 48 45 4E 0D 20 20 20 20 20 20 20 20 20 | THEN. | 00006160: 20 43 41 4C 4C 53 20 20 49 54 20 54 4F 20 57 52 | CALLS IT TO WR| 00006170: 49 54 45 20 54 48 45 20 53 45 43 54 4F 52 2E 20 |ITE THE SECTOR. | 00006180: 20 D4 48 49 53 20 49 53 20 47 45 4E 45 52 41 4C | .HIS IS GENERAL| 00006190: 4C 59 20 55 53 45 44 20 54 4F 20 20 55 50 44 41 |LY USED TO UPDA| 000061A0: 54 45 0D 20 20 20 20 20 20 20 20 20 20 54 48 45 |TE. THE| 000061B0: 20 C2 C1 CD 20 4F 4E 20 54 48 45 20 44 49 53 4B | ... ON THE DISK| 000061C0: 2E 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 C6 55 |.... .U| 000061D0: 4E 43 54 49 4F 4E 20 CE 41 4D 45 3A 20 D7 D2 C9 |NCTION .AME: ...| 000061E0: D4 C5 0D 20 20 20 20 20 20 20 20 20 20 D0 55 52 |... .UR| 000061F0: 50 4F 53 45 3A 20 D7 52 49 54 45 20 41 20 47 49 |POSE: .RITE A GI| 00006200: 56 45 4E 20 54 52 41 43 4B 20 41 4E 44 20 53 45 |VEN TRACK AND SE| 00006210: 43 54 4F 52 2E 0D 20 20 20 20 20 20 20 20 20 20 |CTOR.. | 00006220: C3 41 4C 4C 20 41 44 44 52 45 53 53 3A 20 24 C3 |.ALL ADDRESS: $.| 00006230: 31 C5 37 0D 20 20 20 20 20 20 20 20 20 20 C9 4E |1.7. .N| 00006240: 50 55 54 20 52 45 51 55 49 52 45 4D 45 4E 54 53 |PUT REQUIREMENTS| 00006250: 3A 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |:. | 00006260: 20 24 30 34 20 20 20 20 20 20 20 D4 52 41 43 4B | $04 .RACK| 00006270: 20 4F 46 20 53 45 43 54 4F 52 20 54 4F 20 42 45 | OF SECTOR TO BE| 00006280: 20 57 52 49 54 54 45 4E 2E 0D 20 20 20 20 20 20 | WRITTEN.. | 00006290: 20 20 20 20 20 20 20 20 20 24 30 35 20 20 20 20 | $05 | 000062A0: 20 20 20 D3 45 43 54 4F 52 20 4E 55 4D 42 45 52 | .ECTOR NUMBER| 000062B0: 20 54 4F 20 42 45 20 57 52 49 54 54 45 4E 2E 0D | TO BE WRITTEN..| 000062C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 | $| 000062D0: 30 C1 2D 24 30 C2 20 20 20 D0 4F 49 4E 54 45 52 |0.-$0. .OINTER| 000062E0: 20 54 4F 20 42 55 46 46 45 52 2E 0D 20 20 20 20 | TO BUFFER.. | 000062F0: 20 20 20 20 20 20 C5 52 52 4F 52 53 3A 20 D3 45 | .RRORS: .E| 00006300: 45 20 C1 50 50 45 4E 44 49 58 0D 0D 20 20 20 20 |E .PPENDIX.. | 00006310: 20 20 20 20 20 20 C4 45 53 43 52 49 50 54 49 4F | .ESCRIPTIO| 00006320: 4E 3A 20 CC 4F 41 44 53 20 54 55 52 42 4F 44 4F |N: .OADS TURBODO| 00006330: 53 20 49 46 20 49 54 20 49 53 20 4E 4F 54 20 41 |S IF IT IS NOT A| 00006340: 4C 52 45 41 44 59 20 54 48 45 52 45 20 42 59 20 |LREADY THERE BY | 00006350: 43 41 4C 4C 49 4E 47 0D 20 20 20 20 20 20 20 20 |CALLING. | 00006360: 20 20 C4 D3 C5 D4 D5 D0 2E 20 20 D4 48 45 20 44 | ....... .HE D| 00006370: 45 53 49 52 45 44 20 42 4C 4F 43 4B 20 49 53 20 |ESIRED BLOCK IS | 00006380: 54 48 45 4E 20 57 52 49 54 54 45 4E 20 54 4F 20 |THEN WRITTEN TO | 00006390: 54 48 45 20 44 49 53 4B 20 42 59 20 43 41 4C 4C |THE DISK BY CALL| 000063A0: 49 4E 47 0D 20 20 20 20 20 20 20 20 20 20 D7 D2 |ING. ..| 000063B0: C9 D4 C5 32 2E 20 20 C6 49 4E 41 4C 4C 59 20 C3 |...2. .INALLY .| 000063C0: D7 D2 C9 D4 C5 20 49 53 20 43 41 4C 4C 45 44 20 |..... IS CALLED | 000063D0: 54 4F 20 56 45 52 49 46 59 20 54 48 45 20 53 45 |TO VERIFY THE SE| 000063E0: 43 54 4F 52 2E 0D 0D 0D 20 20 20 20 20 20 20 20 |CTOR.... | 000063F0: 20 20 C6 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 3A | .UNCTION .AME:| 00006400: 20 D7 D2 C9 D4 C5 32 0D 20 20 20 20 20 20 20 20 | .....2. | 00006410: 20 20 D0 55 52 50 4F 53 45 3A 20 D7 52 49 54 45 | .URPOSE: .RITE| 00006420: 20 41 20 53 45 43 54 4F 52 20 54 4F 20 54 48 45 | A SECTOR TO THE| 00006430: 20 44 49 53 4B 2E 0D 20 20 20 20 20 20 20 20 20 | DISK.. | 00006440: 20 C3 41 4C 4C 20 41 44 44 52 45 53 53 3A 20 24 | .ALL ADDRESS: $| 00006450: C3 32 32 30 0D 20 20 20 20 20 20 20 20 20 20 C9 |.220. .| 00006460: 4E 50 55 54 20 52 45 51 55 49 52 45 4D 45 4E 54 |NPUT REQUIREMENT| 00006470: 53 3A 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 |S:. | 00006480: 20 20 24 30 34 20 20 20 20 20 20 20 D4 52 41 43 | $04 .RAC| 00006490: 4B 20 4E 55 4D 42 45 52 2E 0D 20 20 20 20 20 20 |K NUMBER.. | 000064A0: 20 20 20 20 20 20 20 20 20 24 30 35 20 20 20 20 | $05 | 000064B0: 20 20 20 D3 45 43 54 4F 52 20 4E 55 4D 42 45 52 | .ECTOR NUMBER| 000064C0: 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. | 000064D0: 20 24 30 C1 2D 24 30 C2 20 20 20 D0 4F 49 4E 54 | $0.-$0. .OINT| 000064E0: 45 52 20 54 4F 20 44 41 54 41 20 42 55 46 46 45 |ER TO DATA BUFFE| 000064F0: 52 2E 0D 20 20 20 20 20 20 20 20 20 20 D0 52 45 |R.. .RE| 00006500: 50 41 52 41 54 4F 52 59 20 52 4F 55 54 49 4E 45 |PARATORY ROUTINE| 00006510: 53 3A 20 C4 D3 C5 D4 D5 D0 0D 20 20 20 20 20 20 |S: ....... | 00006520: 20 20 20 20 C5 52 52 4F 52 53 3A 20 D3 45 45 20 | .RRORS: .EE | 00006530: C1 50 50 45 4E 44 49 58 20 C9 2E 0D 0D 20 20 20 |.PPENDIX .... | 00006540: 20 20 20 20 20 20 20 C4 45 53 43 52 49 50 54 49 | .ESCRIPTI| 00006550: 4F 4E 3A 20 20 D4 48 49 53 20 20 52 4F 55 54 49 |ON: .HIS ROUTI| 00006560: 4E 45 20 20 49 53 20 54 4F 20 D7 D2 C9 D4 C5 2C |NE IS TO .....,| 00006570: 20 20 41 53 20 D2 C5 C1 C4 32 20 49 53 20 20 54 | AS ....2 IS T| 00006580: 4F 20 20 D2 C5 C1 C4 2E 0D 20 20 20 20 20 20 20 |O ...... | 00006590: 20 20 20 C4 D3 C5 D4 D5 D0 20 4D 55 53 54 20 48 | ...... MUST H| 000065A0: 41 56 45 20 42 45 45 4E 20 43 41 4C 4C 45 44 20 |AVE BEEN CALLED | 000065B0: 50 52 49 4F 52 20 54 4F 20 55 53 49 4E 47 20 54 |PRIOR TO USING T| 000065C0: 48 49 53 20 52 4F 55 54 49 4E 45 2E 0D 0D 0D 20 |HIS ROUTINE.... | 000065D0: 20 20 20 20 20 20 20 20 20 C6 55 4E 43 54 49 4F | .UNCTIO| 000065E0: 4E 20 CE 41 4D 45 3A 20 DA C6 C9 CC CC 0D 20 20 |N .AME: ...... | 000065F0: 20 20 20 20 20 20 20 20 D0 55 52 50 4F 53 45 3A | .URPOSE:| 00006600: 20 C6 49 4C 4C 53 20 41 20 4D 45 4D 4F 52 59 20 | .ILLS A MEMORY | 00006610: 52 45 47 49 4F 4E 20 57 49 54 48 20 5A 45 52 4F |REGION WITH ZERO| 00006620: 45 53 2E 0D 20 20 20 20 20 20 20 20 20 20 C3 41 |ES.. .A| 00006630: 4C 4C 20 41 44 44 52 45 53 53 3A 20 24 C3 31 37 |LL ADDRESS: $.17| 00006640: 38 0D 20 20 20 20 20 20 20 20 20 20 C9 4E 50 55 |8. .NPU| 00006650: 54 20 52 45 51 55 49 52 45 4D 45 4E 54 53 3A 0D |T REQUIREMENTS:.| 00006660: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 | $| 00006670: 30 32 2D 24 30 33 20 20 20 D4 48 45 20 4C 45 4E |02-$03 .HE LEN| 00006680: 47 54 48 20 4F 46 20 54 48 45 20 52 45 47 49 4F |GTH OF THE REGIO| 00006690: 4E 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 |N.. | 000066A0: 20 20 24 30 34 2D 24 30 35 20 20 20 D4 48 45 20 | $04-$05 .HE | 000066B0: 41 44 44 52 45 53 53 20 4F 46 20 54 48 45 20 52 |ADDRESS OF THE R| 000066C0: 45 47 49 4F 4E 2E 0D 0D 20 20 20 20 20 20 20 20 |EGION... | 000066D0: 20 20 C4 45 53 43 52 49 50 54 49 4F 4E 3A 20 20 | .ESCRIPTION: | 000066E0: CD 45 4D 4F 52 59 20 20 49 53 20 20 46 49 4C 4C |.EMORY IS FILL| 000066F0: 45 44 20 57 49 54 48 20 5A 45 52 4F 45 53 20 42 |ED WITH ZEROES B| 00006700: 59 20 53 54 4F 52 49 4E 47 20 41 20 24 30 30 20 |Y STORING A $00 | 00006710: 20 41 54 0D 20 20 20 20 20 20 20 20 20 20 4C 4F | AT. LO| 00006720: 43 41 54 49 4F 4E 20 24 30 36 20 41 4E 44 20 43 |CATION $06 AND C| 00006730: 41 4C 4C 49 4E 47 20 C2 CC CB C6 C9 CC 2E 0D 0D |ALLING .........| 00006740: 0D 0D 0D 0D 0D 0D |...... |
... GEOS KERNAL ROUTINES
1-51...
FUNCTION NAME: SAVE. PU
RPOSE: SAVE MEMORY TO A FILE..
CALL ADDRESS: $C1ED. INPUT REQU
IREMENTS:. $14-$15 POINT
ER TO INFORMATION SECTOR DATA..
$16 # DIRECTORY SECTORS TO S
KIP FIRST.. ERRORS: SEE APPENDI
X.. DESCRIPTION: THIS ROUTINE W
ILL SAVE MEMORY TO A FILE; EACH SECTOR.
IS VERIFIED AFTER THE WRITE IS
FINISHED. THE INFO SECTOR HAS ALL.
THE NECESSARY INFORMATION. IE. ST
ART AND STOP ADDRESSES, FILE.
TYPE AND STRUCTURE. IT MUST ALSO CO
NTAIN THE ADDRESS OF THE. FIL
ENAME STRING SOMEWHERE IN MEMORY, IN TH
E FIRST TWO BYTES. IF. THE FIL
E IS A VLIR FILE, THE MEMORY IS SAVED TO
CHAIN 0. LOCATION. $16 SPECIF
IES THE NUMBER OF DIRECTORY SECTORS TO S
KIP FOR DIRDSK. AND HOLE....
FUNCTION NAME: SAVE2. PU
RPOSE: SAVE MEMORY TO SPECIFIED SECTORS
ON THE DISK.. CALL ADDRESS: $C1
F9. INPUT REQUIREMENTS:.
$0E-$0F POINTER TO LIST OF TRA
CKS AND SECTORS TO USE.. $
10-$11 START ADDRESS OF MEMORY TO BE S
AVED.. PREPARATORY ROUTINES: FA
LLOC. ERRORS: SEE APPENDIX..
DESCRIPTION: THIS ROUTINE IS CAL
LED BY SAVE TO ACTUALLY SAVE THE.
MEMORY. ALL OF THE SECTORS SHOULD H
AVE ALREADY BEEN ALLOCATED.. T
HIS ROUTINE STOPS SAVING MEMORY WHEN T
RACK 0 IS FOUND IN THE. LIST
OF TRACKS AND SECTORS.... FUNCT
ION NAME: SD1616. PURPOSE: SIGN
ED 16 BIT BY 16 BIT DIVISION..
CALL ADDRESS: $C16C. INPUT REQU
IREMENTS:. Y THE A
DDRESS OF THE 16 BIT DIVISOR..
X THE ADDRESS OF THE 16 BIT
DIVIDEND.. OUTPUT:.
X THE ADDRESS OF THE 16 BIT
QUOTIENT.. $12-$13 THE 1
6 BIT REMAINDER... DESCRIPTION:
THIS ROUTINE IS ONE OF THE GEOS MATH RO
UTINES. X AND. Y EACH HAVE THE
ADDRESS OF A TERM IN THE DIVISION. BOTH
TERMS ARE. MADE POSITIVE WITH A
BS16. UD1616 IS THEN CALLED; IF THE RESU
LT OF. THE DIVISION SHOULD BE N
EGATIVE, NEG16 IS CALLED. THE QUOTIENT I
S. STORED IN PLACE OF THE ORIG
INAL DIVIDEND THAT X POINTED TO. THE.
DIVIDEND IS LEFT UNTOUCHED. TH
E REMAINDER IS ALWAYS A POSITIVE.
INTEGER............... GEOS
KERNAL ROUTINES
1-52... FUNCTION
NAME: SELBSW. PURPOSE: SELECTS
THE BERKELEY SOFTWORKS FONT.. C
ALL ADDRESS: $C14B. OUTPUT:.
$26 # PIXELS ABOVE LIN
E OF PRINT.. $27-$28 THE
NUMBER OF BYTES IN THE BIT STREAM..
$29 THE POINT SIZE..
$2A-$2B THE POINTER TO THE
TABLE OF INDICES INTO THE BIT.
STREAM.. $
2C-$2D THE POINTER TO THE BIT STREAM..
. DESCRIPTION: THIS ROUTINE SI
MPLY COPIES THE FONT HEADER DATA FOR.
THE BSW FONT TO ZERO PAGE FOR USE
BY DSPCHR AND DSPTXT.... FUNCT
ION NAME: SETPAT. PURPOSE: SETS
THE CURRENT FILL PATTERN.. CAL
L ADDRESS: $C139. INPUT REQUIRE
MENTS:. A THE PATT
ERN NUMBER (0-31)... DESCRIPTIO
N: THIS ROUTINE SETS THE FILL PATTERN
USED BY PFILL,. PFILL2, PBOX A
ND PBOX2.... FUNCTION NAME: SPR
OFF. PURPOSE: TURNS OFF A SPRIT
E.. CALL ADDRESS: $C1D5.
INPUT REQUIREMENTS:. $0
8 SPRITE NUMBER (0-7).. P
REPARATORY ROUTINES: COPYSP, POSSPR, SPR
ON.. DESCRIPTION: THIS ROUTINE
TURNS THE SPRITE OFF, SO THAT IT IS NO.
LONGER VISIBLE.... FU
NCTION NAME: SPRON. PURPOSE: TU
RNS ON A SPRITE.. CALL ADDRESS:
$C1D2. INPUT REQUIREMENTS:.
$08 SPRITE NUMBER (0-7
).. PREPARATORY ROUTINES: COPYS
P, POSSPR.. DESCRIPTION: THIS
ROUTINE TURNS THE SPRITE ON, SO THAT
IT IS. VISIBLE................
.... GEOS KERNAL ROUTINES
1-53...
FUNCTION NAME: START.
PURPOSE: RESTARTS THE TIMER ON A TIMED E
VENT.. CALL ADDRESS: $C115.
INPUT REQUIREMENTS:.
X THE INDEX INTO THE COMMAND TA
BLE AT $8719.. PREPARATORY ROUT
INES: CMDTBL.. DESCRIPTION: THI
S ROUTINE RESETS BIT 5 OF A SPECIFIC COM
MAND BYTE. IN THE TABLE AT $871
9. THIS ENABLES THE ASSOCIATED COUNTER.
THIS. ROUTINE IS THE COMPLE
MENT TO STOP. THIS ROUTINE IS NOT
A. REPLACEMENT FOR ENABLE. TH
IS ROUTINE DOES NOT COPY THE TIMER'S.
INITIAL VALUE AS DOES ENABLE....
FUNCTION NAME: STOP.
PURPOSE: STOPS THE TIMER ON A TIMED EVEN
T.. CALL ADDRESS: $C112.
INPUT REQUIREMENTS:. X
THE INDEX INTO THE COMMAND TABLE
AT $8719.. PREPARATORY ROUTINE
S: CMDTBL.. DESCRIPTION: THIS
ROUTINE SETS BIT 5 OF A SPECIFIC COMMAND
BYTE. IN THE TABLE AT $8719.
THIS PREVENTS THE ASSOCIATED TIMER FR
OM. RUNNING. THIS ROUTINE IS TH
E COMPLEMENT TO START.... FUNCT
ION NAME: STRCMP. PURPOSE: COMP
ARE TWO STRINGS FOR EQUALITY..
CALL ADDRESS: $C26B. INPUT REQU
IREMENTS:. X ADDRE
SS OF A ZERO PAGE POINTER..
Y ADDRESS OF A ZERO PAGE POINT
ER.. OUTPUT:. Z F
LAG SET ACCORDINGLY... DESCR
IPTION: THE X AND Y REGISTERS POINT TO
ZERO PAGE POINTERS.. THE TWO S
TRINGS ARE COMPARED UP TO A ZERO BYTE. T
HE Z FLAG IS SET. ACCORDINGLY..
.. FUNCTION NAME: STRCPY.
PURPOSE: COPY A STRING.. CA
LL ADDRESS: $C265. INPUT REQUIR
EMENTS:. X ADDRESS
OF ZERO PAGE SOURCE POINTER..
Y ADDRESS OF ZERO PAGE DEST
INATION POINTER... DESCRIPTION:
THE X AND Y REGISTERS POINT TO ZERO P
AGE POINTERS.. DATA IS COPIED U
P TO AND INCLUDING A ZERO BYTE. THIS RO
UTINE IS. USED TO COPY STRINGS
BY SETTING A TO ZERO AND CALLING BLKMOV
............... GEOS KERNAL ROU
TINES
1-54... FUNCTION NAME: SYSER
R. PURPOSE: DRAW A SYSTEM ERROR
WINDOW, AND HALT SYSTEM.. CALL
ADDRESS: $C2C2.. DESCRIPTION:
A WINDOW IS DRAWN WITH THE MESSAGE 'S
YSTEM ERROR. NEAR $XXXX', WH
ERE XXXX IS THE HEX ADDRESS OF THE JSR
SYSERR. INSTRUCTION. SINCE
THE SYSTEM ERROR WINDOW HAS NO WAY OF B
EING. CLOSED, GEOS SIMPLY SITS
IN ITS MAIN LOOP FOREVER. THE BRK VECTOR
. AT $84AF-$84B0 IS INITIALLY S
ET TO THIS ROUTINE.... FUNCTION
NAME: TABLE. PURPOSE: CREATE A
LIST OF FILENAMES.. CALL ADDRE
SS: $C23B. INPUT REQUIREMENTS:.
$0E-$0F POINTER TO BUFF
ER AREA FOR FILE NAMES.. $
10 GEOS FILE TYPE..
$11 MAXIMUM NUMBER OF FILE NAMES..
$16-$17 POINTER TO CLAS
S.. OUTPUT:. $11
NUMBER OF FILES NOT FOUND..
THE TABLE IS FILLED WITH FILENAM
ES.. ERRORS: SEE APPENDIX I...
DESCRIPTION: THIS IS A VERY U
SEFUL ROUTINE. GIVEN A GEOS FILE.
TYPE, A LIST OF FILES WITH THAT T
YPE IS CREATED. IF THE CLASS.
POINTER IS NON-ZERO THEN EACH FILE'S I
NFO SECTOR IS CHECKED FOR. PRO
PER CLASS. THIS IS HOW GEOPAINT AND GE
OWRITE CAN BOTH CREATE. APPLICA
TION DATA FILES AND NOT SEE EACH O
THERS FILES. THE. FILENAMES A
RE TEXT STRINGS WITH ZERO BYTE TERMINATO
RS. EACH ENTRY. IS INDEXED WITH
A MULTIPLE OF 17 (16 BYTE FILENAME MAX.
PLUS ZERO. BYTE). LOCATION $
11 HAS THE NUMBER OF TABLE ENTRIES NOT F
ILLED.. TO GET THE NUMBER OF F
ILES ACTUALLY FOUND, THIS VALUE MUST
BE. SUBTRACTED FROM THE ORIGINA
L MAXIMUM BUFFER LENGTH.... FUN
CTION NAME: TBLJMP. PURPOSE: JU
MP THROUGH A TABLE.. CALL ADDRE
SS: $C2A4. INPUT REQUIREMENTS:.
A OFFSET INTO TAB
LE.. $3D-$3E TABLE ADDRE
SS... DESCRIPTION: THIS ROUTIN
E IS CALLED BY ALL OF THE ROUTINES THAT
. HAVE INLINE DATA. THEY ALL
SET $3D-$3E TO THE RETURN ADDRESS OF.
THE CALLER, INDEX OFF OF THIS P
OINTER TO GET THEIR DATA, THEN.
CALL THE APPROPRIATE ROUTINE. WHEN
THE ROUTINE FINISHES, A IS. L
OADED WITH THE DATA TABLE'S LENGTH AND T
HIS ROUTINE IS CALLED TO. RETUR
N CONTROL TO THE CALLER AFTER THE DATA T
ABLE................ GEOS KERNA
L ROUTINES
1-55... FUNCTION NAME:
TEST. PURPOSE: TESTS THE VALUE
OF A POINT ON THE HIRES SCREEN..
CALL ADDRESS: $C13F. INPUT RE
QUIREMENTS:. $08-$09 THE
COLUMN NUMBER.. $18
THE ROW NUMBER.. OUTPUT:.
C FLAG IS SET TO THE VALUE OF
THE PIXEL... DESCRIPTION: TESTS
WHETHER OR NOT A GIVEN PIXEL IS ON OR N
OT. THE. CARRY FLAG IS SET TO T
HE VALUE OF THE PIXEL.... FUNCT
ION NAME: TRACE. PURPOSE: CREAT
E A TABLE OF TRACKS AND SECTORS..
CALL ADDRESS: $C205. INPUT R
EQUIREMENTS:. $04 IN
ITIAL TRACK NUMBER.. $05
INITIAL SECTOR NUMBER..
$08-$09 ADDRESS OF TABLE TO BE CREA
TED.. OUTPUT:. TA
BLE POINTED TO BY $08-$09 IS FILLED WI
TH ALL THE TRACKS. AND SE
CTORS LINKED TO THE INITIAL SECTOR..
ERRORS: SEE APPENDIX.. DE
SCRIPTION: GIVEN AN INITIAL TRACK AND
SECTOR, THIS ROUTINE. TRACES
A CHAIN AND RETURNS A LIST OF ALL THE
TRACKS AND SECTORS. ENCOUNTERE
D. THIS ROUTINE USES THE BUFFER AT $800
0-$80FF TO READ. THE SECTORS...
. FUNCTION NAME: UD1616.
PURPOSE: UNSIGNED 16 BIT BY 16 BIT DI
VISION.. CALL ADDRESS: $C169.
INPUT REQUIREMENTS:.
Y THE ADDRESS OF THE 16 BIT D
IVISOR.. X THE ADD
RESS OF THE 16 BIT DIVIDEND.. O
UTPUT:. X THE ADDR
ESS OF THE 16 BIT QUOTIENT..
$12-$13 THE 16 BIT REMAINDER...
DESCRIPTION: THIS ROUTINE IS ONE O
F THE GEOS MATH ROUTINES. X AND.
Y EACH HAVE THE ADDRESS OF A TERM IN
THE DIVISION. THE QUOTIENT. IS
STORED IN PLACE OF THE ORIGINAL DIVIDE
ND THAT X POINTED TO.. THE DI
VIDEND IS LEFT UNTOUCHED................
.... GEOS KERNAL ROUTINES
1-56...
FUNCTION NAME: UM1616.
PURPOSE: UNSIGNED 16 BIT BY 16 BIT MULT
IPLY.. CALL ADDRESS: $C166.
INPUT REQUIREMENTS:.
Y THE ADDRESS OF THE 16 BIT MUL
TIPLIER.. X THE AD
DRESS OF THE 16 BIT MULTIPLICAND..
OUTPUT:. X THE
ADDRESS OF THE 16 BIT RESULT...
DESCRIPTION: THIS ROUTINE IS ONE OF TH
E GEOS MATH ROUTINES. X AND. Y
EACH HAVE THE ADDRESS OF A TERM IN TH
E MULTIPLICATION. THE. RESULT
IS STORED IN PLACE OF THE ORIGINAL
MULTIPLICAND THAT X. POINTED TO
. THE MULTIPLIER POINTED TO BY Y IS UNT
OUCHED.... FUNCTION NAME: UM168
. PURPOSE: UNSIGNED 8 BIT BY 16
BIT MULTIPLY.. CALL ADDRESS: $
C163. INPUT REQUIREMENTS:.
Y THE ADDRESS OF THE 8
BIT MULTIPLIER.. X
THE ADDRESS OF THE 16 BIT MULTIPLICAND
.. OUTPUT:. X
THE ADDRESS OF THE 16 BIT PRODUCT..
. DESCRIPTION: THIS ROUTINE IS
ONE OF THE GEOS MATH ROUTINES. X AND.
Y EACH HAVE THE ADDRESS OF A TE
RM IN THE MULTIPLICATION. THE.
RESULT IS STORED IN PLACE OF THE OR
IGINAL MULTIPLICAND THAT X. P
OINTED TO. THE BYTE FOLLOWING THE MULT
IPLIER IS SET TO ZERO,. THEN
CONTROL PASSES TO UM1616.... FU
NCTION NAME: UMUL88. PURPOSE: U
NSIGNED 8 BIT BY 8 BIT MULTIPLY..
CALL ADDRESS: $C160. INPUT R
EQUIREMENTS:. Y TH
E ADDRESS OF THE MULTIPLIER..
X THE ADDRESS OF THE MULTIPL
ICAND.. OUTPUT:.
X THE ADDRESS OF THE 16 BIT PROD
UCT... DESCRIPTION: THIS ROUTIN
E IS ONE OF THE GEOS MATH ROUTINES. X AN
D. Y EACH HAVE THE ADDRESS OF
A TERM IN THE MULTIPLICATION. THE.
RESULT IS STORED IN PLACE OF T
HE ORIGINAL MULTIPLICAND THAT X.
POINTED TO. THE VALUE THAT Y POINTS
TO IS LEFT UNTOUCHED...................
.. GEOS KERNAL ROUTINES
1-57...
FUNCTION NAME: UPDATE. P
URPOSE: UPDATE A VLIR FILE.. CA
LL ADDRESS: $C295. OUTPUT:.
$8498 CLEARED TO $00..
PREPARATORY ROUTINES: VOPEN.
ERRORS: SEE APPENDIX I...
DESCRIPTION: THIS ROUTINE WRITES THE OPE
N VLIR FILE'S VLIR SECTOR. TO
DISK AND UPDATES THE FILE'S DIRECTORY E
NTRY ON DISK (TIME,. DATE AND
FILE SIZE). THIS OPERATION IS NOT PERF
ORMED IF LOCATION. $8498 IS ZE
RO TO START WITH. THAT LOCATION IS A FL
AG THAT TELLS. WHETHER THE FILE
HAS BEEN ALTERED OR NOT. THIS ROUTINE
IS CALLED. BY VCLOSE....
FUNCTION NAME: VCLOSE. PURPO
SE: CLOSE A VLIR FILE.. CALL AD
DRESS: $C277. OUTPUT:.
$8873 CLEARED TO $00..
PREPARATORY ROUTINES: VOPEN.
ERRORS: SEE APPENDIX I... DESCR
IPTION: THE VLIR SECTOR IS REWRITTEN
TO THE DISK AND THE. DIRECTORY
IS UPDATED WITH A NEW TIME, DATE AND
FILE SIZE BY. CALLING UPDA
TE. LOCATION $8873 IS THE TRACK NUMBER
OF THE VLIR. SECTOR. BY CLEAR
ING IT, GEOS SAYS THAT THE FILE IS NO L
ONGER IN. MEMORY.... F
UNCTION NAME: VLINE. PURPOSE: D
RAWS A VERTICAL LINE ON THE SCREEN..
CALL ADDRESS: $C121. INPU
T REQUIREMENTS:. A
THE ACTUAL BIT PATTERN FOR THE LINE..
$08 THE TOP MARGIN..
$09 THE BOTTOM MARGI
N.. $0A-$0B THE RIGHT MA
RGIN... DESCRIPTION: THIS ROU
TINE DRAWS A VERTICAL LINE ON THE HIR
ES. SCREEN IN A GIVEN PATTERN.
SEE ALSO ROWADR.......................
GEOS KERNAL ROUTINES
1-58...
FUNCTION NAME: VLOAD. PURPOS
E: LOAD A VLIR CHAIN.. CALL ADD
RESS: $C28C. INPUT REQUIREMENTS
:. $06-$07 MAXIMUM BYTE
COUNT OF LOAD.. $10-$11
LOAD ADDRESS.. $8496 C
URRENT CHAIN NUMBER.. OUTPUT:.
$8302-$83FF TABLE OF TRACK
S AND SECTORS THAT WERE LOADED..
PREPARATORY ROUTINES: VOPEN.
ERRORS: SEE APPENDIX I... DESCR
IPTION: THIS ROUTINE LOADS THE CURREN
T CHAIN BY CALLING. LCHAIN...
. FUNCTION NAME: VOPEN.
PURPOSE: OPENS A VLIR FILE..
CALL ADDRESS: $C274. INPUT REQU
IREMENTS:. $02-$03 POINT
ER TO FILE NAME.. OUTPUT:.
$04 TRACK OF VLIR SECTOR
.. $05 SECTOR OF VLI
R SECTOR.. $0C-$0D POINT
ER TO FILE'S DIRECTORY ENTRY..
$8100-$81FF FILE'S VLIR SECTOR..
$8496 INITIAL CHAIN # (S
HOULD BE 0).. $8497 NU
MBER OF CHAINS.. $8498
CLEARED TO $00. (VLIR FILE MODIFIED)..
$8499-$849A FILE SIZE..
$886F TRACK OF FILE'S DI
RECTORY ENTRY.. $8870
SECTOR OF FILE'S DIRECTORY ENTRY..
$8871-$8872 POINTER TO DIRECTOR
Y ENTRY.. $8873 TRACK
FOR VLIR SECTOR.. $8874
SECTOR FOR VLIR SECTOR.. ERRO
RS: SEE APPENDIX I... DESCRIPTI
ON: THIS ROUTINE OPENS A VLIR FILE, AND
SETS UP ALL THE. VARIABLES ASS
OCIATED WITH IT. ONLY ONE VLIR FILE CAN
BE OPEN AT A. TIME DUE TO THE F
ACT THAT THESE VARIABLES ARE GLOBAL.....
.................... GEOS KERNA
L ROUTINES
1-59... FUNCTION NAME:
VSAVE. PURPOSE: SAVE MEMORY TO
A VLIR CHAIN.. CALL ADDRESS: $C
28F. INPUT REQUIREMENTS:.
$06-$07 LENGTH OF SAVE..
$10-$11 ADDRESS OF MEMORY TO
BE SAVED.. $8496 VLIR
CHAIN NUMBER.. OUTPUT:.
$8300-$83FF TABLE OF TRACKS AND
SECTORS THAT WERE SAVED TO.. PR
EPARATORY ROUTINES: VOPEN. ERRO
RS: SEE APPENDIX I... DESCRIPTI
ON: THIS ROUTINE SAVES A BLOCK OF MEM
ORY TO A VLIR. CHAIN. IF THE
CHAIN ALREADY EXISTED, THEN IT IS DELET
ED FIRST. IF. THE LENGTH OF T
HE SAVE IS 0, THEN NO SAVE IS PERFORME
D. THIS. WOULD ALLOW THIS ROUT
INE TO BE USED AS A DELETE CHAIN FUNCTIO
N.... FUNCTION NAME: WHATIS.
PURPOSE: WHO KNOWS?. CAL
L ADDRESS: $C196. OUTPUT:.
$02-$03 VALUE FROM $9F27-$9F
28 ($3E66)... DESCRIPTION: THIS
ROUTINE SEEMS TO HAVE ABSOLUTELY NO PUR
POSE. IT. COPIES A VECTOR FROM
$9F27-$9F28 ($3E66) TO $02-$03. LOCAT
IONS. $9F27 AND $9F28 ARE CHEC
KED BY ANOTHER ROUTINE AT BOOTUP. IF IT
. IS ZERO THEN THE FIRST VLIR C
HAIN OF THE KERNAL ($9000-$9FFF) IS.
REWRITTEN TO THE DISK. THIS
MAY BE A REMNANT OF THE GEOS.
DEVELOPMENT ENVIRONMENT OR IT MAY BE
SOME KIND OF KERNAL VERSION. N
UMBER. THE CODE LOOKS LIKE THIS:.
LDA $9F28. STA $
03. LDA $9F27.
STA $02. RTS........
.................... GEOS KERNA
L ROUTINES
1-60... FUNCTION NAME:
WINDOW. PURPOSE: PROCESS A WIND
OW DESCRIPTOR.. CALL ADDRESS: $
C256. INPUT REQUIREMENTS:.
$02-$03 POINTER TO WINDOW DE
SCRIPTOR.. OUTPUT:.
$02 WINDOW COMMAND THAT CLOSED
THE WINDOW.. $851D WIN
DOW COMMAND THAT CLOSED THE WINDOW...
DESCRIPTION: LIKE MENU, THIS I
S ANOTHER VERY POWERFUL ROUTINE..
GIVEN A DESCRIPTION OF THE WINDOW'S
COMMANDS, EVERYTHING GETS. H
ANDLED. THE FORMAT OF THE WINDOW DESCRI
PTOR IS AS FOLLOWS:. .BYTE
WINDOW TYPE.. B
IT 7 WINDOW SIZE FOLLOWS; OTHERW
ISE, USE.
STANDARD WINDOW SIZE ROWS 40 TO
135,.
COLUMNS 72 TO 263..
BITS 0-4 FILL PATTERN FOR SHADOW.
IF ZERO, THEN.
NO SHADOW IS DRAWN..
THE FOLLOWING SIX BYTES ARE ONLY
PRESENT IF BIT 7 OF THE.
WINDOW TYPE IS SET.. .BY
TE TOP MARGIN.. .BYTE BOTT
OM MARGIN.. .WORD LEFT MAR
GIN.. .WORD RIGHT MARGIN..
. .BYTE COMMAND BYTES FOLL
OWED BY WHATEVER DATA IS NEEDED...
ALL THE CLICK BOX DESCRIPTORS ARE ST
ORED IN A TABLE AT $880C, FOR.
GEOS TO PROCESS THEM. THIS LIMITS THE N
UMBER OF CLICK BOXES IN A. WIND
OW TO 8. SEVERAL MEMORY LOCATIONS
ARE SAVED PRIOR TO. PROCESSI
NG THE WINDOW; ALSO THE STACK POINTER A
ND RETURN ADDRESS. ARE SAVED.
AFTER THE WINDOW IS DRAWN, CONTROL PAS
SES BACK TO. MAIN. CLSWIN MUS
T BE CALLED TO RETURN TO THE CALLER. THE
REFORE IT. IS ESSENTIAL THAT
SOME MEANS OF CLOSING A WINDOW EX
ISTS,. OTHERWISE A SITUATION
LIKE SYSERR WILL OCCUR (SEE THE SYSER
R. ROUTINE FOR MORE INFO)..
THE COMMAND THAT CLOSES THE W
INDOW IS THE VALUE RETURNED TO.
THE USER. IE. IF A CLICK BOX CLOSES
THE WINDOW THEN THE COMMAND. NU
MBER THAT DREW THE CLICK BOX IS RETURN
ED. HOWEVER IT IS THE. USER'S
ROUTINE'S RESPONSIBILITY TO SET THE
VALUE OF LOCATION. $851D IF A
USER CLICK BOX IS TO CLOSE THE WINDOW.
COMMAND #13 IS. ANOTHER ONE TH
AT CAN CLOSE THE WINDOW. USER ROUTINES
DO NOT HAVE. TO CLOSE THE WINDO
W BUT THEY MAY IF THEY SO DESIRE..
THE FOLLOWING IS A LIST OF TH
E MEMORY ADDRESSES STORED BY.
THE WINDOW PROCESSOR:. $22
-$38 $849B-$84C0 $86C0-$87D3 $8F
F8-$8FFF. $3F-$40 $D000-
$D010 $D01B-$D01D $D025-$D026.
$D015 $D028-$D02E........
........ GEOS KERNAL ROUTINES
1-61
... WINDOW
PROCESSOR COMMANDS.. 0 NO DA
TA. THIS COMMAND ENDS THE WINDOW DESCRIP
TOR.. 1 THE DATA FOR THIS CO
MMAND IS THE COLUMN OFFSET IN BYTES AND
. THE ROW OFFSET IN PIXELS
. DRAW AN 'OK' CLICK BOX.. 2
THE DATA FOR THIS COMMAND IS THE COLU
MN OFFSET IN BYTES AND. TH
E ROW OFFSET IN PIXELS. DRAW A 'CANCEL'
CLICK BOX.. 3 THE DATA FOR
THIS COMMAND IS THE COLUMN OFFSET IN BYT
ES AND. THE ROW OFFSET IN
PIXELS. DRAW A 'YES' CLICK BOX..
4 THE DATA FOR THIS COMMAND IS TH
E COLUMN OFFSET IN BYTES AND.
THE ROW OFFSET IN PIXELS. DRAW A '
NO' CLICK BOX.. 5 THE DATA
FOR THIS COMMAND IS THE COLUMN OFFSET IN
BYTES AND. THE ROW OFFSET
IN PIXELS. DRAW AN 'OPEN' CLICK BOX..
6 THE DATA FOR THIS COMMAND
IS THE COLUMN OFFSET IN BYTES AND.
THE ROW OFFSET IN PIXELS. DRA
W A 'DISK' CLICK BOX.. 7-10 ARE
UNDEFINED COMMANDS.. 11 THE
DATA FOR THIS COMMAND IS THE COLUMN OF
FSET IN PIXELS,. THE ROW
OFFSET IN PIXELS, AND THE ADDRESS OF A
TEXT STRING.. THIS COMMAN
D DISPLAYS THE TEXT STRING AT THE S
PECIFIED. OFFSET IN THE WI
NDOW.. 12 THE DATA FOR THIS
COMMAND IS THE COLUMN OFFSET IN PIXELS
,. THE ROW OFFSET IN P
IXELS AND ZERO PAGE ADDRESS OF THE.
ADDRESS OF A TEXT STRING. T
HIS COMMAND IS SIMILAR TO COMMAND.
11, EXCEPT FOR ITS METHOD OF AD
DRESSING THE STRING.. 13 THE
DATA FOR THIS COMMAND IS THE COLUMN OFF
SET IN PIXELS,. THE ROW
OFFSET IN PIXELS, ZERO PAGE ADDRESS OF
THE ADDRESS. OF THE TEX
T BUFFER TO BE USED BY INPUT AND THE
MAXIMUM. LENGTH OF THE IN
PUT BUFFER. SEE INPUT FOR MORE INFORMAT
ION.. 14 SET THE VECTOR AT $8
4A9-$84AA TO CLOSE THE WINDOW. GENERALLY
. USED WITH COMMAND 13..
15 THE DATA FOR THIS COMMAND I
S THE ADDRESS OF A GRPHIC COMMAND.
TABLE. SEE GRPHIC FOR FURTHER
INFORMATION.. 16 THE DATA FOR
THIS COMMAND IS THE COLUMN OFFSET IN PI
XELS AND. THE ROW OFFSET
IN PIXELS. THIS COMMAND OPENS A SCROL
LING. WINDOW OF FILENAMES.
LOCATIONS $10 AND $16-$17 MUST BE SET
. PRIOR TO CALLING WINDO
W (SEE TABLE FOR MORE INFORMATION)..
THE FILENAMES ARE STORED AT
$8300-$83FF, TO A MAXIMUM OF 15.
FILENAMES. LOCATION $885C WIL
L RETURN THE INDEX OF THE.
SELECTED FILE NAME. IF MORE THAN
6 FILES ARE FOUND, THE.
SUBWINDOW WILL HAVE A CLICK BOX FOR SCRO
LLING THE LIST.. 17 THE DATA
FOR THIS COMMAND IS THE ADDRESS OF THE R
OUTINE FOR. BUTTON PRESSE
D. THIS COMMAND SETS THE VECTOR AT $84A
9-$84AA. TO A USER SPECIFI
ED ROUTINE.. 18 THE DATA FOR
THIS COMMAND IS THE COLUMN OFFSET IN BYT
ES, THE. ROW OFFSET IN
PIXELS AND THE ADDRESS OF A USER'S 8 B
YTE. CLICK BOX DESCRIPTION
, IN THE FOLLOWING FORMAT:.
#BYTES DESCRIPTION.
2 ADDRESS OF
GRAPHIC DATA..
2 NOT USED..
1 WIDTH OF BOX IN BYTES..
1 HEIGHT O
F BOX IN PIXELS..
2 ADDRESS OF ROUTINE TO PROCES
S THIS BOX.. 19 THE DATA FO
R THIS COMMAND IS THE ADDRESS OF
A USER. SUBROUTINE. THIS
COMMAND CALLS THE USER'S SUBROUTINE....
....... GEOS KERNAL ROUTINES
1-62.
.. FUNCTION NAME: WR180.
PURPOSE: WRITE TRACK 18 SECTOR 0 BACK
TO DISK.. CALL ADDRESS: $C24A.
INPUT REQUIREMENTS:.
$8200-$82FF DATA FOR TRACK 18 SECTO
R 0.. OUTPUT:. $0
4 $12, TRACK NUMBER..
$05 $00, SECTOR NUMBER..
$0A-$0B $8200, ADDRESS OF BUFFE
R AREA.. ERRORS: SEE APPENDIX I
... DESCRIPTION: THIS ROUTINE
SETS UP THE POINTERS FOR WRITE, THEN.
CALLS IT TO WRITE THE SECTOR.
THIS IS GENERALLY USED TO UPDATE.
THE BAM ON THE DISK.... FU
NCTION NAME: WRITE. PURPOSE: WR
ITE A GIVEN TRACK AND SECTOR..
CALL ADDRESS: $C1E7. INPUT REQU
IREMENTS:. $04 TRACK
OF SECTOR TO BE WRITTEN..
$05 SECTOR NUMBER TO BE WRITTEN..
$0A-$0B POINTER TO BUFF
ER.. ERRORS: SEE APPENDIX..
DESCRIPTION: LOADS TURBODOS IF IT
IS NOT ALREADY THERE BY CALLING.
DSETUP. THE DESIRED BLOCK IS THEN WRI
TTEN TO THE DISK BY CALLING. WR
ITE2. FINALLY CWRITE IS CALLED TO VERIF
Y THE SECTOR.... FUNCTION NAME:
WRITE2. PURPOSE: WRITE A SECTO
R TO THE DISK.. CALL ADDRESS: $
C220. INPUT REQUIREMENTS:.
$04 TRACK NUMBER..
$05 SECTOR NUMBER..
$0A-$0B POINTER TO DATA BUFFE
R.. PREPARATORY ROUTINES: DSETU
P. ERRORS: SEE APPENDIX I...
DESCRIPTION: THIS ROUTINE IS T
O WRITE, AS READ2 IS TO READ..
DSETUP MUST HAVE BEEN CALLED PRIOR TO
USING THIS ROUTINE.... FUNCTIO
N NAME: ZFILL. PURPOSE: FILLS A
MEMORY REGION WITH ZEROES.. CA
LL ADDRESS: $C178. INPUT REQUIR
EMENTS:. $02-$03 THE LEN
GTH OF THE REGION.. $04-$0
5 THE ADDRESS OF THE REGION...
DESCRIPTION: MEMORY IS FILLED WITH
ZEROES BY STORING A $00 AT. LO
CATION $06 AND CALLING BLKFIL.........
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL