通达信殷富短峰副图指标 抓妖及高抛低吸做波段 一手掌控 源码附图

高:=EMA(C,2)>EMA(C,5);
底点:=BARSLAST(CROSS(EMA(C,5),EMA(C,2)));
时间:=IF(高>0,底点,5);
山顶:C/LLV(C,时间)*100-100,COLORRED;
峰值顶:HHV(山顶,10),COLORLIRED;
飞来峰:ATAN((峰值顶/REF(峰值顶,1)-1)*100)*180/3.1816,NODRAW;
登峰:ATAN((山顶/REF(山顶,1)-1)*100)*180/3.1816,NODRAW;
低:=EMA(C,2)高点:=BARSLAST(CROSS(EMA(C,2),EMA(C,5)));
时间A:=IF(低>0,高点,5);
山底:100-C/HHV(C,时间A)*100,COLORGREEN;
峰值底:HHV(山底,10),COLORLIBLUE;
DRAWICON(CROSS(山顶,山底),山顶,1);
DRAWICON(CROSS(山底,山顶),山底,2);
半山:(峰值顶+峰值底)/2,COLORGRAY;
半山峰:ATAN((半山/REF(半山,1)-1)*100)*180/3.1816,NODRAW;
顶峰:ATAN((山顶/REF(山顶,1)-1)*100)*180/3.1816,NODRAW;
IF(山顶=峰值顶 AND 山顶>=REF(山顶,1),山顶,DRAWNULL),COLORRED,LINETHICK3;
IF((飞来峰>20 OR 登峰>30) AND 山顶>山底 AND 峰值顶>峰值底 ,峰值顶,DRAWNULL),LINETHICK3,COLORFF00FF;
{DRAWNUMBER(飞来峰>0,峰值顶+半山,飞来峰),COLORYELLOW;
DRAWNUMBER(登峰>0,峰值顶+山底,登峰),COLORRED;}
成妖异动:=峰值顶>峰值底 AND 峰值顶=山顶 AND {峰值顶>峰值底 AND} (顶峰>80 AND 飞来峰>80 AND 登峰>80 AND 半山峰>80) AND COUNT((顶峰>80 AND 飞来峰>88 AND 登峰>88 AND 半山峰>80),5)=1;
DRAWTEXT(成妖异动 AND COUNT(成妖异动,5)=1,峰值顶+山底,
'★★★成妖异动★★★'),COLORMAGENTA;
底部起飞:=CROSS(山顶,山底) AND 峰值顶=山顶 AND 登峰>80 AND 飞来峰>80 AND 半山峰>80 AND 顶峰>80;
DRAWTEXT(底部起飞 AND COUNT(底部起飞,5)=1,山底,'★底部起飞'),COLORYELLOW;