home *** CD-ROM | disk | FTP | other *** search
/ ftp.barnyard.co.uk / 2015.02.ftp.barnyard.co.uk.tar / ftp.barnyard.co.uk / cpm / walnut-creek-CDROM / CPM / CPM68K / SD68K.LBR / COUT.S < prev    next >
Text File  |  2000-06-30  |  512b  |  20 lines

  1. ****    COUT -- Console Output
  2. **
  3. **    Function:
  4. **        Output character in D1.B to CON:
  5. **    Inputs:   D1.B == character to output
  6. **    Outputs:  -none- (character is output)
  7. **    Registers affected: -none-
  8. **    Routines called: -none-
  9. **    Special error conditions: -none-
  10. *
  11.     .globl    cout
  12.     .text
  13. cout:
  14.     movem.l    d0-d1,-(a7)    * save d0 and d1
  15.     moveq    #2,d0
  16.     trap    #2        * output character
  17.     movem.l    (a7)+,d0-d1
  18.     rts
  19.     .end
  20.