include ti86asm.inc include ram86.inc ; org _asm_exec_ram ; call _clrscrn ; ; call _homeup ; cursor to top left ; ld de,_ioprompt ld hl,str_prmpt call _mov10b ; move prompt to prompt buffer , 21 max ; LD HL,(_CLEANTMP) PUSH HL ; SAVE CURRENT CLEANTMP VALUE LD HL,(_PTempCnt) LD (_CLEANTMP),HL ; CLEANTMP=PTEMPCNT SO INPUT ERRORS SAVE TMP VAR ; ld a,0Ch ld (_asap_ind),a ; set for 'inputstring' ; call _exec_pg3 ; get string, op1 = var containing string ; call _stoans ; store int 'Ans' ; POP HL ; HL=PREVIOUS CLEANTMP ld (_cleantmp),hl ; ret str_prmpt: db 'Prompt = ',0