home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / magazine / pcmagazi / 1990 / 05 / ansix.scr < prev    next >
Text File  |  1989-04-25  |  846b  |  31 lines
  1. N    ANSIX.COM
  2. A100
  3. JMP  010D           ;skip over data
  4.  
  5. E 102 1B'[6n$'
  6. E 107 0D 20 20 20 20 '$'
  7. A10D
  8. MOV  DX,102         ;display the ANSI DSR string
  9. MOV  AH,09          ; to see if ANSI is loaded
  10. INT  21
  11. MOV  AH,0B          ;check for key in the keyboard
  12. INT  21             ; buffer -- if there's anything
  13. CMP  AL,FF          ; there, ANSI is loaded
  14. JZ   0128           ;go empty the buffer
  15. MOV  DX,107         ;erase the garbage left by the
  16. MOV  AH,09          ; DSR string
  17. INT  21
  18. MOV  AX,4C00        ;exit w/ errorlevel 0
  19. INT  21
  20. MOV  AH,6           ;get key from keyboard buffer
  21. MOV  DL,FF          ; don't wait if buffer is empty
  22. INT  21             ; and don't print it to the screen.
  23. JNZ  128            ;go back for more 'til buffer is empty
  24. MOV  AX,4C01        ;exit w/ errorlevel 1
  25. INT  21
  26.  
  27. RCX
  28. 35
  29. W
  30. Q
  31.