Function: STABAR Purpose: Displays a progress bar in the status area. File: stabar.c Author: K.G. Begeman Use: CALL STABAR( MIN , Input REAL MAX , Input REAL CUR ) Input REAL MIN Lower range (i.e. start value). MAX Upper range (i.e. end value). CUR Current value . Example: loop through a number (NMAP) maps C no maps done CALL STABAR( 0.0, float( nmap ), 0.0 ) FOR N = 1, NMAPS . . . C progress report (N maps done) CALL STABAR( 0.0, float( nmap ), float( n ) ) CFOR Updates: Apr 1, 1987: KGB, Creation date. Feb 21, 1990: KGB, Migrated to GPS.