Subversion Repositories eco32

;

; rom02.s -- terminal output, polled

;

        .set    tba,0xF0300000  ; terminal base address

        add     $8,$0,tba        ; set terminal base address

L1:

        add     $10,$0,'a'       ; set char to ASCII 'a'

L2:

        ldw     $9,$8,8         ; load transmitter status word into $9

        and     $9,$9,1         ; extract LSB - 'transmitter ready'

        beq     $9,$0,L2 ; loop while not ready

        stw     $10,$8,12       ; load char into transmitter data register

        add     $10,$10,1       ; next char

        sub     $9,$10,'z'+1    ; check if above 'z'

        bne     $9,$0,L2 ; no - loop

        j       L1              ; else reset to 'a'