rj
2013-04-01 18:32:16
So I am getting Uptext to work on Soulsplit, but I am having trouble getting it to reconize white text, sometimes it works, other times it does not!
Accuracy chart:
White Text: 30% Accuracy
Blue Text: 70% Accuracy [40% in some areas 100% in others..]
Yellow Text: 40% Accuracy
Orange Text: Not sure yet
Here is the code I'm using:
Up chars are at the bottom in-case I'm doing something wrong
Accuracy chart:
White Text: 30% Accuracy
Blue Text: 70% Accuracy [40% in some areas 100% in others..]
Yellow Text: 40% Accuracy
Orange Text: Not sure yet
Here is the code I'm using:
Function SS_GetUpText: String;
Var
WhiteT,BlueT,YellowT,OrangeT,FoundText: String;
Begin
WhiteT:=GetTextAtExWrap(8, 7, 131, 28, 0, 4, 1, 14670296, 18, 'SSUpChars');
BlueT:=GetTextAtExWrap(8, 7, 131, 28, 0, 4, 1, 15722768, 27, 'SSUpChars');
YellowT:=GetTextAtExWrap(8, 7, 131, 28, 0, 4, 1, 582114, 22, 'SSUpChars');
OrangeT:=GetTextAtExWrap(8, 7, 131, 28, 0, 4, 1, 4161758, 24, 'SSUpChars');
FoundText:=WhiteT + ' ' + BlueT + YellowT + OrangeT;
FoundText:= ReplaceWrap(FoundText, '.', '',[rfReplaceAll]);
FoundText:= ReplaceWrap(FoundText, '/', '',[rfReplaceAll]);
FoundText:= ReplaceWrap(FoundText, '\', '',[rfReplaceAll]);
FoundText:= ReplaceWrap(FoundText, ',', '',[rfReplaceAll]);
FoundText:= ReplaceWrap(FoundText, '*', '',[rfReplaceAll]);
FoundText:= ReplaceWrap(FoundText, '^', '',[rfReplaceAll]);
FoundText:= ReplaceWrap(FoundText, '"', '',[rfReplaceAll]);
Result:=FoundText;
End;Up chars are at the bottom in-case I'm doing something wrong