caranmegil/retrocoding
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Update for Mooreheim

Browse Source
This commit is contained in:
William Moore 2023-10-19 05:56:38 -05:00
parent 7756386d95
commit 83dd75d73d
1 changed files with 10 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
src/altair8800/Mooreheim.asm
View File

@ -22,12 +22,14 @@
;
; Toggle switches 6 and 7 when you want to move on to the next roll
; or continue holding the dice.
; Once switches 6 and 7 are togged to position 1, the game end and
; Once switches 6 and 7 are togged to position 1, the game ends and
; your "hand" is displayed.
ORG 100H
; Driver logic
LXI SP, 4000h
PUSH D
LXI D, WELCOME
CALL PRINTS
@ -47,14 +49,18 @@ CHECKSWITCH6
IN 0FFH
ANI 32
CNZ ROLLTHEMBONES
JMP CHECKSWITCH6
IN 0FFH
ANI 32
JZ CHECKSWITCH6
CALL OUTPUT
CHECKSWITCH7
IN OFFH
IN 0FFH
ANI 64
CNZ ROLLTHEMBONES
JMP CHECKSWITCH7
IN 0FFH
ANI 64
JZ CHECKSWITCH7
CALL OUTPUT
JMP 0h