| Revision: | 1.1 |
| Committed: | Sat Feb 22 02:07:21 2003 UTC (21 years, 2 months ago) by greg |
| Branch: | MAIN |
| CVS Tags: | rad5R2, rad4R2P2, rad5R0, rad5R1, rad3R7P2, rad3R7P1, rad4R2, rad4R1, rad4R0, rad3R5, rad3R6, rad3R6P1, rad3R8, rad3R9, rad4R2P1 |
| Log Message: | Changes and check-in for 3.5 release Includes new source files and modifications not recorded for many years See ray/doc/notes/ReleaseNotes for notes between 3.1 and 3.5 release |
| # | Content |
|---|---|
| 1 | { |
| 2 | Generate script of 11x8 sample set of gray patches |
| 3 | on 2000x1600 pixel canvas. |
| 4 | Input is column and row number (starting from 0) |
| 5 | } |
| 6 | col = $1; { input position } |
| 7 | row = $2; |
| 8 | |
| 9 | mingray = 0; { reassign if desired } |
| 10 | |
| 11 | GAMMA : 2.2; |
| 12 | NCOLS : 11; |
| 13 | NROWS : 8; |
| 14 | XRES : 2000; |
| 15 | YRES : 1600; |
| 16 | MARGIN : 5; |
| 17 | xpatch : floor((XRES-MARGIN)/NCOLS) - MARGIN; |
| 18 | ypatch : floor((YRES-MARGIN)/NROWS) - MARGIN; |
| 19 | textheight : floor(ypatch/7); |
| 20 | xpos = MARGIN + col*(xpatch + MARGIN); |
| 21 | ypos = MARGIN + row*(ypatch + MARGIN); |
| 22 | patchgray = mingray + row*NCOLS + col; |
| 23 | patchvalue = ((patchgray+.5)/256)^GAMMA; |