home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 9 / 09.iso / l / l040 / 13.ddi / RTLDOS.ZIP / VERS.ASM < prev   
Encoding:
Assembly Source File  |  1992-10-28  |  466 b   |  30 lines
  1.  
  2. ; *******************************************************
  3. ; *                            *
  4. ; *    Turbo Pascal Runtime Library Version 5.5    *
  5. ; *    DOS Version Routine                *
  6. ; *                            *
  7. ; *    Copyright (C) 1988,89 Borland International    *
  8. ; *                            *
  9. ; *******************************************************
  10.  
  11.     TITLE    VERS
  12.  
  13. CODE    SEGMENT    BYTE PUBLIC
  14.  
  15.     ASSUME    CS:CODE
  16.  
  17.     PUBLIC    DosVersion
  18.  
  19. DosVersion    PROC    FAR
  20.  
  21.     MOV    AH,30H
  22.     INT    21H
  23.     RET
  24.  
  25. DosVersion    ENDP
  26.  
  27. CODE    ENDS
  28.  
  29.     END
  30.