#NoTrayIcon
#Region ;**** 参数创建于 ACNWrapper_GUI ****
#AutoIt3Wrapper_icon=Tool.ICO
#AutoIt3Wrapper_Res_Comment=专业的网吧维护工具
#AutoIt3Wrapper_Res_Description=网吧维护工具
#AutoIt3Wrapper_Res_Fileversion=5.0.0.0
#AutoIt3Wrapper_Res_LegalCopyright=小姚
#AutoIt3Wrapper_Res_Field=产品名称|网吧维护工具
#AutoIt3Wrapper_Res_Field=产品版本|5.0.0.0
#AutoIt3Wrapper_Res_Field=公司|小姚工作室
#AutoIt3Wrapper_Res_Field=内部名称|网吧维护工具
#AutoIt3Wrapper_Res_Field=源文件名|Tool.exe
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
#include <login.au3>
#include <ComboConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <ListViewConstants.au3>
#Include <ServiceControl.au3>
#Include <GuiListView.au3>
#include <IE.au3>

;自定义函数
#include <Autologin.au3>
#include <IPset.au3>
#include <oem.au3>
#include <laji.au3>
#include <xhck.au3>
#include <NetTcp.au3>
#include <CPGL.au3>
#include <zml.au3>
#include <DriverBack.au3>


Global $cygj[40],$Guide[20],$sygj[50],$qdgl[10],$jcgl[5],$kzmb[5],$gjsz[20]
Global $FIXED[24], $FIX[24]
Global $FIXED = DriveGetDrive("FIXED")

Opt("GUIResizeMode" , 802)

;控制面板创建开始
_IEErrorHandlerRegister()
$oIE = _IECreateEmbedded()
If FileExists(@WindowsDir & "\Temp\ControlPanel.{21EC2020-3AEA-1069-A2DD-08002B30309D}") = 0 Then
	DirCreate(@WindowsDir & "\Temp\ControlPanel.{21EC2020-3AEA-1069-A2DD-08002B30309D}")
EndIf
;控制面板创建结束

;软件内置
FileInstall("logo.bmp",@TempDir& "\logo.bmp",1)
FileInstall("1.ico",@TempDir & "\1.ico",1)
FileInstall("2.ico",@TempDir & "\2.ico",1)
FileInstall("3.ico",@TempDir & "\3.ico",1)
FileInstall("4.ico",@TempDir & "\4.ico",1)
FileInstall("5.ico",@TempDir & "\5.ico",1)
FileInstall("6.ico",@TempDir & "\6.ico",1)
FileInstall("7.ico",@TempDir & "\7.ico",1)
If Not FileExists(@WindowsDir & "\inf\Tools5.ini") Then
	FileInstall("Tools5.ini",@WindowsDir & "\inf\Tools5.ini")
EndIf

;软件内置结束

;读INI文本
$titleBT = IniRead(@WindowsDir & "\inf\tools5.ini","OemInfo","titleBT","")
$logoBT = IniRead(@WindowsDir & "\inf\Tools5.ini","OemInfo","logoBT","")
$PassSY = IniRead(@WindowsDir & "\inf\Tools5.ini","Password","pass","")
;读INI文本结束

$Window = GUICreate($titleBT, 500, 456, -1, -1)
GUISetBkColor(0xEFF0F2)
$gelixian = GUICtrlCreateLabel("", 438, 0, 1, 456, $SS_SUNKEN)
$OemInfo = GUICtrlCreateLabel($logoBT, 8, 16, 311, 24)
GUICtrlSetFont(-1, 12, 800, 0, "MS Sans Serif")

;常用工具开始
$cygj[0] = GUICtrlCreateGroup("常用工具", 4, 48, 425, 369)
$cygj[1] = GUICtrlCreateButton("CMD", 16, 64, 131, 25)
$cygj[2] = GUICtrlCreateButton("运行", 152, 64, 131, 25)
$cygj[3] = GUICtrlCreateButton("服务", 288, 64, 131, 25)
$cygj[4] = GUICtrlCreateButton("组策略", 16, 96, 131, 25)
$cygj[5] = GUICtrlCreateButton("注册表", 152, 96, 131, 25)
$cygj[6] = GUICtrlCreateButton("网络连接", 288, 96, 131, 25)
$cygj[7] = GUICtrlCreateButton("计算机管理", 16, 128, 131, 25)
$cygj[8] = GUICtrlCreateButton("刷新注册表", 152, 128, 131, 25)
$cygj[9] = GUICtrlCreateButton("刷新组策略", 288, 128, 131, 25)
$cygj[10] = GUICtrlCreateButton("设备管理器", 16, 160, 131, 25)
$cygj[11] = GUICtrlCreateButton("控制面板", 152, 160, 131, 25)
$cygj[12] = GUICtrlCreateButton("磁盘管理", 288, 160, 131, 25)
$cygj[13] = GUICtrlCreateButton("禁止网卡", 16, 192, 131, 25)
$cygj[14] = GUICtrlCreateButton("重启网卡", 152, 192, 131, 25)
$cygj[15] = GUICtrlCreateButton("DirectX(DX)", 288, 192, 131, 25)
$cygj[16] = GUICtrlCreateButton("Ipconfig", 16, 224, 131, 25)
$cygj[17] = GUICtrlCreateButton("显示隐藏设备", 152, 224, 131, 25)
$cygj[18] = GUICtrlCreateButton("重启Explorer", 288, 224, 131, 25)
$cygj[19] = GUICtrlCreateButton("计算机名", 16, 256, 131, 25)
$cygj[20] = GUICtrlCreateButton("获取公网IP", 152, 256, 131, 25)
$cygj[21] = GUICtrlCreateButton("自动登录", 288, 256, 131, 25)
$cygj[22] = GUICtrlCreateButton("显示隐藏文件", 16, 288, 131, 25)
$cygj[23] = GUICtrlCreateButton("更改IP地址", 152, 288, 131, 25)
$cygj[24] = GUICtrlCreateButton("文件夹选项", 288, 288, 131, 25)
$cygj[25] = GUICtrlCreateButton("隐藏安全选项", 16, 320, 131, 25)
$cygj[26] = GUICtrlCreateButton("语音测试", 152, 320, 131, 25)
$cygj[27] = GUICtrlCreateButton("显卡优化", 288, 320, 131, 25)
$cygj[28] = GUICtrlCreateButton("窗口置顶", 16, 352, 131, 25)
$cygj[29] = GUICtrlCreateButton("快速关机", 152, 352, 131, 25)
$cygj[30] = GUICtrlCreateButton("快速重启", 288, 352, 131, 25)
$cygj[31] = GUICtrlCreateCombo("", 16, 390, 129, 25)
GUICtrlSetData(-1,"192.168.0.1|192.168.1.1|192.168.0.254|192.168.1.254")
$cygj[32] = GUICtrlCreateButton("Ping", 152, 390, 59, 17)
$cygj[33] = GUICtrlCreateButton("Tracert", 216, 390, 67, 17)
$cygj[34] = GUICtrlCreateButton("打开磁盘分区 ↓", 288, 388, 131, 19)
$Dummy = GUICtrlCreateDummy()
$Context = GUICtrlCreateContextMenu($Dummy)
For $i = 1 To $FIXED[0]
	$FIX[$i] = GUICtrlCreateMenuItem("打开磁盘分区-" &StringUpper($FIXED[$i]), $Context)
