Return to halft.c CVS log

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

Annotation of researchv10no/cmd/view2d/halft.c, revision 1.1

1.1     ! root        1: #include <stdio.h>
        !             2: #include <math.h>
        !             3: #include "view2d.h"
        !             4: 
        !             5: extern Rd2d rd;
        !             6: char *progname;
        !             7: short timewarp;
        !             8: double ts, te;
        !             9: int verbose;
        !            10: 
        !            11: main(argc,argv)
        !            12:   int argc;
        !            13:   char **argv;
        !            14: {
        !            15:   register unsigned char *p;
        !            16:   register int prange;
        !            17:   register short *q;
        !            18:   register int r, rmin, ncolor1;
        !            19:   int i, j, k;
        !            20:   unsigned char *pict;
        !            21:   int ip;
        !            22:   short *v;
        !            23:   int ncolor = 10;
        !            24:   short nx, ny;
        !            25:   int frame, nframe;
        !            26:   int nf;
        !            27:   double frtime;
        !            28:   char *Malloc();
        !            29:   char junk[150];
        !            30:   double cleft, cright;
        !            31:   int printcol;
        !            32:   int lim202 = 255;
        !            33:   int inv_vid = 0;
        !            34:   timewarp = -1;
        !            35:   verbose = 0;
        !            36:   progname=argv[0];
        !            37: 
        !            38:   for(argc--, argv++; *argv && (**argv == '-' ); argv++){
        !            39:     switch(argv[0][1]){
        !            40:      case 'S':
        !            41:        break;
        !            42:      case 'c':
        !            43:        ncolor = atoi(&argv[0][2]);
        !            44:        break;
        !            45:      case 'i':
        !            46:        inv_vid = 1;
        !            47:        break;
        !            48:      case 't':
        !            49:        i = sscanf(&argv[0][2], "%he, %he", &ts, &te);
        !            50:        if(i<=0) error("bad TS,TE");
        !            51:        timewarp = i;
        !            52:        break;
        !            53:      case 'v':
        !            54:        verbose++;
        !            55:        if(argv[0][2]=='c') printcol++;
        !            56:        break;
        !            57:      case 'T':
        !            58:      case 'g':
        !            59:      case 's':
        !            60:        break;
        !            61:      default:
        !            62:      err:
        !            63:        fprintf(stderr,"unrecognized option: %s\n",argv[0]);
        !            64:        exit(1);
        !            65:      }
        !            66:    }
        !            67: 
        !            68:   if((timewarp>=0)&&verbose)
        !            69:     fprintf(stderr,"timewarp=%d ts=%g te=%g\n",timewarp,ts,te);
        !            70:   rd2dh(0,&nx,&ny);
        !            71:   if((timewarp>=0)&&verbose)
        !            72:     fprintf(stderr,"timewarp=%d ts=%g te=%g\n",timewarp,ts,te);
        !            73:   if(verbose){
        !            74:     fprintf(stderr,"nx=%d ny=%d\n",nx,ny);
        !            75:     fprintf(stderr,"fmin=%g fmax=%g\n",rd.fmin,rd.fmax);
        !            76:   }
        !            77:   v = (short *)Malloc(nx*ny*sizeof(short));
        !            78:   pict = (unsigned char *)Malloc(nx*ny*sizeof(char));
        !            79: 
        !            80:   prange = ((int)rd.pmax)-rd.pmin;
        !            81:   if(prange==0) prange = 1;
        !            82:   if(printcol){
        !            83:     for(j=0; j<=ncolor-1; j++){
        !            84:       cleft  = rd.fmin +     j*(rd.fmax-rd.fmin)/ncolor;
        !            85:       cright = rd.fmin + (j+1)*(rd.fmax-rd.fmin)/ncolor;
        !            86:       fprintf(stderr,"%g to %g\n", cleft, cright );
        !            87:     }
        !            88:   }
        !            89:   frame=1;
        !            90:   while(rd2di(&frtime,v)){
        !            91:     if((timewarp>=0)&&(frtime>te)) break;
        !            92:     if(verbose) fprintf(stderr,"time=%.9g frame %d\n",frtime,frame);
        !            93:     p = pict;
        !            94:     rmin = rd.pmin;
        !            95:     ncolor1 = ncolor-1;
        !            96:     for(j=ny-1; j>=0; j--){
        !            97:       q = v+j*nx;
        !            98:       for(i=0; i<nx; i++,q++,p++){
        !            99:         r = *q;
        !           100:         if( r < -BIG ){ *p = 0; }
        !           101:          else{
        !           102:           k = ((r-rmin)*ncolor)/prange;
        !           103:           if(k>=ncolor) k = ncolor1;
        !           104:           k = (k*lim202)/ncolor1;
        !           105:           *p = k;
        !           106:          }
        !           107:         if(inv_vid) *p = lim202 - *p;
        !           108:       }
        !           109:     }
        !           110:     Write(1,pict,nx*ny*sizeof(unsigned char));
        !           111:     frame++;
        !           112:   }
        !           113:   nframe = frame-1;
        !           114:   exit(0);
        !           115: }

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