Odczyt rekordu tekstowego z edytora ekranowego (INPUT)
From Atariki
Revision as of 21:20, 24 wrz 2017; view current revision
←Older revision | Newer revision→
←Older revision | Newer revision→
Przeznaczenie: Program czeka, aż użytkownik wpisze ciąg znaków z klawiatury i naciśnie klawisz RETURN. Znaki podczas wpisywania są wyświetlane na ekranie, działają też normalne znaki kontrolne. Odczyt jest robiony z edytora ekranowego, a zatem kanał #0 musi być otwarty (jest to jego stan domyślny, więc wystarczy go nie zamykać).
Odpowiednik w BASIC-u: INPUT A$
Wywołanie: adres, pod który mają być wpisane znaki, należy załadować do rejestrów A/Y (młodszy/starszy), a następnie podać rozkaz jsr getline
.
iccmd = $0342 icbufa = $0344 icbufl = $0348 ; getline ldx #$00 sta icbufa,x tya sta icbufa+1,x lda #$ff ;maks. wielkość tekstu sta icbufl,x lda #$00 sta icbufl+1,x lda #$05 sta iccmd,x jmp jciomain