[CyberMuesli]

Код:

::===========================================================================
:osname
::===========================================================================
:: ret: %osname%, %osname.XXX%=0|1, %ostype%, %ostype%

set OSName.Win98=0
set OSName.WinXP=0
set OSName.Server2003=0
set OSName.Server2008=0
set OSName.Win7=0

set osn.Out=%temp%\%random%.tmp
ver >%osn.Out%
find "4.10" %osn.Out%>nul && (set OSName=Win98       & set OSName.Win98=1&      set OSType=Client)
find "5.1"  %osn.Out%>nul && (set OSName=WinXP       & set OSName.WinXP=1&      set OSType=Client)
find "5.2"  %osn.Out%>nul && (set OSName=Server2003  & set OSName.Server2003=1& set OSType=Server)
find "6.0"  %osn.Out%>nul && (set OSName=Server2008  & set OSName.Server2008=1& set OSType=Server)
find "6.1"  %osn.Out%>nul && (set OSName=Win7        & set OSName.Win7=1&       set OSType=Client)
del %osn.Out%

if not defined OsName (
   echo Error: unknow OS
   ver
   verify other 2>nul
   exit
)
goto :eof