home *** CD-ROM | disk | FTP | other *** search
/ Super Net 1 / SUPERNET_1.iso / PC / OTROS / MSDOS / WATTCP / BOOTP.ZIP / PMSG.ASM < prev    next >
Encoding:
Assembly Source File  |  1987-05-21  |  640 b   |  60 lines
  1.     include masmdefs.hsm
  2.     include    model.hsm
  3.  
  4. codedef PMSG
  5. datadef
  6.  
  7. cstart  PMSG
  8. cpublic pmsg
  9.  
  10.     push    di
  11.     push    si
  12.  
  13.     push    DS
  14.     mov    SI,+@AB+0[BP]
  15.  
  16. if    PTR_L
  17.     mov    DS,+@AB+2[BP]
  18. endif
  19.  
  20.     CLD
  21. nextc:
  22.     LODSB
  23.     AND    AL,AL
  24.     JZ    doneit
  25.     MOV    AH,14
  26.     MOV    BX,7
  27.     PUSH    BP
  28.     INT    10h
  29.     POP    BP
  30.     JMP    nextc
  31. doneit:
  32.     pop    DS
  33.  
  34.     pop    si
  35.     pop    di
  36.  
  37. creturn pmsg
  38. cend    PMSG
  39.  
  40. codedef PCHAR
  41.  
  42. cstart  PCHAR
  43. cpublic pchar
  44.  
  45.     push    di
  46.     push    si
  47.     mov    AL,+@AB+0[BP]
  48.     MOV    AH,14
  49.     MOV    BX,7
  50.     PUSH    BP
  51.     INT    10h
  52.     POP    BP
  53.     pop    si
  54.     pop    di
  55.  
  56. creturn pchar
  57. cend    PCHAR
  58.  
  59.         end
  60.