Dyskusja:Programowanie: Detekcja stereo

From Atariki

Revision as of 14:43, 19 paź 2011; view current revision
←Older revision | Newer revision→
Jump to: navigation, search

A może dałoby się zrobić to inaczej:

      ldx #$00
      stx $d20f     ;halt pokey 0
      stx $d21f     ;halt pokey 1
      lda #$03
      sta $d21f     ;release pokey 1

      ldy #$00

      lda $d20a     ;see if pokey 0 is halted ($d20a = $ff)
?loop and $d20a
      inx
      bne ?loop

      cmp #$ff
      bne ?mono

      iny

?mono lda #$03
      sta $d20f

      ...           ;Y=0 - mono
                    ;Y=1 - stereo

? Procedura jest prostsza i krótsza niż u Sebana, oraz nie używa przerwań, ale nie bardzo mam na czym sprawdzić, czy to działa. KMK 16:43, 19 paź 2011 (CEST)