Click above to get retro games delivered to your door ever month!

##############################################################################
###+--------+#################################################################
#+-| OS_VER |---------------------------------+###############################
#| +--------+ Returns the current DOS version |###############################
#+--------------------------------------------+###############################
##############################################################################
##############################################################################
#+--| Summary |----------------+##############################################
#|     #INCLUDE system.hdr     |##############################################
#+-----------------------------+##############################################
##############################################################################
##############################################################################
#+--| Syntax |------------------------------------------------+###############
#|     PROCEDURE os_ver PROTOTYPE                             |###############
#|      PARAMETERS UINT version_major, UINT version_minor     |###############
#+------------------------------------------------------------+###############
##############################################################################
##############################################################################
#########+---| Description |---------------------------------------+##########
#########| The os_ver() procedure returns the current DOS version. |##########
#########| version_major contains the major portion of the version |##########
#########| number while version_minor contains the minor version.  |##########
#########+---------------------------------------------------------+##########
##############################################################################
##############################################################################
#########+--| Example 1 |-------------------------------------------+#########
#########| *    Print the DOS version number.                       |#########
#########|                                                          |#########
#########| os_ver( major, minor )                                   |#########
#########| ? major                                                  |#########
#########| ? minor                                                  |#########
#########+----------------------------------------------------------+#########
##############################################################################
##############################################################################
#########+--| Example 2 |-------------------------------------------+#########
#########| *    Some programs only execute under DOS 3.0 or above.  |#########
#########|                                                          |#########
#########| PROCEDURE run_net_utility                                |#########
#########|     VARDEF                                               |#########
#########|         INT     omajor, ominor                           |#########
#########|     ENDDEF                                               |#########
#########|                                                          |#########
#########|     os_ver( omajor, ominor )                             |#########
#########|     IF osmajor < 3                                       |#########
#########|         ? "Error: Unable to run utility."                |#########
#########|         RETURN                                           |#########
#########|     ENDIF                                                |#########
#########|     RUN "netutil.exe"                                    |#########
#########| ENDPRO                                                   |#########
#########+----------------------------------------------------------+#########
##############################################################################