Operating instructions

HDLO
r:;·.:
i;-
ri
L·'n
1.
RDHI
"
1-':-
O!_·:_
INC
LD;;
LDA
ADLO
C:r1F:
ENLC!
I
NA::<
~~T5
LDA
5TA
RDLO
LDA
STf-iI
5fA
ADHI
RTS
'-1;-'
;::.c.!_"
LDFt
0::
ADLO).
'f'
LD
'f
'T'l
5TR
.:
RElLO).,
'
r
PLA
Le"f'
'r2
5TFt
(ADLO)., '
r
INC
't'1
INC
'r2'
LDA
'i1
[:t'lP
#8
BNE
~:vJr'l
ri:X:L
I
r'~E
.J
S~:
BNE
SRT2
~.::.
1t_.
LD::<
J5R
SDRT
BRK
BRK
;
<TO
$10)
*=$10
START
.;
SORT
B't'
NRME
LDA
#6
5TR i
r
1
LIt1
LD;:-:;
#3
JSR
SORT
;
SORT
BY
ADDRESS
LDA
#8
5TFt
't'LIM
LD::<
#::
#$20
CUT
ALL
:-.
i'\
,-.;
...
:_.
r-:.
Lf··.
GAF
LDA
J5F~
lj
~
p.j
.
~
Fig. 2: Assembly Listing,
Sorter/Pri
nter
BNE
GP1.
LAST
PTS
,\
.
Er'~D
.:.:
.;
-!'oT,.
C:NTHI
5E:C
#:1.
P~:t·JTl
.J5P
C:L~:
r
I::
~::
n
J5R
C::HP
F:~:iR
L[:q=t
#$2fi
.J5F~
CdjTRLL
!"o.!",""
,-.
1..-'i:.
=_"
i '-.r:
LL.'ii
E:NE
BNE
5~:Tl
;PRINT
SORTED
Lljj
LDA
r-~5:r:r:1H
I
5TR
CNTHI
5TA
CNTLCt
5TR ':'2
:t:=:t:+4
t·iE>::T
L1
NE.
;
COMPARE
CHAR.
Wi)
C:G~~~:E5F'.
L:HHf::~.
IroJ
sr;:Tl
.J5~:
5ETRD~:
5PT2 L
[)
A :r: TA
E~.:
>::
~i
SP5
l
trl
TABLE
HFTE~:
==00(10 5TH I
::$3E~
.'
.;
EG!UATE
LIST
==0000
N5YMLO=$0C
==0000
ENHI=$JD
==0000
ENLO==$::C
==00~0
CLR=$EB44
==0000
N5YMHI=$08
.'
;SORT
!
PRINT
SYMBOL
#;3
PRtnJ:
C:~:C:K
1
NC:A[:j~:
F'F:t4T1
FJFJ~Tl
GAP
J5F:
C!iJTALL
J5F~
[IUTALL
1
N'r'
LDA
#$20
.'
SETA[)R
LL)H
5·TLC!
1
NiT'
CP'i
BNE
.J5R
PRNT3
LDR
(ADLO)}
Y
J5F
rWf'iA
Ea'~E
F'F:1A
L[)irf
#0
PRNT2
LDA
(ADLO);Y
8MI
8
r-
r
'l
c:
!~.~
J5P.
RTS
IF
A=8.
NEXT
CHAR.
e:
0
f~1
PA~~
L
[)
iT'
i
r
1
LDA
(A
[)
L
c~
:::.~
iTi
LDii li2
(:
rl
F:
(A
[)
L
C!
).~
i
r
'
E~
:::
~::
r·~
>:~
LI
r-~
E
8NE
S~·JFiP
I
NC
li:i.
INC i
T
i2
Lrqi
Irii
eMF'
'T'L
It1
Br'~E
c:
Ot~1PA
~~
5~jAP
L[:oA
#fi
5TP
ii1
LDA
#3
STR
:r:2
S
l·J
F'
1 L
[:r
ir'
'i1
L(:;A
(ADLO).,
'T
i
PHA
L[)'i
'T'2
)
January, 1980
MICRO
--
The 6502 Journal
20:45