通达信顶底分析预警用源码

应坛友 劲根 要求，特发此预警公式源码，请自己放进公式就OK了, 是2个公式

{死叉预警}
P1:=6;P2:=4;P3:=13;A:=(3*C+L+O+H)/6;
 VAR1:=LLV(LOW,P1);
 VAR2:=HHV(HIGH,P1);
 QS:WMA((A-VAR1)/(VAR2-VAR1)*100,P2);

GW:= REF(QS,1)>80 OR QS>80;DW:=REF(QS,1)<30 OR QS<30;
 CROSS(慢线,QS)  AND GW

{金叉预警：}
P1:=6;P2:=4;P3:=13;A:=(3*C+L+O+H)/6;
 VAR1:=LLV(LOW,P1);
 VAR2:=HHV(HIGH,P1);
 QS:WMA((A-VAR1)/(VAR2-VAR1)*100,P2);
 GW:= REF(QS,1)>80 OR QS>80;DW:=REF(QS,1)<30 OR QS<30;
 CROSS(QS,慢线) AND Dw