Description WINcolr.for
Source file: wincolr.f
I/O Operations: Unit ID Unit No Access Form Operation 17 SEQ FMTD OR 17 SEQ A 17 C * SEQ FMTD W Operation codes A=rewind,B=backspace,C=close,E=endfile I=inquire,O=open,R=read,W=write
External Functions and Subroutines Called INTEGER LCOUNT
Local Variables (+ indicates altered content) CHARACTER +SKIP INTEGER +I, +NCH_RUN
Referenced Common Block Variables (+ indicates altered content) CRUN_DIRECTORY CHARACTER*50 RUN_DIRECTORY WIN_COL CHARACTER*20 +CITIES_COLORS(7) WIN_COL CHARACTER*10 +COLORS(20) WIN_COL CHARACTER*20 +CONTOURS_COLORS(8) WIN_COL CHARACTER*6 +DOS_CITIES(7) WIN_COL CHARACTER*6 +DOS_COLORS(20) WIN_COL CHARACTER*6 +DOS_CONTOURS(8) WIN_COL INTEGER +NCITIES_COLORS WIN_COL INTEGER +NCOLORS, +NCONTOURS_COLORS