| Navigation |
|---|
| Home & news |
| Random page |
| All pages |
| Databases |
|---|
| Fortune cookies |
| Haikus |
| SID themes |
| Page collections |
|---|
| Blag |
| Chip music |
| Chipophone |
| Games |
| Hardware projects |
| Music downloads |
| Obfuscated programming |
| Piano music |
| Sane programming |
| Scene productions |
| SID related pages |
| Software downloads |
| Video downloads |
| Don't miss |
|---|
 Spindle |
| Forum |
|---|
| Register |
| Log in |
| Latest comments |
| Syndication |
|---|
| RSS feed |
| Feedback |
|---|
  |
Getting numeric inputBack 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 pageThere 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