Next

GUICtrlCreateGroup("", -99, -99, 1, 1)
;常用工具结束


;实用工具开始
$sygj[0] = GUICtrlCreateGroup("实用工具", 4, 48, 425, 153)
$sygj[1] = GUICtrlCreateButton("OEM设置", 16, 64, 131, 25)
$sygj[2] = GUICtrlCreateButton("清理垃圾", 288, 64, 131, 25)
$sygj[3] = GUICtrlCreateButton("输入法设置", 152, 64, 131, 25)
$sygj[4] = GUICtrlCreateButton("星号查看", 16, 96, 131, 25)
$sygj[5] = GUICtrlCreateButton("网络连接查看", 152, 96, 131, 25)
$sygj[6] = GUICtrlCreateButton("磁盘管理工具", 288, 96, 131, 25)
$sygj[7] = GUICtrlCreateButton("灰色按钮可见", 16, 128, 131, 25)
$sygj[8] = GUICtrlCreateButton("驱动备份", 152, 128, 131, 25)
$sygj[9] = GUICtrlCreateButton("卸载所有驱动", 288, 128, 131, 25)
$sygj[10] = GUICtrlCreateButton("获取系统序列号", 16, 160, 131, 25)
$sygj[11] = GUICtrlCreateButton("开启默认共享", 152, 160, 131, 25)
$sygj[12] = GUICtrlCreateButton("HD声卡调麦补丁", 288, 160, 131, 25)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$sygj[13] = GUICtrlCreateGroup("Radmin", 4, 208, 201, 153)
$sygj[14] = GUICtrlCreateLabel("IP：", 24, 232, 26, 17)
$sygj[15] = GUICtrlCreateInput("", 72, 228, 113, 21)
$sygj[16] = GUICtrlCreateLabel("端口：", 24, 264, 40, 17)
$sygj[17] = GUICtrlCreateInput("4899", 72, 260, 113, 21)
$sygj[18] = GUICtrlCreateLabel("动作：", 24, 296, 40, 17)
$sygj[19] = GUICtrlCreateCombo("", 72, 292, 113, 21)
GUICtrlSetData(-1,"控制|监视|传文件|TelNet","控制")
$sygj[20] = GUICtrlCreateButton("登录", 24, 328, 67, 19)
$sygj[21] = GUICtrlCreateButton("Radmin", 120, 328, 67, 19)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$sygj[22] = GUICtrlCreateGroup("WinBox", 228, 208, 201, 153)
$sygj[23] = GUICtrlCreateLabel("IP：", 248, 232, 26, 17)
$sygj[24] = GUICtrlCreateInput("", 296, 228, 113, 21)
$sygj[25] = GUICtrlCreateLabel("用户：", 248, 264, 40, 17)
$sygj[26] = GUICtrlCreateInput("admin", 296, 260, 113, 21)
$sygj[27] = GUICtrlCreateLabel("密码：", 248, 296, 40, 17)
$sygj[28] = GUICtrlCreateInput("", 296, 292, 113, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_PASSWORD))
$sygj[29] = GUICtrlCreateButton("登录", 248, 328, 67, 19)
$sygj[30] = GUICtrlCreateButton("WinBox", 344, 328, 67, 19)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$sygj[31] = GUICtrlCreateGroup("分辨率设置", 4, 368, 425, 49)
$sygj[32] = GUICtrlCreateLabel("宽", 16, 392, 16, 17)
$sygj[33] = GUICtrlCreateCombo("", 38, 388, 50, 25)
GUICtrlSetData(-1,"800|1024|1152|1280|1280|1280|1280|1360|1440","1024")
$sygj[34] = GUICtrlCreateLabel("高", 94, 392, 16, 17)
$sygj[35] = GUICtrlCreateCombo("", 112, 388, 50, 25)
GUICtrlSetData(-1,"600|768|864|720|768|960|1024|768|900","768")
$sygj[36] = GUICtrlCreateLabel("刷新率", 168, 392, 40, 17)
$sygj[37] = GUICtrlCreateCombo("", 208, 388, 50, 25)
GUICtrlSetData(-1,"60|70|75|85","75")
$sygj[38] = GUICtrlCreateLabel("颜色", 264, 392, 28, 17)
$sygj[39] = GUICtrlCreateCombo("32", 296, 388, 50, 25)
GUICtrlSetData(-1,"16|32","32")
$sygj[40] = GUICtrlCreateButton("更改", 352, 387, 75, 21)

For $s = 0 To 41
	GUICtrlSetState($sygj[$s],$GUI_HIDE)
Next
GUICtrlCreateGroup("", -99, -99, 1, 1)
;实用工具结束


;启动管理开始
$qdgl[0] = GUICtrlCreateGroup("删除启动项", 4, 48, 425, 265)
$qdgl[1] = GUICtrlCreateListView("", 8, 64, 414, 214)
_GUICtrlListView_SetExtendedListViewStyle(-1, BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSelect, $LVS_EX_SUBITEMIMAGES))
_GUICtrlListView_AddColumn(-1,"名称",120)
_GUICtrlListView_AddColumn(-1,"路径",180)
_GUICtrlListView_AddColumn(-1,"位置",110)
GUICtrlSetImage($qdgl[1], "shell32.dll", -3)
$qdgl[2] = GUICtrlCreateButton("删除该项", 184, 288, 115, 19)
$qdgl[3] = GUICtrlCreateButton("刷新列表", 304, 288, 115, 19)
GUICtrlCreateGroup("", -99, -99, 1, 1)

$qdgl[4] = GUICtrlCreateGroup("添加启动项", 4, 320, 425, 89)
$qdgl[5] = GUICtrlCreateCombo("", 16, 344, 401, 25)
GUICtrlSetData($qdgl[5],"HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run|HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run","HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run")
$qdgl[6] = GUICtrlCreateInput("启动名称", 16, 376, 81, 21)
$qdgl[7] = GUICtrlCreateInput("启动路径", 104, 376, 193, 21)
$qdgl[8] = GUICtrlCreateButton("浏览..", 304, 376, 43, 21)
$qdgl[9] = GUICtrlCreateButton("确认添加", 352, 376, 69, 21)
For $q = 0 To 9
	GUICtrlSetState($qdgl[$q],$GUI_HIDE)
Next
GUICtrlCreateGroup("", -99, -99, 1, 1)
;启动管理结束

;进程管理开始
$jcgl[0] = GUICtrlCreateGroup("进程管理", 4, 48, 425, 369)
$jcgl[1] = GUICtrlCreateListView("", 8, 64, 414, 310)
_GUICtrlListView_SetExtendedListViewStyle(-1, BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSelect, $LVS_EX_SUBITEMIMAGES))
_GUICtrlListView_AddColumn(-1,"进程名称",120)
_GUICtrlListView_AddColumn(-1,"PID值",100)
_GUICtrlListView_AddColumn(-1,"程序路径",190)
GUICtrlSetImage($jcgl[1], "shell32.dll", -3)
$jcgl[2] = GUICtrlCreateButton("刷新列表", 16, 384, 107, 19)
$jcgl[3] = GUICtrlCreateButton("结束进程", 136, 384, 107, 19)
$jcgl[4] = GUICtrlCreateButton("打开进程所在目录", 256, 384, 163, 19)
For $j = 0 To 4
	GUICtrlSetState($jcgl[$j],$GUI_HIDE)
