home *** CD-ROM | disk | FTP | other *** search
/ World of Shareware - Software Farm 2 / wosw_2.zip / wosw_2 / CPROG / TASMSWAN.ZIP / PR132.ASM < prev    next >
Assembly Source File  |  1989-07-10  |  402b  |  35 lines
  1. %TITLE "Select compressed 132-character Printer output"
  2.  
  3.     IDEAL
  4.     DOSSEG
  5.     MODEL    small
  6.     STACK    256
  7.  
  8. ;----- DATASEG
  9.  
  10. prCodes    DB    27,15,0        ;if you want comments
  11.                 ; BUY the book
  12.  
  13.     CODESEG
  14.  
  15. Start:
  16.     mov    ax,@data
  17.     mov    ds,ax
  18.  
  19.     cld
  20.     mov    si, offset prCodes
  21. Next:
  22.     lodsb
  23.     or    al,al
  24.     jz    Exit
  25.     mov    dl,al
  26.     mov    ah,05h
  27.     int    21h
  28.     jmp     Next
  29.  
  30. Exit:
  31.     mov    ax,04C00h
  32.     int     21h
  33.  
  34.     End     Start
  35.