Poniżej historyczna wersja odczytująca monochromatyczny obrazek kropka po kropce z ekranu karty Hercules do pliku lub bezpośrednio na 9 igłową drukarkę Star NX15, sterowaną kodami Epsona.


#define ESC '\x1B'

void hcopy(step,lines,density,funct)
int lines,density,step;
void (*funct)(unsigned char byte);
/* argument funct to funkcja wysyłająca bajt do pliku lub bezpośrednio na drukarkę */
{
   int x,y,z,i;
   unsigned int byte;
   (*funct)(13);
   for (y=0; y<lines; y+=step)
       {
         for(i=0;i<=density;++i)
            {
             (*funct)(ESC);(*funct)('*');(*funct)('\x01');
             (*funct)('\xD0');(*funct)('\x02');

             for (x=0; x<720; x++) {
                                     byte = 0;
                                     for (z=0;z<step;z++)
                                         {
                                           byte <<=1;
                                           byte |= (point(x,y+z) == 1);
                                         }
                                     byte <<=8-step;
                                     (*funct)(byte);
                                   }
             (*funct)(ESC);(*funct)('J');(*funct)('\x01');
             (*funct)('\x0d');
            }
         (*funct)(ESC);(*funct)('J');(*funct)(3*step-1-density);
       }
}



Edytuj