M50:=MA(C,50);
CC11:=REF(C,1);
CC22:=REF(C,2);
{97-425}
VAR1:=(C-M50)/M50*100<-23;
VAR2:=SMA(MAX(C-CC11,0),3,1)/SMA(Abs(C-CC11),3,1)*100>16;
VAR3:=100*(HHV(H,27)-C)/(HHV(H,27)-LLV(L,27));
A97:=VAR1 AND VAR2 AND crOSS(VAR3,79) AND (O>C OR O<C) AND
(O-CC11)/CC11<0.05 AND V>MA(V,23) AND DATE>940630,COLORWHITE ;
{97-520}
MA3:=MA(C,3);
C0:=CC22*0.865;
C1:=REF(C,13)*0.772;
BOT:=MIN(C0,C1);
HSL:=100*V/CAPITAL;
MA13:=MA(C,13);
B97:=IF((C-BOT)/C<6/100 AND SUM(HSL,5)/5<1.8 AND WINNER(C)*100<0.1,1,0)
AND (C-MA(C,20))/MA(C,20)*100<-23,COLORYELLOW;
{98-2348}
VAR9:=INDEXC;
VARA:=MA(VAR9,6);
VARB:=MA(VAR9,24);
VARC:=MA(VAR9,32);
源码未复制完整....
下载附件中的源码