;Script for displaying a bargraph type progressmeter.

SETFONT topaz 8

SET Offset   ;offset from left
SET Grow ##      ;the growspeed (more #=>faster)
SET BarGraph $Offset$Grow

ECHO "*e[1mBargraph Script example by AlcoRhythm of The Problem*e[0m"
ECHO   ;the colour
WAIT 1

LAB Repeat
ECHO 
ECHO $BarGraph ;draw graph
ECHO $BarGraph
ECHO $BarGraph

SET BarGraph $BarGraph$Grow  ;add Grow to BarGraph

IF NOT $BarGraph EQ $Offset##################################################################
  SKIP BACK Repeat
ENDIF

ECHO 
ECHO $Offset "Finished...*n"
ECHO