home *** CD-ROM | disk | FTP | other *** search
/ Oakland CPM Archive / oakcpm.iso / cpm / asmutl / buffers.lbr / COUTA.MAC < prev    next >
Encoding:
Text File  |  1987-01-15  |  256 b   |  14 lines
  1.     extrn    .dos
  2. ;
  3. @cout    equ    2
  4. ;
  5. ; console output (a)
  6. ; a,f
  7. .couta::
  8.     push    d
  9.     mov    e,a
  10.     mvi    a,@cout
  11.     call    .dos
  12.     pop    d
  13.     ret
  14. %