vaje 2

ass1/cat.asm

@@ -0,0 +1,7 @@
+cat	START 0
+.beri in pisi
+loop	RD #0
+	WD #1
+	J loop
+
+ END loop

ass1/echo.asm

@@ -0,0 +1,83 @@
+echo START 0
+start 	LDA txt
+	JSUB char
+	JSUB nl
+
+	JSUB string
+
+
+halt  J halt
+
+.char
+char	STA regA  
+        STB regB
+	STT regT
+        STS regS .shranimo registre
+
+	WD 0x1
+
+        LDA regA  .obnovimo registre
+	LDB regB
+        LDT regT 
+        LDS regS
+
+	RSUB
+
+.nl
+nl	STA regA  
+        STB regB
+	STT regT
+        STS regS .shranimo registre
+
+	LDCH nl
+	WD 0x1
+	LDX 1
+	LDCH newline, X
+	WD 0x1
+
+        LDA regA  .obnovimo registre
+	LDB regB
+        LDT regT 
+        LDS regS
+
+	RSUB
+
+.string
+string	STA regA  
+        STB regB
+	STT regT
+        STS regS .shranimo registre
+
+loop	CLEAR	X
+	LDB #1
+	LDCH regA, X
+	JSUB char
+	ADDR X, B
+	COMP #0
+	JGT loop	
+
+        LDA regA  .obnovimo registre
+	LDB regB
+        LDT regT 
+        LDS regS
+
+	RSUB
+
+.txt
+txt	BYTE C'hi'
+	BYTE 0
+.parametri
+param1 RESB 1
+param2 RESB 2
+
+.constante
+newline BYTE 0x0D
+	BYTE 0x0A
+
+.registri
+regA     RESW  1
+regB     RESW  1
+regT     RESW  1
+regS     RESW  1
+
+ END start

ass1/print.asm

@@ -0,0 +1,17 @@
+print	START 0
+zacetek CLEAR X
+loop	LDCH txt, X	
+	WD #0xAA
+	TIX #len	.#len, ker je len EQU in ne dejanska lokacija v spominu!!!!!
+	JLT loop
+
+halt	J halt
+
+.constants
+txt	BYTE C'SIC/XE'
+	BYTE 0 
+txtend	EQU *
+len	EQU txtend-txt .definicija konstante EQU, ki ni shranjena v pomnilniku, zato ko jo želimo uporabiti
+.rabimo #len
+
+	END zacetek