趋势加支持压力附图源码

A:=AMOUNT/V/100;
 VARA:=EMA((((A-EMA(A,13))/EMA(A,13))*(0-100)),5);
 QQ:=EMA(((VARA/10)+EMA(A,13)),0);
行情线:=MA(A,1);
重心:=(C+0.618*REF(C,1)+0.382*REF(C,1)+0.236*REF(C,3)+0.146*REF(C,4))/2.382;
【操盘线】:EMA(((SLOPE(C,22)*20)+C),55),COLORRED,LINETHICK2;
 K1:=BACKSET(【操盘线】  PARTLINE(【操盘线】,k1,RGB(0,255,0)),LINETHICK2;

变:EMA(CLOSE,6),COLORRED;
 K2:=BACKSET(变  PARTLINE(变,k2,RGB(0,255,0)),LINETHICK1;

 {DRAWTEXT(ISLASTBAR,变,'【雷达线】'),COLORRED;}
 {顶底信号}
DA:=(EMA(H,1)+EMA(L,1)+EMA(H,1)+EMA(H,1))/4;
 DB:=EMA(REF(HHV(H,25),1),2);
 {DRAWTEXT(CROSS(DB,DA),DB,'←险'),COLORGREEN,LINETHICK1;}
 DRAWTEXT(CROSS(DA,【操盘线】),【操盘线】-0.5,'★B'),COLORRED,LINETHICK1;

{涨跌停显示}
涨停:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0);
 STICKLINE(涨停,O,C,3,0),COLORYELLOW;
 ZDF:=(C-REF(C,1))/REF(C,1)*100;
 STICKLINE(ZDF<-9.9,O,C,3,0),COLORGREEN;
 DA9:=(EMA(C,1)+EMA(C,2)+EMA(C,3)+EMA(C,4))/4;
 DB9:=(EMA(C,10)+EMA(C,20)+EMA(C,40)+EMA(C,80))/4;
 DRAWTEXT(CROSS(DA9-DB9,0),L*0.98,'B'),COLORYELLOW;
 JH9:=SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1)),5,1)*100;
 DRAWTEXT(CROSS(84,JH9),H*1.02,'☆S'),COLORGREEN;

{支撑，压力}
PH:=TROUGHBARS(2,5,1);
 LL:=HHV(H,PH);
 TJ1:=LL=HIGH AND LL  TS:=SUMBARS(TJ1,2);
 TJ:=PEAKBARS(2,5,1)=1 AND TS>=PH;
 DRAWICON(TJ,HIGH*1.01+0.02,12);
 {警告灯:IF(TJ,HIGH*1.008,DRAWNULL),CROSSDOT,LINETHICK2,COLORCYAN;}
 PL:=BARSLAST(TJ);
支撑:REF(LOW,BARSLAST(TJ1)),pointdot,colorgreen;
压力:REF(HIGH,PL),pointdot,coloryellow;
 {支撑:IF(BARSLAST(TJ1),REF(LOW,BARSLAST(TJ1)),DRAWNULL),COLOREA91B5;
压力:IF(BARSLAST(TJ),REF(HIGH,PL),DRAWNULL),COLORYELLOW;
 TJ_2:=LOW>REF(REF(LOW,TS),PL);
 DRAWTEXT(ISLASTBAR,压力,'压力'),COLORYELLOW;
 DRAWTEXT(ISLASTBAR,支撑,'支撑'),COLOREA91B5;};