OpenEuphoria

Re: Windows version number

• Posted by Nick <metcalfn at ALPHALINK.COM.AU> Apr 12, 1999
• 518 views

Hi, Pete.  Under NT 3.50 it tells me I have windows version 0.22    

--Nick

Pete Eberlein wrote:

> Hi,
>
> here is some code to print what version of windows you are running:
>
> -- winver.ex
>
> include machine.e
>
> sequence regs
> regs = repeat(0,10)
> regs[REG_AX] = #1600
> regs = dos_interrupt(#2F, regs)
>
> printf(1, "Windows version: %d.%d\n", and_bits(regs[REG_AX]/{1,#100},#FF))
>
> -- code ends
>
> Now could someone run this under Windows NT and tell me what numbers it
> prints out?
>
> Thanks,
>  _______  ______  _______  ______
> [    _  \[    _ ][ _   _ ][    _ ]
> [/| [_] |[/| [_\][/ | | \][/| [_\]
>   |  ___/  |  _]    | |     |  _]
> [\| [/]  [\| [_/] [\| |/] [\| [_/]
> [_____]  [______] [_____] [______]
> xseal at harborside.com  ICQ:13466657
> http://www.harborside.com/home/x/xseal/euphoria/