b1b11d200301240418081950.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
/;
# Start gedit application
StartApp('./fplayer -f B1b11D200301240418081950.SWF|grep GetURL');
# Wait for application window to come up and become viewable.
my ($FTestWinId) = WaitWindowViewable('B1b11D200301240418081950.SWF');
if (!$FTestWinId) {
    die("Couldn't find gedit window in time!");
}
sleep(4);
 ClickWindow($FTestWinId,151,285,);sleep(2);  ##
 ClickWindow($FTestWinId,319,285,);sleep(2);  ##
 ClickWindow($FTestWinId,481,216,);sleep(2);  ##
 ClickWindow($FTestWinId,66,441,);sleep(2);  ##
 ClickWindow($FTestWinId,142,305,);sleep(2);  ##
 ClickWindow($FTestWinId,215,377,);sleep(2);  ##
 ClickWindow($FTestWinId,190,277,);sleep(2);  ##
 ClickWindow($FTestWinId,246,372,);sleep(2);  ##
 ClickWindow($FTestWinId,528,460,);sleep(2);  ##
 ClickWindow($FTestWinId,214,312,);sleep(2);  ##
 ClickWindow($FTestWinId,159,436,);sleep(2);  ##
 ClickWindow($FTestWinId,280,307,);sleep(2);  ##
 ClickWindow($FTestWinId,185,311,);sleep(2);  ##
 ClickWindow($FTestWinId,554,432,);sleep(2);  ##
 ClickWindow($FTestWinId,570,449,);sleep(2);  ##
 ClickWindow($FTestWinId,278,437,);sleep(2);  ##
 ClickWindow($FTestWinId,288,298,);sleep(2);  ##
 ClickWindow($FTestWinId,353,189,);sleep(2);  ##
 ClickWindow($FTestWinId,342,272,);sleep(2);  ##
 ClickWindow($FTestWinId,388,446,);sleep(2);  ##
 ClickWindow($FTestWinId,373,390,);sleep(2);  ##
 ClickWindow($FTestWinId,373,390,);sleep(2);  ##
 ClickWindow($FTestWinId,374,394,);sleep(2);  ##
 ClickWindow($FTestWinId,578,453,);sleep(2);  ##
sleep(5);`killall fplayer`;