src/rawcolor.c
/************************************************************************/
/*									*/
/*			n e w C o l o r i z e F o n t 8			*/
/*									*/
/*									*/
/*									*/
/************************************************************************/
n e w C o l o r i z e F o n t 8
n e w C o l o r i z e F o n t 8
void newColorizeFont8(PILOTBBT *pbt, u_char backcolor, u_char forecolor, LispPTR srctype, LispPTR ope)
{
  register DLword *nbase;
  register u_char *dbase;
  register int i;
  nbase = (DLword *)Addr68k_from_LADDR((pbt->pbtsourcehi << 16) | (pbt->pbtsourcelo));
  (DLword *)dbase = (DLword *)Addr68k_from_LADDR((pbt->pbtdesthi << 16) | (pbt->pbtdestlo));
  dbase += pbt->pbtdestbit;
  for (i = 0; i < pbt->pbtheight;
       i++, nbase += pbt->pbtsourcebpl / 16, dbase += pbt->pbtdestbpl / 8) {
    lineBlt8(nbase, pbt->pbtsourcebit, dbase, pbt->pbtwidth, backcolor, forecolor, srctype, ope);
  } 
}
void newColorizeFont8 ( PILOTBBT * pbt , u_char backcolor , u_char forecolor , LispPTR srctype , LispPTR ope ) { register DLword * nbase ; register u_char * dbase ; register int i ; nbase = ( DLword * ) Addr68k_from_LADDR ( ( pbt -> pbtsourcehi << 16 ) | ( pbt -> pbtsourcelo ) ) ; ( DLword * ) dbase = ( DLword * ) Addr68k_from_LADDR ( ( pbt -> pbtdesthi << 16 ) | ( pbt -> pbtdestlo ) ) ; dbase += pbt -> pbtdestbit ; for ( i = 0 ; i < pbt -> pbtheight ; i ++ , nbase += pbt -> pbtsourcebpl / 16 , dbase += pbt -> pbtdestbpl / 8 ) { lineBlt8 ( nbase , pbt -> pbtsourcebit , dbase , pbt -> pbtwidth , backcolor , forecolor , srctype , ope ) ; } }
n e w C o l o r i z e F o n t 8
n e w C o l o r i z e F o n t 8
/* for end */