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 program is free software; you can redistribute it and/or modify
  14    it under the terms of the GNU General Public License as published by
  15    the Free Software Foundation; either version 2 of the License, or
  16    (at your option) any later version.
  17
  18    This program is distributed in the hope that it will be useful,
  19    but WITHOUT ANY WARRANTY; without even the implied warranty of
  20    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21    GNU General Public License for more details.
  22
  23    You should have received a copy of the GNU General Public License
  24    along with this program; if not, write to the Free Software
  25    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */
  26
  27 #include <stdio.h>
  28 #include <fcntl.h>
  29 #include <math.h>
  30 #include "rfxswf.h"
  31
  32 TAG* tag;
  33
  34 #define SUBTITLES 1
  35
  36 int main (int argc,char ** argv)
  37 { SWF swf;
  38   RGBA rgb;
  39   SRECT r;
  40   LPSHAPE s;
  41   MATRIX m;
  42   ActionTAG*a1,*a2,*a3,*a4,*a5;
  43   S32 width=1024,height = 768;
  44
  45   int f,i,ls1,fs1;
  46
  47   memset(&swf,0x00,sizeof(SWF));        // set global movie parameters
  48
  49   swf.fileVersion    = 4;               // make flash 4 compatible swf
  50   swf.frameRate      = 0x1900;          // about 0x19 frames per second
  51
  52   swf.movieSize.xmax = 20*width;        // flash units: 1 pixel = 20 units
  53   swf.movieSize.ymax = 20*height;
  54
  55   swf.firstTag = swf_InsertTag(NULL,ST_SETBACKGROUNDCOLOR);
  56   tag = swf.firstTag;
  57   rgb.r = 0xff;
  58   rgb.g = 0xff;
  59   rgb.b = 0xff;
  60   swf_SetRGB(tag,&rgb);
  61
  62   // initialize matrix
  63   m.sx = 65536; //scale
  64   m.sy = 65536;
  65   m.r0 = 0; //rotate
  66   m.r1 = 0;
  67   m.tx = 0; //move
  68   m.ty = 0;
  69
  70   /* the "viewport" object will be replaced by swfcombine
  71      with the object to browse. It is placed at the
  72      upper left corner (0,0), by setting m.tx and m.ty
  73      to 0. Therefore, the buttons are "in" the viewport,
  74      not above it*/
  75   tag = swf_InsertTag(tag,ST_DEFINESPRITE);
  76   swf_SetU16(tag, 23); //id
  77   swf_SetU16(tag, 0); //frames
  78   tag = swf_InsertTag(tag,ST_END);
  79   tag = swf_InsertTag(tag,ST_PLACEOBJECT2);
  80   m.tx = 0; //move
  81   m.ty = 0;
  82   swf_ObjectPlace(tag, 23, 1,&m,0,"viewport");
  83
  84     a1 = action_SetTarget(0, "viewport");
  85     a1 = action_PreviousFrame(a1);
  86     a1 = action_SetTarget(a1, "");
  87     a1 = action_End(a1);
  88
  89     a2 = action_SetTarget(0, "viewport");
  90     a2 = action_NextFrame(a2);
  91     a2 = action_SetTarget(a2,"");
  92     a2 = action_End(a2);
  93
  94     a3 = action_Stop(0);
  95     a3 = action_SetTarget(a3,"viewport");
  96     a3 = action_Stop(a3);
  97     a3 = action_SetTarget(a3,"");
  98 #ifdef SUBTITLES
  99     a3 = action_PushString(a3,"/:subtitle");
 100     a3 = action_PushString(a3,""); //reset variable
 101     a3 = action_SetVariable(a3);
 102 #endif
 103     a3 = action_End(a3);
 104
 105     a4 = action_GetUrl(0, "lichtfarbe.html", "_this");
 106     a4 = action_End(a4);
 107
 108     a5 = action_GetUrl(0, "phybas.html","_this"); // load html in this window
 109     a5 = action_End(a5);
 110
 111   tag = swf_InsertTag(tag,ST_DEFINESHAPE);
 112     swf_ShapeNew(&s);               // create new shape instance
 113     rgb.r = rgb.b = rgb.g = 0x00;
 114     ls1 = swf_ShapeAddLineStyle(s,40,&rgb);
 115     fs1 = swf_ShapeAddSolidFillStyle(s,&rgb);
 116     swf_SetU16(tag,77);
 117     r.xmin = 0;
 118     r.ymin = 0;
 119     r.xmax = 20*width;
 120     r.ymax = 20*height;
 121     swf_SetRect(tag,&r);              // set shape bounds
 122     swf_SetShapeHeader(tag,s);        // write all styles to tag
 123
 124     swf_ShapeSetAll(tag,s,0,0,ls1,fs1,0); // move to (0,0), select linestyle ls1 and no fillstyle
 125     /* SetLine coordinates are relative.
 126        It's important that the start and end points match, otherwise
 127        the Macromedia Flash player will crash. */
 128     swf_ShapeSetLine(tag,s,20*width,0*height);
 129     swf_ShapeSetLine(tag,s,0*width,20*height);
 130     swf_ShapeSetLine(tag,s,-20*width,0*height);
 131     swf_ShapeSetLine(tag,s,0*width,-20*height);
 132
 133     swf_ShapeSetEnd(tag);   // finish drawing
 134     swf_ShapeFree(s);   // clean shape structure (which isn't needed anymore after writing the tag)
 135
 136   tag = swf_InsertTag(tag,ST_DEFINEBUTTON2);
 137   swf_SetU16(tag,30); //id
 138   swf_ButtonSetFlags(tag, 0); //menu=no
 139   swf_ButtonSetRecord(tag,BS_HIT,77,1,NULL,NULL);
 140   swf_SetU8(tag,0); // end of button records
 141
 142   swf_ButtonSetCondition(tag, BC_CURSORLEFT);
 143     swf_ActionSet(tag,a1);
 144   swf_ButtonSetCondition(tag, BC_CURSORRIGHT);
 145     swf_ActionSet(tag,a2);
 146   swf_ButtonSetCondition(tag, BC_SPACE);
 147     swf_ActionSet(tag,a2);
 148   swf_ButtonSetCondition(tag, BC_ESCAPE);
 149     swf_ActionSet(tag,a4);
 150   swf_ButtonSetCondition(tag, BC_ENTER);
 151     swf_ActionSet(tag,a5);
 152
 153   swf_ButtonPostProcess(tag, 5); // don't forget!
 154
 155
 156   tag = swf_InsertTag(tag,ST_DOACTION);
 157   swf_ActionSet(tag,a3);
 158
 159   m.tx = 0; //move
 160   m.ty = 0;
 161   tag = swf_InsertTag(tag,ST_PLACEOBJECT2);
 162   swf_ObjectPlace(tag, 30, 2,&m,0,0);
 163
 164   swf_ActionFree(a1);
 165   swf_ActionFree(a2);
 166   swf_ActionFree(a3);
 167   swf_ActionFree(a4);
 168   swf_ActionFree(a5);
 169
 170
 171
 172 #ifdef SUBTITLES
 173   tag = swf_InsertTag(tag,ST_DEFINEFONT2); {
 174       U8 data[] = {0x90, 0x00, 0x0f, 0x54, 0x69, 0x6d, 0x65, 0x73,
 175                    0x20, 0x4e, 0x65, 0x77, 0x20, 0x52, 0x6f, 0x6d,
 176                    0x61, 0x6e, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
 177                    0x00, 0x00, 0x00, 0x00};
 178       swf_SetU16(tag, 0x76); //id
 179       swf_SetBlock(tag, data, sizeof(data));
 180   }
 181   tag = swf_InsertTag(tag,ST_DEFINEEDITTEXT); {
 182       EditTextLayout layout;
 183       layout.align = 0;
 184       layout.leftmargin = 0;
 185       layout.rightmargin = 0;
 186       layout.indent = 0;
 187       layout.leading = 0;
 188
 189       swf_SetU16(tag, 0x77);//id
 190       r.xmin = 20*60;
 191       r.xmax = r.xmin+ 826*20;
 192       r.ymin = 0;
 193       r.ymax = 20*80;
 194       rgb.r = rgb.g = rgb.b = 0;
 195       rgb.a = 255;
 196       swf_SetEditText(tag, ET_MULTILINE|ET_READONLY, r, 0, &rgb, 0, 0x76, 20*40, &layout, "/:subtitle");
 197       m.tx = m.ty = 0;
 198   }
 199   tag = swf_InsertTag(tag,ST_PLACEOBJECT2);
 200   swf_ObjectPlace(tag, 0x77, 4,&m,0,0);
 201 #endif
 202
 203   tag = swf_InsertTag(tag,ST_SHOWFRAME);
 204   tag = swf_InsertTag(tag,ST_END);
 205
 206   f = open("keyboard_viewer.swf",O_WRONLY|O_CREAT|O_TRUNC, 0644);
 207   if FAILED(swf_WriteSWF(f,&swf)) fprintf(stderr,"WriteSWF() failed.\n");
 208   close(f);
 209
 210   swf_FreeTags(&swf);                       // cleanup
 211   return 0;
 212 }
 213
 214