completed echo.asm
This commit is contained in:
parent
8906317d1a
commit
0dace8660c
2 changed files with 30 additions and 25 deletions
BIN
20.dev
BIN
20.dev
Binary file not shown.
|
|
@ -1,41 +1,40 @@
|
||||||
echo START 0
|
echo START 0
|
||||||
start LDA txt
|
start .LDCH txt
|
||||||
JSUB char
|
.JSUB char
|
||||||
JSUB nl
|
.JSUB nl
|
||||||
|
LDA #txt
|
||||||
JSUB string
|
JSUB string
|
||||||
|
JSUB nl
|
||||||
|
|
||||||
halt J halt
|
halt J halt
|
||||||
|
|
||||||
.char
|
.char
|
||||||
char STA regA
|
char STB regB
|
||||||
STB regB
|
|
||||||
STT regT
|
STT regT
|
||||||
|
.STL regL
|
||||||
STS regS .shranimo registre
|
STS regS .shranimo registre
|
||||||
|
|
||||||
WD 0x1
|
WD #1
|
||||||
|
.obnovimo registre
|
||||||
LDA regA .obnovimo registre
|
|
||||||
LDB regB
|
LDB regB
|
||||||
LDT regT
|
LDT regT
|
||||||
|
.LDL regL
|
||||||
LDS regS
|
LDS regS
|
||||||
|
|
||||||
RSUB
|
RSUB
|
||||||
|
|
||||||
.nl
|
.nl
|
||||||
nl STA regA
|
nl STB regB
|
||||||
STB regB
|
|
||||||
STT regT
|
STT regT
|
||||||
STS regS .shranimo registre
|
STS regS .shranimo registre
|
||||||
|
|
||||||
LDCH nl
|
LDCH newline
|
||||||
WD 0x1
|
WD #1
|
||||||
LDX 1
|
LDX #1
|
||||||
LDCH newline, X
|
LDCH newline, X
|
||||||
WD 0x1
|
WD #1
|
||||||
|
|
||||||
LDA regA .obnovimo registre
|
.obnovimo registre
|
||||||
LDB regB
|
LDB regB
|
||||||
LDT regT
|
LDT regT
|
||||||
LDS regS
|
LDS regS
|
||||||
|
|
@ -43,22 +42,26 @@ nl STA regA
|
||||||
RSUB
|
RSUB
|
||||||
|
|
||||||
.string
|
.string
|
||||||
string STA regA
|
string STA regA
|
||||||
STB regB
|
STB regB
|
||||||
STT regT
|
STT regT
|
||||||
|
STL regL
|
||||||
STS regS .shranimo registre
|
STS regS .shranimo registre
|
||||||
|
|
||||||
loop CLEAR X
|
loop LDB #1
|
||||||
LDB #1
|
LDCH @regA
|
||||||
LDCH regA, X
|
|
||||||
JSUB char
|
|
||||||
ADDR X, B
|
|
||||||
COMP #0
|
COMP #0
|
||||||
|
JSUB char
|
||||||
|
.add +1 to regA
|
||||||
|
LDA regA
|
||||||
|
ADD #1
|
||||||
|
STA regA
|
||||||
JGT loop
|
JGT loop
|
||||||
|
|
||||||
LDA regA .obnovimo registre
|
LDA regA .obnovimo registre
|
||||||
LDB regB
|
LDB regB
|
||||||
LDT regT
|
LDT regT
|
||||||
|
LDL regL
|
||||||
LDS regS
|
LDS regS
|
||||||
|
|
||||||
RSUB
|
RSUB
|
||||||
|
|
@ -79,5 +82,7 @@ regA RESW 1
|
||||||
regB RESW 1
|
regB RESW 1
|
||||||
regT RESW 1
|
regT RESW 1
|
||||||
regS RESW 1
|
regS RESW 1
|
||||||
|
regL RESW 1
|
||||||
|
|
||||||
|
|
||||||
END start
|
END start
|
||||||
Loading…
Add table
Add a link
Reference in a new issue