From 882b30c10dfa12600b06440701240d57120b64a3 Mon Sep 17 00:00:00 2001 From: Dagen Brock Date: Mon, 2 Mar 2015 10:42:07 -0600 Subject: [PATCH] hex entry action support --- src/mt.s | 68 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 68 insertions(+) diff --git a/src/mt.s b/src/mt.s index 0101f2b..9e71b8f 100644 --- a/src/mt.s +++ b/src/mt.s @@ -376,6 +376,74 @@ _menuSelectedX1 db 0 ; no x2 cuz we be addin' _menuSelectedY db 0 Menu_HandleSelection + lda #MainMenuDefs + ldy #>MainMenuDefs + sta $0 + sty $1 + lda #0 + ldx Menu_ItemSelected +:check beq :foundIdx + clc + adc #6 ; "struct" size + dex + bra :check +:foundIdx sta _stash + tay + lda ($0),y + tax + iny + lda ($0),y + tay + jsr GoXY +*** HERE + ldy _stash + iny + iny + lda ($0),y + bne :notChar + +*TODO +:notChar cmp #1 + bne :notHex + iny + lda ($0),y + asl ;*2 + pha + iny + lda ($0),y + pha + iny + lda ($0),y + tay + plx + pla + jsr GetHex + rts + + +:notHex cmp #2 + bne :wtf + + +:wtf + rts + + + lda #2 + ldx #>StartBank + ldy #StartBank + jsr GetHex + + +* EG +*Menu_EndAddr hex 0D,0E ; x,y +* db 01 ; 0=char/1=hex input 2=Menu JSR +* db 02 ; memory size (bytes), 0=char/1=hex input +* da EndAddr ; variable storage + + + + rts Menu_PrevItem dec Menu_ItemSelected bpl :noflip