_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\

WRITE.ASM

FILE INFORMATION

FILENAME(S): WRITE.ASM

FILE TYPE(S): PRG

FILE SIZE: 477b

FIRST SEEN: 2025-11-30 21:25:07

APPEARS ON: 2 disk(s)

FILE HASH

8811b5657ec0c4efe237e750e53fec9f2c26a901e01bcefe2ab0d89af1fe5122

FOUND ON DISKS (2 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
PC FLOP WRITE.ASM PRG DuncanTwain 21 17 DOWNLOAD FILE
HARDDISK WRITE.ASM PRG DuncanTwain 14 8 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: D8 1F E6 1F 64 00 2E 42  41 20 32 30 30 30 30 00  |....d..BA 20000.|
00000010: FD 1F 6E 00 2E 45 51 20  44 41 54 41 20 20 20 3D  |..n..EQ DATA   =|
00000020: 20 24 44 45 30 30 00 15  20 78 00 2E 45 51 20 53  | $DE00.. x..EQ S|
00000030: 45 43 4E 55 4D 20 3D 20  44 41 54 41 2B 32 00 2D  |ECNUM = DATA+2.-|
00000040: 20 82 00 2E 45 51 20 53  45 43 54 4F 52 20 3D 20  | ...EQ SECTOR = |
00000050: 44 41 54 41 2B 33 00 45  20 8C 00 2E 45 51 20 54  |DATA+3.E ...EQ T|
00000060: 52 43 4B 4C 4F 20 3D 20  44 41 54 41 2B 34 00 5D  |RCKLO = DATA+4.]|
00000070: 20 96 00 2E 45 51 20 54  52 43 4B 48 49 20 3D 20  | ...EQ TRCKHI = |
00000080: 44 41 54 41 2B 35 00 75  20 A0 00 2E 45 51 20 44  |DATA+5.u ...EQ D|
00000090: 52 48 45 41 44 20 3D 20  44 41 54 41 2B 36 00 8D  |RHEAD = DATA+6..|
000000A0: 20 AA 00 2E 45 51 20 43  4F 4D 4D 4E 44 20 3D 20  | ...EQ COMMND = |
000000B0: 44 41 54 41 2B 37 00 A5  20 B4 00 2E 45 51 20 44  |DATA+7.. ...EQ D|
000000C0: 41 54 41 48 49 20 3D 20  44 41 54 41 2B 38 00 AE  |ATAHI = DATA+8..|
000000D0: 20 84 03 20 53 45 49 00  B9 20 E8 03 20 4C 44 41  | .. SEI.. .. LDA|
000000E0: 23 31 00 C8 20 F2 03 20  53 54 41 53 45 43 4E 55  |#1.. .. STASECNU|
000000F0: 4D 00 D7 20 FC 03 20 53  54 41 53 45 43 54 4F 52  |M.. .. STASECTOR|
00000100: 00 E6 20 06 04 20 53 54  41 54 52 43 4B 4C 4F 00  |.. .. STATRCKLO.|
00000110: F1 20 10 04 20 4C 44 41  23 30 00 00 21 1A 04 20  |. .. LDA#0..!.. |
00000120: 53 54 41 54 52 43 4B 48  49 00 0D 21 1D 04 20 4C  |STATRCKHI..!.. L|
00000130: 44 41 23 24 41 31 00 1C  21 20 04 20 53 54 41 44  |DA#$A1..! . STAD|
00000140: 52 48 45 41 44 00 30 21  24 04 20 4C 44 41 23 24  |RHEAD.0!$. LDA#$|
00000150: 33 31 3B 20 57 52 49 54  45 00 3F 21 2E 04 20 53  |31; WRITE.?!.. S|
00000160: 54 41 43 4F 4D 4D 4E 44  00 50 21 38 04 4C 30 20  |TACOMMND.P!8.L0 |
00000170: 4C 44 41 43 4F 4D 4D 4E  44 00 5B 21 42 04 20 42  |LDACOMMND.[!B. B|
00000180: 4D 49 4C 30 00 66 21 4C  04 20 4C 44 59 23 30 00  |MIL0.f!L. LDY#0.|
00000190: 7E 21 56 04 4C 31 20 4E  4F 50 3B 20 20 53 54 59  |~!V.L1 NOP;  STY|
000001A0: 20 44 41 54 41 48 49 00  8B 21 60 04 20 53 54 59  | DATAHI..!`. STY|
000001B0: 44 41 54 41 00 94 21 6A  04 20 44 45 59 00 9F 21  |DATA..!j. DEY..!|
000001C0: 74 04 20 42 4E 45 4C 31  00 A8 21 79 04 20 43 4C  |t. BNEL1..!y. CL|
000001D0: 49 00 B1 21 7E 04 20 52  54 53 00 00 00           |I..!~. RTS...   |

X...D..BA 20000...N..EQ DATA   = $DE00..
 X..EQ SECNUM = DATA+2.- ...EQ SECTOR = 
DATA+3.E ...EQ TRCKLO = DATA+4.] ...EQ T
RCKHI = DATA+5.U  ..EQ DRHEAD = DATA+6..
 ...EQ COMMND = DATA+7.. ...EQ DATAHI = 
DATA+8.. .. SEI.. .. LDA#1.H .. STASECNU
M.W .. STASECTOR.. .. STATRCKLO.. .. LDA
#0..!.. STATRCKHI..!.. LDA#$A1..! . STAD
RHEAD.0!$. LDA#$31; WRITE.?!.. STACOMMND
.P!8.L0 LDACOMMND.[!B. BMIL0.F!L. LDY#0.
~!V.L1 NOP;  STY DATAHI..!`. STYDATA..!J
. DEY..!T. BNEL1..!Y. CLI..!~. RTS...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL