pike.git / src / modules / Image / orient.c

version» Context lines:

pike.git/src/modules/Image/orient.c:1: - /* $Id: orient.c,v 1.3 1998/02/15 15:53:00 mirar Exp $ */ + /* $Id: orient.c,v 1.4 1998/02/17 19:47:44 hubbe Exp $ */      /*   **! module Image   **! note - **! $Id: orient.c,v 1.3 1998/02/15 15:53:00 mirar Exp $ + **! $Id: orient.c,v 1.4 1998/02/17 19:47:44 hubbe Exp $   **! class image   */      #include "global.h"      #include <math.h>   #include <ctype.h>      #include "stralloc.h"   #include "global.h"
pike.git/src/modules/Image/orient.c:114:         #define FOOBAR(CO,xd,yd) \    A->img[x+y*B->xsize].CO= \    sqrt((sq((B->img[(x-xd)+(y-yd)*B->xsize].CO-B-> \    img[x+y*B->xsize].CO ))+ \    sq((B->img[x+y*B->xsize].CO- \    B->img[(x+xd)+(y+yd)*B->xsize].CO)) \    )/2.0);    -  //Create image 1 +  /* Create image 1 */    for(x=1; x<A->xsize-1; x++)    for(y=1; y<A->ysize-1; y++)    {    FOOBAR(r,1,0);    FOOBAR(g,1,0);    FOOBAR(b,1,0);    }      #undef A   #define A o2img    -  //Create image 2 +  /* Create image 2 */    for(x=1; x<A->xsize-1; x++)    for(y=1; y<A->ysize-1; y++)    {    FOOBAR(r,1,1);    FOOBAR(g,1,1);    FOOBAR(b,1,1);    }         #undef A   #define A o3img    -  //Create image 3 +  /* Create image 3 */    for(x=1; x<A->xsize-1; x++)    for(y=1; y<A->ysize-1; y++)    {    FOOBAR(r,0,1);    FOOBAR(g,0,1);    FOOBAR(b,0,1);    }      #undef A   #define A o4img    -  //Create image 4 +  /* Create image 4 */    for(x=1; x<A->xsize-1; x++)    for(y=1; y<A->ysize-1; y++)    {    FOOBAR(r,-1,1);    FOOBAR(g,-1,1);    FOOBAR(b,-1,1);    }      #undef A   #define A o5img    -  //Create image 5, the hsv-thing... +  /* Create image 5, the hsv-thing... */    for(x=1; x<A->xsize-1; x++)    for(y=1; y<A->ysize-1; y++)    { -  //Första färg, sista mörkhet +  /* Första färg, sista mörkhet */    j=o1img->img[x+y*B->xsize].r+    o1img->img[x+y*B->xsize].g+    o1img->img[x+y*B->xsize].b-    o3img->img[x+y*B->xsize].r-    o3img->img[x+y*B->xsize].g-    o3img->img[x+y*B->xsize].b;       h=o2img->img[x+y*B->xsize].r+    o2img->img[x+y*B->xsize].g+    o2img->img[x+y*B->xsize].b-
pike.git/src/modules/Image/orient.c:219:       A->img[x+y*B->xsize].g=255;       A->img[x+y*B->xsize].b=MINIMUM(255, sqrt((sq(j)+sq(h))));       }             -  //Och så fylla ut de andra bilderna med lite junk. +  /* Och så fylla ut de andra bilderna med lite junk. */       pop_n_elems(args);    push_object(o1);    push_object(o2);    push_object(o3);    push_object(o4);    push_object(o5);       f_aggregate(5);   }