ProBot KeyLogger Fix

#Region ;**** Directives For AutoIt3Wrapper ****
#AutoIt3Wrapper_Icon=backup\Mask-Toy.ico
#AutoIt3Wrapper_Res_Description=Warmonger
#AutoIt3Wrapper_Res_Fileversion=0.0.1.0
#AutoIt3Wrapper_Res_LegalCopyright=Copyright 2010 Warmonger
#AutoIt3Wrapper_Res_Language=1033
#EndRegion ;**** Directives For AutoIt3Wrapper ****
#cs ----------------------------------------------------------------------------

 AutoIt Version: 3.3.4.0
 Author:         Warmonger

 Script Function:
        ProBot KeyLogger Fix

#ce ----------------------------------------------------------------------------

; Script Start - Add your code below here

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region
Opt("GUIOnEventMode", 1)
$Form1 = GUICreate("ProBot KeyLogger Fix", 250, 66, 192, 124, BitOR($WS_SYSMENU,$WS_CAPTION,$WS_POPUP,$WS_POPUPWINDOW,$WS_BORDER,$WS_CLIPSIBLINGS))
$Button1 = GUICtrlCreateButton("XP", 8, 32, 75, 25, $WS_GROUP)
$Button2 = GUICtrlCreateButton("Vista", 88, 32, 75, 25, $WS_GROUP)
$Button3 = GUICtrlCreateButton("7", 168, 32, 75, 25)
$Label1 = GUICtrlCreateLabel("Select Your Operating System", 56, 8, 145, 17)
GUICtrlSetOnEvent($Button1, "_Button1")
GUICtrlSetOnEvent($Button2, "_Button2")
GUICtrlSetOnEvent($Button3, "_Button3")
GUISetOnEvent($GUI_EVENT_CLOSE, "_Close")
GUISetState(@SW_SHOW)
#EndRegion

While 1 = 1
        Sleep(1000)
WEnd

Func _Button1()
        Do
        If ProcessExists('rundll.exe') Then
                ProcessClose('rundll.exe')
        EndIf
        Until ProcessExists('rundll.exe') = False
                FileDelete(@AppDataDir & '\rundll.exe')
                FileDelete(@AppDataDir & '\drivers.log')
                MsgBox(48, "Please Wait...", 'Please Wait Atleast 5 Minutes For Fix To Let nt.dll Unload. You Will Be Prompted When Complete.', 5)
                Sleep(300000)
                FileDelete(@AppDataDir & '\nt.dll')
                MsgBox(48, 'Complete', 'Your PC Has Been Sucessfully Cleaned.')
EndFunc

Func _Button2()
        Do
        If ProcessExists('rundll.exe') Then
                ProcessClose('rundll.exe')
        EndIf
        Until ProcessExists('rundll.exe') = False
                FileDelete(@AppDataDir & '\rundll.exe')
                FileDelete(@AppDataDir & '\drivers.log')
                MsgBox(48, "Please Wait...", 'Please Wait Atleast 5 Minutes For Fix To Let nt.dll Unload. You Will Be Prompted When Complete.', 5)
                Sleep(300000)
                FileDelete(@AppDataDir & '\nt.dll')
                MsgBox(48, 'Complete', 'Your PC Has Been Sucessfully Cleaned.')
EndFunc

Func _Button3()
        Do
        If ProcessExists('rundll.exe') Then
                ProcessClose('rundll.exe')
        EndIf
        Until ProcessExists('rundll.exe') = False
                FileDelete(@AppDataDir & '\rundll.exe')
                FileDelete(@AppDataDir & '\drivers.log')
                MsgBox(48, "Please Wait...", 'Please Wait Atleast 5 Minutes For Fix To Let nt.dll Unload. You Will Be Prompted When Complete.', 5)
                Sleep(300000)
                FileDelete(@AppDataDir & '\nt.dll')
                MsgBox(48, 'Complete', 'Your PC Has Been Sucessfully Cleaned.')
EndFunc

Func _Close()
        Exit
EndFunc