echo.asm completed
This commit is contained in:
parent
64653bca2c
commit
c2d6d549ea
1 changed files with 18 additions and 6 deletions
|
|
@ -1,5 +1,5 @@
|
||||||
ECHO START 0
|
ECHO START 0
|
||||||
LDA #97
|
LDA #3643
|
||||||
STA number
|
STA number
|
||||||
JSUB char
|
JSUB char
|
||||||
JSUB nl
|
JSUB nl
|
||||||
|
|
@ -10,6 +10,7 @@ ECHO START 0
|
||||||
JSUB nl
|
JSUB nl
|
||||||
LDA number
|
LDA number
|
||||||
JSUB num
|
JSUB num
|
||||||
|
JSUB nl
|
||||||
HALT J HALT
|
HALT J HALT
|
||||||
END ECHO
|
END ECHO
|
||||||
|
|
||||||
|
|
@ -41,7 +42,7 @@ loop_niz CLEAR A
|
||||||
out RSUB
|
out RSUB
|
||||||
|
|
||||||
.desetiski izpis stevila v A iz HEX
|
.desetiski izpis stevila v A iz HEX
|
||||||
->ERRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRRROR
|
.stevke pridobimo z mod 10, shranimo v tabelo, nato tabelo izpisemo v obratnem vrstnem redu
|
||||||
num LDX digits_ix
|
num LDX digits_ix
|
||||||
STA number
|
STA number
|
||||||
DIV #10
|
DIV #10
|
||||||
|
|
@ -58,15 +59,24 @@ num LDX digits_ix
|
||||||
DIV #10
|
DIV #10
|
||||||
COMP #0
|
COMP #0
|
||||||
JGT num
|
JGT num
|
||||||
|
.shrani stevec za X register in pa mejo len za naslednjo zanko loop_num
|
||||||
|
LDA digits_ix
|
||||||
|
STA len
|
||||||
|
SUB #1
|
||||||
|
STA digits_ix
|
||||||
.izpis v tabele v obratnem vrstnem redu
|
.izpis v tabele v obratnem vrstnem redu
|
||||||
loop_num LDX digits_ix
|
loop_num LDX digits_ix
|
||||||
LDA digits, X
|
LDCH digits, X
|
||||||
JSUB char
|
ADD #48 .stevke v ascii se zacnejo pri 48
|
||||||
|
WD #1
|
||||||
LDA digits_ix
|
LDA digits_ix
|
||||||
SUB #1
|
SUB #1
|
||||||
STA digits_ix
|
STA digits_ix
|
||||||
COMP #-1
|
LDA i
|
||||||
JGT loop_num
|
ADD #1
|
||||||
|
STA i
|
||||||
|
COMP len
|
||||||
|
JLT loop_num
|
||||||
RSUB
|
RSUB
|
||||||
|
|
||||||
old_A WORD 0
|
old_A WORD 0
|
||||||
|
|
@ -79,3 +89,5 @@ subtrahend WORD 0
|
||||||
number WORD 0
|
number WORD 0
|
||||||
digits RESB 100
|
digits RESB 100
|
||||||
digits_ix WORD 0
|
digits_ix WORD 0
|
||||||
|
i WORD 0
|
||||||
|
len WORD 0
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue