I didn't see much point in this script using your mouse. Here is a version using Get requests.
Note: You will still run into the 49 votes problem.
SCAR Code:
program Voter;
Procedure Vote;
Var
Source: String;
I: Integer;
Begin
While (True) Do
Begin
Source := GetPage('http://answers.polldaddy.com/vote/?va=10&pt=0&r=0&p=2114091&a=10456837,&o=');
Inc(I);
ClearDebug;
WriteLn('Voted ' + IntToStr(I) + ' times.');
WriteLn('*************************');
WriteLn('*****Current Results*****');
WriteLn('*************************');
WriteLn('W' + Between('<h3 style="font-size: 14px;">W', '</h3>', Source));
WriteLn('S' + Between('<h3 style="font-size: 14px;">S', '</h3>', Source));
End;
End;
begin
Vote;
end.