P/ADEXsrc

Home » Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_27.ADF » P/ADEXsrc

P/ADEXsrc

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk:	Home » Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_27.ADF
Filename:	P/ADEXsrc
Read OK:	✔
File size:	1FD6 bytes
Load address:	FFFF0E00
Exec address:	FFFF802B

Duplicates

There is 1 duplicate copy of this file in the archive:

AEW website » eug » eug_5_25_discs_Eug-27_D-EUG27.dsd » U.ADEXSrc
Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_27.ADF » P/ADEXsrc

File contents

   10REM ****************************
   20REM ADFS Exposed
   30REM Original BASIC program from
   40REM Electron User, November 1987
   50REM M/coded by Richard Dimond
   60REM (c) July 1996
   70REM ****************************
   80REM
   90DIM Q% &1000
  100PROCass
  110OSCLI"SAVE ADFSEX "+STR$~Q%+" "+STR$~O%+" 2000 2000"
  120END
  130DEFPROCass
  140os=&FFEE:osb=&FFF4:osw=&FFF1
  150addr=&70:plot=&74:X=&7A:Y=&7C:C1=&7E:C2=&7F
  160hex=&80:work=&82:decimal=&84
  170dad=&82:dsp=&84:T=&86:S=&88:count=&8A:diff=&8E:trkno=&8F
  180W%=&2D00:X%=W%+&100
  190FORI%=4TO6STEP2
  200P%=&2000:O%=Q%
  210[OPTI%
  220.start
  230LDA#15:LDX#d1 MOD256:LDY#d1 DIV256:JSRp
  240LDX#title MOD256:LDY#title DIV256:JSRdh
  250LDA#47:LDX#d2 MOD256:LDY#d2 DIV256:JSRp
  260.pause JSR&FFE0
  270BCCnoesc:RTS:.noesc
  280CMP#13:BNEpause
  290JSRreaddisc
  300LDA#16:LDX#d3 MOD256:LDY#d3 DIV256:JSRp
  310JSRvars
  320JSRgrid
  330JSRinfo
  340JSRkey
  350JSRfsmap
  360JSRcat
  370JSRfdfsecs
  380LDA#45:LDX#run MOD256:LDY#run DIV256:JSRp
  390JSR&FFE0
  400AND#&DF:CMP#82:BEQst
  410LDA#22:JSRos:LDA#6:JSRos
  420RTS
  430.st LDA#21:JSRosb:JMPstart
  440.p STXaddr:STYaddr+1:TAX:LDY#0
  450.lp LDA(addr),Y:JSRos:INY:DEX:BNElp:RTS
  460.dh STXaddr:STYaddr+1:LDY#0
  470.dlop LDA(addr),Y:STYcount:CMP#&0D:BNEcont:RTS:.cont STA&56:LDA#10:LDX#&56:LDY#0:JSRosw
  480LDA#23:JSRos:LDA#255:JSRos
  490LDA&57:JSRos:JSRos
  500LDA&58:JSRos:JSRos
  510LDA&59:JSRos:JSRos
  520LDA&5A:JSRos:JSRos
  530LDA#255:JSRos:LDA#8:JSRos:LDA#10:JSRos
  540LDA#23:JSRos:LDA#255:JSRos
  550LDA&5B:JSRos:JSRos
  560LDA&5C:JSRos:JSRos
  570LDA&5D:JSRos:JSRos
  580LDA&5E:JSRos:JSRos
  590LDA#255:JSRos:LDA#11:JSRos
  600LDYcount:INY:JMPdlop
  610.readdisc
  620LDX#comm MOD256:LDY#comm DIV256:JSR&FFF7
  630LDA#&72:LDX#blk MOD256:LDY#blk DIV256
  640JMPosw
  650 .prtdec   \ reset
  660 LDA #0
  670 STA decimal+0:STA decimal+1
  680 STA decimal+2:STA decimal+3
  690 STA decimal+4:STA decimal+5
  700 .convert
  710 LDA #0
  720 STA work:STA work+1
  730 CLC:LDX #16
  740 .loop
  750 ROL hex:ROL hex+1
  760 ROL work:ROL work+1
  770 SEC:LDA work
  780 SBC #10:TAY
  790 LDA work+1
  800 SBC #0:BCC less
  810 STY work:STA work+1
  820 .less
  830 DEX:BNE loop
  840 ROL hex:ROL hex+1
  850 CLC:LDA work
  860 ADC #48
  870 JSR concatenate
  880 LDA hex:ORA hex+1
  890 BNE convert
  900 LDX decimal
  910 LDY #1
  920 .print
  930 LDA decimal,Y
  940 JSR os
  950 INY:DEX
  960 BNE print
  970 RTS
  980 .concatenate
  990 PHA:LDY decimal
 1000 BEQ zero
 1010 .move
 1020 LDA decimal,Y
 1030 STA decimal+1,Y
 1040 DEY:BNE move
 1050 .zero
 1060 PLA
 1070 STA decimal+1
 1080 INC decimal
 1090 RTS
 1100.vars
 1110LDY#&FE:LDA X%,Y:STAsize
 1120LDY#&FC:LDA W%,Y:STAsectors
 1130INY:LDA W%,Y:STAsectors+1
 1140LDAsectors:STAtracks
 1150LDAsectors+1:STAtracks+1
 1160LSRtracks+1:RORtracks
 1170LSRtracks+1:RORtracks
 1180LSRtracks+1:RORtracks
 1190LSRtracks+1:RORtracks
 1200LDAtracks:CMP#160:BNEone
 1210LDA#2:JMPtwo
 1220.one LDA#1:.two STAsides
 1230LDAsectors:STAdiscsize+1
 1240LDAsectors+1:STAdiscsize+2
 1250LDAsides:CMP#1:BNEdd:LDA#224:JMPch:.dd:LDA#192:.ch TAX:LDA#23:JSRos:LDA#224:JSRos:TXA:LDX#8:.ll JSRos:DEX:BNEll
 1260RTS
 1270.plotpt
 1280LDA#25:JSRos
 1290LDA#5:LDX#plot MOD256:LDY#plot DIV256:JMPp
 1300.grid
 1310LDA#20:LDX#d4 MOD256:LDY#d4 DIV256:JSRp
 1320.g LDA#80:STAcount:LDA#0:STAplot+1:STAplot+2:STAplot+3:STAplot+4
 1330.vlp
 1340LDA#4:STAplot:LDA#1:STAplot+4
 1350JSRplotpt
 1360LDA#29:STAplot:LDA#3:STAplot+4
 1370JSRplotpt
 1380CLC:LDAplot+1:ADC#16:STAplot+1
 1390LDAplot+2:ADC#0:STAplot+2
 1400DECcount:BNEvlp
 1410LDA#16:STAcount:LDA#0:STAplot+3:LDA#1:STAplot+4
 1420.vlp1
 1430LDA#4:STAplot:LDA#0:STAplot+1:STAplot+2
 1440JSRplotpt
 1450LDA#29:STAplot:LDA#5:STAplot+2
 1460JSRplotpt
 1470CLC:LDAplot+3:ADC#32:STAplot+3
 1480LDAplot+4:ADC#0:STAplot+4
 1490DECcount:BNEvlp1
 1500LDA#8:STAcount:LDA#4:STAplot+1:LDA#0:STAplot+2:STAhex:STAhex+1:STAtrkno
 1510LDAsides:CMP#2:BNEnd:LDA#20:STAdiff:JMPd:.nd LDA#10:STAdiff:.d
 1520.vlp2 LDA#4:STAplot:LDA#0:STAplot+3:LDA#3:STAplot+4
 1530JSRplotpt
 1540LDA#5:STAplot:LDA#32:STAplot+3
 1550JSRplotpt
 1560LDA#5:JSRos
 1570LDAtrkno:BNEnz:LDA#4:STAplot:STAplot+1:LDA#64:STAplot+3
 1580JSRplotpt
 1590LDA#48:JSRos
 1600.nz SEC:LDAplot+1:SBC#32:STAplot+1
 1610LDAplot+2:SBC#0:STAplot+2
 1620LDA#4:STAplot:LDA#64:STAplot+3
 1630JSRplotpt
 1640LDAtrkno:CMPtracks:BCSnp:JSRprtdec:.np
 1650CLC:LDAtrkno:ADCdiff:STAtrkno:STAhex
 1660.fin CLC:LDAplot+1:ADC#192:STAplot+1
 1670LDAplot+2:ADC#0:STAplot+2
 1680DECcount:BEQrts:JMPvlp2
 1690.rts LDA#4:JSRos:RTS
 1700.info
 1710LDA#43:LDX#tks MOD256:LDY#tks DIV256:JSRp
 1720LDA#10:LDX#tk MOD256:LDY#tk DIV256:JSRp
 1730LDAtracks:STAhex:LDAtracks+1:STAhex+1:JSRprtdec
 1740LDA#11:LDX#secs MOD256:LDY#secs DIV256:JSRp
 1750LDAsectors:STAhex:LDAsectors+1:STAhex+1:JSRprtdec
 1760LDA#9:LDX#sds MOD256:LDY#sds DIV256:JSRp
 1770LDAsides:STAhex:LDAsides+1:STAhex+1:JSRprtdec
 1780RTS
 1790.key
 1800LDA#32:STA X:LDA#0:STA X+1:STA Y:STA Y+1:LDA#1:STA C1:LDA#3:STA C2:JSRsqr
 1810LDA#18:LDX#sused MOD256:LDY#sused DIV256:JSRp
 1820LDA#32:STA X:LDA#100:STA Y:LDA#0:STA C1:LDA#2:STA C2:JSRsqr
 1830LDA#17:LDX#sfree MOD256:LDY#sfree DIV256:JSRp
 1840LDA#78:STA X:LDA#2:STA X+1:LDA#2:STA C1:LDA#0:STA C2:JSRsqr
 1850LDA#17:LDX#root MOD256:LDY#root DIV256:JSRp
 1860LDA#0:STA Y:LDA#3:STA C1:LDA#1:STA C2:JSRsqr
 1870LDA#17:LDX#map MOD256:LDY#map DIV256:JSRp
 1880RTS
 1890.sqr
 1900LDA#18:JSRos:LDA#0:JSRos:LDA C1:JSRos
 1910LDA#4:STAplot:LDA X:STAplot+1:LDA X+1:STAplot+2:LDA Y:STAplot+3:LDA Y+1:STAplot+4
 1920JSRplotpt
 1930CLC:LDAplot+3:ADC#38:STAplot+3
 1940LDAplot+4:ADC#0:STAplot+4
 1950JSRplotpt
 1960LDA#85:STAplot:LDA Y:STAplot+3:LDA Y+1:STAplot+4
 1970CLC:LDAplot+1:ADC#30:STAplot+1
 1980LDAplot+2:ADC#0:STAplot+2
 1990JSRplotpt
 2000LDA#4:STAplot
 2010CLC:LDAplot+3:ADC#38:STAplot+3
 2020LDAplot+4:ADC#0:STAplot+4
 2030JSRplotpt
 2040LDA#85:STAplot
 2050LDA X:STAplot+1:LDA X+1:STAplot+2
 2060JSRplotpt
 2070LDA#18:JSRos:LDA#0:JSRos:LDA C2:JSRos
 2080LDA#4:STAplot:LDA X:STAplot+1:LDA X+1:STAplot+2:LDA Y:STAplot+3:LDA Y+1:STAplot+4
 2090JSRplotpt
 2100LDA#29:STAplot
 2110CLC:LDAplot+1:ADC#30:STAplot+1
 2120LDAplot+2:ADC#0:STAplot+2
 2130JSRplotpt
 2140CLC:LDAplot+3:ADC#38:STAplot+3
 2150LDAplot+4:ADC#0:STAplot+4
 2160JSRplotpt
 2170LDA X:STAplot+1:LDA X+1:STAplot+2
 2180JSRplotpt
 2190LDA Y:STAplot+3:LDA Y+1:STAplot+4
 2200JSRplotpt
 2210RTS
 2220.sfreesecs
 2230LDA#5:JSRos
 2240CLC:LDAdsp:ADCdad:STAdsp
 2250LDAdsp+1:ADCdad+1:STAdsp+1
 2260.fslp LDAdad:STA T
 2270LDAdad+1:STA T+1
 2280LDX#4:.dlp LSR T+1:ROR T:ROR S:DEX:BNEdlp
 2290LDX#4:.dlp2 LSR S:DEX:BNEdlp2
 2300LDAsides:CMP#2:BEQds:LDX#4:JMPmul:.ds LDX#3
 2310.mul ASL T:ROL T+1:DEX:BNEmul
 2320LDA T:STA X:LDA T+1:STA X+1
 2330LDA#0:STA S+1
 2340LDX#5:.slp ASL S:ROL S+1:DEX:BNEslp
 2350SEC:LDA#0:SBC S:STA Y
 2360LDA#3:SBC S+1:STA Y+1
 2370LDA#4:STAplot:LDA X:STAplot+1:LDA X+1:STAplot+2:LDA Y:STAplot+3:LDA Y+1:STAplot+4
 2380JSRplotpt
 2390LDA#224:JSRos
 2400CLC:LDAdad:ADC#1:STAdad
 2410LDAdad+1:ADC#0:STAdad+1
 2420LDAdad:CMPdsp:BEQc:JMPfslp
 2430.c LDAdad+1:CMPdsp+1:BEQcon:JMPfslp:.con
 2440.rts1 LDA#4:JSRos:RTS
 2450.fsmap
 2460LDA#0:STAdad:STAdad+1
 2470LDA#2:STAdsp:LDA#0:STAdsp+1
 2480LDA#18:JSRos:LDA#3:JSRos:LDA#2:JSRos
 2490JSRsfreesecs
 2500RTS
 2510.cat
 2520LDA#2:STAdad:LDA#0:STAdad+1
 2530LDA#5:STAdsp:LDA#0:STAdsp+1
 2540LDA#18:JSRos:LDA#3:JSRos:LDA#3:JSRos
 2550JSRsfreesecs
 2560RTS
 2570.fdfsecs
 2580LDA#18:JSRos:LDA#3:JSRos:LDA#1:JSRos
 2590LDY#0:STYcount
 2600.sflp
 2610LDYcount
 2620LDA W%,Y:STAdad
 2630LDA X%,Y:STAdsp
 2640INY
 2650LDA W%,Y:STAdad+1
 2660LDA X%,Y:STAdsp+1
 2670INY:INY:STYcount
 2680JSRsfreesecs
 2690LDAsize:CMPcount:BEQend
 2700JMPsflp
 2710.end RTS
 2720:
 2730RTS
 2740.d1 EQUB22:EQUB1:EQUB31:EQUB10:EQUB1:EQUB23:EQUB1:EQUD0:EQUD0
 2750.title EQUS"ADFS Free Space Map"+CHR$13
 2760.d2 EQUB31:EQUB0:EQUB9
 2770EQUS"Please insert disc"
 2780EQUB31:EQUB0:EQUB11
 2790EQUS"Press RETURN when ready"
 2800.blk EQUB0:EQUW W%:EQUW&FFFF:EQUW8:EQUW0:EQUW2
 2810.comm EQUS"*MOUNT"+CHR$13
 2820.d3 EQUB19:EQUB2:EQUB4:EQUB0:EQUW0:EQUB23:EQUB1:EQUD0:EQUD0
 2830.size EQUW0:.sectors EQUW0:.tracks EQUW0:.sides EQUW0:.discsize EQUD0
 2840.d4 EQUB18:EQUB0:EQUB129:EQUB24:EQUW0:EQUW256:EQUW1276:EQUW768:EQUB16:EQUB26:EQUB18:EQUB0:EQUB128:EQUB18:EQUB0:EQUB3
 2850.tks EQUB31:EQUB0:EQUB4:EQUS"<"+STRING$(15,"-")+" Tracks "+STRING$(15,"-")+">"
 2860.tk  EQUB31:EQUB0:EQUB25:EQUS"Tracks:":.secs EQUB31:EQUB14:EQUB25:EQUS"Sectors:":.sds EQUB31:EQUB32:EQUB25:EQUS"Sides:"
 2870.run EQUB17:EQUB1:EQUB31:EQUB4:EQUB27:EQUS "Press R to RUN   SPACE to Exit":EQUB23:EQUB1:EQUD0:EQUD0
 2880.sused EQUB31:EQUB3:EQUB31:EQUS"Sectors in use "
 2890.sfree EQUB31:EQUB3:EQUB28:EQUS"Free sector(s) "
 2900.root EQUB31:EQUB22:EQUB28:EQUS"Root directory"
 2910.map EQUB31:EQUB22:EQUB31:EQUS"Free space map"
 2920]
 2930NEXT:ENDPROC