Next
GUICtrlCreateGroup("", -99, -99, 1, 1)
;进程管理结束

;控制面板开始
$kzmb[1] = GUICtrlCreateGroup("控制面板", 4, 48, 425, 369)
$kzmb[2] = GUICtrlCreateObj("", 8, 64, 414, 345)
For $k = 1 To 2
	GUICtrlSetState($kzmb[$k],$GUI_HIDE)
Next
GUICtrlCreateGroup("", -99, -99, 1, 1)
;控制面板结束

;工具设置开始
$gjsz[0] = GUICtrlCreatePic(@TempDir & "\logo.bmp", 0, 56, 428, 204)
$gjsz[1] = GUICtrlCreateGroup("工具相关设置", 4, 272, 425, 145)
$gjsz[2] = GUICtrlCreateCheckbox("修改工具解锁密码", 16, 288, 113, 17)
$gjsz[3] = GUICtrlCreateLabel("旧：", 16, 312, 28, 17)
$gjsz[4] = GUICtrlCreateInput("", 56, 308, 145, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_PASSWORD))
GUICtrlSetState(-1,$GUI_DISABLE)
$gjsz[5] = GUICtrlCreateLabel("新：", 16, 344, 28, 17)
$gjsz[6] = GUICtrlCreateInput("", 56, 340, 145, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_PASSWORD))
GUICtrlSetState(-1,$GUI_DISABLE)
$gjsz[7] = GUICtrlCreateCheckbox("修改OEM文字信息", 216, 288, 121, 17)
$gjsz[8] = GUICtrlCreateLabel("标题：", 216, 312, 40, 17)
$gjsz[9] = GUICtrlCreateInput($titleBT, 264, 308, 145, 21)
GUICtrlSetState(-1,$GUI_DISABLE)
$gjsz[10] = GUICtrlCreateLabel("文字：", 216, 344, 40, 17)
$gjsz[11] = GUICtrlCreateInput($logoBT, 264, 340, 145, 21)
GUICtrlSetState(-1,$GUI_DISABLE)
$gjsz[12] = GUICtrlCreateButton("确定修改", 336, 376, 75, 25)
$gjsz[13] = GUICtrlCreateGroup("", 16, 368, 297, 41)
$gjsz[14] = GUICtrlCreateLabel("作者：小姚", 24, 384, 64, 17)
$gjsz[15] = GUICtrlCreateLabel("QQ：5595353", 96, 384, 74, 17)
$gjsz[16] = GUICtrlCreateLabel("Http://WwW.wfeng.CoM", 176, 384, 124, 17)
GUICtrlSetCursor (-1, 0)
For $g = 0 To 16
	GUICtrlSetState($gjsz[$g],$GUI_HIDE)
Next
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateGroup("", -99, -99, 1, 1)
;工具设置结束


;导航栏开始
$Guide[0] = GUICtrlCreateButton("<= 收缩导航栏", 328, 16, 99, 25)
$Guide[1] = GUICtrlCreateIcon(@TempDir & "\1.ico", -1, 452, 8, 32, 32)
GUICtrlSetCursor (-1, 0)
$Guide[2] = GUICtrlCreateLabel("常用工具", 446, 48, 50, 17)
GUICtrlSetCursor (-1, 0)
$Guide[3] = GUICtrlCreateIcon(@TempDir & "\2.ico", -1, 452, 72, 32, 32)
GUICtrlSetCursor (-1, 0)
$Guide[4] = GUICtrlCreateLabel("实用工具", 446, 112, 52, 17)
GUICtrlSetCursor (-1, 0)
$Guide[5] = GUICtrlCreateIcon(@TempDir & "\3.ico", -1, 452, 136, 32, 32)
GUICtrlSetCursor (-1, 0)
$Guide[6] = GUICtrlCreateLabel("启动管理", 446, 176, 52, 17)
GUICtrlSetCursor (-1, 0)
$Guide[7] = GUICtrlCreateIcon(@TempDir & "\4.ico", -1, 452, 200, 32, 32)
GUICtrlSetCursor (-1, 0)
$Guide[8] = GUICtrlCreateLabel("进程管理", 446, 240, 52, 17)
GUICtrlSetCursor (-1, 0)
$Guide[9] = GUICtrlCreateIcon(@TempDir & "\5.ico", -1, 452, 264, 32, 32)
GUICtrlSetCursor (-1, 0)
$Guide[10] = GUICtrlCreateLabel("控制面板", 446, 304, 52, 17)
GUICtrlSetCursor (-1, 0)
$Guide[11] = GUICtrlCreateIcon(@TempDir & "\6.ico", -1, 452, 328, 32, 32)
GUICtrlSetCursor (-1, 0)
$Guide[12] = GUICtrlCreateLabel("工具设置", 446, 368, 52, 17)
GUICtrlSetCursor (-1, 0)
$Guide[13] = GUICtrlCreateIcon(@TempDir & "\7.ico", -1, 452, 392, 32, 32)
GUICtrlSetCursor (-1, 0)
$Guide[14] = GUICtrlCreateLabel("退出程序", 446, 432, 52, 17)
GUICtrlSetCursor (-1, 0)
;导航栏结束

$TIShi = GUICtrlCreateLabel("", 16, 432, 232, 17)
$bj = "| 本机：["&@ComputerName&"]"&"  "&"["&@IPAddress1&"]"
$zi = StringLen($bj)
If $zi = 23 Then
	$benji = GUICtrlCreateLabel($bj, 270, 432, 156, 17)
ElseIf $zi = 24 Then
	$benji = GUICtrlCreateLabel($bj, 264, 432, 162, 17)
elseif $zi = 25 Then
	$benji = GUICtrlCreateLabel($bj, 258, 432, 168, 17)
ElseIf $zi = 26 Then
	$benji = GUICtrlCreateLabel($bj, 252, 432, 174, 17)
ElseIf $zi = 27 Then
	$benji = GUICtrlCreateLabel($bj, 246, 432, 180, 17)
ElseIf $zi = 28 Then
	$benji = GUICtrlCreateLabel($bj, 240, 432, 186, 17)
ElseIf $zi = 29 Then
	$benji = GUICtrlCreateLabel($bj, 234, 432, 192, 17)
ElseIf $zi = 30 Then
	$benji = GUICtrlCreateLabel($bj, 228, 432, 198, 17)
ElseIf $zi = 31 Then
	$benji = GUICtrlCreateLabel($bj, 222, 432, 204, 17)
ElseIf $zi = 32 Then
	$benji = GUICtrlCreateLabel($bj, 216, 432, 210, 17)
ElseIf $zi = 33 Then
	$benji = GUICtrlCreateLabel($bj, 210, 432, 216, 17)
ElseIf $zi = 34 Then
	$benji = GUICtrlCreateLabel($bj, 204, 432, 222, 17)
ElseIf $zi = 35 Then
	$benji = GUICtrlCreateLabel($bj, 198, 432, 228, 17)
ElseIf $zi = 36 Then
	$benji = GUICtrlCreateLabel($bj, 192, 432, 234, 17)
ElseIf $zi = 37 Then
	$benji = GUICtrlCreateLabel($bj, 186, 432, 240, 17)
ElseIf $zi = 38 Then
	$benji = GUICtrlCreateLabel($bj, 180, 432, 246, 17)
