API tools faq
paste
Guest User

Untitled

a guest
Oct 19th, 2017
91
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
AutoIt 11.94 KB | None | 0 0
raw download clone embed print report
  1. ; *** Start added by AutoIt3Wrapper ***
  2. #include <GUIConstantsEx.au3>
  3. ; *** End added by AutoIt3Wrapper ***
  4. #RequireAdmin
  5. #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
  6. #AutoIt3Wrapper_Add_Constants=n
  7. #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
  8. ;*****************************************
  9. ;Final_Test_Tools_v3.au3 by Benjamin Böhnke
  10. ;Erstellt mit ISN AutoIt Studio v. 1.06
  11. ;*****************************************
  12. ; -- Created with ISN Form Studio 2 for ISN AutoIt Studio -- ;
  13. #include <MsgBoxConstants.au3>
  14. #include <WinAPIShellEx.au3>
  15. #include <File.au3>
  16. #include <FileConstants.au3>
  17. #include <WinAPIFiles.au3>
  18. #include <WinAPISys.au3>
  19. #include <StringConstants.au3>
  20. #include <Array.au3>
  21. #include <functions.au3>
  22.  
  23. _WinAPI_Wow64EnableWow64FsRedirection(True)
  24. DllCall("kernel32.dll", "boolean", "Wow64EnableWow64FsRedirection", "boolean", 0)
  25.  
  26. FileCreateShortcut(@WorkingDir & "WTP\asus-wtp\bin\UploadTool\UploadTool.exe", @WorkingDir & "WTP\finaltest\UploadTool.lnk", @WorkingDir & "WTP\asus-wtp\bin\UploadTool\")
  27. FileCreateShortcut(@WorkingDir & "WTP\asus-wtp\bin\AsusWTP.exe", @WorkingDir & "WTP\finaltest\DiagEG.lnk", @WorkingDir & "WTP\asus-wtp\bin\")
  28. FileCreateShortcut(@WorkingDir & "WTP\asus-wtp\advance_test\BatMonitor.exe", @WorkingDir & "WTP\finaltest\BatMonitor.lnk", @WorkingDir & "WTP\asus-wtp\bin\")
  29.  
  30. Opt('MustDeclareVars', 1) ; Variablen müssen vor der Verwendung deklariert werden
  31. Global $aBIOSInfo = _GetBIOSInfo()
  32. If Not @error Then
  33.     $getModelName = $aBIOSInfo[1]
  34.     $getBiosVersion = $aBIOSInfo[2]
  35.     $getSerial = $aBIOSInfo[0]
  36.     ;_ArrayDisplay($aBIOSInfo)
  37. Else
  38.     MsgBox(16,"Fehler","Es konnten nicht alle Bios-Informationen geladen werden.",0)
  39. EndIf
  40.  
  41. #include "fttgui.isf"
  42. GUISetState(@SW_SHOW, $ftt_gui)
  43.  
  44. _BiosCheck($getBiosVersion, $getModelName)
  45.  
  46. While 1
  47.     $nMsg = GUIGetMsg()
  48.     Switch $nMsg
  49.         Case $GUI_EVENT_CLOSE
  50.             Exit
  51.             ; MENU EXTRAS
  52.         Case $menu_extras_kbflash
  53.             _kbbacklightflash()
  54.         Case $menu_extras_deinstall
  55.             Run("control.exe appwiz.cpl,,0")
  56.         Case $menu_extras_audio
  57.             _audioManager()
  58.         Case $menu_extras_battest
  59.             ShellExecute(@WorkingDir & "WTP\finaltest\BatMonitor.lnk")
  60.         Case $menu_extras_batreport
  61.             $CMD = "powercfg -batteryreport"
  62.             RunWait('"' & @ComSpec & '" /c ' & $CMD, "", @SW_HIDE)
  63.             Sleep(3000)
  64.             $file = @WorkingDir & "battery-report.html"
  65.             $ifileexist = FileExists($file)
  66.             If $ifileexist Then
  67.                 $batreport = MsgBox(68, "Batterie-Report", "Der Batterie-Report wurde erstellt! Jetzt öffnen?", 0)
  68.                 Switch $batreport
  69.                     Case 6 ;YES
  70.                         ShellExecute($file)
  71.                     Case 7 ;NO
  72.                         ;Your code here...
  73.                 EndSwitch
  74.             Else
  75.                 MsgBox(16, "Nicht vorhanden", "Der Batterie-Report konnte nicht erstellt werden.", 0)
  76.             EndIf
  77.             Sleep(2000)
  78.             ; KALIBRATION T100HAN
  79.         Case $menu_calib_powercfg
  80.             ShellExecute(@WorkingDir & "WTP\finaltest\calibration\AsPowerCfg\ClickMe.bat.lnk")
  81.         Case $menu_calib_t100han_wlan
  82.             ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100HAN\WLAN\start.lnk")
  83.         Case $menu_calib_t100han_gauge
  84.             ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100HAN\Battery\wGauge_FW.bat.lnk")
  85.         Case $menu_calib_t100han_rotate
  86.             ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100HAN\Rotate Issue\Patch.bat.lnk")
  87.         Case $menu_calib_t100han_camfix
  88.             ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100HAN\CameraFIX\Patch.bat.lnk")
  89.         Case $menu_calib_t100han_docking
  90.             ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100HAN\Docking\Update.bat.lnk")
  91.         Case $menu_calib_t100han_touch1
  92.             ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100HAN\Touchpad\AutoTool_0409A\AutoToolGUI.bat.lnk")
  93.         Case $menu_calib_t100han_touch2
  94.             ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100HAN\Touchpad\AutoTool_1216A\AutoToolGUI.bat.lnk")
  95.         Case $menu_calib_t100han_socpackage
  96.             ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100HAN\SOCPackage\setup.bat.lnk")
  97.             ; KALIBRATION T100CHI
  98.         Case $menu_calib_t100chi_wlan
  99.             ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100CHI\WLAN\wlan_t100chi_WW.bat.lnk")
  100.         Case $menu_calib_t100chi_autosid
  101.             ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100CHI\AutoSID\ClickMe.bat.lnk")
  102.         Case $menu_calib_t100chi_gauge
  103.             ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100CHI\Battery\wGauge_FW.bat.lnk")
  104.         Case $menu_calib_t100chi_winpe
  105.             ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100CHI\WinPeFW\ClickMe.bat.lnk")
  106.         Case $menu_calib_t100ta_touch
  107.             ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100TA\Touch Panel\Setup_ASUS-T100TA_0925.bat.lnk")
  108.         Case $menu_calib_t100ta_wlan
  109.             ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100TA\WLAN\wlan.bat.lnk")
  110.         Case $menu_calib_t100ta_gauge
  111.             ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100TA\Battery\ClickMe.bat.lnk")
  112.             ; KALIBRATION T100TAF
  113.         Case $menu_calib_t100taf_gauge
  114.             ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100TAF\Battery\ClickMe.bat.lnk")
  115.         Case $menu_calib_t100taf_docking
  116.             ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100TAF\Docking EC FW\ClickMe.bat.lnk")
  117.         Case $menu_calib_t100taf_stathub
  118.             ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100TAF\STAT HUB\ClickMe.bat.lnk")
  119.         Case $menu_calib_t100taf_touch
  120.             ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100TAF\Touch Panel\AutoToolGUI.bat.lnk")
  121.         Case $menu_calib_t100taf_wlan
  122.             ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100TAF\WLAN\T100TAF_NVRAM_V1.4.6_WW.bat.lnk")
  123.             ; KALIBRATION T100TAM
  124.         Case $menu_calib_t100tam_gauge
  125.             ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100TAM\Battery\start.bat.lnk")
  126.         Case $menu_calib_t100tam_touch
  127.             ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100TAM\Touch Panel\AutoToolGUI.bat.lnk")
  128.         Case $menu_calib_t100tam_wlan
  129.             ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100TAM\WLAN\wlan.bat.lnk")
  130.             ; KALIBRATION T100TAM
  131.         Case $menu_calib_t100ha_cc
  132.             ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T101HA\WriteCountrycode\T101HA_AW-CM251NF_V01_WW.bat.lnk")
  133.         Case $menu_calib_t100ha_docking
  134.             ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T101HA\Docking\start.bat.lnk")
  135.         Case $menu_calib_t100ha_gauge
  136.             If @OSArch = "X86" Then
  137.                 ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T101HA\Battery\wGauge_FW.bat.lnk")
  138.             ElseIf @OSArch = "X64" Then
  139.                 ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T101HA\Battery\wGauge_FW_x64.bat.lnk")
  140.             Else
  141.                 ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T101HA\Battery\wGauge_FW_x64.bat.lnk")
  142.             EndIf
  143.         Case $menu_calib_t100ha_gs
  144.             ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T101HA\G-SENSOR_FW\start.bat.lnk")
  145.         Case $menu_calib_t100ha_touch
  146.             ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T101HA\TOUCH_FW\AutoToolGUI.bat.lnk")
  147.             ; BUTTONS
  148.         Case $shutdown
  149.             Shutdown(5)
  150.         Case $restart
  151.             Shutdown(6)
  152.         Case $shutrestartbreak
  153.             ShellExecute(@WorkingDir & "WTP\finaltest\shutbrake.bat.lnk")
  154.             ; MODEL
  155.         Case $menu_model_kb
  156.             _findkeydef()
  157.             ; BIOS
  158.         Case $menu_bios_check
  159.             _BiosCheck($getBiosVersion, $getModelName)
  160.         Case $menu_bios_flash
  161.             ShellExecute(@WorkingDir & "WTP\finaltest\winflash\start.bat.lnk")
  162.         Case $menu_bios_cheat
  163.             _BiosCheat()
  164.         Case $menu_bios_fix
  165.             _fixbios()
  166.             ; START TOOLS
  167.         Case $ftt_start
  168.             $start = MsgBox(52, "Startvorbereitung", "Soll der Final-Test gestartet werden?", 0)
  169.             Switch $start
  170.                 Case 6 ;YES
  171.                     ShellExecute(@WorkingDir & "WTP\finaltest\DiagEG.lnk")
  172.                     ShellExecute(@WorkingDir & "WTP\WindowsActive\WindowsActive.exe")
  173.                     ShellExecute(@WorkingDir & "WTP\finaltest\nbsettings.bat.lnk")
  174.                     If ProcessExists("sysprep.exe") Then
  175.                         _dragsysprepwindow()
  176.                     EndIf
  177.                 Case 7 ;NO
  178.                     ;Your code here...
  179.             EndSwitch
  180.         Case $2nd_injection
  181.             ShellExecute(@WorkingDir & "WTP\WindowsActive\WindowsActive.exe")
  182.             _2ndinjection()
  183.         Case $upload_tool
  184.             ShellExecute(@WorkingDir & "WTP\finaltest\UploadTool.lnk")
  185.         Case $asus_wtp
  186.             ShellExecute(@WorkingDir & "WTP\finaltest\DiagEG.lnk")
  187.         Case $windows_active
  188.             ShellExecute(@WorkingDir & "WTP\WindowsActive\WindowsActive.exe")
  189.         Case $sysprep
  190.             $CMD = "Sysprep.exe /shutdown"
  191.             RunWait('"' & @ComSpec & '" /c ' & $CMD, @WindowsDir & "\System32\sysprep", @SW_HIDE)
  192.         Case $service_killer
  193.             ShellExecute(@WorkingDir & "WTP\finaltest\servicekiller.bat.lnk")
  194.             ; SN / KEY
  195.         Case $activate_win
  196.             MsgBox(48, "Windows-Aktivierung", "Es wird versucht, Windows zu aktivieren. Einen Moment bitte.", 0)
  197.             $CMD = "slmgr.vbs /ato"
  198.             RunWait('"' & @ComSpec & '" /c ' & $CMD, "", @SW_HIDE)
  199.         Case $key_reset
  200.             If @OSArch = "X86" Then
  201.                 $keyreset = MsgBox(68, "Key-Reset " & @OSArch, "Der Key wird auf " & @OSArch & "-Ebene zurück gesetzt! Fortfahren?", 0)
  202.                 Switch $keyreset
  203.                     Case 6 ;YES
  204.                         ShellExecute(@WorkingDir & "WTP\finaltest\keyReset.bat.lnk")
  205.                     Case 7 ;NO
  206.                         ;Your code here...
  207.                 EndSwitch
  208.             ElseIf @OSArch = "X64" Then
  209.                 $keyreset = MsgBox(68, "Key-Reset " & @OSArch, "Der Key wird auf " & @OSArch & "-Ebene zurück gesetzt! Fortfahren?", 0)
  210.                 Switch $keyreset
  211.                     Case 6 ;YES
  212.                         ShellExecute(@WorkingDir & "WTP\finaltest\keyReset64bit.bat.lnk")
  213.                     Case 7 ;NO
  214.                         ;Your code here...
  215.                 EndSwitch
  216.             Else
  217.                 $keyreset = MsgBox(68, "Key-Reset " & @OSArch, "Der Key wird auf " & @OSArch & "-Ebene zurück gesetzt! Fortfahren?", 0)
  218.                 Switch $keyreset
  219.                     Case 6 ;YES
  220.                         ShellExecute(@WorkingDir & "WTP\finaltest\keyReset64bit.bat.lnk")
  221.                     Case 7 ;NO
  222.                         ;Your code here...
  223.                 EndSwitch
  224.             EndIf
  225.         Case $sn_burn
  226.             $snburn = MsgBox(36, "Seriennummer einbrennen", "Soll die Seriennummer eingebrannt werden?", 0)
  227.             Switch $snburn
  228.                 Case 6 ;YES
  229.                     ShellExecute(@WorkingDir & "WTP\finaltest\snburn.bat.lnk")
  230.                 Case 7 ;NO
  231.                     ;Your code here...
  232.             EndSwitch
  233.             ; CONNECTION
  234.         Case $lan_on
  235.             ShellExecute(@WorkingDir & "WTP\finaltest\lanON.bat.lnk")
  236.         Case $lan_off
  237.             ShellExecute(@WorkingDir & "WTP\finaltest\lanOFF.bat.lnk")
  238.         Case $wlan_connect
  239.             ShellExecute(@WorkingDir & "WTP\finaltest\wlanconnect.bat.lnk")
  240.         Case $ipconfig
  241.             $CMD = "ipconfig & pause"
  242.             RunWait('"' & @ComSpec & '" /k ' & $CMD, "", @SW_SHOW)
  243.             ; 2ND TOOLS
  244.         Case $autotimer
  245.             ShellExecute(@WorkingDir & "WTP\finaltest\time.bat.lnk")
  246.             Sleep(2000)
  247.             ShellExecute(@WorkingDir & "WTP\finaltest\time.bat.lnk")
  248.         Case $findwtp
  249.             ShellExecute(@WorkingDir & "WTP\finaltest\findwtp\FindWTPresult.exe")
  250.         Case $tabletmode
  251.             ShellExecute(@WorkingDir & "WTP\finaltest\tabletmode.bat.lnk")
  252.         Case $atk_install
  253.             $sinstall = MsgBox(36, "ATK-Intallation", "Soll das ATK nachinstalliert werden?", 0)
  254.             Switch $sinstall
  255.                 Case 6 ;YES
  256.                     ShellExecute(@WorkingDir & "WTP\finaltest\atk\Setup.exe")
  257.                 Case 7 ;NO
  258.                     ;Your code here...
  259.             EndSwitch
  260.         Case $install_tp
  261.             _tpInstall()
  262.         Case $usbc_copy
  263.             $prepareusbc = MsgBox(49, "USB-Gerät", "Soll das USB-C Gerät für den Finaltest vorbereitet werden?" & @CRLF & "" & @CRLF & "Ablauf:" & @CRLF & "1. Virtuelles Laufwerk wird erstellt" & @CRLF & "2. Finaltest-Tools werden in das Laufwerk kopiert" & @CRLF & "3. Finaltest-Tools wird gestartet", 0)
  264.             Switch $prepareusbc
  265.                 Case 1 ;OK
  266.                     FileDelete("C:\windows\wtpusbc.vhd")
  267.                     ShellExecuteWait(@WorkingDir & "WTP\finaltest\createusbdrive.bat.lnk")
  268.                     $startwtpc = MsgBox(49, "WICHTIG", "Starte nun die FinalTestToolsv3.exe im WTP-C Drive." & @CRLF & "" & @CRLF & "Sollte es sich hierbei um einen User-Account handeln, bitte mittels 'USB-C Delete' das Virtuelle Laufwerk wieder löschen.", 0)
  269.                     Switch $startwtpc
  270.                         Case 1 ;OK
  271.                             $CMD = "taskkill /F /IM FinalTestToolsv3.exe /T"
  272.                             RunWait('"' & @ComSpec & '" /k ' & $CMD, "", @SW_HIDE)
  273.                             ShellExecute("W:\FinalTestToolsv3.exe")
  274.                         Case 2 ;CANCEL
  275.                             ;Your code here...
  276.                     EndSwitch
  277.                 Case 2
  278.             EndSwitch
  279.         Case $usbc_delete
  280.             ShellExecute(@WorkingDir & "WTP\finaltest\createusbdrive_delete.bat.lnk")
  281.     EndSwitch
  282. WEnd
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!