http://qs321.pair.com?node_id=359348

#!/usr/bin/perl # ongekendtalent.nl votingscript use Win32::IEAutomation; use LWP::Simple; # get username $username = getlogin(); print "Ingelogd als $username\n"; # what's the url $url = "http://www.ongekendtalent.nl/clubs/clubstek/clubstek.asp?clubI +D=19787"; # config for cookies $some_dir = "C:/Documents and Settings/$username/Cookies"; ###################################################################### # the program clearcookie(); openinternet(); stemoppaspoort(); for ($a=1; $a<6; $a++) { checkstemming(); } #subroutines ###################################################################### # Open the page sub openinternet{ $ie = Win32::IEAutomation->new( visible => 1, maximize => 0); $ie->gotoURL("$url"); } ###################################################################### # Cookies clearing to vote again sub clearcookie{ opendir(DIR, $some_dir) || die "can't opendir $some_dir: $!"; @dots = grep { /\.txt/ && -f "$some_dir/$_" } readdir(DIR); closedir DIR; foreach $cookie(@dots){ #print "$cookie\n"; if ($cookie =~ /ongekendtalent/gi){ unlink "$some_dir/$cookie"; print "\n$some_dir/$cookie deleted\n"; } } } ###################################################################### +# # check if I voted again # I'm using LWP cause if you click on an undef value Win32::IEAutomati +on stops # sub checkstemming { print "check stemming!\n"; $content = get $url; die "Couldn't get $url" unless defined $content; if($content =~ m/Stem op dit nummer/) { stemnu(); } else { daghoor(); } } ###################################################################### +# # Find hyperlinks an click the with 'linktext:' option with pattern ma +tching sub stemnu{ $ie->getLink('linktext:', qr/Stem op dit nummer/)->Click; print "gestemd op mp3!\n"; } ###################################################################### +# # Close explorer and get out sub daghoor{ print "Je hebt al gestemd!\n"; $ie->closeIE(); exit; } ###################################################################### +# # Vote on passport sub stemoppaspoort{ $ie->getRadio('beforetext:', "Complimenten")->Select; $ie->getButton('caption:', "STEM!")->Click; print "Gestemd op paspoort!\n"; }
#!/usr/bin/perl -w # teabag.pl # yup here's a nice cartoon of me use SWF::Element; use SWF::File; use strict; my $text = "TEABAG's Picture:"; die "This script creates 'teabag.swf' SWF file. A new file name is nee +ded.\n" unless $ARGV[0]; my $new = SWF::File->new("$ARGV[0].swf"); # teabag.swf SWF header $new->Version(4); $new->FrameSize( 0, 0, 3000, 3000 ); $new->FrameRate(12); #$new->FrameCount(1); # teabag.swf SWF tags # Tag No.: 0 SWF::Element::Tag::SetBackgroundColor->new( BackgroundColor => SWF::Element::RGB->new( Red => 255, Green => 255, Blue => 255, ), )->pack($new); # Tag No.: 1 SWF::Element::Tag::DefineShape->new( ShapeID => 1, ShapeBounds => SWF::Element::RECT->new( Xmin => -20, Ymin => -20, Xmax => 3020, Ymax => 3020, ), Shapes => SWF::Element::SHAPEWITHSTYLE1->new( FillStyles => SWF::Element::Array::FILLSTYLEARRAY1->new( [ SWF::Element::FILLSTYLE1->new( FillStyleType => 0, Color => SWF::Element::RGB->new( Red => 255, Green => 153, Blue => 0, ), ), SWF::Element::FILLSTYLE1->new( FillStyleType => 0, Color => SWF::Element::RGB->new( Red => 255, Green => 255, Blue => 153, ), ), SWF::Element::FILLSTYLE1->new( FillStyleType => 0, Color => SWF::Element::RGB->new( Red => 204, Green => 204, Blue => 102, ), ), SWF::Element::FILLSTYLE1->new( FillStyleType => 0, Color => SWF::Element::RGB->new( Red => 204, Green => 255, Blue => 255, ), ), ] ), LineStyles => SWF::Element::Array::LINESTYLEARRAY1->new( [ SWF::Element::LINESTYLE1->new( Width => 20, Color => SWF::Element::RGB->new( Red => 0, Green => 0, Blue => 0, ), ), SWF::Element::LINESTYLE1->new( Width => 40, Color => SWF::Element::RGB->new( Red => 0, Green => 0, Blue => 0, ), ), SWF::Element::LINESTYLE1->new( Width => 10, Color => SWF::Element::RGB->new( Red => 0, Green => 0, Blue => 0, ), ), ] ), ShapeRecords => SWF::Element::Array::SHAPERECORDARRAY1->new( [ SWF::Element::SHAPERECORD1::STYLECHANGERECORD->new( MoveDeltaX => 2723, MoveDeltaY => 542, FillStyle0 => 4, LineStyle => 1, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -2349, DeltaY => 0, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 0, DeltaY => -437, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 2349, DeltaY => 0, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 0, DeltaY => 437, ), SWF::Element::SHAPERECORD1::STYLECHANGERECORD->new( MoveDeltaX => 3000, MoveDeltaY => 2120, FillStyle0 => 0, FillStyle1 => 3, LineStyle => 2, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 0, DeltaY => 880, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -3000, DeltaY => 0, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 0, DeltaY => -880, ), SWF::Element::SHAPERECORD1::STYLECHANGERECORD->new( FillStyle1 => 4, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 0, DeltaY => -2120, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 3000, DeltaY => 0, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 0, DeltaY => 2120, ), SWF::Element::SHAPERECORD1::STYLECHANGERECORD->new( FillStyle0 => 3, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -3000, DeltaY => 0, ), ] ), ), )->pack($new); # Tag No.: 2 SWF::Element::Tag::PlaceObject2->new( Flags => 6, Depth => 1, CharacterID => 1, Matrix => SWF::Element::MATRIX->new( ScaleX => 1, ScaleY => 1, RotateSkew0 => 0, RotateSkew1 => 0, TranslateX => 0, TranslateY => 0, ), )->pack($new); # Tag No.: 3 SWF::Element::Tag::DefineFont2->new( FontID => 2, FontFlags => 16, LanguageCode => 0, FontName => "Arial", )->pack($new); # Tag No.: 4 SWF::Element::Tag::DefineEditText->new( CharacterID => 3, Bounds => SWF::Element::RECT->new( Xmin => -40, Ymin => -40, Xmax => 2140, Ymax => 364, ), Flags => 8325, FontID => 2, FontHeight => 240, TextColor => SWF::Element::RGBA->new( Red => 0, Green => 0, Blue => 0, Alpha => 255, ), Align => 0, LeftMargin => 0, RightMargin => 0, Indent => 0, Leading => 40, VariableName => "text", InitialText => "$text", )->pack($new); # Tag No.: 5 SWF::Element::Tag::PlaceObject2->new( Flags => 6, Depth => 2, CharacterID => 3, Matrix => SWF::Element::MATRIX->new( ScaleX => 1, ScaleY => 1, RotateSkew0 => 0, RotateSkew1 => 0, TranslateX => 505, TranslateY => 182, ), )->pack($new); # Tag No.: 6 SWF::Element::Tag::DefineShape2->new( ShapeID => 4, ShapeBounds => SWF::Element::RECT->new( Xmin => 115, Ymin => 948, Xmax => 2991, Ymax => 3016, ), Shapes => SWF::Element::SHAPEWITHSTYLE2->new( FillStyles => SWF::Element::Array::FILLSTYLEARRAY2->new( [ SWF::Element::FILLSTYLE1->new( FillStyleType => 0, Color => SWF::Element::RGB->new( Red => 255, Green => 153, Blue => 0, ), ), ] ), LineStyles => SWF::Element::Array::LINESTYLEARRAY2->new( [ SWF::Element::LINESTYLE1->new( Width => 10, Color => SWF::Element::RGB->new( Red => 0, Green => 0, Blue => 0, ), ), ] ), ShapeRecords => SWF::Element::Array::SHAPERECORDARRAY2->new( [ SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 126, MoveDeltaY => 2100, FillStyle1 => 1, LineStyle => 1, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -6, ControlDeltaY => -46, AnchorDeltaX => 0, AnchorDeltaY => -50, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => 0, ControlDeltaY => -292, AnchorDeltaX => 206, AnchorDeltaY => -206, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => 206, ControlDeltaY => -206, AnchorDeltaX => 292, AnchorDeltaY => 0, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => 292, ControlDeltaY => 0, AnchorDeltaX => 206, AnchorDeltaY => 206, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => 206, ControlDeltaY => 206, AnchorDeltaX => 0, AnchorDeltaY => 292, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -6, DeltaY => 96, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( LineStyle => 0, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -1396, DeltaY => 0, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 0, MoveDeltaY => 0, FillStyle0 => 0, FillStyle1 => 0, LineStyle => 0, FillStyles => SWF::Element::Array::FILLSTYLEARRAY2 +->new( [ SWF::Element::FILLSTYLE1->new( FillStyleType => 0, Color => SWF::Element::RGB->ne +w( Red => 185, Green => 134, Blue => 49, ), ), SWF::Element::FILLSTYLE1->new( FillStyleType => 0, Color => SWF::Element::RGB->ne +w( Red => 204, Green => 153, Blue => 51, ), ), SWF::Element::FILLSTYLE1->new( FillStyleType => 0, Color => SWF::Element::RGB->ne +w( Red => 255, Green => 255, Blue => 255, ), ), SWF::Element::FILLSTYLE1->new( FillStyleType => 0, Color => SWF::Element::RGB->ne +w( Red => 0, Green => 0, Blue => 0, ), ), SWF::Element::FILLSTYLE1->new( FillStyleType => 0, Color => SWF::Element::RGB->ne +w( Red => 160, Green => 115, Blue => 41, ), ), SWF::Element::FILLSTYLE1->new( FillStyleType => 0, Color => SWF::Element::RGB->ne +w( Red => 51, Green => 51, Blue => 51, ), ), ] ), LineStyles => SWF::Element::Array::LINESTYLEARRAY2 +->new( [ SWF::Element::LINESTYLE1->new( Width => 20, Color => SWF::Element::RGB->new( Red => 0, Green => 0, Blue => 0, ), ), ] ), ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 2888, MoveDeltaY => 3006, FillStyle0 => 1, LineStyle => 1, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 50, DeltaY => -193, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 7, DeltaY => -68, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => 0, ControlDeltaY => -27, AnchorDeltaX => 10, AnchorDeltaY => -26, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => 52, ControlDeltaY => -138, AnchorDeltaX => -51, AnchorDeltaY => -141, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -9, ControlDeltaY => -28, AnchorDeltaX => -3, AnchorDeltaY => -30, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -37, DeltaY => -343, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -23, ControlDeltaY => -189, AnchorDeltaX => -104, AnchorDeltaY => -157, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -39, ControlDeltaY => -57, AnchorDeltaX => -47, AnchorDeltaY => -51, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -102, DeltaY => -116, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -19, DeltaY => -22, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -28, ControlDeltaY => -102, AnchorDeltaX => -82, AnchorDeltaY => -60, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -5, ControlDeltaY => -4, AnchorDeltaX => -7, AnchorDeltaY => -1, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -68, ControlDeltaY => -1, AnchorDeltaX => -42, AnchorDeltaY => 59, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -16, DeltaY => 26, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -64, ControlDeltaY => 125, AnchorDeltaX => -53, AnchorDeltaY => 127, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( FillStyle1 => 2, LineStyle => 0, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => 528, ControlDeltaY => 367, AnchorDeltaX => 102, AnchorDeltaY => 581, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 50, DeltaY => 469, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( FillStyle0 => 0, LineStyle => 1, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -273, DeltaY => 0, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -134, DeltaY => 0, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( FillStyle1 => 0, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -68, DeltaY => 0, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( FillStyle1 => 2, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -473, DeltaY => 0, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -37, ControlDeltaY => -145, AnchorDeltaX => -85, AnchorDeltaY => -125, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -11, ControlDeltaY => -16, AnchorDeltaX => -5, AnchorDeltaY => -19, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -20, ControlDeltaY => -83, AnchorDeltaX => -6, AnchorDeltaY => -86, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -6, DeltaY => -38, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -27, ControlDeltaY => -95, AnchorDeltaX => -20, AnchorDeltaY => -97, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -5, ControlDeltaY => -23, AnchorDeltaX => 1, AnchorDeltaY => -23, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => 1, ControlDeltaY => -109, AnchorDeltaX => -61, AnchorDeltaY => -85, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -24, ControlDeltaY => -32, AnchorDeltaX => -34, AnchorDeltaY => -18, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -73, ControlDeltaY => -35, AnchorDeltaX => -80, AnchorDeltaY => -16, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -28, ControlDeltaY => -6, AnchorDeltaX => -25, AnchorDeltaY => -19, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -27, DeltaY => -20, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( FillStyle1 => 0, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -15, DeltaY => -12, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( FillStyle1 => 2, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -31, DeltaY => -6, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( FillStyle1 => 0, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -14, DeltaY => -2, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( FillStyle1 => 2, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -108, ControlDeltaY => 50, AnchorDeltaX => -83, AnchorDeltaY => 83, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -9, DeltaY => 10, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -6, ControlDeltaY => 97, AnchorDeltaX => -99, AnchorDeltaY => 25, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -34, DeltaY => -4, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -78, ControlDeltaY => -33, AnchorDeltaX => -5, AnchorDeltaY => -87, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -3, ControlDeltaY => -60, AnchorDeltaX => 25, AnchorDeltaY => -57, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -63, DeltaY => 14, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -57, ControlDeltaY => -50, AnchorDeltaX => -15, AnchorDeltaY => -77, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -18, ControlDeltaY => -88, AnchorDeltaX => 52, AnchorDeltaY => -73, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 50, DeltaY => -68, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => 19, ControlDeltaY => -26, AnchorDeltaX => -4, AnchorDeltaY => -33, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -11, ControlDeltaY => -82, AnchorDeltaX => 71, AnchorDeltaY => -27, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => 15, ControlDeltaY => -6, AnchorDeltaX => 7, AnchorDeltaY => -13, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => 72, ControlDeltaY => -146, AnchorDeltaX => 155, AnchorDeltaY => -47, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( FillStyle1 => 0, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -15, DeltaY => -14, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 2208, MoveDeltaY => 1589, FillStyle0 => 2, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -11, ControlDeltaY => -108, AnchorDeltaX => -46, AnchorDeltaY => -99, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -12, DeltaY => -27, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => 98, ControlDeltaY => -56, AnchorDeltaX => 37, AnchorDeltaY => -107, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => 9, ControlDeltaY => -25, AnchorDeltaX => 0, AnchorDeltaY => -29, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => 1, ControlDeltaY => -39, AnchorDeltaX => -14, AnchorDeltaY => -35, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -65, DeltaY => -106, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -59, DeltaY => 106, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -86, DeltaY => 51, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( FillStyle1 => 2, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 37, DeltaY => 38, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 2060, MoveDeltaY => 1115, FillStyle1 => 0, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -77, DeltaY => -51, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -92, ControlDeltaY => -51, AnchorDeltaX => -113, AnchorDeltaY => 4, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -95, ControlDeltaY => 5, AnchorDeltaX => -87, AnchorDeltaY => 42, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -108, DeltaY => 63, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( FillStyle1 => 5, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -103, DeltaY => 32, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( FillStyle1 => 0, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -172, DeltaY => 30, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( FillStyle1 => 2, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 0, DeltaY => 42, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 1881, MoveDeltaY => 1322, FillStyle0 => 3, FillStyle1 => 3, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 7, DeltaY => 7, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( FillStyle1 => 4, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 5, DeltaY => 1, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 4, DeltaY => 10, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -1, ControlDeltaY => 14, AnchorDeltaX => -11, AnchorDeltaY => 8, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -15, DeltaY => 5, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -8, DeltaY => 2, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -19, ControlDeltaY => -18, AnchorDeltaX => 11, AnchorDeltaY => -23, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( FillStyle1 => 2, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -37, DeltaY => 8, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -50, DeltaY => 13, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -25, DeltaY => 8, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 8, DeltaY => 15, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 17, DeltaY => 24, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 18, DeltaY => 16, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 22, DeltaY => 8, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 46, DeltaY => 4, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => 25, ControlDeltaY => -2, AnchorDeltaX => 23, AnchorDeltaY => -14, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 18, DeltaY => -12, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 18, DeltaY => -20, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => 14, ControlDeltaY => -26, AnchorDeltaX => 2, AnchorDeltaY => -28, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -25, ControlDeltaY => -11, AnchorDeltaX => -26, AnchorDeltaY => 6, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -21, DeltaY => 5, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -8, DeltaY => 2, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( FillStyle1 => 4, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -3, DeltaY => 2, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -12, ControlDeltaY => 8, AnchorDeltaX => 8, AnchorDeltaY => 12, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 9, DeltaY => 4, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 6, DeltaY => -3, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => 14, ControlDeltaY => -7, AnchorDeltaX => -7, AnchorDeltaY => -11, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 1873, MoveDeltaY => 1324, FillStyle0 => 4, FillStyle1 => 2, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -19, DeltaY => 4, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 1971, MoveDeltaY => 1431, FillStyle0 => 2, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -29, DeltaY => 48, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -15, DeltaY => 22, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -19, DeltaY => 16, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -20, ControlDeltaY => 10, AnchorDeltaX => -22, AnchorDeltaY => 0, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -52, DeltaY => -4, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -23, ControlDeltaY => -6, AnchorDeltaX => -19, AnchorDeltaY => -16, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -17, ControlDeltaY => -15, AnchorDeltaX => -9, AnchorDeltaY => -22, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -11, DeltaY => -31, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 2009, MoveDeltaY => 1367, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -17, ControlDeltaY => -21, AnchorDeltaX => -23, AnchorDeltaY => -15, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -16, DeltaY => -9, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 2252, MoveDeltaY => 2347, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -81, ControlDeltaY => -99, AnchorDeltaX => 3, AnchorDeltaY => -129, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => 3, ControlDeltaY => -90, AnchorDeltaX => 17, AnchorDeltaY => -87, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => 35, ControlDeltaY => -176, AnchorDeltaX => -21, AnchorDeltaY => -177, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 2615, MoveDeltaY => 3006, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -19, DeltaY => -137, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -48, ControlDeltaY => -15, AnchorDeltaX => -11, AnchorDeltaY => -50, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -26, DeltaY => 0, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 2632, MoveDeltaY => 2454, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -34, ControlDeltaY => 112, AnchorDeltaX => -62, AnchorDeltaY => 103, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -55, DeltaY => 97, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 86, DeltaY => -69, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 1385, MoveDeltaY => 1159, FillStyle0 => 0, FillStyle1 => 5, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -19, ControlDeltaY => -42, AnchorDeltaX => 17, AnchorDeltaY => -42, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 5, DeltaY => -11, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 13, DeltaY => -18, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 12, DeltaY => 18, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 75, DeltaY => 63, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 1742, MoveDeltaY => 1357, FillStyle0 => 2, FillStyle1 => 2, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -50, DeltaY => 17, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -50, DeltaY => 6, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -31, ControlDeltaY => -4, AnchorDeltaX => -11, AnchorDeltaY => -29, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -3, ControlDeltaY => -10, AnchorDeltaX => 2, AnchorDeltaY => -10, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => 2, ControlDeltaY => -20, AnchorDeltaX => 9, AnchorDeltaY => -17, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => 6, ControlDeltaY => -11, AnchorDeltaX => 9, AnchorDeltaY => -7, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => 10, ControlDeltaY => -7, AnchorDeltaX => 11, AnchorDeltaY => -4, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 1213, MoveDeltaY => 1189, FillStyle1 => 0, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -32, DeltaY => 9, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( FillStyle1 => 2, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 20, DeltaY => 33, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 1213, MoveDeltaY => 1189, FillStyle0 => 0, FillStyle1 => 0, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 0, DeltaY => -29, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 1017, MoveDeltaY => 1397, FillStyle0 => 2, FillStyle1 => 2, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 14, DeltaY => -43, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 10, DeltaY => -25, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => 12, ControlDeltaY => -24, AnchorDeltaX => 28, AnchorDeltaY => -10, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 13, DeltaY => -5, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 1204, MoveDeltaY => 1455, FillStyle1 => 6, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -20, DeltaY => 6, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -23, DeltaY => 3, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -13, DeltaY => -1, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 24, DeltaY => -16, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 25, DeltaY => -18, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 16, DeltaY => -16, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => 20, ControlDeltaY => -21, AnchorDeltaX => 28, AnchorDeltaY => 11, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -14, DeltaY => 17, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -17, ControlDeltaY => 21, AnchorDeltaX => -26, AnchorDeltaY => 14, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 1308, MoveDeltaY => 1445, FillStyle1 => 2, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -24, DeltaY => 35, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -16, DeltaY => 21, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -20, DeltaY => 18, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -22, ControlDeltaY => 18, AnchorDeltaX => -28, AnchorDeltaY => 4, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -39, DeltaY => 4, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -47, DeltaY => -11, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -24, DeltaY => -6, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 1323, MoveDeltaY => 1892, FillStyle1 => 0, LineStyle => 0, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -1, DeltaY => 6, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 1323, MoveDeltaY => 1892, FillStyle0 => 0, FillStyle1 => 2, LineStyle => 1, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -15, DeltaY => 4, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 1349, MoveDeltaY => 1634, FillStyle0 => 2, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => 51, ControlDeltaY => -43, AnchorDeltaX => 63, AnchorDeltaY => -8, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 26, DeltaY => 4, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => 12, ControlDeltaY => 6, AnchorDeltaX => 5, AnchorDeltaY => 13, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 4, DeltaY => 23, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 0, DeltaY => 59, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 1373, MoveDeltaY => 1908, FillStyle1 => 0, LineStyle => 0, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -5, DeltaY => 8, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 1373, MoveDeltaY => 1908, FillStyle0 => 0, FillStyle1 => 2, LineStyle => 1, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -20, DeltaY => -4, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 1439, MoveDeltaY => 1652, FillStyle0 => 2, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -23, ControlDeltaY => 61, AnchorDeltaX => -54, AnchorDeltaY => 39, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -48, ControlDeltaY => 34, AnchorDeltaX => -44, AnchorDeltaY => 39, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -101, ControlDeltaY => 85, AnchorDeltaX => -128, AnchorDeltaY => 29, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( FillStyle1 => 6, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -57, DeltaY => 143, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -39, ControlDeltaY => -20, AnchorDeltaX => -7, AnchorDeltaY => -57, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -11, DeltaY => -70, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( FillStyle1 => 2, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -19, DeltaY => -15, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -35, ControlDeltaY => -72, AnchorDeltaX => 21, AnchorDeltaY => -81, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => 19, ControlDeltaY => -70, AnchorDeltaX => 39, AnchorDeltaY => -63, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 1676, MoveDeltaY => 1878, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -149, ControlDeltaY => 49, AnchorDeltaX => -154, AnchorDeltaY => -19, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 1415, MoveDeltaY => 1830, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -37, ControlDeltaY => 46, AnchorDeltaX => -55, AnchorDeltaY => 16, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 940, MoveDeltaY => 1440, FillStyle1 => 6, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 4, DeltaY => 6, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 2, DeltaY => 11, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -18, ControlDeltaY => 25, AnchorDeltaX => -30, AnchorDeltaY => -1, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => 7, ControlDeltaY => -19, AnchorDeltaX => 14, AnchorDeltaY => -13, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 21, DeltaY => -9, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 1041, MoveDeltaY => 1939, FillStyle0 => 6, FillStyle1 => 2, ), SWF::Element::SHAPERECORDn::CURVEDEDGERECORD->new( ControlDeltaX => -50, ControlDeltaY => 17, AnchorDeltaX => -51, AnchorDeltaY => -17, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -13, DeltaY => -4, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 1106, MoveDeltaY => 2003, FillStyle0 => 2, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 2, DeltaY => 36, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 2596, MoveDeltaY => 2869, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 18, DeltaY => 6, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => 18, DeltaY => 6, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 2481, MoveDeltaY => 3006, FillStyle0 => 0, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -47, DeltaY => -130, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -21, DeltaY => 130, ), SWF::Element::SHAPERECORD2::STYLECHANGERECORD->new( MoveDeltaX => 2481, MoveDeltaY => 2766, FillStyle0 => 2, ), SWF::Element::SHAPERECORDn::STRAIGHTEDGERECORD->new( DeltaX => -47, DeltaY => 110, ), ] ), ), )->pack($new); # Tag No.: 7 SWF::Element::Tag::PlaceObject2->new( Flags => 6, Depth => 4, CharacterID => 4, Matrix => SWF::Element::MATRIX->new( ScaleX => 1, ScaleY => 1, RotateSkew0 => 0, RotateSkew1 => 0, TranslateX => 0, TranslateY => 0, ), )->pack($new); # Tag No.: 8 SWF::Element::Tag::ShowFrame->new()->pack($new); # Tag No.: 9 SWF::Element::Tag::End->new()->pack($new); $new->close;