OpenEuphoria

Re: A Few Questions

• Posted by Irv <irv at ELLIJAY.COM> Jul 29, 1998
• 619 views

C.K. & Kirsten Lester wrote:
>
> What would be the fastest way to go about searching for a filename on a
> hard drive? For instance, I need to find all instances of "normal.dot"
> on a person's hard drive.
>
> Also, how do I check a user's operating system? I want to use dir95(),
> but I have users who are in DOS6.x or older/Windows 3.1 and dir95() is
> apparently not compatible with the older Windows/DOS systems.
>
Partial answer for second question:
this gets the version of DOS - if it's >= 7, then it's Win 95-98, right?

--------------------------------------------------------------------------
-- DosVer
--
-- Author   : Daniel Berstein <daber at pair.com>
--
-- Date     : June 8, 1998
--
-- Status   : Freeware
--
-- Thanks   : Jacques Deschenes, some portions copied from doswrap.e
--
--------------------------------------------------------------------------

-------------------------
global function dosver()
-------------------------
    sequence reg_list
    reg_list = repeat(0,10)
    reg_list[REG_AX] = #3000
    reg_list = dos_interrupt(#21,reg_list)
    return remainder(reg_list[REG_AX],256) +
floor(reg_list[REG_AX]/256)/100
end function

------------------------
-- MAIN        test stub
------------------------
print(1,dosver())

Regards,
Irv
http://www.mindspring.com/~mountains -- New Euphoria DOS GUI "thingie"
there now.