int main(int argc, char** argv) { SWFMovie mo; SWFMovieClip mc_red1, mc_red2, mc_red3, mc_red4, mc_red5, dejagnuclip; SWFDisplayItem it_red1, it_red2, it_red3, it_red4, it_red5; SWFShape sh_red; const char *srcdir="."; if ( argc>1 ) srcdir=argv[1]; else { fprintf(stderr, "Usage: %s <mediadir>\n", argv[0]); return 1; } Ming_init(); mo = newSWFMovieWithVersion(OUTPUT_VERSION); SWFMovie_setDimension(mo, 800, 600); SWFMovie_setRate (mo, 12.0); dejagnuclip = get_dejagnu_clip((SWFBlock)get_default_font(srcdir), 10, 0, 0, 800, 600); SWFMovie_add(mo, (SWFBlock)dejagnuclip); SWFMovie_nextFrame(mo); /* 1st frame */ mc_red1 = newSWFMovieClip(); sh_red = make_fill_square (0, 300, 60, 60, 255, 0, 0, 255, 0, 0); SWFMovieClip_add(mc_red1, (SWFBlock)sh_red); add_clip_actions(mc_red1, " _root.x1 += \"depth10+\"; "); SWFMovieClip_nextFrame(mc_red1); /* mc_red1, 1st frame */ add_clip_actions(mc_red1, " _root.x2 += \"depth10+\"; stop(); "); SWFMovieClip_nextFrame(mc_red1); /* mc_red1, 2nd frame */ mc_red2 = newSWFMovieClip(); sh_red = make_fill_square (80, 300, 60, 60, 255, 0, 0, 255, 0, 0); SWFMovieClip_add(mc_red2, (SWFBlock)sh_red); add_clip_actions(mc_red2, " _root.x1 += \"depth12+\"; "); SWFMovieClip_nextFrame(mc_red2); /* mc_red2, 1st frame */ add_clip_actions(mc_red2, " _root.x2 += \"depth12+\"; stop(); "); SWFMovieClip_nextFrame(mc_red2); /* mc_red2, 2nd frame */ mc_red3 = newSWFMovieClip(); sh_red = make_fill_square (160, 300, 60, 60, 255, 0, 0, 255, 0, 0); SWFMovieClip_add(mc_red3, (SWFBlock)sh_red); add_clip_actions(mc_red3, " _root.x1 += \"depth11+\"; "); SWFMovieClip_nextFrame(mc_red3); /* mc_red3, 1st frame */ add_clip_actions(mc_red3, " _root.x2 += \"depth11+\"; stop();"); SWFMovieClip_nextFrame(mc_red3); /* mc_red3, 2nd frame */ /* add mc_red1 to _root and name it as "mc_red1" */ it_red1 = SWFMovie_add(mo, (SWFBlock)mc_red1); SWFDisplayItem_setDepth(it_red1, 10); SWFDisplayItem_setName(it_red1, "mc_red1"); /* add mc_red2 to _root and name it as "mc_red2" */ it_red2 = SWFMovie_add(mo, (SWFBlock)mc_red2); SWFDisplayItem_setDepth(it_red2, 12); SWFDisplayItem_setName(it_red2, "mc_red2"); /* add mc_red3 to _root and name it as "mc_red3" */ it_red3 = SWFMovie_add(mo, (SWFBlock)mc_red3); SWFDisplayItem_setDepth(it_red3, 11); SWFDisplayItem_setName(it_red3, "mc_red3"); SWFMovie_nextFrame(mo); /* 2nd frame */ /* Action order is not dependent on DisplayList depth here! */ check_equals(mo, "_root.x1", "'depth10+depth12+depth11+'"); SWFMovie_nextFrame(mo); /* 3rd frame */ mc_red4 = newSWFMovieClip(); sh_red = make_fill_square (240, 300, 60, 60, 255, 0, 0, 255, 0, 0); SWFMovieClip_add(mc_red4, (SWFBlock)sh_red); add_clip_actions(mc_red4, " _root.x2 += \"depth9+\"; "); SWFMovieClip_nextFrame(mc_red4); /* mc_red4, 1st frame */ /* add mc_red4 to _root and name it as "mc_red4" */ it_red4 = SWFMovie_add(mo, (SWFBlock)mc_red4); SWFDisplayItem_setDepth(it_red4, 9); SWFDisplayItem_setName(it_red4, "mc_red4"); mc_red5 = newSWFMovieClip(); sh_red = make_fill_square (240, 300, 60, 60, 255, 0, 0, 255, 0, 0); SWFMovieClip_add(mc_red5, (SWFBlock)sh_red); add_clip_actions(mc_red5, " _root.x2 += \"depth13+\"; "); SWFMovieClip_nextFrame(mc_red5); /* mc_red4, 1st frame */ /* add mc_red5 to _root and name it as "mc_red5" */ it_red5 = SWFMovie_add(mo, (SWFBlock)mc_red5); SWFDisplayItem_setDepth(it_red5, 13); SWFDisplayItem_setName(it_red5, "mc_red4"); SWFMovie_nextFrame(mo); /* 4th frame */ check_equals(mo, "_root.x2", "'depth11+depth12+depth10+depth9+depth13+'"); add_actions(mo, " _root.totals(); stop(); "); SWFMovie_nextFrame(mo); /* 5th frame */ //Output movie puts("Saving " OUTPUT_FILENAME ); SWFMovie_save(mo, OUTPUT_FILENAME); return 0; }
int main(int argc, char** argv) { SWFMovie movie; SWFMovieClip dejagnuclip; SWFAction ac[FRAME_COUNT]; SWFDisplayItem it; SWFMovieClip mc1; int i; const char *srcdir="."; if ( argc>1 ) srcdir=argv[1]; else { fprintf(stderr, "Usage: %s <mediadir>\n", argv[0]); return 1; } Ming_init(); movie = newSWFMovie(); SWFMovie_setDimension(movie, 800, 600); dejagnuclip = get_dejagnu_clip((SWFBlock)get_default_font(srcdir), 10, 0, 0, 800, 600); SWFMovie_add(movie, (SWFBlock)dejagnuclip); // Add frame ActionScipts to frames ac[0] = action_in_frame1(); ac[1] = action_in_frame2(); ac[2] = action_in_frame3(); ac[3] = action_in_frame4(); for(i=0; i<FRAME_COUNT; i++) { SWFMovie_add(movie, (SWFBlock)ac[i]); SWFMovie_nextFrame(movie); } SWFMovie_add(movie, (SWFBlock)newSWFAction("_level0.ar = [];")); // This checks that a change of target in onEnterFrame code does // not change the target for other code. mc1 = newSWFMovieClip(); SWFMovieClip_add(mc1, (SWFBlock)newSWFAction("this.g = 'moo'; _level0.ar.push(g);")); SWFMovieClip_nextFrame(mc1); SWFMovieClip_add(mc1, (SWFBlock)newSWFAction("_level0.ar.push(g);")); SWFMovieClip_nextFrame(mc1); it = SWFMovie_add(movie, (SWFBlock)mc1); SWFDisplayItem_addAction(it, compileSWFActionCode(" _root.note('onEnterFrame');" " _level0.ar.push('setTarget');" " asm { push '_level0' settargetexpr }; "), SWFACTION_ENTERFRAME); SWFMovie_nextFrame(movie); check_equals(movie, "ar.toString()", "'moo,setTarget,moo'"); SWFMovie_add(movie, (SWFBlock)newSWFAction("_root.totals(); stop();")); SWFMovie_nextFrame(movie); // save files puts("Saving " OUTPUT_FILENAME ); SWFMovie_save(movie, OUTPUT_FILENAME); return 0; }
int main(int argc, char** argv) { SWFMovie mo; SWFMovieClip dejagnuclip; SWFMovieClip mc1, mc11; SWFDisplayItem it1, it11; const char *srcdir="."; if ( argc>1 ) srcdir=argv[1]; else { fprintf(stderr, "Usage: %s <mediadir>\n", argv[0]); return 1; } Ming_init(); mo = newSWFMovieWithVersion(OUTPUT_VERSION); SWFMovie_setDimension(mo, 800, 600); SWFMovie_setRate (mo, 12.0); // _root.frame1 dejagnuclip = get_dejagnu_clip((SWFBlock)get_default_font(srcdir), 10, 0, 0, 800, 600); SWFMovie_add(mo, (SWFBlock)dejagnuclip); add_actions(mo, " x1=0; x2=0; x3=0; x4=0; x5=0; x6=0; x7=0; x8=0; x9=0; x10=0; "); SWFMovie_nextFrame(mo); // // _root.frame2: define movieclips and some functions. // // Define mc11 mc11 = newSWFMovieClip(); add_clip_actions(mc11, " func1 = function () { _root.x1=1; _root.x2=this; }; " "stop();"); SWFMovieClip_nextFrame(mc11); add_clip_actions(mc11, "_root.x3 = 1; stop();"); SWFMovieClip_nextFrame(mc11); add_clip_actions(mc11, "_root.x4 = 1; stop();"); SWFMovieClip_nextFrame(mc11); // Define mc1, add mc11 to mc1 mc1 = newSWFMovieClip(); it11 = SWFMovieClip_add(mc1, (SWFBlock)mc11); SWFDisplayItem_setDepth(it11, 3); SWFDisplayItem_setName(it11, "mc11"); add_clip_actions(mc1, " func2 = function () { _root.x5=1; _root.x6=this; }; " "stop();"); SWFMovieClip_nextFrame(mc1); add_clip_actions(mc1, "_root.x7 = 1; stop();"); SWFMovieClip_nextFrame(mc1); add_clip_actions(mc1, "_root.x8 = 1; stop();"); SWFMovieClip_nextFrame(mc1); // place mc1 it1 = SWFMovie_add(mo, (SWFBlock)mc1); SWFDisplayItem_setDepth(it1, 4); SWFDisplayItem_setName(it1, "mc1"); SWFMovie_nextFrame(mo); // // _root.frame3: invoke function calls // add_actions(mo, "asm{" "push 0 " "push '_root.mc1.mc11.func1' " // valid format "callfunction " "};"); add_actions(mo, "asm{" "push 2 " "push 1 " "push '_root.mc1.mc11.gotoAndStop' " // valid format "callfunction " "};"); add_actions(mo, "asm{" "push 0 " "push '_root.mc1:func2' " // valid format "callfunction " "};"); add_actions(mo, "asm{" "push 2 " "push 1 " "push '/mc1/:gotoAndStop' " // valid format "callfunction " "};"); add_actions(mo, "asm{" "push 3 " "push 1 " "push '/_root/mc1/mc11/gotoAndStop' " // *invalid* format "callfunction " "};"); add_actions(mo, "asm{" "push 3 " "push 1 " "push '_root:mc1:gotoAndStop' " // valid format "callfunction " "};"); SWFMovie_nextFrame(mo); // // _root.frame4: check if the function call succeeded // check_equals(mo, "_root.x1", "1"); check_equals(mo, "_root.x2", "_root.mc1.mc11"); check_equals(mo, "_root.x3", "1"); check_equals(mo, "_root.x4", "0"); check_equals(mo, "_root.x5", "1"); check_equals(mo, "_root.x6", "_root.mc1"); check_equals(mo, "_root.x7", "1"); check_equals(mo, "_root.x8", "1"); add_actions(mo, " _root.totals(); stop(); "); SWFMovie_nextFrame(mo); //Output movie puts("Saving " OUTPUT_FILENAME ); SWFMovie_save(mo, OUTPUT_FILENAME); return 0; }
int main(int argc, char** argv) { SWFMovie mo; SWFMovieClip mc_red, dejagnuclip; SWFShape sh_red; const char *srcdir="."; if ( argc>1 ) srcdir=argv[1]; else { fprintf(stderr, "Usage: %s <mediadir>\n", argv[0]); return 1; } Ming_init(); mo = newSWFMovieWithVersion(OUTPUT_VERSION); SWFMovie_setDimension(mo, 800, 600); SWFMovie_setRate (mo, 1.0); dejagnuclip = get_dejagnu_clip((SWFBlock)get_default_font(srcdir), 10, 0, 0, 800, 600); SWFMovie_add(mo, (SWFBlock)dejagnuclip); SWFMovie_nextFrame(mo); /* 1st frame - so we can use _root.note */ mc_red = newSWFMovieClip(); sh_red = make_fill_square (0, 300, 60, 60, 255, 0, 0, 255, 0, 0); SWFMovieClip_add(mc_red, (SWFBlock)sh_red); add_clip_actions(mc_red, " _root.note('frm1 of mc_red - gotoAndStop(2)'); " "x = 'as_in_frm1_of_mc_red'; " "gotoAndStop(2); "); SWFMovieClip_nextFrame(mc_red); /* 1st frame */ add_clip_actions(mc_red, " _root.note('frm2 of mc_red - gotoAndStop(3)'); " "x = 'as_in_frm2_of_mc_red'; " "gotoAndStop(3); "); SWFMovieClip_nextFrame(mc_red); /* 2nd frame */ add_clip_actions(mc_red, " _root.note('frm3 of mc_red - gotoAndStop(4)'); " "x = 'as_in_frm3_of_mc_red'; " "gotoAndStop(4); "); SWFMovieClip_nextFrame(mc_red); /* 3rd frame */ SWFMovieClip_nextFrame(mc_red); /* 4th frame */ SWFDisplayItem it_red; it_red = SWFMovie_add(mo, (SWFBlock)mc_red); SWFDisplayItem_setDepth(it_red, 3); SWFDisplayItem_setName(it_red, "mc_red"); add_actions(mo, " _root.note('frm2 of root - gotoAndStop(3)'); " "mc_red.x = 'as_in_frm2_of_root'; " "gotoAndStop(3); "); SWFMovie_nextFrame(mo); /* 2nd frame */ /* mc_red.x has been set after playing the 1st frame, check it here */ add_actions(mo, " check_equals(mc_red.x, 'as_in_frm1_of_mc_red'); " " _root.note('frm3 of root - gotoAndStop(4)');" "mc_red.x = 'as_in_frm3_of_root'; " "gotoAndStop(4); "); SWFMovie_nextFrame(mo); /* 3rd frame */ /* mc_red.x has been set again after playing the 2nd frame, check it again */ add_actions(mo, " check_equals(mc_red.x, 'as_in_frm2_of_mc_red'); " " _root.note('frm4 of root - gotoAndStop(5)');" " mc_red.x = \"as_in_frm4_of_root\"; " " gotoAndStop(5); "); SWFMovie_nextFrame(mo); /* 4th frame */ /* mc_red.x has been set again after playing the 3rd frame, check it again */ check_equals(mo, "mc_red.x", "'as_in_frm3_of_mc_red'"); add_actions(mo, " _root.totals(); stop(); "); SWFMovie_nextFrame(mo); /* 5th frame */ /* Output movie */ puts("Saving " OUTPUT_FILENAME ); SWFMovie_save(mo, OUTPUT_FILENAME); return 0; }
int main(int argc, char** argv) { SWFMovie mo; SWFMovieClip mc1, mc2, mc3, dejagnuclip; SWFShape sh1, sh2, sh3; SWFDisplayItem it1, it2, it3; const char *srcdir="."; if ( argc>1 ) srcdir=argv[1]; else { //fprintf(stderr, "Usage: %s <mediadir>\n", argv[0]); //return 1; } Ming_init(); Ming_useSWFVersion (OUTPUT_VERSION); mo = newSWFMovie(); SWFMovie_setDimension(mo, 800, 600); SWFMovie_setRate(mo, 2); // Frame 1: Place dejagnu clip dejagnuclip = get_dejagnu_clip((SWFBlock)get_default_font(srcdir), 10, 0, 0, 800, 600); SWFMovie_add(mo, (SWFBlock)dejagnuclip); SWFMovie_nextFrame(mo); // Frame 2: Place two static DisplayObjects sh1 = make_fill_square (300, 300, 60, 60, 255, 0, 0, 255, 0, 0); mc1 = newSWFMovieClip(); SWFMovieClip_add(mc1, (SWFBlock)sh1); SWFMovieClip_nextFrame(mc1); sh2 = make_fill_square (330, 270, 120, 120, 0, 0, 0, 0, 0, 0); mc2 = newSWFMovieClip(); SWFMovieClip_add(mc2, (SWFBlock)sh2); SWFMovieClip_nextFrame(mc2); sh3 = make_fill_square (330, 270, 120, 180, 0, 255, 0, 0, 255, 0); mc3 = newSWFMovieClip(); SWFMovieClip_add(mc3, (SWFBlock)sh3); SWFMovieClip_nextFrame(mc3); it1 = SWFMovie_add(mo, (SWFBlock)mc1); //add movieClip1 to the _root SWFDisplayItem_setName(it1, "movieClip1"); //name movieClip1 SWFDisplayItem_addAction(it1, newSWFAction( "_root.note(this+' constructed');" "_root.mc1Constructed++;" ), SWFACTION_CONSTRUCT); SWFDisplayItem_setDepth(it1, 3); // depth of movieClip1 is 3 (-16381) it2 = SWFMovie_add(mo, (SWFBlock)mc2); //add movieClip2 to the _root SWFDisplayItem_setName(it2, "movieClip2"); //name movieClip2 SWFDisplayItem_addAction(it2, newSWFAction( "_root.note(this+' constructed');" "_root.mc2Constructed++;"), SWFACTION_CONSTRUCT); SWFDisplayItem_setDepth(it2, 30000); // depth of movieClip2 is 30000 (13616) it3 = SWFMovie_add(mo, (SWFBlock)mc3); //add movieClip3 to the _root SWFDisplayItem_setName(it3, "movieClip3"); //name movieClip3 SWFDisplayItem_addAction(it3, newSWFAction( "_root.note(this+' constructed');" "_root.mc3Constructed++;"), SWFACTION_CONSTRUCT); SWFDisplayItem_setDepth(it3, 30001); // depth of movieClip3 is 30001 (13617) SWFMovie_add(mo, (SWFBlock)newSWFAction( "check_equals(movieClip3.getDepth(), 13617);" )); SWFMovie_nextFrame(mo); // Frame4: RemoveObject(mc3) - one of those out of static depth zone SWFDisplayItem_remove(it3); // Frame4: gotoAndStop(1), check.. SWFMovie_add(mo, (SWFBlock)newSWFAction( "var mc1_depth = movieClip1.getDepth();" "var mc2_depth = movieClip2.getDepth();" "movieClip1.secretCode = 'mc1';" "movieClip2.secretCode = 'mc2';" "check_equals(movieClip1.getDepth(), -16381);" "check_equals(movieClip2.getDepth(), 13616);" // movieClip3 was removed, despite it's depth is out of the static zone "check_equals(typeof(movieClip3), 'undefined');" "gotoAndStop(1);" // MC1 (in static depth zone) has been removed "check_equals(typeof(movieClip1), 'undefined');" // MC2 (in dynamic depth zone) has been kept "check_equals(typeof(movieClip2), 'movieclip');" // The kept instance wasn't detroyed "check_equals(movieClip2.secretCode, 'mc2');" // Both chars have been constructed once (consistency check) "check_equals(mc1Constructed, 1);" "check_equals(mc2Constructed, 1);" "totals(9);" )); SWFMovie_nextFrame(mo); //Output movie puts("Saving " OUTPUT_FILENAME ); SWFMovie_save(mo, OUTPUT_FILENAME); return 0; }
int main(int argc, char** argv) { SWFMovie mo; SWFMovieClip mc3, mc2, dejagnuclip; SWFAction ac, ac1, initac; SWFDisplayItem it; SWFShape sha; const char *srcdir="."; if (argc > 1) srcdir = argv[1]; else { fprintf(stderr, "Usage: %s <mediadir>\n", argv[0]); return 1; } Ming_init(); mo = newSWFMovieWithVersion(OUTPUT_VERSION); SWFMovie_setDimension(mo, 800, 600); SWFMovie_setRate (mo, 12.0); sha = newSWFShape(); // Character ID 2. Has 1 showframe. Is exported first. mc2 = newSWFMovieClip(); SWFMovieClip_add(mc2, (SWFBlock)sha); SWFMovieClip_nextFrame(mc2); // Export it. SWFMovie_addExport(mo, (SWFBlock)mc2, "C2"); SWFMovie_writeExports(mo); // Main timeline actions for frame 1 add_actions(mo, "var c = 0; var i = 0; trace('frame 1'); gotoAndStop(3);"); initac = newSWFAction("trace('onInitialize'); _root.i++;"); // ID 3 is defined here. It has no showframe. It is exported immediately. mc3 = newSWFMovieClip(); SWFMovie_addExport(mo, (SWFBlock)mc3, "ctor"); SWFMovie_writeExports(mo); dejagnuclip = get_dejagnu_clip((SWFBlock)get_default_font(srcdir), 10, 0, 0, 800, 600); SWFMovie_add(mo, (SWFBlock)dejagnuclip); // Init actions for ID 3. This only exists to create the constructor // for mc2 in its initactions. ac = newSWFAction( " _global.ctor = function () {" " super();" " trace('Object ID 2 is constructed');" " c += 1;" " };" ); SWFInitAction ia = newSWFInitAction_withId(ac, 3); SWFMovie_add(mo, (SWFBlock)ia); // Init actions for ID 2 (registered class) ac1 = newSWFAction("Object.registerClass('C2', ctor); " "trace('Registered class');"); ia = newSWFInitAction_withId(ac1, 2); SWFMovie_add(mo, (SWFBlock)ia); // Frame 2 SWFMovie_nextFrame(mo); add_actions(mo, "trace('Frame 2');"); // Place object ID 2. it = SWFMovie_add(mo, (SWFBlock)mc2); SWFDisplayItem_setName(it, "mc2"); SWFDisplayItem_addAction(it, initac, SWFACTION_INIT); // Frame 3 SWFMovie_nextFrame(mo); // Remove object ID 2 SWFMovie_remove(mo, it); add_actions(mo, "trace('frame 3');"); // The class should not be constructed if the object is removed after // being placed. It should be constructed if it's not removed. MovieClips // with an onUnload handler are always constructed. check_equals(mo, "c", "0"); check_equals(mo, "i", "0"); check(mo, "_root.mc2 == undefined"); add_actions(mo, "gotoAndPlay(5);"); // Frame 4 SWFMovie_nextFrame(mo); add_actions(mo, "trace('Frame 4');"); // Place object ID 2 again it = SWFMovie_add(mo, (SWFBlock)mc2); SWFDisplayItem_setName(it, "mc2a"); SWFDisplayItem_addAction(it, initac, SWFACTION_INIT); // Frame 5 SWFMovie_nextFrame(mo); // This time the MovieClip was not removed before we get here, // so it should be present and the constructor should be // called. add_actions(mo, "trace('frame 5');"); check_equals(mo, "c", "1"); check_equals(mo, "i", "1"); check(mo, "typeof(_root.mc2a) == 'movieclip'"); add_actions(mo, "stop();"); SWFMovie_nextFrame(mo); puts("Saving " OUTPUT_FILENAME ); SWFMovie_save(mo, OUTPUT_FILENAME); return 0; }
int main(int argc, char** argv) { SWFMovie mo; SWFMovieClip mc1, mc2, dejagnuclip; SWFDisplayItem it1, it2; const char *srcdir="."; if ( argc>1 ) srcdir=argv[1]; else { fprintf(stderr, "Usage: %s <mediadir>\n", argv[0]); return 1; } Ming_init(); mo = newSWFMovieWithVersion(OUTPUT_VERSION); SWFMovie_setDimension(mo, 800, 600); SWFMovie_setRate (mo, 12.0); dejagnuclip = get_dejagnu_clip((SWFBlock)get_default_font(srcdir), 10, 0, 0, 800, 600); SWFMovie_add(mo, (SWFBlock)dejagnuclip); add_actions(mo, "testvar1 = 0; testvar2 = 0;"); SWFMovie_nextFrame(mo); // frame1 mc1 = newSWFMovieClip(); SWFMovieClip_nextFrame(mc1); it1 = SWFMovie_add(mo, (SWFBlock)mc1); SWFDisplayItem_setName(it1, "static_mc1"); SWFDisplayItem_addAction(it1, newSWFAction( " this.createEmptyMovieClip('dyn1', 100); " " _root.check_equals(dyn1.getDepth(), 100);" " _root.dyn1Ref = dyn1;" // shouldn't be executed. " dyn1.onUnload = function () { _root.check(false); } ;" "trace(this);" ), SWFACTION_UNLOAD); mc2 = newSWFMovieClip(); SWFMovieClip_nextFrame(mc2); it2 = SWFMovie_add(mo, (SWFBlock)mc2); SWFDisplayItem_setName(it2, "static_mc2"); SWFDisplayItem_addAction(it2, newSWFAction( " this.createEmptyMovieClip('dyn2', 200); " " _root.check_equals(dyn2.getDepth(), 200);" " dyn2.onUnload = function () {_root.dyn2testvar = 'executed'; } ;" ), SWFACTION_ONLOAD); SWFDisplayItem_addAction(it2, newSWFAction( " _root.check_equals(_level0.dyn1Ref.getDepth(), 100);" " _level0.dyn1Ref.swapDepths(101); " // Check that we can still swap the new child created in onClipUnload(mc1) // Note mc1 is already unloaded(this is in mc2.unload). " _root.check_equals(_level0.dyn1Ref.getDepth(), 101);" ), SWFACTION_UNLOAD); SWFMovie_nextFrame(mo); // frame2 SWFDisplayItem_remove(it1); SWFDisplayItem_remove(it2); SWFMovie_nextFrame(mo); // frame3 check_equals(mo, "typeof(_root.dyn1Ref)", "'movieclip'"); check_equals(mo, "_root.dyn1Ref.valueof()", "null"); // check that dyn2.onUnload was triggered check_equals(mo, "_root.dyn2testvar", "'executed'"); SWFMovie_nextFrame(mo); // frame4 add_actions(mo, " _root.totals(7); stop(); "); SWFMovie_nextFrame(mo); // frame5 //Output movie puts("Saving " OUTPUT_FILENAME ); SWFMovie_save(mo, OUTPUT_FILENAME); return 0; }
int main(int argc, char** argv) { SWFMovie mo; SWFMovieClip dejagnuclip, staticSquare; SWFShape shape; SWFDisplayItem it; if ( argc>1 ) mediadir=argv[1]; else { fprintf(stderr, "Usage: %s <mediadir>\n", argv[0]); return 1; } Ming_init(); Ming_useSWFVersion (OUTPUT_VERSION); mo = newSWFMovie(); SWFMovie_setDimension(mo, 800, 600); if (mo == NULL) return -1; addRedSquareExport(mo); add_actions(mo, "_root.onKeyDown = _root.onMouseUp = function() {" "play(); }; " "Key.addListener(_root);"); SWFMovie_setRate(mo, 12); dejagnuclip = get_dejagnu_clip( (SWFBlock)get_default_font(mediadir), 10, 10, 150, 800, 600); SWFMovie_add(mo, (SWFBlock)dejagnuclip); SWFMovie_nextFrame(mo); add_actions(mo, "BitmapData = flash.display.BitmapData;" "Rectangle = flash.geom.Rectangle;" "bmp = new BitmapData(150, 150, false);" "rect = new Rectangle(10, 10, 100, 100);" "bmp.fillRect(rect, 0x00ff00);" "mc = _root.createEmptyMovieClip('mc', getNextHighestDepth());" "d = mc.getNextHighestDepth();" "mc.attachBitmap(bmp, d);" "bmp2 = new BitmapData(20, 20, true);" "rect2 = new Rectangle (10, 10, 20, 20);" "bmp2.fillRect(rect2, 0xffffff00);" "d2 = mc.getNextHighestDepth();" "mc.attachBitmap(bmp2, d2);" "note('1. You should see a small yellow square in the top left " "corner of a larger green square. Click to proceed.');" "stop();" ); SWFMovie_nextFrame(mo); add_actions(mo, "rect = new Rectangle (90, 90, 120, 120);" "bmp.fillRect(rect, 0x0000FF);" "note('2. You should see a new blue square covering the " "bottom right corner of the large green square. Click" " to proceed.');" "stop();" ); SWFMovie_nextFrame(mo); add_actions(mo, "mc.createEmptyMovieClip('d', d);" "note('3. You should see just the small yellow square in the top " "left corner. Click to proceed.');"); add_actions(mo, "stop();"); SWFMovie_nextFrame(mo); // Place a dynamic DisplayObject at depth 4 add_actions(mo, "mc.removeMovieClip();" "_root.attachMovie('redsquare', 'rs', 4);"); // Place a static DisplayObject at depth 3 staticSquare = newSWFMovieClip(); shape = make_fill_square (300, 0, 60, 60, 255, 0, 255, 255, 0, 255); SWFMovieClip_add(staticSquare, (SWFBlock)shape); SWFMovieClip_nextFrame(staticSquare); it = SWFMovie_add(mo, (SWFBlock)staticSquare); SWFDisplayItem_setDepth(it, 3); SWFDisplayItem_setName(it, "staticSquare"); add_actions(mo, "note('4. You should see a red square in the top left and a " "purple square in the top right. Click to proceed.');"); add_actions(mo, "stop();"); SWFMovie_nextFrame(mo); add_actions(mo, "staticSquare.swapDepths(20);" "note('5. There should have been no change. Click to proceed.');" "stop();" ); SWFMovie_nextFrame(mo); add_actions(mo, "_root.attachBitmap(bmp, 2);" "note('6. You should see the green and blue squares " "under the red square. The purple square should still be there. " "Click to proceed.');" "stop();" ); SWFMovie_nextFrame(mo); add_actions(mo, "_root.attachBitmap(bmp, 3);" "note('7. There should have been no change. Click to proceed.');" "stop();" ); SWFMovie_nextFrame(mo); SWFDisplayItem_remove(it); add_actions(mo, "_root.attachBitmap(bmp2, 20);" "note('8. The purple square should have gone. The small yellow " "square should have replaced the top left corner of the red " "square. The green and blue squares should still be there. " "Click to proceed.');" "stop();" ); SWFMovie_nextFrame(mo); add_actions(mo, "bmp.dispose(); bmp2.dispose();" "note('9. You should see just the red square. Click to proceed.');" "stop();" ); SWFMovie_nextFrame(mo); add_actions(mo, "bmp = new BitmapData(100, 100, false, 0x0000ff);" "note('10. There should have been no change. Click to proceed.');" "stop();" ); SWFMovie_nextFrame(mo); add_actions(mo, "bmp3 = new BitmapData(100, 100, false);" "rect3 = new Rectangle(20, 20, 90, 90);" "bmp3.fillRect(rect3, 0x0000ff);" "ch = _root.createEmptyMovieClip('original', 40);" "original.attachBitmap(bmp3, getNextHighestDepth());" "ch._name = 'duplicate';" "newch = _root.createEmptyMovieClip('original', " "getNextHighestDepth());" "note('11. You should see a large blue square only. " "Click to proceed.');" "stop();" ); SWFMovie_nextFrame(mo); add_actions(mo, "original.removeMovieClip();" "note('12. There should have been no change. Click to proceed.');" "stop();" ); SWFMovie_nextFrame(mo); add_actions(mo, "duplicate.removeMovieClip();" "note('13. You should see the red square again. Click to " "proceed.');" "stop();" ); SWFMovie_nextFrame(mo); add_actions(mo, "_root.createEmptyMovieClip('mcLeft', getNextHighestDepth());" "mcLeft.duplicateMovieClip('mcMiddle', getNextHighestDepth()," " { _x: 300, _y: 0 } );" "mcLeft.attachBitmap(bmp3, getNextHighestDepth());" "mcMiddle.attachBitmap(bmp3, getNextHighestDepth());" "mcMiddle.duplicateMovieClip('mcRight', getNextHighestDepth()," " { _x: 600, _y: 0 } );" "note('14. You should see two blue squares. Click to proceed.');" "stop();" ); SWFMovie_nextFrame(mo); add_actions(mo, "bmp3.noise(293);" "note('15. You should see two noise patterns where the two " "squares were. Click to proceed.');" "stop();" ); add_actions(mo, "_root.onKeyDown = _root.onMouseUp = undefined;" "_root.eof = true;" // hook for test runner... "note(' - END OF TEST - thanks for flying with us ! ');" //"totals(6);" // no AS based tests... ); SWFMovie_nextFrame(mo); //Output movie puts("Saving " OUTPUT_FILENAME ); SWFMovie_save(mo, OUTPUT_FILENAME); return 0; }
int main(int argc, char** argv) { SWFMovie mo; SWFMovieClip mc1, mc2, dejagnuclip; SWFShape sh1, sh2; SWFDisplayItem it1, it2; const char *srcdir="."; if ( argc>1 ) srcdir=argv[1]; else { fprintf(stderr, "Usage: %s <mediadir>\n", argv[0]); return 1; } Ming_init(); mo = newSWFMovieWithVersion(OUTPUT_VERSION); SWFMovie_setDimension(mo, 800, 600); SWFMovie_setRate (mo, 12.0); dejagnuclip = get_dejagnu_clip((SWFBlock)get_default_font(srcdir), 10, 0, 0, 800, 600); SWFMovie_add(mo, (SWFBlock)dejagnuclip); add_actions(mo, "testvar1 = 0; testvar2 = 0;"); SWFMovie_nextFrame(mo); // frame1 // // Define movieClips // mc1 = newSWFMovieClip(); sh1 = make_fill_square (100, 100, 60, 60, 255, 0, 0, 255, 0, 0); SWFMovieClip_add(mc1, (SWFBlock)sh1); SWFMovieClip_nextFrame(mc1); mc2 = newSWFMovieClip(); sh2 = make_fill_square (300, 100, 60, 60, 255, 0, 0, 0, 255, 0); SWFMovieClip_add(mc2, (SWFBlock)sh2); SWFMovieClip_nextFrame(mc2); SWFMovie_nextFrame(mo); // frame2 // // Place mc1 at depth 3, place mc1 at depth3 again with a different name; // Observed behaviour: later place does not create a new DisplayObject // it1 = SWFMovie_add(mo, (SWFBlock)mc1); SWFDisplayItem_setDepth(it1, 3); SWFDisplayItem_setName(it1, "static_mc1"); SWFDisplayItem_addAction(it1, newSWFAction(" _root.testvar1++; trace(this); trace(_root.testvar1); "), SWFACTION_INIT | SWFACTION_CONSTRUCT | SWFACTION_ONLOAD); it2 = SWFMovie_add(mo, (SWFBlock)mc2); SWFDisplayItem_setDepth(it2, 3); SWFDisplayItem_setName(it2, "static_mc2"); SWFDisplayItem_addAction(it2, newSWFAction(" _root.testvar2++; trace(this); trace(_root.testvar2); "), SWFACTION_INIT | SWFACTION_CONSTRUCT | SWFACTION_ONLOAD); check_equals(mo, "typeof(static_mc1)", "'movieclip'"); if(OUTPUT_VERSION > 5) { // check that "static_mc2" doesn't get placed check_equals(mo, "typeof(static_mc2)", "'undefined'"); } else { // check that "static_mc2" does get placed check_equals(mo, "typeof(static_mc2)", "'movieclip'"); } SWFMovie_nextFrame(mo); // frame3 if(OUTPUT_VERSION > 5) { check_equals(mo, "testvar1", "3"); check_equals(mo, "testvar2", "0"); } else { // swf5 does not support CONSTRUCT event check_equals(mo, "testvar1", "2"); check_equals(mo, "testvar2", "2"); } // // Place mc2 at depth 3 again. // Observed behaviour: no new DisplayObject gets created // it2 = SWFMovie_add(mo, (SWFBlock)mc2); SWFDisplayItem_setDepth(it2, 3); SWFDisplayItem_setName(it2, "static_mc3"); check_equals(mo, "typeof(static_mc1)", "'movieclip'"); if(OUTPUT_VERSION > 5) { // check that "static_mc3" doesn't get placed check_equals(mo, "typeof(static_mc3)", "'undefined'"); } else { // check that "static_mc3" does get placed check_equals(mo, "typeof(static_mc3)", "'movieclip'"); } SWFMovie_nextFrame(mo); // frame4 // // Place mc1 at depth 3 again with ratio set to 0.2 // Observed behaviour: no new DisplayObject get placed(created). // it2 = SWFMovie_add(mo, (SWFBlock)mc1); SWFDisplayItem_setDepth(it2, 3); SWFDisplayItem_setName(it2, "static_mc4"); SWFDisplayItem_setRatio(it2, 0.2); check_equals(mo, "typeof(static_mc1)", "'movieclip'"); if(OUTPUT_VERSION > 5) { // check that "static_mc4" doesn't get placed. check_equals(mo, "typeof(static_mc4)", "'undefined'"); } else { // check that "static_mc4" does get placed. check_equals(mo, "typeof(static_mc4)", "'movieclip'"); } SWFMovie_nextFrame(mo); // frame5 // // Place mc2 at depth 3 again with ratio set to 0.2 // Observed behaviour: no new DisplayObject get placed(created). // it2 = SWFMovie_add(mo, (SWFBlock)mc2); SWFDisplayItem_setDepth(it2, 3); SWFDisplayItem_setName(it2, "static_mc5"); SWFDisplayItem_setRatio(it2, 0.2); check_equals(mo, "typeof(static_mc1)", "'movieclip'"); if(OUTPUT_VERSION > 5) { // check that "static_mc5" doesn't get placed. check_equals(mo, "typeof(static_mc5)", "'undefined'"); } else { // check that "static_mc5" does get placed. check_equals(mo, "typeof(static_mc5)", "'movieclip'"); } SWFMovie_nextFrame(mo); // frame6 // // Odd, where are the movieclips now? // Note that all those movieclips are defined above but not now. // if(OUTPUT_VERSION <= 5) { add_actions(mo, "check_equals(typeof(static_m1), 'undefined');" "check_equals(typeof(static_m2), 'undefined');" "check_equals(typeof(static_m3), 'undefined');" "check_equals(typeof(static_m4), 'undefined');" "check_equals(typeof(static_m5), 'undefined');" ); } add_actions(mo, " _root.totals(); stop(); "); SWFMovie_nextFrame(mo); // frame7 //Output movie puts("Saving " OUTPUT_FILENAME ); SWFMovie_save(mo, OUTPUT_FILENAME); return 0; }
int main(int argc, char** argv) { SWFMovie mo; SWFMovieClip mc1, mc2, dejagnuclip; SWFShape sh1, sh2; const char *srcdir="."; if ( argc>1 ) srcdir=argv[1]; else { fprintf(stderr, "Usage: %s <mediadir>\n", argv[0]); return 1; } Ming_init(); mo = newSWFMovieWithVersion(OUTPUT_VERSION); SWFMovie_setDimension(mo, 800, 600); SWFMovie_setRate (mo, 12.0); dejagnuclip = get_dejagnu_clip((SWFBlock)get_default_font(srcdir), 10, 0, 0, 800, 600); SWFMovie_add(mo, (SWFBlock)dejagnuclip); add_actions(mo, " _root.x = '0+'; "); SWFMovie_nextFrame(mo); /* 1st frame */ mc1 = newSWFMovieClip(); sh1 = make_fill_square (300, 300, 60, 60, 255, 0, 0, 255, 0, 0); SWFMovieClip_add(mc1, (SWFBlock)sh1); /* add init actions */ add_clip_init_actions(mc1, " _root.note('mc1.init_actions'); " " _root.x += '1+'; " " y = 'var_of_root'; " ); /* add actions */ add_clip_actions(mc1, " _root.note('mc1.actions'); _root.x += '9+'; "); SWFMovieClip_nextFrame(mc1);//1st frame mc2 = newSWFMovieClip(); sh2 = make_fill_square (600, 600, 60, 60, 255, 0, 0, 255, 0, 0); SWFMovieClip_add(mc2, (SWFBlock)sh2); /* add init actions */ add_clip_init_actions(mc2, " _root.note('mc2.init_actions'); _root.x += '3+'; "); /* add actions */ add_clip_actions(mc2, " _root.note('mc2.actions'); _root.x += '11+'; "); SWFMovieClip_nextFrame(mc2);//1st frame /* add mc1 to _root */ SWFDisplayItem it1; it1 = SWFMovie_add(mo, (SWFBlock)mc1); SWFDisplayItem_setDepth(it1, 10); SWFDisplayItem_setName(it1, "mc1"); SWFDisplayItem_addAction(it1, newSWFAction(" _root.note('mc1.onClipInitialize'); _root.x += '2+'; " "_root.check_equals(this.__proto__, MovieClip.prototype);" ), SWFACTION_INIT); SWFDisplayItem_addAction(it1, newSWFAction(" _root.note('mc1.onClipConstruct'); _root.x += '5+'; "), SWFACTION_CONSTRUCT); SWFDisplayItem_addAction(it1, newSWFAction(" _root.note('mc1.onClipLoad'); _root.x += '8+'; "), SWFACTION_ONLOAD); /* add mc2 to _root */ SWFDisplayItem it2; it2 = SWFMovie_add(mo, (SWFBlock)mc2); SWFDisplayItem_setDepth(it2, 11); SWFDisplayItem_setName(it2, "mc2"); SWFDisplayItem_addAction(it2, newSWFAction(" _root.note('mc2.onClipInitialize'); _root.x += '4+'; "), SWFACTION_INIT); SWFDisplayItem_addAction(it2, newSWFAction(" _root.note('mc2.onClipConstruct'); _root.x += '6+'; "), SWFACTION_CONSTRUCT); SWFDisplayItem_addAction(it2, newSWFAction(" _root.note('mc2.onClipLoad'); _root.x += '10+'; "), SWFACTION_ONLOAD); /* add main timeline actions */ add_actions(mo, "_root.note('_root.actions'); _root.x += '7+'; "); SWFMovie_nextFrame(mo); /* 2nd frame */ /* The check below used to succeeds, and started failing when * executing init actions "after" DLIST tags. * Should be fixed if we postpone the call to ::construct * to "after" init actions are executed, which would require * some book keeping in sprite_instance class */ check_equals(mo, "_root.x", "'0+1+2+3+4+5+6+7+8+9+10+11+'"); check_equals(mo, "_root.y", "'var_of_root'"); add_actions(mo, " _root.totals(); stop(); "); SWFMovie_nextFrame(mo); /* 3rd frame */ //Output movie puts("Saving " OUTPUT_FILENAME ); SWFMovie_save(mo, OUTPUT_FILENAME); return 0; }
int main(int argc, char** argv) { SWFMovie mo; SWFDisplayItem it1, it2, it3; SWFDisplayItem it41; SWFDisplayItem it51; SWFMovieClip mc1, mc2, mc3, dejagnuclip; SWFMovieClip mc4, mc41; SWFMovieClip mc5, mc51; SWFShape sh1, sh2, sh3; const char *srcdir="."; if ( argc>1 ) srcdir=argv[1]; else { //fprintf(stderr, "Usage: %s <mediadir>\n", argv[0]); //return 1; } Ming_init(); Ming_useSWFVersion (OUTPUT_VERSION); mo = newSWFMovie(); SWFMovie_setDimension(mo, 800, 600); SWFMovie_setRate(mo, 12); dejagnuclip = get_dejagnu_clip((SWFBlock)get_default_font(srcdir), 10, 0, 0, 800, 600); SWFMovie_add(mo, (SWFBlock)dejagnuclip); add_actions(mo, " haslooped1=false; haslooped2=false; haslooped3=false;" " mc1Initialized=0; mc1Unloaded=0;" " mc2Initialized=0; mc2Unloaded=0;" " mc3Initialized=0; mc3Unloaded=0;" " asOrder='0+';"); SWFMovie_nextFrame(mo); // frame1 sh1 = make_fill_square (100, 100, 60, 60, 255, 0, 0, 255, 0, 0); mc1 = newSWFMovieClip(); SWFMovieClip_add(mc1, (SWFBlock)sh1); SWFMovieClip_nextFrame(mc1); sh2 = make_fill_square (200, 200, 60, 60, 0, 0, 0, 0, 0, 0); mc2 = newSWFMovieClip(); SWFMovieClip_add(mc2, (SWFBlock)sh2); SWFMovieClip_nextFrame(mc2); sh3 = make_fill_square (300, 300, 60, 60, 0, 0, 0, 0, 0, 0); mc3 = newSWFMovieClip(); SWFMovieClip_add(mc3, (SWFBlock)sh3); SWFMovieClip_nextFrame(mc3); it1 = SWFMovie_add(mo, (SWFBlock)mc1); SWFDisplayItem_setName(it1, "mc1"); SWFDisplayItem_setDepth(it1, 100); SWFDisplayItem_addAction(it1, newSWFAction( "_root.note(this+' initialized');" "_root.mc1Initialized++;" "_root.asOrder += '1+';" ), SWFACTION_INIT); SWFDisplayItem_addAction(it1, newSWFAction( "_root.note(this+' unloaded');" "_root.mc1Unloaded++;" "_root.asOrder += '3+';" ), SWFACTION_UNLOAD); SWFMovie_nextFrame(mo); // frame2 SWFDisplayItem_remove(it1); it2 = SWFMovie_add(mo, (SWFBlock)mc2); SWFDisplayItem_setName(it2, "mc2"); SWFDisplayItem_setRatio(it2, 0.1); SWFDisplayItem_setDepth(it2, 100); SWFDisplayItem_addAction(it2, newSWFAction( "_root.note(this+' initialized');" "_root.mc2Initialized++;" "_root.asOrder += '2+';" ), SWFACTION_INIT); SWFDisplayItem_addAction(it2, newSWFAction( "_root.note(this+' unloaded');" "_root.mc2Unloaded++;" "_root.asOrder += '5+';" ), SWFACTION_UNLOAD); SWFMovie_nextFrame(mo); // frame3 SWFDisplayItem_remove(it2); it3 = SWFMovie_add(mo, (SWFBlock)mc3); SWFDisplayItem_setName(it3, "mc3"); SWFDisplayItem_setRatio(it3, 0.2); SWFDisplayItem_setDepth(it3, 100); SWFDisplayItem_addAction(it3, newSWFAction( "_root.note(this+' initialized');" "_root.mc3Initialized++;" "_root.asOrder += '4+';" ), SWFACTION_INIT); SWFDisplayItem_addAction(it3, newSWFAction( "_root.note(this+' unloaded');" "_root.mc3Unloaded++;" ), SWFACTION_UNLOAD); SWFMovie_nextFrame(mo); // frame4 SWFMovie_nextFrame(mo); // frame 5 add_actions(mo, "if(! haslooped1) {" " gotoAndPlay(5);" " haslooped1 = true;" "}" ); SWFMovie_nextFrame(mo); // frame 6 check_equals(mo, "mc1Initialized", "2"); check_equals(mo, "mc2Initialized", "2"); check_equals(mo, "mc3Initialized", "1"); check_equals(mo, "mc1Unloaded", "2"); check_equals(mo, "mc2Unloaded", "2"); check_equals(mo, "mc3Unloaded", "0"); xcheck_equals(mo, "asOrder", "'0+1+2+3+4+5+1+2+3+5+'"); SWFMovie_nextFrame(mo); // frame 7 // // ==case 2== // mc4 = newSWFMovieClip(); mc41 = newSWFMovieClip(); SWFMovieClip_nextFrame(mc41); it41 = SWFMovieClip_add(mc4, (SWFBlock)mc41); add_clip_actions(mc4, "_root.check_equals(this._target, '/instance3');" "inst = this.getInstanceAtDepth(-16383);" "if(! haslooped2) {" " haslooped2 = true;" " _root.check_equals(inst._target, '/instance3/instance4');" "} else {" " _root.check_equals(inst._target, '/instance3/instance5');" " stop();" "}" ); SWFMovieClip_nextFrame(mc4); SWFDisplayItem_remove(it41); SWFMovieClip_nextFrame(mc4); SWFMovie_add(mo, mc4); SWFMovie_nextFrame(mo); // frame 9 SWFMovie_nextFrame(mo); // frame 10 // // ==case 3== // mc5 = newSWFMovieClip(); mc51 = newSWFMovieClip(); SWFMovieClip_nextFrame(mc51); it51 = SWFMovieClip_add(mc5, (SWFBlock)mc51); add_clip_actions(mc5, "_root.check_equals(this._target, '/instance6');" "inst = this.getInstanceAtDepth(-16383);" "if(! haslooped3) {" " haslooped3 = true;" " _root.check_equals(inst._target, '/instance6/instance7');" "} else {" " _root.check_equals(inst._target, '/instance6/instance7');" " stop();" "}" ); SWFMovieClip_nextFrame(mc5); SWFMovieClip_nextFrame(mc5); SWFMovie_add(mo, mc5); SWFMovie_nextFrame(mo); // frame 11 SWFMovie_nextFrame(mo); // frame 12 SWFMovie_nextFrame(mo); // frame 13 mc5 = newSWFMovieClip(); add_clip_actions(mc5, "_root.check_equals(this._target, '/instance9');"); SWFMovieClip_nextFrame(mc5); SWFMovie_add(mo, mc5); SWFMovie_nextFrame(mo); // frame 14 add_actions(mo, "totals(16); stop();"); SWFMovie_nextFrame(mo); // frame 15 //Output movie puts("Saving " OUTPUT_FILENAME ); SWFMovie_save(mo, OUTPUT_FILENAME); return 0; }
int main(int argc, char** argv) { SWFMovie mo; SWFMovieClip mc1, mc2, dejagnuclip; SWFDisplayItem it1, it2; SWFShape sh1,sh2; const char *srcdir="."; if ( argc>1 ) srcdir=argv[1]; else { //fprintf(stderr, "Usage: %s <mediadir>\n", argv[0]); //return 1; } Ming_init(); Ming_useSWFVersion (OUTPUT_VERSION); mo = newSWFMovie(); SWFMovie_setDimension(mo, 800, 600); SWFMovie_setRate(mo, 6); // Frame 1: Place dejagnu clip dejagnuclip = get_dejagnu_clip((SWFBlock)get_default_font(srcdir), 10, 0, 0, 800, 600); SWFMovie_add(mo, (SWFBlock)dejagnuclip); add_actions(mo, "mc1Constructed=0; mc2Constructed=0; mc3Constructed=0;"); SWFMovie_nextFrame(mo); // // Frame 2: // Place red static movieClip1 DisplayObject at depth 3 (-16381) // Place black static movieClip1 DisplayObject at depth 4 (-16380) // sh1 = make_fill_square (300, 300, 60, 60, 255, 0, 0, 255, 0, 0); mc1 = newSWFMovieClip(); SWFMovieClip_add(mc1, (SWFBlock)sh1); SWFMovieClip_nextFrame(mc1); it1 = SWFMovie_add(mo, (SWFBlock)mc1); //add movieClip1 to the _root SWFDisplayItem_setDepth(it1, 3); SWFDisplayItem_setName(it1, "movieClip1"); //name movieClip1 SWFDisplayItem_addAction(it1, newSWFAction( "_root.note(this+' constructed');" "_root.mc1Constructed++;" ), SWFACTION_CONSTRUCT); sh2 = make_fill_square (330, 270, 120, 120, 0, 0, 0, 0, 0, 0); mc2 = newSWFMovieClip(); SWFMovieClip_add(mc2, (SWFBlock)sh2); SWFMovieClip_nextFrame(mc2); it2 = SWFMovie_add(mo, (SWFBlock)mc2); //add movieClip2 to the _root SWFDisplayItem_setDepth(it2, 4); SWFDisplayItem_setName(it2, "movieClip2"); //name movieClip2 SWFDisplayItem_addAction(it2, newSWFAction( "_root.note(this+' constructed');" "_root.mc2Constructed++;"), SWFACTION_CONSTRUCT); SWFMovie_nextFrame(mo); // Frame3: nothing new SWFMovie_nextFrame(mo); // Frame4: remove "movieClip1" and "movieClip2" SWFDisplayItem_remove(it1); SWFDisplayItem_remove(it2); SWFMovie_nextFrame(mo); // // Frame5: // Place red static movieClip3 DisplayObject at depth 3 (-16381) // Place an empty dynamic movieClip4 DisplayObject at depth4 (-16380) // it1 = SWFMovie_add(mo, (SWFBlock)mc1); //add movieClip3 to the _root SWFDisplayItem_setDepth(it1, 3); SWFDisplayItem_setName(it1, "movieClip3"); //name movieClip3 SWFDisplayItem_setRatio(it1, 2.0); // It's important to set this, don't why yet. SWFDisplayItem_addAction(it1, newSWFAction( "_root.note(this+' constructed');" "_root.mc3Constructed++;" ), SWFACTION_CONSTRUCT); add_actions(mo, "_root.createEmptyMovieClip('movieClip4', -16380);"); SWFMovie_nextFrame(mo); // // Frame4: check, gotoAndStop(3), check.. // check_equals(mo, "typeof(movieClip1)", "'undefined'"); check_equals(mo, "typeof(movieClip2)", "'undefined'"); check_equals(mo, "typeof(movieClip3)", "'movieclip'"); check_equals(mo, "typeof(movieClip4)", "'movieclip'"); check_equals(mo, "_root.mc1Constructed", "1"); check_equals(mo, "_root.mc2Constructed", "1"); check_equals(mo, "_root.mc3Constructed", "1"); SWFMovie_add(mo, (SWFBlock)newSWFAction( "gotoAndStop(3);")); check_equals(mo, "typeof(movieClip1)", "'movieclip'"); check_equals(mo, "typeof(movieClip2)", "'movieclip'"); check_equals(mo, "typeof(movieClip3)", "'undefined'"); check_equals(mo, "typeof(movieClip4)", "'undefined'"); check_equals(mo, "_root.mc1Constructed", "2"); check_equals(mo, "_root.mc2Constructed", "2"); check_equals(mo, "_root.mc3Constructed", "1"); SWFMovie_add(mo, (SWFBlock)newSWFAction( "totals(); stop();" )); SWFMovie_nextFrame(mo); //Output movie puts("Saving " OUTPUT_FILENAME ); SWFMovie_save(mo, OUTPUT_FILENAME); return 0; }
int main(int argc, char** argv) { SWFMovie mo; SWFMovieClip mc1, mc11, mc2, dejagnuclip; SWFDisplayItem it1, it11, it2; const char *srcdir="."; if ( argc>1 ) srcdir=argv[1]; else { fprintf(stderr, "Usage: %s <mediadir>\n", argv[0]); return 1; } Ming_init(); mo = newSWFMovieWithVersion(OUTPUT_VERSION); SWFMovie_setDimension(mo, 800, 600); SWFMovie_setRate (mo, 12.0); dejagnuclip = get_dejagnu_clip((SWFBlock)get_default_font(srcdir), 10, 0, 0, 800, 600); SWFMovie_add(mo, (SWFBlock)dejagnuclip); SWFMovie_nextFrame(mo); // 1st frame /* add mc1, mc2 to the main movie */ mc1 = newSWFMovieClip(); mc11 = newSWFMovieClip(); SWFMovieClip_nextFrame(mc11); it11 = SWFMovieClip_add(mc1, (SWFBlock)mc11); SWFDisplayItem_setDepth(it11, 10); SWFDisplayItem_setName(it11, "mc11"); SWFMovieClip_nextFrame(mc1); add_clip_actions(mc1, "duplicateMovieClip('mc11', 'dup_ch1', 1);" "_root.check_equals(typeof(dup_ch1), 'movieclip');" "duplicateMovieClip('/_root/mc1/mc11', 'dup_ch2', 2);" "_root.check_equals(typeof(dup_ch2), 'movieclip');" "duplicateMovieClip('/:_root/:mc1/:mc11', 'dup_ch3', 3);" "_root.check_equals(typeof(dup_ch3), 'movieclip');" "duplicateMovieClip('mc2', 'dup_ch4', 4);" // can not duplicate a movie clip in a different time "_root.check_equals(typeof(dup_ch4), 'undefined');" "duplicateMovieClip('/:mc2', 'dup_ch5', 5);" // can not duplicate a movie clip in a different time "_root.check_equals(typeof(dup_ch5), 'undefined');" // Don't do this, duplicate a self-clip will crash the proprietary player" // "duplicateMovieClip('/:mc1', 'dup_ch6', 6);" "stop();" ); SWFMovieClip_nextFrame(mc1); mc2 = newSWFMovieClip(); SWFMovieClip_nextFrame(mc2); it1 = SWFMovie_add(mo, (SWFBlock)mc1); it2 = SWFMovie_add(mo, (SWFBlock)mc2); SWFDisplayItem_setDepth(it1, 10); SWFDisplayItem_setName(it1, "mc1"); SWFDisplayItem_setDepth(it2, 20); SWFDisplayItem_setName(it2, "mc2"); SWFMovie_nextFrame(mo); // 2nd frame add_actions(mo, "duplicateMovieClip('mc1', 'dup1', 1);"); check_equals(mo, "typeof(dup1)", "'movieclip'"); add_actions(mo, "removeMovieClip(dup1);"); check_equals(mo, "typeof(dup1)", "'undefined'"); add_actions(mo, "duplicateMovieClip('/:mc1', 'dup2', 2);"); check_equals(mo, "typeof(dup2)", "'movieclip'"); add_actions(mo, "removeMovieClip(dup2);"); check_equals(mo, "typeof(dup2)", "'undefined'"); add_actions(mo, "duplicateMovieClip('/:mc1/', 'dup3', 3);"); check_equals(mo, "typeof(dup3)", "'movieclip'"); add_actions(mo, "removeMovieClip(dup3);"); check_equals(mo, "typeof(dup3)", "'undefined'"); add_actions(mo, "duplicateMovieClip('/_root/mc1/', 'dup4', 4);"); check_equals(mo, "typeof(dup4)", "'movieclip'"); add_actions(mo, "removeMovieClip(dup4);"); check_equals(mo, "typeof(dup4)", "'undefined'"); add_actions(mo, "duplicateMovieClip('_root.mc1', 'dup5', 5);"); check_equals(mo, "typeof(dup5)", "'movieclip'"); add_actions(mo, "removeMovieClip(dup5);"); check_equals(mo, "typeof(dup5)", "'undefined'"); add_actions(mo, "duplicateMovieClip('_root.mc1.mc11', 'dup6', 6);"); // can not duplicate a movieclip in a different timeline check_equals(mo, "typeof(dup6)", "'undefined'"); add_actions(mo, "duplicateMovieClip('/_root/mc1/:mc11', 'dup7', 7);"); // can not duplicate a movieclip in a different timeline check_equals(mo, "typeof(dup7)", "'undefined'"); add_actions(mo, "duplicateMovieClip('/_root/mc1/mc11', 'dup8', 8);"); // can not duplicate a movieclip in a different timeline check_equals(mo, "typeof(dup8)", "'undefined'"); SWFMovie_nextFrame(mo); // 3rd frame add_actions(mo, " _root.totals(); stop(); "); SWFMovie_nextFrame(mo); // 4th frame //Output movie puts("Saving " OUTPUT_FILENAME ); SWFMovie_save(mo, OUTPUT_FILENAME); return 0; }
gboolean swf_add_mouse_click(SWFMovie this_movie, gint click_type) { // Local variables gfloat click_duration; guint click_frames; GString *click_name; // The name of the mouse click sound we'll need to play guint i; // Counter GString *message; // Used to construct message strings SWFDisplayItem sound_display_item; FILE *sound_file; // The file we load the sound from SWFMovieClip sound_movie_clip; // Movie clip specifically to hold a sound SWFSoundStream sound_stream; // The sound we use gets loaded into this gchar *sound_pathname = NULL; // Full pathname to a sound file to load is constructed in this SWFAction swf_action; // Used when constructing action script // Initialisation click_name = g_string_new(NULL); // Determine the sound file to load switch (click_type) { case MOUSE_LEFT_ONE: case MOUSE_RIGHT_ONE: case MOUSE_MIDDLE_ONE: // If we've already added the sound to the movie, we don't need to add it again if (FALSE == get_mouse_click_single_added()) { // Single click mouse sound sound_pathname = g_build_path(G_DIR_SEPARATOR_S, SOUND_DIR, "mouse_single_click.mp3", NULL); // Make sure we only add this click sound once set_mouse_click_single_added(TRUE); } click_name = g_string_assign(click_name, "mousesingleclick"); click_duration = 0.5; break; case MOUSE_LEFT_DOUBLE: case MOUSE_RIGHT_DOUBLE: case MOUSE_MIDDLE_DOUBLE: // If we've already added the sound to the movie, we don't need to add it again if (FALSE == get_mouse_click_double_added()) { // Double click mouse sound sound_pathname = g_build_path(G_DIR_SEPARATOR_S, SOUND_DIR, "mouse_double_click.mp3", NULL); // Make sure we only add this click sound once set_mouse_click_double_added(TRUE); } click_name = g_string_assign(click_name, "mousedoubleclick"); click_duration = 0.5; break; case MOUSE_LEFT_TRIPLE: case MOUSE_RIGHT_TRIPLE: case MOUSE_MIDDLE_TRIPLE: // If we've already added the sound to the movie, we don't need to add it again if (FALSE == get_mouse_click_triple_added()) { // Triple click mouse sound sound_pathname = g_build_path(G_DIR_SEPARATOR_S, SOUND_DIR, "mouse_triple_click.mp3", NULL); // Make sure we only add this click sound once set_mouse_click_triple_added(TRUE); } click_name = g_string_assign(click_name, "mousetripleclick"); click_duration = 0.5; break; } if (NULL != sound_pathname) { // Create the sound object we'll be using if (get_debug_level()) printf("%s: '%s'\n", _("Full path name to sound file is"), sound_pathname); // Load the sound file sound_file = fopen(sound_pathname, "rb"); if (NULL == sound_file) { // Something went wrong when loading the sound file, so return message = g_string_new(NULL); g_string_printf(message, "%s ED412: %s", _("Error"), _("Something went wrong when opening a mouse click sound file.")); display_warning(message->str); g_string_free(message, TRUE); return FALSE; } sound_stream = newSWFSoundStream(sound_file); // Create a new movie clip file, containing only the sound sound_movie_clip = newSWFMovieClip(); // Ensure the clip doesn't start out playing nor keep looping swf_action = compileSWFActionCode("this.stop(); "); SWFMovieClip_add(sound_movie_clip, (SWFBlock) swf_action); SWFMovieClip_nextFrame(sound_movie_clip); // Add the sound stream to the sound movie clip SWFMovieClip_setSoundStream(sound_movie_clip, sound_stream, 1); SWFMovieClip_nextFrame(sound_movie_clip); // Add extra frames to allow the click to play it's full length click_frames = roundf(click_duration * get_frames_per_second()); for (i = 0; i < click_frames; i++) { SWFMovieClip_nextFrame(sound_movie_clip); } // Add the sound movie clip to the swf movie sound_display_item = SWFMovie_add(this_movie, (SWFBlock) sound_movie_clip); // Name the display item SWFDisplayItem_setName(sound_display_item, click_name->str); // Ensure the object is at the correct display depth SWFDisplayItem_setDepth(sound_display_item, 1000 + click_type); // Trying to pick a non conflicting depth } // Free the memory allocated in this functions g_string_free(click_name, TRUE); return TRUE; }
/// This test checks the event order of key events. // /// Known listeners are: /// 1. MovieClips with a defined key event /// 2. Button with a defined key event /// 3. Anything added to Key listeners in ActionScript. // /// The test adds objects in this order: // /// Frame 1: /// 1. mc1 /// 3. button1 (responds to 'a') /// 3. o1 (actionscript key listener object) /// 4. mc2 /// /// Frame 2: /// 5. button2 (responds to 'a') /// 6. button3 (responds to 'b') /// 3. o2 (actionscript key listener object) // /// The test shows that, irrespective of construction order: /// 1. MovieClips are notified first /// 2. ActionScript listeners are notified second. /// 3. Buttons are notified last. // /// Additionally: // /// 1. Only one button action can respond to any key. int main(int argc, char** argv) { SWFMovie mo; SWFMovieClip mc, dejagnuclip; SWFButtonRecord br; SWFButton bu; SWFDisplayItem it1, it, it2; SWFShape sh1, sh2; const char *srcdir="."; if ( argc>1 ) srcdir=argv[1]; else { fprintf(stderr, "Usage: %s <mediadir>\n", argv[0]); return 1; } Ming_init(); mo = newSWFMovieWithVersion(OUTPUT_VERSION); SWFMovie_setDimension(mo, 800, 600); SWFMovie_setRate (mo, 12.0); dejagnuclip = get_dejagnu_clip((SWFBlock)get_default_font(srcdir), 10, 0, 0, 800, 600); SWFMovie_add(mo, (SWFBlock)dejagnuclip); SWFMovie_nextFrame(mo); add_actions(mo, "_root.order = '';" "_root.note('Press \"a\" then \"b\"');" "_root.note('Do not press any other keys!');" ); mc = newSWFMovieClip(); it = SWFMovie_add(mo, (SWFBlock)mc); SWFDisplayItem_setName(it, "mc1"); SWFDisplayItem_addAction(it, newSWFAction("trace('mc1'); _root.order += 'mc1,';"), SWFACTION_KEYDOWN); bu = newSWFButton(); sh1 = make_fill_square(200, 0, 40, 40, 0, 0, 0, 0, 0, 0); sh2 = make_fill_square(200, 0, 40, 40, 0, 0, 0, 0, 255, 0); br = SWFButton_addCharacter(bu, (SWFCharacter)sh1, SWFBUTTON_HIT); SWFButtonRecord_setDepth(br, 3); br = SWFButton_addCharacter(bu, (SWFCharacter)sh1, SWFBUTTON_UP); SWFButtonRecord_setDepth(br, 4); br = SWFButton_addCharacter(bu, (SWFCharacter)sh2, SWFBUTTON_OVER); SWFButtonRecord_setDepth(br, 5); SWFButton_addAction(bu, newSWFAction("trace('button1'); _root.order += 'button1,';"), SWFBUTTON_KEYPRESS('a')); it1 = SWFMovie_add(mo, (SWFBlock)bu); SWFDisplayItem_setName(it, "button1"); SWFMovie_add(mo, newSWFAction( "o1 = {};" "o1.onKeyDown = function() {" " trace('o1'); " " _root.order += 'o1,';" "};" "Key.addListener(o1);" )); mc = newSWFMovieClip(); it = SWFMovie_add(mo, (SWFBlock)mc); SWFDisplayItem_setName(it, "mc2"); SWFDisplayItem_addAction(it, newSWFAction("trace('mc2'); _root.order += 'mc2,';"), SWFACTION_KEYDOWN); SWFMovie_nextFrame(mo); // Frame 2 bu = newSWFButton(); sh1 = make_fill_square(240, 0, 40, 40, 0, 0, 0, 0, 0, 0); sh2 = make_fill_square(240, 0, 40, 40, 0, 0, 0, 0, 255, 0); br = SWFButton_addCharacter(bu, (SWFCharacter)sh1, SWFBUTTON_HIT); SWFButtonRecord_setDepth(br, 3); br = SWFButton_addCharacter(bu, (SWFCharacter)sh1, SWFBUTTON_UP); SWFButtonRecord_setDepth(br, 4); br = SWFButton_addCharacter(bu, (SWFCharacter)sh2, SWFBUTTON_OVER); SWFButtonRecord_setDepth(br, 5); SWFButton_addAction(bu, newSWFAction("trace('button2'); _root.order += 'button2,';"), SWFBUTTON_KEYPRESS('a')); it2 = SWFMovie_add(mo, (SWFBlock)bu); SWFDisplayItem_setName(it, "button2"); bu = newSWFButton(); sh1 = make_fill_square(280, 0, 40, 40, 0, 0, 0, 0, 0, 0); sh2 = make_fill_square(280, 0, 40, 40, 0, 0, 0, 0, 255, 0); br = SWFButton_addCharacter(bu, (SWFCharacter)sh1, SWFBUTTON_HIT); SWFButtonRecord_setDepth(br, 3); br = SWFButton_addCharacter(bu, (SWFCharacter)sh1, SWFBUTTON_UP); SWFButtonRecord_setDepth(br, 4); br = SWFButton_addCharacter(bu, (SWFCharacter)sh2, SWFBUTTON_OVER); SWFButtonRecord_setDepth(br, 5); SWFButton_addAction(bu, newSWFAction( "trace('button3'); " "_root.order += 'button3,';" "play();" ), SWFBUTTON_KEYPRESS('b')); it = SWFMovie_add(mo, (SWFBlock)bu); SWFDisplayItem_setName(it, "button3"); SWFMovie_add(mo, newSWFAction( "o2 = {};" "o2.onKeyDown = function() {" " trace('o2'); " " _root.order += 'o2,';" "};" "Key.addListener(o2);" "stop();" )); SWFMovie_nextFrame(mo); xcheck_equals(mo, "_root.order", "'mc2,mc1,o1,o2,button1,mc2,mc1,o1,o2,button3,'"); SWFMovie_nextFrame(mo); SWFDisplayItem_remove(it2); add_actions(mo, "_root.order = '';" "_root.note('Press \"a\" then \"b\" again');" "_root.note('Do not press any other keys!');" "stop();" ); SWFMovie_nextFrame(mo); // Check that removing the second button associated with 'a' does not // remove the key trigger for button2. There's no reason to think it should, // but it could happen if it's implemented badly! check_equals(mo, "_root.order", "'mc2,mc1,o1,o2,button1,mc2,mc1,o1,o2,button3,'"); SWFMovie_add(mo, newSWFAction("stop();")); //Output movie puts("Saving " OUTPUT_FILENAME ); SWFMovie_save(mo, OUTPUT_FILENAME); return 0; }
int main(int argc, char** argv) { SWFMovie mo; SWFMovieClip mc1, mc2, dejagnuclip; SWFDisplayItem it1, it2; SWFShape sh1,sh2; SWFAction ac; int i; const char *srcdir="."; if ( argc>1 ) srcdir=argv[1]; else { //fprintf(stderr, "Usage: %s <mediadir>\n", argv[0]); //return 1; } Ming_init(); Ming_useSWFVersion (OUTPUT_VERSION); mo = newSWFMovie(); SWFMovie_setDimension(mo, 800, 600); SWFMovie_setRate(mo, 6); // Frame 1: Place dejagnu clip dejagnuclip = get_dejagnu_clip((SWFBlock)get_default_font(srcdir), 10, 0, 0, 800, 600); SWFMovie_add(mo, (SWFBlock)dejagnuclip); add_actions(mo, "mc1Constructed=0; mc2Constructed=0; mc3Constructed=0; mc4Constructed=0;"); SWFMovie_nextFrame(mo); // // Frame 2: // Place red static movieClip1 DisplayObject at depth 3 (-16381) // sh1 = make_fill_square (300, 300, 60, 60, 255, 0, 0, 255, 0, 0); mc1 = newSWFMovieClip(); SWFMovieClip_add(mc1, (SWFBlock)sh1); SWFMovieClip_nextFrame(mc1); it1 = SWFMovie_add(mo, (SWFBlock)mc1); //add movieClip1 to the _root SWFDisplayItem_setDepth(it1, 3); SWFDisplayItem_setName(it1, "movieClip1"); //name movieClip1 SWFDisplayItem_addAction(it1, newSWFAction( "_root.note(this+' constructed');" "_root.mc1Constructed++;" ), SWFACTION_CONSTRUCT); SWFDisplayItem_addAction(it1, newSWFAction( "_root.note(this+' unloaded');" "_root.mc1Unloaded++;" ), SWFACTION_UNLOAD); check_equals(mo, "typeof(movieClip1)", "'movieclip'"); check_equals(mo, "_root.mc1Constructed", "1"); SWFMovie_nextFrame(mo); // Frame3: Remove red square SWFDisplayItem_remove(it1); // After compile, the RemoveObject2 tag is *after* the DoAction tag which // contains the following check. So it's not surprise that we can still access // "movieClip1" here when considering the gloabal ActionQueue model! If the // RemoveObject2 is *before* the DoAction, then typeof(movieClip1) will reurn 'undefined'. // So Gnash fails here because of action execution order! // TODO: add testcase for this(RemoveObject2 placed *before* DoAction within the same frame). check_equals(mo, "typeof(movieClip1)", "'movieclip'"); // kept alive for calling onUnload! check_equals(mo, "_root.mc1Constructed", "1"); SWFMovie_nextFrame(mo); // Frame4: nothing new SWFMovie_nextFrame(mo); // Frame5: check, gotoAndStop(4), check.. check_equals(mo, "typeof(movieClip1)", "'undefined'"); SWFMovie_add(mo, (SWFBlock)newSWFAction( "gotoAndStop(4);")); check_equals(mo, "typeof(movieClip1)", "'movieclip'"); // onConstruct is called twice check_equals(mo, "_root.mc1Constructed", "2"); // this is due to action execution order, it's called twice, but // the second time it's called *after* the end of *this* DOACTION block .. check_equals(mo, "_root.mc1Unloaded", "1"); SWFMovie_add(mo, (SWFBlock)newSWFAction( "totals(); stop();" )); SWFMovie_nextFrame(mo); //Output movie puts("Saving " OUTPUT_FILENAME ); SWFMovie_save(mo, OUTPUT_FILENAME); return 0; }
SWFDisplayItem add_button(SWFMovie mo) { SWFDisplayItem it; SWFMovieClip mc; SWFButtonRecord br; SWFShape sh1, sh2, sh3, sh4, sh1a, sh2a, sh3a, sh4a; SWFButton bu = newSWFButton(); static SWFMovieClip ermc; /* Events-reporting mc */ mc = newSWFMovieClip(); if ( ! ermc ) { ermc = newSWFMovieClip(); SWFMovieClip_add(ermc, newSWFAction( "_global.dumpObj = function(o,indent) {" " var s = '';" " if ( typeof(o) == 'object' ) {" " s += '{';" " var first=1;" " for (var i in o) {" " if (!first) s+=',';" " s+= i+':'+dumpObj(o[i]);" " first=0;" " }" " s += '}';" " } else {" " s += o;" " }" " return s;" "};" "if ( _root.buttonChild == undefined ) _root.buttonChild = [];" "var myDepth = getDepth()+16383;" "var myName = ''+this;" "if ( _root.buttonChild[myDepth] == undefined ) _root.buttonChild[myDepth] = {nam:myName,exe:1,uld:0};" "else _root.buttonChild[myDepth]['exe']++;" //"_root.note('Actions in frame0 of '+this+' at depth '+myDepth+' executed.');" "this.onUnload = function() {" " var myDepth = -(getDepth()+32769-16383);" //" _root.note(''+this+' at depth '+myDepth+' unloaded.');" " _root.buttonChild[myDepth]['uld']++;" "};" "for (i in _level0.square1.button) { trace (i); };" //"_root.note('buttonChilds:'+dumpObj(_root.buttonChild));" )); SWFMovieClip_nextFrame(ermc); } sh1 = make_fill_square(0, 0, 40, 40, 0, 0, 0, 0, 0, 0); sh1a = make_fill_square(30, 30, 5, 5, 128, 128, 128, 128, 128, 128); sh2 = make_fill_square(0, 0, 40, 40, 255, 0, 0, 255, 0, 0); sh2a = make_fill_square(30, 30, 5, 5, 128, 0, 0, 128, 0, 0); sh3 = make_fill_square(0, 0, 40, 40, 0, 255, 0, 0, 255, 0); sh3a = make_fill_square(30, 30, 5, 5, 0, 128, 0, 0, 128, 0); sh4 = make_fill_square(0, 0, 40, 40, 255, 255, 0, 255, 255, 0); sh4a = make_fill_square(30, 30, 5, 5, 128, 128, 0, 128, 128, 0); /* Higher depth DisplayObject is intentionally added before lower depth one */ br = SWFButton_addCharacter(bu, (SWFCharacter)sh1a, SWFBUTTON_HIT); SWFButtonRecord_setDepth(br, 2); br = SWFButton_addCharacter(bu, (SWFCharacter)sh1, SWFBUTTON_HIT); SWFButtonRecord_setDepth(br, 1); /* Higher depth DisplayObject is intentionally added before lower depth one */ br = SWFButton_addCharacter(bu, (SWFCharacter)sh2a, SWFBUTTON_UP ); SWFButtonRecord_setDepth(br, 2); br = SWFButton_addCharacter(bu, (SWFCharacter)sh2, SWFBUTTON_UP ); SWFButtonRecord_setDepth(br, 1); /* Higher depth DisplayObject is intentionally added before lower depth one */ br = SWFButton_addCharacter(bu, (SWFCharacter)sh3a, SWFBUTTON_DOWN ); SWFButtonRecord_setDepth(br, 2); br = SWFButton_addCharacter(bu, (SWFCharacter)sh3, SWFBUTTON_DOWN ); SWFButtonRecord_setDepth(br, 1); /* Higher depth DisplayObject is intentionally added before lower depth one */ br = SWFButton_addCharacter(bu, (SWFCharacter)sh4a, SWFBUTTON_OVER ); SWFButtonRecord_setDepth(br, 2); br = SWFButton_addCharacter(bu, (SWFCharacter)sh4, SWFBUTTON_OVER ); SWFButtonRecord_setDepth(br, 1); /* Add events reported DisplayObject in all states at depth 10 */ br = SWFButton_addCharacter(bu, (SWFCharacter)ermc, SWFBUTTON_HIT|SWFBUTTON_DOWN|SWFBUTTON_OVER|SWFBUTTON_UP); SWFButtonRecord_setDepth(br, 10); /* Add events reported DisplayObject just HIT state at depth 11 */ br = SWFButton_addCharacter(bu, (SWFCharacter)ermc, SWFBUTTON_HIT); SWFButtonRecord_setDepth(br, 11); /* Add events reported DisplayObject just UP state at depth 12 */ br = SWFButton_addCharacter(bu, (SWFCharacter)ermc, SWFBUTTON_UP); SWFButtonRecord_setDepth(br, 12); /* Add events reported DisplayObject just OVER state at depth 13 */ br = SWFButton_addCharacter(bu, (SWFCharacter)ermc, SWFBUTTON_OVER); SWFButtonRecord_setDepth(br, 13); /* Add events reported DisplayObject just DOWN state at depth 14 */ br = SWFButton_addCharacter(bu, (SWFCharacter)ermc, SWFBUTTON_DOWN); SWFButtonRecord_setDepth(br, 14); SWFButton_addAction(bu, compileSWFActionCode( "_root.msg='MouseOut';" "if ( _root.testno == 4 || _root.testno == 9 || _root.testno == 14 ) {" " _root.check_equals(_root.printBounds(getBounds()), '-0.05,-0.05 40.05,40.05');" /* Target of button action is the button's parent sprite */ " _root.check_equals(_target, '/square1');" " setTarget('/');" " _root.check_equals(_target, '/');" " _root.testno++;" " _root.note(_root.testno+'. Press mouse button inside the square, and release it outside.');" "} else {" //" _root.note('SWFBUTTON_MOUSEOUT');" " _root.xfail('Unexpectedly got SWFBUTTON_MOUSEOUT event (testno:'+_root.testno+')');" "}" ), SWFBUTTON_MOUSEOUT); SWFButton_addAction(bu, compileSWFActionCode( "_root.msg='MouseOver';" "if ( _root.testno == 1 ) {" /* ONLY CHECK buttonChild on first frame */ /* "_root.note('buttonChild is '+dumpObj(_root.buttonChild));" */ /* added OVER state char */ " _root.check_equals(_root.buttonChild.realLength(), 3);" /* OVER state char loaded */ " _root.check_equals(typeof(_root.buttonChild[13]), 'object');" " _root.check_equals(_root.buttonChild[13].nam, '_level0.square1.button.instance7');" " _root.check_equals(_root.buttonChild[13].exe, 1);" /* OVER state char */ " _root.check_equals(_root.buttonChild[13].uld, 0);" /* OVER state char */ /* UP state char unloaded */ " _root.check_equals(_root.buttonChild[12].exe, 1);" " _root.check_equals(_root.buttonChild[12].uld, 1);" " _root.check_equals(typeof(_level0.square1.button.instance6), 'movieclip');" " _root.check_equals(_level0.square1.button.instance6._name, 'instance6');" " _root.check_equals(_level0.square1.button.instance6.getDepth(), -16398);" /* ALL state char still there, not reloaded, not unloaded */ " _root.check_equals(_root.buttonChild[10].exe, 1);" " _root.check_equals(_root.buttonChild[10].uld, 0);" "}" "if ( _root.testno == 1 || _root.testno == 6 || _root.testno == 11 ) {" //" _root.note('buttonChild is '+dumpObj(_root.buttonChild));" " _root.check_equals(_root.printBounds(getBounds()), '-0.05,-0.05 40.05,40.05');" /* Target of button action is the button's parent sprite */ " _root.check_equals(_target, '/square1');" " setTarget('/');" " _root.check_equals(_target, '/');" " _root.testno++;" " _root.note(_root.testno+'. Press (and keep pressed) the mouse button inside the square.');" "} else {" //" _root.note('SWFBUTTON_MOUSEOVER');" // need MOUSEOVER for MOUSEUPOUTSIDE " if ( _root.testno != 5 && _root.testno != 10 && _root.testno != 15 ) {" " _root.fail('Unexpectedly got SWFBUTTON_MOUSEOVER event (testno:'+_root.testno+')');" " }" "}" ), SWFBUTTON_MOUSEOVER); SWFButton_addAction(bu, compileSWFActionCode( "_root.msg='MouseDown';" "if ( _root.testno == 2 ) {" /* ONLY CHECK buttonChild on first frame */ /* Added DOWN state char */ " _root.check_equals(_root.buttonChild.realLength(), 4);" /* DOWN state char loaded */ " _root.check_equals(typeof(_root.buttonChild[14]), 'object');" " _root.check_equals(_root.buttonChild[14].nam, '_level0.square1.button.instance8');" " _root.check_equals(_root.buttonChild[14].exe, 1);" " _root.check_equals(_root.buttonChild[14].uld, 0);" /* OVER state char unloaded */ " _root.check_equals(_root.buttonChild[13].exe, 1);" " _root.check_equals(_root.buttonChild[13].uld, 1);" /* ALL state char still there, not reloaded, not unloaded */ " _root.check_equals(_root.buttonChild[10].exe, 1);" " _root.check_equals(_root.buttonChild[10].uld, 0);" "}" "if ( _root.testno == 2 || _root.testno == 7 || _root.testno == 12 ) {" " _root.check_equals(_root.printBounds(getBounds()), '-0.05,-0.05 40.05,40.05');" /* Target (and name) of button action is the button's parent sprite */ " _root.check_equals(_target, '/square1');" " _root.check_equals(_name, 'square1');" " setTarget('/');" " _root.check_equals(_target, '/');" " _root.check_equals(typeof(_name), 'string');" " _root.check_equals(_name, '');" " _root.testno++;" " _root.note(_root.testno+'. Depress the mouse button inside the square.');" "} else {" //" _root.note('SWFBUTTON_MOUSEDOWN');" // need MOUSEDOWN for MOUSEUPOUTSIDE " if ( _root.testno != 5 && _root.testno != 10 && _root.testno != 15 ) {" " _root.fail('Unexpectedly got SWFBUTTON_MOUSEDOWN event (testno:'+_root.testno+')');" " }" "}" ), SWFBUTTON_MOUSEDOWN); SWFButton_addAction(bu, compileSWFActionCode( "_root.msg='MouseUp';" "if ( _root.testno == 3 || _root.testno == 8 || _root.testno == 13 ) {" " _root.check_equals(_root.printBounds(getBounds()), '-0.05,-0.05 40.05,40.05');" /* Target of button action is the button's parent sprite */ " _root.check_equals(_target, '/square1');" " setTarget('/');" " _root.check_equals(_target, '/');" " _root.testno++;" " _root.note(_root.testno+'. Move the mouse pointer off the square.');" "} else {" //" _root.note('SWFBUTTON_MOUSEUP');" " _root.fail('Unexpectedly got SWFBUTTON_MOUSEUP event (testno:'+_root.testno+')');" "}" ), SWFBUTTON_MOUSEUP); /* SWFBUTTON_MOUSEUPOUTSIDE *should* be invoked !! */ SWFButton_addAction(bu, compileSWFActionCode( "_root.msg='MouseUpOutside';" "if ( _root.testno == 5 || _root.testno == 10 || _root.testno == 15 ) {" " _root.check_equals(_root.printBounds(getBounds()), '-0.05,-0.05 40.05,40.05');" /* Target of button action is the button's parent sprite */ " _root.check_equals(_target, '/square1');" " _root.check_equals(_name, 'square1');" " setTarget('/');" " _root.check_equals(_target, '/');" " _root.nextFrame();" "} else {" //" _root.note('SWFBUTTON_MOUSEUPOUTSIDE');" " _root.fail('Unexpectedly got SWFBUTTON_MOUSEUPOUTSIDE event (testno:'+_root.testno+')');" "}" ), SWFBUTTON_MOUSEUPOUTSIDE); /* Keypress */ SWFButton_addAction(bu, compileSWFActionCode( "_root.note('KeyPress: a');" //"_root.check(Key.isDown('a'));" ), SWFBUTTON_KEYPRESS('a')); SWFButton_addAction(bu, compileSWFActionCode( "_root.note('KeyPress: b');" //"_root.check(Key.isDown('b'));" ), SWFBUTTON_KEYPRESS('b')); it = SWFMovieClip_add(mc, (SWFBlock)bu); SWFDisplayItem_setName(it, "button"); SWFMovieClip_nextFrame(mc); /* showFrame */ it = SWFMovie_add(mo, (SWFBlock)mc); return it; }
SWFDisplayItem add_button(SWFMovie mo) { SWFDisplayItem it; SWFMovieClip mc; SWFShape sh1, sh2, sh3, sh4; SWFMovieClip bu = newSWFMovieClip(); mc = newSWFMovieClip(); sh1 = make_fill_square(0, 0, 40, 40, 0, 0, 0, 0, 0, 0); // black sh2 = make_fill_square(0, 0, 40, 40, 255, 0, 0, 255, 0, 0); // red sh3 = make_fill_square(0, 0, 40, 40, 0, 255, 0, 0, 255, 0); // green sh4 = make_fill_square(0, 0, 40, 40, 255, 255, 0, 255, 255, 0); // yellow SWFMovieClip_add(bu, (SWFBlock)sh2); // red when idle SWFMovieClip_add(bu, (SWFBlock)compileSWFActionCode( "onRollOut = function() {" " _root.note('onRollOut');" " updateAfterEvent();" " _root.msg='RollOut';" " gotoAndStop(1);" "};" "onRollOver = function() {" " _root.note('onRollOver');" " updateAfterEvent();" " _root.msg='RollOver';" " gotoAndStop(3);" "};" "onMouseDown = function() {" " _root.note('onMouseDown');" " updateAfterEvent();" " _root.msg2='MouseDown';" "};" "onMouseUp = function() {" " _root.note('onMouseUp');" " updateAfterEvent();" " _root.msg2='MouseUp';" "};" "onPress = function() {" " _root.note('onPress');" " updateAfterEvent();" " _root.msg='Press';" " gotoAndStop(2);" "};" "onRelease = function() {" " _root.note('onRelease');" " updateAfterEvent();" " _root.msg='Release';" " gotoAndStop(3);" "};" "onReleaseOutside = function() {" " _root.note('onReleaseOutside');" " updateAfterEvent();" " _root.msg='ReleaseOutside';" " gotoAndStop(1);" "};" "_root.onMouseWheel = function(delta, t) {" " _root.note('onMouseWheel: ' + delta + ', ' + t + ', ' + arguments.length);" " _root.note('onMouseWheel: ' + delta + ', ' + t);" " _root.msg='onMouseWheel: ' + delta + ', ' + t + ', ' + arguments.length;" "};" "Mouse.addListener(_root);" "stop();" )); SWFMovieClip_nextFrame(bu); SWFMovieClip_add(bu, (SWFBlock)sh3); // green on button press SWFMovieClip_add(bu, (SWFBlock)newSWFAction("stop();")); SWFMovieClip_nextFrame(bu); SWFMovieClip_add(bu, (SWFBlock)sh4); // yellow on mouse over SWFMovieClip_add(bu, (SWFBlock)newSWFAction("stop();")); SWFMovieClip_nextFrame(bu); it = SWFMovieClip_add(mc, (SWFBlock)bu); SWFDisplayItem_setName(it, "button"); SWFMovieClip_nextFrame(mc); /* showFrame */ it = SWFMovie_add(mo, (SWFBlock)mc); return it; }
int main(int argc, char** argv) { SWFMovie mo; SWFMovieClip dejagnuclip; SWFDisplayItem it; SWFShape sh1,sh2; const char *srcdir="."; if ( argc>1 ) srcdir=argv[1]; else { //fprintf(stderr, "Usage: %s <mediadir>\n", argv[0]); //return 1; } Ming_init(); mo = newSWFMovie(); SWFMovie_setDimension(mo, 800, 600); //SWFMovie_setRate (mo, 1.0); dejagnuclip = get_dejagnu_clip((SWFBlock)get_default_font(srcdir), 10, 0, 0, 800, 600); SWFMovie_add(mo, (SWFBlock)dejagnuclip); SWFMovie_nextFrame(mo); sh1 = make_fill_square (100, 300, 60, 60, 255, 0, 0, 255, 0, 0); sh2 = make_fill_square (300, 300, 60, 60, 255, 0, 0, 0, 0, 0); it = SWFMovie_add(mo, (SWFBlock)sh1); SWFDisplayItem_setName(it, "sh1"); SWFDisplayItem_setDepth(it, 3); //place the sh1 DisplayObject at depth 3; it = SWFMovie_add(mo, (SWFBlock)sh2); SWFDisplayItem_setName(it, "sh2"); SWFDisplayItem_setDepth(it, 4); //place the sh2 DisplayObject at depth 4; check(mo, "sh1 != undefined"); check(mo, "sh2 != undefined"); // Do these checks mean that shapes are movieclips? // seems not. check_equals(mo, "typeof(sh1)", "'movieclip'"); check_equals(mo, "typeof(sh2)", "'movieclip'"); check_equals(mo, "typeof(_root)", "'movieclip'"); add_actions(mo, "sh1.var1 = 10;" "sh2.var2 = 20;" ); // Do these checks mean that we can add variables to shapes? // seems not, variable are added to the _root, interesting. check_equals(mo, "sh1.var1", "10"); check_equals(mo, "sh2.var2", "20"); check_equals(mo, "_root.var1", "10"); check_equals(mo, "_root.var2", "20"); check_equals(mo, "sh1._x", "0"); check_equals(mo, "sh2._x", "0"); add_actions(mo, "sh1._x = 0;" "sh2._x = 400;" ); check_equals(mo, "sh1._x", "400"); check_equals(mo, "sh2._x", "400"); check_equals(mo, "_root._x", "400"); add_actions(mo, "_root._x = 0;" ); /* cleanup */ // Do these checks mean that shapes are *not* movieclips? check_equals(mo, "typeof(sh1.getDepth())", "'undefined'"); check_equals(mo, "typeof(sh2.getDepth())", "'undefined'"); // Do these checks mean that shapes are *not* movieclips? check_equals(mo, "typeof(getInstanceAtDepth(-16381))", "'undefined'"); check_equals(mo, "typeof(getInstanceAtDepth(-16380))", "'undefined'"); SWFMovie_nextFrame(mo); /* * UdoG's drawing * * See DrawingApiTest.as (inv8) * */ { /* using left fill, non-closed paths */ SWFDisplayItem it1, it2; SWFShape sh = newSWFShape(); SWFMovieClip mc = newSWFMovieClip(); SWFShape_setLineStyle(sh, 1, 0, 0, 0, 255); SWFShape_setLeftFillStyle(sh, SWFShape_addSolidFillStyle(sh, 0, 255, 0, 255)); SWFShape_movePenTo(sh, 20, 10); /* 0 */ SWFShape_drawLineTo(sh, 40, 10); /* 1 */ SWFShape_drawLineTo(sh, 40, 40); /* 2 */ SWFShape_drawLineTo(sh, 20, 40); /* 3 */ SWFShape_drawLineTo(sh, 20, 10); /* 4 */ SWFShape_drawLineTo(sh, 10, 10); /* 5 */ SWFShape_drawLineTo(sh, 10, 20); /* 6 */ SWFShape_drawLineTo(sh, 30, 20); /* 7 */ SWFShape_drawLineTo(sh, 30, 30); /* 8 */ SWFShape_drawLineTo(sh, 20, 30); /* 9 */ it1 = SWFMovieClip_add(mc, (SWFBlock)sh); // Test that clip events are not invoked for shapes #if 0 // current Ming HEAD chokes if we add an onClipConstruct event... SWFDisplayItem_addAction(it1, newSWFAction( "_root.check(false && 'clip event for shape should not be executed');" SWFACTION_CONSTRUCT); #endif SWFDisplayItem_addAction(it1, newSWFAction( "_root.check(false && 'clip event for shape should not be executed');" ), SWFACTION_ENTERFRAME); SWFDisplayItem_addAction(it1, newSWFAction( "_root.check(false && 'clip event for shape should not be executed');" ), SWFACTION_ONLOAD); SWFDisplayItem_addAction(it1, newSWFAction( "_root.check(false && 'clip event for shape should not be executed');" ), SWFACTION_UNLOAD); SWFDisplayItem_addAction(it1, newSWFAction( "_root.check(false && 'clip event for shape should not be executed');" ), SWFACTION_MOUSEMOVE); SWFDisplayItem_addAction(it1, newSWFAction( "_root.check(false && 'clip event for shape should not be executed');" ), SWFACTION_MOUSEDOWN); // None of these should be executed SWFDisplayItem_addAction(it1, newSWFAction( "_root.check(false && 'clip event for shape should not be executed');" ), SWFACTION_ONLOAD); SWFDisplayItem_moveTo(it1, 80, 120); SWFDisplayItem_scale(it1, 2, 2); SWFMovieClip_nextFrame(mc); it2 = SWFMovie_add(mo, (SWFBlock)mc); } { /* using right fill, non-closed paths */ SWFDisplayItem it; SWFShape sh = newSWFShape(); SWFMovieClip mc = newSWFMovieClip(); SWFShape_setLineStyle(sh, 1, 0, 0, 0, 255); SWFShape_setLeftFillStyle(sh, SWFShape_addSolidFillStyle(sh, 0, 255, 0, 255)); SWFShape_movePenTo(sh, 20, 10); /* 0 */ SWFShape_drawLineTo(sh, 40, 10); /* 1 */ SWFShape_drawLineTo(sh, 40, 40); /* 2 */ SWFShape_drawLineTo(sh, 20, 40); /* 3 */ SWFShape_drawLineTo(sh, 20, 10); /* 4 */ SWFShape_drawLineTo(sh, 10, 10); /* 5 */ SWFShape_drawLineTo(sh, 10, 20); /* 6 */ SWFShape_drawLineTo(sh, 30, 20); /* 7 */ SWFShape_drawLineTo(sh, 30, 30); /* 8 */ SWFShape_drawLineTo(sh, 20, 30); /* 9 */ it = SWFMovieClip_add(mc, (SWFBlock)sh); SWFDisplayItem_moveTo(it, 200, 120); SWFDisplayItem_scale(it, 2, 2); SWFMovieClip_nextFrame(mc); it = SWFMovie_add(mo, (SWFBlock)mc); } { /* using left fill, closed paths */ SWFDisplayItem it; SWFShape sh = newSWFShape(); SWFMovieClip mc = newSWFMovieClip(); SWFShape_setLineStyle(sh, 1, 0, 0, 0, 255); SWFShape_setLeftFillStyle(sh, SWFShape_addSolidFillStyle(sh, 255, 0, 0, 255)); SWFShape_movePenTo(sh, 20, 10); /* 0 */ SWFShape_drawLineTo(sh, 40, 10); /* 1 */ SWFShape_drawLineTo(sh, 40, 40); /* 2 */ SWFShape_drawLineTo(sh, 20, 40); /* 3 */ SWFShape_drawLineTo(sh, 20, 10); /* 4 */ SWFShape_drawLineTo(sh, 10, 10); /* 5 */ SWFShape_drawLineTo(sh, 10, 20); /* 6 */ SWFShape_drawLineTo(sh, 30, 20); /* 7 */ SWFShape_drawLineTo(sh, 30, 30); /* 8 */ SWFShape_drawLineTo(sh, 20, 30); /* 9 */ SWFShape_drawLineTo(sh, 20, 10); /* 0 */ it = SWFMovieClip_add(mc, (SWFBlock)sh); SWFDisplayItem_moveTo(it, 80, 200); SWFDisplayItem_scale(it, 2, 2); SWFMovieClip_nextFrame(mc); it = SWFMovie_add(mo, (SWFBlock)mc); } { /* using right fill, closed paths */ SWFDisplayItem it; SWFShape sh = newSWFShape(); SWFMovieClip mc = newSWFMovieClip(); SWFShape_setLineStyle(sh, 1, 0, 0, 0, 255); SWFShape_setRightFillStyle(sh, SWFShape_addSolidFillStyle(sh, 255, 0, 0, 255)); SWFShape_movePenTo(sh, 20, 10); /* 0 */ SWFShape_drawLineTo(sh, 40, 10); /* 1 */ SWFShape_drawLineTo(sh, 40, 40); /* 2 */ SWFShape_drawLineTo(sh, 20, 40); /* 3 */ SWFShape_drawLineTo(sh, 20, 10); /* 4 */ SWFShape_drawLineTo(sh, 10, 10); /* 5 */ SWFShape_drawLineTo(sh, 10, 20); /* 6 */ SWFShape_drawLineTo(sh, 30, 20); /* 7 */ SWFShape_drawLineTo(sh, 30, 30); /* 8 */ SWFShape_drawLineTo(sh, 20, 30); /* 9 */ SWFShape_drawLineTo(sh, 20, 10); /* 0 */ it = SWFMovieClip_add(mc, (SWFBlock)sh); SWFDisplayItem_moveTo(it, 200, 200); SWFDisplayItem_scale(it, 2, 2); SWFMovieClip_nextFrame(mc); it = SWFMovie_add(mo, (SWFBlock)mc); } add_actions(mo, "_root.totals(); stop();"); SWFMovie_nextFrame(mo); //Output movie puts("Saving " OUTPUT_FILENAME ); SWFMovie_save(mo, OUTPUT_FILENAME); return 0; }