dotlib.cpp

基于ucos的网络液晶开发程序

#include <stdio.h>
#include <process.h>
#include <string.h>
#include "hd61202.h"
#include "dotlib.h"
#include "source.h"

//char* source;

DOTLIB::DOTLIB()
{
   dotM = NULL;
   dotM = new char[ 512*32 ];
   if( dotM == NULL ) { printf( "font buffer fail" ); exit(1); }
   char_addr.ptr = NULL;
   char_addr.ptr = new char[256*14];
   if( char_addr.ptr == NULL ) { printf( "font buffer fail" ); exit(2); }
}

DOTLIB::~DOTLIB()
{
   if( dotM != NULL ) 	     	delete dotM;
   if( char_addr.ptr != NULL ) 	delete char_addr.ptr;
}

void  DOTLIB::initiChinese( char* CHname, char* ENname )
{
   char PathName[40];

   sprintf( PathName, "%s", ENname );    // load the 8*14 set of character
   FILE *fp = fopen( PathName, "rb" );
   if( fp==NULL ) return;
   fread( char_addr.ptr, 14, 256, fp );
   fclose( fp );

   getM( CHname );
}

void DOTLIB::MLib( char *CHname )
{
  char*     cc=source;
  char      string[33];

  FILE *lib, *mlib;

  lib = fopen( "cclib16.fnt", "rb" );
  if( lib == NULL ) return;
  remove( "mlib.chr" );

  mlib = fopen(CHname, "ab+" );
  if( mlib == NULL )  { fclose( lib ); return; }

  for ( int i=0; i < 512;  )
     {
     if (cc[0]=='\0')  break;
     if ((cc[0]&0x80)/128!=1)  continue;
     if (cc[1]=='\0')  break;
     if ((cc[0]&0x80)/128!=1)  continue;

     fseek( lib, (((long)((cc[0] & 0x7f)-32)-1L)*94
		+ (long)((cc[1] & 0x7f)-32)-1L)*32, SEEK_SET );

     fread( string, 32, 1, lib );
     string[32]=0;
     fwrite( string, 32, 1, mlib );

     i++;
     cc++;
     cc++;
     }

  fclose(lib);
  fclose(mlib);
}

void DOTLIB::getM( char *CHname )
{
    char*   cc=source;
    FILE *mlib;

    for (int i=0; i<96; i++)
      for (int j=0; j<96; j++)
	matrix[i][j] = 0;

    for ( i=0; i<512; )
	{
	if (cc[0]=='\0')          break;
	if ((cc[0]&0x80)/128!=1)  continue;
	if (cc[1]=='\0')          break;
	if ((cc[0]&0x80)/128!=1)  continue;

	matrix[ (unsigned)(cc[0]&0x7f)-32 ][ (unsigned)(cc[1]&0x7f)-32 ]
	= (unsigned int)i;
	i++;
	cc++;
	cc++;
	}

    if( (mlib=fopen(CHname, "rb" ))==NULL )   return;
    fread( dotM,  512*32, 1, mlib );
    fclose( mlib );
}

int DOTLIB::GetBit( unsigned char c, int n )
{
   return ( (c>>n)&1 );
}

void  DOTLIB::Writechar(int x, int y, char ch_in, int color, int Scale )
{
   address  addr=char_addr;
   int      i, j, PgIdx;
   unsigned char hfont[16], MaskBit;
   unsigned int  vfont[8];

   (void)Scale;
   addr.sptr.oset+=14*(unsigned char)ch_in;

   // get horizontal font
   hfont[0] = 0;
   for( i=0, j=1; i<14; i++, j++ )  hfont[j] = addr.ptr[i];
   hfont[15] = 0;

   // convert to vertical font
   for( i=0; i<8; i++ )
      {
      vfont[i] = 0;
      MaskBit = (0x80>>i);
      for( j=0; j<16; j++ )
	 {
	 vfont[i] = vfont[i]<<1;
	 if( (hfont[15-j]&MaskBit) == MaskBit ) vfont[i] |= 0x01;
	 }
      }

   if( color == 0 ) color = 0xffff;
   else             color = 0;
   PgIdx = y / 8;
   for( i=0; i<8; i++ )
      {
      vfont[i] ^= color;
      WriteByte( x+i, PgIdx, (unsigned char)(vfont[i]&0x00ff) );
      WriteByte( x+i, PgIdx+1, (unsigned char)((vfont[i]>>8)&0x00ff) );
      }
}

void DOTLIB::WriteHz( int x,int y, char cc[2], int color, int Scale )
{
   int i, j, PgIdx, i1, i2;
   unsigned char hfont[33], MaskBit;
   unsigned int  vfont[16];

   (void)Scale;
   memcpy( hfont, &dotM[ matrix[ (unsigned)(cc[0]&0x7f)-32 ]
	   [ (unsigned)(cc[1]&0x7f)-32]*32 ],          32   );

   // convert to vertical font
   for( i=0; i<8; i++ )
      {
      vfont[i] = 0;
      vfont[i+8] = 0;
      MaskBit = (0x80>>i);
      for( j=0; j<16; j++ )
	 {
	 vfont[i] = vfont[i]<<1;
	 vfont[i+8] = vfont[i+8]<<1;
	 if( (hfont[2*(15-j)]&MaskBit) == MaskBit ) vfont[i] |= 0x01;
	 if( (hfont[2*(15-j)+1]&MaskBit) == MaskBit ) vfont[i+8] |= 0x01;
	 }
      }

   if( color == 0 ) color = 0xffff;
   else             color = 0;
   PgIdx = y / 8;
   for( i=0; i<16; i++ )
      {
      vfont[i] ^= color;
      WriteByte( x+i, PgIdx, (unsigned char)(vfont[i]&0x00ff) );
      WriteByte( x+i, PgIdx+1, (unsigned char)((vfont[i]>>8)&0x00ff) );
      }

}