Getting numeric input
Back to the TI-83 pageThis is done in about the same way as getting string input. Start by putting the prompt at 821ch:
Then call PGMIO_EXEC, but with a different command in ASM_IND_CALL:
ld a,1 ;code for NUMERIC input
ld (ASM_IND_CALL),a
call PGMIO_EXEC
The input is automatically parsed as an expression, and the result is placed in OP1.
call _formDisp ;display it
ret
prompt: .db \"Inp:\",0
prompt_len = $-prompt"}
Discuss this page
There are no comments here yet.
ld de,821ch ;put the prompt here ld hl,prompt ld bc,prompt_len ;length of prompt, max = 16 ldir