#include #include #include "bitmustr.c" #include "konvert.c" void hardcopy(void); void install(void); void main(void); void hardcopy() { int i, j; register int k, kb,z; register unsigned char *screen = Logbase(); long vgl[4]; for(i = 0; i < 25; i++, screen += 1280) { for (j = 0; j < 80; j++) { for (k = 0, kb = 0; k < 16; k++, kb += 80) *(((unsigned char *) vgl)+k) = *(screen+j+kb); for (z = 0; z <= MAXCHAR; z++) { for (k = 0; k < 4; k++) { if (vgl[k] != *((long *)(&bit_muster[z][k<<2]))) break; } if ( k == 4) { for (k = 1; k <= konv_liste[z][0]; k++) Bconout(0,konv_liste[z][k]); break; } } if (z == MAXCHAR+1) { Bconout(0,' '); } } Bconout(0,'\n'); } } void install() { long *dmp_vec; dmp_vec=0x502; *dmp_vec=&hardcopy; } void main() { Supexec(&install); Ptermres(0x1000L,0); }