Programowanie: Jak wyszukać pierwszy wolny IOCB: Różnice pomiędzy wersjami

Z Atariki
Przejdź do nawigacji Przejdź do wyszukiwania
Nie podano opisu zmian
 
poprawka
Linia 2: Linia 2:


<pre>
<pre>
lookup  clc
lookup  ldx #$00
        ldx #$00
loop    lda icchid,x
loop    lda icchid,x
         cmp #$ff
         cmp #$ff
         beq found
         beq found
         txa
         txa
        clc
         adc #$10
         adc #$10
         tax
         tax

Wersja z 7 wrz 2005, 23:52

Procedura wyszukuje pierwszy wolny kanał IOCB:

lookup  ldx #$00
loop    lda icchid,x
        cmp #$ff
        beq found
        txa
        clc
        adc #$10
        tax
        bpl loop
        ldy #-95       ;kod błędu "TOO MANY CHANNELS OPEN"
        rts
found   ldy #$01
        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.