if you set ichoice = 0 in subroutine
mkbitmap, or
otherwise.
ipixout in a subroutine pixout,
you can choose the format of output image file;
ipixout=1 | PPM-P6 (binary) | |
ipixout=2 | PPM-P3 (plain text; this is most compiler-friendly.) | |
| otherwise | BMP (binary; 24-bit color depth, uncompressed) |
ifort pixelfrt.for ; ./a.out ; ppmtompeg pixelfrt.par,
pixelfrt.par is a parameter file that contains minimum information for ppmtompeg to do things.
It may not be difficult to edit/modify these files for your own purposes.
ipixel = 3 or so),
the horizontal pixel number (ihpixf)
must be multiple of 4. If not, the generated files will not be fully BMP-compatible.
mkbitmap so that you can make your own images and then movies,
which must be fun for you even though it will cost you substantial labor and time. Good luck !
$" in the I/O format.
Also some of I/O formats are restored in character arrays then referred by "fmt=string".
These are based on good old DEC Fortran extensions, and thus, may not be standard.
Whether or not these lines can be handled will depend upon the compiler you use.
If you have problem when compiling this code,
choose PPM-P3 as output format by setting ipixout = 2,
with which this code will become free from such non-standard features.