Mahapathy wrote:Thanks Susai, is it possible to go to specified page like 663 of a forum thread...

KevinT wrote:

VAGinate LOL, as in vaguely innate...

Great "indie"

Now seriously, a much needed help navigating 4 thousand posts threads really... thanks a lot.

I just wander what the likes of Pippa or Ozgirl will have to say to...

You'd better state that you are in no way a misogynist... (even if you are a woman yourself (sushi roll ))

Cheers mate

aSushiRoll » Tue May 07, 2013 3:08 pm wrote:Hi guys,

Sorry about the subject title I hope I'm not being inappropriate, great forums, great forums!

I've been pouring all this info and reading up on everything posted here for a few weeks now. Getting there! But I want to do my part and share a small script I've written to help navigate these forums.

Basicly what it does is when you have capslock ON you can use the left&right arrow keys to page back&forward in stead of having to click on the NEXT or number buttons in a thread

just don't use it TOO quickly, or it wont' work. So far I have only tested it on windows & chrome, since it uses ALT+D keyboard shortcut to get the titlebar address.

Here's the link to the compiled .exe
https://www.dropbox.com/s/jh3ey85zxeawwya/vaginate.exe
Here's the autohotkey script if you don't trust me (great program!)
https://www.dropbox.com/s/swxpkb6yua8rh8u/vaginate.ahk

Code: Select all

~Right::
{
    GetKeyState, state, CapsLock, T
    if state = D
    {
    	BackupClipbrd := Clipboard
        Send {ALT down}d{ALT up} ; Select the url textbox
        Sleep 50
        Send ^c ; Copy the url
        ClipWait 0.1
        If ERRORLEVEL
        {
        	Clipboard := BackupClipbrd
    	    Return
        }
    	if(InStr(Clipboard ,"stevehopwoodforex",false))
        {
          reg1 := ".*?start=(\d+)"
          reg2 := "(.*t=\d+)"
          reg3 := "(.*?start=)\d+"
          postfix1 := "&start=10"
          postfix2 := ""
          incr := 10
    	}
    
    	regexmatch(Clipboard,reg1,match)
    	if match1 =
    	{
           	regexmatch(Clipboard,reg2,matchtwo)
           	newpage = %matchtwo1%%postfix1%
     		Clipboard = % newpage
            Send !d^v{ENTER}
       	}
    	else
    	{
           	newpage := % match1 + incr
           	regexmatch(Clipboard,reg3,matchtwo)
          	newpage = %matchtwo1%%newpage%%postfix2%
    		Clipboard = % newpage
            Send !d^v{ENTER}
       	}
        Clipboard := BackupClipbrd
    	return
    }
	return
}

~Left::
{
    GetKeyState, state, CapsLock, T
    if state = D
        {
    	BackupClipbrd := Clipboard
        Send !d ; Select the url textbox
        Send ^c ; Copy the url
        ClipWait 0.1
        If ERRORLEVEL
        {
        	Clipboard := BackupClipbrd
    	    Return
        }
    	if(InStr(Clipboard ,"stevehopwoodforex",false))
        {
          reg1 := ".?start=(\d+)"
          reg2 := "(.*?)start=10"
          reg3 := "(.*start=)\d+"
          postfix1 :=
          postfix2 :=
          decr := 10
          firstpage := 10
    	}
    	regexmatch(Clipboard,reg1,match)
    	if match1 =
    	{
    		return
    	}
    	else
    	{
           	newpage =
               ; test to see if first page or not
            if % match1 = firstpage
            {
                regexmatch(Clipboard,reg2,matchtwo)
                newpage = %matchtwo1%
            }
            else
            {
        	    newpage := % match1 - decr
    	       	regexmatch(Clipboard,reg3,matchtwo)
        		newpage = %matchtwo1%%newpage%
            }
    		Clipboard = % newpage
            Send !d^v{ENTER}
    	}
        Clipboard := BackupClipbrd
    	return
	}
	return
}