home *** CD-ROM | disk | FTP | other *** search
/ ftp.barnyard.co.uk / 2015.02.ftp.barnyard.co.uk.tar / ftp.barnyard.co.uk / cpm / walnut-creek-CDROM / ZSYS / SIMTEL20 / SYSLIB / SLIB3.LBR / SVERSION.Z80 < prev   
Text File  |  2000-06-30  |  2KB  |  83 lines
  1. ;
  2. ;  SYSLIB Module Name:  SVERSION
  3. ;  Author:  Richard Conn
  4. ;  SYSLIB Version Number:  3.6
  5. ;  Module Version Number:  1.6
  6.  
  7.     public    version
  8.  
  9. ;  Date:     10 Dec 85
  10. ;  Version: 3.6
  11. ;  Revised: Richard Conn
  12. ;  Changes: Z80 mnemonics, many minor
  13. ;
  14. ;  Date:     1 Dec 85
  15. ;  Version: 3.5
  16. ;  Revised: Richard Conn
  17. ;  Changes: Many minor
  18. ;
  19. ;  Date:     19 Aug 85
  20. ;  Version: 3.4
  21. ;  Revised: Richard Conn
  22. ;  Changes: Added SETDMA, LUINIT, LUDIR, LUOPEN, LUREAD, LUCLOSE
  23. ;
  24. ;  Date:     4 Aug 85
  25. ;  Version: 3.3
  26. ;  Revised: Richard Conn
  27. ;  Changes:    - SFXIO, SFYIO
  28. ;        - Adding:
  29. ;            SACAS1, SACAS2, SACAS3, SAGO1, SAGO2, SAIF1, SAIF2,
  30. ;            SBGO1, SBGO2,
  31. ;            SHCAS1, SHCAS2, SHCAS3, SHGO1, SHGO2, SHIF1, SHIF2,
  32. ;            SDGO1, SDGO2,
  33. ;            SARGV
  34. ;
  35. ;  Date:     4 Jul 85
  36. ;  Version: 3.2
  37. ;  Revised: Richard Conn
  38. ;  Changes:    - S0FILEIO, S1FILEIO, S2FILEIO, S3FILEIO
  39. ;        - SFILEIO, SFXIO, SFYIO, SDIR04
  40. ;        - SYSLIB3.HLP, SYSLIB4.HLP
  41. ;        - Adding:
  42. ;            SFAPPEND, SGRR, SGRR1
  43. ;
  44. ;  Date:     4 May 85
  45. ;  Version: 3.1
  46. ;  Revised: Al Dunsmuir
  47. ;  Changes:    - S0FILEIO (FI0$OPEN, F0$GET, FI0$CLOSE,
  48. ;                FO0$OPEN, F0$PUT, FO0$CLOSE)
  49. ;        - S1FILEIO (FI1$OPEN, F1$GET, FI1$CLOSE,
  50. ;                FO1$OPEN, F1$PUT, FO1$CLOSE)
  51. ;        - S2FILEIO (FI2$OPEN, F2$GET, FI2$CLOSE,
  52. ;                FO2$OPEN, F2$PUT, FO2$CLOSE)
  53. ;        - S3FILEIO (FI3$OPEN, F3$GET, FI3$CLOSE,
  54. ;                FO3$OPEN, F3$PUT, FO3$CLOSE)
  55. ;        - SFILEIO  (FI$OPEN, F$GET, FI$CLOSE,
  56. ;                FO$OPEN, F$PUT, FO$CLOSE)
  57. ;        - SFXIO    (FXI$OPEN, FX$GET, FXI$CLOSE,
  58. ;                 FXO$OPEN, FX$PUT, FXO$CLOSE)
  59. ;            
  60. ;   Previous Version:    1.0 (16 Jan 84)
  61.  
  62.  
  63. ;
  64. ;    VERSION -- Return the SYSLIB Version Number in HL; H=Major Version,
  65. ; L=Minor Version
  66. ;
  67. VERS    EQU    36    ; Version Number
  68.  
  69. VERSION:
  70.     LD    H,VERS/10    ; GET MAJOR PART
  71.     LD    L,[VERS MOD 10]    ; GET MINOR PART
  72.     RET
  73.  
  74. ;
  75. ;  Identifying Text
  76. ;
  77.     DB    'SYSLIB '
  78.     DB    [VERS/10]+'0','.',[VERS MOD 10]+'0'
  79.     DB    ' by Richard Conn'
  80.     DB    0
  81.  
  82.     END
  83.