Small autoshutdown script.

[electrico]

This is small autoshutdown script. Please use it if you like it >_<.

-=electrico=-

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_icon=Clock-2.ico
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
;Auto Shutdown For Petrovich
Opt("TrayAutoPause",0)
Local $turnoff, $countdown
HotKeySet ("{F2}", "canceljob")
$turnoff = InputBox ("Auto Shutdown by electrico", "Please set the countdown time in minutes, after your PC will be automatically turned off. Please do not forget to save all data. (Note: never rename this file onto another one. File name must be 'autoshutdown.exe')") * 60000
$countdown = $turnoff
If $turnoff >0 Then 
Sleep ($countdown)
doshutdown()
EndIF
If $turnoff = 0 Then 
    otherfunc()
EndIf
If $turnoff <0 Then
    notime()
EndIf
Func doshutdown()
MsgBox (48, "Warning!", "Now PC is going to be off... 2 minutes remaining... If you did not expected it, please push F2 key now!", 120)
Shutdown (5)
EndFunc
Func canceljob()
    ProcessClose ("autoshutdown.exe")
EndFunc
Func notime()
    MsgBox (16, "Autoshutdown error", "Please set the correct time")
EndFunc
Func otherfunc()
    MsgBox (48, "Attention!", "Cancel pressed or incorrect data entered.")
EndFunc

Edited August 23, 2009 by electrico

[Yashied]

Not a bad start. Thanks for sharing.

EDIT:

Here is my version of the timer.

Edited August 22, 2009 by Yashied