紫色柱子指标改成选股公式

编写要求：

通达信指标，要求当出现第一支紫色柱子的时候预警，但求信号精准一点，无限感谢，我没币。码源最好。N:=74;M:=3;PC:(C+REF(C,1)+O)/3;高:=REF(HHV(H,N),M); 低:=REF(LLV(L,N),M);H19:=高-(高-低)*0.191; H38:=高-(高-低)*0.382; H中:=高-(高-低)*0.5; H61:=高-(高-低)*0.618; H80:=高-(高-低)*0.809;顶点:REFDATE(高,DATE),COLORWHITE;%19.8:REFDATE(H19,DATE),COLORYELLOW;%38.2:REFDATE(H38,DATE),COLORMAGENTA;%50:REFDATE(H中,DATE),COLORRED;%61.8:REFDATE(H61,DATE),COLORMAGENTA;%80.9:REFDATE(H80,DATE),COLORYELLOW;低点:REFDATE(低,DATE),COLORWHITE;DRAWTEXT(ISLASTBAR,顶点,'顶点'),COLORWHITE;DRAWTEXT(ISLASTBAR,%19.8,'％19.8安全'),COLORYELLOW;DRAWTEXT(ISLASTBAR,%38.2,'％38.2'),COLORMAGENTA;DRAWTEXT(ISLASTBAR,%50,'％50'),COLORRED;DRAWTEXT(ISLASTBAR,%61.8,'％61.8'),COLORMAGENTA;DRAWTEXT(ISLASTBAR,%80.9,'％80.9'),COLORYELLOW;DRAWTEXT(ISLASTBAR,低点,'低点'),COLORWHITE;AAA:=(3*C+H+L+O)/6;VAR1:=(8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)+4*REF(AAA,4)+3*REF(AAA,5)+2*REF(AAA,6)+REF(AAA,8))/36;VAR2:=(HHV(VAR1,5)+HHV(VAR1,10)+HHV(VAR1,20))/3;VAR3:=(LLV(VAR1,5)+LLV(VAR1,10)+LLV(VAR1,20))/3;VAR4:=(HHV(VAR2,5)+HHV(VAR2,10)+HHV(VAR2,20))/3;VAR5:=(LLV(VAR3,5)+LLV(VAR3,10)+LLV(VAR3,20))/3;VAR6:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3;STICKLINE(VAR1>VAR6,VAR1,VAR6,0.5,0),COLORFF00FF;STICKLINE(C>=O,C,O,3,0),COLOR000045;STICKLINE(C>=O,C,O,2,0),COLOR000085;STICKLINE(C>=O,C,O,1,0),COLOR0000E5;STICKLINE(C>=O,H,L,0,0),COLOR0000F5;STICKLINE(C

解答：

 AAA:=(3*C+H+L+O)/6;