lib/example/glyphshape.c

   1 /* glyphshape.c\r
   2 \r
   3    Part of the swftools package.\r
   4 \r
   5    Copyright (c) 2001 Rainer Böhme <rfxswf@reflex-studio.de>\r
   6  \r
   7    This file is distributed under the GPL, see file COPYING for details \r
   8 \r
   9    This program is free software; you can redistribute it and/or modify\r
  10    it under the terms of the GNU General Public License as published by\r
  11    the Free Software Foundation; either version 2 of the License, or\r
  12    (at your option) any later version.\r
  13 \r
  14    This program is distributed in the hope that it will be useful,\r
  15    but WITHOUT ANY WARRANTY; without even the implied warranty of\r
  16    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the\r
  17    GNU General Public License for more details.\r
  18 \r
  19    You should have received a copy of the GNU General Public License\r
  20    along with this program; if not, write to the Free Software\r
  21    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */\r
  22 \r
  23 #include <stdio.h>\r
  24 #include <fcntl.h>\r
  25 #include <math.h>\r
  26 #include "../rfxswf.h"\r
  27 \r
  28 #include "demofont.c"  // six glyphs only:  f, l, o, s, t, w\r
  29 //#include "stdfonts.c"\r
  30 \r
  31 #define BANNER_TEXT     "swftools" \r
  32 #define ID_FONT         1000\r
  33 #define ID_SHAPES       2000 // to 2255\r
  34 \r
  35 TAG * PlaceGlyph(TAG * t,SWFFONT * font,U8 glyph,U16 depth,int x,int y,int angle)\r
  36 { MATRIX m;\r
  37   t = swf_InsertTag(t,ST_PLACEOBJECT2);\r
  38 \r
  39   swf_GetMatrix(NULL,&m);\r
  40   \r
  41   if (angle)\r
  42   { m.sy = m.sx = (int)(cos(((double)(angle))/128*3.14159)*0x10000);\r
  43     m.r0 = (int)(sin(((double)(angle))/128*3.14159)*0x10000);\r
  44     m.r1 = -m.r0;\r
  45   }\r
  46   else m.sx = m.sy = 0x10000;\r
  47 \r
  48   // move origin\r
  49 \r
  50   m.tx = x+((m.r1-m.sx)/0x100); // this is correct\r
  51   m.ty = y+((m.sx-m.r0)/0x100);\r
  52 \r
  53 //  m.tx = x+((m.r1-m.sx)/0x40); // this looks crazier ;-)\r
  54 //  m.ty = y+((m.sx-m.r0)/0x40);\r
  55   \r
  56 \r
  57   if (font)\r
  58     swf_ObjectPlace(t,ID_SHAPES+glyph,depth,&m,NULL,NULL);\r
  59   else swf_ObjectMove(t,depth,&m,NULL);\r
  60         \r
  61   return t;\r
  62 }\r
  63 \r
  64 // some helper functions which define the figure\r
  65 \r
  66 int posX(int count)\r
  67 { return (int)(-sin(((double)count)/1024*3.14159)*3000);\r
  68 }\r
  69 int posY(int count)\r
  70 { return (int)(sin(((double)count)/2048*3.14159)*3200);\r
  71 }\r
  72 int angle(int count)\r
  73 { return (int)(pow(cos(((double)count)/2048*3.14159),3)*110);\r
  74   // this is not the mathematical correct solution, but it works & looks nice\r
  75 }\r
  76 \r
  77 int main(int argc, char ** argv)\r
  78 { SWF swf;\r
  79   TAG * t;\r
  80   SRECT r;\r
  81   RGBA rgb;\r
  82   MATRIX m;\r
  83   U8 abits, gbits;\r
  84 \r
  85   int f,i,frame;\r
  86   int width = 400;\r
  87   int height = 400;\r
  88   char * s = BANNER_TEXT;\r
  89 \r
  90   SWFFONT * font = Font_Demo_Font(ID_FONT); // change font name here\r
  91 \r
  92   swf_FontInitUsage(font);\r
  93   swf_FontUse(font,s);        \r
  94   swf_FontReduce(font);            // make sure that gid's point to the specific glyphs\r
  95   \r
  96   memset(&swf,0x00,sizeof(SWF));\r
  97 \r
  98   swf.fileVersion    = 4;\r
  99   swf.frameRate      = 0x1000;\r
 100   swf.movieSize.xmax = 20*width;\r
 101   swf.movieSize.ymax = 20*height;\r
 102 \r
 103   swf.firstTag = swf_InsertTag(NULL,ST_SETBACKGROUNDCOLOR);\r
 104   t = swf.firstTag;\r
 105 \r
 106         rgb.r = 0xff;\r
 107         rgb.g = 0xff;\r
 108         rgb.b = 0xff;\r
 109         swf_SetRGB(t,&rgb);\r
 110 \r
 111   // define Glyph Shapes\r
 112 \r
 113   for (i=0;i<font->numchars;i++)\r
 114   { if (font->glyph[i].shape)\r
 115     { SHAPE * s;\r
 116       int fs;\r
 117         \r
 118       t = swf_InsertTag(t,ST_DEFINESHAPE);\r
 119 \r
 120         swf_ShapeNew(&s);\r
 121         \r
 122         rgb.r = rgb.g = rgb.b = i;\r
 123         \r
 124         swf_ShapeAddSolidFillStyle(s,&rgb);\r
 125 \r
 126         swf_SetU16(t,ID_SHAPES+i);\r
 127 \r
 128         r.xmin = -50*20;     r.ymin = -50*20;  // Glyph Shapes are placed into a 2000*2000 box\r
 129         r.ymax =   50*20;    r.xmax =  50*20;  // where (1000,1000) is the origin\r
 130 \r
 131         swf_SetRect(t,&r);\r
 132 \r
 133         swf_SetShapeStyles(t,s);        // rest of header is set by swf_SetSimpleShape\r
 134         swf_SetSimpleShape(t,font->glyph[i].shape);\r
 135         swf_ShapeFree(s);\r
 136         \r
 137     }\r
 138   }\r
 139 \r
 140   for (frame=0;frame<128;frame++)\r
 141   { int cnt = 4096-frame*32;\r
 142     for (i=0;i<strlen(s);i++)\r
 143     { int glyph = font->ascii2glyph[s[i]];\r
 144       int advance = font->glyph[glyph].advance/2;\r
 145       int cnt2 = cnt+=advance/2;\r
 146       t = PlaceGlyph(t,frame?NULL:font,glyph,i+1,\r
 147                      200*20+posX(cnt2),\r
 148                      200*20+posY(cnt2),\r
 149                      angle(cnt2));\r
 150       cnt+=advance;\r
 151     }\r
 152     t = swf_InsertTag(t,ST_SHOWFRAME);\r
 153   }\r
 154   \r
 155   \r
 156     t = swf_InsertTag(t,ST_END);\r
 157  \r
 158 //  swf_WriteCGI(&swf);\r
 159  \r
 160   f = open("glyphshape.swf",O_RDWR|O_CREAT|O_TRUNC|O_BINARY,0644);\r
 161   if FAILED(swf_WriteSWF(f,&swf)) fprintf(stderr,"WriteSWF() failed.\n");\r
 162   close(f);\r
 163 \r
 164   swf_FreeTags(&swf);\r
 165 \r
 166 #ifdef __NT__\r
 167   system("start ..\\glyphshape.swf");\r
 168 #endif\r
 169   \r
 170   return 0;\r
 171 }\r
 172 \r
 173 \r