b0b13d200301232257378068.pl.svn-base

A Flash Player with ActionScript support. Write in C and C++. It have two part, one is Player and an

#!/usr/bin/perl
use X11::GUITest qw/
StartApp
WaitWindowViewable
SendKeys
ClickWindow
SetEventSendDelay
/;
# Start gedit application
StartApp('./fplayer -f B0B13D200301232257378068.SWF|grep GetURL');
# Wait for application window to come up and become viewable.
my ($FTestWinId) = WaitWindowViewable('B0B13D200301232257378068.SWF');
if (!$FTestWinId) {
    die("Couldn't find gedit window in time!");
}
SetEventSendDelay(1000);
sleep(8);
 ClickWindow($FTestWinId,12,158,);sleep(2);  ##
 ClickWindow($FTestWinId,127,186,);sleep(2);  ##
 ClickWindow($FTestWinId,241,174,);sleep(2);  ##
 ClickWindow($FTestWinId,394,162,);sleep(2);  ##
 ClickWindow($FTestWinId,540,171,);sleep(2);  ##
 ClickWindow($FTestWinId,593,439,);sleep(2);  ##
 ClickWindow($FTestWinId,11,209,);sleep(2);  ##
 ClickWindow($FTestWinId,342,323,);sleep(2);  ##
 ClickWindow($FTestWinId,592,446,);sleep(2);  ##
 ClickWindow($FTestWinId,5,273,);sleep(2);  ##
 ClickWindow($FTestWinId,598,445,);sleep(2);  ##
 ClickWindow($FTestWinId,598,445,);sleep(2);  ##
 ClickWindow($FTestWinId,598,445,);sleep(2);  ##
 ClickWindow($FTestWinId,598,445,);sleep(2);  ##
 ClickWindow($FTestWinId,598,445,);sleep(2);  ##
 ClickWindow($FTestWinId,598,445,);sleep(2);  ##
 ClickWindow($FTestWinId,598,445,);sleep(2);  ##
 ClickWindow($FTestWinId,598,445,);sleep(2);  ##
 ClickWindow($FTestWinId,18,329,);sleep(2);  ##
 ClickWindow($FTestWinId,579,439,);sleep(2);  ##
 ClickWindow($FTestWinId,101,275,);  ##
sleep(5);`killall fplayer`;