Add 'OPD/OPDLab6/' from commit '86c70344d6e83e363617321d9e434ce2acc44a0e'

git-subtree-dir: OPD/OPDLab6 git-subtree-mainline: fe4597fb97 git-subtree-split: 86c70344d6
2026-06-03 22:12:57 +03:00
parent fe4597fb97 86c70344d6
commit 1c44aff2aa
2 changed files with 63 additions and 0 deletions
@@ -0,0 +1,63 @@
+org 0x0
+v0: word $def, 0x180
+v1: word $int2, 0x180
+v2: word $int3, 0x180
+v3: word $def, 0x180
+v4: word $def, 0x180
+v5: word $def, 0x180
+v6: word $def, 0x180
+v7: word $def, 0x180
+def: iret
+
+org 0x20
+X: word 0x18
+
+start: di
+ld #0x9
+out 5
+ld #0xA
+out 7
+jump $prog
+
+prog: ei
+declp: 
+ld X
+dec
+st X
+jump declp
+
+int2:
+ld X
+hlt                                           ; отладка ВУ-2
+in 4
+and X
+hlt                                           ; отладка ВУ-2
+call $check
+hlt                                           ; отладка ВУ-2
+st X
+iret
+
+int3: 
+ld X
+hlt                                           ; отладка ВУ-3
+asl
+asl
+add X
+neg
+sub #4
+hlt                                           ; отладка ВУ-3
+out 6
+hlt                                           ; отладка ВУ-3
+ld X
+iret
+
+org 0x100
+min: word 0xFFE6
+max: word 0x18
+check: cmp min
+bpl A
+ld min
+A:cmp max
+bmi B
+ld max
+B: ret