2WRITE1.ASM

FILE INFORMATION

FILENAME(S): 2WRITE1.ASM

FILE TYPE(S): PRG

FILE SIZE: 906b

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

APPEARS ON: 2 disk(s)

FILE HASH

d91845f0b7ab2cf861e07cdcd78a9e48b1797e512d9b741b1b625dd157ea702f

FOUND ON DISKS (2 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
PC FLOP	2WRITE1.ASM	PRG	DuncanTwain	13	0	DOWNLOAD FILE
HARDDISK	2WRITE1.ASM	PRG	DuncanTwain	22	13	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: D8 1F E6 1F 64 00 2E 42  41 20 32 31 30 30 30 00  |....d..BA 21000.|
00000010: FD 1F 6E 00 2E 45 51 20  44 41 54 41 4C 4F 20 3D  |..n..EQ DATALO =|
00000020: 20 24 44 45 30 30 00 17  20 78 00 2E 45 51 20 44  | $DE00.. x..EQ D|
00000030: 41 54 41 48 49 20 3D 20  44 41 54 41 4C 4F 2B 32  |ATAHI = DATALO+2|
00000040: 00 31 20 82 00 2E 45 51  20 52 45 47 49 53 54 20  |.1 ...EQ REGIST |
00000050: 3D 20 44 41 54 41 4C 4F  2B 31 00 3E 20 C8 00 20  |= DATALO+1.> .. |
00000060: 4C 44 41 23 24 30 41 00  55 20 E1 00 20 53 54 41  |LDA#$0A.U .. STA|
00000070: 52 45 47 49 53 54 3B 20  23 20 53 45 43 54 00 62  |REGIST; # SECT.b|
00000080: 20 FA 00 20 4C 44 41 23  24 30 32 00 79 20 13 01  | .. LDA#$02.y ..|
00000090: 20 53 54 41 52 45 47 49  53 54 3B 20 23 20 53 45  | STAREGIST; # SE|
000000A0: 43 54 00 84 20 2C 01 20  4C 44 41 23 31 00 93 20  |CT.. ,. LDA#1.. |
000000B0: 5E 01 20 53 54 41 44 41  54 41 4C 4F 00 99 20 77  |^. STADATALO.. w|
000000C0: 01 3B 00 A6 20 90 01 20  4C 44 41 23 24 30 42 00  |.;.. .. LDA#$0B.|
000000D0: BD 20 A9 01 20 53 54 41  52 45 47 49 53 54 3B 20  |. .. STAREGIST; |
000000E0: 53 45 43 54 4F 52 00 CA  20 C2 01 20 4C 44 41 23  |SECTOR.. .. LDA#|
000000F0: 24 30 33 00 E1 20 DB 01  20 53 54 41 52 45 47 49  |$03.. .. STAREGI|
00000100: 53 54 3B 20 53 45 43 54  4F 52 00 EC 20 F4 01 20  |ST; SECTOR.. .. |
00000110: 4C 44 41 23 31 00 FB 20  26 02 20 53 54 41 44 41  |LDA#1.. &. STADA|
00000120: 54 41 4C 4F 00 01 21 3F  02 3B 00 0E 21 58 02 20  |TALO..!?.;..!X. |
00000130: 4C 44 41 23 24 30 43 00  25 21 71 02 20 53 54 41  |LDA#$0C.%!q. STA|
00000140: 52 45 47 49 53 54 3B 20  54 52 43 4B 4C 4F 00 32  |REGIST; TRCKLO.2|
00000150: 21 8A 02 20 4C 44 41 23  24 30 34 00 49 21 A3 02  |!.. LDA#$04.I!..|
00000160: 20 53 54 41 52 45 47 49  53 54 3B 20 54 52 43 4B  | STAREGIST; TRCK|
00000170: 4C 4F 00 54 21 BC 02 20  4C 44 41 23 31 00 63 21  |LO.T!.. LDA#1.c!|
00000180: EE 02 20 53 54 41 44 41  54 41 4C 4F 00 69 21 07  |.. STADATALO.i!.|
00000190: 03 3B 00 76 21 20 03 20  4C 44 41 23 24 30 44 00  |.;.v! . LDA#$0D.|
000001A0: 8D 21 39 03 20 53 54 41  52 45 47 49 53 54 3B 20  |.!9. STAREGIST; |
000001B0: 54 52 43 4B 48 49 00 9A  21 52 03 20 4C 44 41 23  |TRCKHI..!R. LDA#|
000001C0: 24 30 35 00 B1 21 6B 03  20 53 54 41 52 45 47 49  |$05..!k. STAREGI|
000001D0: 53 54 3B 20 54 52 43 4B  48 49 00 BC 21 84 03 20  |ST; TRCKHI..!.. |
000001E0: 4C 44 41 23 30 00 CB 21  B6 03 20 53 54 41 44 41  |LDA#0..!.. STADA|
000001F0: 54 41 4C 4F 00 D1 21 CF  03 3B 00 DE 21 E8 03 20  |TALO..!..;..!.. |
00000200: 4C 44 41 23 24 30 45 00  F5 21 01 04 20 53 54 41  |LDA#$0E..!.. STA|
00000210: 52 45 47 49 53 54 3B 20  44 52 48 45 41 44 00 02  |REGIST; DRHEAD..|
00000220: 22 1A 04 20 4C 44 41 23  24 30 36 00 19 22 33 04  |".. LDA#$06.."3.|
00000230: 20 53 54 41 52 45 47 49  53 54 3B 20 44 52 48 45  | STAREGIST; DRHE|
00000240: 41 44 00 26 22 4C 04 20  4C 44 41 23 24 41 31 00  |AD.&"L. LDA#$A1.|
00000250: 35 22 7E 04 20 53 54 41  44 41 54 41 4C 4F 00 3B  |5"~. STADATALO.;|
00000260: 22 97 04 3B 00 48 22 B0  04 20 4C 44 41 23 24 30  |"..;.H".. LDA#$0|
00000270: 46 00 5F 22 C9 04 20 53  54 41 52 45 47 49 53 54  |F._".. STAREGIST|
00000280: 3B 20 43 4F 4D 4D 4E 44  00 6C 22 E2 04 20 4C 44  |; COMMND.l".. LD|
00000290: 41 23 24 30 37 00 83 22  FB 04 20 53 54 41 52 45  |A#$07..".. STARE|
000002A0: 47 49 53 54 3B 20 43 4F  4D 4D 4E 44 00 90 22 14  |GIST; COMMND..".|
000002B0: 05 20 4C 44 41 23 24 33  31 00 A6 22 46 05 20 53  |. LDA#$31.."F. S|
000002C0: 54 41 44 41 54 41 4C 4F  3B 20 57 52 49 54 45 00  |TADATALO; WRITE.|
000002D0: AC 22 5F 05 3B 00 BD 22  78 05 4C 31 20 4C 44 41  |."_.;.."x.L1 LDA|
000002E0: 44 41 54 41 4C 4F 00 C8  22 91 05 20 42 4D 49 4C  |DATALO..".. BMIL|
000002F0: 31 00 CE 22 DC 05 3B 00  D9 22 F5 05 20 4C 44 59  |1.."..;..".. LDY|
00000300: 23 38 00 EE 22 FA 05 20  53 54 59 52 45 47 49 53  |#8..".. STYREGIS|
00000310: 54 3B 20 44 41 54 41 00  F9 22 FF 05 20 4C 44 59  |T; DATA..".. LDY|
00000320: 23 30 00 0E 23 0E 06 20  53 54 59 52 45 47 49 53  |#0..#.. STYREGIS|
00000330: 54 3B 20 44 41 54 41 00  19 23 40 06 20 4C 44 58  |T; DATA..#@. LDX|
00000340: 23 30 00 2A 23 59 06 4C  32 20 53 54 58 44 41 54  |#0.*#Y.L2 STXDAT|
00000350: 41 48 49 00 39 23 72 06  20 53 54 59 44 41 54 41  |AHI.9#r. STYDATA|
00000360: 4C 4F 00 42 23 7C 06 20  44 45 58 00 4B 23 8B 06  |LO.B#|. DEX.K#..|
00000370: 20 49 4E 59 00 56 23 A4  06 20 42 4E 45 4C 32 00  | INY.V#.. BNEL2.|
00000380: 5F 23 70 17 20 52 54 53  00 56                    |_#p. RTS.V      |

X...D..BA 21000...N..EQ DATALO = $DE00..
 X..EQ DATAHI = DATALO+2.1 ...EQ REGIST 
= DATALO+1.> H. LDA#$0A.U .. STAREGIST; 
# SECT.B .. LDA#$02.Y .. STAREGIST; # SE
CT.. ,. LDA#1.. ^. STADATALO.. W.;.. .. 
LDA#$0B.. .. STAREGIST; SECTOR.J B. LDA#
$03.. .. STAREGIST; SECTOR.. .. LDA#1.. 
&. STADATALO..!?.;..!X. LDA#$0C.%!Q. STA
REGIST; TRCKLO.2!.. LDA#$04.I!.. STAREGI
ST; TRCKLO.T!.. LDA#1.C!.. STADATALO.I!.
.;.V! . LDA#$0D..!9. STAREGIST; TRCKHI..
!R. LDA#$05..!K. STAREGIST; TRCKHI..!.. 
LDA#0.K!.. STADATALO.Q!O.;..!.. LDA#$0E.
.!.. STAREGIST; DRHEAD..".. LDA#$06.."3.
 STAREGIST; DRHEAD.&"L. LDA#$A1.5"~. STA
DATALO.;"..;.H".. LDA#$0F._"I. STAREGIST
; COMMND.L".. LDA#$07..".. STAREGIST; CO
MMND..".. LDA#$31.."F. STADATALO; WRITE.
."_.;.."X.L1 LDADATALO.H".. BMIL1.N"..;.
Y".. LDY#8..".. STYREGIST; DATA..".. LDY
#0..#.. STYREGIST; DATA..#@. LDX#0.*#Y.L
2 STXDATAHI.9#R. STYDATALO.B#|. DEX.K#..
 INY.V#.. BNEL2._#P. RTS.V

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL