Jump to content

FileInstall issue

gamepin126
 Share

Recommended Posts

gamepin126 Universalist

gamepin126

Posted
Posted (edited)

I'm having issues with FileInstall. It keeps overwriting the the second EXE in the file list. It basically copies over Zerg Unit Stacking v1.12 wtih loader.exe and just renames it. It's just like having loader.exe's and it's pissing me off.

Help please.

#NoTrayIcon
#include <GuiConstants.au3>

GuiCreate("v1.13", 121, 170,-1, -1 , BitOR($WS_OVERLAPPEDWINDOW, $WS_CLIPSIBLINGS))

$Button_1 = GuiCtrlCreateButton("Install Files", 0, 0, 120, 50)
$Button_3 = GuiCtrlCreateButton("Remove Files", 0, 100, 120, 50)
$Label_3 = GuiCtrlCreateLabel("gamepin126", 30, 150, 70, 20)

GuiSetState()
While 1
    $msg = GuiGetMsg()
    Select
        Case $msg = $Button_1
            FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\inhale.ini", @DesktopDir & "\inhale.ini", 0)
            FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\inhale.dll", @DesktopDir & "\inhale.dll", 0)
            FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\readme.txt", @DesktopDir & "\readme.txt", 0)
            FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\history.txt", @DesktopDir & "\history.txt", 0)
            FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\Loader.exe", @DesktopDir & "\Loader.exe", 0)
            FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\Loader.exe", @DesktopDir & "\Zerg Unit Stackingv1.12.exe", 0)
            FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\ZUS readme.txt", @DesktopDir & "\ZUS readme.txt", 0)          
        Case $msg = $Button_3
            FileDelete(@DesktopDir & "\inhale.ini")
            FileDelete(@DesktopDir & "\inhale.dll")
            FileDelete(@DesktopDir & "\readme.txt")
            FileDelete(@DesktopDir & "\history.txt")
            FileDelete(@DesktopDir & "\Loader.exe")
            FileDelete(@DesktopDir & "\Zerg Unit Stackingv1.12.exe")
            FileDelete(@DesktopDir & "\ZUS readme.txt")
    Case $msg = $GUI_EVENT_CLOSE
        ExitLoop
    Case Else
    EndSelect
WEnd
Exit
Edited by gamepin126
Link to comment
Share on other sites
gamepin126 Universalist

gamepin126

Posted
  • Author
Posted

I'm not sure how to do this, because I'm not very experienced with GUIs. Could someone sort this out for me? It needs to create a new gui if the password = correct.

#NoTrayIcon
#include <GuiConstants.au3>

GuiCreate("v1.13", 120, 220,-1, -1 , BitOR($WS_OVERLAPPEDWINDOW, $WS_CLIPSIBLINGS))

$Button_1 = GuiCtrlCreateButton("Install Files", 0, 0, 120, 50)
$Button_2 = GuiCtrlCreateButton("Private", 0, 50, 120, 50)
$Button_3 = GuiCtrlCreateButton("Remove Files", 0, 100, 120, 50)
$Button_4 = GuiCtrlCreateButton("Run Loader", 0, 150, 120, 50)
$Label_3 = GuiCtrlCreateLabel("gamepin126", 30, 200, 70, 20)

GuiSetState(@SW_MAXIMIZE)
While 1
    $msg = GuiGetMsg()
    Select
        Case $msg = $Button_1
            FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\inhale.ini", @AppDataDir & "\iNHALE\inhale.ini", 0)
            FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\inhale.dll", @AppDataDir & "\iNHALE\inhale.dll", 0)
            FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\readme.txt", @AppDataDir & "\iNHALE\readme.txt", 0)
            FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\history.txt", @AppDataDir & "\iNHALE\history.txt", 0)
            FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\Loader.exe", @AppDataDir & "\iNHALE\Loader.exe", 0)
            FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\Zerg Unit Stackingv1.12.exe", @AppDataDir & "\Zerg Unit Stackingv1.12.exe", 0)
            FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\ZUS readme.txt", @AppDataDir & "\ZUS readme.txt", 0)          
        Case $msg = $Button_2
            $passwd = InputBox("Security Check", "Enter your password.", "", "*")
                If $passwd = "test" Then
                    GuiCreate("SS 2.0", 120, 150, -1, -1 , BitOR($WS_OVERLAPPEDWINDOW, $WS_CLIPSIBLINGS))
                
                    $SS_Button_1 = GuiCtrlCreateButton("Install SS 2.0", 0, 0, 120, 50)
                    $SS_Button_2 = GuiCtrlCreateButton("Run LiTRiM", 0, 50, 50, 50)
                    $SS_Button_3 = GuiCtrlCreateButton("Remove SS 2.0", 100, 0, 50, 50)
                    GuiSetState(@SW_MAXIMIZE)
                    While 1
                        $msg = GuiGetMsg()
                            Select
                                Case $msg = $SS_Button_1
                                    FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\SS2.0\API.txt", @AppDataDir & "\SS2.0\API.txt", 0)
                                    FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\SS2.0\Changes.txt", @AppDataDir & "\SS2.0\Changes.txt", 0)
                                    FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\SS2.0\inhale.dll", @AppDataDir & "\SS2.0\inhale.dll", 0)
                                    FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\SS2.0\inhale.ini", @AppDataDir & "\SS2.0\inhale.ini", 0)
                                    FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\SS2.0\Zerg Unit Stackingv1.12.exe", @AppDataDir & "\SS2.0\Zerg Unit Stackingv1.12.exe", 0)
                                    FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\SS2.0\LiTRiM.ini", @AppDataDir & "\SS2.0\LiTRiM.ini", 0)
                                    FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\SS2.0\LiTRiM.exe", @AppDataDir & "\SS2.0\LiTRiM.exe", 0)
                                    FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\SS2.0\Plugin.txt", @AppDataDir & "\SS2.0\rPlugin.txt", 0)
                                    FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\SS2.0\README.txt", @AppDataDir & "\SS2.0\README.txt", 0)
                                    FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\SS2.0\StarScript.dll", @AppDataDir & "\SS2.0\StarScript.dll", 0)  
                                    FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\SS2.0\StarScript.exe", @AppDataDir & "\SS2.0\StarScript.exe", 0) ; 
                                    FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\SS2.0\Scripts\AutoIt.nut", @AppDataDir & "\SS2.0\Scripts\AutoIt.nut", 0)
                                    FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\SS2.0\Scripts\Extras.nut", @AppDataDir & "\SS2.0\Scripts\Extras.nut", 0)
                                    FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\SS2.0\Scripts\Stats.nut", @AppDataDir & "\SS2.0\Scripts\Stats.nut", 0)
                                    FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\SS2.0\Scripts\Exploits.nut", @AppDataDir & "\SS2.0\Scripts\Exploits.nut", 0)
                                    FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\SS2.0\Scripts\Helpers.nut", @AppDataDir & "\SS2.0\Scripts\Helpers.nut", 0)    
                                    FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\SS2.0\Scripts\Winamp.nut", @AppDataDir & "\SS2.0\Scripts\Winamp.nut", 0)  
                                    FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\SS2.0\Scripts\Include\Helpers.nut", @AppDataDir & "\SS2.0\Scripts\Include\Helpers.nut", 0)
                                    FileInstall("C:\Program Files\AutoIt3\Scripts\Fileinstall\SS2.0\Scripts\Errors", @AppDataDir & "\SS2.0\Scripts\Errors", 0)                              
                        Case $msg = $SS_Button_2
                            Run(@AppDataDir & "\SS2.0\LiTRiM.exe", 0)
                        Case $msg = $SS_Button_3
                            FileDelete(@AppDataDir & "\SS2.0\API.txt", 0)
                            FileDelete(@AppDataDir & "\SS2.0\Changes.txt", 0)
                            FileDelete(@AppDataDir & "\SS2.0\inhale.dll", 0)
                            FileDelete(@AppDataDir & "\SS2.0\inhale.ini", 0)
                            FileDelete(@AppDataDir & "\SS2.0\Zerg Unit Stackingv1.12.exe", 0)
                            FileDelete(@AppDataDir & "\SS2.0\LiTRiM.ini", 0)
                            FileDelete(@AppDataDir & "\SS2.0\LiTRiM.exe", 0)
                            FileDelete(@AppDataDir & "\SS2.0\rPlugin.txt", 0)
                            FileDelete(@AppDataDir & "\SS2.0\README.txt", 0)
                            FileDelete(@AppDataDir & "\SS2.0\StarScript.dll", 0)    
                            FileDelete(@AppDataDir & "\SS2.0\StarScript.exe", 0) ; 
                            FileDelete(@AppDataDir & "\SS2.0\Scripts\AutoIt.nut", 0)
                            FileDelete(@AppDataDir & "\SS2.0\Scripts\Extras.nut", 0)
                            FileDelete(@AppDataDir & "\SS2.0\Scripts\Stats.nut", 0)
                            FileDelete(@AppDataDir & "\SS2.0\Scripts\Exploits.nut", 0)
                            FileDelete(@AppDataDir & "\SS2.0\Scripts\Helpers.nut", 0)   
                            FileDelete(@AppDataDir & "\SS2.0\Scripts\Winamp.nut", 0)    
                            FileDelete(@AppDataDir & "\SS2.0\Scripts\Include", 0)
                            FileDelete(@AppDataDir & "\SS2.0\Scripts\Errors", 0)
                        Case $msg = $Button_4
                            Run(@AppDataDir & "\iNHALE\Loader.exe")
                        Case $msg = $GUI_EVENT_CLOSE
                            ExitLoop
                        Case Else
                        EndSelect
                    WEnd
                Else
                    MsgBox(0,"", "Hey fegget access denied.")
                Endif
            Case $msg = $Button_3
            FileDelete(@AppDataDir & "\iNHALE\inhale.ini")
            FileDelete(@AppDataDir & "\iNHALE\inhale.dll")
            FileDelete(@AppDataDir & "\iNHALE\readme.txt")
            FileDelete(@AppDataDir & "\iNHALE\history.txt")
            FileDelete(@AppDataDir & "\iNHALE\Loader.exe")
            FileDelete(@AppDataDir & "\iNHALE\Zerg Unit Stackingv1.12.exe")
            FileDelete(@AppDataDir & "\iNHALE\ZUS readme.txt")
    Case $msg = $GUI_EVENT_CLOSE
        ExitLoop
    Case Else
    EndSelect
WEnd
Exit
Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share
Go to topic listing

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...