echo.asm completed

This commit is contained in:
aljazbrodar. 2025-11-03 08:12:19 +01:00
parent 64653bca2c
commit c2d6d549ea

View file

@ -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