ElseIf $zi = 39 Then
	$benji = GUICtrlCreateLabel($bj, 174, 432, 252, 17)
ElseIf $zi = 40 Then
	$benji = GUICtrlCreateLabel($bj, 168, 432, 258, 17)
ElseIf $zi = 41 Then
	$benji = GUICtrlCreateLabel($bj, 162, 432, 264, 17)
EndIf

GUICtrlSetColor(-1, 0xFF0000)
GUISetState(@SW_SHOW)

_login()

While 1
	$nMsg = GUIGetMsg()
	For $i = 1 To $FIXED[0]
		If $nMsg = $FIX[$i] Then
			ShellExecute("explorer.exe ",$FIXED[$i] & "\")
			ExitLoop
		EndIf
	Next
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			_quit()
		Case $Guide[1],$Guide[2]
			For $s = 0 To 41
				GUICtrlSetState($sygj[$s],$GUI_HIDE)
			Next
			
			For $q = 0 To 9
				GUICtrlSetState($qdgl[$q],$GUI_HIDE)
			Next
			
			For $j = 0 To 4
				GUICtrlSetState($jcgl[$j],$GUI_HIDE)
			Next
			
			For $k = 1 To 2
				GUICtrlSetState($kzmb[$k],$GUI_HIDE)
			Next
			
			For $g = 0 To 16
				GUICtrlSetState($gjsz[$g],$GUI_HIDE)
			Next
			
			For $c = 0 To 34
				GUICtrlSetState($cygj[$c],$gui_show)
			Next
			
		Case $Guide[3],$Guide[4]
			For $c = 0 To 34
				GUICtrlSetState($cygj[$c],$GUI_HIDE)
			Next
			
			For $q = 0 To 9
				GUICtrlSetState($qdgl[$q],$GUI_HIDE)
			Next
			
			For $j = 0 To 4
				GUICtrlSetState($jcgl[$j],$GUI_HIDE)
			Next
			
			For $k = 1 To 2
				GUICtrlSetState($kzmb[$k],$GUI_HIDE)
			Next
			
			For $g = 0 To 16
				GUICtrlSetState($gjsz[$g],$GUI_HIDE)
			Next
			
			For $s = 0 To 41
				GUICtrlSetState($sygj[$s],$gui_show)
			Next
			
		Case $Guide[5],$Guide[6]
			For $c = 0 To 34
				GUICtrlSetState($cygj[$c],$GUI_HIDE)
			Next
			
			For $s = 0 To 41
				GUICtrlSetState($sygj[$s],$GUI_HIDE)
			Next
			
			For $j = 0 To 4
				GUICtrlSetState($jcgl[$j],$GUI_HIDE)
			Next
			
			For $k = 1 To 2
				GUICtrlSetState($kzmb[$k],$GUI_HIDE)
			Next
			
			For $g = 0 To 16
				GUICtrlSetState($gjsz[$g],$GUI_HIDE)
			Next
			
			For $q = 0 To 9
				GUICtrlSetState($qdgl[$q],$gui_show)
			Next
			
			_ReMain()
			
		Case $Guide[7],$Guide[8]
			For $c = 0 To 34
				GUICtrlSetState($cygj[$c],$GUI_HIDE)
			Next
			
			For $s = 0 To 41
				GUICtrlSetState($sygj[$s],$GUI_HIDE)
			Next
			
			For $q = 0 To 9
				GUICtrlSetState($qdgl[$q],$GUI_HIDE)
			Next
			
			For $k = 1 To 2
				GUICtrlSetState($kzmb[$k],$GUI_HIDE)
			Next
			
			For $g = 0 To 16
				GUICtrlSetState($gjsz[$g],$GUI_HIDE)
			Next
			
			For $j = 0 To 4
				GUICtrlSetState($jcgl[$j],$gui_show)
			Next
			
			_ReTaskS()
			
		Case $Guide[9],$Guide[10]
			For $c = 0 To 34
				GUICtrlSetState($cygj[$c],$GUI_HIDE)
			Next
			
			For $s = 0 To 41
				GUICtrlSetState($sygj[$s],$GUI_HIDE)
			Next
			
			For $q = 0 To 9
				GUICtrlSetState($qdgl[$q],$GUI_HIDE)
			Next
			
			For $j = 0 To 4
				GUICtrlSetState($jcgl[$j],$GUI_HIDE)
			Next
			
			For $g = 0 To 16
				GUICtrlSetState($gjsz[$g],$GUI_HIDE)
			Next			
			
			For $k = 1 To 2
				GUICtrlSetState($kzmb[$k],$gui_show)
				$kzmb[2] = GUICtrlCreateObj($oIE, 8, 64, 414, 345)
				_IENavigate($oIE, "file:///C:\WINDOWS\Temp\ControlPanel.{21EC2020-3AEA-1069-A2DD-08002B30309D}",0)
			Next
			
		Case $Guide[11],$Guide[12]
			For $c = 0 To 34
				GUICtrlSetState($cygj[$c],$GUI_HIDE)
			Next
			
			For $s = 0 To 41
				GUICtrlSetState($sygj[$s],$GUI_HIDE)
			Next
			
			For $q = 0 To 9
				GUICtrlSetState($qdgl[$q],$GUI_HIDE)
			Next
			
			For $j = 0 To 4
				GUICtrlSetState($jcgl[$j],$GUI_HIDE)
			Next
			
			For $k = 1 To 2
				GUICtrlSetState($kzmb[$k],$GUI_HIDE)
			Next
			
			For $g = 0 To 16
				GUICtrlSetState($gjsz[$g],$gui_show)
			Next
			
		Case $Guide[13],$Guide[14]
			$tc = MsgBox(16 + 1,"提示","您确定要退出本程序吗？")
			If $tc = 1 Then
				_quit()
			EndIf
		Case $Guide[0]
			$pos = WinGetPos($Window,"")
			If GUICtrlRead($Guide[0]) = "<= 收缩导航栏" Then
				WinMove($Window,"",Default,Default,438,Default)
				GUICtrlSetData($Guide[0],"扩展导航栏 =>")
			ElseIf GUICtrlRead($Guide[0]) = "扩展导航栏 =>" Then
				WinMove($Window,"",Default,Default,506,Default)
				GUICtrlSetData($Guide[0],"<= 收缩导航栏")
			EndIf
		Case $cygj[1]
			Run(@SystemDir & "\cmd.exe")
		Case $cygj[2]
			ShellExecute("rundll32.exe","shell32.dll,#61")
		Case $cygj[3]
			ShellExecute(@SystemDir & "\services.msc")
		Case $cygj[4]
			ShellExecute(@SystemDir & "\gpedit.msc")
		Case $cygj[5]
			Run(@WindowsDir & "\regedit.exe")
		Case $cygj[6]
			Run(@SystemDir & "\control.exe ncpa.cpl")
		Case $cygj[7]
			ShellExecute(@SystemDir & "\compmgmt.msc")
		Case $cygj[8]
			DllCall("user32.dll","int","SendMessageTimeout","hwnd",65535,"int",26,"int",0,"int",0,"int",0,"int",1000,"str","dwResult")
		Case $cygj[9]
			Run("gpupdate /force", "", @SW_HIDE)
		Case $cygj[10]
			ShellExecute(@SystemDir & "\devmgmt.msc")
		Case $cygj[11]
			Run(@SystemDir & "\control.exe")
		Case $cygj[12]
			ShellExecute(@SystemDir & "\diskmgmt.msc")
		Case $cygj[13]
			$JZxunwen = MsgBox(16 + 1 ,"提示","您确定要禁止所有网卡吗？")
			If $JZxunwen = 1 Then
				GUICtrlSetData($tishi,"正在为您禁止所有网卡")
				If FileExists(@SystemDir & "\devcon.exe") = 0 Then
					FileInstall("devcon.exe",@SystemDir & "\devcon.exe")
					RunWait("devcon disable =net pci\*", "", @SW_HIDE)
					GUICtrlSetData($tishi,"所有网卡禁止成功！")
					Sleep(500)
					GUICtrlSetData($tishi,"")
				ElseIf FileExists(@SystemDir & "\devcon.exe") <> 0 Then
					RunWait("devcon disable =net pci\*", "", @SW_HIDE)
					GUICtrlSetData($tishi,"所有网卡禁止成功！")
					Sleep(500)
					GUICtrlSetData($tishi,"")					
				EndIf
			EndIf
		Case $cygj[14]		
			$CQXUNWEN = MsgBox(16 + 1 ,"提示","您确定要重启所有网卡吗？")
			If $CQXUNWEN = 1 Then
				GUICtrlSetData($tishi,"正在为您重启所有网卡")
				If FileExists(@SystemDir & "\devcon.exe") = 0 Then
					FileInstall("devcon.exe",@SystemDir & "\devcon.exe")
					RunWait("devcon restart =net pci\*", "", @SW_HIDE)
					GUICtrlSetData($tishi,"所有网卡重启成功！")
					Sleep(500)
					GUICtrlSetData($tishi,"")
				ElseIf FileExists(@SystemDir & "\devcon.exe") <> 0 Then
					RunWait("devcon restart =net pci\*", "", @SW_HIDE)
					GUICtrlSetData($tishi,"所有网卡重启成功！")
					Sleep(500)
					GUICtrlSetData($tishi,"")					
				EndIf
			EndIf
		Case $cygj[15]
			Run(@SystemDir & "\dxdiag.exe")
		Case $cygj[16]
			Run(@ComSpec & " /c cmd /k ipconfig /all")
		Case $cygj[17]
			ShellExecute(@SystemDir & "\devmgmt.msc")
			WinWait("设备管理器","")
			Send("!v")
			WinWait("设备管理器","")
			Send("w")
		Case $cygj[18]
			$exp = MsgBox(16+1,"提示","您确定要重启Explorer ?")
			If $exp = 1 Then
				ProcessClose("explorer.exe")
				RunWait(@WindowsDir & "explorer.exe")
			EndIf
		Case $cygj[19]
			$name = RegRead("HKLM\SYSTEM\CurrentControlSet\Control\ComputerName\ComputerName","ComputerName")
			$computer = InputBox("开始修改","请输入要修改的计算机名：",$name,"",200 ,100)
			If @error = 0 Then
				RegWrite("HKLM\SYSTEM\CurrentControlSet\Control\ComputerName\ComputerName","ComputerName","REG_SZ",$computer)
				RegWrite("HKLM\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters","NV Hostname","REG_SZ",$computer)
				RegWrite("HKLM\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters","Hostname","REG_SZ",$computer)
				MsgBox(64,"提示","计算机名已经修改成："&$computer)
			EndIf
		Case $cygj[20]
			GUICtrlSetData($TIShi," 正在获取公网IP地址")
			$WANIP = _GetIP()
			GUICtrlSetData($TIShi,"")
			MsgBox(64,"已经复制成功!","您的公网IP是:"&$WANIP)
			ClipPut($WANIP)
		Case $cygj[21]
			_Autologin()
		Case $cygj[22]
			RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Folder\Hidden\SHOWALL","CheckedValue","REG_DWORD",1)
			If GUICtrlRead($cygj[22]) = "显示隐藏文件" Then
				RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced","Hidden","REG_DWORD",1)
				RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced","ShowSuperHidden","REG_DWORD",1)
				_Update_Explorer()
				GUICtrlSetData($cygj[22],"不显示隐藏文件")
			ElseIf GUICtrlRead($cygj[22]) = "不显示隐藏文件" Then
				RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced","Hidden","REG_DWORD",2)
				RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced","ShowSuperHidden","REG_DWORD",0)
				_Update_Explorer()
				GUICtrlSetData($cygj[22],"显示隐藏文件")
			EndIf
		Case $cygj[23]
			_ipset()
		Case $cygj[24]
			$x = RegRead("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer","NoFolderOptions")
			If $x = 1 Then
				RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer","NoFolderOptions","REG_DWORD",0)
				DllCall("user32.dll","int","SendMessageTimeout","hwnd",65535,"int",26,"int",0,"int",0,"int",0,"int",1000,"str","dwResult")
				Run("control folders")
				Sleep(2000)
				RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer","NoFolderOptions","REG_DWORD",1)
				DllCall("user32.dll","int","SendMessageTimeout","hwnd",65535,"int",26,"int",0,"int",0,"int",0,"int",1000,"str","dwResult")
			Else
				Run("control folders")
			EndIf
		Case $cygj[25]
			If GUICtrlRead($cygj[25]) = "隐藏安全选项" Then
				RegWrite("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa","forceguest","REG_DWORD","0x00000001")
				GUICtrlSetData($cygj[25],"显示安全选项")
			ElseIf GUICtrlRead($cygj[25]) = "显示安全选项" Then
				RegWrite("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa","forceguest","REG_DWORD","0x00000000")
				GUICtrlSetData($cygj[25],"隐藏安全选项")
			EndIf
		Case $cygj[26]
			RunWait("rundll32.exe shell32.dll,Control_RunDLL mmsys.cpl,,3")
		Case $cygj[27]
			If FileExists(@SystemDir & "\igfxpph.dll") = 1 Then
				RunWait(@ComSpec & " /c regsvr32 /u /s igfxpph.dll","",@SW_HIDE)
			EndIf
			If FileExists(@SystemDir & "\nvcpl.dll") = 1 Then
				RunWait(@ComSpec & " /c regsvr32 /u /s nvcpl.dll","",@SW_HIDE)
			EndIf
			If FileExists(@SystemDir & "\igfxsrvc.dll") = 1 Then
				RunWait(@ComSpec & " /c regsvr32 /u /s igfxsrvc.dll","",@SW_HIDE)
			EndIf
			If FileExists(@SystemDir & "\atiacmxx.dll") = 1 Then
				RunWait(@ComSpec & " /c regsvr32 /u /s atiacmxx.dll","",@SW_HIDE)
			EndIf
			MsgBox(64,"提示","优化完成!")
		Case $cygj[28]
			If GUICtrlRead($cygj[28]) = "窗口置顶" Then
				WinSetOnTop($Window,"",1)
				GUICtrlSetData($cygj[28],"取消置顶")
			ElseIf GUICtrlRead($cygj[28]) = "取消置顶" Then
				WinSetOnTop($Window,"",0)
				GUICtrlSetData($cygj[28],"窗口置顶")
			EndIf
		Case $cygj[29]
			$down = MsgBox(32+1,"提示","您确定要关闭计算机 ?")
			If $down = 1 Then
				Shutdown(5)
			EndIf
		Case $cygj[30]
			$Reboot = MsgBox(32+1,"提示","您确定要重启计算机 ?")
			If $Reboot = 1 Then
				Shutdown(6)
			EndIf
		Case $cygj[32]
 			RunWait(@ComSpec & " /c ping "&GUICtrlRead($cygj[31])&" -t")
		Case $cygj[33]
 			RunWait(@ComSpec & " /c cmd /k Tracert "&GUICtrlRead($cygj[31])&" -d")
		Case $cygj[34]
			ShowMenu($Window, $nMsg, $Context)
		Case $sygj[1]
			_oem()
		Case $sygj[2]
			qinglilaji()
		Case $sygj[3]
			FileInstall("imetool.exe",@TempDir & "\imetool.exe",1)
			Run(@TempDir & "\imetool.exe")
		Case $sygj[4]
			_xhck()
		Case $sygj[5]
			_NetTcp()
		Case $sygj[6]
			_cpgl()
		Case $sygj[7]
			_zml()
		Case $sygj[8]
			_driver()
		Case $sygj[9]
			$XieZ = MsgBox(16 + 1,"提示","您确定要卸载系统的所有驱动吗？")
			If $XieZ = 1 Then
				RunWait(@ComSpec & " /c cmd /k devcon remove *")
			EndIf
		Case $sygj[10]
			$key = RegRead("HKLM\SOFTWARE\MICROSOFT\Windows NT\CurrentVersion","DigitalProductId")
			MsgBox(0,"已成功复制!",GetXPKey($key))
			ClipPut(GetXPKey($key))
		Case $sygj[11]
			$FWTX = MsgBox(32 + 1,"提示","您确定要开启默认共享吗？")
			If $FWTX = 1 Then
				$jy = _ServiceExists(@ComputerName,"lanmanserver")
				If $jy = 0 Then
					If FileExists(@SystemDir & "\snetcfg.exe") = 0 Then
						GUICtrlSetData($tishi,"正在为您启动默认共享")
						FileInstall("snetcfg.exe",@SystemDir & "\snetcfg.exe",1)
						RunWait(@ComSpec & " /c snetcfg -v -l C:\Windows\inf\netserv.inf -c s -i ms_server","",@SW_HIDE)
						RunWait(@ComSpec & " /c net start lanmanserver","",@SW_HIDE)
						RunWait(@ComSpec & " /c sc config lanmanserver start= auto","",@SW_HIDE)
						GUICtrlSetData($tishi,"默认共享开启成功！")
						Sleep(500)
						GUICtrlSetData($tishi,"")
					ElseIf FileExists(@SystemDir & "\snetcfg.exe") <> 0 Then
						GUICtrlSetData($tishi,"正在为您启动默认共享")
						RunWait(@ComSpec & " /c snetcfg -v -l C:\Windows\inf\netserv.inf -c s -i ms_server","",@SW_HIDE)
						RunWait(@ComSpec & " /c net start lanmanserver","",@SW_HIDE)
						RunWait(@ComSpec & " /c sc config lanmanserver start= auto","",@SW_HIDE)
						GUICtrlSetData($tishi,"默认共享开启成功！")
						Sleep(500)
						GUICtrlSetData($tishi,"")
					EndIf
				Else
					GUICtrlSetData($tishi,"正在为您启动默认共享")
					RunWait(@ComSpec & " /c net start lanmanserver","",@SW_HIDE)
					RunWait(@ComSpec & " /c sc config lanmanserver start= auto","",@SW_HIDE)
					GUICtrlSetData($tishi,"默认共享开启成功！")
					Sleep(500)
					GUICtrlSetData($tishi,"")
				EndIf
			EndIf
		Case $sygj[12]
			FileInstall("rtkhdaud.dat",@SystemDir & "\drivers\rtkhdaud.dat",1)
			MsgBox(64,"提示","安装完成，重启系统生效！")
		Case $sygj[20]
			If FileExists(@SystemDir & "\radmin.exe") = 0 Then
				FileInstall("Radmin.exe",@SystemDir & "\radmin.exe")
				If GUICtrlRead($sygj[19]) = "控制" Then
					RunWait(@ComSpec & " /c radmin.exe /connect:"&GUICtrlRead($sygj[15])&":"&GUICtrlRead($sygj[17]),"",@SW_HIDE)
				ElseIf GUICtrlRead($sygj[19]) = "监视" Then
					RunWait(@ComSpec & " /c radmin.exe /connect:"&GUICtrlRead($sygj[15])&":"&GUICtrlRead($sygj[17])&" /noinput","",@SW_HIDE)
				ElseIf GUICtrlRead($sygj[19]) = "传文件" Then
					RunWait(@ComSpec & " /c radmin.exe /connect:"&GUICtrlRead($sygj[15])&":"&GUICtrlRead($sygj[17])&" /file","",@SW_HIDE)
				ElseIf GUICtrlRead($sygj[19]) = "TelNet" Then
					RunWait(@ComSpec & " /c radmin.exe /connect:"&GUICtrlRead($sygj[15])&":"&GUICtrlRead($sygj[17])&" /telnet","",@SW_HIDE)
				EndIf
			ElseIf FileExists(@SystemDir & "\radmin.exe") <> 0 Then
				If GUICtrlRead($sygj[19]) = "控制" Then
					RunWait(@ComSpec & " /c radmin.exe /connect:"&GUICtrlRead($sygj[15])&":"&GUICtrlRead($sygj[17]),"",@SW_HIDE)
				ElseIf GUICtrlRead($sygj[19]) = "监视" Then
					RunWait(@ComSpec & " /c radmin.exe /connect:"&GUICtrlRead($sygj[15])&":"&GUICtrlRead($sygj[17])&" /noinput","",@SW_HIDE)
				ElseIf GUICtrlRead($sygj[19]) = "传文件" Then
					RunWait(@ComSpec & " /c radmin.exe /connect:"&GUICtrlRead($sygj[15])&":"&GUICtrlRead($sygj[17])&" /file","",@SW_HIDE)
				ElseIf GUICtrlRead($sygj[19]) = "TelNet" Then
					RunWait(@ComSpec & " /c radmin.exe /connect:"&GUICtrlRead($sygj[15])&":"&GUICtrlRead($sygj[17])&" /telnet","",@SW_HIDE)
				EndIf
			EndIf
		Case $sygj[21]
			If FileExists(@SystemDir & "\radmin.exe") = 0 Then
				FileInstall("radmin.exe",@SystemDir & "\radmin.exe")
				RunWait(@SystemDir & "\radmin.exe")
			Else
				RunWait(@SystemDir & "radmin.exe")
			EndIf
		Case $sygj[29]
			If FileExists(@SystemDir & "\winbox.exe") = 0 Then
				FileInstall("winbox.exe",@SystemDir & "\winbox.exe")
				RunWait(@ComSpec & " /c winbox.exe "&GUICtrlRead($sygj[24])&" "&GUICtrlRead($sygj[26])&" "&GUICtrlRead($sygj[28]),"",@SW_HIDE)
			ElseIf FileExists(@SystemDir & "\winbox.exe") <> 0 Then
				RunWait(@ComSpec & " /c winbox.exe "&GUICtrlRead($sygj[24])&" "&GUICtrlRead($sygj[26])&" "&GUICtrlRead($sygj[28]),"",@SW_HIDE)
			EndIf
		Case $sygj[30]
			If FileExists(@SystemDir & "\winbox.exe") = 0 Then
				FileInstall("winbox.exe",@SystemDir & "\winbox.exe")
				RunWait(@SystemDir & "\winbox.exe")
			Else
				RunWait(@SystemDir & "\winbox.exe")
			EndIf

		Case $sygj[40]
			_ChangeScreenRes(GUICtrlRead($sygj[33]),GUICtrlRead($sygj[35]),GUICtrlRead($sygj[39]),GUICtrlRead($sygj[37]))
		Case $qdgl[2]
			_delete()
			_ReMain()
		Case $qdgl[3]
			_ReMain()
		Case $qdgl[8]
			$aPath = FileOpenDialog("选择要启动的文件", @ScriptDir, "可执行文件(*.exe;*.bat;*.vbs)")
			GUICtrlSetData($qdgl[7],$aPath)
		Case $qdgl[9]
			$x1 = GUICtrlRead($qdgl[5])
			$x2 = GUICtrlRead($qdgl[6])
			$x3 = GUICtrlRead($qdgl[7])
			If $x1 = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run" Then
				RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run",$x2,"REG_SZ",$x3)
			ElseIf $x1 = "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run" Then
				RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run",$x2,"REG_SZ",$x3)
			EndIf
			GUICtrlSetData($qdgl[6],"启动名称")
			GUICtrlSetData($qdgl[7],"启动路径")
			_ReMain()
		Case $jcgl[2]
			_ReTaskS()
		Case $jcgl[3]
			$listJS = GUICtrlRead(GUICtrlRead($jcgl[1]))
			$DJS = StringSplit($listJS,"|")
			If GUICtrlRead($jcgl[1]) = 0 Then
				MsgBox(16,"提示","请选择要结束的进程！")
			ElseIf GUICtrlRead($jcgl[1]) <> 0 Then
				ProcessClose($DJS[1])
				_ReTaskS()
			EndIf
			_ReTaskS()
		Case $jcgl[4]
			$x = GUICtrlRead(GUICtrlRead($jcgl[1]))
			$y = StringSplit($x,"|")
			If GUICtrlRead($jcgl[1]) = 0 Then
				MsgBox(16,"error","请选择要打开的进程路径!")
			Else
				$pathTX = StringLeft($y[3], StringInStr($y[3], "\", 0, -1) - 1)
				ShellExecute($pathTX)
			EndIf
		Case $gjsz[2]
			If GUICtrlRead($gjsz[2]) = $GUI_CHECKED Then
				GUICtrlSetState($gjsz[4],$GUI_ENABLE)
				GUICtrlSetState($gjsz[6],$GUI_ENABLE)
			ElseIf GUICtrlRead($gjsz[2]) = $GUI_UNCHECKED Then
				GUICtrlSetState($gjsz[4],$GUI_DISABLE)
				GUICtrlSetState($gjsz[6],$GUI_DISABLE)
			EndIf			
		Case $gjsz[7]
			If GUICtrlRead($gjsz[7]) = $GUI_CHECKED Then
				GUICtrlSetState($gjsz[9],$GUI_ENABLE)
				GUICtrlSetState($gjsz[11],$GUI_ENABLE)
			ElseIf GUICtrlRead($gjsz[7]) = $GUI_UNCHECKED Then
				GUICtrlSetState($gjsz[9],$GUI_DISABLE)
				GUICtrlSetState($gjsz[11],$GUI_DISABLE)
			EndIf
		Case $gjsz[12]
			If GUICtrlRead($gjsz[2]) = $GUI_CHECKED Then
				If GUICtrlRead($gjsz[4]) = $PassSY Then
					IniWrite(@WindowsDir & "\inf\Tools5.ini","Password","pass",GUICtrlRead($gjsz[6]))
					GUICtrlSetData($tishi,"修改成功！")
					Sleep(1000)
					GUICtrlSetData($tishi,"")
				ElseIf GUICtrlRead($gjsz[4]) <> $PassSY Then
					GUICtrlSetData($tishi,"原始密码不对，请重新修改!")
				EndIf
			ElseIf GUICtrlRead($gjsz[7]) = $GUI_CHECKED Then
				IniWrite(@WindowsDir & "\inf\Tools5.ini","OemInfo","titleBT",GUICtrlRead($gjsz[9]))
				IniWrite(@WindowsDir & "\inf\Tools5.ini","OemInfo","logoBT",GUICtrlRead($gjsz[11]))
				GUICtrlSetData($tishi,"修改成功！")
				Sleep(1000)
				GUICtrlSetData($tishi,"")
			EndIf
		Case $gjsz[16]
			MsgBox(64,"提示","正在开发当中.")
			
	EndSwitch
WEnd

Func _ChangeScreenRes($i_Width = @DesktopWidth, $i_Height = @DesktopHeight, $i_BitsPP = @DesktopDepth, $i_RefreshRate = @DesktopRefresh)
	Local Const $DM_PELSWIDTH = 0x00080000
	Local Const $DM_PELSHEIGHT = 0x00100000
	Local Const $DM_BITSPERPEL = 0x00040000
	Local Const $DM_DISPLAYFREQUENCY = 0x00400000
	Local Const $CDS_TEST = 0x00000002
	Local Const $CDS_UPDATEREGISTRY = 0x00000001
	Local Const $DISP_CHANGE_RESTART = 1
	Local Const $DISP_CHANGE_SUCCESSFUL = 0
	Local Const $HWND_BROADCAST = 0xffff
	Local Const $WM_DISPLAYCHANGE = 0x007E
	If $i_Width = "" Or $i_Width = -1 Then $i_Width = @DesktopWidth
	If $i_Height = "" Or $i_Height = -1 Then $i_Height = @DesktopHeight
	If $i_BitsPP = "" Or $i_BitsPP = -1 Then $i_BitsPP = @DesktopDepth
	If $i_RefreshRate = "" Or $i_RefreshRate = -1 Then $i_RefreshRate = @DesktopRefresh
	Local $DEVMODE = DllStructCreate("byte[32];int[10];byte[32];int[6]")
	Local $B = DllCall("user32.dll", "int", "EnumDisplaySettings", "ptr", 0, "long", 0, "ptr", DllStructGetPtr($DEVMODE))
	If @error Then
		$B = 0
		SetError(1)
		Return $B
	Else
		$B = $B[0]
	EndIf
	If $B <> 0 Then
		DllStructSetData($DEVMODE, 2, BitOR($DM_PELSWIDTH, $DM_PELSHEIGHT, $DM_BITSPERPEL, $DM_DISPLAYFREQUENCY), 5)
		DllStructSetData($DEVMODE, 4, $i_Width, 2)
		DllStructSetData($DEVMODE, 4, $i_Height, 3)
		DllStructSetData($DEVMODE, 4, $i_BitsPP, 1)
		DllStructSetData($DEVMODE, 4, $i_RefreshRate, 5)
		$B = DllCall("user32.dll", "int", "ChangeDisplaySettings", "ptr", DllStructGetPtr($DEVMODE), "int", $CDS_TEST)
		If @error Then
			$B = -1
		Else
			$B = $B[0]
		EndIf
		Select
			Case $B = $DISP_CHANGE_RESTART
				$DEVMODE = ""
				Return 2
			Case $B = $DISP_CHANGE_SUCCESSFUL
				DllCall("user32.dll", "int", "ChangeDisplaySettings", "ptr", DllStructGetPtr($DEVMODE), "int", $CDS_UPDATEREGISTRY)
				DllCall("user32.dll", "int", "SendMessage", "hwnd", $HWND_BROADCAST, "int", $WM_DISPLAYCHANGE, _
						"int", $i_BitsPP, "int", $i_Height * 2 ^ 16 + $i_Width)
				$DEVMODE = ""
				Return 1
			Case Else
				$DEVMODE = ""
				SetError(1)
				Return $B
		EndSelect
	EndIf
EndFunc

Func _ReTaskS()
    _GUICtrlListView_DeleteAllItems($jcgl[1])
    _ListTaskS()
EndFunc

Func _ListTaskS()
 Local $listTX = ProcessList()
 GUICtrlSendMsg($jcgl[1], $LVM_DELETEALLITEMS, 0, 0)
 For $J = $listTX[0][0] To 1 Step -1
  $LisVi = _Processpath($listTX[$J][1])
  $K = GUICtrlCreateListViewItem($listTX[$J][0] & "|" & $listTX[$J][1] & "|" & $LisVi , $jcgl[1])
  GUICtrlSetImage($K, $LisVi, 0)
 Next
EndFunc


Func _GetIP()
	$ipurl = 'http://ip.91cool.net/ip.php?type=ip' & @cr & _
	'http://www.123cha.com/ip/' & @cr & _
	'http://www.ip138.com/' & @cr & _
	'http://www.whatismyip.com'
	$url = StringSplit($ipurl, @cr)
	For $i = 1 to $url[0]
		If InetGet($url[$i], @TempDir & "\~ip.tmp") Then
		$ip = FileRead(@TempDir & "\~ip.tmp", FileGetSize(@TempDir & "\~ip.tmp"))
		FileDelete(@TempDir & "\~ip.tmp")
		$ip = StringRegExp($ip, '((2[0-4]\d|25[0-5]|[01]?\d\d?)\.){3}(2[0-4]\d|25[0-5]|[01]?\d\d?)', 2)
		if not @error then Return $ip[0]
		EndIf
	Next
	SetError(1)
	Return -1
EndFunc 

Func _Update_Explorer()
    Local $bOld = Opt("WinSearchChildren", True)
    Local $a = WinList("[CLASS:SHELLDLL_DefView]")
    For $i = 0 To UBound($a) - 1
        DllCall("user32.dll", "long", "SendMessage", "hwnd", $a[$i][1], "int", 0x111, "int", 28931, "int", 0)
    Next
    Opt("WinSearchChildren", $bOld)
EndFunc

Func ShowMenu($hWnd, $CtrlID, $nContextID)
    Local $arPos, $x, $y
    Local $hMenu = GUICtrlGetHandle($nContextID)
    
    $arPos = ControlGetPos($hWnd, "", $CtrlID)
	
    $x = $arPos[0]
    $y = $arPos[1] + $arPos[3]
    
    ClientToScreen($hWnd, $x, $y)
    TrackPopupMenu($hWnd, $hMenu, $x, $y)
EndFunc


Func ClientToScreen($hWnd, ByRef $x, ByRef $y)
    Local $stPoint = DllStructCreate("int;int")
    
    DllStructSetData($stPoint, 1, $x)
    DllStructSetData($stPoint, 2, $y)

    DllCall("user32.dll", "int", "ClientToScreen", "hwnd", $hWnd, "ptr", DllStructGetPtr($stPoint))
    
    $x = DllStructGetData($stPoint, 1)
    $y = DllStructGetData($stPoint, 2)
    $stPoint = 0
EndFunc

Func TrackPopupMenu($hWnd, $hMenu, $x, $y)
    DllCall("user32.dll", "int", "TrackPopupMenuEx", "hwnd", $hMenu, "int", 0, "int", $x, "int", $y, "hwnd", $hWnd, "ptr", 0)
EndFunc


Func GetXPKey($binaryDPID)
    Local $bKey[15]
	Local $sKey[29]
	Local $Digits[24]
	Local $Value = 0
	Local $hi = 0
	local $n = 0
	Local $i = 0
	Local $dlen = 29
	Local $slen = 15
	Local $Result
	$Digits = StringSplit("BCDFGHJKMPQRTVWXY2346789","")
	$binaryDPID = stringmid($binaryDPID,107,30)
	For $i = 1 to 29 step 2
       $bKey[int($i / 2)] = dec(stringmid($binaryDPID,$i,2))
   next

   For $i = $dlen -1 To 0 Step -1
       If Mod(($i + 1), 6) = 0 Then
           $sKey[$i] = "-"
       Else
           $hi = 0
           For $n = $slen -1 To 0 Step -1
               $Value = Bitor(bitshift($hi ,- 8) , $bKey[$n])
               $bKey[$n] = int($Value / 24)
               $hi = mod($Value , 24)
           Next
           $sKey[$i] = $Digits[$hi +1]
       EndIf

   Next
   For $i = 0 To 28
       $Result = $Result & $sKey[$i]
   Next

   Return $Result
EndFunc

Func _readTX()
    $i = 1
    $y = 0
    While 1
        $_cser = RegEnumVal("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run", $i)
        if @error <> 0 Then ExitLoop
        $Path = RegRead("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run", $_cser)
        $ReadTX1 = GUICtrlCreateListViewItem($_cser&"|"&$Path&"|"&"HKEY_CURRENT_USER",$qdgl[1])
		GUICtrlSetImage($ReadTX1, $Path, 0)
        $i = $i+1
        $y = $y +1
    WEnd
    
    $i = 1
    While 1
        $_machine = RegEnumVal("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run", $i)
        if @error <> 0 Then ExitLoop
        $Path = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run", $_machine)
        $ReadTX2 = GUICtrlCreateListViewItem($_machine&"|"&$Path&"|"&"HKEY_LOCAL_MACHINE",$qdgl[1])
		GUICtrlSetImage($ReadTX2, $Path, 0)
        $i = $i + 1
        $y = $y + 1
    WEnd
    
EndFunc

Func _ReMain()
    _GUICtrlListView_DeleteAllItems($qdgl[1])
    _ReadTX()
EndFunc

Func _delete()
    $list = GUICtrlRead(GUICtrlRead($qdgl[1]))
    $s = StringSplit($list,"|")
    If GUICtrlRead($qdgl[1]) = 0 Then
        MsgBox(16,"提示","您还没有选择要删除的项目呢！")
    ElseIf GUICtrlRead($qdgl[1]) <> 0 Then
        If $s[3] = "HKEY_CURRENT_USER" Then
            RegDelete("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run",$s[1])
        ElseIf $s[3] = "HKEY_LOCAL_MACHINE" Then
            RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run",$s[1])
        EndIf
    EndIf
EndFunc


Func _quit()
	FileDelete(@TempDir& "\logo.bmp")
	FileDelete(@TempDir & "\1.ico")
	FileDelete(@TempDir & "\2.ico")
	FileDelete(@TempDir & "\3.ico")
	FileDelete(@TempDir & "\4.ico")
	FileDelete(@TempDir & "\5.ico")
	FileDelete(@TempDir & "\6.ico")
	FileDelete(@TempDir & "\7.ico")
	FileDelete(@TempDir & "\imetool.exe")
	FileDelete(@SystemDir & "\radmin.exe")
	FileDelete(@SystemDir & "\winbox.exe")
	FileDelete(@SystemDir & "\snetcfg.exe")
	Exit
EndFunc
