FoxPro/Visual FoxPro - Apagar la Pc

Como puedo apagar mi pc o enviarla a bootear desde un programa en Fox o en Cliper

Declare Integer ExitWindowsEx in "user32.dll" Integer uFlags, Integer
dwReserved

*Algunoa de los valores para uFlags pueden ser:

*0 = Reinicia windows.
*1 = Apaga el sistema.
*2 = Reinicia el sistema.

*Y el valor para dwReserved siempre debe ser 0.

ExitWindowsEx(1,0) && Reinicia windows

************************************
Atte
ROD