ab76015/spo
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

started up asm

Browse source
This commit is contained in:
aljazbrodar. 2025-12-18 13:49:58 +01:00
parent ef273790b8
commit acce30cea1
45 changed files with 1167 additions and 728 deletions
Download patch file Download diff file Expand all files Collapse all files

103
ass1/vaje/vhod_izhod/echo.lst Normal file
View file

@ -0,0 +1,103 @@
00000 ECHO START 0
00000 010E3B LDA #3643
00003 0F20F5 STA number
00006 4B2028 JSUB char
00009 4B202B JSUB nl
0000C 4B2022 JSUB char
0000F 4B2025 JSUB nl
00012 011000E6 +LDA #test_niz
00016 4B2031 JSUB string
00019 4B201B JSUB nl
0001C 0320DC LDA number
0001F 4B204B JSUB num
00022 4B2012 JSUB nl
00025 010017 LDA #23
00028 4B2042 JSUB num
0002B 4B2009 JSUB nl
0002E 3F2FFD HALT J HALT
00031 END ECHO
. izpis znaka
00031 DD0001 char WD #1
00034 4F0000 RSUB
. izpis newline
00037 0F1000E2 nl +STA old_A
0003B B400 CLEAR A
0003D 5320A5 LDCH newline
00040 DD0001 WD #1
00043 031000E2 +LDA old_A
00047 4F0000 RSUB
. izpis niza
0004A 0F1000F2 string +STA strptr
0004E B400 loop_niz CLEAR A
00050 52209F LDCH @strptr
00053 DD0001 WD #1
00056 290000 COMP #0
00059 33200E JEQ out
0005C 031000F2 +LDA strptr
00060 190001 ADD #1
00063 0F1000F2 +STA strptr
00067 3F2FE4 J loop_niz
0006A 4F0000 out RSUB
. desetiski izpis stevila v A iz HEX
. stevke pridobimo z mod 10, shranimo v tabelo, nato tabelo izpisemo v obratnem vrstnem redu
0006D 0720F2 num LDX digits_ix
00070 0F2088 STA number
00073 25000A DIV #10
00076 0F207C STA quot
00079 21000A MUL #10
0007C 0F2079 STA subtrahend
0007F 032079 LDA number
00082 1F2073 SUB subtrahend
00085 57A076 STCH digits,X
00088 0320D7 LDA digits_ix
0008B 190001 ADD #1
0008E 0F20D1 STA digits_ix
00091 032067 LDA number
00094 25000A DIV #10
00097 290000 COMP #0
0009A 372FD0 JGT num
. shrani stevec za X register in pa mejo len za naslednjo zanko loop_num
0009D 0320C2 LDA digits_ix
000A0 0F20C5 STA len
000A3 1D0001 SUB #1
000A6 0F20B9 STA digits_ix
. izpis tabele v obratnem vrstnem redu
000A9 0720B6 loop_num LDX digits_ix
000AC 53A04F LDCH digits,X
000AF 190030 ADD #48 . stevke v ascii se zacnejo pri 48
000B2 DD0001 WD #1
000B5 0320AA LDA digits_ix
000B8 1D0001 SUB #1
000BB 0F20A4 STA digits_ix
000BE 0320A4 LDA i
000C1 190001 ADD #1
000C4 0F209E STA i
000C7 2B209E COMP len
000CA 3B2FDC JLT loop_num
000CD 050000 LDX #0
000D0 010000 LDA #0
000D3 0F208C STA digits_ix
000D6 0F208C STA i
000D9 0F208C STA len
000DC 03201C LDA number
000DF 4F0000 RSUB
000E2 000000 old_A WORD 0
000E5 0A newline BYTE 10
000E6 68....64 test_niz BYTE C'hello world'
000F1 00 BYTE 0
000F2 000000 strptr WORD 0
000F5 000000 quot WORD 0
000F8 000000 subtrahend WORD 0
000FB 000000 number WORD 0
000FE 00....00 digits RESB 100
00162 000000 digits_ix WORD 0
00165 000000 i WORD 0
00168 000000 len WORD 0