swfs/keyboard_viewer.c

   1 /* keyboard_viewer.c
   2
   3    Creates the swf file keyboard_viewer.swf.
   4    This can be used to navigate through frames using the keyboard (space,
   5    cursor left, cursor right)
   6    Notice that the movie has to clicked with the mouse once to get
   7    navigation activated in most browsers.
   8
   9    Part of the swftools package.
  10
  11    Copyright (c) 2000, 2001 Matthias Kramm <kramm@quiss.org>
  12
  13    This file is distributed under the GPL, see file COPYING for details
  14 */
  15
  16 #include <stdio.h>
  17 #include <fcntl.h>
  18 #include <math.h>
  19 #include "rfxswf.h"
  20
  21 TAG* tag;
  22
  23 #define SUBTITLES 1
  24
  25 int main (int argc,char ** argv)
  26 { SWF swf;
  27   RGBA rgb;
  28   SRECT r;
  29   LPSHAPE s;
  30   MATRIX m;
  31   ActionTAG*a1,*a2,*a3,*a4,*a5;
  32   S32 width=1024,height = 768;
  33
  34   int f,i,ls1,fs1;
  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   tag = swf.firstTag;
  46   rgb.r = 0xff;
  47   rgb.g = 0xff;
  48   rgb.b = 0xff;
  49   swf_SetRGB(tag,&rgb);
  50
  51   // initialize matrix
  52   m.sx = 65536; //scale
  53   m.sy = 65536;
  54   m.r0 = 0; //rotate
  55   m.r1 = 0;
  56   m.tx = 0; //move
  57   m.ty = 0;
  58
  59   /* the "viewport" object will be replaced by swfcombine
  60      with the object to browse. It is placed at the
  61      upper left corner (0,0), by setting m.tx and m.ty
  62      to 0. Therefore, the buttons are "in" the viewport,
  63      not above it*/
  64   tag = swf_InsertTag(tag,ST_DEFINESPRITE);
  65   swf_SetU16(tag, 23); //id
  66   swf_SetU16(tag, 0); //frames
  67   tag = swf_InsertTag(tag,ST_END);
  68   tag = swf_InsertTag(tag,ST_PLACEOBJECT2);
  69   m.tx = 0; //move
  70   m.ty = 0;
  71   swf_ObjectPlace(tag, 23, 1,&m,0,"viewport");
  72
  73     a1 = action_SetTarget(0, "viewport");
  74     a1 = action_PreviousFrame(a1);
  75     a1 = action_SetTarget(a1, "");
  76     a1 = action_End(a1);
  77
  78     a2 = action_SetTarget(0, "viewport");
  79     a2 = action_NextFrame(a2);
  80     a2 = action_SetTarget(a2,"");
  81     a2 = action_End(a2);
  82
  83     a3 = action_Stop(0);
  84     a3 = action_SetTarget(a3,"viewport");
  85     a3 = action_Stop(a3);
  86     a3 = action_SetTarget(a3,"");
  87 #ifdef SUBTITLES
  88     a3 = action_PushString(a3,"/:subtitle");
  89     a3 = action_PushString(a3,""); //reset variable
  90     a3 = action_SetVariable(a3);
  91 #endif
  92     a3 = action_End(a3);
  93
  94     a4 = action_GetUrl(0, "lichtfarbe.html", "_this");
  95     a4 = action_End(a4);
  96
  97     a5 = action_GetUrl(0, "phybas.html","_this"); // load html in this window
  98     a5 = action_End(a5);
  99
 100   tag = swf_InsertTag(tag,ST_DEFINESHAPE);
 101     swf_ShapeNew(&s);               // create new shape instance
 102     rgb.r = rgb.b = rgb.g = 0x00;
 103     ls1 = swf_ShapeAddLineStyle(s,40,&rgb);
 104     fs1 = swf_ShapeAddSolidFillStyle(s,&rgb);
 105     swf_SetU16(tag,77);
 106     r.xmin = 0;
 107     r.ymin = 0;
 108     r.xmax = 20*width;
 109     r.ymax = 20*height;
 110     swf_SetRect(tag,&r);              // set shape bounds
 111     swf_SetShapeHeader(tag,s);        // write all styles to tag
 112
 113     swf_ShapeSetAll(tag,s,0,0,ls1,fs1,0); // move to (0,0), select linestyle ls1 and no fillstyle
 114     /* SetLine coordinates are relative.
 115        It's important that the start and end points match, otherwise
 116        the Macromedia Flash player will crash. */
 117     swf_ShapeSetLine(tag,s,20*width,0*height);
 118     swf_ShapeSetLine(tag,s,0*width,20*height);
 119     swf_ShapeSetLine(tag,s,-20*width,0*height);
 120     swf_ShapeSetLine(tag,s,0*width,-20*height);
 121
 122     swf_ShapeSetEnd(tag);   // finish drawing
 123     swf_ShapeFree(s);   // clean shape structure (which isn't needed anymore after writing the tag)
 124
 125   tag = swf_InsertTag(tag,ST_DEFINEBUTTON2);
 126   swf_SetU16(tag,30); //id
 127   swf_ButtonSetFlags(tag, 0); //menu=no
 128   swf_ButtonSetRecord(tag,BS_HIT,77,1,NULL,NULL);
 129   swf_SetU8(tag,0); // end of button records
 130
 131   swf_ButtonSetCondition(tag, BC_CURSORLEFT);
 132     swf_ActionSet(tag,a1);
 133   swf_ButtonSetCondition(tag, BC_CURSORRIGHT);
 134     swf_ActionSet(tag,a2);
 135   swf_ButtonSetCondition(tag, BC_SPACE);
 136     swf_ActionSet(tag,a2);
 137   swf_ButtonSetCondition(tag, BC_ESCAPE);
 138     swf_ActionSet(tag,a4);
 139   swf_ButtonSetCondition(tag, BC_ENTER);
 140     swf_ActionSet(tag,a5);
 141
 142   swf_ButtonPostProcess(tag, 5); // don't forget!
 143
 144
 145   tag = swf_InsertTag(tag,ST_DOACTION);
 146   swf_ActionSet(tag,a3);
 147
 148   m.tx = 0; //move
 149   m.ty = 0;
 150   tag = swf_InsertTag(tag,ST_PLACEOBJECT2);
 151   swf_ObjectPlace(tag, 30, 2,&m,0,0);
 152
 153   swf_ActionFree(a1);
 154   swf_ActionFree(a2);
 155   swf_ActionFree(a3);
 156   swf_ActionFree(a4);
 157   swf_ActionFree(a5);
 158
 159
 160
 161 #ifdef SUBTITLES
 162   tag = swf_InsertTag(tag,ST_DEFINEFONT2); {
 163       U8 data[] = {0x90, 0x00, 0x0f, 0x54, 0x69, 0x6d, 0x65, 0x73,
 164                    0x20, 0x4e, 0x65, 0x77, 0x20, 0x52, 0x6f, 0x6d,
 165                    0x61, 0x6e, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
 166                    0x00, 0x00, 0x00, 0x00};
 167       swf_SetU16(tag, 0x76); //id
 168       swf_SetBlock(tag, data, sizeof(data));
 169   }
 170   tag = swf_InsertTag(tag,ST_DEFINEEDITTEXT); {
 171       EditTextLayout layout;
 172       layout.align = 0;
 173       layout.leftmargin = 0;
 174       layout.rightmargin = 0;
 175       layout.indent = 0;
 176       layout.leading = 0;
 177
 178       swf_SetU16(tag, 0x77);//id
 179       r.xmin = 20*60;
 180       r.xmax = r.xmin+ 826*20;
 181       r.ymin = 0;
 182       r.ymax = 20*80;
 183       rgb.r = rgb.g = rgb.b = 0;
 184       rgb.a = 255;
 185       swf_SetEditText(tag, ET_MULTILINE|ET_READONLY, r, 0, &rgb, 0, 0x76, 20*40, &layout, "/:subtitle");
 186       m.tx = m.ty = 0;
 187   }
 188   tag = swf_InsertTag(tag,ST_PLACEOBJECT2);
 189   swf_ObjectPlace(tag, 0x77, 4,&m,0,0);
 190 #endif
 191
 192   tag = swf_InsertTag(tag,ST_SHOWFRAME);
 193   tag = swf_InsertTag(tag,ST_END);
 194
 195   f = open("keyboard_viewer.swf",O_WRONLY|O_CREAT|O_TRUNC, 0644);
 196   if FAILED(swf_WriteSWF(f,&swf)) fprintf(stderr,"WriteSWF() failed.\n");
 197   close(f);
 198
 199   swf_FreeTags(&swf);                       // cleanup
 200   return 0;
 201 }
 202
 203