分类: 網管相關
作者: hopol

#NoTrayIcon
$ip=IniRead(@ScriptDir&"\\锐起.ini","服务器","IP","")
$PF=IniRead(@ScriptDir&"\\锐起.ini","服务器","PF","")
$ping = ping ($ip,1000)
if $ping Then
FileInstall("D:\\system32\\RNDINTER.dll",@SystemDir&"\\RNDINTER.dll",1)
FileInstall("D:\\system32\\RTGSGENG.dll",@SystemDir&"\\RTGSGENG.dll",1)
FileInstall("D:\\system32\\udt.dll",@SystemDir&"\\udt.dll",1)
FileInstall("D:\\system32\\drivers\\GAMESGXP.sys",@SystemDir&"\\drivers\\GAMESGXP.sys",1)
FileInstall("D:\\system32\\drivers\\RGAMESYN.sys",@SystemDir&"\\drivers\\RGAMESYN.sys",1)

RegWrite("HKEY_LOCAL_MACHINE\\SOFTWARE\\Richtech\\Cgo","Version","reg_dword","2043")
RegWrite("HKEY_LOCAL_MACHINE\\SOFTWARE\\Richtech\\Cgo","NormalSD","reg_dword","1")
RegWrite("HKEY_LOCAL_MACHINE\\SOFTWARE\\Richtech\\Cgo","RegDrive","reg_dword","81")
RegWrite("HKEY_LOCAL_MACHINE\\SOFTWARE\\Richtech\\Cgo","UserId","reg_dword","5821298")
RegWrite("HKEY_LOCAL_MACHINE\\SOFTWARE\\Richtech\\Cgo","KeyId","reg_dword","0")
RegWrite("HKEY_LOCAL_MACHINE\\SOFTWARE\\Richtech\\Cgo","ServerIp","reg_sz",$ip)
Run("rundll32 RNDINTER.dll,RND32_StartSGXP")
;run("rundll32.exe RTGSGENG.dll,RTGSGLogonEvent")
Else
msgbox(4096,"提示","服务器未开启,请联系网管")
Exit
EndIf

标签: 锐起, 绿色, 连接器, au3, 源码