home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 5 Edit / 05-Edit.zip / VILE327.ZIP / VILE327.TAR / vile3.27 / z100bios.asm < prev    next >
Assembly Source File  |  1992-12-14  |  609b  |  43 lines

  1. ;History:46,1
  2.  
  3. _TEXT    SEGMENT  BYTE PUBLIC 'CODE'
  4. _TEXT    ENDS
  5. _DATA    SEGMENT  WORD PUBLIC 'DATA'
  6. _DATA    ENDS
  7. CONST    SEGMENT  WORD PUBLIC 'CONST'
  8. CONST    ENDS
  9. _BSS    SEGMENT  WORD PUBLIC 'BSS'
  10. _BSS    ENDS
  11.  
  12. bios_seg segment at 40h
  13.     org    9
  14. bios_conout    label    far
  15. bios_seg ends
  16.  
  17. DGROUP    GROUP    CONST,    _BSS,    _DATA
  18.     ASSUME  CS: _TEXT, DS: DGROUP, SS: DGROUP, ES: DGROUP
  19.  
  20. parm        equ    ss:[bp]
  21.  
  22. _TEXT    SEGMENT
  23.  
  24.  public        _asmputc
  25.  
  26. putc_stack        struc
  27.  putc_bp    dw    ?
  28.  putc_return    dd    ?
  29.  char        db    ?
  30. putc_stack        ends
  31.  
  32. _asmputc    proc    far
  33.         push    bp
  34.         mov    bp,sp
  35.         mov    al,parm.char
  36.         call    bios_conout
  37.         pop    bp
  38.         ret
  39. _asmputc    endp
  40.  
  41. _TEXT        ends
  42.         end
  43.