From 483a16c194bfede122060cbe25f57385528284ae Mon Sep 17 00:00:00 2001 From: zanostro Date: Tue, 11 Nov 2025 11:03:46 +0100 Subject: [PATCH] vaje --- rutine.asm | 16 ++++++++++++++++ vhod_izhod/cat.asm | 33 +++++++++++++++++++++++++++++++++ vhod_izhod/echo.asm | 11 +++++++++++ vhod_izhod/hello_world.asm | 35 +++++++++++++++++++++++++++++++++++ vhod_izhod/print.asm | 26 ++++++++++++++++++++++++++ zoge/zoge.asm | 2 +- 6 files changed, 122 insertions(+), 1 deletion(-) create mode 100644 rutine.asm create mode 100644 vhod_izhod/cat.asm create mode 100644 vhod_izhod/echo.asm create mode 100644 vhod_izhod/hello_world.asm create mode 100644 vhod_izhod/print.asm diff --git a/rutine.asm b/rutine.asm new file mode 100644 index 0000000..d73cd41 --- /dev/null +++ b/rutine.asm @@ -0,0 +1,16 @@ +.code + +rutina START 0 + + LDCH #95 + JSUB print + +halt J halt + END rutina + + +print WD #1 + RSUB + +.data + diff --git a/vhod_izhod/cat.asm b/vhod_izhod/cat.asm new file mode 100644 index 0000000..32b9908 --- /dev/null +++ b/vhod_izhod/cat.asm @@ -0,0 +1,33 @@ +.code + +cat START 0 + + CLEAR X + +read RD #0 + STCH BUFF, X + COMP #10 . \n + JEQ cont + TIX #bufflen + JLT read + + +cont CLEAR X +print LDCH BUFF, X + WD #1 + TIX #bufflen + COMP #0 + JGT print + +halt J halt + + +.data + +BUFF RESB 128 + BYTE 0 +buffend EQU * +bufflen EQU buffend - BUFF - 1 + + + END cat \ No newline at end of file diff --git a/vhod_izhod/echo.asm b/vhod_izhod/echo.asm new file mode 100644 index 0000000..b8bb181 --- /dev/null +++ b/vhod_izhod/echo.asm @@ -0,0 +1,11 @@ +.code +echo START 0 + + + +halt J halt + + + END echo + + diff --git a/vhod_izhod/hello_world.asm b/vhod_izhod/hello_world.asm new file mode 100644 index 0000000..37345ff --- /dev/null +++ b/vhod_izhod/hello_world.asm @@ -0,0 +1,35 @@ +.code + +hello START 0 + + +loop LDCH text, X + WD #1 + TIX #textlen . ker ni pomnilniska lokacija, ampak ker je eq, ker eq je tu kokr define + JLT loop + + + CLEAR X + LDA #text + STA textprt +loop2 CLEAR A + LDCH @textprt + WD #1 + COMP #0 + LDA textprt + ADD #1 + STA textprt + JGT loop2 + + +halt J halt + END hello + +.data + +text BYTE C'Hello world!' + BYTE 0 +textend EQU * ./ trenutni naslov +textlen EQU textend-text + +textprt WORD 0 \ No newline at end of file diff --git a/vhod_izhod/print.asm b/vhod_izhod/print.asm new file mode 100644 index 0000000..f8b57e3 --- /dev/null +++ b/vhod_izhod/print.asm @@ -0,0 +1,26 @@ +.code +print START 0 + + CLEAR X +loop LDA txt, X + COMP NULL + JEQ halt + WD #AA + + + + +halt J halt + + +.data + +txt BYTE C'SIC/XE' +NULL BYTE 0 +textend EQU * +textlen EQU textend- text -1 + + + + + END print \ No newline at end of file diff --git a/zoge/zoge.asm b/zoge/zoge.asm index 2c670d0..6372e10 100644 --- a/zoge/zoge.asm +++ b/zoge/zoge.asm @@ -36,7 +36,7 @@ endCOMP LDA bColour,X LDCH BLACK . clear screen +STCH SCREEN,X - LDX INDEX + LDX INDEX LDA ballX,X .//calculae new X LDT bSpeedX,X