通达信〖判势主图〗自动取最近120周期高低点指标公式源码

VAR_N:=120;
VAR_K:=BARSLAST(CURRBARSCOUNT=VAR_N);
VAR_GD:=CONST(IF(ISLASTBAR=1,HHV(H,VAR_K),0));
VAR_DD:=CONST(IF(ISLASTBAR=1,LLV(L,VAR_K),0));
VAR_KJ:=VAR_GD-VAR_DD;
VAR_GD4:=IF(CURRBARSCOUNT<=VAR_N/2,VAR_GD,DRAWNULL);
VAR_高区:IF(CURRBARSCOUNT<=VAR_N,VAR_GD,DRAWNULL),COLORRED,LINETHICK2;
VAR_低区:IF(CURRBARSCOUNT<=VAR_N,VAR_DD,DRAWNULL),COLOR00FF00,LINETHICK2;
VAR_平衡:=IF(CURRBARSCOUNT<=VAR_N,VAR_DD+VAR_KJ/2,DRAWNULL),COLOR00FFFF,NODRAW;
VAR_低:=IF(CURRBARSCOUNT<=VAR_N/2,VAR_DD,DRAWNULL),COLORFFFF00;
VAR_高:=IF(CURRBARSCOUNT<=VAR_N/2,VAR_GD,DRAWNULL),COLOR00FFFF;
VAR_支撑:=IF(CURRBARSCOUNT<=VAR_N/2,VAR_DD+VAR_KJ*0.191,DRAWNULL),COLOR00FFFF;
VAR_强势:=IF(CURRBARSCOUNT<=VAR_N/2,VAR_DD+VAR_KJ*0.382,DRAWNULL),COLORFF00FF;
VAR_突破:=IF(CURRBARSCOUNT<=VAR_N/2,VAR_DD+VAR_KJ/2,DRAWNULL),COLOR0000FF;
VAR_警示:=IF(CURRBARSCOUNT<=VAR_N/2,VAR_DD+VAR_KJ*0.618,DRAWNULL),COLOR00FFFF;
VAR_压力:=IF(CURRBARSCOUNT<=VAR_N/2,VAR_DD+VAR_KJ*0.809,DRAWNULL),COLOR00FF00;
VAR_低涨:=IF(CURRBARSCOUNT<=VAR_N/2,(C/LLV(LOW,VAR_K)-1)*100,DRAWNULL),COLOR0000FF,NODRAW;
VAR_天数:=BARSLAST(L=VAR_DD),COLORCYAN,NODRAW;
VAR_顶点:=IF(CURRBARSCOUNT<=VAR_N/2, CONST(IF(ISLASTBAR=1,HHV(H, BARSLAST(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORRED,crOSSDOT;
VAR_低点:=IF(CURRBARSCOUNT<=VAR_N/2, CONST(IF(ISLASTBAR=1,LLV(L, BARSLAST(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORMAGENTA,CROSSDOT;
STICKLINE(CURRBARSCOUNT=VAR_N,VAR_GD,VAR_DD,0,0),COLORGREEN;
STICKLINE(CURRBARSCOUNT=VAR_N/2,VAR_GD,VAR_DD,0,0),COLOR408080;
STICKLINE(CURRBARSCOUNT=1,VAR_GD,VAR_DD,0,0),COLORGREEN;
STICKLINE(CURRBARSCOUNT<=VAR_N/2,VAR_支撑,VAR_支撑,2,0),COLORFF00FF;
STICKLINE(CURRBARSCOUNT<=VAR_N/2,VAR_强势,VAR_强势,2,0),COLORFF00FF;
STICKLINE(CURRBARSCOUNT<=VAR_N/2,VAR_突破,VAR_突破,2,0),COLORABABAB;
STICKLINE(CURRBARSCOUNT<=VAR_N/2,VAR_警示,VAR_警示,2,0),COLOR00FFFF;
STICKLINE(CURRBARSCOUNT<=VAR_N/2,VAR_压力,VAR_压力,2,0),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=10,VAR_压力,'压力-0.809'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=10,VAR_警示,'警示-0.618'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=10,VAR_突破,'突破-0.500'),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=10,VAR_强势,'强势-0.382'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=10,VAR_支撑,'支撑-0.191'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=VAR_N/4+5,VAR_GD-VAR_KJ*0.09,'【风险区】--高抛避险'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=VAR_N/4+5,VAR_GD-VAR_KJ*0.3,'【警示区】--逢高减仓'),COLOR0000FF;
DRAWTEXT(CURRBARSCOUNT=VAR_N/4+5,VAR_GD-VAR_KJ*0.45,'【突破区】--主力拉升'),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=VAR_N/4+5,VAR_GD-VAR_KJ*0.55,'【拉升区】--强势畜锐'),COLORFFFF80;
DRAWTEXT(CURRBARSCOUNT=VAR_N/4+5,VAR_DD+VAR_KJ/3,'【关注区】--逢低买入'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=VAR_N/4+5,VAR_DD+VAR_KJ/10,'【低吸区】--大胆买入'),COLOR00FF00;
DRAWTEXT(CURRBARSCOUNT=VAR_N/2+40,VAR_GD-VAR_KJ*0.25,'【拉升区】'),COLORRED;
DRAWTEXT(CURRBARSCOUNT=VAR_N/2+40,VAR_DD+VAR_KJ*0.25,'【持股区】'),COLORYELLOW;
第一防线:REFDATE(VAR_低,DATE),POINTDOT,COLORYELLOW,LINETHICK4;
第二防线:REFDATE(VAR_支撑,DATE),POINTDOT,COLORWHITE,LINETHICK4;
DRAWKLINE(H,O,L,C);
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
攻击线:(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210,COLORRED,LINETHICK2;
趋势线:MA(攻击线,6),COLORGREEN,LINETHICK2;
涨停紫色:STICKLINE((C-REF(C,1))/REF(C,1)>0.095,C,O,3.05,0),COLORYELLOW;
VAR6:=EMA(CLOSE,21);
VAR7:=VAR6< REF(VAR6,1);
VAR8:=IF(VAR7-1,VAR6,DRAWNULL);
VAR9:=EMA(CLOSE,3)>EMA(CLOSE,21);
VAR10:=EMA(CLOSE,3)< EMA(CLOSE,21);
VAR11:=EMA(CLOSE,3)>EMA(CLOSE,8);
VAR12:=EMA(CLOSE,3)< EMA(CLOSE,8);
STICKLINE(VAR9,LOW,HIGH,0,0),COLOR0088EE;
STICKLINE(VAR9,CLOSE,OPEN,3,0),COLOR0055AA;
STICKLINE(VAR9,CLOSE,OPEN,2.8,0),COLOR0066BB;
STICKLINE(VAR9,CLOSE,OPEN,2.5,0),COLOR0077CC;
STICKLINE(VAR9,CLOSE,OPEN,2.2,0),COLOR0088DD;
STICKLINE(VAR9,CLOSE,OPEN,1.7,0),COLOR0099EE;
STICKLINE(VAR9,CLOSE,OPEN,1.2,0),COLOR00AAFF;
STICKLINE(VAR9,CLOSE,OPEN,0.7,0),COLOR00CCFF;
STICKLINE(VAR9,CLOSE,OPEN,0.2,0),COLORYELLOW;
STICKLINE(VAR10,HIGH,LOW,0,1),COLORGREEN;
STICKLINE(VAR10,CLOSE,OPEN,3.2,0),COLOR006600;
STICKLINE(VAR10,CLOSE,OPEN,2.6,0),COLOR008800;
STICKLINE(VAR10,CLOSE,OPEN,1.9,0),COLOR00AA00;
STICKLINE(VAR10,CLOSE,OPEN,1.1,0),COLOR00CC00;
STICKLINE(VAR10,CLOSE,OPEN,0.3,0),COLORGREEN;
STICKLINE(VAR10 AND VAR11,HIGH,LOW,0,1),COLORFF55FF;
STICKLINE(VAR10 AND VAR11,CLOSE,OPEN,3.2,0),COLOR880088;
STICKLINE(VAR10 AND VAR11,CLOSE,OPEN,2.6,0),COLORAA00AA;
STICKLINE(VAR10 AND VAR11,CLOSE,OPEN,1.9,0),COLORCC00CC;
STICKLINE(VAR10 AND VAR11,CLOSE,OPEN,1.1,0),COLOREE00EE;
STICKLINE(VAR10 AND VAR11,CLOSE,OPEN,0.3,0),COLORFF44FF;
STICKLINE(VAR9 AND VAR12,HIGH,LOW,0,1),COLORFF8800;
STICKLINE(VAR9 AND VAR12,CLOSE,OPEN,3.2,0),COLORFF2200;
STICKLINE(VAR9 AND VAR12,CLOSE,OPEN,2.6,0),COLORFF4400;
STICKLINE(VAR9 AND VAR12,CLOSE,OPEN,1.9,0),COLORFF6600;
STICKLINE(VAR9 AND VAR12,CLOSE,OPEN,1.1,0),COLORFF8800;
STICKLINE(VAR9 AND VAR12,CLOSE,OPEN,0.3,0),COLORFFAA00;
VAR13:=EMA(CLOSE,13)-EMA(CLOSE,55);
VAR14:=EMA(0.618*REF(VAR13,1)+0.382*VAR13,3);
VAR15:=REF(CLOSE,1);
VAR16:=EMA(HHV(HIGH,1),8);
VAR17:=EMA(CLOSE,8);
VAR18:=VAR17< REF(VAR17,1) AND CLOSE< VAR17;
VAR19:=IF(VAR16< REF(VAR16,1) OR VAR18,1,0);
VAR20:=SMA(MAX(CLOSE-VAR15,0),2,1)/SMA(Abs(CLOSE-VAR15),2,1)*100;
VAR21:=45;
VAR22:=20;
VAR23:=VAR20< VAR21 AND REF(VAR20,1)>VAR21;
VAR24:=VAR20< VAR22 AND REF(VAR20,1)>VAR22;
VAR25:=(COUNT(VAR19=1,4)=3 AND VAR19=0 AND OPEN< CLOSE AND (CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>0.065)*10>=10 OR ((CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>0.065 AND (REF(VAR24,1) OR REF(VAR23,1)));
DRAWICON(VAR25,LOW,7);
STICKLINE(VAR25,LOW,LOW+(HIGH-LOW)/2,2.7,0),COLORYELLOW;
STICKLINE(VAR25,LOW+(HIGH-LOW)/2,HIGH,2.7,0),COLORRED;
STICKLINE(cci>=200 AND H>=VAR_顶点,O,C,2,0),COLORBLUE;
STICKLINE(CCI<=100 AND L<=VAR_低点,O,C,2,0),COLORYELLOW;