Mindboards

Code: Select all

#download "tahoma8.ric"

task main()
{
  unsigned int i, s, f, diff;
  s = CurrentTick();
  for(int i=0; i<1000; i++) {
    TextOut(0,LCD_LINE1,"Cicero scripsit:");
    TextOut(0,LCD_LINE2,"Neque porro quisquam");
    TextOut(0,LCD_LINE3,"est, qui dolorem");
    TextOut(0,LCD_LINE4,"ipsum,quia dolor sit");
    TextOut(0,LCD_LINE5,"amet, consectetur,");
    TextOut(0,LCD_LINE6,"adipisci con velit-");
    TextOut(0,LCD_LINE7,"Sed Cicero");
    TextOut(0,LCD_LINE8,"erat iniuriam:");

    TextOut(0,LCD_LINE1,"Neque porro quisquam");
    TextOut(0,LCD_LINE2,"est, qui dolorem");
    TextOut(0,LCD_LINE3,"ipsum,quia dolor sit");
    TextOut(0,LCD_LINE4,"amet, consectetur,");
    TextOut(0,LCD_LINE5,"adipisci con velit-");
    TextOut(0,LCD_LINE6,"Sed Cicero");
    TextOut(0,LCD_LINE7,"erat iniuriam:");
    TextOut(0,LCD_LINE8,"Redundant est!");
  }
  f = CurrentTick();
  diff = f - s;
  ClearScreen();
  NumOut(0,LCD_LINE1,diff);
  Wait(SEC_5);
  s = CurrentTick();
  for(int i=0; i<1000; i++) {
    FontTextOut(0,LCD_LINE1,"tahoma8.ric", "Cicero scripsit:");
    FontTextOut(0,LCD_LINE2,"tahoma8.ric", "Neque porro quisquam");
    FontTextOut(0,LCD_LINE3,"tahoma8.ric", "est, qui dolorem");
    FontTextOut(0,LCD_LINE4,"tahoma8.ric", "ipsum,quia dolor sit");
    FontTextOut(0,LCD_LINE5,"tahoma8.ric", "amet, consectetur,");
    FontTextOut(0,LCD_LINE6,"tahoma8.ric", "adipisci con velit-");
    FontTextOut(0,LCD_LINE7,"tahoma8.ric", "Sed Cicero");
    FontTextOut(0,LCD_LINE8,"tahoma8.ric", "erat iniuriam:");

    FontTextOut(0,LCD_LINE1,"tahoma8.ric", "Neque porro quisquam");
    FontTextOut(0,LCD_LINE2,"tahoma8.ric", "est, qui dolorem");
    FontTextOut(0,LCD_LINE3,"tahoma8.ric", "ipsum,quia dolor sit");
    FontTextOut(0,LCD_LINE4,"tahoma8.ric", "amet, consectetur,");
    FontTextOut(0,LCD_LINE5,"tahoma8.ric", "adipisci con velit-");
    FontTextOut(0,LCD_LINE6,"tahoma8.ric", "Sed Cicero");
    FontTextOut(0,LCD_LINE7,"tahoma8.ric", "erat iniuriam:");
    FontTextOut(0,LCD_LINE8,"tahoma8.ric", "Redundant est!");
  }
  f = CurrentTick();
  diff = f - s;
  ClearScreen();
  NumOut(0,LCD_LINE1,diff);
  while(true);
}

Code: Select all

