| Revision: | 1.1 |
| Committed: | Mon Feb 6 20:26:07 2006 UTC (18 years, 4 months ago) by root |
| Content type: | application/x-csh |
| Branch point for: | UPSTREAM, MAIN |
| Log Message: | Initial revision |
| # | Content |
|---|---|
| 1 | #!/bin/csh |
| 2 | |
| 3 | set x=0 |
| 4 | set y=0 |
| 5 | |
| 6 | cp 3x3.ppm work.ppm |
| 7 | |
| 8 | while ($y<3) |
| 9 | while ($x<3) |
| 10 | @ f =$x + $y * 3 + 1 |
| 11 | @ y1 = $y * 24 |
| 12 | @ x1 = $x * 24 |
| 13 | set filename = "big_wiz.$f""13.xpm" |
| 14 | xpmtoppm $filename > tmp.ppm |
| 15 | pnmpaste tmp.ppm $x1 $y1 work.ppm > tmp2.ppm |
| 16 | mv tmp2.ppm work.ppm |
| 17 | echo "x1 = $x1 y1=$y1 file = $filename" |
| 18 | @ x ++ |
| 19 | end |
| 20 | set x=0 |
| 21 | @ y ++ |
| 22 | end |