lib/example/buttontest.c

   1 /* buttontest.c
   2
   3    Example implementation for creating a button with rfxswf
   4
   5    Part of the swftools package.
   6
   7    Copyright (c) 2000, 2001 Matthias Kramm <kramm@quiss.org>
   8                             Rainer Böhme <rfxswf@reflex-studio.de>
   9
  10    This file is distributed under the GPL, see file COPYING for details
  11 */
  12
  13 #include <stdio.h>
  14 #include <fcntl.h>
  15 #include <math.h>
  16 #include "../rfxswf.h"
  17
  18 TAG* t;
  19
  20 #define ID_BUTTON 31
  21
  22 int useDefineButton2 = 0; // set this to 1 to use DefineButton2 Tags
  23                           // instead of DefineButton1
  24
  25 int main (int argc,char ** argv)
  26 { SWF swf;
  27   RGBA rgb;
  28   SRECT r;
  29   LPSHAPE s;
  30   ActionTAG*a1,*a2,*a3, *actiontoset;
  31   S32 width=300,height = 300;
  32
  33   int f,i,ls1,fs1;
  34   int count;
  35
  36   memset(&swf,0x00,sizeof(SWF));        // set global movie parameters
  37
  38   swf.fileVersion    = 4;               // make flash 4 compatible swf
  39   swf.frameRate      = 0x1900;          // about 0x19 frames per second
  40
  41   swf.movieSize.xmax = 20*width;        // flash units: 1 pixel = 20 units
  42   swf.movieSize.ymax = 20*height;
  43
  44   swf.firstTag = swf_InsertTag(NULL,ST_SETBACKGROUNDCOLOR);
  45   t = swf.firstTag;
  46   rgb.r = 0xff;
  47   rgb.g = 0xff;
  48   rgb.b = 0xff;
  49   swf_SetRGB(t,&rgb);
  50
  51   for(count=1;count<4;count++)
  52   {
  53       t = swf_InsertTag(t,ST_DEFINESHAPE);
  54       swf_ShapeNew(&s);               // create new shape instance
  55       rgb.r = rgb.b = rgb.g = 0x00;
  56       ls1 = swf_ShapeAddLineStyle(s,40,&rgb);
  57       rgb.r = count*0x40; rgb.b = 0xff;
  58       fs1 = swf_ShapeAddSolidFillStyle(s,&rgb);
  59       swf_SetU16(t,33+count);                // now set character ID
  60       r.xmin = 0;
  61       r.ymin = 0;
  62       r.xmax = 20*width;
  63       r.ymax = 20*height;
  64       swf_SetRect(t,&r);              // set shape bounds
  65       swf_SetShapeHeader(t,s);        // write all styles to tag
  66       swf_ShapeSetAll(t,s,0,0,ls1,fs1,0); // move to (0,0), select linestyle ls1 and no fillstyle
  67       swf_ShapeSetCircle(t,s,width*10,height*10,width*10,height*10);
  68       swf_ShapeSetEnd(t);                 // finish drawing
  69       swf_ShapeFree(s);                   // clean shape structure (which isn't needed anymore after writing the tag)
  70   }
  71
  72   a1 = action_SetTarget(0, "movie");
  73   a1 = action_NextFrame(a1);
  74   a1 = action_SetTarget(a1, "");
  75   a1 = action_End(a1);
  76
  77     //a2 = action_GetUrl(a2, "test.swf","_level0"); // load a swf
  78     //a2 = action_GetUrl(a2, "index.html","_this"); // load html in new window
  79     a2 = action_GetUrl(0, "http://www.quiss.org/swftools/index.html","_parent"); // load html in this window
  80     a2 = action_End(a2);
  81
  82     a3 = action_GotoFrame(0,33);
  83     a3 = action_End(a3);
  84
  85   actiontoset = a2;
  86
  87   if(!useDefineButton2)
  88   {
  89       t = swf_InsertTag(t,ST_DEFINEBUTTON);
  90       swf_SetU16(t,31); //id
  91       swf_ButtonSetRecord(t,BS_UP|BS_HIT,34,1,NULL,NULL);
  92       swf_ButtonSetRecord(t,BS_OVER,35,1,NULL,NULL);
  93       swf_ButtonSetRecord(t,BS_DOWN,36,1,NULL,NULL);
  94       swf_SetU8(t,0); // end of button records
  95
  96       swf_ActionSet(t,actiontoset);
  97   }
  98   else
  99   {
 100       t = swf_InsertTag(t,ST_DEFINEBUTTON2);
 101       swf_SetU16(t,ID_BUTTON); //id
 102       swf_ButtonSetFlags(t, 0); //menu=no
 103       swf_ButtonSetRecord(t,BS_UP|BS_HIT,34,1,NULL,NULL);
 104       swf_ButtonSetRecord(t,BS_OVER,35,1,NULL,NULL);
 105       swf_ButtonSetRecord(t,BS_DOWN,36,1,NULL,NULL);
 106       swf_SetU8(t,0); // end of button records
 107
 108       swf_ButtonSetCondition(t, BC_OVERDOWN_OVERUP);
 109        swf_ActionSet(t,actiontoset);
 110
 111       swf_ButtonPostProcess(t, 1); // don't forget!
 112   }
 113
 114   swf_ActionFree(a1);
 115   swf_ActionFree(a2);
 116   swf_ActionFree(a3);
 117
 118   t = swf_InsertTag(t,ST_PLACEOBJECT2);
 119   swf_ObjectPlace(t, ID_BUTTON, 2,0,0,0);
 120
 121   t = swf_InsertTag(t,ST_SHOWFRAME);
 122   t = swf_InsertTag(t,ST_END);
 123
 124   f = open("buttontest.swf",O_WRONLY|O_CREAT, 0644);
 125   if FAILED(swf_WriteSWF(f,&swf)) fprintf(stderr,"WriteSWF() failed.\n");
 126   close(f);
 127
 128   swf_FreeTags(&swf);                       // cleanup
 129   return 0;
 130 }
 131
 132