DIFF := EMA(CLOSE,12) - EMA(CLOSE,26); DEA := EMA(DIFF,9); ZTS := BARSLAST(CROSS(0,DEA)); {DIFF,DEA开始<0轴的那天!!} ZDD := BARSLAST(DIFF=LLV(DIFF,ZTS)); {DIFF在DEA进入0轴后至现在的最低的那天!!} JC2 := BARSLAST(CROSS(DIFF,DEA)); {最近diff,dea金叉!!} JC1 := REF(JC2,1); {最近diff,dea金叉的上一个金叉!!} PP := 1; FOR I=ZTS DOWNTO 1 DO IF REF(DIFF,I)>0 THEN PP := 0; {自DEA低于0轴以来,必须DIFF一直在0轴以下!!否则PP=0!!} MR := DIFF>DEA AND DIFF<0 AND PP AND JC1<ZDD {上次DIFF,DEA金叉必须在DIFF最低的那天之后,即DIFF不创新低!!} AND JC2<JC1 AND REF(DIFF,JC1)<REF(DIFF,JC2) {二次金叉时的DIFF底部在抬高!!} ; |
|