Programowanie: Jak wyszukać pierwszy wolny IOCB
From Atariki
(Różnice między wersjami)
| Wersja z dnia 18:07, 11 kwi 2006 Miker (Dyskusja | wkład) (link do IOCB) ← Previous diff |
Aktualna wersja 0xF (Dyskusja | wkład) (zbędny clc) |
||
| Linia 1: | Linia 1: | ||
| - | Procedura wyszukuje pierwszy wolny kanał [[IOCB]]: | + | Procedura wyszukuje pierwszy wolny kanał [[IOCB#Struktura_IOCB|IOCB]]: |
| <pre> | <pre> | ||
| Linia 8: | Linia 8: | ||
| beq found | beq found | ||
| txa | txa | ||
| - | clc | + | adc #$10 ;znacznik C skasowany |
| - | adc #$10 | + | |
| tax | tax | ||
| bpl loop | bpl loop | ||
Aktualna wersja
Procedura wyszukuje pierwszy wolny kanał IOCB:
lookup ldx #$00
ldy #$01
loop lda icchid,x
cmp #$ff
beq found
txa
adc #$10 ;znacznik C skasowany
tax
bpl loop
ldy #-95 ;kod błędu "TOO MANY CHANNELS OPEN"
found rts
W momencie opuszczenia procedury ze skasowanym znacznikiem N (czyli z wynikiem dodatnim), rejestr X zawiera pomnożony przez 16 numer kanału IOCB gotowego do użycia.
