data/qcsrc/menu/voret/image.c

   1 #ifdef INTERFACE\r
   2 CLASS(VoretImage) EXTENDS(Image)\r
   3         METHOD(VoretImage, configureVoretImage, void(entity, string, float))\r
   4 ENDCLASS(VoretImage)\r
   5 entity makeVoretImage(string theImage, float theAspect);\r
   6 #endif\r
   7 \r
   8 #ifdef IMPLEMENTATION\r
   9 entity makeVoretImage(string theImage, float theAspect)\r
  10 {\r
  11         entity me;\r
  12         me = spawnVoretImage();\r
  13         me.configureVoretImage(me, theImage, theAspect);\r
  14         return me;\r
  15 }\r
  16 void configureVoretImageVoretImage(entity me, string theImage, float theAspect)\r
  17 {\r
  18         me.configureImage(me, theImage);\r
  19         if(theAspect < 0) // use image aspect\r
  20         {\r
  21                 vector sz;\r
  22                 sz = draw_PictureSize(theImage);\r
  23                 me.forcedAspect = sz_x / sz_y;\r
  24         }\r
  25         else\r
  26                 me.forcedAspect = theAspect;\r
  27 }\r
  28 #endif\r