--- ray/src/rt/rv2.c	1992/04/06 18:04:19	2.9
+++ ray/src/rt/rv2.c	1993/06/02 21:04:02	2.16
@@ -1,4 +1,4 @@
-/* Copyright (c) 1992 Regents of the University of California */
+/* Copyright (c) 1993 Regents of the University of California */
 
 #ifndef lint
 static char SCCSid[] = "$SunId$ LBL";
@@ -186,7 +186,6 @@ char  *s;
 getaim(s)				/* aim camera */
 char  *s;
 {
-	extern double  tan(), atan();
 	double  zfact;
 	VIEW  nv;
 
@@ -217,7 +216,6 @@ char  *s;
 getrotate(s)				/* rotate camera */
 char  *s;
 {
-	extern double  normalize(), tan(), atan();
 	VIEW  nv;
 	FVECT  v1;
 	double  angle, elev, zfact;
@@ -265,13 +263,18 @@ char  *s;
 {
 	char  buf[128];
 	register char  *cp;
-	register PNODE  *p;
 	RECT  r;
 	int  x, y;
-	double  e;
-
+	register PNODE  *p = &ptrunk;
+	int  adapt = 0;
+	double  e = 1.0;
+start:
 	for (cp = s; isspace(*cp); cp++)
 		;
+	if (*cp == '@') {
+		adapt++;
+		goto start;
+	}
 	if (*cp == '\0') {		/* normalize to point */
 		if (dev->getcur == NULL)
 			return;
@@ -281,7 +284,6 @@ char  *s;
 		r.l = r.d = 0;
 		r.r = hresolu; r.u = vresolu;
 		p = findrect(x, y, &ptrunk, &r, -1);
-		e = 1.0;
 	} else {
 		if (*cp == '=') {	/* absolute setting */
 			p = NULL;
@@ -289,7 +291,7 @@ char  *s;
 			for (cp++; isspace(*cp); cp++)
 				;
 			if (*cp == '\0') {	/* interactive */
-				sprintf(buf, "exposure (%lf): ", exposure);
+				sprintf(buf, "exposure (%f): ", exposure);
 				(*dev->comout)(buf);
 				(*dev->comin)(buf, NULL);
 				for (cp = buf; isspace(*cp); cp++)
@@ -297,9 +299,6 @@ char  *s;
 				if (*cp == '\0')
 					return;
 			}
-		} else {		/* normalize to average */
-			p = &ptrunk;
-			e = 1.0;
 		}
 		if (*cp == '+' || *cp == '-')	/* f-stops */
 			e *= pow(2.0, atof(cp));
@@ -307,11 +306,14 @@ char  *s;
 			e *= atof(cp);
 	}
 	if (p != NULL) {		/* relative setting */
-		if (bright(p->v) < 1e-25) {
+		if (bright(p->v) < 1e-15) {
 			error(COMMAND, "cannot normalize to zero");
 			return;
 		}
-		e *= 0.5 / bright(p->v);
+		if (adapt)
+			e *= 106./pow(1.219+pow(luminance(p->v)/exposure,.4),2.5)/exposure;
+		else
+			e *= 0.5 / bright(p->v);
 	}
 	if (e <= FTINY || fabs(1.0 - e) <= FTINY)
 		return;
@@ -400,7 +402,7 @@ register char  *s;
 	extern int  ambdiv;
 	extern int  ambssamp;
 	extern int  ambounce;
-	extern int  directinvis;
+	extern int  directvis;
 	extern double  srcsizerat;
 	extern int  do_irrad;
 	extern double  specjitter;
@@ -437,9 +439,9 @@ register char  *s;
 		case 't':			/* threshold */
 			getparam(s+2, "direct threshold", 'r', &shadthresh);
 			break;
-		case 'i':			/* invisibility */
-			getparam(s+2, "direct invisibility",
-					'b', &directinvis);
+		case 'v':			/* visibility */
+			getparam(s+2, "direct visibility",
+					'b', &directvis);
 			break;
 		case 's':			/* sampling */
 			getparam(s+2, "direct sampling", 'r', &srcsizerat);
@@ -457,7 +459,7 @@ register char  *s;
 	case 'a':			/* ambient */
 		switch (s[1]) {
 		case 'v':			/* value */
-			getparam(s+2, "ambient value", 'C', ambval);
+			getparam(s+2, "ambient value", 'C', (COLOR *)ambval);
 			break;
 		case 'a':			/* accuracy */
 			getparam(s+2, "ambient accuracy", 'r', &ambacc);
@@ -595,6 +597,9 @@ char  *s;
 		error(COMMAND, errmsg);
 		return;
 	}
+#ifdef MSDOS
+	setmode(fileno(fp), O_BINARY);
+#endif
 	(*dev->comout)("writing \"");
 	(*dev->comout)(fname);
 	(*dev->comout)("\"...\n");