Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- KeywaitLoop:
- ld a,(kbdScanCode) \ or a \ jr z,waitloop
- push af
- sub 49 \ jr c,{1@}
- cp 4 \ jr nc,{1@}
- jp holdDice
- @: pop af
- ; cp skYEqu \ jp holdDice1
- ; cp skWindow \ jp holdDice2
- ; cp skZoom \ jp holdDice3
- ; cp skTrace \ jp holdDice4
- ; cp skGraph \ jp holdDice5
- cp sk2nd \ jp throwDie
- cp skLeft \ jp cycleLeftCombos
- cp skRight \ jp cycleRightCombos
- cp skEnter \ jp EnterScore
- cp skClear \ jp QuitGame
- jr KeywaitLoop
- holdDice:
- ld b,a \ ld a,5 \ sub b
- ld c,a \ ld b,0
- ld a,(iy+bc) \ xor 80h \ ld (iy+bc),a
- jp KeywaitLoop
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement