Advertisement
adolf01

Untitled

Jan 31st, 2021
2,535
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. _acia_scan:         lda ACIA_STATUS           ;nacte status ACIA
  2.                     and #ACIA_STATUS_RX_FULL  ;porovna status s RX_full bitem
  3.                     beq @end                  ;pokud je vysledek 0 skoci na @end, pokud ne tak pokracuje
  4.                     lda ACIA_DATA             ;nacte do A data z ACIA
  5.                     RTS                       ;vyskočí z podprogramu
  6. @end:               LDA #00                   ;načte 0 do A
  7.                     RTS                       ;vyskočí z podprogramu
Advertisement
RAW Paste Data Copied
Advertisement