金叉
DRAWBKBMP(CLOSE>0,'黄金分割线B');
DIFF:EMA(CLOSE,12)-EMA(CLOSE,26),LINETHICK0,colorFF;
DEA:EMA(DIFF,9),LINETHICK0,colorFF00FF;
MACD:2*(DIFF-DEA),LINETHICK0;
A:=HHV(DIFF,300);
A*1.3,LINETHICK0,colorFF00;
B:=MACD-REF(MACD,1);
K1:=SYSPARAM(3)-SYSPARAM(2)+1;
DIFF1:=HHV(DIFF,K1);
DEA1:=HHV(DEA,K1);
MACD1:=HHV(MACD,K1);
DIFF2:=LLV(DIFF,K1);
DEA2:=LLV(DEA,K1);
MACD2:=LLV(MACD,K1);
MXA:=MAX(DIFF1[DATACOUNT],MAX(DEA1[DATACOUNT],MACD1[DATACOUNT]));
MNA:=MIN(DIFF2[DATACOUNT],MIN(DEA2[DATACOUNT],MACD2[DATACOUNT]));
A2:=(MXA+MNA)/2;
A3:=MXA-MNA;
H1:=HHV(HIGH,K1);
L1:=LLV(LOW,K1);
MXB:=H1[DATACOUNT];
MNB:=L1[DATACOUNT];
B2:=(MXB+MNB)/2;
B3:=MXB-MNB;
DIFFA:=(DIFF-A2)*B3/A3+B2;
DEAA:=(DEA-A2)*B3/A3+B2;
MACDA:=(MACD-A2)*B3/A3+B2;
B4:=-A2*B3/A3+B2;
STICKLINE(MACD>0 AND B>0,B4,MACDA,10,0),color91B5;
STICKLINE(MACD>0 AND B<0,B4,MACDA,10,0),colorA9B5;
STICKLINE(MACD<0 AND B>0,B4,MACDA,10,0),colorB0B07A;
STICKLINE(MACD<0 AND B<0,B4,MACDA,10,0),color8EB03A;
博弈线:=WMA(CLOSE,8);
BYX:=WMA(CLOSE,8);
FILLRGN(BYX>REF(BYX,1),BYX,REF(BYX,1)),colorB79DCC;
FILLRGN(BYX<REF(BYX,1),BYX,REF(BYX,1)),color95AB;
低位金叉:=CROSS(DIFF,DEA) AND DIFF<-0.1;
STICKLINE(低位金叉,B4,B4+B3/20,6,0),colorFFFF;
DRAWTEXT(低位金叉,B4+B3/20,' 低位金叉'),colorFFFF;
JCCOUNT:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0));
二次金叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1;
STICKLINE(二次金叉,B4,B4-B3/40,2,0),colorFF00FF;
DRAWICON(二次金叉,DEAA*0.995,1);
DRAWTEXT(二次金叉,B4-B3/40,' 二次金叉'),ALIGN0,colorFF00FF;
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
底背离:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA);
STICKLINE(底背离,B4,B4-B3/40,2,0),colorFF00;
DRAWLINE(A1=0,DEAA,底背离,DEAA,0),LINETHICK2,colorFF;
DRAWTEXT(底背离,B4-B3/40,' 底背离'),colorFF00;
A2:=BARSLAST(REF(CROSS(DEA,DIFF),1));
顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF);
DRAWLINE(A2=0,DEAA,顶背离,DEAA,0),LINETHICK2,colorFF00;
PARTLINE(NOT(DIFF<REF(DIFF,1)),DIFFA),LINETHICK1,colorFF;
PARTLINE(NOT(DEA<REF(DEA,1)),DEAA),LINETHICK1,colorFF00FF;
PARTLINE(DIFF<REF(DIFF,1),DIFFA),LINETHICK1,colorFF00;
PARTLINE(DEA<REF(DEA,1),DEAA),LINETHICK1,colorFFFF00;
LLL:=LOW;
LL2:=LLL;
GFB1:=LL2*1.05;
GFB2:=LL2*1.07;
GFB3:=LL2*1.1;
GFB4:=LL2*1.12;
GFBD:=LL2*1.18;
GFBD1:=LL2*1.21;
EXPLAIN(REF(OPEN,1)<>REF(CLOSE,1) AND REF(CLOSE,2)/REF(OPEN,2)>1.03 AND REF(OPEN,1)>REF(CLOSE,2) AND (ABS(REF(OPEN,1)-REF(CLOSE,1)))/REF(CLOSE,1)<0.02 AND CLOSE/OPEN<0.97 AND CLOSE<REF(CLOSE,2),'\n* 黄昏之星 -空方势盛 反转信号 跳空成弃婴'),colorFFFFFF;
EXPLAINICON(REF(OPEN,1)<>REF(CLOSE,1) AND REF(CLOSE,2)/REF(OPEN,2)>1.03 AND REF(OPEN,1)>REF(CLOSE,2) AND (ABS(REF(OPEN,1)-REF(CLOSE,1)))/REF(CLOSE,1)<0.02 AND CLOSE/OPEN<0.97 AND CLOSE<REF(CLOSE,2),'30'),ALIGN0;
EXPLAIN(REF(OPEN,1)<>REF(CLOSE,1) AND REF(CLOSE,2)/REF(OPEN,2)<0.95 AND REF(OPEN,1)<REF(CLOSE,2) AND (ABS(REF(OPEN,1)-REF(CLOSE,1)))/REF(CLOSE,1)<0.03 AND CLOSE/OPEN>1.05 AND CLOSE>REF(CLOSE,2),'\n* 晨星 -多方势盛 变盘信号'),colorFFFFFF;
EXPLAINICON(REF(OPEN,1)<>REF(CLOSE,1) AND REF(CLOSE,2)/REF(OPEN,2)<0.95 AND REF(OPEN,1)<REF(CLOSE,2) AND (ABS(REF(OPEN,1)-REF(CLOSE,1)))/REF(CLOSE,1)<0.03 AND CLOSE/OPEN>1.05 AND CLOSE>REF(CLOSE,2),'13'),ALIGN0;
EXPLAIN(MIN(OPEN,CLOSE)=LOW AND HIGH-LOW>3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE<MA(CLOSE,5),'\n* 倒转槌头 -高位抛压 低位多空争执'),colorFFFFFF;
EXPLAINICON(MIN(OPEN,CLOSE)=LOW AND HIGH-LOW>3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE<MA(CLOSE,5),'19'),ALIGN0;
EXPLAIN(HIGH=MAX(OPEN,CLOSE) AND HIGH-LOW>3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE<MA(CLOSE,5),'\n* 槌头 -下影线有多头意义 在下降趋势之后看涨 注意反弹卖压'),colorFFFFFF;
EXPLAINICON(HIGH=MAX(OPEN,CLOSE) AND HIGH-LOW>3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE<MA(CLOSE,5),'\n* 31'),ALIGN0;
EXPLAIN(HIGH=MAX(OPEN,CLOSE) AND HIGH-LOW>3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE>MA(CLOSE,5),'\n* 吊颈线 -高档看跌'),colorFFFFFF;
EXPLAINICON(HIGH=MAX(OPEN,CLOSE) AND HIGH-LOW>3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE>MA(CLOSE,5),'12'),ALIGN0;
EXPLAIN(REF(CLOSE,1)/REF(OPEN,1)<0.97 AND CLOSE/OPEN>1.03 AND OPEN<REF(CLOSE,1) AND CLOSE>REF(CLOSE,1),'\n* 曙光 -与乌云盖顶相反 行情将演化为V型反转或止跌横盘趋势'),colorFFFFFF;
EXPLAINICON(REF(CLOSE,1)/REF(OPEN,1)<0.97 AND CLOSE/OPEN>1.03 AND OPEN<REF(CLOSE,1) AND CLOSE>REF(CLOSE,1),'曙光'),ALIGN0;
EXPLAIN(REF(CLOSE,1)/REF(OPEN,1)>1.03 AND CLOSE/OPEN<0.96 AND CLOSE<REF(OPEN,1) AND OPEN>REF(CLOSE,1) OR REF(CLOSE,1)/REF(OPEN,1)<0.97 AND CLOSE/OPEN>1.04 AND CLOSE>REF(OPEN,1) AND OPEN<REF(CLOSE,1),'\n* 穿头破脚 -若第一根K为阴(阳) 表强劲上涨(下跌)力量'),colorFFFFFF;
EXPLAINICON(REF(CLOSE,1)/REF(OPEN,1)>1.03 AND CLOSE/OPEN<0.96 AND CLOSE<REF(OPEN,1) AND OPEN>REF(CLOSE,1) OR REF(CLOSE,1)/REF(OPEN,1)<0.97 AND CLOSE/OPEN>1.04 AND CLOSE>REF(OPEN,1) AND OPEN<REF(CLOSE,1),'18'),ALIGN0;
EXPLAIN((ABS(REF(CLOSE,1)-REF(OPEN,1)))/REF(CLOSE,1)>0.04 AND (ABS(CLOSE-OPEN))/CLOSE<0.005 AND MAX(CLOSE,OPEN)<MAX(REF(CLOSE,1),REF(OPEN,1)) AND MIN(CLOSE,OPEN)>MIN(REF(CLOSE,1),REF(OPEN,1)),'\n* 身怀六甲 -阴(阳)怀阳(阴)怪异的走势显示该股行情可能转向 若量由大转缩更明'),colorFFFFFF;
EXPLAINICON((ABS(REF(CLOSE,1)-REF(OPEN,1)))/REF(CLOSE,1)>0.04 AND (ABS(CLOSE-OPEN))/CLOSE<0.005 AND MAX(CLOSE,OPEN)<MAX(REF(CLOSE,1),REF(OPEN,1)) AND MIN(CLOSE,OPEN)>MIN(REF(CLOSE,1),REF(OPEN,1)),'16'),ALIGN0;
EXPLAIN((ABS(REF(CLOSE,1)-REF(OPEN,1)))/REF(CLOSE,1)>0.04 AND CLOSE=OPEN AND CLOSE<MAX(REF(CLOSE,1),REF(OPEN,1)) AND CLOSE>MIN(REF(CLOSE,1),REF(OPEN,1)),'\n* 十字胎 -似身怀六甲 转向可能性更大 量缩观望为宜'),colorFFFFFF;
EXPLAINICON((ABS(REF(CLOSE,1)-REF(OPEN,1)))/REF(CLOSE,1)>0.04 AND CLOSE=OPEN AND CLOSE<MAX(REF(CLOSE,1),REF(OPEN,1)) AND CLOSE>MIN(REF(CLOSE,1),REF(OPEN,1)),'2'),ALIGN0;
EXPLAIN((ABS(HIGH-REF(HIGH,1)))/HIGH<0.001,'\n* 平顶 -该高点有一定阻力'),colorFFFFFF;
EXPLAIN((ABS(LOW-REF(LOW,1)))/LOW<0.001 AND (ABS(REF(LOW,1)-REF(LOW,2)))/REF(LOW,1)<=0.001,'\n* 平底 -该低点有一定支撑'),colorFFFFFF;
EXPLAIN(CLOSE/OPEN>1.05 AND HIGH/LOW<CLOSE/OPEN+0.018,'\n* 大阳烛 -上升行情中意味行情剧烈向上攀升 下跌行情中意味行情剧烈向上反弹'),colorFFFFFF;
EXPLAIN(OPEN/CLOSE>1.05 AND HIGH/LOW<OPEN/CLOSE+0.018,'\n* 大阴烛 -今日空方有绝对优势'),colorFFFFFF;
EXPLAIN(REF(CLOSE,1)<REF(OPEN,1) AND CLOSE>OPEN AND (ABS(CLOSE-REF(CLOSE,1)))/CLOSE<0.002 OR REF(CLOSE,1)>REF(OPEN,1) AND CLOSE<OPEN AND (ABS(CLOSE-REF(CLOSE,1)))/CLOSE<0.002,'\n* 友好反攻 -阴(阳)线结合极线 多方跳低(高)后反弹 有企稳迹象'),colorFFFFFF;
EXPLAINICON(REF(CLOSE,1)<REF(OPEN,1) AND CLOSE>OPEN AND (ABS(CLOSE-REF(CLOSE,1)))/CLOSE<0.002 OR REF(CLOSE,1)>REF(OPEN,1) AND CLOSE<OPEN AND (ABS(CLOSE-REF(CLOSE,1)))/CLOSE<0.002,'10'),ALIGN0;
EXPLAIN(HIGH<REF(LOW,1) OR LOW>REF(HIGH,1),'\n* 跳空缺口 -当日未补 有与跳空同向进行欲望强烈 三日为回补观察期'),colorFFFFFF;
EXPLAIN(REF(CLOSE,2)>REF(OPEN,2) AND REF(CLOSE,1)>REF(OPEN,1) AND CLOSE>OPEN AND REF(CLOSE,1)>REF(CLOSE,2) AND CLOSE>REF(CLOSE,1),'\n* 三白兵 -多方气盛 在底部见底反弹可能'),colorFFFFFF;
EXPLAINICON(REF(CLOSE,2)>REF(OPEN,2) AND REF(CLOSE,1)>REF(OPEN,1) AND CLOSE>OPEN AND REF(CLOSE,1)>REF(CLOSE,2) AND CLOSE>REF(CLOSE,1),'3'),ALIGN0;
|