Title     : ProgInd
Programmer: Anthony J Doggett
Calculator: TI-83
Date      : Apr 97
Function  : Subroutine to print progress indicator
            See "TstProg" too for example use

  For(A,_T(1),_T(1)+_T(3)     ;"_"=small L for lists.
                              ; The _T() should be used by ProgInd only
  Line(A,_T(4),A,_T(5)
  A -> _T(1)                  ;"->" = store button
  Text(6,38,"  ",A            ;Remove this line if you don't want it
                              ; to print % as text
  End
  Return