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

IDK ce dela and i give up at this point

Browse source
This commit is contained in:
Timon 2025-11-12 18:21:53 +01:00
parent a118970d61
commit a54d6c7f46
2 changed files with 16 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

3
ass1/Rekurzija/FA.dev
View file

@ -1,4 +1,5 @@
10 3
4
5 5
6 6
0 0

23
ass1/Rekurzija/rek.asm
View file

@ -2,20 +2,24 @@ rek START 0
JSUB sinit JSUB sinit
LDT #10 LDT #10
loop JSUB read . Pretvorimo iz ASCII v stevilko loop JSUB read . Pretvorimo iz ASCII v stevilko
COMP #1 . Če je (A) <= 1 končamo, ker 0!=1!=1 COMP #1 . Če je (A) <= 1 končamo, ker 0!=1!=1
JLT halt JLT halt
JSUB fa . Sicer izračunamo (A)! JSUB fa . Sicer izračunamo (A)!
WD #1 . Zapišemo na std izhod +STCH @screen
LDA screen
ADD #1
STA screen
CLEAR B CLEAR B
CLEAR A CLEAR A
J loop . Gremo prebrat naslednji vhod J loop . Gremo prebrat naslednji vhod
halt J halt halt J halt
read RD #0xFA read RD #0xFA . V A se shrani naslednji prebrani znak
COMP #0xA COMP #0xA
JEQ rExit . Če preberemo newline gremo na izhod JEQ rExit . Če preberemo newline gremo na izhod
SUB #0x30 . Sicer iz ascii kode dobimo stevko SUB #0x30 . Sicer iz ascii kode dobimo stevko
LDB tmp LDB tmp
MULR T, B . tmp *= 10 MULR T, B . tmp *= 10
@ -23,10 +27,10 @@ read RD #0xFA
STB tmp STB tmp
J read J read
rExit LDA tmp rExit LDA tmp . Shranimo prebrano stevilko v A
LDB #0 LDB #0
STB tmp STB tmp . Ponastavimo tmp
RSUB RSUB
fa STL @stkp fa STL @stkp
JSUB spush JSUB spush
@ -70,6 +74,7 @@ spop . stkp--
LDA stkA LDA stkA
RSUB RSUB
screen WORD 0xb800
stkp WORD 0 stkp WORD 0
stk RESW 1000 stk RESW 1000
stkA WORD 0 stkA WORD 0