Return to testpat.c CVS log

Up to [Research Unix] / researchv10no / cmd / view2d

Annotation of researchv10no/cmd/view2d/testpat.c, revision 1.1.1.1

1.1       root        1: /* generate test image for calibrating Matrix and 691 film */
                      2: #include <fio.h>
                      3: 
                      4: #define t(i) (char)(i)
                      5: #define RED 0
                      6: #define GREEN 1
                      7: #define BLUE 2
                      8: char pict[512][512][3];
                      9: 
                     10: main()
                     11: {
                     12:   char *picstop, *q;
                     13:   int i, j, k;
                     14: 
                     15:   /* clear pict */
                     16:   q = &pict[0][0][0];
                     17:   picstop = q + sizeof(pict);
                     18:   while(q<picstop) *q++ = 0;
                     19: 
                     20:   i=0;j=0;k=0; fill(&pict[56+100*j][56+100*i][0],t(k),t(k),t(k));
                     21:   i=1;j=0;k=63; fill(&pict[56+100*j][56+100*i][0],t(k),t(k),t(k));
                     22:   i=2;j=0;k=80; fill(&pict[56+100*j][56+100*i][0],t(k),t(k),t(k));
                     23:   i=3;j=0;k=120; fill(&pict[56+100*j][56+100*i][0],t(k),t(k),t(k));
                     24:   i=0;j=1;k=150; fill(&pict[56+100*j][56+100*i][0],t(k),t(k),t(k));
                     25:   i=1;j=1;k=180; fill(&pict[56+100*j][56+100*i][0],t(k),t(k),t(k));
                     26:   i=2;j=1;k=215; fill(&pict[56+100*j][56+100*i][0],t(k),t(k),t(k));
                     27:   i=3;j=1;k=235; fill(&pict[56+100*j][56+100*i][0],t(k),t(k),t(k));
                     28:   i=0;j=2;k=255; fill(&pict[56+100*j][56+100*i][0],t(k),t(k),t(k));
                     29:   i=1;j=2; fill(&pict[56+100*j][56+100*i][0],t(255),t(0),t(0));
                     30:   i=2;j=2; fill(&pict[56+100*j][56+100*i][0],t(0),t(255),t(0));
                     31:   i=3;j=2; fill(&pict[56+100*j][56+100*i][0],t(0),t(0),t(255));
                     32:   i=0;j=3;k=255; fill(&pict[56+100*j][56+100*i][0],t(k),t(k),t(k));
                     33:   i=1;j=3; fill(&pict[56+100*j][56+100*i][0],t(255),t(0),t(255));
                     34:   i=2;j=3; fill(&pict[56+100*j][56+100*i][0],t(255),t(255),t(0));
                     35:   i=3;j=3; fill(&pict[56+100*j][56+100*i][0],t(0),t(255),t(255));
                     36: 
                     37:   Fprint(1,"TYPE=dump\n");
                     38:   Fprint(1,"WINDOW=0 0 512 512\n");
                     39:   Fprint(1,"NCHAN=3\n");
                     40:   Fprint(1,"CHAN=rgb\n");
                     41:   Fprint(1,"\n");
                     42:   Fflush(1);
                     43:   write(1,pict,sizeof(pict));
                     44:   exit(0);
                     45: }
                     46: 
                     47: fill(q,r,g,b)
                     48:   char *q, r, g, b;
                     49: {
                     50:   int i, j;
                     51:   for(i=0;i<100;i++){
                     52:     for(j=0;j<100;j++){
                     53:        *q++ = r;
                     54:        *q++ = g;
                     55:        *q++ = b;
                     56:     }
                     57:     q += 3*(512-100);
                     58:   }
                     59: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.