PAGE12-25
FILE INFORMATION
FILENAME(S): PAGE12-25
FILE TYPE(S): SEQ
FILE SIZE: 27.8K
FIRST SEEN: 2025-10-20 14:30:31
APPEARS ON: 1 disk(s)
FILE HASH
ca3427988283c94bee157009e7f5fd3c5a4c2be06f4cd26c52b3a40318122728
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| G PD 30 | PAGE12-25 | SEQ | Treasure Chest - Klaus Der Suhler | 19 | 0 | 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 39 0D 0D 0D 20 20 20 | 1-9... | 00000050: 20 20 20 20 20 20 20 C6 55 4E 43 54 49 4F 4E 20 | .UNCTION | 00000060: CE 41 4D 45 3A 20 C1 C2 D3 31 36 0D 20 20 20 20 |.AME: ...16. | 00000070: 20 20 20 20 20 20 D0 55 52 50 4F 53 45 3A 20 31 | .URPOSE: 1| 00000080: 36 20 42 49 54 20 41 42 53 4F 4C 55 54 45 20 56 |6 BIT ABSOLUTE V| 00000090: 41 4C 55 45 2E 0D 20 20 20 20 20 20 20 20 20 20 |ALUE.. | 000000A0: C3 41 4C 4C 20 41 44 44 52 45 53 53 3A 20 24 C3 |.ALL ADDRESS: $.| 000000B0: 31 36 C6 0D 20 20 20 20 20 20 20 20 20 20 C9 4E |16.. .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 D8 20 20 20 20 20 20 20 20 20 D4 48 45 20 41 | . .HE A| 000000F0: 44 44 52 45 53 53 20 4F 46 20 54 48 45 20 31 36 |DDRESS OF THE 16| 00000100: 20 42 49 54 20 49 4E 54 45 47 45 52 2E 0D 20 20 | BIT INTEGER.. | 00000110: 20 20 20 20 20 20 20 20 CF 55 54 50 55 54 3A 0D | .UTPUT:.| 00000120: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 D8 | .| 00000130: 20 20 20 20 20 20 20 20 20 D4 48 45 20 41 44 44 | .HE ADD| 00000140: 52 45 53 53 20 41 20 50 4F 53 49 54 49 56 45 20 |RESS A POSITIVE | 00000150: 31 36 20 42 49 54 20 49 4E 54 45 47 45 52 2E 0D |16 BIT INTEGER..| 00000160: 0D 20 20 20 20 20 20 20 20 20 20 C4 45 53 43 52 |. .ESCR| 00000170: 49 50 54 49 4F 4E 3A 20 20 D4 48 49 53 20 20 52 |IPTION: .HIS R| 00000180: 4F 55 54 49 4E 45 20 49 53 20 4F 4E 45 20 4F 46 |OUTINE IS ONE OF| 00000190: 20 54 48 45 20 C7 C5 CF D3 20 4D 41 54 48 20 20 | THE .... MATH | 000001A0: 52 4F 55 54 49 4E 45 53 2E 20 20 D8 0D 20 20 20 |ROUTINES. .. | 000001B0: 20 20 20 20 20 20 20 50 4F 49 4E 54 53 20 54 4F | POINTS TO| 000001C0: 20 41 20 31 36 20 42 49 54 20 56 41 4C 55 45 20 | A 16 BIT VALUE | 000001D0: 57 48 49 43 48 20 49 46 20 46 4F 55 4E 44 20 54 |WHICH IF FOUND T| 000001E0: 4F 20 42 45 20 4E 45 47 41 54 49 56 45 2C 20 20 |O BE NEGATIVE, | 000001F0: CE C5 C7 31 36 20 49 53 0D 20 20 20 20 20 20 20 |...16 IS. | 00000200: 20 20 20 43 41 4C 4C 45 44 20 54 4F 20 4D 41 4B | CALLED TO MAK| 00000210: 45 20 49 54 20 50 4F 53 49 54 49 56 45 2E 0D 0D |E IT POSITIVE...| 00000220: 0D 20 20 20 20 20 20 20 20 20 20 C6 55 4E 43 54 |. .UNCT| 00000230: 49 4F 4E 20 CE 41 4D 45 3A 20 C1 CC CC CF C3 0D |ION .AME: ......| 00000240: 20 20 20 20 20 20 20 20 20 20 D0 55 52 50 4F 53 | .URPOS| 00000250: 45 3A 20 C1 4C 4C 4F 43 41 54 45 20 41 20 42 4C |E: .LLOCATE A BL| 00000260: 4F 43 4B 20 4F 4E 20 54 48 45 20 44 49 53 4B 2E |OCK ON THE DISK.| 00000270: 0D 20 20 20 20 20 20 20 20 20 20 C3 41 4C 4C 20 |. .ALL | 00000280: 41 44 44 52 45 53 53 3A 20 24 C3 32 39 32 0D 20 |ADDRESS: $.292. | 00000290: 20 20 20 20 20 20 20 20 20 C9 4E 50 55 54 20 52 | .NPUT R| 000002A0: 45 51 55 49 52 45 4D 45 4E 54 53 3A 0D 20 20 20 |EQUIREMENTS:. | 000002B0: 20 20 20 20 20 20 20 20 20 20 20 20 24 30 38 20 | $08 | 000002C0: 20 20 20 20 20 20 D4 52 41 43 4B 20 54 4F 20 53 | .RACK TO S| 000002D0: 54 41 52 54 20 53 43 41 4E 4E 49 4E 47 20 46 52 |TART SCANNING FR| 000002E0: 4F 4D 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 |OM.. | 000002F0: 20 20 20 24 30 39 20 20 20 20 20 20 20 D3 45 43 | $09 .EC| 00000300: 54 4F 52 20 54 4F 20 53 54 41 52 54 20 53 43 41 |TOR TO START SCA| 00000310: 4E 4E 49 4E 47 20 46 52 4F 4D 2E 0D 20 20 20 20 |NNING FROM.. | 00000320: 20 20 20 20 20 20 20 20 20 20 20 24 38 32 30 30 | $8200| 00000330: 2D 24 38 32 C6 C6 20 D4 52 41 43 4B 20 31 38 20 |-$82.. .RACK 18 | 00000340: 53 45 43 54 4F 52 20 30 2C 20 C2 C1 CD 2E 0D 20 |SECTOR 0, ..... | 00000350: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 38 | $8| 00000360: 34 39 C3 20 20 20 20 20 D3 4B 45 57 20 46 41 43 |49. .KEW FAC| 00000370: 54 4F 52 20 28 44 45 46 41 55 4C 54 20 49 53 20 |TOR (DEFAULT IS | 00000380: 38 29 2E 0D 20 20 20 20 20 20 20 20 20 20 CF 55 |8).. .U| 00000390: 54 50 55 54 3A 0D 20 20 20 20 20 20 20 20 20 20 |TPUT:. | 000003A0: 20 20 20 20 20 24 30 38 20 20 20 20 20 20 20 CE | $08 .| 000003B0: 45 57 20 54 52 41 43 4B 20 4E 55 4D 42 45 52 2E |EW TRACK NUMBER.| 000003C0: 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. | 000003D0: 24 30 39 20 20 20 20 20 20 20 CE 45 57 20 53 45 |$09 .EW SE| 000003E0: 43 54 4F 52 20 4E 55 4D 42 45 52 2E 0D 20 20 20 |CTOR NUMBER.. | 000003F0: 20 20 20 20 20 20 20 C5 52 52 4F 52 53 3A 20 D3 | .RRORS: .| 00000400: 45 45 20 41 50 50 45 4E 44 49 58 20 C9 2E 0D 0D |EE APPENDIX ....| 00000410: 20 20 20 20 20 20 20 20 20 20 C4 45 53 43 52 49 | .ESCRI| 00000420: 50 54 49 4F 4E 3A 20 20 D4 48 49 53 20 20 52 4F |PTION: .HIS RO| 00000430: 55 54 49 4E 45 20 20 45 58 50 45 43 54 53 20 54 |UTINE EXPECTS T| 00000440: 48 41 54 20 54 48 45 20 C2 C1 CD 20 49 53 20 20 |HAT THE ... IS | 00000450: 41 4C 52 45 41 44 59 20 20 49 4E 0D 20 20 20 20 |ALREADY IN. | 00000460: 20 20 20 20 20 20 4D 45 4D 4F 52 59 2E 20 20 C9 | MEMORY. .| 00000470: 54 20 20 53 43 41 4E 53 20 20 54 48 45 20 20 C2 |T SCANS THE .| 00000480: C1 CD 20 53 54 41 52 54 49 4E 47 20 41 54 20 20 |.. STARTING AT | 00000490: 41 20 20 53 50 45 43 49 46 49 45 44 20 20 4C 4F |A SPECIFIED LO| 000004A0: 43 41 54 49 4F 4E 2C 0D 20 20 20 20 20 20 20 20 |CATION,. | 000004B0: 20 20 4C 4F 4F 4B 49 4E 47 20 20 46 4F 52 20 20 | LOOKING FOR | 000004C0: 41 20 20 46 52 45 45 20 53 45 43 54 4F 52 2E 20 |A FREE SECTOR. | 000004D0: 20 C9 46 20 4F 4E 45 20 49 53 20 46 4F 55 4E 44 | .F ONE IS FOUND| 000004E0: 20 20 49 54 20 20 49 53 20 20 52 45 54 55 52 4E | IT IS RETURN| 000004F0: 45 44 2C 0D 20 20 20 20 20 20 20 20 20 20 4F 54 |ED,. OT| 00000500: 48 45 52 57 49 53 45 20 41 4E 20 45 52 52 4F 52 |HERWISE AN ERROR| 00000510: 20 52 45 53 55 4C 54 53 2E 20 20 20 D4 48 45 20 | RESULTS. .HE | 00000520: 53 45 43 54 4F 52 20 49 53 20 41 4C 4C 4F 43 41 |SECTOR IS ALLOCA| 00000530: 54 45 44 20 49 4E 20 54 48 45 20 C2 C1 CD 2C 0D |TED IN THE ...,.| 00000540: 20 20 20 20 20 20 20 20 20 20 41 4E 44 20 54 48 | AND TH| 00000550: 45 20 C2 C1 CD 20 4D 55 53 54 20 42 45 20 55 50 |E ... MUST BE UP| 00000560: 44 41 54 45 44 20 54 4F 20 44 49 53 4B 20 20 41 |DATED TO DISK A| 00000570: 46 54 45 52 57 41 52 44 53 20 49 4E 20 20 4F 52 |FTERWARDS IN OR| 00000580: 44 45 52 20 46 4F 52 20 54 48 45 0D 20 20 20 20 |DER FOR THE. | 00000590: 20 20 20 20 20 20 53 45 43 54 4F 52 20 54 4F 20 | SECTOR TO | 000005A0: 52 45 4D 41 49 4E 20 41 4C 4C 4F 43 41 54 45 44 |REMAIN ALLOCATED| 000005B0: 2E 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 C6 55 |.... .U| 000005C0: 4E 43 54 49 4F 4E 20 CE 41 4D 45 3A 20 C1 D0 D0 |NCTION .AME: ...| 000005D0: C5 CE C4 0D 20 20 20 20 20 20 20 20 20 20 D0 55 |.... .U| 000005E0: 52 50 4F 53 45 3A 20 C1 50 50 45 4E 44 20 41 20 |RPOSE: .PPEND A | 000005F0: 4E 45 57 20 43 48 41 49 4E 20 49 4E 20 41 20 D6 |NEW CHAIN IN A .| 00000600: CC C9 D2 20 46 49 4C 45 2E 0D 20 20 20 20 20 20 |... FILE.. | 00000610: 20 20 20 20 C3 41 4C 4C 20 41 44 44 52 45 53 53 | .ALL ADDRESS| 00000620: 3A 20 24 C3 32 38 39 0D 20 20 20 20 20 20 20 20 |: $.289. | 00000630: 20 20 C9 4E 50 55 54 20 52 45 51 55 49 52 45 4D | .NPUT REQUIREM| 00000640: 45 4E 54 53 3A 0D 20 20 20 20 20 20 20 20 20 20 |ENTS:. | 00000650: 20 20 20 20 20 24 38 34 39 36 20 20 20 20 20 C3 | $8496 .| 00000660: 55 52 52 45 4E 54 20 43 48 41 49 4E 20 4E 55 4D |URRENT CHAIN NUM| 00000670: 42 45 52 2E 0D 20 20 20 20 20 20 20 20 20 20 CF |BER.. .| 00000680: 55 54 50 55 54 3A 0D 20 20 20 20 20 20 20 20 20 |UTPUT:. | 00000690: 20 20 20 20 20 20 24 38 34 39 36 20 20 20 20 20 | $8496 | 000006A0: C9 4E 43 52 45 4D 45 4E 54 45 44 20 42 59 20 31 |.NCREMENTED BY 1| 000006B0: 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. | 000006C0: 20 24 38 34 39 37 20 20 20 20 20 C9 4E 43 52 45 | $8497 .NCRE| 000006D0: 4D 45 4E 54 45 44 20 42 59 20 31 2E 0D 20 20 20 |MENTED BY 1.. | 000006E0: 20 20 20 20 20 20 20 D0 52 45 50 41 52 41 54 4F | .REPARATO| 000006F0: 52 59 20 52 4F 55 54 49 4E 45 53 3A 20 D6 CF D0 |RY ROUTINES: ...| 00000700: C5 CE 0D 20 20 20 20 20 20 20 20 20 20 C5 52 52 |... .RR| 00000710: 4F 52 53 3A 20 D3 45 45 20 41 50 50 45 4E 44 49 |ORS: .EE APPENDI| 00000720: 58 20 C9 2E 0D 0D 20 20 20 20 20 20 20 20 20 20 |X .... | 00000730: C4 45 53 43 52 49 50 54 49 4F 4E 3A 20 20 C1 20 |.ESCRIPTION: . | 00000740: 20 48 4F 4C 45 20 49 53 20 4F 50 45 4E 45 44 20 | HOLE IS OPENED | 00000750: 55 50 20 49 4E 20 54 48 45 20 D6 CC C9 D2 20 53 |UP IN THE .... S| 00000760: 45 43 54 4F 52 20 49 4D 4D 45 44 49 41 54 45 4C |ECTOR IMMEDIATEL| 00000770: 59 0D 20 20 20 20 20 20 20 20 20 20 46 4F 4C 4C |Y. FOLL| 00000780: 4F 57 49 4E 47 20 20 54 48 45 20 43 55 52 52 45 |OWING THE CURRE| 00000790: 4E 54 20 43 48 41 49 4E 2E 20 20 D4 48 45 20 48 |NT CHAIN. .HE H| 000007A0: 4F 4C 45 20 49 53 20 46 49 4C 4C 45 44 20 20 57 |OLE IS FILLED W| 000007B0: 49 54 48 20 20 24 30 30 2C 24 C6 C6 2E 0D 20 20 |ITH $00,$.... | 000007C0: 20 20 20 20 20 20 20 20 D4 48 49 53 20 20 52 45 | .HIS RE| 000007D0: 50 52 45 53 45 4E 54 53 20 20 41 20 20 4E 55 4C |PRESENTS A NUL| 000007E0: 4C 20 43 48 41 49 4E 2E 20 20 D4 48 49 53 20 48 |L CHAIN. .HIS H| 000007F0: 4F 4C 45 20 42 45 43 4F 4D 45 53 20 20 54 48 45 |OLE BECOMES THE| 00000800: 20 20 43 55 52 52 45 4E 54 0D 20 20 20 20 20 20 | CURRENT. | 00000810: 20 20 20 20 43 48 41 49 4E 2E 0D 0D 0D 0D 0D 0D | CHAIN.......| 00000820: 0D 0D 0D 0D 0D 0D 0D 0D 0D 20 20 20 20 20 20 20 |......... | 00000830: 20 20 20 C7 C5 CF D3 20 CB 45 52 4E 41 4C 20 D2 | .... .ERNAL .| 00000840: 4F 55 54 49 4E 45 53 20 20 20 20 20 20 20 20 20 |OUTINES | 00000850: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000860: 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2D 31 | 1-1| 00000870: 30 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 C6 55 |0... .U| 00000880: 4E 43 54 49 4F 4E 20 CE 41 4D 45 3A 20 C2 C1 D3 |NCTION .AME: ...| 00000890: C9 C3 0D 20 20 20 20 20 20 20 20 20 20 D0 55 52 |... .UR| 000008A0: 50 4F 53 45 3A 20 D2 45 53 54 41 52 54 20 C2 C1 |POSE: .ESTART ..| 000008B0: D3 C9 C3 20 57 49 54 48 20 4F 50 54 49 4F 4E 41 |... WITH OPTIONA| 000008C0: 4C 20 50 52 4F 47 52 41 4D 20 4C 4F 41 44 2E 0D |L PROGRAM LOAD..| 000008D0: 20 20 20 20 20 20 20 20 20 20 C3 41 4C 4C 20 41 | .ALL A| 000008E0: 44 44 52 45 53 53 3A 20 24 C3 32 34 31 0D 20 20 |DDRESS: $.241. | 000008F0: 20 20 20 20 20 20 20 20 C9 4E 50 55 54 20 52 45 | .NPUT RE| 00000900: 51 55 49 52 45 4D 45 4E 54 53 3A 0D 20 20 20 20 |QUIREMENTS:. | 00000910: 20 20 20 20 20 20 20 20 20 20 20 24 30 32 2D 24 | $02-$| 00000920: 30 33 20 20 20 D0 4F 49 4E 54 45 52 20 54 4F 20 |03 .OINTER TO | 00000930: 34 30 20 43 48 41 52 41 43 54 45 52 53 20 4F 46 |40 CHARACTERS OF| 00000940: 20 54 45 58 54 2E 0D 20 20 20 20 20 20 20 20 20 | TEXT.. | 00000950: 20 20 20 20 20 20 24 30 C3 2D 24 30 C4 20 20 20 | $0.-$0. | 00000960: D0 4F 49 4E 54 45 52 20 54 4F 20 46 49 4C 45 27 |.OINTER TO FILE'| 00000970: 53 20 44 49 52 45 43 54 4F 52 59 20 45 4E 54 52 |S DIRECTORY ENTR| 00000980: 59 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 |Y.. | 00000990: 20 20 24 31 30 2D 24 31 31 20 20 20 CC 4F 41 44 | $10-$11 .OAD| 000009A0: 20 41 44 44 52 45 53 53 2E 0D 20 20 20 20 20 20 | ADDRESS.. | 000009B0: 20 20 20 20 D0 52 45 50 41 52 41 54 4F 52 59 20 | .REPARATORY | 000009C0: 52 4F 55 54 49 4E 45 53 3A 20 CC CF CF CB D5 D0 |ROUTINES: ......| 000009D0: 0D 0D 20 20 20 20 20 20 20 20 20 20 C4 45 53 43 |.. .ESC| 000009E0: 52 49 50 54 49 4F 4E 3A 20 D4 48 45 20 34 30 20 |RIPTION: .HE 40 | 000009F0: 43 48 41 52 41 43 54 45 52 53 20 50 4F 49 4E 54 |CHARACTERS POINT| 00000A00: 45 44 20 54 4F 20 42 59 20 24 30 32 2D 24 30 33 |ED TO BY $02-$03| 00000A10: 20 41 52 45 20 53 41 56 45 44 20 49 4E 0D 20 20 | ARE SAVED IN. | 00000A20: 20 20 20 20 20 20 20 20 41 20 42 55 46 46 45 52 | A BUFFER| 00000A30: 2E 20 20 C9 46 20 24 30 C3 2D 24 30 C4 20 49 53 |. .F $0.-$0. IS| 00000A40: 20 4E 4F 4E 2D 5A 45 52 4F 2C 20 54 48 45 20 46 | NON-ZERO, THE F| 00000A50: 49 4C 45 20 49 53 20 4C 4F 41 44 45 44 20 49 4E |ILE IS LOADED IN| 00000A60: 54 4F 20 4D 45 4D 4F 52 59 0D 20 20 20 20 20 20 |TO MEMORY. | 00000A70: 20 20 20 20 41 54 20 20 54 48 45 20 41 44 44 52 | AT THE ADDR| 00000A80: 45 53 53 20 53 50 45 43 49 46 49 45 44 20 42 59 |ESS SPECIFIED BY| 00000A90: 20 24 31 30 2D 24 31 31 2E 20 20 C2 C1 D3 C9 C3 | $10-$11. .....| 00000AA0: 20 49 53 20 52 45 53 54 41 52 54 45 44 20 57 49 | IS RESTARTED WI| 00000AB0: 54 48 20 41 4E 0D 20 20 20 20 20 20 20 20 20 20 |TH AN. | 00000AC0: 49 4E 54 45 52 52 55 50 54 20 56 45 43 54 4F 52 |INTERRUPT VECTOR| 00000AD0: 2E 20 D4 48 49 53 20 49 4E 54 45 52 52 55 50 54 |. .HIS INTERRUPT| 00000AE0: 20 49 53 20 53 45 54 20 55 50 20 54 4F 20 47 49 | IS SET UP TO GI| 00000AF0: 56 45 20 C2 C1 D3 C9 C3 20 41 20 43 48 41 4E 43 |VE ..... A CHANC| 00000B00: 45 0D 20 20 20 20 20 20 20 20 20 20 54 4F 20 53 |E. TO S| 00000B10: 54 41 52 54 20 55 50 2E 20 C1 46 54 45 52 20 54 |TART UP. .FTER T| 00000B20: 48 45 20 54 49 4D 45 20 48 41 53 20 45 4C 41 50 |HE TIME HAS ELAP| 00000B30: 53 45 44 2C 20 54 48 45 20 34 30 20 43 48 41 52 |SED, THE 40 CHAR| 00000B40: 41 43 54 45 52 53 20 49 4E 20 54 48 45 0D 20 20 |ACTERS IN THE. | 00000B50: 20 20 20 20 20 20 20 20 42 55 46 46 45 52 20 20 | BUFFER | 00000B60: 41 52 45 20 20 43 4F 50 49 45 44 20 20 54 4F 20 |ARE COPIED TO | 00000B70: 20 54 48 45 20 53 43 52 45 45 4E 20 41 4E 44 20 | THE SCREEN AND | 00000B80: 41 20 C3 D2 20 20 49 53 20 20 50 4C 41 43 45 44 |A .. IS PLACED| 00000B90: 20 20 49 4E 20 20 54 48 45 0D 20 20 20 20 20 20 | IN THE. | 00000BA0: 20 20 20 20 4B 45 59 42 4F 41 52 44 20 42 55 46 | KEYBOARD BUF| 00000BB0: 46 45 52 2E 20 20 D4 48 45 20 49 4E 54 45 52 52 |FER. .HE INTERR| 00000BC0: 55 50 54 20 56 45 43 54 4F 52 20 49 53 20 54 48 |UPT VECTOR IS TH| 00000BD0: 45 4E 20 52 45 4D 4F 56 45 44 2C 20 20 42 55 54 |EN REMOVED, BUT| 00000BE0: 20 20 54 48 45 0D 20 20 20 20 20 20 20 20 20 20 | THE. | 00000BF0: CE CD C9 20 56 45 43 54 4F 52 20 49 53 20 53 45 |... VECTOR IS SE| 00000C00: 54 20 55 50 20 54 4F 20 52 45 42 4F 4F 54 20 C7 |T UP TO REBOOT .| 00000C10: C5 CF D3 2E 20 D4 48 45 20 52 45 42 4F 4F 54 20 |.... .HE REBOOT | 00000C20: 43 4F 44 45 20 49 53 20 41 54 20 24 C3 30 30 30 |CODE IS AT $.000| 00000C30: 2D 0D 20 20 20 20 20 20 20 20 20 20 24 C3 30 33 |-. $.03| 00000C40: 37 2E 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 C6 |7.... .| 00000C50: 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 3A 20 C2 CC |UNCTION .AME: ..| 00000C60: CB C3 CD D0 0D 20 20 20 20 20 20 20 20 20 20 D0 |..... .| 00000C70: 55 52 50 4F 53 45 3A 20 C3 4F 4D 50 41 52 45 53 |URPOSE: .OMPARES| 00000C80: 20 54 57 4F 20 42 4C 4F 43 4B 53 20 4F 46 20 4D | TWO BLOCKS OF M| 00000C90: 45 4D 4F 52 59 20 46 4F 52 20 41 20 46 49 58 45 |EMORY FOR A FIXE| 00000CA0: 44 20 4C 45 4E 47 54 48 2E 0D 20 20 20 20 20 20 |D LENGTH.. | 00000CB0: 20 20 20 20 C3 41 4C 4C 20 41 44 44 52 45 53 53 | .ALL ADDRESS| 00000CC0: 3A 20 24 C3 32 36 C5 0D 20 20 20 20 20 20 20 20 |: $.26.. | 00000CD0: 20 20 C9 4E 50 55 54 20 52 45 51 55 49 52 45 4D | .NPUT REQUIREM| 00000CE0: 45 4E 54 53 3A 0D 20 20 20 20 20 20 20 20 20 20 |ENTS:. | 00000CF0: 20 20 20 20 20 C1 20 20 20 20 20 20 20 20 20 C2 | . .| 00000D00: 59 54 45 20 43 4F 55 4E 54 2E 0D 20 20 20 20 20 |YTE COUNT.. | 00000D10: 20 20 20 20 20 20 20 20 20 20 D8 20 20 20 20 20 | . | 00000D20: 20 20 20 20 C1 44 44 52 45 53 53 20 4F 46 20 5A | .DDRESS OF Z| 00000D30: 45 52 4F 20 50 41 47 45 20 53 4F 55 52 43 45 20 |ERO PAGE SOURCE | 00000D40: 50 4F 49 4E 54 45 52 2E 0D 20 20 20 20 20 20 20 |POINTER.. | 00000D50: 20 20 20 20 20 20 20 20 D9 20 20 20 20 20 20 20 | . | 00000D60: 20 20 C1 44 44 52 45 53 53 20 4F 46 20 5A 45 52 | .DDRESS OF ZER| 00000D70: 4F 20 50 41 47 45 20 44 45 53 54 49 4E 41 54 49 |O PAGE DESTINATI| 00000D80: 4F 4E 20 50 4F 49 4E 54 45 52 2E 0D 20 20 20 20 |ON POINTER.. | 00000D90: 20 20 20 20 20 20 CF 55 54 50 55 54 3A 0D 20 20 | .UTPUT:. | 00000DA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 DA 20 46 | . F| 00000DB0: 4C 41 47 20 20 20 20 D3 45 54 20 41 43 43 4F 52 |LAG .ET ACCOR| 00000DC0: 44 49 4E 47 4C 59 2E 0D 0D 20 20 20 20 20 20 20 |DINGLY... | 00000DD0: 20 20 20 C4 45 53 43 52 49 50 54 49 4F 4E 3A 20 | .ESCRIPTION: | 00000DE0: D4 48 45 20 D8 20 41 4E 44 20 D9 20 52 45 47 49 |.HE . AND . REGI| 00000DF0: 53 54 45 52 53 20 50 4F 49 4E 54 20 54 4F 20 5A |STERS POINT TO Z| 00000E00: 45 52 4F 20 50 41 47 45 20 50 4F 49 4E 54 45 52 |ERO PAGE POINTER| 00000E10: 53 2E 20 C1 0D 20 20 20 20 20 20 20 20 20 20 48 |S. .. H| 00000E20: 41 53 20 20 54 48 45 20 20 4E 55 4D 42 45 52 20 |AS THE NUMBER | 00000E30: 4F 46 20 42 59 54 45 53 20 54 4F 20 42 45 20 43 |OF BYTES TO BE C| 00000E40: 4F 4D 50 41 52 45 44 20 28 31 2D 32 35 35 29 2E |OMPARED (1-255).| 00000E50: 20 20 C9 46 20 C1 20 49 53 20 20 5A 45 52 4F 2C | .F . IS ZERO,| 00000E60: 0D 20 20 20 20 20 20 20 20 20 20 54 48 49 53 20 |. THIS | 00000E70: 52 4F 55 54 49 4E 45 20 57 49 4C 4C 20 43 4F 4D |ROUTINE WILL COM| 00000E80: 50 41 52 45 20 55 50 20 54 4F 20 41 4E 44 20 49 |PARE UP TO AND I| 00000E90: 4E 43 4C 55 44 49 4E 47 20 41 20 5A 45 52 4F 20 |NCLUDING A ZERO | 00000EA0: 42 59 54 45 2E 20 20 D4 48 45 20 DA 0D 20 20 20 |BYTE. .HE .. | 00000EB0: 20 20 20 20 20 20 20 46 4C 41 47 20 49 53 20 53 | FLAG IS S| 00000EC0: 45 54 20 41 43 43 4F 52 44 49 4E 47 4C 59 2E 20 |ET ACCORDINGLY. | 00000ED0: D3 45 45 20 D3 D4 D2 C3 CD D0 2E 0D 0D 0D 20 20 |.EE .......... | 00000EE0: 20 20 20 20 20 20 20 20 C6 55 4E 43 54 49 4F 4E | .UNCTION| 00000EF0: 20 CE 41 4D 45 3A 20 C2 CC CB C6 C9 CC 0D 20 20 | .AME: ....... | 00000F00: 20 20 20 20 20 20 20 20 D0 55 52 50 4F 53 45 3A | .URPOSE:| 00000F10: 20 C6 49 4C 4C 53 20 41 20 4D 45 4D 4F 52 59 20 | .ILLS A MEMORY | 00000F20: 52 45 47 49 4F 4E 20 57 49 54 48 20 41 20 53 50 |REGION WITH A SP| 00000F30: 45 43 49 46 49 45 44 20 42 59 54 45 2E 0D 20 20 |ECIFIED BYTE.. | 00000F40: 20 20 20 20 20 20 20 20 C3 41 4C 4C 20 41 44 44 | .ALL ADD| 00000F50: 52 45 53 53 3A 20 24 C3 31 37 C2 0D 20 20 20 20 |RESS: $.17.. | 00000F60: 20 20 20 20 20 20 C9 4E 50 55 54 20 52 45 51 55 | .NPUT REQU| 00000F70: 49 52 45 4D 45 4E 54 53 3A 0D 20 20 20 20 20 20 |IREMENTS:. | 00000F80: 20 20 20 20 20 20 20 20 20 24 30 32 2D 24 30 33 | $02-$03| 00000F90: 20 20 20 D4 48 45 20 4C 45 4E 47 54 48 20 4F 46 | .HE LENGTH OF| 00000FA0: 20 54 48 45 20 52 45 47 49 4F 4E 2E 0D 20 20 20 | THE REGION.. | 00000FB0: 20 20 20 20 20 20 20 20 20 20 20 20 24 30 34 2D | $04-| 00000FC0: 24 30 35 20 20 20 D4 48 45 20 41 44 44 52 45 53 |$05 .HE ADDRES| 00000FD0: 53 20 4F 46 20 54 48 45 20 52 45 47 49 4F 4E 2E |S OF THE REGION.| 00000FE0: 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. | 00000FF0: 24 30 36 20 20 20 20 20 20 20 D4 48 45 20 42 59 |$06 .HE BY| 00001000: 54 45 20 54 4F 20 46 49 4C 4C 20 54 48 45 20 52 |TE TO FILL THE R| 00001010: 45 47 49 4F 4E 20 57 49 54 48 2E 0D 0D 20 20 20 |EGION WITH... | 00001020: 20 20 20 20 20 20 20 C4 45 53 43 52 49 50 54 49 | .ESCRIPTI| 00001030: 4F 4E 3A 20 C1 20 53 49 4D 50 4C 45 20 4C 4F 4F |ON: . SIMPLE LOO| 00001040: 50 20 46 49 4C 4C 53 20 4D 45 4D 4F 52 59 20 57 |P FILLS MEMORY W| 00001050: 49 54 48 20 54 48 45 20 53 50 45 43 49 46 49 45 |ITH THE SPECIFIE| 00001060: 44 20 42 59 54 45 2E 0D 0D 0D 0D 0D 0D 0D 0D 0D |D BYTE..........| 00001070: 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 20 20 20 20 20 20 |.......... | 00001080: 20 20 20 20 C7 C5 CF D3 20 CB 45 52 4E 41 4C 20 | .... .ERNAL | 00001090: D2 4F 55 54 49 4E 45 53 20 20 20 20 20 20 20 20 |.OUTINES | 000010A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000010B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2D | 1-| 000010C0: 31 31 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 C6 |11... .| 000010D0: 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 3A 20 C2 CC |UNCTION .AME: ..| 000010E0: CB C6 CC 32 0D 20 20 20 20 20 20 20 20 20 20 D0 |...2. .| 000010F0: 55 52 50 4F 53 45 3A 20 C9 44 45 4E 54 49 43 41 |URPOSE: .DENTICA| 00001100: 4C 20 54 4F 20 C2 CC CB C6 C9 CC 2C 20 42 55 54 |L TO ......, BUT| 00001110: 20 57 49 54 48 20 49 4E 4C 49 4E 45 20 44 41 54 | WITH INLINE DAT| 00001120: 41 2E 0D 20 20 20 20 20 20 20 20 20 20 C3 41 4C |A.. .AL| 00001130: 4C 20 41 44 44 52 45 53 53 3A 20 24 C3 31 C2 34 |L ADDRESS: $.1.4| 00001140: 0D 0D 20 20 20 20 20 20 20 20 20 20 C4 45 53 43 |.. .ESC| 00001150: 52 49 50 54 49 4F 4E 3A 20 20 20 D4 48 49 53 20 |RIPTION: .HIS | 00001160: 20 52 4F 55 54 49 4E 45 20 20 54 41 4B 45 53 20 | ROUTINE TAKES | 00001170: 20 54 48 45 20 20 49 4E 4C 49 4E 45 20 20 44 41 | THE INLINE DA| 00001180: 54 41 20 20 41 4E 44 20 20 53 45 54 53 0D 20 20 |TA AND SETS. | 00001190: 20 20 20 20 20 20 20 20 45 56 45 52 59 54 48 49 | EVERYTHI| 000011A0: 4E 47 20 55 50 20 42 45 46 4F 52 45 20 43 41 4C |NG UP BEFORE CAL| 000011B0: 4C 49 4E 47 20 C2 CC CB C6 C9 CC 2E 20 C6 4F 52 |LING ....... .OR| 000011C0: 20 45 58 41 4D 50 4C 45 3A 0D 20 20 20 20 20 20 | EXAMPLE:. | 000011D0: 20 20 20 20 20 20 20 20 20 20 CA D3 D2 20 C2 CC | ... ..| 000011E0: CB C6 CC 32 0D 20 20 20 20 20 20 20 20 20 20 20 |...2. | 000011F0: 20 20 20 20 2E D7 CF D2 C4 20 CC 45 4E 47 54 48 | ..... .ENGTH| 00001200: 20 4F 46 20 52 45 47 49 4F 4E 0D 20 20 20 20 20 | OF REGION. | 00001210: 20 20 20 20 20 20 20 20 20 20 2E D7 CF D2 C4 20 | ..... | 00001220: C1 44 44 52 45 53 53 20 4F 46 20 52 45 47 49 4F |.DDRESS OF REGIO| 00001230: 4E 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |N. | 00001240: 20 2E C2 D9 D4 C5 20 C2 59 54 45 20 54 4F 20 46 | ..... .YTE TO F| 00001250: 49 4C 4C 20 4D 45 4D 4F 52 59 20 57 49 54 48 0D |ILL MEMORY WITH.| 00001260: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 C3 | .| 00001270: 4F 4E 54 52 4F 4C 20 52 45 54 55 52 4E 53 20 48 |ONTROL RETURNS H| 00001280: 45 52 45 20 55 50 4F 4E 20 43 4F 4D 50 4C 45 54 |ERE UPON COMPLET| 00001290: 49 4F 4E 2E 0D 0D 0D 20 20 20 20 20 20 20 20 20 |ION.... | 000012A0: 20 C6 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 3A 20 | .UNCTION .AME: | 000012B0: C2 CC CB CD CF D6 0D 20 20 20 20 20 20 20 20 20 |....... | 000012C0: 20 D0 55 52 50 4F 53 45 3A 20 C3 4F 50 59 20 41 | .URPOSE: .OPY A| 000012D0: 20 42 4C 4F 43 4B 20 4F 46 20 4D 45 4D 4F 52 59 | BLOCK OF MEMORY| 000012E0: 2E 0D 20 20 20 20 20 20 20 20 20 20 C3 41 4C 4C |.. .ALL| 000012F0: 20 41 44 44 52 45 53 53 3A 20 24 C3 32 36 38 0D | ADDRESS: $.268.| 00001300: 20 20 20 20 20 20 20 20 20 20 C9 4E 50 55 54 20 | .NPUT | 00001310: 52 45 51 55 49 52 45 4D 45 4E 54 53 3A 0D 20 20 |REQUIREMENTS:. | 00001320: 20 20 20 20 20 20 20 20 20 20 20 20 20 C1 20 20 | . | 00001330: 20 20 20 20 20 20 20 C2 59 54 45 20 43 4F 55 4E | .YTE COUN| 00001340: 54 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 |T.. | 00001350: 20 20 D8 20 20 20 20 20 20 20 20 20 C1 44 44 52 | . .DDR| 00001360: 45 53 53 20 4F 46 20 5A 45 52 4F 20 50 41 47 45 |ESS OF ZERO PAGE| 00001370: 20 53 4F 55 52 43 45 20 50 4F 49 4E 54 45 52 2E | SOURCE POINTER.| 00001380: 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. | 00001390: D9 20 20 20 20 20 20 20 20 20 C1 44 44 52 45 53 |. .DDRES| 000013A0: 53 20 4F 46 20 5A 45 52 4F 20 50 41 47 45 20 44 |S OF ZERO PAGE D| 000013B0: 45 53 54 49 4E 41 54 49 4F 4E 20 50 4F 49 4E 54 |ESTINATION POINT| 000013C0: 45 52 2E 0D 0D 20 20 20 20 20 20 20 20 20 20 C4 |ER... .| 000013D0: 45 53 43 52 49 50 54 49 4F 4E 3A 20 20 D4 48 45 |ESCRIPTION: .HE| 000013E0: 20 20 D8 20 41 4E 44 20 D9 20 52 45 47 49 53 54 | . AND . REGIST| 000013F0: 45 52 53 20 50 4F 49 4E 54 20 54 4F 20 5A 45 52 |ERS POINT TO ZER| 00001400: 4F 20 50 41 47 45 20 50 4F 49 4E 54 45 52 53 2E |O PAGE POINTERS.| 00001410: 0D 20 20 20 20 20 20 20 20 20 20 C1 20 20 48 41 |. . HA| 00001420: 53 20 20 54 48 45 20 4E 55 4D 42 45 52 20 4F 46 |S THE NUMBER OF| 00001430: 20 42 59 54 45 53 20 54 4F 20 42 45 20 54 52 41 | BYTES TO BE TRA| 00001440: 4E 53 46 45 52 52 45 44 20 28 31 2D 32 35 35 29 |NSFERRED (1-255)| 00001450: 2E 20 20 C9 46 20 20 C1 20 20 49 53 0D 20 20 20 |. .F . IS. | 00001460: 20 20 20 20 20 20 20 5A 45 52 4F 2C 20 54 48 49 | ZERO, THI| 00001470: 53 20 52 4F 55 54 49 4E 45 20 57 49 4C 4C 20 43 |S ROUTINE WILL C| 00001480: 4F 50 59 20 55 50 20 54 4F 20 41 4E 44 20 49 4E |OPY UP TO AND IN| 00001490: 43 4C 55 44 49 4E 47 20 41 20 5A 45 52 4F 20 42 |CLUDING A ZERO B| 000014A0: 59 54 45 2E 20 D3 45 45 0D 20 20 20 20 20 20 20 |YTE. .EE. | 000014B0: 20 20 20 D3 D4 D2 C3 D0 D9 2E 0D 0D 0D 20 20 20 | .......... | 000014C0: 20 20 20 20 20 20 20 C6 55 4E 43 54 49 4F 4E 20 | .UNCTION | 000014D0: CE 41 4D 45 3A 20 C2 CC CB D3 C5 D4 0D 20 20 20 |.AME: ....... | 000014E0: 20 20 20 20 20 20 20 D0 55 52 50 4F 53 45 3A 20 | .URPOSE: | 000014F0: D5 53 45 53 20 41 20 54 41 42 4C 45 20 54 4F 20 |.SES A TABLE TO | 00001500: 53 45 54 20 56 41 52 49 4F 55 53 20 4D 45 4D 4F |SET VARIOUS MEMO| 00001510: 52 59 20 4C 4F 43 41 54 49 4F 4E 53 20 49 4E 20 |RY LOCATIONS IN | 00001520: 41 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |A. | 00001530: 20 20 20 20 20 55 4E 49 46 4F 52 4D 20 4D 41 4E | UNIFORM MAN| 00001540: 4E 45 52 2E 0D 20 20 20 20 20 20 20 20 20 20 C3 |NER.. .| 00001550: 41 4C 4C 20 41 44 44 52 45 53 53 3A 20 24 C3 31 |ALL ADDRESS: $.1| 00001560: 38 31 0D 20 20 20 20 20 20 20 20 20 20 C9 4E 50 |81. .NP| 00001570: 55 54 20 52 45 51 55 49 52 45 4D 45 4E 54 53 3A |UT REQUIREMENTS:| 00001580: 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. | 00001590: 24 30 32 2D 24 30 33 20 20 20 C1 44 44 52 45 53 |$02-$03 .DDRES| 000015A0: 53 20 4F 46 20 41 20 44 41 54 41 20 54 41 42 4C |S OF A DATA TABL| 000015B0: 45 2E 0D 0D 20 20 20 20 20 20 20 20 20 20 C4 45 |E... .E| 000015C0: 53 43 52 49 50 54 49 4F 4E 3A 20 20 D4 48 49 53 |SCRIPTION: .HIS| 000015D0: 20 20 52 4F 55 54 49 4E 45 20 20 41 4C 4C 4F 57 | ROUTINE ALLOW| 000015E0: 53 20 4D 41 4E 59 20 4D 45 4D 4F 52 59 20 4C 4F |S MANY MEMORY LO| 000015F0: 43 41 54 49 4F 4E 53 20 20 54 4F 20 20 42 45 0D |CATIONS TO BE.| 00001600: 20 20 20 20 20 20 20 20 20 20 53 50 45 43 49 46 | SPECIF| 00001610: 49 45 44 20 20 41 4E 44 20 53 45 54 20 49 4E 20 |IED AND SET IN | 00001620: 41 4E 20 4F 52 44 45 52 4C 59 20 4D 41 4E 4E 45 |AN ORDERLY MANNE| 00001630: 52 2E 20 20 D4 48 45 20 46 4F 52 4D 41 54 20 4F |R. .HE FORMAT O| 00001640: 46 20 54 48 45 20 20 44 41 54 41 0D 20 20 20 20 |F THE DATA. | 00001650: 20 20 20 20 20 20 54 41 42 4C 45 20 49 53 20 41 | TABLE IS A| 00001660: 53 20 46 4F 4C 4C 4F 57 53 3A 0D 20 20 20 20 20 |S FOLLOWS:. | 00001670: 20 20 20 20 20 20 20 20 20 20 23 42 59 54 45 53 | #BYTES| 00001680: 20 20 20 20 C4 45 53 43 52 49 50 54 49 4F 4E 0D | .ESCRIPTION.| 00001690: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000016A0: 20 20 32 20 20 20 20 20 20 C1 44 44 52 45 53 53 | 2 .DDRESS| 000016B0: 20 54 4F 20 53 54 4F 52 45 20 56 41 4C 55 45 53 | TO STORE VALUES| 000016C0: 20 41 54 2E 0D 20 20 20 20 20 20 20 20 20 20 20 | AT.. | 000016D0: 20 20 20 20 20 20 20 31 20 20 20 20 20 20 23 20 | 1 # | 000016E0: 4F 46 20 56 41 4C 55 45 53 20 54 48 41 54 20 46 |OF VALUES THAT F| 000016F0: 4F 4C 4C 4F 57 2E 0D 20 20 20 20 20 20 20 20 20 |OLLOW.. | 00001700: 20 20 20 20 20 20 20 20 20 3F 20 20 20 20 20 20 | ? | 00001710: D6 41 4C 55 45 53 20 54 4F 20 42 45 20 53 54 4F |.ALUES TO BE STO| 00001720: 52 45 44 20 41 54 20 54 48 45 20 44 45 53 49 47 |RED AT THE DESIG| 00001730: 4E 41 54 45 44 20 4D 45 4D 4F 52 59 0D 20 20 20 |NATED MEMORY. | 00001740: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001750: 20 20 20 20 20 20 52 45 47 49 4F 4E 2E 0D 20 20 | REGION.. | 00001760: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2E | .| 00001770: 2E 2E 20 20 20 20 20 CD 4F 52 45 20 44 45 46 49 |.. .ORE DEFI| 00001780: 4E 49 54 49 4F 4E 53 2E 0D 20 20 20 20 20 20 20 |NITIONS.. | 00001790: 20 20 20 20 20 20 20 20 20 20 20 32 20 20 20 20 | 2 | 000017A0: 20 20 C1 4E 20 41 44 44 52 45 53 53 20 4F 46 20 | .N ADDRESS OF | 000017B0: 24 30 30 30 30 20 45 4E 44 53 20 54 48 45 20 54 |$0000 ENDS THE T| 000017C0: 41 42 4C 45 2E 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D |ABLE............| 000017D0: 0D 0D 0D 0D 0D 0D 0D 0D 0D 20 20 20 20 20 20 20 |......... | 000017E0: 20 20 20 C7 C5 CF D3 20 CB 45 52 4E 41 4C 20 D2 | .... .ERNAL .| 000017F0: 4F 55 54 49 4E 45 53 20 20 20 20 20 20 20 20 20 |OUTINES | 00001800: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001810: 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2D 31 | 1-1| 00001820: 32 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 C6 55 |2... .U| 00001830: 4E 43 54 49 4F 4E 20 CE 41 4D 45 3A 20 C3 C2 CF |NCTION .AME: ...| 00001840: D8 0D 20 20 20 20 20 20 20 20 20 20 D0 55 52 50 |.. .URP| 00001850: 4F 53 45 3A 20 C4 52 41 57 53 20 41 20 43 4C 49 |OSE: .RAWS A CLI| 00001860: 43 4B 20 42 4F 58 20 4F 4E 20 54 48 45 20 53 43 |CK BOX ON THE SC| 00001870: 52 45 45 4E 2E 0D 20 20 20 20 20 20 20 20 20 20 |REEN.. | 00001880: C3 41 4C 4C 20 41 44 44 52 45 53 53 3A 20 24 C3 |.ALL ADDRESS: $.| 00001890: 31 34 32 0D 20 20 20 20 20 20 20 20 20 20 C9 4E |142. .N| 000018A0: 50 55 54 20 52 45 51 55 49 52 45 4D 45 4E 54 53 |PUT REQUIREMENTS| 000018B0: 3A 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |:. | 000018C0: 20 24 30 32 2D 24 30 33 20 20 20 D0 4F 49 4E 54 | $02-$03 .OINT| 000018D0: 45 52 20 54 4F 20 54 48 45 20 47 52 41 50 48 49 |ER TO THE GRAPHI| 000018E0: 43 20 44 41 54 41 2E 0D 20 20 20 20 20 20 20 20 |C DATA.. | 000018F0: 20 20 20 20 20 20 20 24 30 34 20 20 20 20 20 20 | $04 | 00001900: 20 C3 4F 4C 55 4D 4E 20 49 4E 20 43 48 41 52 41 | .OLUMN IN CHARA| 00001910: 43 54 45 52 53 2E 0D 20 20 20 20 20 20 20 20 20 |CTERS.. | 00001920: 20 20 20 20 20 20 24 30 35 20 20 20 20 20 20 20 | $05 | 00001930: D4 48 45 20 52 4F 57 20 49 4E 20 50 49 58 45 4C |.HE ROW IN PIXEL| 00001940: 53 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 |S.. | 00001950: 20 20 24 30 36 20 20 20 20 20 20 20 D4 48 45 20 | $06 .HE | 00001960: 57 49 44 54 48 20 49 4E 20 42 59 54 45 53 2E 0D |WIDTH IN BYTES..| 00001970: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 | $| 00001980: 30 37 20 20 20 20 20 20 20 D4 48 45 20 48 45 49 |07 .HE HEI| 00001990: 47 48 54 20 49 4E 20 50 49 58 45 4C 53 2E 0D 0D |GHT IN PIXELS...| 000019A0: 20 20 20 20 20 20 20 20 20 20 C4 45 53 43 52 49 | .ESCRI| 000019B0: 50 54 49 4F 4E 3A 20 20 D4 48 49 53 20 20 52 4F |PTION: .HIS RO| 000019C0: 55 54 49 4E 45 20 20 44 52 41 57 53 20 41 20 43 |UTINE DRAWS A C| 000019D0: 4C 49 43 4B 20 42 4F 58 20 4F 4E 20 54 48 45 20 |LICK BOX ON THE | 000019E0: 20 53 43 52 45 45 4E 2E 20 20 C1 0D 20 20 20 20 | SCREEN. .. | 000019F0: 20 20 20 20 20 20 43 4C 49 43 4B 20 42 4F 58 20 | CLICK BOX | 00001A00: 49 53 20 41 20 42 4F 58 20 4C 49 4B 45 20 CF 4B |IS A BOX LIKE .K| 00001A10: 2C 20 20 CF 50 45 4E 2C 20 45 54 43 2E 20 D4 48 |, .PEN, ETC. .H| 00001A20: 45 53 45 20 42 4F 58 45 53 20 41 52 45 20 47 45 |ESE BOXES ARE GE| 00001A30: 4E 45 52 41 4C 4C 59 0D 20 20 20 20 20 20 20 20 |NERALLY. | 00001A40: 20 20 50 41 52 54 20 20 4F 46 20 20 41 20 57 49 | PART OF A WI| 00001A50: 4E 44 4F 57 20 44 45 53 43 52 49 50 54 49 4F 4E |NDOW DESCRIPTION| 00001A60: 2E 20 20 D4 48 45 20 47 52 41 50 48 49 43 20 44 |. .HE GRAPHIC D| 00001A70: 41 54 41 20 49 53 20 49 4E 20 20 41 20 20 43 4F |ATA IS IN A CO| 00001A80: 44 45 44 0D 20 20 20 20 20 20 20 20 20 20 46 4F |DED. FO| 00001A90: 52 4D 41 54 2E 20 D4 48 49 53 20 46 4F 52 4D 41 |RMAT. .HIS FORMA| 00001AA0: 54 20 43 4F 4E 53 49 53 54 53 20 4F 46 20 41 20 |T CONSISTS OF A | 00001AB0: 43 4F 44 45 20 42 59 54 45 20 46 4F 4C 4C 4F 57 |CODE BYTE FOLLOW| 00001AC0: 45 44 20 42 59 20 31 20 4F 52 20 4D 4F 52 45 0D |ED BY 1 OR MORE.| 00001AD0: 20 20 20 20 20 20 20 20 20 20 44 41 54 41 20 42 | DATA B| 00001AE0: 59 54 45 53 2E 0D 20 20 20 20 20 20 20 20 20 20 |YTES.. | 00001AF0: 20 20 20 20 20 31 29 20 C3 4F 44 45 20 42 59 54 | 1) .ODE BYT| 00001B00: 45 53 20 4C 45 53 53 20 54 48 41 4E 20 31 32 38 |ES LESS THAN 128| 00001B10: 20 4D 45 41 4E 20 20 54 48 41 54 20 54 48 45 20 | MEAN THAT THE | 00001B20: 46 4F 4C 4C 4F 57 49 4E 47 20 42 59 54 45 20 49 |FOLLOWING BYTE I| 00001B30: 53 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |S. | 00001B40: 20 20 20 20 54 4F 20 42 45 20 52 45 50 45 41 54 | TO BE REPEAT| 00001B50: 45 44 20 54 48 41 54 20 4D 41 4E 59 20 54 49 4D |ED THAT MANY TIM| 00001B60: 45 53 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 |ES.. | 00001B70: 20 20 20 32 29 20 C3 4F 44 45 20 20 42 59 54 45 | 2) .ODE BYTE| 00001B80: 53 20 20 52 41 4E 47 49 4E 47 20 46 52 4F 4D 20 |S RANGING FROM | 00001B90: 31 32 38 20 54 4F 20 32 31 39 20 4D 45 41 4E 20 |128 TO 219 MEAN | 00001BA0: 54 48 41 54 20 49 46 20 31 32 38 20 20 49 53 0D |THAT IF 128 IS.| 00001BB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001BC0: 20 20 53 55 42 54 52 41 43 54 45 44 20 20 46 52 | SUBTRACTED FR| 00001BD0: 4F 4D 20 20 54 48 45 20 43 4F 44 45 20 42 59 54 |OM THE CODE BYT| 00001BE0: 45 2C 20 54 48 45 4E 20 54 48 45 20 20 52 45 53 |E, THEN THE RES| 00001BF0: 55 4C 54 20 49 53 20 20 54 48 45 0D 20 20 20 20 |ULT IS THE. | 00001C00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4E 55 | NU| 00001C10: 4D 42 45 52 20 4F 46 20 44 41 54 41 20 42 59 54 |MBER OF DATA BYT| 00001C20: 45 53 20 54 48 41 54 20 46 4F 4C 4C 4F 57 2E 0D |ES THAT FOLLOW..| 00001C30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 33 | 3| 00001C40: 29 20 C3 4F 44 45 20 42 59 54 45 53 20 52 41 4E |) .ODE BYTES RAN| 00001C50: 47 49 4E 47 20 46 52 4F 4D 20 32 32 30 20 54 4F |GING FROM 220 TO| 00001C60: 20 32 32 35 20 41 52 45 20 53 50 45 43 49 41 4C | 225 ARE SPECIAL| 00001C70: 2E 20 C6 49 52 53 54 20 32 31 39 0D 20 20 20 20 |. .IRST 219. | 00001C80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 53 | IS| 00001C90: 20 20 53 55 42 54 52 41 43 54 45 44 20 20 46 52 | SUBTRACTED FR| 00001CA0: 4F 4D 20 20 54 48 45 20 43 4F 44 45 20 42 59 54 |OM THE CODE BYT| 00001CB0: 45 2C 20 20 54 48 45 20 52 45 53 55 4C 54 20 20 |E, THE RESULT | 00001CC0: 49 53 20 20 54 48 45 0D 20 20 20 20 20 20 20 20 |IS THE. | 00001CD0: 20 20 20 20 20 20 20 20 20 20 4E 55 4D 42 45 52 | NUMBER| 00001CE0: 20 4F 46 20 42 59 54 45 53 20 49 4E 20 54 48 45 | OF BYTES IN THE| 00001CF0: 20 50 41 54 54 45 52 4E 2E 20 20 C6 4F 4C 4C 4F | PATTERN. .OLLO| 00001D00: 57 49 4E 47 20 54 48 49 53 20 43 4F 44 45 20 42 |WING THIS CODE B| 00001D10: 59 54 45 0D 20 20 20 20 20 20 20 20 20 20 20 20 |YTE. | 00001D20: 20 20 20 20 20 20 49 53 20 41 20 52 45 50 45 54 | IS A REPET| 00001D30: 49 54 49 4F 4E 20 43 4F 55 4E 54 20 46 4F 52 20 |ITION COUNT FOR | 00001D40: 54 48 45 20 50 41 54 54 45 52 4E 2E 20 C6 4F 4C |THE PATTERN. .OL| 00001D50: 4C 4F 57 49 4E 47 20 54 48 49 53 20 41 52 45 0D |LOWING THIS ARE.| 00001D60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001D70: 20 20 54 48 45 20 20 42 59 54 45 53 20 20 54 48 | THE BYTES TH| 00001D80: 41 54 20 20 43 4F 4E 53 54 49 54 55 54 45 20 20 |AT CONSTITUTE | 00001D90: 54 48 45 20 20 50 41 54 54 45 52 4E 2E 20 20 D4 |THE PATTERN. .| 00001DA0: 48 45 53 45 20 20 43 4F 55 4C 44 0D 20 20 20 20 |HESE COULD. | 00001DB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 4E | IN| 00001DC0: 43 4C 55 44 45 20 45 49 54 48 45 52 20 4F 46 20 |CLUDE EITHER OF | 00001DD0: 54 48 45 20 50 52 45 56 49 4F 55 53 20 54 57 4F |THE PREVIOUS TWO| 00001DE0: 20 43 4F 44 45 20 54 59 50 45 53 2E 0D 0D 0D 20 | CODE TYPES.... | 00001DF0: 20 20 20 20 20 20 20 20 20 C6 55 4E 43 54 49 4F | .UNCTIO| 00001E00: 4E 20 CE 41 4D 45 3A 20 C3 C2 CF D8 32 0D 20 20 |N .AME: ....2. | 00001E10: 20 20 20 20 20 20 20 20 D0 55 52 50 4F 53 45 3A | .URPOSE:| 00001E20: 20 C9 44 45 4E 54 49 43 41 4C 20 54 4F 20 C3 C2 | .DENTICAL TO ..| 00001E30: CF D8 2C 20 42 55 54 20 57 49 54 48 20 49 4E 4C |.., BUT WITH INL| 00001E40: 49 4E 45 20 44 41 54 41 2E 0D 20 20 20 20 20 20 |INE DATA.. | 00001E50: 20 20 20 20 C3 41 4C 4C 20 41 44 44 52 45 53 53 | .ALL ADDRESS| 00001E60: 3A 20 24 C3 31 C1 C2 0D 0D 20 20 20 20 20 20 20 |: $.1.... | 00001E70: 20 20 20 C4 45 53 43 52 49 50 54 49 4F 4E 3A 20 | .ESCRIPTION: | 00001E80: 20 D4 48 49 53 20 20 52 4F 55 54 49 4E 45 20 20 | .HIS ROUTINE | 00001E90: 54 41 4B 45 53 20 20 41 20 43 4C 49 43 4B 20 42 |TAKES A CLICK B| 00001EA0: 4F 58 20 20 44 45 53 43 52 49 50 54 4F 52 20 20 |OX DESCRIPTOR | 00001EB0: 46 52 4F 4D 0D 20 20 20 20 20 20 20 20 20 20 49 |FROM. I| 00001EC0: 4E 4C 49 4E 45 20 20 44 41 54 41 20 41 4E 44 20 |NLINE DATA AND | 00001ED0: 44 52 41 57 53 20 49 54 2E 20 20 D4 48 45 20 49 |DRAWS IT. .HE I| 00001EE0: 4E 4C 49 4E 45 20 44 41 54 41 20 44 4F 45 53 20 |NLINE DATA DOES | 00001EF0: CE CF D4 20 49 4E 43 4C 55 44 45 20 20 54 48 45 |... INCLUDE THE| 00001F00: 0D 20 20 20 20 20 20 20 20 20 20 50 52 4F 43 45 |. PROCE| 00001F10: 53 53 49 4E 47 20 56 45 43 54 4F 52 2C 20 49 45 |SSING VECTOR, IE| 00001F20: 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. | 00001F30: 20 20 CA D3 D2 20 C4 D2 D7 C3 C2 32 0D 20 20 20 | ... .....2. | 00001F40: 20 20 20 20 20 20 20 20 20 20 20 20 2E D7 CF D2 | ....| 00001F50: C4 20 41 44 44 52 45 53 53 20 4F 46 20 47 52 41 |. ADDRESS OF GRA| 00001F60: 50 48 49 43 20 49 4D 41 47 45 0D 20 20 20 20 20 |PHIC IMAGE. | 00001F70: 20 20 20 20 20 20 20 20 20 20 2E C2 D9 D4 C5 20 | ..... | 00001F80: 53 54 41 52 54 20 43 4F 4C 55 4D 4E 20 49 4E 20 |START COLUMN IN | 00001F90: 42 59 54 45 53 0D 20 20 20 20 20 20 20 20 20 20 |BYTES. | 00001FA0: 20 20 20 20 20 2E C2 D9 D4 C5 20 53 54 41 52 54 | ..... START| 00001FB0: 20 4D 41 52 47 49 4E 20 49 4E 20 50 49 58 45 4C | MARGIN IN PIXEL| 00001FC0: 53 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |S. | 00001FD0: 20 2E C2 D9 D4 C5 20 57 49 44 54 48 20 4F 46 20 | ..... WIDTH OF | 00001FE0: 42 4F 58 20 49 4E 20 42 59 54 45 53 0D 20 20 20 |BOX IN BYTES. | 00001FF0: 20 20 20 20 20 20 20 20 20 20 20 20 2E C2 D9 D4 | ....| 00002000: C5 20 48 45 49 47 48 54 20 4F 46 20 42 4F 58 20 |. HEIGHT OF BOX | 00002010: 49 4E 20 50 49 58 45 4C 53 0D 20 20 20 20 20 20 |IN PIXELS. | 00002020: 20 20 20 20 20 20 20 20 20 C3 4F 4E 54 52 4F 4C | .ONTROL| 00002030: 20 52 45 54 55 52 4E 53 20 48 45 52 45 20 41 46 | RETURNS HERE AF| 00002040: 54 45 52 20 54 48 45 20 42 4F 58 20 49 53 20 44 |TER THE BOX IS D| 00002050: 52 41 57 4E 2E 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D |RAWN............| 00002060: 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 20 20 20 20 20 |........... | 00002070: 20 20 20 20 20 C7 C5 CF D3 20 CB 45 52 4E 41 4C | .... .ERNAL| 00002080: 20 D2 4F 55 54 49 4E 45 53 20 20 20 20 20 20 20 | .OUTINES | 00002090: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000020A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 | 1| 000020B0: 2D 31 33 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 |-13... | 000020C0: C6 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 3A 20 C3 |.UNCTION .AME: .| 000020D0: C2 CF D8 C5 D3 0D 20 20 20 20 20 20 20 20 20 20 |...... | 000020E0: D0 55 52 50 4F 53 45 3A 20 C4 52 41 57 53 20 41 |.URPOSE: .RAWS A| 000020F0: 4C 4C 20 4F 46 20 54 48 45 20 43 4C 49 43 4B 20 |LL OF THE CLICK | 00002100: 42 4F 58 45 53 20 49 4E 20 41 20 54 41 42 4C 45 |BOXES IN A TABLE| 00002110: 2E 0D 20 20 20 20 20 20 20 20 20 20 C3 41 4C 4C |.. .ALL| 00002120: 20 41 44 44 52 45 53 53 3A 20 24 C3 31 35 C1 0D | ADDRESS: $.15..| 00002130: 20 20 20 20 20 20 20 20 20 20 C9 4E 50 55 54 20 | .NPUT | 00002140: 52 45 51 55 49 52 45 4D 45 4E 54 53 3A 0D 20 20 |REQUIREMENTS:. | 00002150: 20 20 20 20 20 20 20 20 20 20 20 20 20 24 30 32 | $02| 00002160: 2D 24 30 33 20 20 20 D0 4F 49 4E 54 45 52 20 54 |-$03 .OINTER T| 00002170: 4F 20 41 20 43 4C 49 43 4B 20 42 4F 58 20 54 41 |O A CLICK BOX TA| 00002180: 42 4C 45 20 28 D5 53 55 41 4C 4C 59 20 24 38 38 |BLE (.SUALLY $88| 00002190: 30 C3 29 2E 0D 20 20 20 20 20 20 20 20 20 20 D0 |0.).. .| 000021A0: 52 45 50 41 52 41 54 4F 52 59 20 52 4F 55 54 49 |REPARATORY ROUTI| 000021B0: 4E 45 53 3A 20 D7 C9 CE C4 CF D7 20 28 4F 50 54 |NES: ...... (OPT| 000021C0: 49 4F 4E 41 4C 29 2E 0D 0D 20 20 20 20 20 20 20 |IONAL)... | 000021D0: 20 20 20 C4 45 53 43 52 49 50 54 49 4F 4E 3A 20 | .ESCRIPTION: | 000021E0: D4 48 49 53 20 52 4F 55 54 49 4E 45 20 44 52 41 |.HIS ROUTINE DRA| 000021F0: 57 53 20 41 4C 4C 20 4F 46 20 54 48 45 20 43 4C |WS ALL OF THE CL| 00002200: 49 43 4B 20 42 4F 58 45 53 20 42 59 20 43 41 4C |ICK BOXES BY CAL| 00002210: 4C 49 4E 47 0D 20 20 20 20 20 20 20 20 20 20 C3 |LING. .| 00002220: C2 CF D8 20 20 52 45 50 45 41 54 45 44 4C 59 20 |... REPEATEDLY | 00002230: 20 55 4E 54 49 4C 20 54 48 45 20 54 41 42 4C 45 | UNTIL THE TABLE| 00002240: 20 49 53 20 20 45 58 48 41 55 53 54 45 44 2E 20 | IS EXHAUSTED. | 00002250: 20 D4 48 45 20 20 C9 CE C9 D4 CD D3 20 20 49 53 | .HE ...... IS| 00002260: 0D 20 20 20 20 20 20 20 20 20 20 43 41 4C 4C 45 |. CALLE| 00002270: 44 20 20 54 4F 20 20 53 45 54 20 20 54 48 45 20 |D TO SET THE | 00002280: 4D 4F 55 53 45 27 53 20 50 4F 53 49 54 49 4F 4E |MOUSE'S POSITION| 00002290: 2E 20 20 C3 4C 49 43 4B 20 54 41 42 4C 45 20 46 |. .LICK TABLE F| 000022A0: 4F 52 4D 41 54 3A 0D 20 20 20 20 20 20 20 20 20 |ORMAT:. | 000022B0: 20 20 20 20 20 20 23 42 59 54 45 53 20 20 20 20 | #BYTES | 000022C0: C4 45 53 43 52 49 50 54 49 4F 4E 0D 20 20 20 20 |.ESCRIPTION. | 000022D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 20 | 1 | 000022E0: 20 20 20 20 20 23 20 43 4C 49 43 4B 20 42 4F 58 | # CLICK BOX| 000022F0: 45 53 20 49 4E 20 54 41 42 4C 45 2E 0D 20 20 20 |ES IN TABLE.. | 00002300: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 32 | 2| 00002310: 20 20 20 20 20 20 C3 4F 4C 55 4D 4E 20 54 4F 20 | .OLUMN TO | 00002320: 50 4C 41 43 45 20 4D 4F 55 53 45 20 49 4E 20 28 |PLACE MOUSE IN (| 00002330: 30 20 57 49 4C 4C 20 50 52 45 56 45 4E 54 0D 20 |0 WILL PREVENT. | 00002340: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00002350: 20 20 20 20 20 20 20 20 50 4C 41 43 45 4D 45 4E | PLACEMEN| 00002360: 54 29 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 |T).. | 00002370: 20 20 20 20 20 20 31 20 20 20 20 20 20 D2 4F 57 | 1 .OW| 00002380: 20 54 4F 20 50 4C 41 43 45 20 4D 4F 55 53 45 20 | TO PLACE MOUSE | 00002390: 49 4E 2E 0D 20 20 20 20 20 20 20 20 20 20 D4 48 |IN.. .H| 000023A0: 49 53 20 49 53 20 46 4F 4C 4C 4F 57 45 44 20 42 |IS IS FOLLOWED B| 000023B0: 59 20 53 45 54 53 20 4F 46 20 38 20 42 59 54 45 |Y SETS OF 8 BYTE| 000023C0: 53 2C 20 4F 4E 45 20 46 4F 52 20 45 41 43 48 20 |S, ONE FOR EACH | 000023D0: 43 4C 49 43 4B 20 42 4F 58 2E 0D 20 20 20 20 20 |CLICK BOX.. | 000023E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 32 20 20 | 2 | 000023F0: 20 20 20 20 20 C1 44 44 52 45 53 53 20 4F 46 20 | .DDRESS OF | 00002400: 47 52 41 50 48 49 43 20 44 41 54 41 2E 0D 20 20 |GRAPHIC DATA.. | 00002410: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00002420: 31 20 20 20 20 20 20 20 C3 4F 4C 55 4D 4E 20 50 |1 .OLUMN P| 00002430: 4F 53 49 54 49 4F 4E 20 4F 46 20 42 4F 58 20 49 |OSITION OF BOX I| 00002440: 4E 20 43 48 41 52 41 43 54 45 52 53 2E 0D 20 20 |N CHARACTERS.. | 00002450: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00002460: 31 20 20 20 20 20 20 20 D2 4F 57 20 50 4F 53 49 |1 .OW POSI| 00002470: 54 49 4F 4E 20 4F 46 20 42 4F 58 20 49 4E 20 50 |TION OF BOX IN P| 00002480: 49 58 45 4C 53 2E 0D 20 20 20 20 20 20 20 20 20 |IXELS.. | 00002490: 20 20 20 20 20 20 20 20 20 31 20 20 20 20 20 20 | 1 | 000024A0: 20 D7 49 44 54 48 20 4F 46 20 42 4F 58 20 49 4E | .IDTH OF BOX IN| 000024B0: 20 42 59 54 45 53 2E 0D 20 20 20 20 20 20 20 20 | BYTES.. | 000024C0: 20 20 20 20 20 20 20 20 20 20 31 20 20 20 20 20 | 1 | 000024D0: 20 20 C8 45 49 47 48 54 20 4F 46 20 42 4F 58 20 | .EIGHT OF BOX | 000024E0: 49 4E 20 50 49 58 45 4C 53 2E 0D 20 20 20 20 20 |IN PIXELS.. | 000024F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 32 20 20 | 2 | 00002500: 20 20 20 20 20 C1 44 44 52 45 53 53 20 4F 46 20 | .DDRESS OF | 00002510: 52 4F 55 54 49 4E 45 20 54 4F 20 50 52 4F 43 45 |ROUTINE TO PROCE| 00002520: 53 53 20 54 48 49 53 20 42 4F 58 2E 0D 0D 0D 20 |SS THIS BOX.... | 00002530: 20 20 20 20 20 20 20 20 20 C6 55 4E 43 54 49 4F | .UNCTIO| 00002540: 4E 20 CE 41 4D 45 3A 20 C3 C8 C1 D2 D3 D4 0D 20 |N .AME: ....... | 00002550: 20 20 20 20 20 20 20 20 20 D0 55 52 50 4F 53 45 | .URPOSE| 00002560: 3A 20 C7 45 54 20 53 54 41 54 49 53 54 49 43 53 |: .ET STATISTICS| 00002570: 20 46 4F 52 20 41 20 43 48 41 52 41 43 54 45 52 | FOR A CHARACTER| 00002580: 2E 0D 20 20 20 20 20 20 20 20 20 20 C3 41 4C 4C |.. .ALL| 00002590: 20 41 44 44 52 45 53 53 3A 20 24 C3 31 C2 31 0D | ADDRESS: $.1.1.| 000025A0: 20 20 20 20 20 20 20 20 20 20 C9 4E 50 55 54 20 | .NPUT | 000025B0: 52 45 51 55 49 52 45 4D 45 4E 54 53 3A 0D 20 20 |REQUIREMENTS:. | 000025C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 C1 20 20 | . | 000025D0: 20 20 20 20 20 20 20 D4 48 45 20 43 48 41 52 41 | .HE CHARA| 000025E0: 43 54 45 52 2E 0D 20 20 20 20 20 20 20 20 20 20 |CTER.. | 000025F0: CF 55 54 50 55 54 3A 0D 20 20 20 20 20 20 20 20 |.UTPUT:. | 00002600: 20 20 20 20 20 20 20 C1 20 20 20 20 20 20 20 20 | . | 00002610: 20 D4 48 45 20 50 4F 53 49 54 49 4F 4E 20 4F 46 | .HE POSITION OF| 00002620: 20 54 48 45 20 55 4E 44 45 52 4C 49 4E 45 2E 0D | THE UNDERLINE..| 00002630: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 D9 | .| 00002640: 20 20 20 20 20 20 20 20 20 D4 48 45 20 43 48 41 | .HE CHA| 00002650: 52 41 43 54 45 52 27 53 20 57 49 44 54 48 2E 0D |RACTER'S WIDTH..| 00002660: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 D8 | .| 00002670: 20 20 20 20 20 20 20 20 20 D4 48 45 20 43 48 41 | .HE CHA| 00002680: 52 41 43 54 45 52 27 53 20 48 45 49 47 48 54 2E |RACTER'S HEIGHT.| 00002690: 0D 0D 20 20 20 20 20 20 20 20 20 20 C4 45 53 43 |.. .ESC| 000026A0: 52 49 50 54 49 4F 4E 3A 20 20 C7 49 56 45 4E 20 |RIPTION: .IVEN | 000026B0: 54 48 45 20 C1 D3 C3 C9 C9 20 56 41 4C 55 45 20 |THE ..... VALUE | 000026C0: 4F 46 20 41 20 43 48 41 52 41 43 54 45 52 2C 20 |OF A CHARACTER, | 000026D0: 20 54 48 49 53 20 52 4F 55 54 49 4E 45 0D 20 20 | THIS ROUTINE. | 000026E0: 20 20 20 20 20 20 20 20 43 4F 4D 50 55 54 45 53 | COMPUTES| 000026F0: 20 41 4E 44 20 52 45 54 55 52 4E 53 20 54 48 45 | AND RETURNS THE| 00002700: 20 48 45 49 47 48 54 20 41 4E 44 20 57 49 44 54 | HEIGHT AND WIDT| 00002710: 48 2C 20 54 41 4B 49 4E 47 20 54 48 45 20 53 54 |H, TAKING THE ST| 00002720: 59 4C 45 20 20 49 4E 54 4F 0D 20 20 20 20 20 20 |YLE INTO. | 00002730: 20 20 20 20 41 43 43 4F 55 4E 54 2E 20 D4 48 45 | ACCOUNT. .HE| 00002740: 20 23 20 50 49 58 45 4C 53 20 41 42 4F 56 45 20 | # PIXELS ABOVE | 00002750: 54 48 45 20 55 4E 44 45 52 4C 49 4E 45 20 46 4F |THE UNDERLINE FO| 00002760: 52 20 54 48 45 20 50 52 45 53 45 4E 54 20 46 4F |R THE PRESENT FO| 00002770: 4E 54 20 49 53 0D 20 20 20 20 20 20 20 20 20 20 |NT IS. | 00002780: 41 4C 53 4F 20 52 45 54 55 52 4E 45 44 2E 0D 0D |ALSO RETURNED...| 00002790: 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D |................| 000027A0: 0D 0D 0D 0D 0D 0D 0D 0D 20 20 20 20 20 20 20 20 |........ | 000027B0: 20 20 C7 C5 CF D3 20 CB 45 52 4E 41 4C 20 D2 4F | .... .ERNAL .O| 000027C0: 55 54 49 4E 45 53 20 20 20 20 20 20 20 20 20 20 |UTINES | 000027D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000027E0: 20 20 20 20 20 20 20 20 20 20 20 20 31 2D 31 34 | 1-14| 000027F0: 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 C6 55 4E |... .UN| 00002800: 43 54 49 4F 4E 20 CE 41 4D 45 3A 20 C3 C8 C7 C4 |CTION .AME: ....| 00002810: D2 D6 0D 20 20 20 20 20 20 20 20 20 20 D0 55 52 |... .UR| 00002820: 50 4F 53 45 3A 20 C3 48 41 4E 47 45 20 54 48 45 |POSE: .HANGE THE| 00002830: 20 44 45 56 49 43 45 20 4E 55 4D 42 45 52 20 4F | DEVICE NUMBER O| 00002840: 46 20 41 20 44 52 49 56 45 2E 0D 20 20 20 20 20 |F A DRIVE.. | 00002850: 20 20 20 20 20 C3 41 4C 4C 20 41 44 44 52 45 53 | .ALL ADDRES| 00002860: 53 3A 20 24 C3 32 C2 C3 0D 20 20 20 20 20 20 20 |S: $.2... | 00002870: 20 20 20 C9 4E 50 55 54 20 52 45 51 55 49 52 45 | .NPUT REQUIRE| 00002880: 4D 45 4E 54 53 3A 0D 20 20 20 20 20 20 20 20 20 |MENTS:. | 00002890: 20 20 20 20 20 20 C1 20 20 20 20 20 20 20 20 20 | . | 000028A0: CE 45 57 20 44 45 56 49 43 45 20 4E 55 4D 42 45 |.EW DEVICE NUMBE| 000028B0: 52 20 46 4F 52 20 44 52 49 56 45 2E 0D 20 20 20 |R FOR DRIVE.. | 000028C0: 20 20 20 20 20 20 20 20 20 20 20 20 24 38 34 38 | $848| 000028D0: 39 20 20 20 20 20 C3 55 52 52 45 4E 54 20 44 52 |9 .URRENT DR| 000028E0: 49 56 45 20 4E 55 4D 42 45 52 2E 0D 20 20 20 20 |IVE NUMBER.. | 000028F0: 20 20 20 20 20 20 CF 55 54 50 55 54 3A 0D 20 20 | .UTPUT:. | 00002900: 20 20 20 20 20 20 20 20 20 20 20 20 20 24 C2 C1 | $..| 00002910: 20 20 20 20 20 20 20 CE 45 57 20 44 45 56 49 43 | .EW DEVIC| 00002920: 45 20 4E 55 4D 42 45 52 2E 0D 20 20 20 20 20 20 |E NUMBER.. | 00002930: 20 20 20 20 20 20 20 20 20 24 38 34 38 39 20 20 | $8489 | 00002940: 20 20 20 CE 45 57 20 44 45 56 49 43 45 20 4E 55 | .EW DEVICE NU| 00002950: 4D 42 45 52 2E 0D 20 20 20 20 20 20 20 20 20 20 |MBER.. | 00002960: 20 20 20 20 20 24 38 34 39 32 2D 24 38 34 39 35 | $8492-$8495| 00002970: 20 C1 50 50 52 4F 50 52 49 41 54 45 20 42 59 54 | .PPROPRIATE BYT| 00002980: 45 53 20 41 52 45 20 52 45 53 45 54 20 41 4E 44 |ES ARE RESET AND| 00002990: 20 53 45 54 2E 0D 20 20 20 20 20 20 20 20 20 20 | SET.. | 000029A0: C5 52 52 4F 52 53 3A 20 D3 45 45 20 41 50 50 45 |.RRORS: .EE APPE| 000029B0: 4E 44 49 58 20 C9 2E 0D 0D 20 20 20 20 20 20 20 |NDIX .... | 000029C0: 20 20 20 C4 45 53 43 52 49 50 54 49 4F 4E 3A 20 | .ESCRIPTION: | 000029D0: D4 48 45 20 43 55 52 52 45 4E 54 20 44 52 49 56 |.HE CURRENT DRIV| 000029E0: 45 20 49 53 20 4D 41 44 45 20 52 45 41 44 59 2C |E IS MADE READY,| 000029F0: 20 54 48 45 4E 20 54 48 45 20 4E 45 57 20 44 45 | THEN THE NEW DE| 00002A00: 56 49 43 45 0D 20 20 20 20 20 20 20 20 20 20 4E |VICE. N| 00002A10: 55 4D 42 45 52 20 49 53 20 53 45 4E 54 20 54 4F |UMBER IS SENT TO| 00002A20: 20 54 55 52 42 4F 44 4F 53 20 57 48 49 43 48 20 | TURBODOS WHICH | 00002A30: 57 49 4C 4C 20 43 48 41 4E 47 45 20 49 54 2E 20 |WILL CHANGE IT. | 00002A40: 20 D4 48 49 53 20 52 45 53 55 4C 54 53 20 49 4E | .HIS RESULTS IN| 00002A50: 0D 20 20 20 20 20 20 20 20 20 20 54 48 45 20 20 |. THE | 00002A60: 44 52 49 56 45 20 42 45 49 4E 47 20 53 45 54 20 |DRIVE BEING SET | 00002A70: 41 53 20 54 48 45 20 43 55 52 52 45 4E 54 20 44 |AS THE CURRENT D| 00002A80: 52 49 56 45 20 42 55 54 20 57 49 54 48 20 41 20 |RIVE BUT WITH A | 00002A90: 20 4E 45 57 20 20 44 45 56 49 43 45 0D 20 20 20 | NEW DEVICE. | 00002AA0: 20 20 20 20 20 20 20 4E 55 4D 42 45 52 2C 20 20 | NUMBER, | 00002AB0: 41 4E 44 20 20 57 49 54 48 20 54 55 52 42 4F 44 |AND WITH TURBOD| 00002AC0: 4F 53 20 55 50 20 41 4E 44 20 52 55 4E 4E 49 4E |OS UP AND RUNNIN| 00002AD0: 47 2E 20 20 D4 48 45 20 53 54 41 54 55 53 20 42 |G. .HE STATUS B| 00002AE0: 59 54 45 53 20 20 41 54 0D 20 20 20 20 20 20 20 |YTES AT. | 00002AF0: 20 20 20 24 38 34 39 32 2D 24 38 34 39 35 20 41 | $8492-$8495 A| 00002B00: 52 45 20 43 48 41 4E 47 45 44 2C 20 54 48 45 20 |RE CHANGED, THE | 00002B10: 4F 4C 44 20 4F 4E 45 20 49 53 20 52 45 53 45 54 |OLD ONE IS RESET| 00002B20: 20 41 4E 44 20 54 48 45 20 4E 45 57 20 4F 4E 45 | AND THE NEW ONE| 00002B30: 20 48 41 53 0D 20 20 20 20 20 20 20 20 20 20 42 | HAS. B| 00002B40: 49 54 53 20 36 20 41 4E 44 20 37 20 53 45 54 2E |ITS 6 AND 7 SET.| 00002B50: 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 C6 55 4E |... .UN| 00002B60: 43 54 49 4F 4E 20 CE 41 4D 45 3A 20 C3 CB CD CF |CTION .AME: ....| 00002B70: D5 D3 0D 20 20 20 20 20 20 20 20 20 20 D0 55 52 |... .UR| 00002B80: 50 4F 53 45 3A 20 C3 48 45 43 4B 20 49 46 20 54 |POSE: .HECK IF T| 00002B90: 48 45 20 4D 4F 55 53 45 20 49 53 20 49 4E 20 41 |HE MOUSE IS IN A| 00002BA0: 20 42 4F 58 2E 0D 20 20 20 20 20 20 20 20 20 20 | BOX.. | 00002BB0: C3 41 4C 4C 20 41 44 44 52 45 53 53 3A 20 24 C3 |.ALL ADDRESS: $.| 00002BC0: 32 C2 33 0D 20 20 20 20 20 20 20 20 20 20 C9 4E |2.3. .N| 00002BD0: 50 55 54 20 52 45 51 55 49 52 45 4D 45 4E 54 53 |PUT REQUIREMENTS| 00002BE0: 3A 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |:. | 00002BF0: 20 24 30 36 20 20 20 20 20 20 20 D4 4F 50 20 4D | $06 .OP M| 00002C00: 41 52 47 49 4E 2E 0D 20 20 20 20 20 20 20 20 20 |ARGIN.. | 00002C10: 20 20 20 20 20 20 24 30 37 20 20 20 20 20 20 20 | $07 | 00002C20: C2 4F 54 54 4F 4D 20 4D 41 52 47 49 4E 2E 0D 20 |.OTTOM MARGIN.. | 00002C30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 30 | $0| 00002C40: 38 2D 24 30 39 20 20 20 CC 45 46 54 20 4D 41 52 |8-$09 .EFT MAR| 00002C50: 47 49 4E 2E 0D 20 20 20 20 20 20 20 20 20 20 20 |GIN.. | 00002C60: 20 20 20 20 24 30 C1 2D 24 30 C2 20 20 20 D2 49 | $0.-$0. .I| 00002C70: 47 48 54 20 4D 41 52 47 49 4E 2E 0D 20 20 20 20 |GHT MARGIN.. | 00002C80: 20 20 20 20 20 20 CF 55 54 50 55 54 3A 0D 20 20 | .UTPUT:. | 00002C90: 20 20 20 20 20 20 20 20 20 20 20 20 20 C1 20 20 | . | 00002CA0: 20 20 20 20 20 20 20 24 30 30 20 2D 20 4F 55 54 | $00 - OUT| 00002CB0: 53 49 44 45 20 42 4F 58 2C 20 24 C6 C6 20 2D 20 |SIDE BOX, $.. - | 00002CC0: 49 4E 53 49 44 45 20 42 4F 58 2E 0D 0D 20 20 20 |INSIDE BOX... | 00002CD0: 20 20 20 20 20 20 20 C4 45 53 43 52 49 50 54 49 | .ESCRIPTI| 00002CE0: 4F 4E 3A 20 20 D4 48 49 53 20 20 52 4F 55 54 49 |ON: .HIS ROUTI| 00002CF0: 4E 45 20 20 53 49 4D 50 4C 59 20 20 43 4F 4D 50 |NE SIMPLY COMP| 00002D00: 41 52 45 53 20 54 48 45 20 20 50 52 45 53 45 4E |ARES THE PRESEN| 00002D10: 54 20 20 4D 4F 55 53 45 0D 20 20 20 20 20 20 20 |T MOUSE. | 00002D20: 20 20 20 4C 4F 43 41 54 49 4F 4E 20 20 20 53 54 | LOCATION ST| 00002D30: 4F 52 45 44 20 20 20 41 54 20 20 4C 4F 43 41 54 |ORED AT LOCAT| 00002D40: 49 4F 4E 53 20 20 24 33 C1 2D 24 33 C3 20 20 41 |IONS $3.-$3. A| 00002D50: 47 41 49 4E 53 54 20 20 20 54 48 45 20 20 20 42 |GAINST THE B| 00002D60: 4F 58 27 53 0D 20 20 20 20 20 20 20 20 20 20 42 |OX'S. B| 00002D70: 4F 55 4E 44 41 52 49 45 53 2E 20 C1 20 49 53 20 |OUNDARIES. . IS | 00002D80: 53 45 54 20 54 4F 20 24 30 30 20 49 46 20 54 48 |SET TO $00 IF TH| 00002D90: 45 20 4D 4F 55 53 45 20 49 53 20 4F 55 54 53 49 |E MOUSE IS OUTSI| 00002DA0: 44 45 2C 20 24 C6 C6 20 49 46 20 49 54 20 49 53 |DE, $.. IF IT IS| 00002DB0: 0D 20 20 20 20 20 20 20 20 20 20 49 4E 53 49 44 |. INSID| 00002DC0: 45 2E 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 C6 |E.... .| 00002DD0: 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 3A 20 C3 CC |UNCTION .AME: ..| 00002DE0: D2 D2 C4 D9 0D 20 20 20 20 20 20 20 20 20 20 D0 |..... .| 00002DF0: 55 52 50 4F 53 45 3A 20 D4 55 52 4E 20 4F 46 46 |URPOSE: .URN OFF| 00002E00: 20 54 55 52 42 4F 44 4F 53 2E 0D 20 20 20 20 20 | TURBODOS.. | 00002E10: 20 20 20 20 20 C3 41 4C 4C 20 41 44 44 52 45 53 | .ALL ADDRES| 00002E20: 53 3A 20 24 C3 32 33 32 0D 20 20 20 20 20 20 20 |S: $.232. | 00002E30: 20 20 20 C9 4E 50 55 54 20 52 45 51 55 49 52 45 | .NPUT REQUIRE| 00002E40: 4D 45 4E 54 53 3A 0D 20 20 20 20 20 20 20 20 20 |MENTS:. | 00002E50: 20 20 20 20 20 20 24 38 34 38 39 20 20 20 20 20 | $8489 | 00002E60: C3 55 52 52 45 4E 54 20 44 52 49 56 45 20 4E 55 |.URRENT DRIVE NU| 00002E70: 4D 42 45 52 2E 0D 0D 20 20 20 20 20 20 20 20 20 |MBER... | 00002E80: 20 C4 45 53 43 52 49 50 54 49 4F 4E 3A 20 D4 55 | .ESCRIPTION: .U| 00002E90: 52 42 4F 44 4F 53 20 49 53 20 54 45 52 4D 49 4E |RBODOS IS TERMIN| 00002EA0: 41 54 45 44 20 49 4E 20 54 48 45 20 43 55 52 52 |ATED IN THE CURR| 00002EB0: 45 4E 54 20 44 52 49 56 45 2E 0D 0D 0D 0D 0D 0D |ENT DRIVE.......| 00002EC0: 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 20 20 |.............. | 00002ED0: 20 20 20 20 20 20 20 20 C7 C5 CF D3 20 CB 45 52 | .... .ER| 00002EE0: 4E 41 4C 20 D2 4F 55 54 49 4E 45 53 20 20 20 20 |NAL .OUTINES | 00002EF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00002F00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00002F10: 20 20 31 2D 31 35 0D 0D 0D 20 20 20 20 20 20 20 | 1-15... | 00002F20: 20 20 20 C6 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 | .UNCTION .AME| 00002F30: 3A 20 C3 CC D2 D3 D4 D3 0D 20 20 20 20 20 20 20 |: ....... | 00002F40: 20 20 20 D0 55 52 50 4F 53 45 3A 20 C3 4C 45 41 | .URPOSE: .LEA| 00002F50: 52 20 54 48 45 20 44 52 49 56 45 20 52 45 41 44 |R THE DRIVE READ| 00002F60: 59 20 53 54 41 54 55 53 2E 0D 20 20 20 20 20 20 |Y STATUS.. | 00002F70: 20 20 20 20 C3 41 4C 4C 20 41 44 44 52 45 53 53 | .ALL ADDRESS| 00002F80: 3A 20 24 C3 32 33 35 0D 20 20 20 20 20 20 20 20 |: $.235. | 00002F90: 20 20 C9 4E 50 55 54 20 52 45 51 55 49 52 45 4D | .NPUT REQUIREM| 00002FA0: 45 4E 54 53 3A 0D 20 20 20 20 20 20 20 20 20 20 |ENTS:. | 00002FB0: 20 20 20 20 20 24 38 34 38 39 20 20 20 20 20 C3 | $8489 .| 00002FC0: 55 52 52 45 4E 54 20 44 52 49 56 45 20 4E 55 4D |URRENT DRIVE NUM| 00002FD0: 42 45 52 2E 0D 20 20 20 20 20 20 20 20 20 20 CF |BER.. .| 00002FE0: 55 54 50 55 54 3A 0D 20 20 20 20 20 20 20 20 20 |UTPUT:. | 00002FF0: 20 20 20 20 20 20 C1 50 50 52 4F 50 52 49 41 54 | .PPROPRIAT| 00003000: 45 20 53 54 41 54 55 53 20 42 59 54 45 20 49 53 |E STATUS BYTE IS| 00003010: 20 52 45 53 45 54 2E 0D 0D 20 20 20 20 20 20 20 | RESET... | 00003020: 20 20 20 C4 45 53 43 52 49 50 54 49 4F 4E 3A 20 | .ESCRIPTION: | 00003030: 20 D4 48 49 53 20 20 52 4F 55 54 49 4E 45 20 20 | .HIS ROUTINE | 00003040: 54 45 52 4D 49 4E 41 54 45 53 20 54 55 52 42 4F |TERMINATES TURBO| 00003050: 44 4F 53 20 49 4E 20 20 54 48 45 20 20 43 55 52 |DOS IN THE CUR| 00003060: 52 45 4E 54 0D 20 20 20 20 20 20 20 20 20 20 44 |RENT. D| 00003070: 52 49 56 45 2C 20 41 4E 44 20 52 45 53 45 54 53 |RIVE, AND RESETS| 00003080: 20 54 48 45 20 44 52 49 56 45 20 53 54 41 54 55 | THE DRIVE STATU| 00003090: 53 20 42 59 54 45 20 41 54 20 24 38 34 39 32 2D |S BYTE AT $8492-| 000030A0: 24 38 34 39 35 2E 0D 0D 0D 20 20 20 20 20 20 20 |$8495.... | 000030B0: 20 20 20 C6 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 | .UNCTION .AME| 000030C0: 3A 20 C3 CC D3 CD CE D5 0D 20 20 20 20 20 20 20 |: ....... | 000030D0: 20 20 20 D0 55 52 50 4F 53 45 3A 20 C2 41 43 4B | .URPOSE: .ACK| 000030E0: 53 20 55 50 20 41 20 4D 45 4E 55 20 4C 45 56 45 |S UP A MENU LEVE| 000030F0: 4C 2E 0D 20 20 20 20 20 20 20 20 20 20 C3 41 4C |L.. .AL| 00003100: 4C 20 41 44 44 52 45 53 53 3A 20 24 C3 31 39 30 |L ADDRESS: $.190| 00003110: 0D 0D 20 20 20 20 20 20 20 20 20 20 C4 45 53 43 |.. .ESC| 00003120: 52 49 50 54 49 4F 4E 3A 20 20 D4 48 49 53 20 52 |RIPTION: .HIS R| 00003130: 4F 55 54 49 4E 45 20 45 52 41 53 45 53 20 54 48 |OUTINE ERASES TH| 00003140: 45 20 50 52 45 53 45 4E 54 20 4D 45 4E 55 2C 20 |E PRESENT MENU, | 00003150: 41 4E 44 20 50 4F 50 53 20 42 41 43 4B 0D 20 20 |AND POPS BACK. | 00003160: 20 20 20 20 20 20 20 20 4F 4E 45 20 4C 45 56 45 | ONE LEVE| 00003170: 4C 2E 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 C6 |L.... .| 00003180: 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 3A 20 C3 CC |UNCTION .AME: ..| 00003190: D3 D3 C5 D2 0D 20 20 20 20 20 20 20 20 20 20 D0 |..... .| 000031A0: 55 52 50 4F 53 45 3A 20 C3 4C 4F 53 45 20 4F 46 |URPOSE: .LOSE OF| 000031B0: 46 20 53 45 52 49 41 4C 20 43 4F 4D 4D 55 4E 49 |F SERIAL COMMUNI| 000031C0: 43 41 54 49 4F 4E 2E 0D 20 20 20 20 20 20 20 20 |CATION.. | 000031D0: 20 20 C3 41 4C 4C 20 41 44 44 52 45 53 53 3A 20 | .ALL ADDRESS: | 000031E0: 24 C3 32 35 C6 0D 20 20 20 20 20 20 20 20 20 20 |$.25.. | 000031F0: C5 52 52 4F 52 53 3A 20 D3 45 45 20 41 50 50 45 |.RRORS: .EE APPE| 00003200: 4E 44 49 58 20 C9 2E 0D 0D 20 20 20 20 20 20 20 |NDIX .... | 00003210: 20 20 20 C4 45 53 43 52 49 50 54 49 4F 4E 3A 20 | .ESCRIPTION: | 00003220: 20 D4 48 49 53 20 20 52 4F 55 54 49 4E 45 20 20 | .HIS ROUTINE | 00003230: 52 45 53 45 54 53 20 54 48 45 20 C9 2F CF 20 20 |RESETS THE ./. | 00003240: 50 4F 52 54 53 20 20 41 46 54 45 52 20 20 53 45 |PORTS AFTER SE| 00003250: 52 49 41 4C 0D 20 20 20 20 20 20 20 20 20 20 43 |RIAL. C| 00003260: 4F 4D 4D 55 4E 49 43 41 54 49 4F 4E 20 49 53 20 |OMMUNICATION IS | 00003270: 43 4F 4D 50 4C 45 54 45 2E 20 D4 48 49 53 20 52 |COMPLETE. .HIS R| 00003280: 4F 55 54 49 4E 45 20 49 53 20 43 41 4C 4C 45 44 |OUTINE IS CALLED| 00003290: 20 41 46 54 45 52 20 43 41 4C 4C 53 20 20 54 4F | AFTER CALLS TO| 000032A0: 0D 20 20 20 20 20 20 20 20 20 20 D2 C5 C1 C4 32 |. ....2| 000032B0: 2C 20 D7 D2 C9 D4 C5 32 20 4F 52 20 C3 D7 D2 C9 |, .....2 OR ....| 000032C0: D4 C5 2E 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 |...... | 000032D0: C6 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 3A 20 C3 |.UNCTION .AME: .| 000032E0: CC D3 D7 C9 CE 0D 20 20 20 20 20 20 20 20 20 20 |...... | 000032F0: D0 55 52 50 4F 53 45 3A 20 C3 4C 4F 53 45 20 41 |.URPOSE: .LOSE A| 00003300: 20 57 49 4E 44 4F 57 2E 0D 20 20 20 20 20 20 20 | WINDOW.. | 00003310: 20 20 20 C3 41 4C 4C 20 41 44 44 52 45 53 53 3A | .ALL ADDRESS:| 00003320: 20 24 C3 32 C2 C6 0D 20 20 20 20 20 20 20 20 20 | $.2... | 00003330: 20 CF 55 54 50 55 54 3A 0D 20 20 20 20 20 20 20 | .UTPUT:. | 00003340: 20 20 20 20 20 20 20 20 24 30 32 20 20 20 20 20 | $02 | 00003350: 20 20 C3 4F 4D 4D 41 4E 44 20 42 59 54 45 20 46 | .OMMAND BYTE F| 00003360: 52 4F 4D 20 57 49 4E 44 4F 57 20 50 52 4F 43 45 |ROM WINDOW PROCE| 00003370: 53 53 4F 52 2E 0D 20 20 20 20 20 20 20 20 20 20 |SSOR.. | 00003380: 20 20 20 20 20 24 38 35 31 C4 20 20 20 20 20 C3 | $851. .| 00003390: 4F 4D 4D 41 4E 44 20 42 59 54 45 20 46 52 4F 4D |OMMAND BYTE FROM| 000033A0: 20 57 49 4E 44 4F 57 20 50 52 4F 43 45 53 53 4F | WINDOW PROCESSO| 000033B0: 52 2E 0D 0D 20 20 20 20 20 20 20 20 20 20 C4 45 |R... .E| 000033C0: 53 43 52 49 50 54 49 4F 4E 3A 20 20 D4 48 45 20 |SCRIPTION: .HE | 000033D0: 20 57 49 4E 44 4F 57 20 49 53 20 45 52 41 53 45 | WINDOW IS ERASE| 000033E0: 44 20 41 4E 44 20 54 48 45 20 4D 45 4D 4F 52 59 |D AND THE MEMORY| 000033F0: 20 41 44 44 52 45 53 53 45 53 20 54 48 41 54 0D | ADDRESSES THAT.| 00003400: 20 20 20 20 20 20 20 20 20 20 54 48 45 20 57 49 | THE WI| 00003410: 4E 44 4F 57 20 50 52 4F 43 45 53 53 4F 52 20 53 |NDOW PROCESSOR S| 00003420: 41 56 45 44 20 41 52 45 20 52 45 53 54 4F 52 45 |AVED ARE RESTORE| 00003430: 44 2E 20 20 C3 4F 4E 54 52 4F 4C 20 52 45 54 55 |D. .ONTROL RETU| 00003440: 52 4E 53 20 54 4F 20 20 54 48 45 0D 20 20 20 20 |RNS TO THE. | 00003450: 20 20 20 20 20 20 43 41 4C 4C 45 52 20 4F 46 20 | CALLER OF | 00003460: D7 C9 CE C4 CF D7 2E 0D 0D 0D 0D 0D 0D 0D 0D 0D |................| 00003470: 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 20 |............... | 00003480: 20 20 20 20 20 20 20 20 20 C7 C5 CF D3 20 CB 45 | .... .E| 00003490: 52 4E 41 4C 20 D2 4F 55 54 49 4E 45 53 20 20 20 |RNAL .OUTINES | 000034A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000034B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000034C0: 20 20 20 31 2D 31 36 0D 0D 0D 20 20 20 20 20 20 | 1-16... | 000034D0: 20 20 20 20 C6 55 4E 43 54 49 4F 4E 20 CE 41 4D | .UNCTION .AM| 000034E0: 45 3A 20 C3 CD C4 D4 C2 CC 0D 20 20 20 20 20 20 |E: ....... | 000034F0: 20 20 20 20 D0 55 52 50 4F 53 45 3A 20 D3 45 54 | .URPOSE: .ET| 00003500: 53 20 55 50 20 41 20 54 41 42 4C 45 20 4F 46 20 |S UP A TABLE OF | 00003510: 52 45 43 55 52 52 49 4E 47 20 54 49 4D 45 44 20 |RECURRING TIMED | 00003520: 45 56 45 4E 54 53 2E 0D 20 20 20 20 20 20 20 20 |EVENTS.. | 00003530: 20 20 C3 41 4C 4C 20 41 44 44 52 45 53 53 3A 20 | .ALL ADDRESS: | 00003540: 24 C3 31 30 33 0D 20 20 20 20 20 20 20 20 20 20 |$.103. | 00003550: C9 4E 50 55 54 20 52 45 51 55 49 52 45 4D 45 4E |.NPUT REQUIREMEN| 00003560: 54 53 3A 0D 20 20 20 20 20 20 20 20 20 20 20 20 |TS:. | 00003570: 20 20 20 C1 20 20 20 20 20 20 20 20 20 D4 48 45 | . .HE| 00003580: 20 4E 55 4D 42 45 52 20 4F 46 20 45 4E 54 52 49 | NUMBER OF ENTRI| 00003590: 45 53 20 49 4E 20 54 48 45 20 54 41 42 4C 45 2E |ES IN THE TABLE.| 000035A0: 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. | 000035B0: 24 30 32 2D 24 30 33 20 20 20 C1 20 50 4F 49 4E |$02-$03 . POIN| 000035C0: 54 45 52 20 54 4F 20 54 48 45 20 54 41 42 4C 45 |TER TO THE TABLE| 000035D0: 20 4F 46 20 43 4F 55 4E 54 45 52 53 20 41 4E 44 | OF COUNTERS AND| 000035E0: 20 52 4F 55 54 49 4E 45 0D 20 20 20 20 20 20 20 | ROUTINE. | 000035F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00003600: 20 20 41 44 44 52 45 53 53 45 53 2E 0D 0D 20 20 | ADDRESSES... | 00003610: 20 20 20 20 20 20 20 20 C4 45 53 43 52 49 50 54 | .ESCRIPT| 00003620: 49 4F 4E 3A 20 20 D4 48 49 53 20 52 4F 55 54 49 |ION: .HIS ROUTI| 00003630: 4E 45 20 43 4F 50 49 45 53 20 41 20 54 41 42 4C |NE COPIES A TABL| 00003640: 45 20 4F 46 20 53 55 42 52 4F 55 54 49 4E 45 20 |E OF SUBROUTINE | 00003650: 41 44 44 52 45 53 53 45 53 0D 20 20 20 20 20 20 |ADDRESSES. | 00003660: 20 20 20 20 41 4E 44 20 20 43 4F 55 4E 54 45 52 | AND COUNTER| 00003670: 20 20 56 41 4C 55 45 53 20 49 4E 54 4F 20 C7 C5 | VALUES INTO ..| 00003680: CF D3 27 53 20 54 41 42 4C 45 53 20 41 54 20 24 |..'S TABLES AT $| 00003690: 38 37 32 C4 20 41 4E 44 20 20 24 38 37 35 35 2E |872. AND $8755.| 000036A0: 20 20 D4 48 45 0D 20 20 20 20 20 20 20 20 20 20 | .HE. | 000036B0: 43 4F 55 4E 54 45 52 53 20 20 57 49 4C 4C 20 42 |COUNTERS WILL B| 000036C0: 45 20 44 45 43 52 45 4D 45 4E 54 45 44 20 4F 4E |E DECREMENTED ON| 000036D0: 20 45 41 43 48 20 43 41 4C 4C 20 54 4F 20 C9 D2 | EACH CALL TO ..| 000036E0: D1 D2 D4 CE 2E 20 20 D7 48 45 4E 20 20 54 48 45 |..... .HEN THE| 000036F0: 59 0D 20 20 20 20 20 20 20 20 20 20 52 45 41 43 |Y. REAC| 00003700: 48 20 5A 45 52 4F 2C 20 20 54 48 45 59 20 41 52 |H ZERO, THEY AR| 00003710: 45 20 52 45 53 45 54 20 41 4E 44 20 54 48 45 20 |E RESET AND THE | 00003720: 41 53 53 4F 43 49 41 54 45 44 20 52 4F 55 54 49 |ASSOCIATED ROUTI| 00003730: 4E 45 20 49 53 20 20 43 41 4C 4C 45 44 0D 20 20 |NE IS CALLED. | 00003740: 20 20 20 20 20 20 20 20 42 59 20 20 54 48 45 20 | BY THE | 00003750: 20 C7 C5 CF D3 20 4D 41 49 4E 20 4C 4F 4F 50 2E | .... MAIN LOOP.| 00003760: 20 20 D4 48 45 20 43 4F 4D 4D 41 4E 44 20 42 59 | .HE COMMAND BY| 00003770: 54 45 53 20 41 52 45 20 49 4E 49 54 49 41 4C 4C |TES ARE INITIALL| 00003780: 59 20 53 45 54 20 20 54 4F 0D 20 20 20 20 20 20 |Y SET TO. | 00003790: 20 20 20 20 44 49 53 41 42 4C 45 20 54 48 45 20 | DISABLE THE | 000037A0: 43 4F 55 4E 54 45 52 53 2E 20 D3 45 56 45 52 41 |COUNTERS. .EVERA| 000037B0: 4C 20 43 41 4C 4C 53 20 54 4F 20 C5 CE C1 C2 CC |L CALLS TO .....| 000037C0: C5 20 41 52 45 20 4E 45 45 44 45 44 20 54 4F 20 |. ARE NEEDED TO | 000037D0: 53 54 41 52 54 0D 20 20 20 20 20 20 20 20 20 20 |START. | 000037E0: 54 48 45 20 43 4F 55 4E 54 45 52 53 20 52 55 4E |THE COUNTERS RUN| 000037F0: 4E 49 4E 47 2C 20 20 4F 4E 45 20 46 4F 52 20 45 |NING, ONE FOR E| 00003800: 41 43 48 20 45 4E 54 52 59 20 49 4E 20 54 48 45 |ACH ENTRY IN THE| 00003810: 20 54 41 42 4C 45 2E 20 D4 48 45 20 54 41 42 4C | TABLE. .HE TABL| 00003820: 45 0D 20 20 20 20 20 20 20 20 20 20 43 4F 4E 53 |E. CONS| 00003830: 49 53 54 53 20 20 4F 46 20 20 50 41 49 52 53 20 |ISTS OF PAIRS | 00003840: 4F 46 20 57 4F 52 44 53 2E 20 20 D4 48 45 20 46 |OF WORDS. .HE F| 00003850: 49 52 53 54 20 49 53 20 54 48 45 20 20 41 44 44 |IRST IS THE ADD| 00003860: 52 45 53 53 20 20 4F 46 20 20 54 48 45 0D 20 20 |RESS OF THE. | 00003870: 20 20 20 20 20 20 20 20 53 55 42 52 4F 55 54 49 | SUBROUTI| 00003880: 4E 45 20 20 54 4F 20 42 45 20 45 58 45 43 55 54 |NE TO BE EXECUT| 00003890: 45 44 20 45 41 43 48 20 54 49 4D 45 20 54 48 45 |ED EACH TIME THE| 000038A0: 20 43 4F 55 4E 54 45 52 20 52 45 41 43 48 45 53 | COUNTER REACHES| 000038B0: 20 5A 45 52 4F 20 41 4E 44 0D 20 20 20 20 20 20 | ZERO AND. | 000038C0: 20 20 20 20 54 48 45 20 20 53 45 43 4F 4E 44 20 | THE SECOND | 000038D0: 20 49 53 20 20 54 48 45 20 20 43 4F 55 4E 54 45 | IS THE COUNTE| 000038E0: 52 20 56 41 4C 55 45 20 2E 20 20 D4 48 49 53 20 |R VALUE . .HIS | 000038F0: 20 41 50 50 45 41 52 53 20 20 54 4F 20 20 42 45 | APPEARS TO BE| 00003900: 20 20 54 48 45 0D 20 20 20 20 20 20 20 20 20 20 | THE. | 00003910: 52 55 44 49 4D 45 4E 54 53 20 20 4F 46 20 4D 55 |RUDIMENTS OF MU| 00003920: 4C 54 49 54 41 53 4B 49 4E 47 20 C7 C5 CF D3 2E |LTITASKING .....| 00003930: 20 20 D4 48 45 20 54 41 42 4C 45 20 4F 46 20 43 | .HE TABLE OF C| 00003940: 4F 4D 4D 41 4E 44 20 20 42 59 54 45 53 20 20 41 |OMMAND BYTES A| 00003950: 54 0D 20 20 20 20 20 20 20 20 20 20 24 38 37 31 |T. $871| 00003960: 39 20 20 41 52 45 20 20 42 49 54 20 20 4F 52 49 |9 ARE BIT ORI| 00003970: 45 4E 54 45 44 20 41 4E 44 20 4F 50 45 52 41 54 |ENTED AND OPERAT| 00003980: 45 20 41 43 43 4F 52 44 49 4E 47 20 54 4F 20 20 |E ACCORDING TO | 00003990: 54 48 45 20 46 4F 4C 4C 4F 57 49 4E 47 0D 20 20 |THE FOLLOWING. | 000039A0: 20 20 20 20 20 20 20 20 54 41 42 4C 45 3A 0D 20 | TABLE:. | 000039B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 C2 49 | .I| 000039C0: 54 20 37 20 2D 20 D4 49 4D 45 52 20 52 45 41 43 |T 7 - .IMER REAC| 000039D0: 48 45 44 20 5A 45 52 4F 2C 20 43 41 4C 4C 20 54 |HED ZERO, CALL T| 000039E0: 48 45 20 53 55 42 52 4F 55 54 49 4E 45 2E 0D 20 |HE SUBROUTINE.. | 000039F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 C2 49 | .I| 00003A00: 54 20 36 20 2D 20 C4 49 53 41 42 4C 45 20 54 48 |T 6 - .ISABLE TH| 00003A10: 45 20 45 58 45 43 55 54 49 4F 4E 20 4F 46 20 54 |E EXECUTION OF T| 00003A20: 48 45 20 52 4F 55 54 49 4E 45 2E 20 20 D4 48 49 |HE ROUTINE. .HI| 00003A30: 53 20 44 4F 45 53 20 CE CF D4 0D 20 20 20 20 20 |S DOES .... | 00003A40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00003A50: 20 20 41 46 46 45 43 54 20 54 48 45 20 43 4F 55 | AFFECT THE COU| 00003A60: 4E 54 45 52 2E 0D 20 20 20 20 20 20 20 20 20 20 |NTER.. | 00003A70: 20 20 20 20 20 C2 49 54 20 35 20 2D 20 C9 4E 49 | .IT 5 - .NI| 00003A80: 54 49 41 4C 4C 59 20 53 45 54 20 42 59 20 C3 CD |TIALLY SET BY ..| 00003A90: C4 D4 C2 CC 2C 20 20 43 41 55 53 45 53 20 54 48 |...., CAUSES TH| 00003AA0: 45 20 43 4F 55 4E 54 45 52 20 54 4F 20 53 54 4F |E COUNTER TO STO| 00003AB0: 50 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |P. | 00003AC0: 20 20 20 20 20 20 20 20 20 52 55 4E 4E 49 4E 47 | RUNNING| 00003AD0: 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. | 00003AE0: 20 C2 49 54 20 34 20 2D 20 D4 48 4F 55 47 48 20 | .IT 4 - .HOUGH | 00003AF0: 20 4E 4F 54 20 52 45 46 45 52 45 4E 43 45 44 20 | NOT REFERENCED | 00003B00: 41 4E 59 57 48 45 52 45 20 49 4E 20 54 48 45 20 |ANYWHERE IN THE | 00003B10: C7 C5 CF D3 20 20 CB 45 52 4E 41 4C 2C 0D 20 20 |.... .ERNAL,. | 00003B20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00003B30: 20 20 20 20 20 54 48 49 53 20 20 42 49 54 20 41 | THIS BIT A| 00003B40: 4C 53 4F 20 53 54 4F 50 53 20 54 48 45 20 43 4F |LSO STOPS THE CO| 00003B50: 55 4E 54 45 52 2E 20 20 D4 48 49 53 20 42 49 54 |UNTER. .HIS BIT| 00003B60: 20 20 49 53 20 20 CE CF D4 0D 20 20 20 20 20 20 | IS .... | 00003B70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00003B80: 20 54 4F 55 43 48 45 44 20 20 42 59 20 20 41 4E | TOUCHED BY AN| 00003B90: 59 20 20 4F 46 20 54 48 45 20 20 C7 C5 CF D3 20 |Y OF THE .... | 00003BA0: 20 52 4F 55 54 49 4E 45 53 2C 20 20 49 4E 43 4C | ROUTINES, INCL| 00003BB0: 55 44 49 4E 47 0D 20 20 20 20 20 20 20 20 20 20 |UDING. | 00003BC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 C5 CE C1 | ...| 00003BD0: C2 CC C5 2E 0D 0D 0D 20 20 20 20 20 20 20 20 20 |....... | 00003BE0: 20 C6 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 3A 20 | .UNCTION .AME: | 00003BF0: C3 CD C5 CE D5 D3 0D 20 20 20 20 20 20 20 20 20 |....... | 00003C00: 20 D0 55 52 50 4F 53 45 3A 20 C3 4C 4F 53 45 53 | .URPOSE: .LOSES| 00003C10: 20 41 4C 4C 20 4D 45 4E 55 20 4C 45 56 45 4C 53 | ALL MENU LEVELS| 00003C20: 2E 0D 20 20 20 20 20 20 20 20 20 20 C3 41 4C 4C |.. .ALL| 00003C30: 20 41 44 44 52 45 53 53 3A 20 24 C3 31 C2 C4 0D | ADDRESS: $.1...| 00003C40: 20 20 20 20 20 20 20 20 20 20 D0 52 45 50 41 52 | .REPAR| 00003C50: 41 54 4F 52 59 20 52 4F 55 54 49 4E 45 53 3A 20 |ATORY ROUTINES: | 00003C60: CD C5 CE D5 0D 0D 20 20 20 20 20 20 20 20 20 20 |...... | 00003C70: C4 45 53 43 52 49 50 54 49 4F 4E 3A 20 20 D4 48 |.ESCRIPTION: .H| 00003C80: 49 53 20 52 4F 55 54 49 4E 45 20 49 53 20 4E 4F |IS ROUTINE IS NO| 00003C90: 54 20 54 48 45 20 53 41 4D 45 20 C5 D2 C1 CD CE |T THE SAME .....| 00003CA0: D3 2E 20 20 D4 48 45 20 4D 45 4E 55 53 20 41 52 |.. .HE MENUS AR| 00003CB0: 45 0D 20 20 20 20 20 20 20 20 20 20 43 4C 45 41 |E. CLEA| 00003CC0: 52 45 44 20 20 4F 4E 45 20 41 54 20 41 20 54 49 |RED ONE AT A TI| 00003CD0: 4D 45 20 41 4E 44 20 54 48 45 20 50 52 45 56 49 |ME AND THE PREVI| 00003CE0: 4F 55 53 20 4C 45 56 45 4C 53 20 41 52 45 20 52 |OUS LEVELS ARE R| 00003CF0: 45 50 52 4F 43 45 53 53 45 44 20 49 4E 0D 20 20 |EPROCESSED IN. | 00003D00: 20 20 20 20 20 20 20 20 52 45 56 45 52 53 45 20 | REVERSE | 00003D10: 4F 52 44 45 52 20 55 4E 54 49 4C 20 41 4C 4C 20 |ORDER UNTIL ALL | 00003D20: 4D 45 4E 55 53 20 41 52 45 20 43 4C 4F 53 45 44 |MENUS ARE CLOSED| 00003D30: 2E 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 C6 55 |.... .U| 00003D40: 4E 43 54 49 4F 4E 20 CE 41 4D 45 3A 20 C3 CF CE |NCTION .AME: ...| 00003D50: D6 D2 D4 0D 20 20 20 20 20 20 20 20 20 20 D0 55 |.... .U| 00003D60: 52 50 4F 53 45 3A 20 C3 4F 4E 56 45 52 54 53 20 |RPOSE: .ONVERTS | 00003D70: 41 20 44 49 53 4B 20 54 4F 20 C7 C5 CF D3 20 46 |A DISK TO .... F| 00003D80: 4F 52 4D 41 54 2E 0D 20 20 20 20 20 20 20 20 20 |ORMAT.. | 00003D90: 20 C3 41 4C 4C 20 41 44 44 52 45 53 53 3A 20 24 | .ALL ADDRESS: $| 00003DA0: C3 31 C5 C1 0D 20 20 20 20 20 20 20 20 20 20 C5 |.1... .| 00003DB0: 52 52 4F 52 53 3A 20 D3 45 45 20 41 50 50 45 4E |RRORS: .EE APPEN| 00003DC0: 44 49 58 0D 0D 20 20 20 20 20 20 20 20 20 20 C4 |DIX.. .| 00003DD0: 45 53 43 52 49 50 54 49 4F 4E 3A 20 20 D4 48 49 |ESCRIPTION: .HI| 00003DE0: 53 20 20 52 4F 55 54 49 4E 45 20 20 4D 4F 44 49 |S ROUTINE MODI| 00003DF0: 46 49 45 53 20 20 54 48 45 20 20 44 49 52 45 43 |FIES THE DIREC| 00003E00: 54 4F 52 59 20 20 48 45 41 44 45 52 20 20 54 4F |TORY HEADER TO| 00003E10: 0D 20 20 20 20 20 20 20 20 20 20 49 4E 43 4C 55 |. INCLU| 00003E20: 44 45 20 54 48 45 20 C7 C5 CF D3 20 46 4F 52 4D |DE THE .... FORM| 00003E30: 41 54 20 4D 45 53 53 41 47 45 2E 20 C9 54 20 41 |AT MESSAGE. .T A| 00003E40: 4C 53 4F 20 41 4C 4C 4F 43 41 54 45 53 20 41 20 |LSO ALLOCATES A | 00003E50: 53 45 43 54 4F 52 20 54 4F 20 42 45 0D 20 20 20 |SECTOR TO BE. | 00003E60: 20 20 20 20 20 20 20 55 53 45 44 20 46 4F 52 20 | USED FOR | 00003E70: 54 48 45 20 42 4F 52 44 45 52 20 46 52 4F 4D 20 |THE BORDER FROM | 00003E80: C4 C5 D3 CB D4 CF D0 2E 0D 0D 0D 0D 0D 0D 0D 0D |................| 00003E90: 0D 0D 0D 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 |...... | 00003EA0: C7 C5 CF D3 20 CB 45 52 4E 41 4C 20 D2 4F 55 54 |.... .ERNAL .OUT| 00003EB0: 49 4E 45 53 20 20 20 20 20 20 20 20 20 20 20 20 |INES | 00003EC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00003ED0: 20 20 20 20 20 20 20 20 20 20 31 2D 31 37 0D 0D | 1-17..| 00003EE0: 0D 20 20 20 20 20 20 20 20 20 20 C6 55 4E 43 54 |. .UNCT| 00003EF0: 49 4F 4E 20 CE 41 4D 45 3A 20 C3 CF D0 D9 C2 0D |ION .AME: ......| 00003F00: 20 20 20 20 20 20 20 20 20 20 D0 55 52 50 4F 53 | .URPOS| 00003F10: 45 3A 20 C3 4F 50 49 45 53 20 41 20 42 4F 58 20 |E: .OPIES A BOX | 00003F20: 46 52 4F 4D 20 53 43 52 45 45 4E 20 32 20 54 4F |FROM SCREEN 2 TO| 00003F30: 20 53 43 52 45 45 4E 20 31 2E 0D 20 20 20 20 20 | SCREEN 1.. | 00003F40: 20 20 20 20 20 C3 41 4C 4C 20 41 44 44 52 45 53 | .ALL ADDRES| 00003F50: 53 3A 20 24 C3 31 32 C4 0D 20 20 20 20 20 20 20 |S: $.12.. | 00003F60: 20 20 20 C9 4E 50 55 54 20 52 45 51 55 49 52 45 | .NPUT REQUIRE| 00003F70: 4D 45 4E 54 53 3A 0D 20 20 20 20 20 20 20 20 20 |MENTS:. | 00003F80: 20 20 20 20 20 20 24 30 36 20 20 20 20 20 20 20 | $06 | 00003F90: D4 48 45 20 54 4F 50 20 4D 41 52 47 49 4E 2E 0D |.HE TOP MARGIN..| 00003FA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 | $| 00003FB0: 30 37 20 20 20 20 20 20 20 D4 48 45 20 42 4F 54 |07 .HE BOT| 00003FC0: 54 4F 4D 20 4D 41 52 47 49 4E 2E 0D 20 20 20 20 |TOM MARGIN.. | 00003FD0: 20 20 20 20 20 20 20 20 20 20 20 24 30 38 2D 24 | $08-$| 00003FE0: 30 39 20 20 20 D4 48 45 20 4C 45 46 54 20 4D 41 |09 .HE LEFT MA| 00003FF0: 52 47 49 4E 2E 0D 20 20 20 20 20 20 20 20 20 20 |RGIN.. | 00004000: 20 20 20 20 20 24 30 C1 2D 24 30 C2 20 20 20 D4 | $0.-$0. .| 00004010: 48 45 20 52 49 47 48 54 20 4D 41 52 47 49 4E 2E |HE RIGHT MARGIN.| 00004020: 0D 0D 20 20 20 20 20 20 20 20 20 20 C4 45 53 43 |.. .ESC| 00004030: 52 49 50 54 49 4F 4E 3A 20 20 D4 48 49 53 20 20 |RIPTION: .HIS | 00004040: 52 4F 55 54 49 4E 45 20 43 4F 50 49 45 53 20 41 |ROUTINE COPIES A| 00004050: 20 42 4F 58 20 46 52 4F 4D 20 53 43 52 45 45 4E | BOX FROM SCREEN| 00004060: 20 32 20 28 24 36 30 30 30 29 20 54 4F 0D 20 20 | 2 ($6000) TO. | 00004070: 20 20 20 20 20 20 20 20 53 43 52 45 45 4E 20 31 | SCREEN 1| 00004080: 20 28 24 C1 30 30 30 29 2E 20 20 CC 4F 43 41 54 | ($.000). .OCAT| 00004090: 49 4F 4E 20 24 32 C6 20 49 53 20 55 4E 41 46 46 |ION $2. IS UNAFF| 000040A0: 45 43 54 45 44 2E 20 D4 48 49 53 20 52 4F 55 54 |ECTED. .HIS ROUT| 000040B0: 49 4E 45 20 43 41 4C 4C 53 0D 20 20 20 20 20 20 |INE CALLS. | 000040C0: 20 20 20 20 C3 CF D0 D9 CC 20 52 45 50 45 41 54 | ..... REPEAT| 000040D0: 45 44 4C 59 20 54 4F 20 43 4F 50 59 20 45 41 43 |EDLY TO COPY EAC| 000040E0: 48 20 4C 49 4E 45 20 4F 46 20 54 48 45 20 42 4F |H LINE OF THE BO| 000040F0: 58 2E 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 C6 |X.... .| 00004100: 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 3A 20 C3 CF |UNCTION .AME: ..| 00004110: D0 D9 C2 32 0D 20 20 20 20 20 20 20 20 20 20 D0 |...2. .| 00004120: 55 52 50 4F 53 45 3A 20 C9 44 45 4E 54 49 43 41 |URPOSE: .DENTICA| 00004130: 4C 20 54 4F 20 C3 CF D0 D9 C2 2C 20 42 55 54 20 |L TO ....., BUT | 00004140: 57 49 54 48 20 49 4E 4C 49 4E 45 20 44 41 54 41 |WITH INLINE DATA| 00004150: 2E 0D 20 20 20 20 20 20 20 20 20 20 C3 41 4C 4C |.. .ALL| 00004160: 20 41 44 44 52 45 53 53 3A 20 24 C3 31 C1 35 0D | ADDRESS: $.1.5.| 00004170: 0D 20 20 20 20 20 20 20 20 20 20 C4 45 53 43 52 |. .ESCR| 00004180: 49 50 54 49 4F 4E 3A 20 20 D4 48 49 53 20 20 52 |IPTION: .HIS R| 00004190: 4F 55 54 49 4E 45 20 43 4F 50 49 45 53 20 41 20 |OUTINE COPIES A | 000041A0: 42 4F 58 20 46 52 4F 4D 20 53 43 52 45 45 4E 20 |BOX FROM SCREEN | 000041B0: 32 20 28 24 36 30 30 30 29 20 54 4F 0D 20 20 20 |2 ($6000) TO. | 000041C0: 20 20 20 20 20 20 20 53 43 52 45 45 4E 20 31 20 | SCREEN 1 | 000041D0: 28 24 C1 30 30 30 29 2E 20 20 D4 48 45 20 42 4F |($.000). .HE BO| 000041E0: 58 20 44 45 53 43 52 49 50 54 4F 52 20 49 53 20 |X DESCRIPTOR IS | 000041F0: 49 4E 4C 49 4E 45 20 57 49 54 48 20 54 48 45 20 |INLINE WITH THE | 00004200: 20 43 41 4C 4C 49 4E 47 0D 20 20 20 20 20 20 20 | CALLING. | 00004210: 20 20 20 43 4F 44 45 2E 20 20 D3 45 45 20 D0 C6 | CODE. .EE ..| 00004220: C9 CC CC 32 20 46 4F 52 20 41 4E 20 45 58 41 4D |...2 FOR AN EXAM| 00004230: 50 4C 45 2E 0D 0D 0D 20 20 20 20 20 20 20 20 20 |PLE.... | 00004240: 20 C6 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 3A 20 | .UNCTION .AME: | 00004250: C3 CF D0 D9 C2 33 0D 20 20 20 20 20 20 20 20 20 |.....3. | 00004260: 20 D0 55 52 50 4F 53 45 3A 20 C3 4F 50 49 45 53 | .URPOSE: .OPIES| 00004270: 20 41 20 42 4F 58 20 46 52 4F 4D 20 53 43 52 45 | A BOX FROM SCRE| 00004280: 45 4E 20 32 20 54 4F 20 53 43 52 45 45 4E 20 31 |EN 2 TO SCREEN 1| 00004290: 2E 0D 20 20 20 20 20 20 20 20 20 20 C3 41 4C 4C |.. .ALL| 000042A0: 20 41 44 44 52 45 53 53 3A 20 24 C3 32 35 30 0D | ADDRESS: $.250.| 000042B0: 20 20 20 20 20 20 20 20 20 20 C9 4E 50 55 54 20 | .NPUT | 000042C0: 52 45 51 55 49 52 45 4D 45 4E 54 53 3A 0D 20 20 |REQUIREMENTS:. | 000042D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 24 30 36 | $06| 000042E0: 20 20 20 20 20 20 20 D4 48 45 20 54 4F 50 20 4D | .HE TOP M| 000042F0: 41 52 47 49 4E 2E 0D 20 20 20 20 20 20 20 20 20 |ARGIN.. | 00004300: 20 20 20 20 20 20 24 30 37 20 20 20 20 20 20 20 | $07 | 00004310: D4 48 45 20 42 4F 54 54 4F 4D 20 4D 41 52 47 49 |.HE BOTTOM MARGI| 00004320: 4E 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 |N.. | 00004330: 20 20 24 30 38 2D 24 30 39 20 20 20 D4 48 45 20 | $08-$09 .HE | 00004340: 4C 45 46 54 20 4D 41 52 47 49 4E 2E 0D 20 20 20 |LEFT MARGIN.. | 00004350: 20 20 20 20 20 20 20 20 20 20 20 20 24 30 C1 2D | $0.-| 00004360: 24 30 C2 20 20 20 D4 48 45 20 52 49 47 48 54 20 |$0. .HE RIGHT | 00004370: 4D 41 52 47 49 4E 2E 0D 0D 20 20 20 20 20 20 20 |MARGIN... | 00004380: 20 20 20 C4 45 53 43 52 49 50 54 49 4F 4E 3A 20 | .ESCRIPTION: | 00004390: 20 D4 48 49 53 20 20 52 4F 55 54 49 4E 45 20 43 | .HIS ROUTINE C| 000043A0: 4F 50 49 45 53 20 41 20 42 4F 58 20 46 52 4F 4D |OPIES A BOX FROM| 000043B0: 20 53 43 52 45 45 4E 20 31 20 28 24 C1 30 30 30 | SCREEN 1 ($.000| 000043C0: 29 20 54 4F 0D 20 20 20 20 20 20 20 20 20 20 53 |) TO. S| 000043D0: 43 52 45 45 4E 20 32 20 28 24 36 30 30 30 29 2E |CREEN 2 ($6000).| 000043E0: 20 20 CC 4F 43 41 54 49 4F 4E 20 24 32 C6 20 49 | .OCATION $2. I| 000043F0: 53 20 55 4E 41 46 46 45 43 54 45 44 2E 20 D4 48 |S UNAFFECTED. .H| 00004400: 49 53 20 52 4F 55 54 49 4E 45 20 43 41 4C 4C 53 |IS ROUTINE CALLS| 00004410: 0D 20 20 20 20 20 20 20 20 20 20 C3 CF D0 D9 CC |. .....| 00004420: 20 52 45 50 45 41 54 45 44 4C 59 20 54 4F 20 43 | REPEATEDLY TO C| 00004430: 4F 50 59 20 45 41 43 48 20 4C 49 4E 45 20 4F 46 |OPY EACH LINE OF| 00004440: 20 54 48 45 20 42 4F 58 2E 0D 0D 0D 20 20 20 20 | THE BOX.... | 00004450: 20 20 20 20 20 20 C6 55 4E 43 54 49 4F 4E 20 CE | .UNCTION .| 00004460: 41 4D 45 3A 20 C3 CF D0 D9 C2 34 0D 20 20 20 20 |AME: .....4. | 00004470: 20 20 20 20 20 20 D0 55 52 50 4F 53 45 3A 20 C9 | .URPOSE: .| 00004480: 44 45 4E 54 49 43 41 4C 20 54 4F 20 C3 CF D0 D9 |DENTICAL TO ....| 00004490: C2 33 2C 20 42 55 54 20 57 49 54 48 20 49 4E 4C |.3, BUT WITH INL| 000044A0: 49 4E 45 20 44 41 54 41 2E 0D 20 20 20 20 20 20 |INE DATA.. | 000044B0: 20 20 20 20 C3 41 4C 4C 20 41 44 44 52 45 53 53 | .ALL ADDRESS| 000044C0: 3A 20 24 C3 32 35 33 0D 0D 20 20 20 20 20 20 20 |: $.253.. | 000044D0: 20 20 20 C4 45 53 43 52 49 50 54 49 4F 4E 3A 20 | .ESCRIPTION: | 000044E0: 20 D4 48 49 53 20 20 52 4F 55 54 49 4E 45 20 43 | .HIS ROUTINE C| 000044F0: 4F 50 49 45 53 20 41 20 42 4F 58 20 46 52 4F 4D |OPIES A BOX FROM| 00004500: 20 53 43 52 45 45 4E 20 31 20 28 24 C1 30 30 30 | SCREEN 1 ($.000| 00004510: 29 20 54 4F 0D 20 20 20 20 20 20 20 20 20 20 53 |) TO. S| 00004520: 43 52 45 45 4E 20 32 20 28 24 36 30 30 30 29 2E |CREEN 2 ($6000).| 00004530: 20 20 D4 48 45 20 42 4F 58 20 44 45 53 43 52 49 | .HE BOX DESCRI| 00004540: 50 54 4F 52 20 49 53 20 49 4E 4C 49 4E 45 20 57 |PTOR IS INLINE W| 00004550: 49 54 48 20 54 48 45 20 20 43 41 4C 4C 49 4E 47 |ITH THE CALLING| 00004560: 0D 20 20 20 20 20 20 20 20 20 20 43 4F 44 45 2E |. CODE.| 00004570: 20 20 D3 45 45 20 D0 C6 C9 CC CC 32 20 46 4F 52 | .EE .....2 FOR| 00004580: 20 41 4E 20 45 58 41 4D 50 4C 45 2E 0D 0D 0D 0D | AN EXAMPLE.....| 00004590: 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D |................| 000045A0: 20 20 20 20 20 20 20 20 20 20 C7 C5 CF D3 20 CB | .... .| 000045B0: 45 52 4E 41 4C 20 D2 4F 55 54 49 4E 45 53 20 20 |ERNAL .OUTINES | 000045C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000045D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000045E0: 20 20 20 20 31 2D 31 38 0D 0D 0D 20 20 20 20 20 | 1-18... | 000045F0: 20 20 20 20 20 C6 55 4E 43 54 49 4F 4E 20 CE 41 | .UNCTION .A| 00004600: 4D 45 3A 20 C3 CF D0 D9 CC 0D 20 20 20 20 20 20 |ME: ...... | 00004610: 20 20 20 20 D0 55 52 50 4F 53 45 3A 20 C3 4F 50 | .URPOSE: .OP| 00004620: 49 45 53 20 41 20 48 4F 52 49 5A 4F 4E 41 4C 20 |IES A HORIZONAL | 00004630: 4C 49 4E 45 20 46 52 4F 4D 20 53 43 52 45 45 4E |LINE FROM SCREEN| 00004640: 20 32 20 54 4F 20 53 43 52 45 45 4E 20 31 2E 0D | 2 TO SCREEN 1..| 00004650: 20 20 20 20 20 20 20 20 20 20 C3 41 4C 4C 20 41 | .ALL A| 00004660: 44 44 52 45 53 53 3A 20 24 C3 31 31 C5 0D 20 20 |DDRESS: $.11.. | 00004670: 20 20 20 20 20 20 20 20 C9 4E 50 55 54 20 52 45 | .NPUT RE| 00004680: 51 55 49 52 45 4D 45 4E 54 53 3A 0D 20 20 20 20 |QUIREMENTS:. | 00004690: 20 20 20 20 20 20 20 20 20 20 20 24 30 38 2D 24 | $08-$| 000046A0: 30 39 20 20 20 D4 48 45 20 4C 45 46 54 20 4D 41 |09 .HE LEFT MA| 000046B0: 52 47 49 4E 2E 0D 20 20 20 20 20 20 20 20 20 20 |RGIN.. | 000046C0: 20 20 20 20 20 24 30 C1 2D 24 30 C2 20 20 20 D4 | $0.-$0. .| 000046D0: 48 45 20 52 49 47 48 54 20 4D 41 52 47 49 4E 2E |HE RIGHT MARGIN.| 000046E0: 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. | 000046F0: 24 31 38 20 20 20 20 20 20 20 D4 48 45 20 52 4F |$18 .HE RO| 00004700: 57 20 4E 55 4D 42 45 52 2E 0D 0D 20 20 20 20 20 |W NUMBER... | 00004710: 20 20 20 20 20 C4 45 53 43 52 49 50 54 49 4F 4E | .ESCRIPTION| 00004720: 3A 20 20 D4 48 49 53 20 52 4F 55 54 49 4E 45 20 |: .HIS ROUTINE | 00004730: 43 4F 50 49 45 53 20 41 20 48 4F 52 49 5A 4F 4E |COPIES A HORIZON| 00004740: 54 41 4C 20 4C 49 4E 45 20 46 52 4F 4D 20 53 43 |TAL LINE FROM SC| 00004750: 52 45 45 4E 20 32 0D 20 20 20 20 20 20 20 20 20 |REEN 2. | 00004760: 20 28 24 36 30 30 30 29 20 54 4F 20 53 43 52 45 | ($6000) TO SCRE| 00004770: 45 4E 20 31 20 28 24 C1 30 30 30 29 2E 20 CC 4F |EN 1 ($.000). .O| 00004780: 43 41 54 49 4F 4E 20 24 32 C6 20 49 53 20 55 4E |CATION $2. IS UN| 00004790: 41 46 46 45 43 54 45 44 2E 0D 0D 0D 20 20 20 20 |AFFECTED.... | 000047A0: 20 20 20 20 20 20 C6 55 4E 43 54 49 4F 4E 20 CE | .UNCTION .| 000047B0: 41 4D 45 3A 20 C3 CF D0 D9 D3 D0 0D 20 20 20 20 |AME: ....... | 000047C0: 20 20 20 20 20 20 D0 55 52 50 4F 53 45 3A 20 C3 | .URPOSE: .| 000047D0: 4F 50 49 45 53 20 41 20 53 50 52 49 54 45 20 49 |OPIES A SPRITE I| 000047E0: 4E 54 4F 20 C7 C5 CF D3 27 53 20 53 54 4F 52 41 |NTO ....'S STORA| 000047F0: 47 45 20 41 52 45 41 2E 0D 20 20 20 20 20 20 20 |GE AREA.. | 00004800: 20 20 20 C3 41 4C 4C 20 41 44 44 52 45 53 53 3A | .ALL ADDRESS:| 00004810: 20 24 C3 31 C3 36 0D 20 20 20 20 20 20 20 20 20 | $.1.6. | 00004820: 20 C9 4E 50 55 54 20 52 45 51 55 49 52 45 4D 45 | .NPUT REQUIREME| 00004830: 4E 54 53 3A 0D 20 20 20 20 20 20 20 20 20 20 20 |NTS:. | 00004840: 20 20 20 20 24 30 38 20 20 20 20 20 20 20 D4 48 | $08 .H| 00004850: 45 20 53 50 52 49 54 45 20 4E 55 4D 42 45 52 20 |E SPRITE NUMBER | 00004860: 28 30 2D 37 29 2E 0D 20 20 20 20 20 20 20 20 20 |(0-7).. | 00004870: 20 20 20 20 20 20 24 30 C1 2D 24 30 C2 20 20 20 | $0.-$0. | 00004880: D0 4F 49 4E 54 45 52 20 54 4F 20 54 48 45 20 53 |.OINTER TO THE S| 00004890: 50 52 49 54 45 20 44 41 54 41 2E 0D 0D 20 20 20 |PRITE DATA... | 000048A0: 20 20 20 20 20 20 20 C4 45 53 43 52 49 50 54 49 | .ESCRIPTI| 000048B0: 4F 4E 3A 20 20 D4 48 49 53 20 52 4F 55 54 49 4E |ON: .HIS ROUTIN| 000048C0: 45 20 53 49 4D 50 4C 59 20 43 4F 50 49 45 53 20 |E SIMPLY COPIES | 000048D0: 36 33 20 42 59 54 45 53 20 4F 46 20 44 41 54 41 |63 BYTES OF DATA| 000048E0: 20 50 4F 49 4E 54 45 44 0D 20 20 20 20 20 20 20 | POINTED. | 000048F0: 20 20 20 54 4F 20 20 42 59 20 20 24 30 C1 2D 24 | TO BY $0.-$| 00004900: 30 C2 20 54 4F 20 54 48 45 20 53 50 45 43 49 46 |0. TO THE SPECIF| 00004910: 49 45 44 20 53 50 52 49 54 45 20 42 4C 4F 43 4B |IED SPRITE BLOCK| 00004920: 2E 20 20 C7 C5 CF D3 20 55 53 45 53 20 20 53 50 |. .... USES SP| 00004930: 52 49 54 45 0D 20 20 20 20 20 20 20 20 20 20 42 |RITE. B| 00004940: 4C 4F 43 4B 53 20 34 30 20 54 4F 20 34 37 2E 0D |LOCKS 40 TO 47..| 00004950: 0D 0D 20 20 20 20 20 20 20 20 20 20 C6 55 4E 43 |.. .UNC| 00004960: 54 49 4F 4E 20 CE 41 4D 45 3A 20 C3 D5 D2 D3 CF |TION .AME: .....| 00004970: C6 0D 20 20 20 20 20 20 20 20 20 20 D0 55 52 50 |.. .URP| 00004980: 4F 53 45 3A 20 D4 55 52 4E 20 4F 46 46 20 54 45 |OSE: .URN OFF TE| 00004990: 58 54 20 43 55 52 53 4F 52 2E 0D 20 20 20 20 20 |XT CURSOR.. | 000049A0: 20 20 20 20 20 C3 41 4C 4C 20 41 44 44 52 45 53 | .ALL ADDRES| 000049B0: 53 3A 20 24 C3 32 39 C5 0D 20 20 20 20 20 20 20 |S: $.29.. | 000049C0: 20 20 20 CF 55 54 50 55 54 3A 0D 20 20 20 20 20 | .UTPUT:. | 000049D0: 20 20 20 20 20 20 20 20 20 20 24 38 34 C2 34 20 | $84.4 | 000049E0: 20 20 20 20 C2 49 54 20 36 20 49 53 20 43 4C 45 | .IT 6 IS CLE| 000049F0: 41 52 45 44 2E 0D 20 20 20 20 20 20 20 20 20 20 |ARED.. | 00004A00: D0 52 45 50 41 52 41 54 4F 52 59 20 52 4F 55 54 |.REPARATORY ROUT| 00004A10: 49 4E 45 53 3A 20 C3 D5 D2 D3 CF CE 0D 0D 20 20 |INES: ........ | 00004A20: 20 20 20 20 20 20 20 20 C4 45 53 43 52 49 50 54 | .ESCRIPT| 00004A30: 49 4F 4E 3A 20 20 D3 50 52 49 54 45 20 31 20 28 |ION: .PRITE 1 (| 00004A40: C7 C5 CF D3 27 53 20 54 45 58 54 20 43 55 52 53 |....'S TEXT CURS| 00004A50: 4F 52 29 20 49 53 20 54 55 52 4E 45 44 20 4F 46 |OR) IS TURNED OF| 00004A60: 46 2C 20 20 42 49 54 20 36 0D 20 20 20 20 20 20 |F, BIT 6. | 00004A70: 20 20 20 20 4F 46 20 4C 4F 43 41 54 49 4F 4E 20 | OF LOCATION | 00004A80: 24 38 34 C2 34 20 49 53 20 52 45 53 45 54 2E 20 |$84.4 IS RESET. | 00004A90: D4 48 45 20 42 4C 49 4E 4B 20 52 41 54 45 20 49 |.HE BLINK RATE I| 00004AA0: 53 20 53 45 54 20 54 4F 20 36 30 20 28 4F 4E 43 |S SET TO 60 (ONC| 00004AB0: 45 20 50 45 52 0D 20 20 20 20 20 20 20 20 20 20 |E PER. | 00004AC0: 53 45 43 4F 4E 44 29 2E 0D 0D 0D 20 20 20 20 20 |SECOND).... | 00004AD0: 20 20 20 20 20 C6 55 4E 43 54 49 4F 4E 20 CE 41 | .UNCTION .A| 00004AE0: 4D 45 3A 20 C3 D5 D2 D3 CF CE 0D 20 20 20 20 20 |ME: ....... | 00004AF0: 20 20 20 20 20 D0 55 52 50 4F 53 45 3A 20 D4 55 | .URPOSE: .U| 00004B00: 52 4E 20 4F 4E 20 54 45 58 54 20 43 55 52 53 4F |RN ON TEXT CURSO| 00004B10: 52 2E 0D 20 20 20 20 20 20 20 20 20 20 C3 41 4C |R.. .AL| 00004B20: 4C 20 41 44 44 52 45 53 53 3A 20 24 C3 32 39 C2 |L ADDRESS: $.29.| 00004B30: 0D 20 20 20 20 20 20 20 20 20 20 C9 4E 50 55 54 |. .NPUT| 00004B40: 20 52 45 51 55 49 52 45 4D 45 4E 54 53 3A 0D 20 | REQUIREMENTS:. | 00004B50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 38 | $8| 00004B60: 34 C2 C5 2D 24 38 34 C2 C6 20 C3 4F 4C 55 4D 4E |4..-$84.. .OLUMN| 00004B70: 20 54 4F 20 50 4C 41 43 45 20 43 55 52 53 4F 52 | TO PLACE CURSOR| 00004B80: 20 49 4E 2E 0D 20 20 20 20 20 20 20 20 20 20 20 | IN.. | 00004B90: 20 20 20 20 24 38 34 C3 30 20 20 20 20 20 D2 4F | $84.0 .O| 00004BA0: 57 20 54 4F 20 50 4C 41 43 45 20 43 55 52 53 4F |W TO PLACE CURSO| 00004BB0: 52 20 4F 4E 2E 0D 20 20 20 20 20 20 20 20 20 20 |R ON.. | 00004BC0: CF 55 54 50 55 54 3A 0D 20 20 20 20 20 20 20 20 |.UTPUT:. | 00004BD0: 20 20 20 20 20 20 20 24 38 34 C2 34 20 20 20 20 | $84.4 | 00004BE0: 20 C2 49 54 20 36 20 49 53 20 53 45 54 2E 0D 0D | .IT 6 IS SET...| 00004BF0: 20 20 20 20 20 20 20 20 20 20 C4 45 53 43 52 49 | .ESCRI| 00004C00: 50 54 49 4F 4E 3A 20 D4 55 52 4E 53 20 4F 4E 20 |PTION: .URNS ON | 00004C10: 53 50 52 49 54 45 20 31 20 41 4E 44 20 50 4F 53 |SPRITE 1 AND POS| 00004C20: 49 54 49 4F 4E 53 20 49 54 2E 20 C9 54 20 41 4C |ITIONS IT. .T AL| 00004C30: 53 4F 20 53 45 54 53 20 42 49 54 0D 20 20 20 20 |SO SETS BIT. | 00004C40: 20 20 20 20 20 20 36 20 20 4F 46 20 20 4C 4F 43 | 6 OF LOC| 00004C50: 41 54 49 4F 4E 20 20 24 38 34 C2 34 2E 20 20 D4 |ATION $84.4. .| 00004C60: 48 45 20 42 4C 49 4E 4B 20 52 41 54 45 20 49 53 |HE BLINK RATE IS| 00004C70: 20 53 45 54 20 54 4F 20 20 36 30 2C 20 20 4F 4E | SET TO 60, ON| 00004C80: 43 45 20 20 50 45 52 0D 20 20 20 20 20 20 20 20 |CE PER. | 00004C90: 20 20 53 45 43 4F 4E 44 2E 20 D3 50 52 49 54 45 | SECOND. .PRITE| 00004CA0: 20 31 20 49 53 20 54 48 45 20 54 45 58 54 20 43 | 1 IS THE TEXT C| 00004CB0: 55 52 53 4F 52 20 46 4F 52 20 C7 C5 CF D3 2E 0D |URSOR FOR ......| 00004CC0: 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 20 |............... | 00004CD0: 20 20 20 20 20 20 20 20 20 C7 C5 CF D3 20 CB 45 | .... .E| 00004CE0: 52 4E 41 4C 20 D2 4F 55 54 49 4E 45 53 20 20 20 |RNAL .OUTINES | 00004CF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00004D00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00004D10: 20 20 20 31 2D 31 39 0D 0D 0D 20 20 20 20 20 20 | 1-19... | 00004D20: 20 20 20 20 C6 55 4E 43 54 49 4F 4E 20 CE 41 4D | .UNCTION .AM| 00004D30: 45 3A 20 C3 D7 C9 C4 D4 C8 0D 20 20 20 20 20 20 |E: ....... | 00004D40: 20 20 20 20 D0 55 52 50 4F 53 45 3A 20 D2 45 54 | .URPOSE: .ET| 00004D50: 55 52 4E 53 20 54 48 45 20 57 49 44 54 48 20 4F |URNS THE WIDTH O| 00004D60: 46 20 41 20 43 48 41 52 41 43 54 45 52 2E 0D 20 |F A CHARACTER.. | 00004D70: 20 20 20 20 20 20 20 20 20 C3 41 4C 4C 20 41 44 | .ALL AD| 00004D80: 44 52 45 53 53 3A 20 24 C3 31 C3 39 0D 20 20 20 |DRESS: $.1.9. | 00004D90: 20 20 20 20 20 20 20 C9 4E 50 55 54 20 52 45 51 | .NPUT REQ| 00004DA0: 55 49 52 45 4D 45 4E 54 53 3A 0D 20 20 20 20 20 |UIREMENTS:. | 00004DB0: 20 20 20 20 20 20 20 20 20 20 C1 20 20 20 20 20 | . | 00004DC0: 20 20 20 20 D4 48 45 20 C1 D3 C3 C9 C9 20 56 41 | .HE ..... VA| 00004DD0: 4C 55 45 20 4F 46 20 54 48 45 20 43 48 41 52 41 |LUE OF THE CHARA| 00004DE0: 43 54 45 52 2E 0D 20 20 20 20 20 20 20 20 20 20 |CTER.. | 00004DF0: CF 55 54 50 55 54 3A 0D 20 20 20 20 20 20 20 20 |.UTPUT:. | 00004E00: 20 20 20 20 20 20 20 C1 20 20 20 20 20 20 20 20 | . | 00004E10: 20 D4 48 45 20 57 49 44 54 48 20 4F 46 20 54 48 | .HE WIDTH OF TH| 00004E20: 45 20 43 48 41 52 41 43 54 45 52 2E 0D 0D 20 20 |E CHARACTER... | 00004E30: 20 20 20 20 20 20 20 20 C4 45 53 43 52 49 50 54 | .ESCRIPT| 00004E40: 49 4F 4E 3A 20 20 D4 48 49 53 20 52 4F 55 54 49 |ION: .HIS ROUTI| 00004E50: 4E 45 20 53 49 4D 50 4C 59 20 54 41 4B 45 53 20 |NE SIMPLY TAKES | 00004E60: 54 48 45 20 44 49 46 46 45 52 45 4E 43 45 20 4F |THE DIFFERENCE O| 00004E70: 46 20 54 48 45 20 42 49 54 0D 20 20 20 20 20 20 |F THE BIT. | 00004E80: 20 20 20 20 53 54 52 45 41 4D 20 49 4E 44 49 43 | STREAM INDIC| 00004E90: 45 53 20 54 4F 20 47 45 54 20 54 48 45 20 43 48 |ES TO GET THE CH| 00004EA0: 41 52 41 43 54 45 52 53 20 57 49 44 54 48 2E 20 |ARACTERS WIDTH. | 00004EB0: 20 D4 48 45 20 44 45 4C 45 54 45 20 43 48 41 52 | .HE DELETE CHAR| 00004EC0: 41 43 54 45 52 0D 20 20 20 20 20 20 20 20 20 20 |ACTER. | 00004ED0: 48 41 53 20 20 49 54 53 20 20 57 49 44 54 48 20 |HAS ITS WIDTH | 00004EE0: 20 4C 4F 41 44 45 44 20 46 52 4F 4D 20 24 38 38 | LOADED FROM $88| 00004EF0: 30 37 2E 20 20 D4 48 49 53 20 52 4F 55 54 49 4E |07. .HIS ROUTIN| 00004F00: 45 20 20 49 53 20 20 43 41 4C 4C 45 44 20 20 42 |E IS CALLED B| 00004F10: 59 0D 20 20 20 20 20 20 20 20 20 20 C3 C8 C1 D2 |Y. ....| 00004F20: D3 D4 2E 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 |...... | 00004F30: C6 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 3A 20 C3 |.UNCTION .AME: .| 00004F40: D7 D2 C9 D4 C5 0D 20 20 20 20 20 20 20 20 20 20 |...... | 00004F50: D0 55 52 50 4F 53 45 3A 20 C3 4F 4E 44 49 54 49 |.URPOSE: .ONDITI| 00004F60: 4F 4E 41 4C 4C 59 20 57 52 49 54 45 20 41 20 53 |ONALLY WRITE A S| 00004F70: 45 43 54 4F 52 20 54 4F 20 44 49 53 4B 2E 0D 20 |ECTOR TO DISK.. | 00004F80: 20 20 20 20 20 20 20 20 20 C3 41 4C 4C 20 41 44 | .ALL AD| 00004F90: 44 52 45 53 53 3A 20 24 C3 32 32 33 0D 20 20 20 |DRESS: $.223. | 00004FA0: 20 20 20 20 20 20 20 C9 4E 50 55 54 20 52 45 51 | .NPUT REQ| 00004FB0: 55 49 52 45 4D 45 4E 54 53 3A 0D 20 20 20 20 20 |UIREMENTS:. | 00004FC0: 20 20 20 20 20 20 20 20 20 20 24 30 34 20 20 20 | $04 | 00004FD0: 20 20 20 20 D4 52 41 43 4B 20 4E 55 4D 42 45 52 | .RACK NUMBER| 00004FE0: 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. | 00004FF0: 20 24 30 35 20 20 20 20 20 20 20 D3 45 43 54 4F | $05 .ECTO| 00005000: 52 20 4E 55 4D 42 45 52 2E 0D 20 20 20 20 20 20 |R NUMBER.. | 00005010: 20 20 20 20 20 20 20 20 20 24 30 C1 2D 24 30 C2 | $0.-$0.| 00005020: 20 20 20 D0 4F 49 4E 54 45 52 20 54 4F 20 44 41 | .OINTER TO DA| 00005030: 54 41 20 42 55 46 46 45 52 2E 0D 20 20 20 20 20 |TA BUFFER.. | 00005040: 20 20 20 20 20 D0 52 45 50 41 52 41 54 4F 52 59 | .REPARATORY| 00005050: 20 52 4F 55 54 49 4E 45 53 3A 20 C4 D3 C5 D4 D5 | ROUTINES: .....| 00005060: D0 0D 20 20 20 20 20 20 20 20 20 20 C5 52 52 4F |.. .RRO| 00005070: 52 53 3A 20 D3 45 45 20 41 50 50 45 4E 44 49 58 |RS: .EE APPENDIX| 00005080: 20 C9 2E 0D 0D 20 20 20 20 20 20 20 20 20 20 C4 | .... .| 00005090: 45 53 43 52 49 50 54 49 4F 4E 3A 20 D4 48 45 20 |ESCRIPTION: .HE | 000050A0: 46 49 52 53 54 20 54 48 49 4E 47 20 54 48 49 53 |FIRST THING THIS| 000050B0: 20 52 4F 55 54 49 4E 45 20 44 4F 45 53 20 49 53 | ROUTINE DOES IS| 000050C0: 20 54 52 59 20 54 4F 20 52 45 41 44 20 54 48 45 | TRY TO READ THE| 000050D0: 0D 20 20 20 20 20 20 20 20 20 20 44 45 53 49 52 |. DESIR| 000050E0: 45 44 20 20 53 45 43 54 4F 52 2E 20 20 C9 46 20 |ED SECTOR. .F | 000050F0: 54 48 45 20 52 45 41 44 20 53 55 43 43 45 45 44 |THE READ SUCCEED| 00005100: 53 2C 20 20 4E 4F 54 48 49 4E 47 20 20 48 41 50 |S, NOTHING HAP| 00005110: 50 45 4E 53 2E 20 20 D4 48 52 45 45 0D 20 20 20 |PENS. .HREE. | 00005120: 20 20 20 20 20 20 20 41 54 54 45 4D 50 54 53 20 | ATTEMPTS | 00005130: 41 52 45 20 4D 41 44 45 20 41 54 20 54 48 45 20 |ARE MADE AT THE | 00005140: 52 45 41 44 2E 20 20 20 C1 46 54 45 52 20 54 48 |READ. .FTER TH| 00005150: 45 53 45 20 20 52 45 41 44 20 20 41 54 54 45 4D |ESE READ ATTEM| 00005160: 50 54 53 2C 20 54 48 45 0D 20 20 20 20 20 20 20 |PTS, THE. | 00005170: 20 20 20 53 45 43 54 4F 52 20 49 53 20 57 52 49 | SECTOR IS WRI| 00005180: 54 54 45 4E 20 54 4F 20 54 48 45 20 44 49 53 4B |TTEN TO THE DISK| 00005190: 2C 20 42 59 20 20 43 41 4C 4C 49 4E 47 20 D7 D2 |, BY CALLING ..| 000051A0: C9 D4 C5 32 2E 20 20 20 C9 46 20 54 48 45 20 57 |...2. .F THE W| 000051B0: 52 49 54 45 0D 20 20 20 20 20 20 20 20 20 20 53 |RITE. S| 000051C0: 55 43 43 45 45 44 45 44 20 20 57 49 54 48 4F 55 |UCCEEDED WITHOU| 000051D0: 54 20 41 4E 59 20 45 52 52 4F 52 53 2C 20 20 54 |T ANY ERRORS, T| 000051E0: 48 45 4E 20 54 48 45 20 52 4F 55 54 49 4E 45 20 |HEN THE ROUTINE | 000051F0: 52 45 53 54 41 52 54 53 20 49 54 53 45 4C 46 2E |RESTARTS ITSELF.| 00005200: 0D 20 20 20 20 20 20 20 20 20 20 C9 54 20 57 49 |. .T WI| 00005210: 4C 4C 20 4D 41 4B 45 20 46 49 56 45 20 41 54 54 |LL MAKE FIVE ATT| 00005220: 45 4D 50 54 53 20 41 54 20 54 48 49 53 20 4C 4F |EMPTS AT THIS LO| 00005230: 4F 50 2E 20 20 C9 46 20 41 46 54 45 52 20 46 49 |OP. .F AFTER FI| 00005240: 56 45 20 41 54 54 45 4D 50 54 53 2C 0D 20 20 20 |VE ATTEMPTS,. | 00005250: 20 20 20 20 20 20 20 54 48 45 20 53 45 43 54 4F | THE SECTO| 00005260: 52 20 43 41 4E 20 4E 4F 54 20 42 45 20 52 45 41 |R CAN NOT BE REA| 00005270: 44 20 52 45 4C 49 41 42 4C 59 2C 20 20 41 4E 20 |D RELIABLY, AN | 00005280: 45 52 52 4F 52 20 33 39 20 20 52 45 53 55 4C 54 |ERROR 39 RESULT| 00005290: 53 2E 20 20 D4 48 49 53 0D 20 20 20 20 20 20 20 |S. .HIS. | 000052A0: 20 20 20 52 4F 55 54 49 4E 45 20 20 49 53 20 55 | ROUTINE IS U| 000052B0: 53 55 41 4C 4C 59 20 43 41 4C 4C 45 44 20 41 46 |SUALLY CALLED AF| 000052C0: 54 45 52 20 54 48 45 20 53 45 43 54 4F 52 20 48 |TER THE SECTOR H| 000052D0: 41 53 20 42 45 45 4E 20 57 52 49 54 54 45 4E 20 |AS BEEN WRITTEN | 000052E0: 20 4F 55 54 0D 20 20 20 20 20 20 20 20 20 20 57 | OUT. W| 000052F0: 49 54 48 20 20 41 20 20 43 41 4C 4C 20 54 4F 20 |ITH A CALL TO | 00005300: D7 D2 C9 D4 C5 32 2E 20 20 D7 D2 C9 D4 C5 20 43 |.....2. ..... C| 00005310: 41 4C 4C 53 20 54 48 49 53 20 52 4F 55 54 49 4E |ALLS THIS ROUTIN| 00005320: 45 20 54 4F 20 56 45 52 49 46 59 20 20 54 48 45 |E TO VERIFY THE| 00005330: 0D 20 20 20 20 20 20 20 20 20 20 53 45 43 54 4F |. SECTO| 00005340: 52 2E 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 C6 |R.... .| 00005350: 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 3A 20 C4 C5 |UNCTION .AME: ..| 00005360: C3 31 36 0D 20 20 20 20 20 20 20 20 20 20 D0 55 |.16. .U| 00005370: 52 50 4F 53 45 3A 20 C4 45 43 52 45 4D 45 4E 54 |RPOSE: .ECREMENT| 00005380: 53 20 41 20 31 36 20 42 49 54 20 56 41 4C 55 45 |S A 16 BIT VALUE| 00005390: 2E 0D 20 20 20 20 20 20 20 20 20 20 C3 41 4C 4C |.. .ALL| 000053A0: 20 41 44 44 52 45 53 53 3A 20 24 C3 31 37 35 0D | ADDRESS: $.175.| 000053B0: 20 20 20 20 20 20 20 20 20 20 C9 4E 50 55 54 20 | .NPUT | 000053C0: 52 45 51 55 49 52 45 4D 45 4E 54 53 3A 0D 20 20 |REQUIREMENTS:. | 000053D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 D8 20 20 | . | 000053E0: 20 20 20 20 20 20 20 D4 48 45 20 41 44 44 52 45 | .HE ADDRE| 000053F0: 53 53 20 4F 46 20 54 48 45 20 31 36 20 42 49 54 |SS OF THE 16 BIT| 00005400: 20 49 4E 54 45 47 45 52 2E 0D 20 20 20 20 20 20 | INTEGER.. | 00005410: 20 20 20 20 CF 55 54 50 55 54 3A 0D 20 20 20 20 | .UTPUT:. | 00005420: 20 20 20 20 20 20 20 20 20 20 20 D8 20 20 20 20 | . | 00005430: 20 20 20 20 20 D4 48 45 20 41 44 44 52 45 53 53 | .HE ADDRESS| 00005440: 20 4F 46 20 54 48 45 20 31 36 20 42 49 54 20 52 | OF THE 16 BIT R| 00005450: 45 53 55 4C 54 2E 0D 0D 20 20 20 20 20 20 20 20 |ESULT... | 00005460: 20 20 C4 45 53 43 52 49 50 54 49 4F 4E 3A 20 20 | .ESCRIPTION: | 00005470: D4 48 49 53 20 20 52 4F 55 54 49 4E 45 20 49 53 |.HIS ROUTINE IS| 00005480: 20 4F 4E 45 20 4F 46 20 54 48 45 20 C7 C5 CF D3 | ONE OF THE ....| 00005490: 20 4D 41 54 48 20 20 52 4F 55 54 49 4E 45 53 2E | MATH ROUTINES.| 000054A0: 20 20 D8 0D 20 20 20 20 20 20 20 20 20 20 50 4F | .. PO| 000054B0: 49 4E 54 53 20 54 4F 20 41 20 31 36 20 42 49 54 |INTS TO A 16 BIT| 000054C0: 20 56 41 4C 55 45 20 57 48 49 43 48 20 49 53 20 | VALUE WHICH IS | 000054D0: 44 45 43 52 45 4D 45 4E 54 45 44 20 42 59 20 31 |DECREMENTED BY 1| 000054E0: 2E 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D |................| 000054F0: 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 C7 C5 CF |... ...| 00005500: D3 20 CB 45 52 4E 41 4C 20 D2 4F 55 54 49 4E 45 |. .ERNAL .OUTINE| 00005510: 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |S | 00005520: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00005530: 20 20 20 20 20 20 20 31 2D 32 30 0D 0D 0D 20 20 | 1-20... | 00005540: 20 20 20 20 20 20 20 20 C6 55 4E 43 54 49 4F 4E | .UNCTION| 00005550: 20 CE 41 4D 45 3A 20 C4 C5 C3 CF C4 C5 0D 20 20 | .AME: ....... | 00005560: 20 20 20 20 20 20 20 20 D0 55 52 50 4F 53 45 3A | .URPOSE:| 00005570: 20 C3 4F 4D 50 55 54 45 20 41 20 43 48 45 43 4B | .OMPUTE A CHECK| 00005580: 53 55 4D 20 46 4F 52 20 41 20 44 41 54 41 20 52 |SUM FOR A DATA R| 00005590: 45 47 49 4F 4E 2E 0D 20 20 20 20 20 20 20 20 20 |EGION.. | 000055A0: 20 C3 41 4C 4C 20 41 44 44 52 45 53 53 3A 20 24 | .ALL ADDRESS: $| 000055B0: C3 32 30 C5 0D 20 20 20 20 20 20 20 20 20 20 C9 |.20.. .| 000055C0: 4E 50 55 54 20 52 45 51 55 49 52 45 4D 45 4E 54 |NPUT REQUIREMENT| 000055D0: 53 3A 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 |S:. | 000055E0: 20 20 24 30 32 2D 24 30 33 20 20 20 D0 4F 49 4E | $02-$03 .OIN| 000055F0: 54 45 52 20 54 4F 20 44 41 54 41 20 52 45 47 49 |TER TO DATA REGI| 00005600: 4F 4E 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 |ON.. | 00005610: 20 20 20 24 30 34 2D 24 30 35 20 20 20 CC 45 4E | $04-$05 .EN| 00005620: 47 54 48 20 4F 46 20 52 45 47 49 4F 4E 2E 0D 20 |GTH OF REGION.. | 00005630: 20 20 20 20 20 20 20 20 20 CF 55 54 50 55 54 3A | .UTPUT:| 00005640: 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. | 00005650: 24 30 36 2D 24 30 37 20 20 20 C3 48 45 43 4B 53 |$06-$07 .HECKS| 00005660: 55 4D 20 4F 46 20 52 45 47 49 4F 4E 2E 0D 0D 20 |UM OF REGION... | 00005670: 20 20 20 20 20 20 20 20 20 C4 45 53 43 52 49 50 | .ESCRIP| 00005680: 54 49 4F 4E 3A 20 20 D4 48 49 53 20 20 52 4F 55 |TION: .HIS ROU| 00005690: 54 49 4E 45 20 49 53 20 43 41 4C 4C 45 44 20 42 |TINE IS CALLED B| 000056A0: 59 20 54 48 45 20 42 4F 4F 54 55 50 20 20 52 4F |Y THE BOOTUP RO| 000056B0: 55 54 49 4E 45 53 20 20 54 4F 0D 20 20 20 20 20 |UTINES TO. | 000056C0: 20 20 20 20 20 43 4F 4D 50 55 54 45 20 20 54 48 | COMPUTE TH| 000056D0: 45 20 20 43 48 45 43 4B 53 55 4D 20 20 4F 46 20 |E CHECKSUM OF | 000056E0: C7 C5 CF D3 20 C2 CF CF D4 2E 20 20 D4 48 49 53 |.... ..... .HIS| 000056F0: 20 43 48 45 43 4B 53 55 4D 20 49 53 20 20 55 53 | CHECKSUM IS US| 00005700: 45 44 20 20 54 4F 0D 20 20 20 20 20 20 20 20 20 |ED TO. | 00005710: 20 43 52 45 41 54 45 20 54 48 45 20 49 4E 54 45 | CREATE THE INTE| 00005720: 52 52 55 50 54 20 56 45 43 54 4F 52 20 41 44 44 |RRUPT VECTOR ADD| 00005730: 52 45 53 53 2E 20 20 D4 48 45 20 52 45 41 53 4F |RESS. .HE REASO| 00005740: 4E 20 46 4F 52 20 54 48 49 53 20 57 41 53 20 20 |N FOR THIS WAS | 00005750: 54 4F 0D 20 20 20 20 20 20 20 20 20 20 50 52 45 |TO. PRE| 00005760: 56 45 4E 54 20 20 50 49 52 41 43 59 2E 20 20 D4 |VENT PIRACY. .| 00005770: 48 49 53 20 20 43 41 4E 20 42 45 20 55 53 45 44 |HIS CAN BE USED| 00005780: 20 54 4F 20 43 48 45 43 4B 20 54 48 45 20 49 4E | TO CHECK THE IN| 00005790: 54 45 47 52 49 54 59 20 20 4F 46 20 20 41 0D 20 |TEGRITY OF A. | 000057A0: 20 20 20 20 20 20 20 20 20 4D 45 4D 4F 52 59 20 | MEMORY | 000057B0: 52 45 47 49 4F 4E 2E 20 20 D4 48 49 53 20 49 53 |REGION. .HIS IS| 000057C0: 20 41 43 54 55 41 4C 4C 59 20 4D 4F 52 45 20 4F | ACTUALLY MORE O| 000057D0: 46 20 41 20 C3 D2 C3 20 43 4F 4D 50 55 54 41 54 |F A ... COMPUTAT| 000057E0: 49 4F 4E 20 54 48 45 4E 20 41 0D 20 20 20 20 20 |ION THEN A. | 000057F0: 20 20 20 20 20 43 48 45 43 4B 53 55 4D 20 41 4E | CHECKSUM AN| 00005800: 44 20 54 48 45 20 46 4F 52 4D 55 4C 41 20 49 53 |D THE FORMULA IS| 00005810: 20 41 20 4C 49 54 54 4C 45 20 54 4F 4F 20 43 4F | A LITTLE TOO CO| 00005820: 4D 50 4C 45 58 20 54 4F 20 45 58 50 4C 41 49 4E |MPLEX TO EXPLAIN| 00005830: 20 48 45 52 45 2E 0D 0D 0D 20 20 20 20 20 20 20 | HERE.... | 00005840: 20 20 20 C6 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 | .UNCTION .AME| 00005850: 3A 20 C4 C5 CC C1 D9 0D 20 20 20 20 20 20 20 20 |: ...... | 00005860: 20 20 D0 55 52 50 4F 53 45 3A 20 D3 45 54 53 20 | .URPOSE: .ETS | 00005870: 55 50 20 41 20 54 49 4D 45 20 44 45 4C 41 59 2E |UP A TIME DELAY.| 00005880: 0D 20 20 20 20 20 20 20 20 20 20 C3 41 4C 4C 20 |. .ALL | 00005890: 41 44 44 52 45 53 53 3A 20 24 C3 31 39 39 0D 20 |ADDRESS: $.199. | 000058A0: 20 20 20 20 20 20 20 20 20 C9 4E 50 55 54 20 52 | .NPUT R| 000058B0: 45 51 55 49 52 45 4D 45 4E 54 53 3A 0D 20 20 20 |EQUIREMENTS:. | 000058C0: 20 20 20 20 20 20 20 20 20 20 20 20 24 30 32 2D | $02-| 000058D0: 24 30 33 20 20 20 C1 4D 4F 55 4E 54 20 4F 46 20 |$03 .MOUNT OF | 000058E0: 54 49 4D 45 20 44 45 4C 41 59 20 56 41 4C 55 45 |TIME DELAY VALUE| 000058F0: 20 49 4E 20 36 30 54 48 53 20 4F 46 20 41 20 53 | IN 60THS OF A S| 00005900: 45 43 4F 4E 44 2E 0D 0D 20 20 20 20 20 20 20 20 |ECOND... | 00005910: 20 20 C4 45 53 43 52 49 50 54 49 4F 4E 3A 20 20 | .ESCRIPTION: | 00005920: D4 48 45 20 20 43 4F 55 4E 54 45 52 20 49 53 20 |.HE COUNTER IS | 00005930: 20 53 41 56 45 44 20 4F 4E 20 41 20 53 54 41 43 | SAVED ON A STAC| 00005940: 4B 2C 20 41 53 20 57 45 4C 4C 20 20 41 53 20 20 |K, AS WELL AS | 00005950: 54 48 45 0D 20 20 20 20 20 20 20 20 20 20 52 45 |THE. RE| 00005960: 54 55 52 4E 20 20 41 44 44 52 45 53 53 20 20 4F |TURN ADDRESS O| 00005970: 46 20 54 48 45 20 43 41 4C 4C 45 52 2E 20 20 C3 |F THE CALLER. .| 00005980: 4F 4E 54 52 4F 4C 20 49 53 20 50 41 53 53 45 44 |ONTROL IS PASSED| 00005990: 20 42 41 43 4B 20 20 41 20 20 4C 45 56 45 4C 0D | BACK A LEVEL.| 000059A0: 20 20 20 20 20 20 20 20 20 20 48 49 47 48 45 52 | HIGHER| 000059B0: 20 20 54 48 41 4E 20 54 48 45 20 43 41 4C 4C 45 | THAN THE CALLE| 000059C0: 52 2E 20 20 D7 48 45 4E 20 54 48 45 20 54 49 4D |R. .HEN THE TIM| 000059D0: 45 52 20 52 55 4E 53 20 4F 55 54 2C 20 20 43 4F |ER RUNS OUT, CO| 000059E0: 4E 54 52 4F 4C 20 20 57 49 4C 4C 0D 20 20 20 20 |NTROL WILL. | 000059F0: 20 20 20 20 20 20 52 45 54 55 52 4E 20 20 57 48 | RETURN WH| 00005A00: 45 52 45 20 20 49 54 20 4C 45 46 54 20 4F 46 46 |ERE IT LEFT OFF| 00005A10: 2E 20 20 D4 48 49 53 20 41 4C 4C 4F 57 53 20 50 |. .HIS ALLOWS P| 00005A20: 52 4F 47 52 41 4D 53 20 54 4F 20 20 49 4E 43 4F |ROGRAMS TO INCO| 00005A30: 52 50 4F 52 41 54 45 0D 20 20 20 20 20 20 20 20 |RPORATE. | 00005A40: 20 20 44 45 4C 41 59 53 20 20 57 49 54 48 4F 55 | DELAYS WITHOU| 00005A50: 54 20 48 41 4C 54 49 4E 47 20 C7 C5 CF D3 27 53 |T HALTING ....'S| 00005A60: 20 4D 41 4E 59 20 49 4E 44 45 50 45 4E 44 41 4E | MANY INDEPENDAN| 00005A70: 54 20 20 50 52 4F 43 45 53 53 45 53 2E 20 20 D4 |T PROCESSES. .| 00005A80: 48 49 53 0D 20 20 20 20 20 20 20 20 20 20 41 4E |HIS. AN| 00005A90: 44 20 C3 CD C4 D4 C2 CC 20 41 50 50 45 41 52 20 |D ...... APPEAR | 00005AA0: 54 4F 20 42 45 20 54 48 45 20 42 45 47 49 4E 4E |TO BE THE BEGINN| 00005AB0: 49 4E 47 53 20 4F 46 20 4D 55 4C 54 49 54 41 53 |INGS OF MULTITAS| 00005AC0: 4B 49 4E 47 20 46 4F 52 20 C7 C5 CF D3 2E 0D 0D |KING FOR .......| 00005AD0: 0D 20 20 20 20 20 20 20 20 20 20 C6 55 4E 43 54 |. .UNCT| 00005AE0: 49 4F 4E 20 CE 41 4D 45 3A 20 C4 C5 CC C5 D4 32 |ION .AME: .....2| 00005AF0: 0D 20 20 20 20 20 20 20 20 20 20 D0 55 52 50 4F |. .URPO| 00005B00: 53 45 3A 20 C4 45 4C 45 54 45 20 41 20 54 45 4D |SE: .ELETE A TEM| 00005B10: 50 4F 52 41 52 59 20 46 49 4C 45 2E 0D 20 20 20 |PORARY FILE.. | 00005B20: 20 20 20 20 20 20 20 C3 41 4C 4C 20 41 44 44 52 | .ALL ADDR| 00005B30: 45 53 53 3A 20 24 C3 32 34 34 0D 20 20 20 20 20 |ESS: $.244. | 00005B40: 20 20 20 20 20 C9 4E 50 55 54 20 52 45 51 55 49 | .NPUT REQUI| 00005B50: 52 45 4D 45 4E 54 53 3A 0D 20 20 20 20 20 20 20 |REMENTS:. | 00005B60: 20 20 20 20 20 20 20 20 24 30 38 2D 24 30 39 20 | $08-$09 | 00005B70: 20 20 D0 4F 49 4E 54 45 52 20 54 4F 20 54 41 42 | .OINTER TO TAB| 00005B80: 4C 45 20 4F 46 20 54 52 41 43 4B 53 20 41 4E 44 |LE OF TRACKS AND| 00005B90: 20 53 45 43 54 4F 52 53 2E 0D 20 20 20 20 20 20 | SECTORS.. | 00005BA0: 20 20 20 20 20 20 20 20 20 24 30 C5 2D 24 30 C6 | $0.-$0.| 00005BB0: 20 20 20 D0 4F 49 4E 54 45 52 20 54 4F 20 46 49 | .OINTER TO FI| 00005BC0: 4C 45 20 4E 41 4D 45 2E 0D 20 20 20 20 20 20 20 |LE NAME.. | 00005BD0: 20 20 20 C5 52 52 4F 52 53 3A 20 D3 45 45 20 41 | .RRORS: .EE A| 00005BE0: 50 50 45 4E 44 49 58 20 C9 2E 0D 0D 20 20 20 20 |PPENDIX .... | 00005BF0: 20 20 20 20 20 20 C4 45 53 43 52 49 50 54 49 4F | .ESCRIPTIO| 00005C00: 4E 3A 20 D4 48 49 53 20 52 4F 55 54 49 4E 45 20 |N: .HIS ROUTINE | 00005C10: 52 45 4D 4F 56 45 53 20 54 48 45 20 46 49 4C 45 |REMOVES THE FILE| 00005C20: 20 46 52 4F 4D 20 54 48 45 20 44 49 52 45 43 54 | FROM THE DIRECT| 00005C30: 4F 52 59 2E 20 C9 54 0D 20 20 20 20 20 20 20 20 |ORY. .T. | 00005C40: 20 20 55 53 45 53 20 20 54 48 45 20 54 41 42 4C | USES THE TABL| 00005C50: 45 20 4F 46 20 54 52 41 43 4B 53 20 41 4E 44 20 |E OF TRACKS AND | 00005C60: 53 45 43 54 4F 52 53 20 54 4F 20 46 52 45 45 20 |SECTORS TO FREE | 00005C70: 55 50 20 54 48 45 20 53 45 43 54 4F 52 53 20 55 |UP THE SECTORS U| 00005C80: 53 45 44 0D 20 20 20 20 20 20 20 20 20 20 42 59 |SED. BY| 00005C90: 20 20 54 48 45 20 46 49 4C 45 2E 20 20 D4 48 49 | THE FILE. .HI| 00005CA0: 53 20 52 4F 55 54 49 4E 45 20 49 53 20 55 53 45 |S ROUTINE IS USE| 00005CB0: 44 20 54 4F 20 43 4C 45 41 4E 20 55 50 20 41 20 |D TO CLEAN UP A | 00005CC0: 54 45 4D 50 4F 52 41 52 59 20 20 46 49 4C 45 0D |TEMPORARY FILE.| 00005CD0: 20 20 20 20 20 20 20 20 20 20 54 48 41 54 20 57 | THAT W| 00005CE0: 41 53 20 4E 4F 54 20 43 4F 4D 50 4C 45 54 45 44 |AS NOT COMPLETED| 00005CF0: 2E 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 C6 55 |.... .U| 00005D00: 4E 43 54 49 4F 4E 20 CE 41 4D 45 3A 20 C4 C5 CC |NCTION .AME: ...| 00005D10: C5 D4 C5 0D 20 20 20 20 20 20 20 20 20 20 D0 55 |.... .U| 00005D20: 52 50 4F 53 45 3A 20 C4 45 4C 45 54 45 20 41 20 |RPOSE: .ELETE A | 00005D30: 46 49 4C 45 20 46 52 4F 4D 20 54 48 45 20 44 49 |FILE FROM THE DI| 00005D40: 53 4B 2E 0D 20 20 20 20 20 20 20 20 20 20 C3 41 |SK.. .A| 00005D50: 4C 4C 20 41 44 44 52 45 53 53 3A 20 24 C3 32 33 |LL ADDRESS: $.23| 00005D60: 38 0D 20 20 20 20 20 20 20 20 20 20 C9 4E 50 55 |8. .NPU| 00005D70: 54 20 52 45 51 55 49 52 45 4D 45 4E 54 53 3A 0D |T REQUIREMENTS:.| 00005D80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 | $| 00005D90: 30 32 2D 24 30 33 20 20 20 D0 4F 49 4E 54 45 52 |02-$03 .OINTER| 00005DA0: 20 54 4F 20 46 49 4C 45 20 4E 41 4D 45 2E 0D 20 | TO FILE NAME.. | 00005DB0: 20 20 20 20 20 20 20 20 20 C5 52 52 4F 52 53 3A | .RRORS:| 00005DC0: 20 D3 45 45 20 41 50 50 45 4E 44 49 58 20 C9 2E | .EE APPENDIX ..| 00005DD0: 0D 0D 20 20 20 20 20 20 20 20 20 20 C4 45 53 43 |.. .ESC| 00005DE0: 52 49 50 54 49 4F 4E 3A 20 20 D4 48 45 20 20 53 |RIPTION: .HE S| 00005DF0: 50 45 43 49 46 49 45 44 20 20 46 49 4C 45 20 49 |PECIFIED FILE I| 00005E00: 53 20 44 45 4C 45 54 45 44 20 20 46 52 4F 4D 20 |S DELETED FROM | 00005E10: 20 54 48 45 20 20 43 55 52 52 45 4E 54 0D 20 20 | THE CURRENT. | 00005E20: 20 20 20 20 20 20 20 20 44 52 49 56 45 2E 0D 0D | DRIVE...| 00005E30: 0D 0D 0D 0D 0D 0D 0D 0D 20 20 20 20 20 20 20 20 |........ | 00005E40: 20 20 C7 C5 CF D3 20 CB 45 52 4E 41 4C 20 D2 4F | .... .ERNAL .O| 00005E50: 55 54 49 4E 45 53 20 20 20 20 20 20 20 20 20 20 |UTINES | 00005E60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00005E70: 20 20 20 20 20 20 20 20 20 20 20 20 31 2D 32 31 | 1-21| 00005E80: 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 C6 55 4E |... .UN| 00005E90: 43 54 49 4F 4E 20 CE 41 4D 45 3A 20 C4 C9 D2 C4 |CTION .AME: ....| 00005EA0: D3 CB 0D 20 20 20 20 20 20 20 20 20 20 D0 55 52 |... .UR| 00005EB0: 50 4F 53 45 3A 20 C3 52 45 41 54 45 53 20 41 20 |POSE: .REATES A | 00005EC0: 44 49 52 45 43 54 4F 52 59 20 45 4E 54 52 59 20 |DIRECTORY ENTRY | 00005ED0: 4F 4E 20 54 48 45 20 44 49 53 4B 2E 0D 20 20 20 |ON THE DISK.. | 00005EE0: 20 20 20 20 20 20 20 C3 41 4C 4C 20 41 44 44 52 | .ALL ADDR| 00005EF0: 45 53 53 3A 20 24 C3 31 C6 30 0D 20 20 20 20 20 |ESS: $.1.0. | 00005F00: 20 20 20 20 20 C9 4E 50 55 54 20 52 45 51 55 49 | .NPUT REQUI| 00005F10: 52 45 4D 45 4E 54 53 3A 0D 20 20 20 20 20 20 20 |REMENTS:. | 00005F20: 20 20 20 20 20 20 20 20 24 31 34 2D 24 31 35 20 | $14-$15 | 00005F30: 20 20 24 38 31 30 30 2C 20 52 45 51 55 49 52 45 | $8100, REQUIRE| 00005F40: 44 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 |D.. | 00005F50: 20 20 24 31 36 20 20 20 20 20 20 20 23 20 4F 46 | $16 # OF| 00005F60: 20 44 49 52 45 43 54 4F 52 59 20 53 45 43 54 4F | DIRECTORY SECTO| 00005F70: 52 53 20 54 4F 20 53 4B 49 50 20 46 49 52 53 54 |RS TO SKIP FIRST| 00005F80: 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. | 00005F90: 20 24 38 31 30 30 2D 24 38 31 C6 C6 20 C9 4E 46 | $8100-$81.. .NF| 00005FA0: 4F 52 4D 41 54 49 4F 4E 20 53 45 43 54 4F 52 20 |ORMATION SECTOR | 00005FB0: 46 4F 52 20 46 49 4C 45 2E 0D 20 20 20 20 20 20 |FOR FILE.. | 00005FC0: 20 20 20 20 20 20 20 20 20 24 38 33 30 30 2D 20 | $8300- | 00005FD0: 20 20 20 D4 52 41 43 4B 20 41 4E 44 20 53 45 43 | .RACK AND SEC| 00005FE0: 54 4F 52 20 4C 49 53 54 20 46 4F 52 20 46 49 4C |TOR LIST FOR FIL| 00005FF0: 45 2E 0D 20 20 20 20 20 20 20 20 20 20 CF 55 54 |E.. .UT| 00006000: 50 55 54 53 3A 0D 20 20 20 20 20 20 20 20 20 20 |PUTS:. | 00006010: 20 20 20 20 20 24 38 34 30 30 2D 24 38 34 31 C4 | $8400-$841.| 00006020: 20 C4 49 52 45 43 54 4F 52 59 20 45 4E 54 52 59 | .IRECTORY ENTRY| 00006030: 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. | 00006040: 20 C4 49 52 45 43 54 4F 52 59 20 45 4E 54 52 59 | .IRECTORY ENTRY| 00006050: 20 49 53 20 57 52 49 54 54 45 4E 20 54 4F 20 54 | IS WRITTEN TO T| 00006060: 48 45 20 44 49 53 4B 2E 0D 20 20 20 20 20 20 20 |HE DISK.. | 00006070: 20 20 20 D0 52 45 50 41 52 41 54 4F 52 59 20 52 | .REPARATORY R| 00006080: 4F 55 54 49 4E 45 53 3A 20 C6 C1 CC CC CF C3 0D |OUTINES: .......| 00006090: 20 20 20 20 20 20 20 20 20 20 C5 52 52 4F 52 53 | .RRORS| 000060A0: 3A 20 D3 45 45 20 41 50 50 45 4E 44 49 58 0D 0D |: .EE APPENDIX..| 000060B0: 20 20 20 20 20 20 20 20 20 20 C4 45 53 43 52 49 | .ESCRI| 000060C0: 50 54 49 4F 4E 3A 20 20 D4 48 49 53 20 20 52 4F |PTION: .HIS RO| 000060D0: 55 54 49 4E 45 20 20 49 53 20 20 55 53 45 44 20 |UTINE IS USED | 000060E0: 42 59 20 D3 C1 D6 C5 20 41 4E 44 20 20 43 41 4C |BY .... AND CAL| 000060F0: 4C 53 20 20 C4 C9 D2 CD C5 CD 2E 0D 20 20 20 20 |LS ........ | 00006100: 20 20 20 20 20 20 C2 45 43 41 55 53 45 20 20 4F | .ECAUSE O| 00006110: 46 20 54 48 49 53 2C 20 41 53 53 55 4D 50 54 49 |F THIS, ASSUMPTI| 00006120: 4F 4E 53 20 41 52 45 20 4D 41 44 45 2E 20 20 D4 |ONS ARE MADE. .| 00006130: 48 45 20 46 49 52 53 54 20 20 49 53 20 20 54 48 |HE FIRST IS TH| 00006140: 41 54 20 20 54 48 45 0D 20 20 20 20 20 20 20 20 |AT THE. | 00006150: 20 20 49 4E 46 4F 52 4D 41 54 49 4F 4E 20 20 53 | INFORMATION S| 00006160: 45 43 54 4F 52 20 20 49 53 20 20 41 54 20 24 38 |ECTOR IS AT $8| 00006170: 31 30 30 2D 24 38 31 C6 C6 20 41 4E 44 20 20 54 |100-$81.. AND T| 00006180: 48 41 54 20 20 24 31 34 2D 24 31 35 20 20 50 4F |HAT $14-$15 PO| 00006190: 49 4E 54 0D 20 20 20 20 20 20 20 20 20 20 54 48 |INT. TH| 000061A0: 45 52 45 2E 20 20 D4 48 45 20 20 46 49 52 53 54 |ERE. .HE FIRST| 000061B0: 20 20 54 57 4F 20 42 59 54 45 53 20 4F 46 20 54 | TWO BYTES OF T| 000061C0: 48 45 20 49 4E 46 4F 52 4D 41 54 49 4F 4E 20 53 |HE INFORMATION S| 000061D0: 45 43 54 4F 52 20 20 41 52 45 20 20 54 48 45 0D |ECTOR ARE THE.| 000061E0: 20 20 20 20 20 20 20 20 20 20 41 44 44 52 45 53 | ADDRES| 000061F0: 53 20 4F 46 20 54 48 45 20 46 49 4C 45 4E 41 4D |S OF THE FILENAM| 00006200: 45 2E 20 20 D4 48 45 53 45 20 41 52 45 20 52 45 |E. .HESE ARE RE| 00006210: 53 45 54 20 42 59 20 54 48 49 53 20 52 4F 55 54 |SET BY THIS ROUT| 00006220: 49 4E 45 20 54 4F 20 24 30 30 2C 0D 20 20 20 20 |INE TO $00,. | 00006230: 20 20 20 20 20 20 24 C6 C6 2E 20 20 C1 4E 4F 54 | $... .NOT| 00006240: 48 45 52 20 20 41 53 53 55 4D 50 54 49 4F 4E 20 |HER ASSUMPTION | 00006250: 4D 41 44 45 20 42 59 20 54 48 49 53 20 52 4F 55 |MADE BY THIS ROU| 00006260: 54 49 4E 45 20 49 53 20 54 48 41 54 20 24 38 33 |TINE IS THAT $83| 00006270: 30 30 20 49 53 20 41 0D 20 20 20 20 20 20 20 20 |00 IS A. | 00006280: 20 20 4C 49 53 54 20 4F 46 20 55 53 45 41 42 4C | LIST OF USEABL| 00006290: 45 20 54 52 41 43 4B 53 20 41 4E 44 20 53 45 43 |E TRACKS AND SEC| 000062A0: 54 4F 52 53 3B 20 53 50 45 43 49 46 49 43 41 4C |TORS; SPECIFICAL| 000062B0: 4C 59 2C 20 24 38 33 30 30 2D 24 38 33 30 31 20 |LY, $8300-$8301 | 000062C0: 41 52 45 0D 20 20 20 20 20 20 20 20 20 20 54 48 |ARE. TH| 000062D0: 45 20 20 54 52 41 43 4B 20 41 4E 44 20 53 45 43 |E TRACK AND SEC| 000062E0: 54 4F 52 20 46 4F 52 20 54 48 45 20 49 4E 46 4F |TOR FOR THE INFO| 000062F0: 52 4D 41 54 49 4F 4E 20 53 45 43 54 4F 52 20 41 |RMATION SECTOR A| 00006300: 4E 44 20 20 24 38 33 30 32 2D 24 38 33 30 33 0D |ND $8302-$8303.| 00006310: 20 20 20 20 20 20 20 20 20 20 41 52 45 20 54 48 | ARE TH| 00006320: 45 20 54 52 41 43 4B 20 41 4E 44 20 53 45 43 54 |E TRACK AND SECT| 00006330: 4F 52 20 4F 46 20 54 48 45 20 46 49 52 53 54 20 |OR OF THE FIRST | 00006340: 53 45 43 54 4F 52 20 4F 46 20 54 48 45 20 46 49 |SECTOR OF THE FI| 00006350: 4C 45 2E 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 |LE.... | 00006360: C6 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 3A 20 C4 |.UNCTION .AME: .| 00006370: C9 D2 CD C5 CD 0D 20 20 20 20 20 20 20 20 20 20 |...... | 00006380: D0 55 52 50 4F 53 45 3A 20 C3 52 45 41 54 45 20 |.URPOSE: .REATE | 00006390: 41 20 44 49 52 45 43 54 4F 52 59 20 45 4E 54 52 |A DIRECTORY ENTR| 000063A0: 59 20 49 4E 20 4D 45 4D 4F 52 59 2E 0D 20 20 20 |Y IN MEMORY.. | 000063B0: 20 20 20 20 20 20 20 C3 41 4C 4C 20 41 44 44 52 | .ALL ADDR| 000063C0: 45 53 53 3A 20 24 C3 31 C6 33 0D 20 20 20 20 20 |ESS: $.1.3. | 000063D0: 20 20 20 20 20 C9 4E 50 55 54 20 52 45 51 55 49 | .NPUT REQUI| 000063E0: 52 45 4D 45 4E 54 53 3A 0D 20 20 20 20 20 20 20 |REMENTS:. | 000063F0: 20 20 20 20 20 20 20 20 24 31 34 2D 24 31 35 20 | $14-$15 | 00006400: 20 20 24 38 31 30 30 2C 20 52 45 51 55 49 52 45 | $8100, REQUIRE| 00006410: 44 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 |D.. | 00006420: 20 20 24 38 31 30 30 2D 24 38 31 C6 C6 20 C9 4E | $8100-$81.. .N| 00006430: 46 4F 52 4D 41 54 49 4F 4E 20 53 45 43 54 4F 52 |FORMATION SECTOR| 00006440: 20 46 4F 52 20 46 49 4C 45 2E 0D 20 20 20 20 20 | FOR FILE.. | 00006450: 20 20 20 20 20 20 20 20 20 20 24 38 33 30 30 2D | $8300-| 00006460: 20 20 20 20 D4 52 41 43 4B 20 41 4E 44 20 53 45 | .RACK AND SE| 00006470: 43 54 4F 52 20 4C 49 53 54 20 46 4F 52 20 46 49 |CTOR LIST FOR FI| 00006480: 4C 45 2E 0D 20 20 20 20 20 20 20 20 20 20 CF 55 |LE.. .U| 00006490: 54 50 55 54 53 3A 0D 20 20 20 20 20 20 20 20 20 |TPUTS:. | 000064A0: 20 20 20 20 20 20 24 38 34 30 30 2D 24 38 34 31 | $8400-$841| 000064B0: C4 20 C4 49 52 45 43 54 4F 52 59 20 45 4E 54 52 |. .IRECTORY ENTR| 000064C0: 59 2E 0D 20 20 20 20 20 20 20 20 20 20 D0 52 45 |Y.. .RE| 000064D0: 50 41 52 41 54 4F 52 59 20 52 4F 55 54 49 4E 45 |PARATORY ROUTINE| 000064E0: 53 3A 20 C6 C1 CC CC CF C3 0D 20 20 20 20 20 20 |S: ....... | 000064F0: 20 20 20 20 C5 52 52 4F 52 53 3A 20 D3 45 45 20 | .RRORS: .EE | 00006500: 41 50 50 45 4E 44 49 58 0D 0D 20 20 20 20 20 20 |APPENDIX.. | 00006510: 20 20 20 20 C4 45 53 43 52 49 50 54 49 4F 4E 3A | .ESCRIPTION:| 00006520: 20 20 20 D3 45 45 20 20 C4 C9 D2 C4 D3 CB 20 20 | .EE ...... | 00006530: 46 4F 52 20 20 41 20 20 43 4F 4D 50 4C 45 54 45 |FOR A COMPLETE| 00006540: 20 20 4C 49 53 54 20 20 4F 46 20 20 41 4C 4C 20 | LIST OF ALL | 00006550: 20 20 54 48 45 0D 20 20 20 20 20 20 20 20 20 20 | THE. | 00006560: 41 53 53 55 4D 50 54 49 4F 4E 53 20 4D 41 44 45 |ASSUMPTIONS MADE| 00006570: 20 42 59 20 54 48 49 53 20 52 4F 55 54 49 4E 45 | BY THIS ROUTINE| 00006580: 2E 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D |................| 00006590: 0D 0D 0D 0D 0D 0D 0D 0D 0D 0D 20 20 20 20 20 20 |.......... | 000065A0: 20 20 20 20 C7 C5 CF D3 20 CB 45 52 4E 41 4C 20 | .... .ERNAL | 000065B0: D2 4F 55 54 49 4E 45 53 20 20 20 20 20 20 20 20 |.OUTINES | 000065C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000065D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 2D | 1-| 000065E0: 32 32 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 C6 |22... .| 000065F0: 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 3A 20 C4 D2 |UNCTION .AME: ..| 00006600: C1 D7 0D 20 20 20 20 20 20 20 20 20 20 D0 55 52 |... .UR| 00006610: 50 4F 53 45 3A 20 C4 52 41 57 20 41 20 53 45 43 |POSE: .RAW A SEC| 00006620: 54 49 4F 4E 20 4F 46 20 41 20 43 4F 44 45 44 20 |TION OF A CODED | 00006630: 47 52 41 50 48 49 43 20 49 4D 41 47 45 2E 0D 20 |GRAPHIC IMAGE.. | 00006640: 20 20 20 20 20 20 20 20 20 C3 41 4C 4C 20 41 44 | .ALL AD| 00006650: 44 52 45 53 53 3A 20 24 C3 32 C1 C1 0D 20 20 20 |DRESS: $.2... | 00006660: 20 20 20 20 20 20 20 C9 4E 50 55 54 20 52 45 51 | .NPUT REQ| 00006670: 55 49 52 45 4D 45 4E 54 53 3A 0D 20 20 20 20 20 |UIREMENTS:. | 00006680: 20 20 20 20 20 20 20 20 20 20 24 30 32 2D 24 30 | $02-$0| 00006690: 33 20 20 20 D0 4F 49 4E 54 45 52 20 54 4F 20 47 |3 .OINTER TO G| 000066A0: 52 41 50 48 49 43 20 49 4D 41 47 45 20 44 41 54 |RAPHIC IMAGE DAT| 000066B0: 41 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 |A.. | 000066C0: 20 20 24 30 34 20 20 20 20 20 20 20 C3 4F 4C 55 | $04 .OLU| 000066D0: 4D 4E 20 54 4F 20 53 54 41 52 54 20 4F 4E 2C 20 |MN TO START ON, | 000066E0: 49 4E 20 42 59 54 45 53 2E 0D 20 20 20 20 20 20 |IN BYTES.. | 000066F0: 20 20 20 20 20 20 20 20 20 24 30 35 20 20 20 20 | $05 | 00006700: 20 20 20 D2 4F 57 20 54 4F 20 53 54 41 52 54 20 | .OW TO START | 00006710: 44 52 41 57 49 4E 47 20 54 48 45 20 49 4D 41 47 |DRAWING THE IMAG| 00006720: 45 20 4F 4E 2E 0D 20 20 20 20 20 20 20 20 20 20 |E ON.. | 00006730: 20 20 20 20 20 24 30 36 20 20 20 20 20 20 20 C9 | $06 .| 00006740: 4D 41 47 45 20 57 49 44 54 48 20 49 4E 20 42 59 |MAGE WIDTH IN BY| 00006750: 54 45 53 2E 0D 20 20 20 20 20 20 20 20 20 20 20 |TES.. | 00006760: 20 20 20 20 24 30 37 20 20 20 20 20 20 20 C9 4D | $07 .M| 00006770: 41 47 45 20 48 45 49 47 48 54 20 49 4E 20 50 49 |AGE HEIGHT IN PI| 00006780: 58 45 4C 53 0D 20 20 20 20 20 20 20 20 20 20 20 |XELS. | 00006790: 20 20 20 20 24 31 38 20 20 20 20 20 20 20 23 20 | $18 # | 000067A0: 42 59 54 45 53 20 54 4F 20 53 4B 49 50 20 4F 4E |BYTES TO SKIP ON| 000067B0: 20 54 48 45 20 4C 45 46 54 20 53 49 44 45 2E 0D | THE LEFT SIDE..| 000067C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 | $| 000067D0: 31 39 20 20 20 20 20 20 20 23 20 42 59 54 45 53 |19 # BYTES| 000067E0: 20 4F 4E 20 54 48 45 20 52 49 47 48 54 20 53 49 | ON THE RIGHT SI| 000067F0: 44 45 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 |DE.. | 00006800: 20 20 20 24 31 C1 2D 24 31 C2 20 20 20 23 20 52 | $1.-$1. # R| 00006810: 4F 57 53 20 54 4F 20 53 4B 49 50 20 44 4F 57 4E |OWS TO SKIP DOWN| 00006820: 2E 0D 0D 20 20 20 20 20 20 20 20 20 20 C4 45 53 |... .ES| 00006830: 43 52 49 50 54 49 4F 4E 3A 20 20 D4 48 45 20 20 |CRIPTION: .HE | 00006840: 43 4F 44 49 4E 47 20 4F 46 20 54 48 45 20 49 4D |CODING OF THE IM| 00006850: 41 47 45 20 49 53 20 54 48 45 20 53 41 4D 45 20 |AGE IS THE SAME | 00006860: 41 53 20 54 48 41 54 20 4F 46 20 54 48 45 0D 20 |AS THAT OF THE. | 00006870: 20 20 20 20 20 20 20 20 20 43 4C 49 43 4B 20 42 | CLICK B| 00006880: 4F 58 45 53 2C 20 53 45 45 20 C3 C2 CF D8 20 46 |OXES, SEE .... F| 00006890: 4F 52 20 4D 4F 52 45 20 49 4E 46 4F 52 4D 41 54 |OR MORE INFORMAT| 000068A0: 49 4F 4E 2E 20 D4 48 49 53 20 52 4F 55 54 49 4E |ION. .HIS ROUTIN| 000068B0: 45 20 53 45 45 4D 53 20 54 4F 0D 20 20 20 20 20 |E SEEMS TO. | 000068C0: 20 20 20 20 20 42 45 20 20 46 4F 52 20 44 52 41 | BE FOR DRA| 000068D0: 57 49 4E 47 20 50 49 45 43 45 53 20 4F 46 20 D0 |WING PIECES OF .| 000068E0: 48 4F 54 4F 20 D3 43 52 41 50 53 2E 20 20 D0 48 |HOTO .CRAPS. .H| 000068F0: 4F 54 4F 20 D3 43 52 41 50 53 20 20 48 41 56 45 |OTO .CRAPS HAVE| 00006900: 20 20 54 48 49 53 0D 20 20 20 20 20 20 20 20 20 | THIS. | 00006910: 20 43 4F 44 45 44 20 46 4F 52 4D 41 54 2E 20 20 | CODED FORMAT. | 00006920: D4 48 45 20 50 41 52 41 4D 45 54 45 52 53 20 46 |.HE PARAMETERS F| 00006930: 4F 52 20 54 48 49 53 20 52 4F 55 54 49 4E 45 20 |OR THIS ROUTINE | 00006940: 41 4C 4C 4F 57 20 41 20 53 45 43 54 49 4F 4E 20 |ALLOW A SECTION | 00006950: 4F 46 0D 20 20 20 20 20 20 20 20 20 20 54 48 45 |OF. THE| 00006960: 20 49 4D 41 47 45 20 54 4F 20 42 45 20 44 52 41 | IMAGE TO BE DRA| 00006970: 57 4E 20 42 59 20 53 50 45 43 49 46 59 49 4E 47 |WN BY SPECIFYING| 00006980: 20 48 4F 57 20 4D 41 4E 59 20 52 4F 57 53 20 54 | HOW MANY ROWS T| 00006990: 4F 20 53 4B 49 50 20 44 4F 57 4E 2C 41 53 0D 20 |O SKIP DOWN,AS. | 000069A0: 20 20 20 20 20 20 20 20 20 57 45 4C 4C 20 20 41 | WELL A| 000069B0: 53 20 48 4F 57 20 4D 41 4E 59 20 42 59 54 45 53 |S HOW MANY BYTES| 000069C0: 20 54 4F 20 53 4B 49 50 20 4F 4E 20 54 48 45 20 | TO SKIP ON THE | 000069D0: 4C 45 46 54 20 41 4E 44 20 54 48 45 20 52 49 47 |LEFT AND THE RIG| 000069E0: 48 54 20 4F 46 20 20 54 48 45 0D 20 20 20 20 20 |HT OF THE. | 000069F0: 20 20 20 20 20 44 45 53 49 52 45 44 20 20 53 45 | DESIRED SE| 00006A00: 43 54 49 4F 4E 2E 20 20 D4 48 49 53 20 49 53 20 |CTION. .HIS IS | 00006A10: 4E 4F 54 20 55 53 45 44 20 42 59 20 C7 C5 CF 50 |NOT USED BY ...P| 00006A20: 41 49 4E 54 20 20 55 4E 4C 45 53 53 20 20 C7 C5 |AINT UNLESS ..| 00006A30: CF 50 41 49 4E 54 0D 20 20 20 20 20 20 20 20 20 |.PAINT. | 00006A40: 20 43 4F 4E 56 45 52 54 53 20 20 49 54 53 20 20 | CONVERTS ITS | 00006A50: 46 49 4C 45 53 20 20 42 45 43 41 55 53 45 20 20 |FILES BECAUSE | 00006A60: 54 48 45 59 20 41 52 45 20 49 4E 20 20 41 20 20 |THEY ARE IN A | 00006A70: 44 49 46 46 45 52 45 4E 54 20 20 46 4F 52 4D 41 |DIFFERENT FORMA| 00006A80: 54 3B 0D 20 20 20 20 20 20 20 20 20 20 48 4F 57 |T;. HOW| 00006A90: 45 56 45 52 2C 20 D0 48 4F 54 4F 20 D3 43 52 41 |EVER, .HOTO .CRA| 00006AA0: 50 53 20 41 52 45 20 49 4E 20 54 48 49 53 20 46 |PS ARE IN THIS F| 00006AB0: 4F 52 4D 41 54 2E 0D 0D 0D 20 20 20 20 20 20 20 |ORMAT.... | 00006AC0: 20 20 20 C6 55 4E 43 54 49 4F 4E 20 CE 41 4D 45 | .UNCTION .AME| 00006AD0: 3A 20 C4 D2 C1 D7 32 0D 20 20 20 20 20 20 20 20 |: ....2. | 00006AE0: 20 20 D0 55 52 50 4F 53 45 3A 20 C4 52 41 57 20 | .URPOSE: .RAW | 00006AF0: 41 20 53 45 43 54 49 4F 4E 20 4F 46 20 41 20 43 |A SECTION OF A C| 00006B00: 4F 44 45 44 20 47 52 41 50 48 49 43 20 49 4D 41 |ODED GRAPHIC IMA| 00006B10: 47 45 2E 0D 20 20 20 20 20 20 20 20 20 20 C3 41 |GE.. .A| 00006B20: 4C 4C 20 41 44 44 52 45 53 53 3A 20 24 C3 32 C3 |LL ADDRESS: $.2.| 00006B30: 35 0D 20 20 20 20 20 20 20 20 20 20 C9 4E 50 55 |5. .NPU| 00006B40: 54 20 52 45 51 55 49 52 45 4D 45 4E 54 53 3A 0D |T REQUIREMENTS:.| 00006B50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 | $| 00006B60: 30 32 2D 24 30 33 20 20 20 D0 4F 49 4E 54 45 52 |02-$03 .OINTER| 00006B70: 20 54 4F 20 47 52 41 50 48 49 43 20 49 4D 41 47 | TO GRAPHIC IMAG| 00006B80: 45 20 44 41 54 41 2E 0D 20 20 20 20 20 20 20 20 |E DATA.. | 00006B90: 20 20 20 20 20 20 20 24 30 34 20 20 20 20 20 20 | $04 | 00006BA0: 20 C3 4F 4C 55 4D 4E 20 54 4F 20 53 54 41 52 54 | .OLUMN TO START| 00006BB0: 20 4F 4E 2C 20 49 4E 20 42 59 54 45 53 2E 0D 20 | ON, IN BYTES.. | 00006BC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 24 30 | $0| 00006BD0: 35 20 20 20 20 20 20 20 D2 4F 57 20 54 4F 20 53 |5 .OW TO S| 00006BE0: 54 41 52 54 20 44 52 41 57 49 4E 47 20 54 48 45 |TART DRAWING THE| 00006BF0: 20 49 4D 41 47 45 20 4F 4E 2E 0D 20 20 20 20 20 | IMAGE ON.. | 00006C00: 20 20 20 20 20 20 20 20 20 20 24 30 36 20 20 20 | $06 | 00006C10: 20 20 20 20 C9 4D 41 47 45 20 57 49 44 54 48 20 | .MAGE WIDTH | 00006C20: 49 4E 20 42 59 54 45 53 2E 0D 20 20 20 20 20 20 |IN BYTES.. | 00006C30: 20 20 20 20 20 20 20 20 20 24 30 37 20 20 20 20 | $07 | 00006C40: 20 20 20 C9 4D 41 47 45 20 48 45 49 47 48 54 20 | .MAGE HEIGHT | 00006C50: 49 4E 20 50 49 58 45 4C 53 0D 20 20 20 20 20 20 |IN PIXELS. | 00006C60: 20 20 20 20 20 20 20 20 20 24 31 38 20 20 20 20 | $18 | 00006C70: 20 20 20 23 20 42 59 54 45 53 20 54 4F 20 53 4B | # BYTES TO SK| 00006C80: 49 50 20 4F 4E 20 54 48 45 20 4C 45 46 54 20 53 |IP ON THE LEFT S| 00006C90: 49 44 45 2E 0D 20 20 20 20 20 20 20 20 20 20 20 |IDE.. | 00006CA0: 20 20 20 20 24 31 39 20 20 20 20 20 20 20 23 20 | $19 # | 00006CB0: 42 59 54 45 53 20 4F 4E 20 54 48 45 20 52 49 47 |BYTES ON THE RIG| 00006CC0: 48 54 20 53 49 44 45 2E 0D 20 20 20 20 20 20 20 |HT SIDE.. | 00006CD0: 20 20 20 20 20 20 20 20 24 31 C1 2D 24 31 C2 20 | $1.-$1. | 00006CE0: 20 20 23 20 52 4F 57 53 20 54 4F 20 53 4B 49 50 | # ROWS TO SKIP| 00006CF0: 20 44 4F 57 4E 2E 0D 20 20 20 20 20 20 20 20 20 | DOWN.. | 00006D00: 20 20 20 20 20 20 24 31 C3 2D 24 31 C4 20 20 20 | $1.-$1. | 00006D10: C6 49 52 53 54 20 55 53 45 52 20 56 45 43 54 4F |.IRST USER VECTO| 00006D20: 52 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 |R.. | 00006D30: 20 20 24 31 C5 2D 24 31 C6 20 20 20 D3 45 43 4F | $1.-$1. .ECO| 00006D40: 4E 44 20 55 53 45 52 20 56 45 43 54 4F 52 2E 0D |ND USER VECTOR..| 00006D50: 0D 20 20 20 20 20 20 20 20 20 20 C4 45 53 43 52 |. .ESCR| 00006D60: 49 50 54 49 4F 4E 3A 20 20 D4 48 49 53 20 20 52 |IPTION: .HIS R| 00006D70: 4F 55 54 49 4E 45 20 20 49 53 20 49 44 45 4E 54 |OUTINE IS IDENT| 00006D80: 49 43 41 4C 20 54 4F 20 20 C4 D2 C1 D7 2C 20 20 |ICAL TO ...., | 00006D90: 45 58 43 45 50 54 20 20 54 48 41 54 0D 20 20 20 |EXCEPT THAT. | 00006DA0: 20 20 20 20 20 20 20 42 45 46 4F 52 45 20 45 41 | BEFORE EA| 00006DB0: 43 48 20 42 59 54 45 20 49 53 20 52 45 41 44 2C |CH BYTE IS READ,| 00006DC0: 20 20 54 48 45 20 46 49 52 53 54 20 55 53 45 52 | THE FIRST USER| 00006DD0: 20 52 4F 55 54 49 4E 45 20 49 53 20 43 41 4C 4C | ROUTINE IS CALL| 00006DE0: 45 44 2E 20 20 D4 48 45 0D 20 20 20 20 20 20 20 |ED. .HE. | 00006DF0: 20 20 20 53 45 43 4F 4E 44 20 20 55 53 45 52 20 | SECOND USER | 00006E00: 20 52 4F 55 54 49 4E 45 20 49 53 20 43 41 4C 4C | ROUTINE IS CALL| 00006E10: 45 44 20 42 45 46 4F 52 45 20 52 45 41 44 49 4E |ED BEFORE READIN| 00006E20: 47 20 45 41 43 48 20 42 59 54 45 20 54 48 41 54 |G EACH BYTE THAT| 00006E30: 20 20 49 53 0D 20 20 20 20 20 20 20 20 20 20 4E | IS. N| 00006E40: 4F 54 20 20 50 41 52 54 20 4F 46 20 41 20 50 41 |OT PART OF A PA| 00006E50: 54 54 45 52 4E 20 28 C3 4F 4D 4D 41 4E 44 20 42 |TTERN (.OMMAND B| 00006E60: 59 54 45 53 20 47 52 45 41 54 45 52 20 20 54 48 |YTES GREATER TH| 00006E70: 41 4E 20 20 32 31 39 29 2E 20 20 D4 48 45 53 45 |AN 219). .HESE| 00006E80: 0D 20 20 20 20 20 20 20 20 20 20 55 53 45 52 20 |. USER | 00006E90: 20 52 4F 55 54 49 4E 45 53 20 20 4D 49 47 48 54 | ROUTINES MIGHT| 00006EA0: 20 42 45 20 46 4F 52 20 44 49 53 4B 20 52 45 41 | BE FOR DISK REA| 00006EB0: 44 49 4E 47 2C 20 20 49 4E 20 4F 52 44 45 52 20 |DING, IN ORDER | 00006EC0: 54 4F 20 20 44 52 41 57 20 20 41 4E 0D 20 20 20 |TO DRAW AN. | 00006ED0: 20 20 20 20 20 20 20 49 4D 41 47 45 20 54 48 41 | IMAGE THA| 00006EE0: 54 20 49 53 20 4E 4F 54 20 4D 45 4D 4F 52 59 20 |T IS NOT MEMORY | 00006EF0: 52 45 53 49 44 45 4E 54 2E 0D 0D 0D 0D 0D 0D 0D |RESIDENT........| 00006F00: 0D 0D 0D 0D 0D 0D 0D 0D 0D |......... |
... GEOS KERNAL ROUTINES
1-9...
FUNCTION NAME: ABS16. PU
RPOSE: 16 BIT ABSOLUTE VALUE..
CALL ADDRESS: $C16F. INPUT REQU
IREMENTS:. X THE A
DDRESS OF THE 16 BIT INTEGER..
OUTPUT:. X THE ADD
RESS A POSITIVE 16 BIT INTEGER...
DESCRIPTION: THIS ROUTINE IS ONE OF
THE GEOS MATH ROUTINES. X. P
OINTS TO A 16 BIT VALUE WHICH IF FOUND T
O BE NEGATIVE, NEG16 IS. CALLE
D TO MAKE IT POSITIVE.... FUNCT
ION NAME: ALLOC. PURPOSE: ALLOC
ATE A BLOCK ON THE DISK.. CALL
ADDRESS: $C292. INPUT REQUIREME
NTS:. $08 TRACK TO S
TART SCANNING FROM.. $09
SECTOR TO START SCANNING FROM..
$8200-$82FF TRACK 18 SECTOR 0
, BAM.. $849C SKEW FAC
TOR (DEFAULT IS 8).. OUTPUT:.
$08 NEW TRACK NUMBER.
. $09 NEW SECTOR NUM
BER.. ERRORS: SEE APPENDIX I...
DESCRIPTION: THIS ROUTINE E
XPECTS THAT THE BAM IS ALREADY IN.
MEMORY. IT SCANS THE BAM START
ING AT A SPECIFIED LOCATION,.
LOOKING FOR A FREE SECTOR. IF ONE
IS FOUND IT IS RETURNED,. OT
HERWISE AN ERROR RESULTS. THE SECTOR I
S ALLOCATED IN THE BAM,. AND TH
E BAM MUST BE UPDATED TO DISK AFTERWARD
S IN ORDER FOR THE. SECTOR TO
REMAIN ALLOCATED.... FUNCTION N
AME: APPEND. PURPOSE: APPEND A
NEW CHAIN IN A VLIR FILE.. CALL
ADDRESS: $C289. INPUT REQUIREM
ENTS:. $8496 CURRENT C
HAIN NUMBER.. OUTPUT:.
$8496 INCREMENTED BY 1..
$8497 INCREMENTED BY 1..
PREPARATORY ROUTINES: VOPEN.
ERRORS: SEE APPENDIX I...
DESCRIPTION: A HOLE IS OPENED UP IN TH
E VLIR SECTOR IMMEDIATELY. FOLL
OWING THE CURRENT CHAIN. THE HOLE IS F
ILLED WITH $00,$FF.. THIS RE
PRESENTS A NULL CHAIN. THIS HOLE BECO
MES THE CURRENT. CHAIN.......
......... GEOS KERNAL ROUTINES
1-1
0... FUNCTION NAME: BASIC.
PURPOSE: RESTART BASIC WITH OPTIONA
L PROGRAM LOAD.. CALL ADDRESS:
$C241. INPUT REQUIREMENTS:.
$02-$03 POINTER TO 40 CHARA
CTERS OF TEXT.. $0C-$0D
POINTER TO FILE'S DIRECTORY ENTRY..
$10-$11 LOAD ADDRESS..
PREPARATORY ROUTINES: LOOKUP..
DESCRIPTION: THE 40 CHARACTERS POINT
ED TO BY $02-$03 ARE SAVED IN.
A BUFFER. IF $0C-$0D IS NON-ZERO, THE F
ILE IS LOADED INTO MEMORY. AT
THE ADDRESS SPECIFIED BY $10-$11. BASIC
IS RESTARTED WITH AN. INTERRUP
T VECTOR. THIS INTERRUPT IS SET UP TO GI
VE BASIC A CHANCE. TO START UP.
AFTER THE TIME HAS ELAPSED, THE 40 CHAR
ACTERS IN THE. BUFFER ARE COP
IED TO THE SCREEN AND A CR IS PLACED
IN THE. KEYBOARD BUFFER. TH
E INTERRUPT VECTOR IS THEN REMOVED, BUT
THE. NMI VECTOR IS SET UP TO
REBOOT GEOS. THE REBOOT CODE IS AT $C000
-. $C037.... FUNCTION
NAME: BLKCMP. PURPOSE: COMPARES
TWO BLOCKS OF MEMORY FOR A FIXED LENGTH
.. CALL ADDRESS: $C26E.
INPUT REQUIREMENTS:. A
BYTE COUNT.. X
ADDRESS OF ZERO PAGE SOURCE POINTER.
. Y ADDRESS OF ZER
O PAGE DESTINATION POINTER.. OU
TPUT:. Z FLAG SET ACCOR
DINGLY... DESCRIPTION: THE X AN
D Y REGISTERS POINT TO ZERO PAGE POINTER
S. A. HAS THE NUMBER OF BYTES
TO BE COMPARED (1-255). IF A IS ZERO,
. THIS ROUTINE WILL COMPARE UP
TO AND INCLUDING A ZERO BYTE. THE Z.
FLAG IS SET ACCORDINGLY. SEE STRC
MP.... FUNCTION NAME: BLKFIL.
PURPOSE: FILLS A MEMORY REGION W
ITH A SPECIFIED BYTE.. CALL ADD
RESS: $C17B. INPUT REQUIREMENTS
:. $02-$03 THE LENGTH OF
THE REGION.. $04-$05 TH
E ADDRESS OF THE REGION..
$06 THE BYTE TO FILL THE REGION WI
TH... DESCRIPTION: A SIMPLE LOO
P FILLS MEMORY WITH THE SPECIFIED BYTE..
.................. GEOS KERNAL
ROUTINES
1-11... FUNCTION NAME: BL
KFL2. PURPOSE: IDENTICAL TO BLK
FIL, BUT WITH INLINE DATA.. CAL
L ADDRESS: $C1B4.. DESCRIPTION:
THIS ROUTINE TAKES THE INLINE DA
TA AND SETS. EVERYTHING UP BE
FORE CALLING BLKFIL. FOR EXAMPLE:.
JSR BLKFL2. .WOR
D LENGTH OF REGION. .WORD
ADDRESS OF REGION. .BYTE B
YTE TO FILL MEMORY WITH. C
ONTROL RETURNS HERE UPON COMPLETION....
FUNCTION NAME: BLKMOV.
PURPOSE: COPY A BLOCK OF MEMORY..
CALL ADDRESS: $C268. INPUT
REQUIREMENTS:. A B
YTE COUNT.. X ADDR
ESS OF ZERO PAGE SOURCE POINTER..
Y ADDRESS OF ZERO PAGE D
ESTINATION POINTER... DESCRIPTI
ON: THE X AND Y REGISTERS POINT TO ZER
O PAGE POINTERS.. A HAS THE N
UMBER OF BYTES TO BE TRANSFERRED (1-255)
. IF A IS. ZERO, THIS ROUTIN
E WILL COPY UP TO AND INCLUDING A ZERO B
YTE. SEE. STRCPY.... F
UNCTION NAME: BLKSET. PURPOSE:
USES A TABLE TO SET VARIOUS MEMORY LOCAT
IONS IN A. UNIFORM MAN
NER.. CALL ADDRESS: $C181.
INPUT REQUIREMENTS:.
$02-$03 ADDRESS OF A DATA TABLE...
DESCRIPTION: THIS ROUTINE ALLOW
S MANY MEMORY LOCATIONS TO BE.
SPECIFIED AND SET IN AN ORDERLY MANNE
R. THE FORMAT OF THE DATA. TA
BLE IS AS FOLLOWS:. #BYTES
DESCRIPTION. 2
ADDRESS TO STORE VALUES AT..
1 # OF VALUES THAT FOLLOW..
? VALUES TO BE STO
RED AT THE DESIGNATED MEMORY.
REGION.. .
.. MORE DEFINITIONS..
2 AN ADDRESS OF $0000 ENDS THE T
ABLE..................... GEOS
KERNAL ROUTINES
1-12... FUNCTION N
AME: CBOX. PURPOSE: DRAWS A CLI
CK BOX ON THE SCREEN.. CALL ADD
RESS: $C142. INPUT REQUIREMENTS
:. $02-$03 POINTER TO TH
E GRAPHIC DATA.. $04
COLUMN IN CHARACTERS.. $0
5 THE ROW IN PIXELS..
$06 THE WIDTH IN BYTES..
$07 THE HEIGHT IN PIXELS...
DESCRIPTION: THIS ROUTINE D
RAWS A CLICK BOX ON THE SCREEN. A.
CLICK BOX IS A BOX LIKE OK, OPEN,
ETC. THESE BOXES ARE GENERALLY.
PART OF A WINDOW DESCRIPTION. THE G
RAPHIC DATA IS IN A CODED. FO
RMAT. THIS FORMAT CONSISTS OF A CODE BYT
E FOLLOWED BY 1 OR MORE. DATA B
YTES.. 1) CODE BYTES LESS
THAN 128 MEAN THAT THE FOLLOWING BYTE I
S. TO BE REPEATED THAT
MANY TIMES.. 2) CODE BYTE
S RANGING FROM 128 TO 219 MEAN THAT IF
128 IS. SUBTRACTED FR
OM THE CODE BYTE, THEN THE RESULT IS
THE. NUMBER OF DATA BYT
ES THAT FOLLOW.. 3) CODE B
YTES RANGING FROM 220 TO 225 ARE SPECIAL
. FIRST 219. IS SUBTRA
CTED FROM THE CODE BYTE, THE RESULT
IS THE. NUMBER OF BYTE
S IN THE PATTERN. FOLLOWING THIS CODE B
YTE. IS A REPETITION CO
UNT FOR THE PATTERN. FOLLOWING THIS ARE.
THE BYTES THAT CONS
TITUTE THE PATTERN. THESE COULD.
INCLUDE EITHER OF THE PREV
IOUS TWO CODE TYPES.... FUNCTIO
N NAME: CBOX2. PURPOSE: IDENTIC
AL TO CBOX, BUT WITH INLINE DATA..
CALL ADDRESS: $C1AB.. DESCR
IPTION: THIS ROUTINE TAKES A CLICK B
OX DESCRIPTOR FROM. INLINE D
ATA AND DRAWS IT. THE INLINE DATA DOES
NOT INCLUDE THE. PROCESSING VE
CTOR, IE.. JSR DRWCB2.
.WORD ADDRESS OF GRAPHIC IMA
GE. .BYTE START COLUMN IN
BYTES. .BYTE START MARGIN
IN PIXELS. .BYTE WIDTH OF
BOX IN BYTES. .BYTE HEIGHT
OF BOX IN PIXELS. CONTROL
RETURNS HERE AFTER THE BOX IS DRAWN....
................... GEOS KERNAL
ROUTINES
1-13... FUNCTION NAME: C
BOXES. PURPOSE: DRAWS ALL OF TH
E CLICK BOXES IN A TABLE.. CALL
ADDRESS: $C15A. INPUT REQUIREM
ENTS:. $02-$03 POINTER T
O A CLICK BOX TABLE (USUALLY $880C)..
PREPARATORY ROUTINES: WINDOW (OPT
IONAL)... DESCRIPTION: THIS ROU
TINE DRAWS ALL OF THE CLICK BOXES BY CAL
LING. CBOX REPEATEDLY UNTIL T
HE TABLE IS EXHAUSTED. THE INITMS IS
. CALLED TO SET THE MOUSE'S
POSITION. CLICK TABLE FORMAT:.
#BYTES DESCRIPTION.
1 # CLICK BOXES IN TABLE..
2 COLUMN TO PLACE MO
USE IN (0 WILL PREVENT.
PLACEMENT).. 1
ROW TO PLACE MOUSE IN.. TH
IS IS FOLLOWED BY SETS OF 8 BYTES, ONE F
OR EACH CLICK BOX.. 2
ADDRESS OF GRAPHIC DATA..
1 COLUMN POSITION OF BOX I
N CHARACTERS.. 1
ROW POSITION OF BOX IN PIXELS..
1 WIDTH OF BOX IN BYTES..
1 HEIGHT OF BOX
IN PIXELS.. 2 ADD
RESS OF ROUTINE TO PROCESS THIS BOX....
FUNCTION NAME: CHARST.
PURPOSE: GET STATISTICS FOR A CHARACTER
.. CALL ADDRESS: $C1B1.
INPUT REQUIREMENTS:. A
THE CHARACTER.. OUTPUT:.
A THE POSITION OF
THE UNDERLINE.. Y
THE CHARACTER'S WIDTH.. X
THE CHARACTER'S HEIGHT...
DESCRIPTION: GIVEN THE ASCII VALUE
OF A CHARACTER, THIS ROUTINE.
COMPUTES AND RETURNS THE HEIGHT AND WIDT
H, TAKING THE STYLE INTO. ACCO
UNT. THE # PIXELS ABOVE THE UNDERLINE FO
R THE PRESENT FONT IS. ALSO RET
URNED...........................
GEOS KERNAL ROUTINES
1-14... FUN
CTION NAME: CHGDRV. PURPOSE: CH
ANGE THE DEVICE NUMBER OF A DRIVE..
CALL ADDRESS: $C2BC. INPUT
REQUIREMENTS:. A
NEW DEVICE NUMBER FOR DRIVE..
$8489 CURRENT DRIVE NUMBER..
OUTPUT:. $BA N
EW DEVICE NUMBER.. $8489
NEW DEVICE NUMBER.. $84
92-$8495 APPROPRIATE BYTES ARE RESET AND
SET.. ERRORS: SEE APPENDIX I..
. DESCRIPTION: THE CURRENT DRIV
E IS MADE READY, THEN THE NEW DEVICE.
NUMBER IS SENT TO TURBODOS WHICH
WILL CHANGE IT. THIS RESULTS IN.
THE DRIVE BEING SET AS THE CURRENT D
RIVE BUT WITH A NEW DEVICE. N
UMBER, AND WITH TURBODOS UP AND RUNNIN
G. THE STATUS BYTES AT. $8492
-$8495 ARE CHANGED, THE OLD ONE IS RESET
AND THE NEW ONE HAS. BITS 6 AN
D 7 SET.... FUNCTION NAME: CKMO
US. PURPOSE: CHECK IF THE MOUSE
IS IN A BOX.. CALL ADDRESS: $C
2B3. INPUT REQUIREMENTS:.
$06 TOP MARGIN..
$07 BOTTOM MARGIN..
$08-$09 LEFT MARGIN..
$0A-$0B RIGHT MARGIN.. OU
TPUT:. A $00 - OUT
SIDE BOX, $FF - INSIDE BOX... D
ESCRIPTION: THIS ROUTINE SIMPLY COMP
ARES THE PRESENT MOUSE. LOCAT
ION STORED AT LOCATIONS $3A-$3C A
GAINST THE BOX'S. BOUNDARIE
S. A IS SET TO $00 IF THE MOUSE IS OUTSI
DE, $FF IF IT IS. INSIDE....
FUNCTION NAME: CLRRDY. P
URPOSE: TURN OFF TURBODOS.. CAL
L ADDRESS: $C232. INPUT REQUIRE
MENTS:. $8489 CURRENT
DRIVE NUMBER... DESCRIPTION: TU
RBODOS IS TERMINATED IN THE CURRENT DRIV
E..................... GEOS KER
NAL ROUTINES
1-15... FUNCTION NAME
: CLRSTS. PURPOSE: CLEAR THE DR
IVE READY STATUS.. CALL ADDRESS
: $C235. INPUT REQUIREMENTS:.
$8489 CURRENT DRIVE NUM
BER.. OUTPUT:. AP
PROPRIATE STATUS BYTE IS RESET...
DESCRIPTION: THIS ROUTINE TERMINAT
ES TURBODOS IN THE CURRENT. D
RIVE, AND RESETS THE DRIVE STATUS BYTE A
T $8492-$8495.... FUNCTION NAME
: CLSMNU. PURPOSE: BACKS UP A M
ENU LEVEL.. CALL ADDRESS: $C190
.. DESCRIPTION: THIS ROUTINE E
RASES THE PRESENT MENU, AND POPS BACK.
ONE LEVEL.... FUNCTION
NAME: CLSSER. PURPOSE: CLOSE OF
F SERIAL COMMUNICATION.. CALL A
DDRESS: $C25F. ERRORS: SEE APPE
NDIX I... DESCRIPTION: THIS R
OUTINE RESETS THE I/O PORTS AFTER SE
RIAL. COMMUNICATION IS COMPLETE
. THIS ROUTINE IS CALLED AFTER CALLS TO
. READ2, WRITE2 OR CWRITE....
FUNCTION NAME: CLSWIN.
PURPOSE: CLOSE A WINDOW.. CALL
ADDRESS: $C2BF. OUTPUT:.
$02 COMMAND BYTE FROM WIND
OW PROCESSOR.. $851D C
OMMAND BYTE FROM WINDOW PROCESSOR...
DESCRIPTION: THE WINDOW IS ERASE
D AND THE MEMORY ADDRESSES THAT.
THE WINDOW PROCESSOR SAVED ARE RESTORE
D. CONTROL RETURNS TO THE. CA
LLER OF WINDOW.........................
GEOS KERNAL ROUTINES
1-16...
FUNCTION NAME: CMDTBL. PURP
OSE: SETS UP A TABLE OF RECURRING TIMED
EVENTS.. CALL ADDRESS: $C103.
INPUT REQUIREMENTS:.
A THE NUMBER OF ENTRIES IN TH
E TABLE.. $02-$03 A POIN
TER TO THE TABLE OF COUNTERS AND ROUTINE
. ADDRESSES...
DESCRIPTION: THIS ROUTINE COPIE
S A TABLE OF SUBROUTINE ADDRESSES.
AND COUNTER VALUES INTO GEOS'S TAB
LES AT $872D AND $8755. THE.
COUNTERS WILL BE DECREMENTED ON EACH CA
LL TO IRQRTN. WHEN THEY. REAC
H ZERO, THEY ARE RESET AND THE ASSOCIAT
ED ROUTINE IS CALLED. BY THE
GEOS MAIN LOOP. THE COMMAND BYTES ARE
INITIALLY SET TO. DISABLE THE
COUNTERS. SEVERAL CALLS TO ENABLE ARE NE
EDED TO START. THE COUNTERS RUN
NING, ONE FOR EACH ENTRY IN THE TABLE.
THE TABLE. CONSISTS OF PAIRS
OF WORDS. THE FIRST IS THE ADDRESS OF
THE. SUBROUTINE TO BE EXECUT
ED EACH TIME THE COUNTER REACHES ZERO AN
D. THE SECOND IS THE COUNTE
R VALUE . THIS APPEARS TO BE THE.
RUDIMENTS OF MULTITASKING GEOS.
THE TABLE OF COMMAND BYTES AT.
$8719 ARE BIT ORIENTED AND OPERAT
E ACCORDING TO THE FOLLOWING.
TABLE:. BIT 7 - TIMER REAC
HED ZERO, CALL THE SUBROUTINE..
BIT 6 - DISABLE THE EXECUTION OF T
HE ROUTINE. THIS DOES NOT.
AFFECT THE COUNTER..
BIT 5 - INITIALLY SET BY CMDTBL, C
AUSES THE COUNTER TO STOP.
RUNNING.. BIT 4 -
THOUGH NOT REFERENCED ANYWHERE IN THE
GEOS KERNAL,. THI
S BIT ALSO STOPS THE COUNTER. THIS BIT
IS NOT. TOUCHED
BY ANY OF THE GEOS ROUTINES, INCL
UDING. ENABLE....
FUNCTION NAME: CMENUS.
PURPOSE: CLOSES ALL MENU LEVELS..
CALL ADDRESS: $C1BD. PREPAR
ATORY ROUTINES: MENU.. DESCRIPT
ION: THIS ROUTINE IS NOT THE SAME ERAMN
S. THE MENUS ARE. CLEARED ONE
AT A TIME AND THE PREVIOUS LEVELS ARE R
EPROCESSED IN. REVERSE ORDER UN
TIL ALL MENUS ARE CLOSED.... FU
NCTION NAME: CONVRT. PURPOSE: C
ONVERTS A DISK TO GEOS FORMAT..
CALL ADDRESS: $C1EA. ERRORS: S
EE APPENDIX.. DESCRIPTION: THI
S ROUTINE MODIFIES THE DIRECTORY HE
ADER TO. INCLUDE THE GEOS FORM
AT MESSAGE. IT ALSO ALLOCATES A SECTOR T
O BE. USED FOR THE BORDER FROM
DESKTOP............... GEOS KER
NAL ROUTINES
1-17... FUNCTION NAME
: COPYB. PURPOSE: COPIES A BOX
FROM SCREEN 2 TO SCREEN 1.. CAL
L ADDRESS: $C12D. INPUT REQUIRE
MENTS:. $06 THE TOP
MARGIN.. $07 THE BOT
TOM MARGIN.. $08-$09 THE
LEFT MARGIN.. $0A-$0B T
HE RIGHT MARGIN... DESCRIPTION:
THIS ROUTINE COPIES A BOX FROM SCREEN
2 ($6000) TO. SCREEN 1 ($A000)
. LOCATION $2F IS UNAFFECTED. THIS ROUT
INE CALLS. COPYL REPEATEDLY TO
COPY EACH LINE OF THE BOX.... F
UNCTION NAME: COPYB2. PURPOSE:
IDENTICAL TO COPYB, BUT WITH INLINE DATA
.. CALL ADDRESS: $C1A5..
DESCRIPTION: THIS ROUTINE COPIES A
BOX FROM SCREEN 2 ($6000) TO. S
CREEN 1 ($A000). THE BOX DESCRIPTOR IS
INLINE WITH THE CALLING. CODE.
SEE PFILL2 FOR AN EXAMPLE....
FUNCTION NAME: COPYB3. PURPOSE
: COPIES A BOX FROM SCREEN 2 TO SCREEN 1
.. CALL ADDRESS: $C250.
INPUT REQUIREMENTS:. $06
THE TOP MARGIN.. $0
7 THE BOTTOM MARGIN..
$08-$09 THE LEFT MARGIN..
$0A-$0B THE RIGHT MARGIN...
DESCRIPTION: THIS ROUTINE COPIES A
BOX FROM SCREEN 1 ($A000) TO. S
CREEN 2 ($6000). LOCATION $2F IS UNAFFE
CTED. THIS ROUTINE CALLS. COPYL
REPEATEDLY TO COPY EACH LINE OF THE BOX
.... FUNCTION NAME: COPYB4.
PURPOSE: IDENTICAL TO COPYB3, BUT
WITH INLINE DATA.. CALL ADDRESS
: $C253.. DESCRIPTION: THIS R
OUTINE COPIES A BOX FROM SCREEN 1 ($A000
) TO. SCREEN 2 ($6000). THE BO
X DESCRIPTOR IS INLINE WITH THE CALLING
. CODE. SEE PFILL2 FOR AN EXAM
PLE..................... GEOS K
ERNAL ROUTINES
1-18... FUNCTION NA
ME: COPYL. PURPOSE: COPIES A HO
RIZONAL LINE FROM SCREEN 2 TO SCREEN 1..
CALL ADDRESS: $C11E.
INPUT REQUIREMENTS:. $08-$
09 THE LEFT MARGIN.. $0A
-$0B THE RIGHT MARGIN..
$18 THE ROW NUMBER... DES
CRIPTION: THIS ROUTINE COPIES A HORIZON
TAL LINE FROM SCREEN 2. ($6000)
TO SCREEN 1 ($A000). LOCATION $2F IS UN
AFFECTED.... FUNCTION NAME: COP
YSP. PURPOSE: COPIES A SPRITE I
NTO GEOS'S STORAGE AREA.. CALL
ADDRESS: $C1C6. INPUT REQUIREME
NTS:. $08 THE SPRITE
NUMBER (0-7).. $0A-$0B
POINTER TO THE SPRITE DATA... D
ESCRIPTION: THIS ROUTINE SIMPLY COPIES
63 BYTES OF DATA POINTED. TO B
Y $0A-$0B TO THE SPECIFIED SPRITE BLOCK
. GEOS USES SPRITE. BLOCKS 40
TO 47.... FUNCTION NAME: CURSO
F. PURPOSE: TURN OFF TEXT CURSO
R.. CALL ADDRESS: $C29E.
OUTPUT:. $84B4 BIT
6 IS CLEARED.. PREPARATORY ROUT
INES: CURSON.. DESCRIPTION: SP
RITE 1 (GEOS'S TEXT CURSOR) IS TURNED OF
F, BIT 6. OF LOCATION $84B4 IS
RESET. THE BLINK RATE IS SET TO 60 (ONC
E PER. SECOND).... FUN
CTION NAME: CURSON. PURPOSE: TU
RN ON TEXT CURSOR.. CALL ADDRES
S: $C29B. INPUT REQUIREMENTS:.
$84BE-$84BF COLUMN TO PLAC
E CURSOR IN.. $84C0 RO
W TO PLACE CURSOR ON.. OUTPUT:.
$84B4 BIT 6 IS SET...
DESCRIPTION: TURNS ON SPRITE 1
AND POSITIONS IT. IT ALSO SETS BIT.
6 OF LOCATION $84B4. THE BLINK
RATE IS SET TO 60, ONCE PER.
SECOND. SPRITE 1 IS THE TEXT CURSOR FO
R GEOS................. GEOS KE
RNAL ROUTINES
1-19... FUNCTION NAM
E: CWIDTH. PURPOSE: RETURNS THE
WIDTH OF A CHARACTER.. CALL AD
DRESS: $C1C9. INPUT REQUIREMENT
S:. A THE ASCII VA
LUE OF THE CHARACTER.. OUTPUT:.
A THE WIDTH OF TH
E CHARACTER... DESCRIPTION: TH
IS ROUTINE SIMPLY TAKES THE DIFFERENCE O
F THE BIT. STREAM INDICES TO GE
T THE CHARACTERS WIDTH. THE DELETE CHAR
ACTER. HAS ITS WIDTH LOADED
FROM $8807. THIS ROUTINE IS CALLED B
Y. CHARST.... FUNCTION
NAME: CWRITE. PURPOSE: CONDITI
ONALLY WRITE A SECTOR TO DISK..
CALL ADDRESS: $C223. INPUT REQ
UIREMENTS:. $04 TRAC
K NUMBER.. $05 SECTO
R NUMBER.. $0A-$0B POINT
ER TO DATA BUFFER.. PREPARATORY
ROUTINES: DSETUP. ERRORS: SEE
APPENDIX I... DESCRIPTION: THE
FIRST THING THIS ROUTINE DOES IS TRY TO
READ THE. DESIRED SECTOR. IF
THE READ SUCCEEDS, NOTHING HAPPENS. T
HREE. ATTEMPTS ARE MADE AT THE
READ. AFTER THESE READ ATTEMPTS, THE
. SECTOR IS WRITTEN TO THE DISK
, BY CALLING WRITE2. IF THE WRITE.
SUCCEEDED WITHOUT ANY ERRORS, T
HEN THE ROUTINE RESTARTS ITSELF..
IT WILL MAKE FIVE ATTEMPTS AT THIS LO
OP. IF AFTER FIVE ATTEMPTS,. T
HE SECTOR CAN NOT BE READ RELIABLY, AN
ERROR 39 RESULTS. THIS. ROUTI
NE IS USUALLY CALLED AFTER THE SECTOR H
AS BEEN WRITTEN OUT. WITH A
CALL TO WRITE2. WRITE CALLS THIS ROUTIN
E TO VERIFY THE. SECTOR....
FUNCTION NAME: DEC16. PU
RPOSE: DECREMENTS A 16 BIT VALUE..
CALL ADDRESS: $C175. INPUT
REQUIREMENTS:. X T
HE ADDRESS OF THE 16 BIT INTEGER..
OUTPUT:. X THE
ADDRESS OF THE 16 BIT RESULT...
DESCRIPTION: THIS ROUTINE IS ONE OF
THE GEOS MATH ROUTINES. X. PO
INTS TO A 16 BIT VALUE WHICH IS DECREMEN
TED BY 1................... GEO
S KERNAL ROUTINES
1-20... FUNCTION
NAME: DECODE. PURPOSE: COMPUTE
A CHECKSUM FOR A DATA REGION..
CALL ADDRESS: $C20E. INPUT REQ
UIREMENTS:. $02-$03 POIN
TER TO DATA REGION.. $04-$
05 LENGTH OF REGION.. OUTPUT:
. $06-$07 CHECKSUM OF RE
GION... DESCRIPTION: THIS ROU
TINE IS CALLED BY THE BOOTUP ROUTINES
TO. COMPUTE THE CHECKSUM OF
GEOS BOOT. THIS CHECKSUM IS USED TO.
CREATE THE INTERRUPT VECTOR ADD
RESS. THE REASON FOR THIS WAS TO.
PREVENT PIRACY. THIS CAN BE USED
TO CHECK THE INTEGRITY OF A.
MEMORY REGION. THIS IS ACTUALLY MORE O
F A CRC COMPUTATION THEN A. CHE
CKSUM AND THE FORMULA IS A LITTLE TOO CO
MPLEX TO EXPLAIN HERE.... FUNCT
ION NAME: DELAY. PURPOSE: SETS
UP A TIME DELAY.. CALL ADDRESS:
$C199. INPUT REQUIREMENTS:.
$02-$03 AMOUNT OF TIME DEL
AY VALUE IN 60THS OF A SECOND...
DESCRIPTION: THE COUNTER IS SAVED O
N A STACK, AS WELL AS THE. RE
TURN ADDRESS OF THE CALLER. CONTROL I
S PASSED BACK A LEVEL. HIGHER
THAN THE CALLER. WHEN THE TIMER RUNS
OUT, CONTROL WILL. RETURN WH
ERE IT LEFT OFF. THIS ALLOWS PROGRAMS
TO INCORPORATE. DELAYS WITHOU
T HALTING GEOS'S MANY INDEPENDANT PROCE
SSES. THIS. AND CMDTBL APPEAR
TO BE THE BEGINNINGS OF MULTITASKING FOR
GEOS.... FUNCTION NAME: DELET2
. PURPOSE: DELETE A TEMPORARY F
ILE.. CALL ADDRESS: $C244.
INPUT REQUIREMENTS:.
$08-$09 POINTER TO TABLE OF TRACKS AND
SECTORS.. $0E-$0F POINT
ER TO FILE NAME.. ERRORS: SEE A
PPENDIX I... DESCRIPTION: THIS
ROUTINE REMOVES THE FILE FROM THE DIRECT
ORY. IT. USES THE TABLE OF TRA
CKS AND SECTORS TO FREE UP THE SECTORS U
SED. BY THE FILE. THIS ROUTIN
E IS USED TO CLEAN UP A TEMPORARY FILE.
THAT WAS NOT COMPLETED....
FUNCTION NAME: DELETE. PU
RPOSE: DELETE A FILE FROM THE DISK..
CALL ADDRESS: $C238. INPU
T REQUIREMENTS:. $02-$03
POINTER TO FILE NAME.. ERRORS:
SEE APPENDIX I... DESCRIPTION:
THE SPECIFIED FILE IS DELETED FROM
THE CURRENT. DRIVE...........
GEOS KERNAL ROUTINES
1-21...
FUNCTION NAME: DIRDSK. PUR
POSE: CREATES A DIRECTORY ENTRY ON THE D
ISK.. CALL ADDRESS: $C1F0.
INPUT REQUIREMENTS:.
$14-$15 $8100, REQUIRED..
$16 # OF DIRECTORY SECTORS TO SK
IP FIRST.. $8100-$81FF INF
ORMATION SECTOR FOR FILE..
$8300- TRACK AND SECTOR LIST FOR FIL
E.. OUTPUTS:. $84
00-$841D DIRECTORY ENTRY..
DIRECTORY ENTRY IS WRITTEN TO THE DISK.
. PREPARATORY ROUTINES: FALLOC.
ERRORS: SEE APPENDIX..
DESCRIPTION: THIS ROUTINE IS USED
BY SAVE AND CALLS DIRMEM.. BE
CAUSE OF THIS, ASSUMPTIONS ARE MADE. T
HE FIRST IS THAT THE. INFORM
ATION SECTOR IS AT $8100-$81FF AND T
HAT $14-$15 POINT. THERE. TH
E FIRST TWO BYTES OF THE INFORMATION S
ECTOR ARE THE. ADDRESS OF THE
FILENAME. THESE ARE RESET BY THIS ROUT
INE TO $00,. $FF. ANOTHER ASS
UMPTION MADE BY THIS ROUTINE IS THAT $83
00 IS A. LIST OF USEABLE TRACKS
AND SECTORS; SPECIFICALLY, $8300-$8301
ARE. THE TRACK AND SECTOR FOR
THE INFORMATION SECTOR AND $8302-$8303.
ARE THE TRACK AND SECTOR OF TH
E FIRST SECTOR OF THE FILE....
FUNCTION NAME: DIRMEM. PURPOSE:
CREATE A DIRECTORY ENTRY IN MEMORY..
CALL ADDRESS: $C1F3. INP
UT REQUIREMENTS:. $14-$15
$8100, REQUIRED.. $8100-
$81FF INFORMATION SECTOR FOR FILE..
$8300- TRACK AND SECTOR LIS
T FOR FILE.. OUTPUTS:.
$8400-$841D DIRECTORY ENTRY..
PREPARATORY ROUTINES: FALLOC.
ERRORS: SEE APPENDIX.. DESC
RIPTION: SEE DIRDSK FOR A COMPLETE
LIST OF ALL THE. ASSUMPTI
ONS MADE BY THIS ROUTINE................
.......... GEOS KERNAL ROUTINES
1-
22... FUNCTION NAME: DRAW.
PURPOSE: DRAW A SECTION OF A CODED
GRAPHIC IMAGE.. CALL ADDRESS: $
C2AA. INPUT REQUIREMENTS:.
$02-$03 POINTER TO GRAPHIC I
MAGE DATA.. $04 COLU
MN TO START ON, IN BYTES..
$05 ROW TO START DRAWING THE IMAG
E ON.. $06 IMAGE WID
TH IN BYTES.. $07 IM
AGE HEIGHT IN PIXELS. $18
# BYTES TO SKIP ON THE LEFT SIDE..
$19 # BYTES ON THE
RIGHT SIDE.. $1A-$1B # R
OWS TO SKIP DOWN... DESCRIPTION
: THE CODING OF THE IMAGE IS THE SAME
AS THAT OF THE. CLICK BOXES, SE
E CBOX FOR MORE INFORMATION. THIS ROUTIN
E SEEMS TO. BE FOR DRAWING PIE
CES OF PHOTO SCRAPS. PHOTO SCRAPS HAVE
THIS. CODED FORMAT. THE PARA
METERS FOR THIS ROUTINE ALLOW A SECTION
OF. THE IMAGE TO BE DRAWN BY SP
ECIFYING HOW MANY ROWS TO SKIP DOWN,AS.
WELL AS HOW MANY BYTES TO SKIP
ON THE LEFT AND THE RIGHT OF THE.
DESIRED SECTION. THIS IS NOT USED
BY GEOPAINT UNLESS GEOPAINT.
CONVERTS ITS FILES BECAUSE THEY ARE
IN A DIFFERENT FORMAT;. HOW
EVER, PHOTO SCRAPS ARE IN THIS FORMAT...
. FUNCTION NAME: DRAW2.
PURPOSE: DRAW A SECTION OF A CODED GRA
PHIC IMAGE.. CALL ADDRESS: $C2C
5. INPUT REQUIREMENTS:.
$02-$03 POINTER TO GRAPHIC IMAG
E DATA.. $04 COLUMN
TO START ON, IN BYTES.. $0
5 ROW TO START DRAWING THE IMAGE O
N.. $06 IMAGE WIDTH
IN BYTES.. $07 IMAGE
HEIGHT IN PIXELS. $18
# BYTES TO SKIP ON THE LEFT SIDE..
$19 # BYTES ON THE RIG
HT SIDE.. $1A-$1B # ROWS
TO SKIP DOWN.. $1C-$1D
FIRST USER VECTOR.. $1E-$1
F SECOND USER VECTOR... DESCR
IPTION: THIS ROUTINE IS IDENTICAL TO
DRAW, EXCEPT THAT. BEFORE EA
CH BYTE IS READ, THE FIRST USER ROUTINE
IS CALLED. THE. SECOND USER
ROUTINE IS CALLED BEFORE READING EACH B
YTE THAT IS. NOT PART OF A PA
TTERN (COMMAND BYTES GREATER THAN 219)
. THESE. USER ROUTINES MIGHT
BE FOR DISK READING, IN ORDER TO DRAW
AN. IMAGE THAT IS NOT MEMORY
RESIDENT.................
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL