Mercurial > hg > Members > kono > nitros9-code

view level1/modules/dwwrmess.asm @ 2668:07441dfebc27 lwtools-port

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Make tocgen build with lwasm lwasm does not treat a trailing colon as part of the symbol name. Removed trailing colons on symbol references.
author William Astle <lost@l-w.ca>
date Sun, 10 Jun 2012 13:35:44 -0600
parents c92a6c65bbd9
children c505ae3120c4
line wrap: on
line source

*******************************************************
*
* DWWriteMESS
*  
*  4/27/10 AAW - Based on John Linville's example
*
* Entry:
*    X  = starting address of data to send
*    Y  = number of bytes to send
*
* Exit:
*    X  = address of last byte sent + 1
*    Y  = 0
*    All others preserved
*


DWWrite   pshs      u,d,cc              ; preserve registers
          orcc      #$50                ; mask interrupts

txByte   ldb       ,x+                 ; get a byte to transmit
         stb       $ffe0               ; write it to the FIFO
         leay      ,-y                ; decrement byte counter
         bne       txByte              ; loop if more to send          
          
          puls      cc,d,u,pc           ; restore registers and return