Cl Adaptive Stoch for TS4?

["Acefuture" <Acefuture@xxxxxxxxxxxxxxxx>]

I recently downloaded the Adaptive Stochastic indicator from this list.  I
believe it was written by Clyde Lee.  I am using TradeStation ver 4.0 and
the indicator will not verify and therefore will not work.  When I try to
verify the indicator code I get an error appearing in the next to last line
of code.
The following are the last few lines:

{--- Plot data ---}

 plot1(stochma1, "adapt_stoch") ;
 plot2(stochma2, "stochma") ;
 If Mod(CurrentBar,2)=1 then begin
  plot3(hiref, "hi_ref") ;
   plot4(loref, "lo_ref") ;
 End
 Else begin
  Plot3(currlen,"hi_ref");
 SetPlotColor(3, Green);
 End;

The term "SetPlotColor" is highlighted and I get the error message that the
"word is not recognized by Easy Language".

Also the "Adaptive Length " function which I downloaded separately will also
not verify because of the term "RefPeriod".

Does anyone know how I might modify these to work in TS 4?

Or, perhaps if these questions were brought up previously could someone
direct me to the correctly funcitoning  indicators in TS4 versions?

Thanks for any help,
Howard