some progress on hw

2025-11-13 16:50:35 +01:00 · 2025-11-13 16:50:35 +01:00 · 6033833d97
commit 6033833d97
parent 83a4e6015a
6 changed files with 170 additions and 1 deletions
--- a/ass1/vaje/stack.asm
+++ b/ass1/vaje/stack.asm
@ -0,0 +1,53 @@
+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
+            RSUB
+
+exit        JSUB stackpop
+            +LDB @stackptr
+            JSUB stackpop
+            +LDL @stackptr
+            RSUB
+
+oldvalue WORD 0 
+stackptr WORD 0 
+stack RESW 1000