PStars Grabber (New AHK script)

[highwayfrog]

Hi.
I have a problem.
It says "Unterminated string in file C:\Documents and settings \Desktop\ps.auto3-new.txt,line9"

Can anybody help me?

Tx [img]/images/graemlins/confused.gif[/img]

[highwayfrog]

Hi.
I made a copy of ur script to a notepad.
and I put my screenname on cfilename as u said.

; auto-execute

cIHH = Instant Hand History
cPSTable = Afx:400000:28:10011:0:01 ;table of hands in the IHH window
cSrch = `'
cFileName = C:\Program Files\PokerStars\HandHistory\goldfish1144\CurrData
cSleep = 600000 ;set to 10 min -- change the time interval here
lastGameID = 0


; start IHH grabber loop

loop
{
prevTableName:=
prevGameID:=
WinActivate, %cIHH%
Control,Choose,1,ComboBox1,%cIHH%
ControlFocus, %cPSTable%,%cIHH%
If (lastGameID = 0)
{
Send {PgUp 10}
}
else
{
GoSub FindLastGameID
}
FileID := A_Index
Loop
{
WinActivate, %cIHH%
ControlGetText,History,Edit2,%cIHH%
Loop, Parse, History, `n
{
IfEqual, A_Index,3, break
aHistData%A_Index% = %A_LoopField%
}
Pos := InStr(aHistData2,cSrch,0,0)
StringMid,TableName,aHistData2,8,(Pos-8)
StringMid,GameID,aHistData1,18,10
If (TableName = prevTableName) and (GameID = prevGameID)
break
prevTableName:= TableName
prevGameID:= GameID
FileAppend,
(
%History%
),%cFileName%%FileID%.txt
WinActivate, %cIHH%
ControlFocus, %cPSTable%,%cIHH%
Send {Down}
}
lastGameID := (prevGameID - 10000)
WinMinimizeAll
Sleep, %cSleep%

}
return



; Finds last hand from previous loop
FindLastGameID:
ControlGetText,History,Edit2,%cIHH%
StringMid,GameID,History,18,10
Loop
{
If (GameID > lastGameID)
{
Send {PgUp 4}
break
}
else
{
Send {PgDn 2}
ControlGetText,History,Edit2,%cIHH%
StringMid,GameID,History,18,10
}
}
return

--- END SCRIPT ---

Then I clicked autoit to open this script.
Autoit popup says "Unterminated string in file C:\Documents and settings \Desktop\ps.auto3-new.txt,line9"

Can anybody help me?

Tx

[HighSteaks]

Graycat=DOUBLEDRAG=Steamroller=goldfish1144 [img]/images/graemlins/laugh.gif[/img]

[highwayfrog]

I'm not Graycat=DOUBLEDRAG=Steamroller.
i don't know u.
but i've been reading ur many helpful replies to other members.
i never expect this odd reply from u.

[HighSteaks]

It's a joke, might want to leave your screen name off lol.

[poker_n00b]

in the instant hand history window: if you script grabs the same hand over and over, you need to unfocus the list menu by clicking on a hand, in a window below.

The script grabs everytime from the beginning. and then it creates multiple hh files for me. this is overkill. it should remember at which hand it stopped grabbing the previous cycle

[M4ST0R]

[ QUOTE ]
in the instant hand history window: if you script grabs the same hand over and over, you need to unfocus the list menu by clicking on a hand, in a window below.

The script grabs everytime from the beginning. and then it creates multiple hh files for me. this is overkill. it should remember at which hand it stopped grabbing the previous cycle

[/ QUOTE ]
I've got the same problem.

[erazorXP]

I´ve modified the script a bit, and it seems that everything is working fine now, especially the "find last game" feature.

try this and tell me if works out for you.


[ QUOTE ]

; auto-execute

cIHH = Instant Hand History
cPSTable = Afx:400000:28:10013:0:01 ;table of hands in the IHH window
cSrch = `'
cFileName = C:\Program Files\PokerStars\HandHistory\xxx\CurrData
cSleep = 600000 ;set to 10 min -- change the time interval here
lastGameID = 0


; start IHH grabber loop

Process, priority, , High
loop
{
prevTableName:=
prevGameID:=
WinActivate, %cIHH%
Control,Choose,1,ComboBox1,%cIHH%
ControlFocus, %cPSTable%,%cIHH%
If (lastGameID = 0)
{
Send {PgUp 10}
}
else
{
GoSub FindLastGameID
}
FileID := A_Index
Loop
{
WinActivate, %cIHH%
ControlGetText,History,Edit2,%cIHH%
Loop, Parse, History, `n
{
IfEqual, A_Index,3, break
aHistData%A_Index% = %A_LoopField%
}
Pos := InStr(aHistData2,cSrch,0,0)
StringMid,TableName,aHistData2,8,(Pos-8)
StringMid,GameID,aHistData1,18,10
If (TableName = prevTableName) and (GameID = prevGameID)
break
prevTableName:= TableName
prevGameID:= GameID
FileAppend,
(
%History%
),%cFileName%%FileID%.txt
WinActivate, %cIHH%
ControlFocus, %cPSTable%,%cIHH%
Send {Down}
SetKeyDelay, 1
}
lastGameID := (prevGameID - 100)
WinMinimize, %cIHH%
Sleep, %cSleep%

}
return



; Finds last hand from previous loop
FindLastGameID:
ControlGetText,History,Edit2,%cIHH%
StringMid,GameID,History,18,10
Loop
{
If (GameID > lastGameID)
{
Send {PgUp 3}
break
}
else
{
Send {PgDn 2}
ControlGetText,History,Edit2,%cIHH%
StringMid,GameID,History,18,10
}
}
return



[/ QUOTE ]

[guillaumezur]

does this one work for anyone? where does this write the hands ?

it seems to work on my computer but does not write anything

[erazorXP]

It should write the hands into your hand history folder as CurrData"x".txt ( "x" is a running number)
It is important that you replace "xxx" in this line with your exact Stars Screenname :
cFileName = C:\Program Files\PokerStars\HandHistory\xxx\CurrData