{ ====================================================================
InstallWinIoDriver_exe.f

                   (C)     03-10-05  globalchimes at yahoo dot ca

==================================================================== }

\ NOTE!! This file compiles INSTALLWINIODRIVER.EXE with the commercial SwiftForth only and will not run on the Evaluation version

\  You must be an administrator to run INSTALLWINIODRIVER.EXE

\ marker installwiniodriver_onxp

{ Uses:
2 IMPORT: InstallWinIoDriver     ( PSTR pszWinIoDriverPath, bool IsDemandLoaded = false -- bool )
0 IMPORT: RemoveWinIoDriver      ( -- returns a bool flag but requires nothing to call it)
}

vocabulary application

application definitions

: program program ;

: sealed only application ;   \ go to end of file to execute sealed and program

\ requires dosbox

include winio.f

: WinIoDriverPath   ( --- psz )
   z" C:\ForthInc\SwiftForth\GlobalChimes\WinIo.sys"
;

: go
   application
\   dos-console open-personality
   WinIoDriverPath 0 InstallWinIoDriver $0FF AND
   cr cr
   if ." Win XP I/O Driver installed successfully -- please restart Windows and launch GLOBALCHIMES." cr
   else  ." Win XP I/O Driver installation failed or the driver is already installed. " cr cr
         ." Non-administrative XP account or the driver is not needed in Win 98."  cr cr cr
         ." Please launch GLOBALCHIMES now. "  cr cr
   then
   cr ." Press any key to exit." cr
   begin key? until
\   0 ExitProcess
    sealed
    bye
;


\ installwiniodriver_onxp

{  Notes:

The WINIO driver will have to be installed manually on Widows XP after unzipping/extracting/installing SwiftForth
first as per the readme.txt file, then following the instructions below.

Using WinIo from a non-administrative account
WinIo can now be used from non-administrative accounts under Windows NT/2000/XP.
In order to support this configuration, the WinIo driver (winio.sys) must be first installed on the system from an
administrative account using the InstallWinIoDriver function, which is provided by the library.
Following installation, the driver will load automatically whenever Windows starts.
An application will then be able to use the library's functions to access I/O ports and physical memory.

You should take the following steps in order to use WinIo from a non-administrative account:

Place winio.dll, winio.vxd and winio.sys in the directory where your application resides -- c:\forthinc\swiftforth\globalchimes.
Log on as an administrator.
Start SwiftForth from the START menu.
INCLUDE the file InstallWinIoDriver.f from the SwiftForth menu which calls
InstallWinIoDriver with the first parameter set to the path of the winio.sys file (e.g. c:\forthinc\swiftforth\globalchimes\winio.sys).
Reboot the system.
Log on as a regular user.
Start SwiftForth from the START menu.
INCLUDE the file globalchimes.f from the SwiftForth menu.
You should now be able to use WinIo in the same way as when using the library from an administrative account.
}

starter go
-1 threshold
sealed
program installwiniodriver