home *** CD-ROM | disk | FTP | other *** search
- /*
- * windy.c
- *
- * Copyright (C) 1989, 1991, Craig E. Kolb
- * All rights reserved.
- *
- * This software may be freely copied, modified, and redistributed
- * provided that this copyright notice is preserved on all copies.
- *
- * You may not distribute this software, in whole or in part, as part of
- * any commercial product without the express consent of the authors.
- *
- * There is no warranty or other guarantee of fitness of this software
- * for any purpose. It is provided solely "as is".
- *
- * $Id: windy.c,v 4.0 91/07/17 14:44:25 kolb Exp Locker: kolb $
- *
- * $Log: windy.c,v $
- * Revision 4.0 91/07/17 14:44:25 kolb
- * Initial version.
- *
- */
- #include "texture.h"
- #include "windy.h"
-
- /*
- * Create and return a reference to a "windy" texture.
- */
- WindyText *
- WindyCreate(scale, wscale, cscale, bscale, octaves, tscale, hscale, offset)
- Float scale, wscale, cscale, bscale, tscale, hscale, offset;
- int octaves;
- {
- WindyText *windy;
-
- windy = (WindyText *)RayMalloc(sizeof(WindyText));
- windy->scale = scale;
- windy->windscale = wscale;
- windy->chaoscale = cscale;
- windy->bumpscale = bscale;
- windy->tscale = tscale;
- windy->hscale = hscale;
- windy->offset = offset;
- windy->octaves = octaves;
- return windy;
- }
-
- /*
- * Apply a "windy" texture.
- */
- void
- WindyApply(windy, prim, ray, pos, norm, gnorm, surf)
- WindyText *windy;
- Geom *prim;
- Ray *ray;
- Vector *pos, *norm, *gnorm;
- Surface *surf;
- {
- Vector bump;
-
- Windy(pos, windy->windscale, windy->chaoscale, windy->bumpscale,
- windy->octaves, windy->tscale, windy->hscale, windy->offset,
- &bump);
-
- norm->x += windy->scale * bump.x;
- norm->y += windy->scale * bump.y;
- norm->z += windy->scale * bump.z;
- VecNormalize(norm);
- }
-