#NoTrayIcon
$ J& c# _6 ]. W3 T+ I电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计#include <GUIConstants.au3>
. J5 G# X% e0 o# z, P9 e( _redapple2008.5d6d.comAutoItSetOption ( "ExpandEnvStrings", 1 )
电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计$ {% S6 r9 N# P" l! H
$extt = IniRead("win.ini", "sysprep", "ext", "")
, A% o6 }/ |0 K
if $extt=1 Then
% x4 [% F5 {8 v
GUICreate("
www.mscode.cc", @DesktopWidth, @DesktopHeight, "", "", $WS_POPUP)
2 v% o/ t& m. B# u$ L, ?0 F! y电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计|有你所需，有你所想。来吧，我的朋友们！WinSetOnTop("
www.mscode.cc", "", 1)
电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计* \" `; y. j4 c1 \$ X7 q D9 K g
Dim $st, $co[22], $Box[22], $re, $reb, $rec, $t, $fs, $bu[4], $oobe, $text[20], $gin, $SID, $bm, $msg, $ACPI, $exe, $ckb[100], $ckc[100], $av[48][18], $bzy, $bzx, $exn, $st2, $font, $regedit, $exes, $extes
redapple2008.5d6d.com$ a8 h1 P, I% A, a* s/ y% d
$h2 = @DesktopHeight / 600
' c5 `4 B' z# j: J& p1 _' h* O
$w2 = @DesktopWidth / 800
电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计% k! i8 c) |# d c! ?" f+ C0 z
$font = "微黑字体"
红苹果工作室/ i& j( e+ Q% B2 H. ]3 H
$Waitt = IniRead("win.ini", "sysprep", "Extimeout", "")
: ]4 h6 u" T7 ]0 I- H
$ext = IniReadSection("win.ini", 'extsoft')
: A& Y) `, @" u( ^4 b8 g红苹果工作室$bzx = @DesktopWidth / 2 - 150
7 N4 e4 V5 g0 H4 g) W电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计$bzy = 350
6 n( m# C. q1 F2 t/ [2 M电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计FileInstall("SetDevicePath.exe", "%TEMP%\SetDevicePath.exe", 1)
7 G# f$ E0 v% m: W* _' v' oredapple2008.5d6d.com$driverpath = IniRead("win.ini", 'sysprep', 'path', '')
A z' w1 S0 C1 {0 `& fredapple2008.5d6d.com$logo = IniRead("win.ini", 'sysprep', 'logo', '')
- D" @& O# J- _2 I2 y
$ziti = IniRead("win.ini", 'sysprep', 'ziti', '')
2 Q1 k' J$ [8 [2 b) R2 z
$pic = GUICtrlCreatePic($logo, 0, 0, @DesktopWidth, @DesktopHeight)
1 F; a7 o' \8 ^GUICtrlSetState(-1, $GUI_DISABLE)
/ g! j" H2 S% C- B+ J F. ?# U9 U4 \电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计|有你所需，有你所想。来吧，我的朋友们！GUICtrlCreateLabel("红苹果工作室专用驱动选择工具",@DesktopWidth/2-250,@DesktopHeight/2-350,@DesktopHeight,60)
/ h7 _4 t1 y. H0 J电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计|有你所需，有你所想。来吧，我的朋友们！GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计6 b# A9 B. Y; g+ b2 g' e- K0 m
GUICtrlSetFont(-1, 30, 400, 0, $font)
( s! V6 K4 c: Z$ Qredapple2008.5d6d.com$bu[1] = GUICtrlCreateButton("确定" & "(ESC)", @DesktopWidth - 100, @DesktopHeight - 64 * $h2, 90, 30)
redapple2008.5d6d.com' I. \3 f7 Z D* ` M/ q% k: E
$bu[2] = GUICtrlCreateProgress(0, @DesktopHeight - 20, @DesktopWidth, 20)
. r$ i$ m9 g" g) n; @" h( Q* D红苹果工作室GUICtrlSetFont(-1, 12, 400, 2, $font)
电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计, I- D+ [. X" e5 v: `& j$ l
$jg = (@DesktopHeight - 200 * $h2) / $ext[0][0]
& F* g+ v. o& j5 b* K6 E红苹果工作室If $jg >= 45 Then $jg = 45
红苹果工作室$ w) J( [* ?9 R
For $i = 1 To $ext[0][0]
8 W3 `# j; ?7 S' ^电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计 If Mod($i, 2) = 1 Then
2 x: R4 V$ p" @ `' r! ~7 |. M; ?电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计|有你所需，有你所想。来吧，我的朋友们！ $jgg = $bzy - ($jg - 2) * Int($i / 2)
( `% ^5 X4 H& R1 q: E
Else
redapple2008.5d6d.com% u5 i, g h; t2 c( R5 H
$jgg = $bzy + ($jg - 2) * Int($i / 2)
1 z( f! |1 o- k u7 z EndIf
电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计: e/ D5 V0 D: a V
$ckb[$i] = GUICtrlCreateCheckbox('', $bzx, $jgg, 13, 13)
红苹果工作室! w3 I J4 T2 R% `/ A& G
$rt = 0
t0 `! b" X+ j. C电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计 If StringInStr($ext[$i][1], ',') Then $rt = StringRight($ext[$i][1], 1)
redapple2008.5d6d.com( W( @$ |' }- W! j5 R. {7 C
If $rt = 1 Then
电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计, Z! J+ F1 v* J! L. r' N9 S- e
GUICtrlSetState($ckb[$i], $GUI_CHECKED)
电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计|有你所需，有你所想。来吧，我的朋友们！7 ]0 q) A1 E3 ^
Else
" O' g. F; i" N1 Q电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计 GUICtrlSetState($ckb[$i], $GUI_UNCHECKED)
+ D# l3 A, q/ I) m7 F, A9 Q电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计 EndIf
9 `: \( a& W3 Z w+ ^ n电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计 $ckc[$i] = GUICtrlCreateLabel($ext[$i][0], $bzx + 20, $jgg-2, 450, 20)
电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计- q# T: z/ W, d0 _4 a8 D8 W+ U
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计0 c( c# \4 E+ i; ^
GUICtrlSetFont(-1, 13, 400, 0, $font)
电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计+ d: _: D; X2 f
GUICtrlSetColor($ckc[$i], $ziti)
redapple2008.5d6d.com6 \# Y" H: F% A! {
Next
% b$ ~$ n% R; O& K9 @* m& I+ x* J
$gin = TimerInit()
电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计" O+ G9 ?; ?/ g8 F% S K) e
GUISetState(@SW_SHOW)
电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计; l* _) X/ m( {* w
While 1
; @& Q- G; Y7 G; p
$msg = GUIGetMsg()
" `* \, S8 I4 n9 B5 X3 ^电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计 If $msg <> "" And $msg <> -11 Then $st = 1
电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计( E" x& e% T) G! K: j( s. ?1 K. C
If $st <> 1 Then
' P7 e: o4 G+ j电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计 $dif = TimerDiff($gin)
电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计; j+ t5 q1 k, X- Q9 W
$s = $dif / ($Waitt * 10)
电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计, `1 x# s+ M8 I1 F" g y
GUICtrlSetData($bu[2], $s)
3 @1 Z( g- w7 Hredapple2008.5d6d.com If $dif >= $Waitt * 1000 Then ExitLoop
; }; D; `: ~. v6 k3 n EndIf
2 q( o3 Q2 A2 X电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计 If $msg = $GUI_EVENT_CLOSE Then quit()
红苹果工作室3 C" H) ]' ^ S) e) L
If $msg = $bu[1] Then ExitLoop
电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计8 w0 ~: Z4 N! ?. \+ f( Y% t
WEnd
redapple2008.5d6d.com+ O0 T8 q# A! J1 K+ m. v
For $i = 1 To $ext[0][0]
电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计. U+ n7 f% \3 X* e# h
If GUICtrlRead($ckb[$i]) = 1 Then
( @7 Y* Y0 F3 V. h s1 j红苹果工作室 $exte = StringSplit($ext[$i][1], ',')
( P9 @8 { v: N1 M H+ i电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计 $exe = StringSplit($exte[1], ' ')
6 ]5 m' T7 L. I6 Mredapple2008.5d6d.com If FileExists('\' & $exe[1] & '.*') Then
, z8 y" _8 \6 S1 U; ~% {0 i+ w2 \电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计|有你所需，有你所想。来吧，我的朋友们！ If StringInStr($exe[1], ".bat") Or StringInStr($exe[1], ".cmd") Then
电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计/ a1 x0 S7 y6 B) {1 O& w
ToolTip(@CR & ' 正在解压驱动：' & $ext[$i][0] & " " & @CR, @DesktopWidth - 200, @DesktopHeight - 100)
3 k5 ]0 l( [0 F& n; O3 |, J电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计 RunWait('\' & $exte[1], "", @SW_HIDE)
! @3 l5 E1 Q6 n电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计|有你所需，有你所想。来吧，我的朋友们！ ToolTip('', @DesktopWidth - 0, @DesktopHeight - 0)
电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计|有你所需，有你所想。来吧，我的朋友们！& H0 h& `2 @6 K. e j
Else
; e6 V! j1 N4 r' i) J电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计|有你所需，有你所想。来吧，我的朋友们！ ToolTip(@CR & ' 正在解压驱动：' & $ext[$i][0] & " " & @CR, @DesktopWidth - 200, @DesktopHeight - 100)
* U7 [7 t8 X, x j _- s& y# @( G
Run('\' & $exte[1], "", @SW_HIDE)
1 _! Q( l$ [! X+ J7 J+ g红苹果工作室 ToolTip('', @DesktopWidth - 0, @DesktopHeight - 0)
" X! A. d# I2 A& ]! t( S' W8 W$ z电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计 EndIf
6 N; u- i( O l1 V电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计 EndIf
5 e: v7 |& G; F& X2 |9 F4 t4 j& N电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计|有你所需，有你所想。来吧，我的朋友们！ EndIf
; l, X1 { \; C" Q- ]! i- n2 N! t: I
Next
电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计|有你所需，有你所想。来吧，我的朋友们！7 |2 W) o: O$ V3 G4 M$ E/ @! v
EndIf
9 }7 `! L3 ?! q. O电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计|有你所需，有你所想。来吧，我的朋友们！quit ()
; e4 B" {3 c0 Y6 x$ Tredapple2008.5d6d.comFunc quit()
4 a$ G+ C& @, M2 y2 I+ `' s If FileExists("win.ini") Then FileDelete("win.ini")
电脑技术交流|系统维护交流|网络维护交流|平面设计|网页设计|3D设计1 Q- I! a4 C3 G/ \2 l6 N
Run(@ComSpec&' /c ping 127.0.0.1 -n 1&del /q "[email=]'&@ScriptFullPath&'"',@ScriptDir,@SW_HIDE[/email]) Exit
红苹果工作室; u- ~3 C. Z3 e0 v$ R# A
EndFunc
