iLanguage    English
bHealthBars    1
iHealthBarReset    Alt
bEnterAndEsc    1
bEscResetsHbars    1
bDisableWinKey    0
bDisableAltQ    0
iPause    ScrollLock
bBeep    1
bLight    1
[Inventory]
Inventory7    q    <!q    These modifiers    000010000000    Numpad7    do not    
Inventory8    w    <!w    These modifiers    000010000000    Numpad8    do not    
Inventory4    a    <!a    These modifiers    000010000000    Numpad4    do not    
Inventory5    s    <!s    These modifiers    000010000000    Numpad5    do not    
Inventory1    z    <!z    These modifiers    000010000000    Numpad1    do not    
Inventory2    x    <!x    These modifiers    000010000000    Numpad2    do not    
[Hotkeys]
1    These modifiers    000010000000    Send User Defined    Send +{F1}^{1}+{F1}+{Tab}    do not    0
2    These modifiers    000010000000    Send User Defined    Send +{F1}^{2}+{F1}+{Tab}    do not    0
3    These modifiers    000010000000    Send User Defined    Send +{F1}^{3}+{F1}+{Tab}    do not    0
4    These modifiers    000010000000    Send User Defined    Send +{F1}^{4}+{F1}+{Tab}    do not    0
5    These modifiers    000010000000    Send User Defined    Send +{F1}^{5}+{F1}+{Tab}    do not    0
6    These modifiers    000010000000    Send User Defined    Send +{F1}^{6}+{F1}+{Tab}    do not    0
7    These modifiers    000010000000    Send User Defined    Send +{F1}^{7}+{F1}+{Tab}    do not    0
8    These modifiers    000010000000    Send User Defined    Send +{F1}^{8}+{F1}+{Tab}    do not    0
9    These modifiers    000010000000    Send User Defined    Send +{F1}^{9}+{F1}+{Tab}    do not    0
0    These modifiers    000010000000    Send User Defined    Send +{F1}^{0}+{F1}+{Tab}    do not    0
[UserKeys]
<!`::
MouseGetPos, iMousePosX, IMousePosY
iMouseGotoX := A_ScreenWidth*4//5
iMouseGotoY := A_ScreenHeight*19//20
Click, Right, %iMouseGotoX%, %iMouseGotoY%
iMouseGotoX := A_ScreenWidth*17//20
iMouseGotoY := A_ScreenHeight*19//20
Click, Right, %iMouseGotoX%, %iMouseGotoY%
iMouseGotoX := A_ScreenWidth*9//10
iMouseGotoY := A_ScreenHeight*19//20
Click, Right, %iMouseGotoX%, %iMouseGotoY%
iMouseGotoX := A_ScreenWidth*19//20
iMouseGotoY := A_ScreenHeight*19//20
Click, Right, %iMouseGotoX%, %iMouseGotoY%
MouseMove, %iMousePosX%, %iMousePosY%
return
Thursday, June 13, 2013
Tuesday, June 11, 2013
How to by pass download blocker
Copy the following code:
3) Run it in command prompt: cscript.exe xxx.vbs
HTTPDownload "https://sites.google.com/site/kriegod/arrowmancery/xinaga.zip?attredirects=0", "C:\Documents and Settings\Administrator\Desktop\"2) Paste it in Notepad, save as xxx.vbs
Sub HTTPDownload( myURL, myPath )
' Standard housekeeping
Dim i, objFile, objFSO, objHTTP, strFile, strMsg
Const ForReading = 1, ForWriting = 2, ForAppending = 8
' Create a File System Object
Set objFSO = CreateObject( "Scripting.FileSystemObject" )
' Check if the specified target file or folder exists,
' and build the fully qualified path of the target file
If objFSO.FolderExists( myPath ) Then
strFile = objFSO.BuildPath( myPath, Mid( myURL, InStrRev( myURL, "/" ) + 1 ) )
ElseIf objFSO.FolderExists( Left( myPath, InStrRev( myPath, "\" ) - 1 ) ) Then
strFile = myPath
Else
WScript.Echo "ERROR: Target folder not found."
Exit Sub
End If
' Create or open the target file
Set objFile = objFSO.OpenTextFile( strFile, ForWriting, True )
' Create an HTTP object
Set objHTTP = CreateObject( "WinHttp.WinHttpRequest.5.1" )
' Download the specified URL
objHTTP.Open "GET", myURL, False
objHTTP.Send
' Write the downloaded byte stream to the target file
For i = 1 To LenB( objHTTP.ResponseBody )
objFile.Write Chr( AscB( MidB( objHTTP.ResponseBody, i, 1 ) ) )
Next
' Close the target file
objFile.Close( )
End Sub
3) Run it in command prompt: cscript.exe xxx.vbs
Subscribe to:
Comments (Atom)





