Guest User

Untitled

a guest
Oct 18th, 2017
326
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 11.59 KB | None | 0 0
  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. _SystemInfo()
  31.  
  32. #include "fttgui.isf"
  33. GUISetState(@SW_SHOW, $ftt_gui)
  34.  
  35. _BiosCheck($getBiosVersion, $getModelName)
  36.  
  37. While 1
  38. $nMsg = GUIGetMsg()
  39. Switch $nMsg
  40. Case $GUI_EVENT_CLOSE
  41. Exit
  42. ; MENU EXTRAS
  43. Case $menu_extras_kbflash
  44. _kbbacklightflash()
  45. Case $menu_extras_deinstall
  46. Run("control.exe appwiz.cpl,,0")
  47. Case $menu_extras_audio
  48. _audioManager()
  49. Case $menu_extras_battest
  50. ShellExecute(@WorkingDir & "WTP\finaltest\BatMonitor.lnk")
  51. Case $menu_extras_batreport
  52. $CMD = "powercfg -batteryreport"
  53. RunWait('"' & @ComSpec & '" /c ' & $CMD, "", @SW_HIDE)
  54. Sleep(3000)
  55. $file = @WorkingDir & "battery-report.html"
  56. $ifileexist = FileExists($file)
  57. If $ifileexist Then
  58. $batreport = MsgBox(68, "Batterie-Report", "Der Batterie-Report wurde erstellt! Jetzt öffnen?", 0)
  59. Switch $batreport
  60. Case 6 ;YES
  61. ShellExecute($file)
  62. Case 7 ;NO
  63. ;Your code here...
  64. EndSwitch
  65. Else
  66. MsgBox(16, "Nicht vorhanden", "Der Batterie-Report konnte nicht erstellt werden.", 0)
  67. EndIf
  68. Sleep(2000)
  69. ; KALIBRATION T100HAN
  70. Case $menu_calib_powercfg
  71. ShellExecute(@WorkingDir & "WTP\finaltest\calibration\AsPowerCfg\ClickMe.bat.lnk")
  72. Case $menu_calib_t100han_wlan
  73. ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100HAN\WLAN\start.lnk")
  74. Case $menu_calib_t100han_gauge
  75. ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100HAN\Battery\wGauge_FW.bat.lnk")
  76. Case $menu_calib_t100han_rotate
  77. ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100HAN\Rotate Issue\Patch.bat.lnk")
  78. Case $menu_calib_t100han_camfix
  79. ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100HAN\CameraFIX\Patch.bat.lnk")
  80. Case $menu_calib_t100han_docking
  81. ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100HAN\Docking\Update.bat.lnk")
  82. Case $menu_calib_t100han_touch1
  83. ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100HAN\Touchpad\AutoTool_0409A\AutoToolGUI.bat.lnk")
  84. Case $menu_calib_t100han_touch2
  85. ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100HAN\Touchpad\AutoTool_1216A\AutoToolGUI.bat.lnk")
  86. Case $menu_calib_t100han_socpackage
  87. ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100HAN\SOCPackage\setup.bat.lnk")
  88. ; KALIBRATION T100CHI
  89. Case $menu_calib_t100chi_wlan
  90. ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100CHI\WLAN\wlan_t100chi_WW.bat.lnk")
  91. Case $menu_calib_t100chi_autosid
  92. ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100CHI\AutoSID\ClickMe.bat.lnk")
  93. Case $menu_calib_t100chi_gauge
  94. ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100CHI\Battery\wGauge_FW.bat.lnk")
  95. Case $menu_calib_t100chi_winpe
  96. ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100CHI\WinPeFW\ClickMe.bat.lnk")
  97. Case $menu_calib_t100ta_touch
  98. ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100TA\Touch Panel\Setup_ASUS-T100TA_0925.bat.lnk")
  99. Case $menu_calib_t100ta_wlan
  100. ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100TA\WLAN\wlan.bat.lnk")
  101. Case $menu_calib_t100ta_gauge
  102. ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100TA\Battery\ClickMe.bat.lnk")
  103. ; KALIBRATION T100TAF
  104. Case $menu_calib_t100taf_gauge
  105. ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100TAF\Battery\ClickMe.bat.lnk")
  106. Case $menu_calib_t100taf_docking
  107. ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100TAF\Docking EC FW\ClickMe.bat.lnk")
  108. Case $menu_calib_t100taf_stathub
  109. ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100TAF\STAT HUB\ClickMe.bat.lnk")
  110. Case $menu_calib_t100taf_touch
  111. ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100TAF\Touch Panel\AutoToolGUI.bat.lnk")
  112. Case $menu_calib_t100taf_wlan
  113. ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100TAF\WLAN\T100TAF_NVRAM_V1.4.6_WW.bat.lnk")
  114. ; KALIBRATION T100TAM
  115. Case $menu_calib_t100tam_gauge
  116. ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100TAM\Battery\start.bat.lnk")
  117. Case $menu_calib_t100tam_touch
  118. ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100TAM\Touch Panel\AutoToolGUI.bat.lnk")
  119. Case $menu_calib_t100tam_wlan
  120. ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T100TAM\WLAN\wlan.bat.lnk")
  121. ; KALIBRATION T100TAM
  122. Case $menu_calib_t100ha_cc
  123. ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T101HA\WriteCountrycode\T101HA_AW-CM251NF_V01_WW.bat.lnk")
  124. Case $menu_calib_t100ha_docking
  125. ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T101HA\Docking\start.bat.lnk")
  126. Case $menu_calib_t100ha_gauge
  127. If @OSArch = "X86" Then
  128. ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T101HA\Battery\wGauge_FW.bat.lnk")
  129. ElseIf @OSArch = "X64" Then
  130. ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T101HA\Battery\wGauge_FW_x64.bat.lnk")
  131. Else
  132. ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T101HA\Battery\wGauge_FW_x64.bat.lnk")
  133. EndIf
  134. Case $menu_calib_t100ha_gs
  135. ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T101HA\G-SENSOR_FW\start.bat.lnk")
  136. Case $menu_calib_t100ha_touch
  137. ShellExecute(@WorkingDir & "WTP\finaltest\calibration\T101HA\TOUCH_FW\AutoToolGUI.bat.lnk")
  138. ; BUTTONS
  139. Case $shutdown
  140. Shutdown(5)
  141. Case $restart
  142. Shutdown(6)
  143. Case $shutrestartbreak
  144. ShellExecute(@WorkingDir & "WTP\finaltest\shutbrake.bat.lnk")
  145. ; MODEL
  146. Case $menu_model_kb
  147. _findkeydef()
  148. ; BIOS
  149. Case $menu_bios_check
  150. _BiosCheck($getBiosVersion, $getModelName)
  151. Case $menu_bios_flash
  152. ShellExecute(@WorkingDir & "WTP\finaltest\winflash\start.bat.lnk")
  153. Case $menu_bios_cheat
  154. _BiosCheat()
  155. Case $menu_bios_fix
  156. _fixbios()
  157. ; START TOOLS
  158. Case $ftt_start
  159. $start = MsgBox(52, "Startvorbereitung", "Soll der Final-Test gestartet werden?", 0)
  160. Switch $start
  161. Case 6 ;YES
  162. ShellExecute(@WorkingDir & "WTP\finaltest\DiagEG.lnk")
  163. ShellExecute(@WorkingDir & "WTP\WindowsActive\WindowsActive.exe")
  164. ShellExecute(@WorkingDir & "WTP\finaltest\nbsettings.bat.lnk")
  165. If ProcessExists("sysprep.exe") Then
  166. _dragsysprepwindow()
  167. EndIf
  168. Case 7 ;NO
  169. ;Your code here...
  170. EndSwitch
  171. Case $2nd_injection
  172. ShellExecute(@WorkingDir & "WTP\WindowsActive\WindowsActive.exe")
  173. _2ndinjection()
  174. Case $upload_tool
  175. ShellExecute(@WorkingDir & "WTP\finaltest\UploadTool.lnk")
  176. Case $asus_wtp
  177. ShellExecute(@WorkingDir & "WTP\finaltest\DiagEG.lnk")
  178. Case $windows_active
  179. ShellExecute(@WorkingDir & "WTP\WindowsActive\WindowsActive.exe")
  180. Case $sysprep
  181. $CMD = "Sysprep.exe /shutdown"
  182. RunWait('"' & @ComSpec & '" /c ' & $CMD, @WindowsDir & "\System32\sysprep", @SW_HIDE)
  183. Case $service_killer
  184. ShellExecute(@WorkingDir & "WTP\finaltest\servicekiller.bat.lnk")
  185. ; SN / KEY
  186. Case $activate_win
  187. MsgBox(48, "Windows-Aktivierung", "Es wird versucht, Windows zu aktivieren. Einen Moment bitte.", 0)
  188. $CMD = "slmgr.vbs /ato"
  189. RunWait('"' & @ComSpec & '" /c ' & $CMD, "", @SW_HIDE)
  190. Case $key_reset
  191. If @OSArch = "X86" Then
  192. $keyreset = MsgBox(68, "Key-Reset " & @OSArch, "Der Key wird auf " & @OSArch & "-Ebene zurück gesetzt! Fortfahren?", 0)
  193. Switch $keyreset
  194. Case 6 ;YES
  195. ShellExecute(@WorkingDir & "WTP\finaltest\keyReset.bat.lnk")
  196. Case 7 ;NO
  197. ;Your code here...
  198. EndSwitch
  199. ElseIf @OSArch = "X64" Then
  200. $keyreset = MsgBox(68, "Key-Reset " & @OSArch, "Der Key wird auf " & @OSArch & "-Ebene zurück gesetzt! Fortfahren?", 0)
  201. Switch $keyreset
  202. Case 6 ;YES
  203. ShellExecute(@WorkingDir & "WTP\finaltest\keyReset64bit.bat.lnk")
  204. Case 7 ;NO
  205. ;Your code here...
  206. EndSwitch
  207. Else
  208. $keyreset = MsgBox(68, "Key-Reset " & @OSArch, "Der Key wird auf " & @OSArch & "-Ebene zurück gesetzt! Fortfahren?", 0)
  209. Switch $keyreset
  210. Case 6 ;YES
  211. ShellExecute(@WorkingDir & "WTP\finaltest\keyReset64bit.bat.lnk")
  212. Case 7 ;NO
  213. ;Your code here...
  214. EndSwitch
  215. EndIf
  216. Case $sn_burn
  217. $snburn = MsgBox(36, "Seriennummer einbrennen", "Soll die Seriennummer eingebrannt werden?", 0)
  218. Switch $snburn
  219. Case 6 ;YES
  220. ShellExecute(@WorkingDir & "WTP\finaltest\snburn.bat.lnk")
  221. Case 7 ;NO
  222. ;Your code here...
  223. EndSwitch
  224. ; CONNECTION
  225. Case $lan_on
  226. ShellExecute(@WorkingDir & "WTP\finaltest\lanON.bat.lnk")
  227. Case $lan_off
  228. ShellExecute(@WorkingDir & "WTP\finaltest\lanOFF.bat.lnk")
  229. Case $wlan_connect
  230. ShellExecute(@WorkingDir & "WTP\finaltest\wlanconnect.bat.lnk")
  231. Case $ipconfig
  232. $CMD = "ipconfig & pause"
  233. RunWait('"' & @ComSpec & '" /k ' & $CMD, "", @SW_SHOW)
  234. ; 2ND TOOLS
  235. Case $autotimer
  236. ShellExecute(@WorkingDir & "WTP\finaltest\time.bat.lnk")
  237. Sleep(2000)
  238. ShellExecute(@WorkingDir & "WTP\finaltest\time.bat.lnk")
  239. Case $findwtp
  240. ShellExecute(@WorkingDir & "WTP\finaltest\findwtp\FindWTPresult.exe")
  241. Case $tabletmode
  242. ShellExecute(@WorkingDir & "WTP\finaltest\tabletmode.bat.lnk")
  243. Case $atk_install
  244. $sinstall = MsgBox(36, "ATK-Intallation", "Soll das ATK nachinstalliert werden?", 0)
  245. Switch $sinstall
  246. Case 6 ;YES
  247. ShellExecute(@WorkingDir & "WTP\finaltest\atk\Setup.exe")
  248. Case 7 ;NO
  249. ;Your code here...
  250. EndSwitch
  251. Case $install_tp
  252. _tpInstall()
  253. Case $usbc_copy
  254. $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)
  255. Switch $prepareusbc
  256. Case 1 ;OK
  257. FileDelete("C:\windows\wtpusbc.vhd")
  258. ShellExecuteWait(@WorkingDir & "WTP\finaltest\createusbdrive.bat.lnk")
  259. $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)
  260. Switch $startwtpc
  261. Case 1 ;OK
  262. $CMD = "taskkill /F /IM FinalTestToolsv3.exe /T"
  263. RunWait('"' & @ComSpec & '" /k ' & $CMD, "", @SW_HIDE)
  264. ShellExecute("W:\FinalTestToolsv3.exe")
  265. Case 2 ;CANCEL
  266. ;Your code here...
  267. EndSwitch
  268. Case 2
  269. EndSwitch
  270. Case $usbc_delete
  271. ShellExecute(@WorkingDir & "WTP\finaltest\createusbdrive_delete.bat.lnk")
  272. EndSwitch
  273. WEnd
Advertisement
Add Comment
Please, Sign In to add comment