"� ****************************
� ADFS Exposed
!� Original BASIC program from
("� Electron User, November 1987
2� M/coded by Richard Dimond
<� (c) July 1996
F"� ****************************
P�
Z� Q% &1000
d�ass
n.�"SAVE ADFSEX "+�~Q%+" "+�~O%+" 2000 2000"
x�
�	��ass
� os=&FFEE:osb=&FFF4:osw=&FFF1
�/addr=&70:plot=&74:X=&7A:Y=&7C:C1=&7E:C2=&7F
� hex=&80:work=&82:decimal=&84
�<dad=&82:dsp=&84:T=&86:S=&88:count=&8A:diff=&8E:trkno=&8F
�W%=&2D00:X%=W%+&100
�
�I%=4�6�2
�P%=&2000:O%=Q%
�
[OPTI%
�
.start
�'LDA#15:LDX#d1 �256:LDY#d1 �256:JSRp
�'LDX#title �256:LDY#title �256:JSRdh
�'LDA#47:LDX#d2 �256:LDY#d2 �256:JSRp
.pause JSR&FFE0
BCCnoesc:RTS:.noesc
CMP#13:BNEpause
"JSRreaddisc
,'LDA#16:LDX#d3 �256:LDY#d3 �256:JSRp
6JSRvars
@JSRgrid
JJSRinfo
T
JSRkey
^JSRfsmap
h
JSRcat
rJSRfdfsecs
|)LDA#45:LDX#run �256:LDY#run �256:JSRp
�JSR&FFE0
��#&DF:CMP#82:BEQst
�LDA#22:JSRos:LDA#6:JSRos
�RTS
�.st LDA#21:JSRosb:JMPstart
�".p STXaddr:STYaddr+1:TAX:LDY#0
�+.lp LDA(addr),Y:JSRos:INY:DEX:BNElp:RTS
�.dh STXaddr:STYaddr+1:LDY#0
�[.dlop LDA(addr),Y:STYcount:CMP#&0D:BNEcont:RTS:.cont STA&56:LDA#10:LDX#&56:LDY#0:JSRosw
�LDA#23:JSRos:LDA#255:JSRos
�LDA&57:JSRos:JSRos
�LDA&58:JSRos:JSRos
�LDA&59:JSRos:JSRos
LDA&5A:JSRos:JSRos
*LDA#255:JSRos:LDA#8:JSRos:LDA#10:JSRos
LDA#23:JSRos:LDA#255:JSRos
&LDA&5B:JSRos:JSRos
0LDA&5C:JSRos:JSRos
:LDA&5D:JSRos:JSRos
DLDA&5E:JSRos:JSRos
NLDA#255:JSRos:LDA#11:JSRos
XLDYcount:INY:JMPdlop
b
.readdisc
l(LDX#comm �256:LDY#comm �256:JSR&FFF7
v%LDA#&72:LDX#blk �256:LDY#blk �256
�
JMPosw
� .prtdec   \ reset
� LDA #0
�  STA decimal+0:STA decimal+1
�  STA decimal+2:STA decimal+3
�  STA decimal+4:STA decimal+5
�
 .convert
� LDA #0
� STA work:STA work+1
� CLC:LDX #16
�
 .loop
� ROL hex:ROL hex+1
� ROL work:ROL work+1
 SEC:LDA work
 SBC #10:TAY
 LDA work+1
  SBC #0:BCC less
* STY work:STA work+1
4
 .less
> DEX:BNE loop
H ROL hex:ROL hex+1
R CLC:LDA work
\ ADC #48
f JSR concatenate
p LDA hex:�A hex+1
z BNE convert
� LDX decimal
� LDY #1
� .print
� LDA decimal,Y
� JSR os
� INY:DEX
� BNE print
� RTS
� .concatenate
� PHA:LDY decimal
�
 BEQ zero
�
 .move
� LDA decimal,Y
 STA decimal+1,Y
 DEY:BNE move

 .zero
$ PLA
. STA decimal+1
8 INC decimal
B RTS
L	.vars
VLDY#&FE:LDA X%,Y:STAsize
`LDY#&FC:LDA W%,Y:STAsectors
jINY:LDA W%,Y:STAsectors+1
tLDAsectors:STAtracks
~LDAsectors+1:STAtracks+1
�LSRtracks+1:RORtracks
�LSRtracks+1:RORtracks
�LSRtracks+1:RORtracks
�LSRtracks+1:RORtracks
�LDAtracks:CMP#160:BNEone
�LDA#2:JMPtwo
�.one LDA#1:.two STAsides
�LDAsectors:STAdiscsize+1
�LDAsectors+1:STAdiscsize+2
�sLDAsides:CMP#1:BNEdd:LDA#224:JMPch:.dd:LDA#192:.ch TAX:LDA#23:JSRos:LDA#224:JSRos:TXA:LDX#8:.ll JSRos:DEX:BNEll
�RTS
�.plotpt
LDA#25:JSRos

*LDA#5:LDX#plot �256:LDY#plot �256:JMPp
	.grid
'LDA#20:LDX#d4 �256:LDY#d4 �256:JSRp
(D.g LDA#80:STAcount:LDA#0:STAplot+1:STAplot+2:STAplot+3:STAplot+4
2.vlp
<!LDA#4:STAplot:LDA#1:STAplot+4
F
JSRplotpt
P"LDA#29:STAplot:LDA#3:STAplot+4
Z
JSRplotpt
d"CLC:LDAplot+1:ADC#16:STAplot+1
nLDAplot+2:ADC#0:STAplot+2
xDECcount:BNEvlp
�3LDA#16:STAcount:LDA#0:STAplot+3:LDA#1:STAplot+4
�	.vlp1
�+LDA#4:STAplot:LDA#0:STAplot+1:STAplot+2
�
JSRplotpt
�"LDA#29:STAplot:LDA#5:STAplot+2
�
JSRplotpt
�"CLC:LDAplot+3:ADC#32:STAplot+3
�LDAplot+4:ADC#0:STAplot+4
�DECcount:BNEvlp1
�KLDA#8:STAcount:LDA#4:STAplot+1:LDA#0:STAplot+2:STAhex:STAhex+1:STAtrkno
�BLDAsides:CMP#2:BNEnd:LDA#20:STAdiff:JMPd:.nd LDA#10:STAdiff:.d
�7.vlp2 LDA#4:STAplot:LDA#0:STAplot+3:LDA#3:STAplot+4
�
JSRplotpt
"LDA#5:STAplot:LDA#32:STAplot+3

JSRplotpt
LDA#5:JSRos
";LDAtrkno:BNEnz:LDA#4:STAplot:STAplot+1:LDA#64:STAplot+3
,
JSRplotpt
6LDA#48:JSRos
@&.nz SEC:LDAplot+1:SBC#32:STAplot+1
JLDAplot+2:SBC#0:STAplot+2
T"LDA#4:STAplot:LDA#64:STAplot+3
^
JSRplotpt
h*LDAtrkno:CMPtracks:BCSnp:JSRprtdec:.np
r(CLC:LDAtrkno:ADCdiff:STAtrkno:STAhex
|(.fin CLC:LDAplot+1:ADC#192:STAplot+1
�LDAplot+2:ADC#0:STAplot+2
�DECcount:BEQrts:JMPvlp2
�.rts LDA#4:JSRos:RTS
�	.info
�)LDA#43:LDX#tks �256:LDY#tks �256:JSRp
�'LDA#10:LDX#tk �256:LDY#tk �256:JSRp
�3LDAtracks:STAhex:LDAtracks+1:STAhex+1:JSRprtdec
�+LDA#11:LDX#secs �256:LDY#secs �256:JSRp
�5LDAsectors:STAhex:LDAsectors+1:STAhex+1:JSRprtdec
�(LDA#9:LDX#sds �256:LDY#sds �256:JSRp
�1LDAsides:STAhex:LDAsides+1:STAhex+1:JSRprtdec
�RTS
�.key
MLDA#32:STA X:LDA#0:STA X+1:STA Y:STA Y+1:LDA#1:STA C1:LDA#3:STA C2:JSRsqr
-LDA#18:LDX#sused �256:LDY#sused �256:JSRp
?LDA#32:STA X:LDA#100:STA Y:LDA#0:STA C1:LDA#2:STA C2:JSRsqr
&-LDA#17:LDX#sfree �256:LDY#sfree �256:JSRp
0?LDA#78:STA X:LDA#2:STA X+1:LDA#2:STA C1:LDA#0:STA C2:JSRsqr
:+LDA#17:LDX#root �256:LDY#root �256:JSRp
D0LDA#0:STA Y:LDA#3:STA C1:LDA#1:STA C2:JSRsqr
N)LDA#17:LDX#map �256:LDY#map �256:JSRp
XRTS
b.sqr
l)LDA#18:JSRos:LDA#0:JSRos:LDA C1:JSRos
vULDA#4:STAplot:LDA X:STAplot+1:LDA X+1:STAplot+2:LDA Y:STAplot+3:LDA Y+1:STAplot+4
�
JSRplotpt
�"CLC:LDAplot+3:ADC#38:STAplot+3
�LDAplot+4:ADC#0:STAplot+4
�
JSRplotpt
�4LDA#85:STAplot:LDA Y:STAplot+3:LDA Y+1:STAplot+4
�"CLC:LDAplot+1:ADC#30:STAplot+1
�LDAplot+2:ADC#0:STAplot+2
�
JSRplotpt
�LDA#4:STAplot
�"CLC:LDAplot+3:ADC#38:STAplot+3
�LDAplot+4:ADC#0:STAplot+4
�
JSRplotpt
�LDA#85:STAplot
%LDA X:STAplot+1:LDA X+1:STAplot+2

JSRplotpt
)LDA#18:JSRos:LDA#0:JSRos:LDA C2:JSRos
 ULDA#4:STAplot:LDA X:STAplot+1:LDA X+1:STAplot+2:LDA Y:STAplot+3:LDA Y+1:STAplot+4
*
JSRplotpt
4LDA#29:STAplot
>"CLC:LDAplot+1:ADC#30:STAplot+1
HLDAplot+2:ADC#0:STAplot+2
R
JSRplotpt
\"CLC:LDAplot+3:ADC#38:STAplot+3
fLDAplot+4:ADC#0:STAplot+4
p
JSRplotpt
z%LDA X:STAplot+1:LDA X+1:STAplot+2
�
JSRplotpt
�%LDA Y:STAplot+3:LDA Y+1:STAplot+4
�
JSRplotpt
�RTS
�.sfreesecs
�LDA#5:JSRos
�CLC:LDAdsp:ADCdad:STAdsp
�LDAdsp+1:ADCdad+1:STAdsp+1
�.fslp LDAdad:STA T
�LDAdad+1:STA T+1
�-LDX#4:.dlp LSR T+1:ROR T:ROR S:DEX:BNEdlp
�!LDX#4:.dlp2 LSR S:DEX:BNEdlp2
�/LDAsides:CMP#2:BEQds:LDX#4:JMPmul:.ds LDX#3
	!.mul ASL T:ROL T+1:DEX:BNEmul
	LDA T:STA X:LDA T+1:STA X+1
	LDA#0:STA S+1
	$'LDX#5:.slp ASL S:ROL S+1:DEX:BNEslp
	.SEC:LDA#0:SBC S:STA Y
	8LDA#3:SBC S+1:STA Y+1
	BULDA#4:STAplot:LDA X:STAplot+1:LDA X+1:STAplot+2:LDA Y:STAplot+3:LDA Y+1:STAplot+4
	L
JSRplotpt
	VLDA#224:JSRos
	`CLC:LDAdad:ADC#1:STAdad
	jLDAdad+1:ADC#0:STAdad+1
	tLDAdad:CMPdsp:BEQc:JMPfslp
	~,.c LDAdad+1:CMPdsp+1:BEQcon:JMPfslp:.con
	�.rts1 LDA#4:JSRos:RTS
	�
.fsmap
	�LDA#0:STAdad:STAdad+1
	�LDA#2:STAdsp:LDA#0:STAdsp+1
	�(LDA#18:JSRos:LDA#3:JSRos:LDA#2:JSRos
	�JSRsfreesecs
	�RTS
	�.cat
	�LDA#2:STAdad:LDA#0:STAdad+1
	�LDA#5:STAdsp:LDA#0:STAdsp+1
	�(LDA#18:JSRos:LDA#3:JSRos:LDA#3:JSRos
	�JSRsfreesecs
RTS

.fdfsecs
(LDA#18:JSRos:LDA#3:JSRos:LDA#1:JSRos
LDY#0:STYcount
(	.sflp
2LDYcount
<LDA W%,Y:STAdad
FLDA X%,Y:STAdsp
PINY
ZLDA W%,Y:STAdad+1
dLDA X%,Y:STAdsp+1
nINY:INY:STYcount
xJSRsfreesecs
�LDAsize:CMPcount:BEQend
�JMPsflp
�.end RTS
�:
�RTS
�A.d1 EQUB22:EQUB1:EQUB31:EQUB10:EQUB1:EQUB23:EQUB1:EQUD0:EQUD0
�(.title EQUS"ADFS Free Space Map"+�13
�.d2 EQUB31:EQUB0:EQUB9
�EQUS"Please insert disc"
�EQUB31:EQUB0:EQUB11
�!EQUS"Press RETURN when ready"
�2.blk EQUB0:EQUW W%:EQUW&FFFF:EQUW8:EQUW0:EQUW2
�.comm EQUS"*MOUNT"+�13
?.d3 EQUB19:EQUB2:EQUB4:EQUB0:EQUW0:EQUB23:EQUB1:EQUD0:EQUD0
I.size EQUW0:.sectors EQUW0:.tracks EQUW0:.sides EQUW0:.discsize EQUD0
x.d4 EQUB18:EQUB0:EQUB129:EQUB24:EQUW0:EQUW256:EQUW1276:EQUW768:EQUB16:EQUB26:EQUB18:EQUB0:EQUB128:EQUB18:EQUB0:EQUB3
"D.tks EQUB31:EQUB0:EQUB4:EQUS"<"+�15,"-")+" Tracks "+�15,"-")+">"
,{.tk  EQUB31:EQUB0:EQUB25:EQUS"Tracks:":.secs EQUB31:EQUB14:EQUB25:EQUS"Sectors:":.sds EQUB31:EQUB32:EQUB25:EQUS"Sides:"
6h.run EQUB17:EQUB1:EQUB31:EQUB4:EQUB27:EQUS "Press R to RUN   SPACE to Exit":EQUB23:EQUB1:EQUD0:EQUD0
@4.sused EQUB31:EQUB3:EQUB31:EQUS"Sectors in use "
J4.sfree EQUB31:EQUB3:EQUB28:EQUS"Free sector(s) "
T3.root EQUB31:EQUB22:EQUB28:EQUS"Root directory"
^2.map EQUB31:EQUB22:EQUB31:EQUS"Free space map"
h]
r�:�
�

00000000  0d 00 0a 22 f4 20 2a 2a  2a 2a 2a 2a 2a 2a 2a 2a  |...". **********|
00000010  2a 2a 2a 2a 2a 2a 2a 2a  2a 2a 2a 2a 2a 2a 2a 2a  |****************|
00000020  2a 2a 0d 00 14 12 f4 20  41 44 46 53 20 45 78 70  |**..... ADFS Exp|
00000030  6f 73 65 64 0d 00 1e 21  f4 20 4f 72 69 67 69 6e  |osed...!. Origin|
00000040  61 6c 20 42 41 53 49 43  20 70 72 6f 67 72 61 6d  |al BASIC program|
00000050  20 66 72 6f 6d 0d 00 28  22 f4 20 45 6c 65 63 74  | from..(". Elect|
00000060  72 6f 6e 20 55 73 65 72  2c 20 4e 6f 76 65 6d 62  |ron User, Novemb|
00000070  65 72 20 31 39 38 37 0d  00 32 1f f4 20 4d 2f 63  |er 1987..2.. M/c|
00000080  6f 64 65 64 20 62 79 20  52 69 63 68 61 72 64 20  |oded by Richard |
00000090  44 69 6d 6f 6e 64 0d 00  3c 13 f4 20 28 63 29 20  |Dimond..<.. (c) |
000000a0  4a 75 6c 79 20 31 39 39  36 0d 00 46 22 f4 20 2a  |July 1996..F". *|
000000b0  2a 2a 2a 2a 2a 2a 2a 2a  2a 2a 2a 2a 2a 2a 2a 2a  |****************|
000000c0  2a 2a 2a 2a 2a 2a 2a 2a  2a 2a 2a 0d 00 50 05 f4  |***********..P..|
000000d0  0d 00 5a 0e de 20 51 25  20 26 31 30 30 30 0d 00  |..Z.. Q% &1000..|
000000e0  64 08 f2 61 73 73 0d 00  6e 2e ff 22 53 41 56 45  |d..ass..n.."SAVE|
000000f0  20 41 44 46 53 45 58 20  22 2b c3 7e 51 25 2b 22  | ADFSEX "+.~Q%+"|
00000100  20 22 2b c3 7e 4f 25 2b  22 20 32 30 30 30 20 32  | "+.~O%+" 2000 2|
00000110  30 30 30 22 0d 00 78 05  e0 0d 00 82 09 dd f2 61  |000"..x........a|
00000120  73 73 0d 00 8c 20 6f 73  3d 26 46 46 45 45 3a 6f  |ss... os=&FFEE:o|
00000130  73 62 3d 26 46 46 46 34  3a 6f 73 77 3d 26 46 46  |sb=&FFF4:osw=&FF|
00000140  46 31 0d 00 96 2f 61 64  64 72 3d 26 37 30 3a 70  |F1.../addr=&70:p|
00000150  6c 6f 74 3d 26 37 34 3a  58 3d 26 37 41 3a 59 3d  |lot=&74:X=&7A:Y=|
00000160  26 37 43 3a 43 31 3d 26  37 45 3a 43 32 3d 26 37  |&7C:C1=&7E:C2=&7|
00000170  46 0d 00 a0 20 68 65 78  3d 26 38 30 3a 77 6f 72  |F... hex=&80:wor|
00000180  6b 3d 26 38 32 3a 64 65  63 69 6d 61 6c 3d 26 38  |k=&82:decimal=&8|
00000190  34 0d 00 aa 3c 64 61 64  3d 26 38 32 3a 64 73 70  |4...<dad=&82:dsp|
000001a0  3d 26 38 34 3a 54 3d 26  38 36 3a 53 3d 26 38 38  |=&84:T=&86:S=&88|
000001b0  3a 63 6f 75 6e 74 3d 26  38 41 3a 64 69 66 66 3d  |:count=&8A:diff=|
000001c0  26 38 45 3a 74 72 6b 6e  6f 3d 26 38 46 0d 00 b4  |&8E:trkno=&8F...|
000001d0  17 57 25 3d 26 32 44 30  30 3a 58 25 3d 57 25 2b  |.W%=&2D00:X%=W%+|
000001e0  26 31 30 30 0d 00 be 0d  e3 49 25 3d 34 b8 36 88  |&100.....I%=4.6.|
000001f0  32 0d 00 c8 12 50 25 3d  26 32 30 30 30 3a 4f 25  |2....P%=&2000:O%|
00000200  3d 51 25 0d 00 d2 0a 5b  4f 50 54 49 25 0d 00 dc  |=Q%....[OPTI%...|
00000210  0a 2e 73 74 61 72 74 0d  00 e6 27 4c 44 41 23 31  |..start...'LDA#1|
00000220  35 3a 4c 44 58 23 64 31  20 83 32 35 36 3a 4c 44  |5:LDX#d1 .256:LD|
00000230  59 23 64 31 20 81 32 35  36 3a 4a 53 52 70 0d 00  |Y#d1 .256:JSRp..|
00000240  f0 27 4c 44 58 23 74 69  74 6c 65 20 83 32 35 36  |.'LDX#title .256|
00000250  3a 4c 44 59 23 74 69 74  6c 65 20 81 32 35 36 3a  |:LDY#title .256:|
00000260  4a 53 52 64 68 0d 00 fa  27 4c 44 41 23 34 37 3a  |JSRdh...'LDA#47:|
00000270  4c 44 58 23 64 32 20 83  32 35 36 3a 4c 44 59 23  |LDX#d2 .256:LDY#|
00000280  64 32 20 81 32 35 36 3a  4a 53 52 70 0d 01 04 13  |d2 .256:JSRp....|
00000290  2e 70 61 75 73 65 20 4a  53 52 26 46 46 45 30 0d  |.pause JSR&FFE0.|
000002a0  01 0e 17 42 43 43 6e 6f  65 73 63 3a 52 54 53 3a  |...BCCnoesc:RTS:|
000002b0  2e 6e 6f 65 73 63 0d 01  18 13 43 4d 50 23 31 33  |.noesc....CMP#13|
000002c0  3a 42 4e 45 70 61 75 73  65 0d 01 22 0f 4a 53 52  |:BNEpause..".JSR|
000002d0  72 65 61 64 64 69 73 63  0d 01 2c 27 4c 44 41 23  |readdisc..,'LDA#|
000002e0  31 36 3a 4c 44 58 23 64  33 20 83 32 35 36 3a 4c  |16:LDX#d3 .256:L|
000002f0  44 59 23 64 33 20 81 32  35 36 3a 4a 53 52 70 0d  |DY#d3 .256:JSRp.|
00000300  01 36 0b 4a 53 52 76 61  72 73 0d 01 40 0b 4a 53  |.6.JSRvars..@.JS|
00000310  52 67 72 69 64 0d 01 4a  0b 4a 53 52 69 6e 66 6f  |Rgrid..J.JSRinfo|
00000320  0d 01 54 0a 4a 53 52 6b  65 79 0d 01 5e 0c 4a 53  |..T.JSRkey..^.JS|
00000330  52 66 73 6d 61 70 0d 01  68 0a 4a 53 52 63 61 74  |Rfsmap..h.JSRcat|
00000340  0d 01 72 0e 4a 53 52 66  64 66 73 65 63 73 0d 01  |..r.JSRfdfsecs..|
00000350  7c 29 4c 44 41 23 34 35  3a 4c 44 58 23 72 75 6e  ||)LDA#45:LDX#run|
00000360  20 83 32 35 36 3a 4c 44  59 23 72 75 6e 20 81 32  | .256:LDY#run .2|
00000370  35 36 3a 4a 53 52 70 0d  01 86 0c 4a 53 52 26 46  |56:JSRp....JSR&F|
00000380  46 45 30 0d 01 90 16 80  23 26 44 46 3a 43 4d 50  |FE0.....#&DF:CMP|
00000390  23 38 32 3a 42 45 51 73  74 0d 01 9a 1c 4c 44 41  |#82:BEQst....LDA|
000003a0  23 32 32 3a 4a 53 52 6f  73 3a 4c 44 41 23 36 3a  |#22:JSRos:LDA#6:|
000003b0  4a 53 52 6f 73 0d 01 a4  07 52 54 53 0d 01 ae 1e  |JSRos....RTS....|
000003c0  2e 73 74 20 4c 44 41 23  32 31 3a 4a 53 52 6f 73  |.st LDA#21:JSRos|
000003d0  62 3a 4a 4d 50 73 74 61  72 74 0d 01 b8 22 2e 70  |b:JMPstart...".p|
000003e0  20 53 54 58 61 64 64 72  3a 53 54 59 61 64 64 72  | STXaddr:STYaddr|
000003f0  2b 31 3a 54 41 58 3a 4c  44 59 23 30 0d 01 c2 2b  |+1:TAX:LDY#0...+|
00000400  2e 6c 70 20 4c 44 41 28  61 64 64 72 29 2c 59 3a  |.lp LDA(addr),Y:|
00000410  4a 53 52 6f 73 3a 49 4e  59 3a 44 45 58 3a 42 4e  |JSRos:INY:DEX:BN|
00000420  45 6c 70 3a 52 54 53 0d  01 cc 1f 2e 64 68 20 53  |Elp:RTS.....dh S|
00000430  54 58 61 64 64 72 3a 53  54 59 61 64 64 72 2b 31  |TXaddr:STYaddr+1|
00000440  3a 4c 44 59 23 30 0d 01  d6 5b 2e 64 6c 6f 70 20  |:LDY#0...[.dlop |
00000450  4c 44 41 28 61 64 64 72  29 2c 59 3a 53 54 59 63  |LDA(addr),Y:STYc|
00000460  6f 75 6e 74 3a 43 4d 50  23 26 30 44 3a 42 4e 45  |ount:CMP#&0D:BNE|
00000470  63 6f 6e 74 3a 52 54 53  3a 2e 63 6f 6e 74 20 53  |cont:RTS:.cont S|
00000480  54 41 26 35 36 3a 4c 44  41 23 31 30 3a 4c 44 58  |TA&56:LDA#10:LDX|
00000490  23 26 35 36 3a 4c 44 59  23 30 3a 4a 53 52 6f 73  |#&56:LDY#0:JSRos|
000004a0  77 0d 01 e0 1e 4c 44 41  23 32 33 3a 4a 53 52 6f  |w....LDA#23:JSRo|
000004b0  73 3a 4c 44 41 23 32 35  35 3a 4a 53 52 6f 73 0d  |s:LDA#255:JSRos.|
000004c0  01 ea 16 4c 44 41 26 35  37 3a 4a 53 52 6f 73 3a  |...LDA&57:JSRos:|
000004d0  4a 53 52 6f 73 0d 01 f4  16 4c 44 41 26 35 38 3a  |JSRos....LDA&58:|
000004e0  4a 53 52 6f 73 3a 4a 53  52 6f 73 0d 01 fe 16 4c  |JSRos:JSRos....L|
000004f0  44 41 26 35 39 3a 4a 53  52 6f 73 3a 4a 53 52 6f  |DA&59:JSRos:JSRo|
00000500  73 0d 02 08 16 4c 44 41  26 35 41 3a 4a 53 52 6f  |s....LDA&5A:JSRo|
00000510  73 3a 4a 53 52 6f 73 0d  02 12 2a 4c 44 41 23 32  |s:JSRos...*LDA#2|
00000520  35 35 3a 4a 53 52 6f 73  3a 4c 44 41 23 38 3a 4a  |55:JSRos:LDA#8:J|
00000530  53 52 6f 73 3a 4c 44 41  23 31 30 3a 4a 53 52 6f  |SRos:LDA#10:JSRo|
00000540  73 0d 02 1c 1e 4c 44 41  23 32 33 3a 4a 53 52 6f  |s....LDA#23:JSRo|
00000550  73 3a 4c 44 41 23 32 35  35 3a 4a 53 52 6f 73 0d  |s:LDA#255:JSRos.|
00000560  02 26 16 4c 44 41 26 35  42 3a 4a 53 52 6f 73 3a  |.&.LDA&5B:JSRos:|
00000570  4a 53 52 6f 73 0d 02 30  16 4c 44 41 26 35 43 3a  |JSRos..0.LDA&5C:|
00000580  4a 53 52 6f 73 3a 4a 53  52 6f 73 0d 02 3a 16 4c  |JSRos:JSRos..:.L|
00000590  44 41 26 35 44 3a 4a 53  52 6f 73 3a 4a 53 52 6f  |DA&5D:JSRos:JSRo|
000005a0  73 0d 02 44 16 4c 44 41  26 35 45 3a 4a 53 52 6f  |s..D.LDA&5E:JSRo|
000005b0  73 3a 4a 53 52 6f 73 0d  02 4e 1e 4c 44 41 23 32  |s:JSRos..N.LDA#2|
000005c0  35 35 3a 4a 53 52 6f 73  3a 4c 44 41 23 31 31 3a  |55:JSRos:LDA#11:|
000005d0  4a 53 52 6f 73 0d 02 58  18 4c 44 59 63 6f 75 6e  |JSRos..X.LDYcoun|
000005e0  74 3a 49 4e 59 3a 4a 4d  50 64 6c 6f 70 0d 02 62  |t:INY:JMPdlop..b|
000005f0  0d 2e 72 65 61 64 64 69  73 63 0d 02 6c 28 4c 44  |..readdisc..l(LD|
00000600  58 23 63 6f 6d 6d 20 83  32 35 36 3a 4c 44 59 23  |X#comm .256:LDY#|
00000610  63 6f 6d 6d 20 81 32 35  36 3a 4a 53 52 26 46 46  |comm .256:JSR&FF|
00000620  46 37 0d 02 76 25 4c 44  41 23 26 37 32 3a 4c 44  |F7..v%LDA#&72:LD|
00000630  58 23 62 6c 6b 20 83 32  35 36 3a 4c 44 59 23 62  |X#blk .256:LDY#b|
00000640  6c 6b 20 81 32 35 36 0d  02 80 0a 4a 4d 50 6f 73  |lk .256....JMPos|
00000650  77 0d 02 8a 16 20 2e 70  72 74 64 65 63 20 20 20  |w.... .prtdec   |
00000660  5c 20 72 65 73 65 74 0d  02 94 0b 20 4c 44 41 20  |\ reset.... LDA |
00000670  23 30 0d 02 9e 20 20 53  54 41 20 64 65 63 69 6d  |#0...  STA decim|
00000680  61 6c 2b 30 3a 53 54 41  20 64 65 63 69 6d 61 6c  |al+0:STA decimal|
00000690  2b 31 0d 02 a8 20 20 53  54 41 20 64 65 63 69 6d  |+1...  STA decim|
000006a0  61 6c 2b 32 3a 53 54 41  20 64 65 63 69 6d 61 6c  |al+2:STA decimal|
000006b0  2b 33 0d 02 b2 20 20 53  54 41 20 64 65 63 69 6d  |+3...  STA decim|
000006c0  61 6c 2b 34 3a 53 54 41  20 64 65 63 69 6d 61 6c  |al+4:STA decimal|
000006d0  2b 35 0d 02 bc 0d 20 2e  63 6f 6e 76 65 72 74 0d  |+5.... .convert.|
000006e0  02 c6 0b 20 4c 44 41 20  23 30 0d 02 d0 18 20 53  |... LDA #0.... S|
000006f0  54 41 20 77 6f 72 6b 3a  53 54 41 20 77 6f 72 6b  |TA work:STA work|
00000700  2b 31 0d 02 da 10 20 43  4c 43 3a 4c 44 58 20 23  |+1.... CLC:LDX #|
00000710  31 36 0d 02 e4 0a 20 2e  6c 6f 6f 70 0d 02 ee 16  |16.... .loop....|
00000720  20 52 4f 4c 20 68 65 78  3a 52 4f 4c 20 68 65 78  | ROL hex:ROL hex|
00000730  2b 31 0d 02 f8 18 20 52  4f 4c 20 77 6f 72 6b 3a  |+1.... ROL work:|
00000740  52 4f 4c 20 77 6f 72 6b  2b 31 0d 03 02 11 20 53  |ROL work+1.... S|
00000750  45 43 3a 4c 44 41 20 77  6f 72 6b 0d 03 0c 10 20  |EC:LDA work.... |
00000760  53 42 43 20 23 31 30 3a  54 41 59 0d 03 16 0f 20  |SBC #10:TAY.... |
00000770  4c 44 41 20 77 6f 72 6b  2b 31 0d 03 20 14 20 53  |LDA work+1.. . S|
00000780  42 43 20 23 30 3a 42 43  43 20 6c 65 73 73 0d 03  |BC #0:BCC less..|
00000790  2a 18 20 53 54 59 20 77  6f 72 6b 3a 53 54 41 20  |*. STY work:STA |
000007a0  77 6f 72 6b 2b 31 0d 03  34 0a 20 2e 6c 65 73 73  |work+1..4. .less|
000007b0  0d 03 3e 11 20 44 45 58  3a 42 4e 45 20 6c 6f 6f  |..>. DEX:BNE loo|
000007c0  70 0d 03 48 16 20 52 4f  4c 20 68 65 78 3a 52 4f  |p..H. ROL hex:RO|
000007d0  4c 20 68 65 78 2b 31 0d  03 52 11 20 43 4c 43 3a  |L hex+1..R. CLC:|
000007e0  4c 44 41 20 77 6f 72 6b  0d 03 5c 0c 20 41 44 43  |LDA work..\. ADC|
000007f0  20 23 34 38 0d 03 66 14  20 4a 53 52 20 63 6f 6e  | #48..f. JSR con|
00000800  63 61 74 65 6e 61 74 65  0d 03 70 15 20 4c 44 41  |catenate..p. LDA|
00000810  20 68 65 78 3a 84 41 20  68 65 78 2b 31 0d 03 7a  | hex:.A hex+1..z|
00000820  10 20 42 4e 45 20 63 6f  6e 76 65 72 74 0d 03 84  |. BNE convert...|
00000830  10 20 4c 44 58 20 64 65  63 69 6d 61 6c 0d 03 8e  |. LDX decimal...|
00000840  0b 20 4c 44 59 20 23 31  0d 03 98 0b 20 2e 70 72  |. LDY #1.... .pr|
00000850  69 6e 74 0d 03 a2 12 20  4c 44 41 20 64 65 63 69  |int.... LDA deci|
00000860  6d 61 6c 2c 59 0d 03 ac  0b 20 4a 53 52 20 6f 73  |mal,Y.... JSR os|
00000870  0d 03 b6 0c 20 49 4e 59  3a 44 45 58 0d 03 c0 0e  |.... INY:DEX....|
00000880  20 42 4e 45 20 70 72 69  6e 74 0d 03 ca 08 20 52  | BNE print.... R|
00000890  54 53 0d 03 d4 11 20 2e  63 6f 6e 63 61 74 65 6e  |TS.... .concaten|
000008a0  61 74 65 0d 03 de 14 20  50 48 41 3a 4c 44 59 20  |ate.... PHA:LDY |
000008b0  64 65 63 69 6d 61 6c 0d  03 e8 0d 20 42 45 51 20  |decimal.... BEQ |
000008c0  7a 65 72 6f 0d 03 f2 0a  20 2e 6d 6f 76 65 0d 03  |zero.... .move..|
000008d0  fc 12 20 4c 44 41 20 64  65 63 69 6d 61 6c 2c 59  |.. LDA decimal,Y|
000008e0  0d 04 06 14 20 53 54 41  20 64 65 63 69 6d 61 6c  |.... STA decimal|
000008f0  2b 31 2c 59 0d 04 10 11  20 44 45 59 3a 42 4e 45  |+1,Y.... DEY:BNE|
00000900  20 6d 6f 76 65 0d 04 1a  0a 20 2e 7a 65 72 6f 0d  | move.... .zero.|
00000910  04 24 08 20 50 4c 41 0d  04 2e 12 20 53 54 41 20  |.$. PLA.... STA |
00000920  64 65 63 69 6d 61 6c 2b  31 0d 04 38 10 20 49 4e  |decimal+1..8. IN|
00000930  43 20 64 65 63 69 6d 61  6c 0d 04 42 08 20 52 54  |C decimal..B. RT|
00000940  53 0d 04 4c 09 2e 76 61  72 73 0d 04 56 1c 4c 44  |S..L..vars..V.LD|
00000950  59 23 26 46 45 3a 4c 44  41 20 58 25 2c 59 3a 53  |Y#&FE:LDA X%,Y:S|
00000960  54 41 73 69 7a 65 0d 04  60 1f 4c 44 59 23 26 46  |TAsize..`.LDY#&F|
00000970  43 3a 4c 44 41 20 57 25  2c 59 3a 53 54 41 73 65  |C:LDA W%,Y:STAse|
00000980  63 74 6f 72 73 0d 04 6a  1d 49 4e 59 3a 4c 44 41  |ctors..j.INY:LDA|
00000990  20 57 25 2c 59 3a 53 54  41 73 65 63 74 6f 72 73  | W%,Y:STAsectors|
000009a0  2b 31 0d 04 74 18 4c 44  41 73 65 63 74 6f 72 73  |+1..t.LDAsectors|
000009b0  3a 53 54 41 74 72 61 63  6b 73 0d 04 7e 1c 4c 44  |:STAtracks..~.LD|
000009c0  41 73 65 63 74 6f 72 73  2b 31 3a 53 54 41 74 72  |Asectors+1:STAtr|
000009d0  61 63 6b 73 2b 31 0d 04  88 19 4c 53 52 74 72 61  |acks+1....LSRtra|
000009e0  63 6b 73 2b 31 3a 52 4f  52 74 72 61 63 6b 73 0d  |cks+1:RORtracks.|
000009f0  04 92 19 4c 53 52 74 72  61 63 6b 73 2b 31 3a 52  |...LSRtracks+1:R|
00000a00  4f 52 74 72 61 63 6b 73  0d 04 9c 19 4c 53 52 74  |ORtracks....LSRt|
00000a10  72 61 63 6b 73 2b 31 3a  52 4f 52 74 72 61 63 6b  |racks+1:RORtrack|
00000a20  73 0d 04 a6 19 4c 53 52  74 72 61 63 6b 73 2b 31  |s....LSRtracks+1|
00000a30  3a 52 4f 52 74 72 61 63  6b 73 0d 04 b0 1c 4c 44  |:RORtracks....LD|
00000a40  41 74 72 61 63 6b 73 3a  43 4d 50 23 31 36 30 3a  |Atracks:CMP#160:|
00000a50  42 4e 45 6f 6e 65 0d 04  ba 10 4c 44 41 23 32 3a  |BNEone....LDA#2:|
00000a60  4a 4d 50 74 77 6f 0d 04  c4 1c 2e 6f 6e 65 20 4c  |JMPtwo.....one L|
00000a70  44 41 23 31 3a 2e 74 77  6f 20 53 54 41 73 69 64  |DA#1:.two STAsid|
00000a80  65 73 0d 04 ce 1c 4c 44  41 73 65 63 74 6f 72 73  |es....LDAsectors|
00000a90  3a 53 54 41 64 69 73 63  73 69 7a 65 2b 31 0d 04  |:STAdiscsize+1..|
00000aa0  d8 1e 4c 44 41 73 65 63  74 6f 72 73 2b 31 3a 53  |..LDAsectors+1:S|
00000ab0  54 41 64 69 73 63 73 69  7a 65 2b 32 0d 04 e2 73  |TAdiscsize+2...s|
00000ac0  4c 44 41 73 69 64 65 73  3a 43 4d 50 23 31 3a 42  |LDAsides:CMP#1:B|
00000ad0  4e 45 64 64 3a 4c 44 41  23 32 32 34 3a 4a 4d 50  |NEdd:LDA#224:JMP|
00000ae0  63 68 3a 2e 64 64 3a 4c  44 41 23 31 39 32 3a 2e  |ch:.dd:LDA#192:.|
00000af0  63 68 20 54 41 58 3a 4c  44 41 23 32 33 3a 4a 53  |ch TAX:LDA#23:JS|
00000b00  52 6f 73 3a 4c 44 41 23  32 32 34 3a 4a 53 52 6f  |Ros:LDA#224:JSRo|
00000b10  73 3a 54 58 41 3a 4c 44  58 23 38 3a 2e 6c 6c 20  |s:TXA:LDX#8:.ll |
00000b20  4a 53 52 6f 73 3a 44 45  58 3a 42 4e 45 6c 6c 0d  |JSRos:DEX:BNEll.|
00000b30  04 ec 07 52 54 53 0d 04  f6 0b 2e 70 6c 6f 74 70  |...RTS.....plotp|
00000b40  74 0d 05 00 10 4c 44 41  23 32 35 3a 4a 53 52 6f  |t....LDA#25:JSRo|
00000b50  73 0d 05 0a 2a 4c 44 41  23 35 3a 4c 44 58 23 70  |s...*LDA#5:LDX#p|
00000b60  6c 6f 74 20 83 32 35 36  3a 4c 44 59 23 70 6c 6f  |lot .256:LDY#plo|
00000b70  74 20 81 32 35 36 3a 4a  4d 50 70 0d 05 14 09 2e  |t .256:JMPp.....|
00000b80  67 72 69 64 0d 05 1e 27  4c 44 41 23 32 30 3a 4c  |grid...'LDA#20:L|
00000b90  44 58 23 64 34 20 83 32  35 36 3a 4c 44 59 23 64  |DX#d4 .256:LDY#d|
00000ba0  34 20 81 32 35 36 3a 4a  53 52 70 0d 05 28 44 2e  |4 .256:JSRp..(D.|
00000bb0  67 20 4c 44 41 23 38 30  3a 53 54 41 63 6f 75 6e  |g LDA#80:STAcoun|
00000bc0  74 3a 4c 44 41 23 30 3a  53 54 41 70 6c 6f 74 2b  |t:LDA#0:STAplot+|
00000bd0  31 3a 53 54 41 70 6c 6f  74 2b 32 3a 53 54 41 70  |1:STAplot+2:STAp|
00000be0  6c 6f 74 2b 33 3a 53 54  41 70 6c 6f 74 2b 34 0d  |lot+3:STAplot+4.|
00000bf0  05 32 08 2e 76 6c 70 0d  05 3c 21 4c 44 41 23 34  |.2..vlp..<!LDA#4|
00000c00  3a 53 54 41 70 6c 6f 74  3a 4c 44 41 23 31 3a 53  |:STAplot:LDA#1:S|
00000c10  54 41 70 6c 6f 74 2b 34  0d 05 46 0d 4a 53 52 70  |TAplot+4..F.JSRp|
00000c20  6c 6f 74 70 74 0d 05 50  22 4c 44 41 23 32 39 3a  |lotpt..P"LDA#29:|
00000c30  53 54 41 70 6c 6f 74 3a  4c 44 41 23 33 3a 53 54  |STAplot:LDA#3:ST|
00000c40  41 70 6c 6f 74 2b 34 0d  05 5a 0d 4a 53 52 70 6c  |Aplot+4..Z.JSRpl|
00000c50  6f 74 70 74 0d 05 64 22  43 4c 43 3a 4c 44 41 70  |otpt..d"CLC:LDAp|
00000c60  6c 6f 74 2b 31 3a 41 44  43 23 31 36 3a 53 54 41  |lot+1:ADC#16:STA|
00000c70  70 6c 6f 74 2b 31 0d 05  6e 1d 4c 44 41 70 6c 6f  |plot+1..n.LDAplo|
00000c80  74 2b 32 3a 41 44 43 23  30 3a 53 54 41 70 6c 6f  |t+2:ADC#0:STAplo|
00000c90  74 2b 32 0d 05 78 13 44  45 43 63 6f 75 6e 74 3a  |t+2..x.DECcount:|
00000ca0  42 4e 45 76 6c 70 0d 05  82 33 4c 44 41 23 31 36  |BNEvlp...3LDA#16|
00000cb0  3a 53 54 41 63 6f 75 6e  74 3a 4c 44 41 23 30 3a  |:STAcount:LDA#0:|
00000cc0  53 54 41 70 6c 6f 74 2b  33 3a 4c 44 41 23 31 3a  |STAplot+3:LDA#1:|
00000cd0  53 54 41 70 6c 6f 74 2b  34 0d 05 8c 09 2e 76 6c  |STAplot+4.....vl|
00000ce0  70 31 0d 05 96 2b 4c 44  41 23 34 3a 53 54 41 70  |p1...+LDA#4:STAp|
00000cf0  6c 6f 74 3a 4c 44 41 23  30 3a 53 54 41 70 6c 6f  |lot:LDA#0:STAplo|
00000d00  74 2b 31 3a 53 54 41 70  6c 6f 74 2b 32 0d 05 a0  |t+1:STAplot+2...|
00000d10  0d 4a 53 52 70 6c 6f 74  70 74 0d 05 aa 22 4c 44  |.JSRplotpt..."LD|
00000d20  41 23 32 39 3a 53 54 41  70 6c 6f 74 3a 4c 44 41  |A#29:STAplot:LDA|
00000d30  23 35 3a 53 54 41 70 6c  6f 74 2b 32 0d 05 b4 0d  |#5:STAplot+2....|
00000d40  4a 53 52 70 6c 6f 74 70  74 0d 05 be 22 43 4c 43  |JSRplotpt..."CLC|
00000d50  3a 4c 44 41 70 6c 6f 74  2b 33 3a 41 44 43 23 33  |:LDAplot+3:ADC#3|
00000d60  32 3a 53 54 41 70 6c 6f  74 2b 33 0d 05 c8 1d 4c  |2:STAplot+3....L|
00000d70  44 41 70 6c 6f 74 2b 34  3a 41 44 43 23 30 3a 53  |DAplot+4:ADC#0:S|
00000d80  54 41 70 6c 6f 74 2b 34  0d 05 d2 14 44 45 43 63  |TAplot+4....DECc|
00000d90  6f 75 6e 74 3a 42 4e 45  76 6c 70 31 0d 05 dc 4b  |ount:BNEvlp1...K|
00000da0  4c 44 41 23 38 3a 53 54  41 63 6f 75 6e 74 3a 4c  |LDA#8:STAcount:L|
00000db0  44 41 23 34 3a 53 54 41  70 6c 6f 74 2b 31 3a 4c  |DA#4:STAplot+1:L|
00000dc0  44 41 23 30 3a 53 54 41  70 6c 6f 74 2b 32 3a 53  |DA#0:STAplot+2:S|
00000dd0  54 41 68 65 78 3a 53 54  41 68 65 78 2b 31 3a 53  |TAhex:STAhex+1:S|
00000de0  54 41 74 72 6b 6e 6f 0d  05 e6 42 4c 44 41 73 69  |TAtrkno...BLDAsi|
00000df0  64 65 73 3a 43 4d 50 23  32 3a 42 4e 45 6e 64 3a  |des:CMP#2:BNEnd:|
00000e00  4c 44 41 23 32 30 3a 53  54 41 64 69 66 66 3a 4a  |LDA#20:STAdiff:J|
00000e10  4d 50 64 3a 2e 6e 64 20  4c 44 41 23 31 30 3a 53  |MPd:.nd LDA#10:S|
00000e20  54 41 64 69 66 66 3a 2e  64 0d 05 f0 37 2e 76 6c  |TAdiff:.d...7.vl|
00000e30  70 32 20 4c 44 41 23 34  3a 53 54 41 70 6c 6f 74  |p2 LDA#4:STAplot|
00000e40  3a 4c 44 41 23 30 3a 53  54 41 70 6c 6f 74 2b 33  |:LDA#0:STAplot+3|
00000e50  3a 4c 44 41 23 33 3a 53  54 41 70 6c 6f 74 2b 34  |:LDA#3:STAplot+4|
00000e60  0d 05 fa 0d 4a 53 52 70  6c 6f 74 70 74 0d 06 04  |....JSRplotpt...|
00000e70  22 4c 44 41 23 35 3a 53  54 41 70 6c 6f 74 3a 4c  |"LDA#5:STAplot:L|
00000e80  44 41 23 33 32 3a 53 54  41 70 6c 6f 74 2b 33 0d  |DA#32:STAplot+3.|
00000e90  06 0e 0d 4a 53 52 70 6c  6f 74 70 74 0d 06 18 0f  |...JSRplotpt....|
00000ea0  4c 44 41 23 35 3a 4a 53  52 6f 73 0d 06 22 3b 4c  |LDA#5:JSRos..";L|
00000eb0  44 41 74 72 6b 6e 6f 3a  42 4e 45 6e 7a 3a 4c 44  |DAtrkno:BNEnz:LD|
00000ec0  41 23 34 3a 53 54 41 70  6c 6f 74 3a 53 54 41 70  |A#4:STAplot:STAp|
00000ed0  6c 6f 74 2b 31 3a 4c 44  41 23 36 34 3a 53 54 41  |lot+1:LDA#64:STA|
00000ee0  70 6c 6f 74 2b 33 0d 06  2c 0d 4a 53 52 70 6c 6f  |plot+3..,.JSRplo|
00000ef0  74 70 74 0d 06 36 10 4c  44 41 23 34 38 3a 4a 53  |tpt..6.LDA#48:JS|
00000f00  52 6f 73 0d 06 40 26 2e  6e 7a 20 53 45 43 3a 4c  |Ros..@&.nz SEC:L|
00000f10  44 41 70 6c 6f 74 2b 31  3a 53 42 43 23 33 32 3a  |DAplot+1:SBC#32:|
00000f20  53 54 41 70 6c 6f 74 2b  31 0d 06 4a 1d 4c 44 41  |STAplot+1..J.LDA|
00000f30  70 6c 6f 74 2b 32 3a 53  42 43 23 30 3a 53 54 41  |plot+2:SBC#0:STA|
00000f40  70 6c 6f 74 2b 32 0d 06  54 22 4c 44 41 23 34 3a  |plot+2..T"LDA#4:|
00000f50  53 54 41 70 6c 6f 74 3a  4c 44 41 23 36 34 3a 53  |STAplot:LDA#64:S|
00000f60  54 41 70 6c 6f 74 2b 33  0d 06 5e 0d 4a 53 52 70  |TAplot+3..^.JSRp|
00000f70  6c 6f 74 70 74 0d 06 68  2a 4c 44 41 74 72 6b 6e  |lotpt..h*LDAtrkn|
00000f80  6f 3a 43 4d 50 74 72 61  63 6b 73 3a 42 43 53 6e  |o:CMPtracks:BCSn|
00000f90  70 3a 4a 53 52 70 72 74  64 65 63 3a 2e 6e 70 0d  |p:JSRprtdec:.np.|
00000fa0  06 72 28 43 4c 43 3a 4c  44 41 74 72 6b 6e 6f 3a  |.r(CLC:LDAtrkno:|
00000fb0  41 44 43 64 69 66 66 3a  53 54 41 74 72 6b 6e 6f  |ADCdiff:STAtrkno|
00000fc0  3a 53 54 41 68 65 78 0d  06 7c 28 2e 66 69 6e 20  |:STAhex..|(.fin |
00000fd0  43 4c 43 3a 4c 44 41 70  6c 6f 74 2b 31 3a 41 44  |CLC:LDAplot+1:AD|
00000fe0  43 23 31 39 32 3a 53 54  41 70 6c 6f 74 2b 31 0d  |C#192:STAplot+1.|
00000ff0  06 86 1d 4c 44 41 70 6c  6f 74 2b 32 3a 41 44 43  |...LDAplot+2:ADC|
00001000  23 30 3a 53 54 41 70 6c  6f 74 2b 32 0d 06 90 1b  |#0:STAplot+2....|
00001010  44 45 43 63 6f 75 6e 74  3a 42 45 51 72 74 73 3a  |DECcount:BEQrts:|
00001020  4a 4d 50 76 6c 70 32 0d  06 9a 18 2e 72 74 73 20  |JMPvlp2.....rts |
00001030  4c 44 41 23 34 3a 4a 53  52 6f 73 3a 52 54 53 0d  |LDA#4:JSRos:RTS.|
00001040  06 a4 09 2e 69 6e 66 6f  0d 06 ae 29 4c 44 41 23  |....info...)LDA#|
00001050  34 33 3a 4c 44 58 23 74  6b 73 20 83 32 35 36 3a  |43:LDX#tks .256:|
00001060  4c 44 59 23 74 6b 73 20  81 32 35 36 3a 4a 53 52  |LDY#tks .256:JSR|
00001070  70 0d 06 b8 27 4c 44 41  23 31 30 3a 4c 44 58 23  |p...'LDA#10:LDX#|
00001080  74 6b 20 83 32 35 36 3a  4c 44 59 23 74 6b 20 81  |tk .256:LDY#tk .|
00001090  32 35 36 3a 4a 53 52 70  0d 06 c2 33 4c 44 41 74  |256:JSRp...3LDAt|
000010a0  72 61 63 6b 73 3a 53 54  41 68 65 78 3a 4c 44 41  |racks:STAhex:LDA|
000010b0  74 72 61 63 6b 73 2b 31  3a 53 54 41 68 65 78 2b  |tracks+1:STAhex+|
000010c0  31 3a 4a 53 52 70 72 74  64 65 63 0d 06 cc 2b 4c  |1:JSRprtdec...+L|
000010d0  44 41 23 31 31 3a 4c 44  58 23 73 65 63 73 20 83  |DA#11:LDX#secs .|
000010e0  32 35 36 3a 4c 44 59 23  73 65 63 73 20 81 32 35  |256:LDY#secs .25|
000010f0  36 3a 4a 53 52 70 0d 06  d6 35 4c 44 41 73 65 63  |6:JSRp...5LDAsec|
00001100  74 6f 72 73 3a 53 54 41  68 65 78 3a 4c 44 41 73  |tors:STAhex:LDAs|
00001110  65 63 74 6f 72 73 2b 31  3a 53 54 41 68 65 78 2b  |ectors+1:STAhex+|
00001120  31 3a 4a 53 52 70 72 74  64 65 63 0d 06 e0 28 4c  |1:JSRprtdec...(L|
00001130  44 41 23 39 3a 4c 44 58  23 73 64 73 20 83 32 35  |DA#9:LDX#sds .25|
00001140  36 3a 4c 44 59 23 73 64  73 20 81 32 35 36 3a 4a  |6:LDY#sds .256:J|
00001150  53 52 70 0d 06 ea 31 4c  44 41 73 69 64 65 73 3a  |SRp...1LDAsides:|
00001160  53 54 41 68 65 78 3a 4c  44 41 73 69 64 65 73 2b  |STAhex:LDAsides+|
00001170  31 3a 53 54 41 68 65 78  2b 31 3a 4a 53 52 70 72  |1:STAhex+1:JSRpr|
00001180  74 64 65 63 0d 06 f4 07  52 54 53 0d 06 fe 08 2e  |tdec....RTS.....|
00001190  6b 65 79 0d 07 08 4d 4c  44 41 23 33 32 3a 53 54  |key...MLDA#32:ST|
000011a0  41 20 58 3a 4c 44 41 23  30 3a 53 54 41 20 58 2b  |A X:LDA#0:STA X+|
000011b0  31 3a 53 54 41 20 59 3a  53 54 41 20 59 2b 31 3a  |1:STA Y:STA Y+1:|
000011c0  4c 44 41 23 31 3a 53 54  41 20 43 31 3a 4c 44 41  |LDA#1:STA C1:LDA|
000011d0  23 33 3a 53 54 41 20 43  32 3a 4a 53 52 73 71 72  |#3:STA C2:JSRsqr|
000011e0  0d 07 12 2d 4c 44 41 23  31 38 3a 4c 44 58 23 73  |...-LDA#18:LDX#s|
000011f0  75 73 65 64 20 83 32 35  36 3a 4c 44 59 23 73 75  |used .256:LDY#su|
00001200  73 65 64 20 81 32 35 36  3a 4a 53 52 70 0d 07 1c  |sed .256:JSRp...|
00001210  3f 4c 44 41 23 33 32 3a  53 54 41 20 58 3a 4c 44  |?LDA#32:STA X:LD|
00001220  41 23 31 30 30 3a 53 54  41 20 59 3a 4c 44 41 23  |A#100:STA Y:LDA#|
00001230  30 3a 53 54 41 20 43 31  3a 4c 44 41 23 32 3a 53  |0:STA C1:LDA#2:S|
00001240  54 41 20 43 32 3a 4a 53  52 73 71 72 0d 07 26 2d  |TA C2:JSRsqr..&-|
00001250  4c 44 41 23 31 37 3a 4c  44 58 23 73 66 72 65 65  |LDA#17:LDX#sfree|
00001260  20 83 32 35 36 3a 4c 44  59 23 73 66 72 65 65 20  | .256:LDY#sfree |
00001270  81 32 35 36 3a 4a 53 52  70 0d 07 30 3f 4c 44 41  |.256:JSRp..0?LDA|
00001280  23 37 38 3a 53 54 41 20  58 3a 4c 44 41 23 32 3a  |#78:STA X:LDA#2:|
00001290  53 54 41 20 58 2b 31 3a  4c 44 41 23 32 3a 53 54  |STA X+1:LDA#2:ST|
000012a0  41 20 43 31 3a 4c 44 41  23 30 3a 53 54 41 20 43  |A C1:LDA#0:STA C|
000012b0  32 3a 4a 53 52 73 71 72  0d 07 3a 2b 4c 44 41 23  |2:JSRsqr..:+LDA#|
000012c0  31 37 3a 4c 44 58 23 72  6f 6f 74 20 83 32 35 36  |17:LDX#root .256|
000012d0  3a 4c 44 59 23 72 6f 6f  74 20 81 32 35 36 3a 4a  |:LDY#root .256:J|
000012e0  53 52 70 0d 07 44 30 4c  44 41 23 30 3a 53 54 41  |SRp..D0LDA#0:STA|
000012f0  20 59 3a 4c 44 41 23 33  3a 53 54 41 20 43 31 3a  | Y:LDA#3:STA C1:|
00001300  4c 44 41 23 31 3a 53 54  41 20 43 32 3a 4a 53 52  |LDA#1:STA C2:JSR|
00001310  73 71 72 0d 07 4e 29 4c  44 41 23 31 37 3a 4c 44  |sqr..N)LDA#17:LD|
00001320  58 23 6d 61 70 20 83 32  35 36 3a 4c 44 59 23 6d  |X#map .256:LDY#m|
00001330  61 70 20 81 32 35 36 3a  4a 53 52 70 0d 07 58 07  |ap .256:JSRp..X.|
00001340  52 54 53 0d 07 62 08 2e  73 71 72 0d 07 6c 29 4c  |RTS..b..sqr..l)L|
00001350  44 41 23 31 38 3a 4a 53  52 6f 73 3a 4c 44 41 23  |DA#18:JSRos:LDA#|
00001360  30 3a 4a 53 52 6f 73 3a  4c 44 41 20 43 31 3a 4a  |0:JSRos:LDA C1:J|
00001370  53 52 6f 73 0d 07 76 55  4c 44 41 23 34 3a 53 54  |SRos..vULDA#4:ST|
00001380  41 70 6c 6f 74 3a 4c 44  41 20 58 3a 53 54 41 70  |Aplot:LDA X:STAp|
00001390  6c 6f 74 2b 31 3a 4c 44  41 20 58 2b 31 3a 53 54  |lot+1:LDA X+1:ST|
000013a0  41 70 6c 6f 74 2b 32 3a  4c 44 41 20 59 3a 53 54  |Aplot+2:LDA Y:ST|
000013b0  41 70 6c 6f 74 2b 33 3a  4c 44 41 20 59 2b 31 3a  |Aplot+3:LDA Y+1:|
000013c0  53 54 41 70 6c 6f 74 2b  34 0d 07 80 0d 4a 53 52  |STAplot+4....JSR|
000013d0  70 6c 6f 74 70 74 0d 07  8a 22 43 4c 43 3a 4c 44  |plotpt..."CLC:LD|
000013e0  41 70 6c 6f 74 2b 33 3a  41 44 43 23 33 38 3a 53  |Aplot+3:ADC#38:S|
000013f0  54 41 70 6c 6f 74 2b 33  0d 07 94 1d 4c 44 41 70  |TAplot+3....LDAp|
00001400  6c 6f 74 2b 34 3a 41 44  43 23 30 3a 53 54 41 70  |lot+4:ADC#0:STAp|
00001410  6c 6f 74 2b 34 0d 07 9e  0d 4a 53 52 70 6c 6f 74  |lot+4....JSRplot|
00001420  70 74 0d 07 a8 34 4c 44  41 23 38 35 3a 53 54 41  |pt...4LDA#85:STA|
00001430  70 6c 6f 74 3a 4c 44 41  20 59 3a 53 54 41 70 6c  |plot:LDA Y:STApl|
00001440  6f 74 2b 33 3a 4c 44 41  20 59 2b 31 3a 53 54 41  |ot+3:LDA Y+1:STA|
00001450  70 6c 6f 74 2b 34 0d 07  b2 22 43 4c 43 3a 4c 44  |plot+4..."CLC:LD|
00001460  41 70 6c 6f 74 2b 31 3a  41 44 43 23 33 30 3a 53  |Aplot+1:ADC#30:S|
00001470  54 41 70 6c 6f 74 2b 31  0d 07 bc 1d 4c 44 41 70  |TAplot+1....LDAp|
00001480  6c 6f 74 2b 32 3a 41 44  43 23 30 3a 53 54 41 70  |lot+2:ADC#0:STAp|
00001490  6c 6f 74 2b 32 0d 07 c6  0d 4a 53 52 70 6c 6f 74  |lot+2....JSRplot|
000014a0  70 74 0d 07 d0 11 4c 44  41 23 34 3a 53 54 41 70  |pt....LDA#4:STAp|
000014b0  6c 6f 74 0d 07 da 22 43  4c 43 3a 4c 44 41 70 6c  |lot..."CLC:LDApl|
000014c0  6f 74 2b 33 3a 41 44 43  23 33 38 3a 53 54 41 70  |ot+3:ADC#38:STAp|
000014d0  6c 6f 74 2b 33 0d 07 e4  1d 4c 44 41 70 6c 6f 74  |lot+3....LDAplot|
000014e0  2b 34 3a 41 44 43 23 30  3a 53 54 41 70 6c 6f 74  |+4:ADC#0:STAplot|
000014f0  2b 34 0d 07 ee 0d 4a 53  52 70 6c 6f 74 70 74 0d  |+4....JSRplotpt.|
00001500  07 f8 12 4c 44 41 23 38  35 3a 53 54 41 70 6c 6f  |...LDA#85:STAplo|
00001510  74 0d 08 02 25 4c 44 41  20 58 3a 53 54 41 70 6c  |t...%LDA X:STApl|
00001520  6f 74 2b 31 3a 4c 44 41  20 58 2b 31 3a 53 54 41  |ot+1:LDA X+1:STA|
00001530  70 6c 6f 74 2b 32 0d 08  0c 0d 4a 53 52 70 6c 6f  |plot+2....JSRplo|
00001540  74 70 74 0d 08 16 29 4c  44 41 23 31 38 3a 4a 53  |tpt...)LDA#18:JS|
00001550  52 6f 73 3a 4c 44 41 23  30 3a 4a 53 52 6f 73 3a  |Ros:LDA#0:JSRos:|
00001560  4c 44 41 20 43 32 3a 4a  53 52 6f 73 0d 08 20 55  |LDA C2:JSRos.. U|
00001570  4c 44 41 23 34 3a 53 54  41 70 6c 6f 74 3a 4c 44  |LDA#4:STAplot:LD|
00001580  41 20 58 3a 53 54 41 70  6c 6f 74 2b 31 3a 4c 44  |A X:STAplot+1:LD|
00001590  41 20 58 2b 31 3a 53 54  41 70 6c 6f 74 2b 32 3a  |A X+1:STAplot+2:|
000015a0  4c 44 41 20 59 3a 53 54  41 70 6c 6f 74 2b 33 3a  |LDA Y:STAplot+3:|
000015b0  4c 44 41 20 59 2b 31 3a  53 54 41 70 6c 6f 74 2b  |LDA Y+1:STAplot+|
000015c0  34 0d 08 2a 0d 4a 53 52  70 6c 6f 74 70 74 0d 08  |4..*.JSRplotpt..|
000015d0  34 12 4c 44 41 23 32 39  3a 53 54 41 70 6c 6f 74  |4.LDA#29:STAplot|
000015e0  0d 08 3e 22 43 4c 43 3a  4c 44 41 70 6c 6f 74 2b  |..>"CLC:LDAplot+|
000015f0  31 3a 41 44 43 23 33 30  3a 53 54 41 70 6c 6f 74  |1:ADC#30:STAplot|
00001600  2b 31 0d 08 48 1d 4c 44  41 70 6c 6f 74 2b 32 3a  |+1..H.LDAplot+2:|
00001610  41 44 43 23 30 3a 53 54  41 70 6c 6f 74 2b 32 0d  |ADC#0:STAplot+2.|
00001620  08 52 0d 4a 53 52 70 6c  6f 74 70 74 0d 08 5c 22  |.R.JSRplotpt..\"|
00001630  43 4c 43 3a 4c 44 41 70  6c 6f 74 2b 33 3a 41 44  |CLC:LDAplot+3:AD|
00001640  43 23 33 38 3a 53 54 41  70 6c 6f 74 2b 33 0d 08  |C#38:STAplot+3..|
00001650  66 1d 4c 44 41 70 6c 6f  74 2b 34 3a 41 44 43 23  |f.LDAplot+4:ADC#|
00001660  30 3a 53 54 41 70 6c 6f  74 2b 34 0d 08 70 0d 4a  |0:STAplot+4..p.J|
00001670  53 52 70 6c 6f 74 70 74  0d 08 7a 25 4c 44 41 20  |SRplotpt..z%LDA |
00001680  58 3a 53 54 41 70 6c 6f  74 2b 31 3a 4c 44 41 20  |X:STAplot+1:LDA |
00001690  58 2b 31 3a 53 54 41 70  6c 6f 74 2b 32 0d 08 84  |X+1:STAplot+2...|
000016a0  0d 4a 53 52 70 6c 6f 74  70 74 0d 08 8e 25 4c 44  |.JSRplotpt...%LD|
000016b0  41 20 59 3a 53 54 41 70  6c 6f 74 2b 33 3a 4c 44  |A Y:STAplot+3:LD|
000016c0  41 20 59 2b 31 3a 53 54  41 70 6c 6f 74 2b 34 0d  |A Y+1:STAplot+4.|
000016d0  08 98 0d 4a 53 52 70 6c  6f 74 70 74 0d 08 a2 07  |...JSRplotpt....|
000016e0  52 54 53 0d 08 ac 0e 2e  73 66 72 65 65 73 65 63  |RTS.....sfreesec|
000016f0  73 0d 08 b6 0f 4c 44 41  23 35 3a 4a 53 52 6f 73  |s....LDA#5:JSRos|
00001700  0d 08 c0 1c 43 4c 43 3a  4c 44 41 64 73 70 3a 41  |....CLC:LDAdsp:A|
00001710  44 43 64 61 64 3a 53 54  41 64 73 70 0d 08 ca 1e  |DCdad:STAdsp....|
00001720  4c 44 41 64 73 70 2b 31  3a 41 44 43 64 61 64 2b  |LDAdsp+1:ADCdad+|
00001730  31 3a 53 54 41 64 73 70  2b 31 0d 08 d4 16 2e 66  |1:STAdsp+1.....f|
00001740  73 6c 70 20 4c 44 41 64  61 64 3a 53 54 41 20 54  |slp LDAdad:STA T|
00001750  0d 08 de 14 4c 44 41 64  61 64 2b 31 3a 53 54 41  |....LDAdad+1:STA|
00001760  20 54 2b 31 0d 08 e8 2d  4c 44 58 23 34 3a 2e 64  | T+1...-LDX#4:.d|
00001770  6c 70 20 4c 53 52 20 54  2b 31 3a 52 4f 52 20 54  |lp LSR T+1:ROR T|
00001780  3a 52 4f 52 20 53 3a 44  45 58 3a 42 4e 45 64 6c  |:ROR S:DEX:BNEdl|
00001790  70 0d 08 f2 21 4c 44 58  23 34 3a 2e 64 6c 70 32  |p...!LDX#4:.dlp2|
000017a0  20 4c 53 52 20 53 3a 44  45 58 3a 42 4e 45 64 6c  | LSR S:DEX:BNEdl|
000017b0  70 32 0d 08 fc 2f 4c 44  41 73 69 64 65 73 3a 43  |p2.../LDAsides:C|
000017c0  4d 50 23 32 3a 42 45 51  64 73 3a 4c 44 58 23 34  |MP#2:BEQds:LDX#4|
000017d0  3a 4a 4d 50 6d 75 6c 3a  2e 64 73 20 4c 44 58 23  |:JMPmul:.ds LDX#|
000017e0  33 0d 09 06 21 2e 6d 75  6c 20 41 53 4c 20 54 3a  |3...!.mul ASL T:|
000017f0  52 4f 4c 20 54 2b 31 3a  44 45 58 3a 42 4e 45 6d  |ROL T+1:DEX:BNEm|
00001800  75 6c 0d 09 10 1f 4c 44  41 20 54 3a 53 54 41 20  |ul....LDA T:STA |
00001810  58 3a 4c 44 41 20 54 2b  31 3a 53 54 41 20 58 2b  |X:LDA T+1:STA X+|
00001820  31 0d 09 1a 11 4c 44 41  23 30 3a 53 54 41 20 53  |1....LDA#0:STA S|
00001830  2b 31 0d 09 24 27 4c 44  58 23 35 3a 2e 73 6c 70  |+1..$'LDX#5:.slp|
00001840  20 41 53 4c 20 53 3a 52  4f 4c 20 53 2b 31 3a 44  | ASL S:ROL S+1:D|
00001850  45 58 3a 42 4e 45 73 6c  70 0d 09 2e 19 53 45 43  |EX:BNEslp....SEC|
00001860  3a 4c 44 41 23 30 3a 53  42 43 20 53 3a 53 54 41  |:LDA#0:SBC S:STA|
00001870  20 59 0d 09 38 19 4c 44  41 23 33 3a 53 42 43 20  | Y..8.LDA#3:SBC |
00001880  53 2b 31 3a 53 54 41 20  59 2b 31 0d 09 42 55 4c  |S+1:STA Y+1..BUL|
00001890  44 41 23 34 3a 53 54 41  70 6c 6f 74 3a 4c 44 41  |DA#4:STAplot:LDA|
000018a0  20 58 3a 53 54 41 70 6c  6f 74 2b 31 3a 4c 44 41  | X:STAplot+1:LDA|
000018b0  20 58 2b 31 3a 53 54 41  70 6c 6f 74 2b 32 3a 4c  | X+1:STAplot+2:L|
000018c0  44 41 20 59 3a 53 54 41  70 6c 6f 74 2b 33 3a 4c  |DA Y:STAplot+3:L|
000018d0  44 41 20 59 2b 31 3a 53  54 41 70 6c 6f 74 2b 34  |DA Y+1:STAplot+4|
000018e0  0d 09 4c 0d 4a 53 52 70  6c 6f 74 70 74 0d 09 56  |..L.JSRplotpt..V|
000018f0  11 4c 44 41 23 32 32 34  3a 4a 53 52 6f 73 0d 09  |.LDA#224:JSRos..|
00001900  60 1b 43 4c 43 3a 4c 44  41 64 61 64 3a 41 44 43  |`.CLC:LDAdad:ADC|
00001910  23 31 3a 53 54 41 64 61  64 0d 09 6a 1b 4c 44 41  |#1:STAdad..j.LDA|
00001920  64 61 64 2b 31 3a 41 44  43 23 30 3a 53 54 41 64  |dad+1:ADC#0:STAd|
00001930  61 64 2b 31 0d 09 74 1e  4c 44 41 64 61 64 3a 43  |ad+1..t.LDAdad:C|
00001940  4d 50 64 73 70 3a 42 45  51 63 3a 4a 4d 50 66 73  |MPdsp:BEQc:JMPfs|
00001950  6c 70 0d 09 7e 2c 2e 63  20 4c 44 41 64 61 64 2b  |lp..~,.c LDAdad+|
00001960  31 3a 43 4d 50 64 73 70  2b 31 3a 42 45 51 63 6f  |1:CMPdsp+1:BEQco|
00001970  6e 3a 4a 4d 50 66 73 6c  70 3a 2e 63 6f 6e 0d 09  |n:JMPfslp:.con..|
00001980  88 19 2e 72 74 73 31 20  4c 44 41 23 34 3a 4a 53  |...rts1 LDA#4:JS|
00001990  52 6f 73 3a 52 54 53 0d  09 92 0a 2e 66 73 6d 61  |Ros:RTS.....fsma|
000019a0  70 0d 09 9c 19 4c 44 41  23 30 3a 53 54 41 64 61  |p....LDA#0:STAda|
000019b0  64 3a 53 54 41 64 61 64  2b 31 0d 09 a6 1f 4c 44  |d:STAdad+1....LD|
000019c0  41 23 32 3a 53 54 41 64  73 70 3a 4c 44 41 23 30  |A#2:STAdsp:LDA#0|
000019d0  3a 53 54 41 64 73 70 2b  31 0d 09 b0 28 4c 44 41  |:STAdsp+1...(LDA|
000019e0  23 31 38 3a 4a 53 52 6f  73 3a 4c 44 41 23 33 3a  |#18:JSRos:LDA#3:|
000019f0  4a 53 52 6f 73 3a 4c 44  41 23 32 3a 4a 53 52 6f  |JSRos:LDA#2:JSRo|
00001a00  73 0d 09 ba 10 4a 53 52  73 66 72 65 65 73 65 63  |s....JSRsfreesec|
00001a10  73 0d 09 c4 07 52 54 53  0d 09 ce 08 2e 63 61 74  |s....RTS.....cat|
00001a20  0d 09 d8 1f 4c 44 41 23  32 3a 53 54 41 64 61 64  |....LDA#2:STAdad|
00001a30  3a 4c 44 41 23 30 3a 53  54 41 64 61 64 2b 31 0d  |:LDA#0:STAdad+1.|
00001a40  09 e2 1f 4c 44 41 23 35  3a 53 54 41 64 73 70 3a  |...LDA#5:STAdsp:|
00001a50  4c 44 41 23 30 3a 53 54  41 64 73 70 2b 31 0d 09  |LDA#0:STAdsp+1..|
00001a60  ec 28 4c 44 41 23 31 38  3a 4a 53 52 6f 73 3a 4c  |.(LDA#18:JSRos:L|
00001a70  44 41 23 33 3a 4a 53 52  6f 73 3a 4c 44 41 23 33  |DA#3:JSRos:LDA#3|
00001a80  3a 4a 53 52 6f 73 0d 09  f6 10 4a 53 52 73 66 72  |:JSRos....JSRsfr|
00001a90  65 65 73 65 63 73 0d 0a  00 07 52 54 53 0d 0a 0a  |eesecs....RTS...|
00001aa0  0c 2e 66 64 66 73 65 63  73 0d 0a 14 28 4c 44 41  |..fdfsecs...(LDA|
00001ab0  23 31 38 3a 4a 53 52 6f  73 3a 4c 44 41 23 33 3a  |#18:JSRos:LDA#3:|
00001ac0  4a 53 52 6f 73 3a 4c 44  41 23 31 3a 4a 53 52 6f  |JSRos:LDA#1:JSRo|
00001ad0  73 0d 0a 1e 12 4c 44 59  23 30 3a 53 54 59 63 6f  |s....LDY#0:STYco|
00001ae0  75 6e 74 0d 0a 28 09 2e  73 66 6c 70 0d 0a 32 0c  |unt..(..sflp..2.|
00001af0  4c 44 59 63 6f 75 6e 74  0d 0a 3c 13 4c 44 41 20  |LDYcount..<.LDA |
00001b00  57 25 2c 59 3a 53 54 41  64 61 64 0d 0a 46 13 4c  |W%,Y:STAdad..F.L|
00001b10  44 41 20 58 25 2c 59 3a  53 54 41 64 73 70 0d 0a  |DA X%,Y:STAdsp..|
00001b20  50 07 49 4e 59 0d 0a 5a  15 4c 44 41 20 57 25 2c  |P.INY..Z.LDA W%,|
00001b30  59 3a 53 54 41 64 61 64  2b 31 0d 0a 64 15 4c 44  |Y:STAdad+1..d.LD|
00001b40  41 20 58 25 2c 59 3a 53  54 41 64 73 70 2b 31 0d  |A X%,Y:STAdsp+1.|
00001b50  0a 6e 14 49 4e 59 3a 49  4e 59 3a 53 54 59 63 6f  |.n.INY:INY:STYco|
00001b60  75 6e 74 0d 0a 78 10 4a  53 52 73 66 72 65 65 73  |unt..x.JSRsfrees|
00001b70  65 63 73 0d 0a 82 1b 4c  44 41 73 69 7a 65 3a 43  |ecs....LDAsize:C|
00001b80  4d 50 63 6f 75 6e 74 3a  42 45 51 65 6e 64 0d 0a  |MPcount:BEQend..|
00001b90  8c 0b 4a 4d 50 73 66 6c  70 0d 0a 96 0c 2e 65 6e  |..JMPsflp.....en|
00001ba0  64 20 52 54 53 0d 0a a0  05 3a 0d 0a aa 07 52 54  |d RTS....:....RT|
00001bb0  53 0d 0a b4 41 2e 64 31  20 45 51 55 42 32 32 3a  |S...A.d1 EQUB22:|
00001bc0  45 51 55 42 31 3a 45 51  55 42 33 31 3a 45 51 55  |EQUB1:EQUB31:EQU|
00001bd0  42 31 30 3a 45 51 55 42  31 3a 45 51 55 42 32 33  |B10:EQUB1:EQUB23|
00001be0  3a 45 51 55 42 31 3a 45  51 55 44 30 3a 45 51 55  |:EQUB1:EQUD0:EQU|
00001bf0  44 30 0d 0a be 28 2e 74  69 74 6c 65 20 45 51 55  |D0...(.title EQU|
00001c00  53 22 41 44 46 53 20 46  72 65 65 20 53 70 61 63  |S"ADFS Free Spac|
00001c10  65 20 4d 61 70 22 2b bd  31 33 0d 0a c8 1a 2e 64  |e Map"+.13.....d|
00001c20  32 20 45 51 55 42 33 31  3a 45 51 55 42 30 3a 45  |2 EQUB31:EQUB0:E|
00001c30  51 55 42 39 0d 0a d2 1c  45 51 55 53 22 50 6c 65  |QUB9....EQUS"Ple|
00001c40  61 73 65 20 69 6e 73 65  72 74 20 64 69 73 63 22  |ase insert disc"|
00001c50  0d 0a dc 17 45 51 55 42  33 31 3a 45 51 55 42 30  |....EQUB31:EQUB0|
00001c60  3a 45 51 55 42 31 31 0d  0a e6 21 45 51 55 53 22  |:EQUB11...!EQUS"|
00001c70  50 72 65 73 73 20 52 45  54 55 52 4e 20 77 68 65  |Press RETURN whe|
00001c80  6e 20 72 65 61 64 79 22  0d 0a f0 32 2e 62 6c 6b  |n ready"...2.blk|
00001c90  20 45 51 55 42 30 3a 45  51 55 57 20 57 25 3a 45  | EQUB0:EQUW W%:E|
00001ca0  51 55 57 26 46 46 46 46  3a 45 51 55 57 38 3a 45  |QUW&FFFF:EQUW8:E|
00001cb0  51 55 57 30 3a 45 51 55  57 32 0d 0a fa 1a 2e 63  |QUW0:EQUW2.....c|
00001cc0  6f 6d 6d 20 45 51 55 53  22 2a 4d 4f 55 4e 54 22  |omm EQUS"*MOUNT"|
00001cd0  2b bd 31 33 0d 0b 04 3f  2e 64 33 20 45 51 55 42  |+.13...?.d3 EQUB|
00001ce0  31 39 3a 45 51 55 42 32  3a 45 51 55 42 34 3a 45  |19:EQUB2:EQUB4:E|
00001cf0  51 55 42 30 3a 45 51 55  57 30 3a 45 51 55 42 32  |QUB0:EQUW0:EQUB2|
00001d00  33 3a 45 51 55 42 31 3a  45 51 55 44 30 3a 45 51  |3:EQUB1:EQUD0:EQ|
00001d10  55 44 30 0d 0b 0e 49 2e  73 69 7a 65 20 45 51 55  |UD0...I.size EQU|
00001d20  57 30 3a 2e 73 65 63 74  6f 72 73 20 45 51 55 57  |W0:.sectors EQUW|
00001d30  30 3a 2e 74 72 61 63 6b  73 20 45 51 55 57 30 3a  |0:.tracks EQUW0:|
00001d40  2e 73 69 64 65 73 20 45  51 55 57 30 3a 2e 64 69  |.sides EQUW0:.di|
00001d50  73 63 73 69 7a 65 20 45  51 55 44 30 0d 0b 18 78  |scsize EQUD0...x|
00001d60  2e 64 34 20 45 51 55 42  31 38 3a 45 51 55 42 30  |.d4 EQUB18:EQUB0|
00001d70  3a 45 51 55 42 31 32 39  3a 45 51 55 42 32 34 3a  |:EQUB129:EQUB24:|
00001d80  45 51 55 57 30 3a 45 51  55 57 32 35 36 3a 45 51  |EQUW0:EQUW256:EQ|
00001d90  55 57 31 32 37 36 3a 45  51 55 57 37 36 38 3a 45  |UW1276:EQUW768:E|
00001da0  51 55 42 31 36 3a 45 51  55 42 32 36 3a 45 51 55  |QUB16:EQUB26:EQU|
00001db0  42 31 38 3a 45 51 55 42  30 3a 45 51 55 42 31 32  |B18:EQUB0:EQUB12|
00001dc0  38 3a 45 51 55 42 31 38  3a 45 51 55 42 30 3a 45  |8:EQUB18:EQUB0:E|
00001dd0  51 55 42 33 0d 0b 22 44  2e 74 6b 73 20 45 51 55  |QUB3.."D.tks EQU|
00001de0  42 33 31 3a 45 51 55 42  30 3a 45 51 55 42 34 3a  |B31:EQUB0:EQUB4:|
00001df0  45 51 55 53 22 3c 22 2b  c4 31 35 2c 22 2d 22 29  |EQUS"<"+.15,"-")|
00001e00  2b 22 20 54 72 61 63 6b  73 20 22 2b c4 31 35 2c  |+" Tracks "+.15,|
00001e10  22 2d 22 29 2b 22 3e 22  0d 0b 2c 7b 2e 74 6b 20  |"-")+">"..,{.tk |
00001e20  20 45 51 55 42 33 31 3a  45 51 55 42 30 3a 45 51  | EQUB31:EQUB0:EQ|
00001e30  55 42 32 35 3a 45 51 55  53 22 54 72 61 63 6b 73  |UB25:EQUS"Tracks|
00001e40  3a 22 3a 2e 73 65 63 73  20 45 51 55 42 33 31 3a  |:":.secs EQUB31:|
00001e50  45 51 55 42 31 34 3a 45  51 55 42 32 35 3a 45 51  |EQUB14:EQUB25:EQ|
00001e60  55 53 22 53 65 63 74 6f  72 73 3a 22 3a 2e 73 64  |US"Sectors:":.sd|
00001e70  73 20 45 51 55 42 33 31  3a 45 51 55 42 33 32 3a  |s EQUB31:EQUB32:|
00001e80  45 51 55 42 32 35 3a 45  51 55 53 22 53 69 64 65  |EQUB25:EQUS"Side|
00001e90  73 3a 22 0d 0b 36 68 2e  72 75 6e 20 45 51 55 42  |s:"..6h.run EQUB|
00001ea0  31 37 3a 45 51 55 42 31  3a 45 51 55 42 33 31 3a  |17:EQUB1:EQUB31:|
00001eb0  45 51 55 42 34 3a 45 51  55 42 32 37 3a 45 51 55  |EQUB4:EQUB27:EQU|
00001ec0  53 20 22 50 72 65 73 73  20 52 20 74 6f 20 52 55  |S "Press R to RU|
00001ed0  4e 20 20 20 53 50 41 43  45 20 74 6f 20 45 78 69  |N   SPACE to Exi|
00001ee0  74 22 3a 45 51 55 42 32  33 3a 45 51 55 42 31 3a  |t":EQUB23:EQUB1:|
00001ef0  45 51 55 44 30 3a 45 51  55 44 30 0d 0b 40 34 2e  |EQUD0:EQUD0..@4.|
00001f00  73 75 73 65 64 20 45 51  55 42 33 31 3a 45 51 55  |sused EQUB31:EQU|
00001f10  42 33 3a 45 51 55 42 33  31 3a 45 51 55 53 22 53  |B3:EQUB31:EQUS"S|
00001f20  65 63 74 6f 72 73 20 69  6e 20 75 73 65 20 22 0d  |ectors in use ".|
00001f30  0b 4a 34 2e 73 66 72 65  65 20 45 51 55 42 33 31  |.J4.sfree EQUB31|
00001f40  3a 45 51 55 42 33 3a 45  51 55 42 32 38 3a 45 51  |:EQUB3:EQUB28:EQ|
00001f50  55 53 22 46 72 65 65 20  73 65 63 74 6f 72 28 73  |US"Free sector(s|
00001f60  29 20 22 0d 0b 54 33 2e  72 6f 6f 74 20 45 51 55  |) "..T3.root EQU|
00001f70  42 33 31 3a 45 51 55 42  32 32 3a 45 51 55 42 32  |B31:EQUB22:EQUB2|
00001f80  38 3a 45 51 55 53 22 52  6f 6f 74 20 64 69 72 65  |8:EQUS"Root dire|
00001f90  63 74 6f 72 79 22 0d 0b  5e 32 2e 6d 61 70 20 45  |ctory"..^2.map E|
00001fa0  51 55 42 33 31 3a 45 51  55 42 32 32 3a 45 51 55  |QUB31:EQUB22:EQU|
00001fb0  42 33 31 3a 45 51 55 53  22 46 72 65 65 20 73 70  |B31:EQUS"Free sp|
00001fc0  61 63 65 20 6d 61 70 22  0d 0b 68 05 5d 0d 0b 72  |ace map"..h.]..r|
00001fd0  07 ed 3a e1 0d ff                                 |..:...|
00001fd6

P/ADEXsrc.m0

P/ADEXsrc.m1

P/ADEXsrc.m2

P/ADEXsrc.m4

P/ADEXsrc.m5

Our privacy policy is here.
Last updated: 28 Jul 2024, 23:31 UTC
Website designed by .