cal_zaurus.ths

The major functionality added in this release includes: - Rootless mode in X11 - Widget Templt

prop center, scale;
prop message1, message2, message1font, message2font;
prop logo;

obj "tpcal" {
  /* FIXME: if we could measure the text, this would 
   * work on different display sizes and fonts better.
   */
  bgfill = fillstyle {
      var ypos;
  
      //Bitmap(x,y,w,h,background::bitmap1);
      Gradient(x,y,w,h,80,0x9195ce, 0xcfd3ec);

      /* Approximately center the whole thing vertically */
      ypos = y+((h - 280)>>1);
  
      /* logo */
      SetLgop(PG_LGOP_ALPHA);
      Bitmap(x+((w-108)>>1) + 7, ypos+14, 108,113, logo);
      ypos = ypos + 170;
      SetLgop(PG_LGOP_NONE);
      
      /* Messages */
      SetColor(fgcolor);
      SetFont(message1font);
      Text(x + ((w-150)>>1), ypos, 1, 1, message1);
      ypos = ypos + 40;
      SetFont(message2font);
      Text(x + ((w-150)>>1), ypos, 1, 1, message2);
    };
  PGTH_P_USER = fillstyle {
    //Frame(x-center-1, y-center-1, center*2+3, center*2+3);
      Frame(x-center, y-center, center*2+1, center*2+1);
      Bar(x, y-scale, 1, scale*2+1);
      Slab(x-scale, y, scale*2+1, 1);
    };
  center = 4;
  scale = 12;
  message1 = "Welcome to PicoGUI";
  message2 = "Tap each target firmly and\naccurately to calibrate\nyour touchscreen.";
  logo = LoadBitmap("data/micropingizauru.png");
  bgcolor = 0xE0E0D0;
  fgcolor = 0x000000;
  message1font = Font(NULL,15,PG_FSTYLE_BOLD);
  message2font = Font(NULL,13,0);
}

/* Hack to disable popup borders, since the fluidity border looks bad crushed */
object popup {
  margin = 0;
  backdrop = fillstyle { Nop(); };
  bgfill = fillstyle { Nop(); };
}