SCaR

World of Warcraft | Khaz Gorath

Hey guys, a few tidbits I found to hopefully make wow on windows run a little better.
The first is a VBScript, it changes a registry entry that makes your networking packets send without waiting for a response from a server.

The Second is a Registry script which sets your machine to moosh small packets together to make one normal size packet so the server doesn't need so long to process it.

Below are the codes:

VBS

****** START HERE ******

' --------------------------------------------------------------------------------
' Script: setTcpAck.vbs
' Purpose: Simple little script to clear tcpacktick delays for SMB
' Author: Hyperus
' Notes: No Liability Accepted for use under any circumstances
' --------------------------------------------------------------------------------
'
Option Explicit

'Const vbYesNo = 4
'Const vbYes = 6
'Const vbNo = 7

Dim objWMIService,colOperatingSystems,objOperatingSystem
Dim nResponse,OSVersion
Dim oShell,sNIC, n

Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\.\root\cimv2")
Set colOperatingSystems = objWMIService.ExecQuery ("Select * from Win32_OperatingSystem")

For Each objOperatingSystem in colOperatingSystems
OSVersion = Left(objOperatingSystem.Version,3)
Next

Set objWMIService = nothing
Set colOperatingSystems = nothing
Set objOperatingSystem = nothing

nResponse = MsgBox("Clear TcpAck Delays on this machine. Is this what you want to do?" & vbCRLF & vbCRLF & "Click Yes to proceed or No to quit.", vbYesNo, "AddIP")
If nResponse = vbNo Then
WScript.Echo "*** Script terminated by user ***"
WScript.Quit 0
End If

Set oShell = WScript.CreateObject("WScript.Shell")

For n = 1 To 20
sNIC = ""
On Error Resume Next
sNIC = oShell.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\NetworkCards\" & CStr(n) & "\ServiceName")
Err.Clear
On Error Goto 0

If sNIC <> "" Then
WScript.Echo "Found Apapter [" & CStr(n) & "] " & sNIC
Select Case OSVersion
Case "5.0"
oShell.RegWrite "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\Interfaces\" & sNIC & "\TcpDelAckTicks",0,"REG_DWORD"
wscript.echo "Writing : HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\Interfaces\" & sNIC & "\TcpDelAckTicks=0"
Case "5.1"
oShell.RegWrite "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\Interfaces\" & sNIC & "\TcpAckFrequency",1,"REG_DWORD"
wscript.echo "Writing : HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\Interfaces\" & sNIC & "\TcpAckFrequency=1"
Case "5.2"
oShell.RegWrite "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\Interfaces\" & sNIC & "\TcpAckFrequency",1,"REG_DWORD"
wscript.echo "Writing : HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\Interfaces\" & sNIC & "\TcpAckFrequency=1"
Case "6.0"
oShell.RegWrite "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\Interfaces\" & sNIC & "\TcpAckFrequency",1,"REG_DWORD"
wscript.echo "Writing : HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\Interfaces\" & sNIC & "\TcpAckFrequency=1"
Case Else
WScript.Echo "'" & OSVersion & "'" & " Operating System not Suppported for this Reg Hack"
End Select

End If
Next

Set oShell = Nothing

WScript.Echo "Done."

nResponse = MsgBox("The machine must be restarted before these changes will take effect." & vbCRLF & vbCRLF & "You must do this manually.", 0, "AddIP - Done!")
WScript.Quit 0


****** STOP HERE ******


Registry
****** START HERE ******

Windows Registry Editor Version 5.00

[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\MSMQ]

[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\MSMQ\Parameters]
"TCPNoDelay"=dword:00000001

****** STOP HERE ******

What to do:
Open a text editor (Notepad for example) and copy the above data into the file.
For the first script, save the file as 'wow.vbs'. When done, double click the file, click OK when it asks you and it will tell you to reboot the computer.

The Second file is the same as the first, but should be saved as 'wow.reg'. Double click the file, allow it to add to the registry. Reboot your computer and check the latencies. - You should be enjoying lower pings =)

Share 

Add a Comment

You need to be a member of SCaR to add comments!

Join this social network

2 Comments

NelieL Comment by NelieL on January 6, 2008 at 6:28pm
and can u please explain this to me abit detailed, from where to where i shud copy n past in the notepad file im creating..coz i know very lil about stuff like this :(
NelieL Comment by NelieL on January 6, 2008 at 6:25pm
hey sio do i past the notepad file im creating inside the warcraft folder in programfiles??

About

Redlocker Redlocker created this social network on Ning.

Create your own social network!

Badge

Loading…

© 2009   Created by Redlocker on Ning.   Create Your Own Social Network

Badges  |  Report an Issue  |  Privacy  |  Terms of Service