void cCmdCopyBitMapBits(
  SLONG dst_x,  // left pixel on LCD
  SLONG dst_y,  // bottom pixel on LCD
  SLONG src_x,  // starting pixel x coordinate from source map
  SLONG src_y,  // starting pixel y coordinate from source map
  SLONG src_width, // width in pixels to the right (negative implies to the left)
  SLONG src_height, // height in pixels down (negative implies down)
  IMG_OP_SPRITE * pSprite, UBYTE InvertMode, UBYTE LogicalMode, UBYTE FillMode)
{
  SLONG dy;  // Location in the destination pixmap , the screen that is
  SLONG sx;
  SLONG sy;  // Location in the source pixmap.
  SLONG trim, last_x, last_y, rowbytes;
  UBYTE *pSrcByte;
  UBYTE srcByte;      //JJR
  UBYTE *pDstBytes;
  UBYTE *pDstByte, *pFirstDstByte;
  UBYTE *pLastDstByte;
  UBYTE bit_y;                //JJR
  UBYTE masks[8] = {0x80, 0x40, 0x20, 0x10, 0x08, 0x04, 0x02, 0x01};

  // Data in the image file is row major 8 pixels per byte. top row first.
  // src and dst coordinates treat the bottom left most pixel as (0,0)

  if (!pSprite || pSprite->OpCode!=IMG_SPRITE_ID)
    return;

  pDstBytes = DISP_BUFFER_P;

  // Clip the edges. Modify the source and width as well.
  if (dst_x < 0) {        // bounds check start of x
    trim = (0 - dst_x);
    dst_x = 0;
    src_x += trim;
    src_width -= trim;
    }

  last_x = dst_x + src_width;
  if (last_x > DISPLAY_WIDTH)   // bound check end of x
    last_x = DISPLAY_WIDTH;

  if (dst_y < 0) {        // bound check start of y
    trim  = (0 - dst_y);
    dst_y = 0;
    src_y += trim;  // fix up source as well since we are clipping the start of the loop
    src_height -= trim;
    }

  last_y = dst_y + src_height;
  if (last_y > DISPLAY_HEIGHT)  // bound check end of y
    last_y = DISPLAY_HEIGHT;

  // Convert the 0,0 bottom left origin to the top left 0,0 used by the actual
  // buffer
  last_y = TRANSLATE_Y(last_y);
  dst_y = TRANSLATE_Y(dst_y);

  // The last row is the top most scan line in the LCD Buffer
  // so limit if the copy would copy into memory before the buffer.
  // The first row copied will be the one closest to the bottom of the LCD
  // If that is off screen then limit as well and adjust the start point on the start

  // Copy bits top to top moving down.
  sy = src_y;
  rowbytes = pSprite->RowBytes;

  pSrcByte = pSprite->Bytes + ((pSprite->Rows - 1 - sy) * rowbytes);
  pFirstDstByte =  pDstBytes + ((dst_y >> 3) * DISPLAY_REALWIDTH) + dst_x;
  for (dy = dst_y;  dy > last_y; dy--)
  {
    sx = src_x;
    bit_y = masks[7 - (dy & 0x07)];
    // not_bit_y = ~ bit_y;          //JJR
    pDstByte = pFirstDstByte;
    pLastDstByte = pDstByte + (last_x - dst_x);
    for (; pDstByte < pLastDstByte; pDstByte++)
    {
      //Read source byte:
      //If fill mode is on, pretend the source bitmap is solid:
      if (FillMode==DRAW_SHAPE_FILLED)
        srcByte = 0xff;
      else
        srcByte =  *(pSrcByte + (sx >> 3));                     //JJR
      
      //If invert mode is on, invert the source byte:
      if (InvertMode==DRAW_BITMAP_INVERT) srcByte = ~srcByte;   //JJR

      //Test the pixel in the source byte:
      if ( srcByte & masks[sx & 0x07] )                         //JJR
      {
        //If pixel is set in source image:
        switch (LogicalMode)
        {
          case DRAW_LOGICAL_AND:
            break;
          case DRAW_LOGICAL_XOR:
            *pDstByte ^= bit_y;
            break;
          case DRAW_LOGICAL_OR:
          case DRAW_LOGICAL_COPY:
          default:
            *pDstByte |= bit_y;
            break;
        }
      }
      else
      {
        //If pixel is clear in source image:
        switch (LogicalMode)
        {
          case DRAW_LOGICAL_OR:
          case DRAW_LOGICAL_XOR:
            break;
          case DRAW_LOGICAL_AND:
          case DRAW_LOGICAL_COPY:
          default:
            *pDstByte &= ~bit_y;
            break;
        }
      }
//JJR
      sx ++;
    }
    pSrcByte -= rowbytes;
    sy ++;
    if ((dy & 0x07) == 0) // bump back the scan line start point at rollover
      pFirstDstByte -= DISPLAY_REALWIDTH;
  }

}