TITLE: Three-peat EXPLAINER: This is the code for our simple triple moving average crossover system. Sub ThreeMACrossover(SLen as integer,MLen as integer,LLen as integer) Dim ShortAve As BarArray Dim LongAve As BarArray Dim MedAve As BarArray ShortAve = Average(Close, SLen,0) MedAve=Average(Close,MLen,0) LongAve = Average(Close, LLen,0) If ShortAve > MedAve and MedAve>LongAve then Buy("BuyEnt",1,0,Market,DAY) End If If ShortAve < MedAve and MedAve