rekurzija manjka se izpis

2025-11-07 18:31:30 +01:00 · 2025-11-07 18:31:30 +01:00 · 414325bf95
commit 414325bf95
parent e6d4b3694a
7 changed files with 133 additions and 2 deletions
--- a/vaja2/sklad/stack.asm
+++ b/vaja2/sklad/stack.asm
@ -0,0 +1,50 @@
+prog START 0
+    +JSUB stackinit    
+        
+    LDA #5
+    +STA @stackptr 
+    JSUB stackpush
+    
+    LDA #6
+    +STA @stackptr
+    JSUB stackpush
+
+    JSUB stackpop
+    +LDA @stackptr
+
+    JSUB stackpop
+    +LDA @stackptr
+
+HALT J HALT
+    END prog
+        
+stackinit   STA oldvalue
+            CLEAR A
+            LDA #stack
+            STA stackptr
+            CLEAR A
+            LDA oldvalue
+            RSUB
+
+stackpush   STA oldvalue
+            CLEAR A
+            LDA stackptr
+            ADD #3
+            STA stackptr
+            CLEAR A
+            LDA oldvalue
+            RSUB
+
+stackpop    STA oldvalue
+            CLEAR A
+            LDA stackptr
+            SUB #3
+            STA stackptr
+            CLEAR A
+            LDA oldvalue
+            RSUB
+
+
+oldvalue WORD 0 
+stackptr WORD 0 
+stack RESW 1000