通达信短线高手主图公式 修正版 源码

之前提供的，是没法显示，已经修改了，可以显示了。

源码
 

{======================================================}

范围高A:=REFDATE(HHV(H,120),DATE)*1.05;

范围低A:=REFDATE(LLV(L,120),DATE)*0.95;

MA5:MA(CLOSE,5),COLORWHITE;

MA24:=MA(C,24),COLORGREEN,LINETHICK2;

MA72:=MA(C,72),COLORRED,LINETHICK2;

MA200:=IF((MA(C,200)<=范围高A AND MA(C,200)>=范围低A) OR C>=MA(C,200),MA(C,200),DRAWNULL),COLORBLUE,LINETHICK2;

{=======================仪表盘=========================}

主升浪:=ISLASTBAR AND MA5>MA24 AND MA24>MA72 AND MA72>IF(MA200=DRAWNULL,0,MA200);

主浪回调:=ISLASTBAR AND MA24>MA5 AND MA5>MA72 AND MA72>IF(MA200=DRAWNULL,0,MA200);

主浪深调:=ISLASTBAR AND MA24>MA72 AND MA72>MA5 AND MA5>IF(MA200=DRAWNULL,0,MA200);

初升浪:=ISLASTBAR AND IF(MA200=DRAWNULL,300,MA200)>MAX(MA24,MA72) AND MA5>MA24 AND MA24>MA72;

底部反弹:=ISLASTBAR AND IF(MA200=DRAWNULL,300,MA200)>MA72 AND MA72>MA24 AND MA5>MA24;

探底阶段:=ISLASTBAR AND IF(MA200=DRAWNULL,300,MA200)>MA72 AND MA72>MA24 AND MA24>MA5;

观望:=ISLASTBAR AND IF(MA200=DRAWNULL,MA24>MA72 AND CMA200 AND C

有牛:=ISLASTBAR AND IF(MA200=DRAWNULL,MA24=MA72,MA72=MA200);

放弃:=ISLASTBAR AND IF(MA200=DRAWNULL,MA24

DRAWGBK(显示仪表盘1=1 AND 主升浪=0 AND 主浪回调=0 AND 主浪深调=0 AND 初升浪=0 AND 底部反弹=0 AND 探底阶段=0 AND 观望=0 AND 有牛=0 AND 放弃=0,0,0,0,'观望',0)COLOR00BF00;

DRAWGBK(显示仪表盘1=1 AND 主升浪,0,0,0,'主升浪',0)COLORFF00FF;

DRAWGBK(显示仪表盘1=1 AND 主浪回调,0,0,0,'主浪回调',0)COLORFF8080;

DRAWGBK(显示仪表盘1=1 AND 主浪深调,0,0,0,'主浪深调',0)COLOR009500;

DRAWGBK(显示仪表盘1=1 AND 初升浪,0,0,0,'初升浪',0)COLOR00FFFF;

DRAWGBK(显示仪表盘1=1 AND 底部反弹,0,0,0,'底部反弹',0)COLORFFFF00;

DRAWGBK(显示仪表盘1=1 AND 探底阶段,0,0,0,'探底阶段',0);

DRAWGBK(显示仪表盘1=1 AND 观望,0,0,0,'观望',0)COLORFFFF00;

DRAWGBK(显示仪表盘1=1 AND 有牛,0,0,0,'有牛',0)COLOR00FFFF;

DRAWGBK(显示仪表盘1=1 AND 放弃,0,0,0,'放弃',0)COLOR00BF00;

拉升:IF(CURRBARSCOUNT=1 AND REF(C,1)REF(C,1) {AND MA1>REF(MA1,1)},CONST(REF(C,1)*1.01),DRAWNULL),COLORFF00FF;

A001:STICKLINE(CURRBARSCOUNT=1 AND C>=REF(C,1),拉升,拉升*0.9992,15,0),COLORMAGENTA;

DRAWTEXT(CURRBARSCOUNT=1 AND 拉升=CONST(REF(C,1)*1.01),L*0.99996,'      拉升线'),COLORMAGENTA;

DRAWKLINE(H,拉升,L,C);

止损:REF(HHV(H,13),1)*0.95,COLORGREEN,DOTLINE;

A002:STICKLINE(CURRBARSCOUNT=1 AND C>=REF(C,1),止损,止损*0.9996,15,0),COLORGREEN;

DRAWTEXT(CURRBARSCOUNT=1,止损*0.996,'止损线'),COLORGREEN;

JRH:=HHV(C,2);   

JRL:=LLV(C,2);   

MA3:=MA(CLOSE,3);   

YTSL:=(3*CLOSE+LOW+OPEN+HIGH)/6;   

VAR1:=(CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2));   

VAR2:=(REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));   

VAR3:=(REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));   

VAR4:=(REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));   

VAR5:=(REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));   

VAR6:=(REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));   

VAR7:=(REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));   

VAR8:=(REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));   

VAR9:=(REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));   

VARA:=(REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));   

VARB:=(REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));   

VARC:=(REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));   

VARD:=(CLOSE

VARE:=(REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));   

VARF:=(REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));   

VAR10:=(REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));   

VAR11:=(REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));   

VAR12:=(REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));   

VAR13:=(REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));   

VAR14:=(REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));   

VAR15:=(REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));   

VAR16:=(REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));   

VAR17:=(REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2));   

VAR18:=(REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2));   

VAR19:=((REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1)) AND VAR1);   

VAR1A:=((REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,1)) AND VARD);   

红色持股:VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,COLOR0000FF,NODRAW;   

离场:=IF(红色持股,JRL,DRAWNULL);   

明离场价:=离场,COLORFF99FF,NODRAW;   

今离场价:REF(离场,1)COLOR0000FF,NODRAW;   

青色观望:VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,COLORFFFF00,NODRAW;   

进:=IF(青色观望,JRH,DRAWNULL);   

明进场价:=进,COLOR33AACC,NODRAW;   

今进场价:REF(明进场价,1),COLORFF0000,NODRAW;   

短买:VAR19,COLOR33AACC,NODRAW;   

品红离场:VAR1A,COLORFF99FF,NODRAW;   

急速超跌:(CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*100<-14,COLORFFFFFF,NODRAW;   

上市日期年:REF(YEAR,BARSCOUNT(CLOSE)-1),NODRAW,COLOR0000FF;   

月:REF(MONTH,BARSCOUNT(CLOSE)-1),NODRAW,COLORFF00FF;   

日:REF(DAY,BARSCOUNT(CLOSE)-1),NODRAW,COLOR00FFFF;  {GUPIAOFF.COM} 

辰星线:(20*YTSL+19*REF(YTSL,1)+18*REF(YTSL,2)+17*REF(YTSL,3)+16*REF(YTSL,4)+15*REF(YTSL,5)+14*REF(YTSL,6)+13*REF(YTSL,7)+12*REF(YTSL,8)+11*REF(YTSL,9)+10*REF(YTSL,10)+9*REF(YTSL,11)+8*REF(YTSL,12)+7*REF(YTSL,13)+6*REF(YTSL,14)+5*REF(YTSL,15)+4*REF(YTSL,16)+3*REF(YTSL,17)+2*REF(YTSL,18)+REF(YTSL,20))/211,COLOR0000FF;   

牵牛线:MA(CLOSE,26),COLORFF00FF; 

等待:=IF(MA3>辰星线,辰星线,MA3);   

IF(等待>REF(等待,1),等待,DRAWNULL),LINETHICK2,COLOR00FFFF;   

IF(辰星线>REF(辰星线,1),辰星线,DRAWNULL),LINETHICK2,COLOR0000FF;   

IF(辰星线

IF(牵牛线>REF(牵牛线,1),牵牛线,DRAWNULL),LINETHICK1,COLORFF00FF;   

IF(牵牛线

涨停:DYNAINFO(3)*1.1,COLORRED,NODRAW;

跌停:DYNAINFO(3)*0.9,COLORGREEN,NODRAW;    

STICKLINE(ISLASTBAR AND (红色持股 OR REF(红色持股,1)=1),今离场价,今离场价,30,1),COLOR0000FF;   

STICKLINE(ISLASTBAR AND (青色观望 OR REF(青色观望,1)=1),今进场价,今进场价,30,1),COLOR00FF00;   

STICKLINE(C>=O,L,H,0,0),COLOR0000CC;   

STICKLINE(C

STICKLINE(1,C,O,3.5,0),COLOR858500;   

STICKLINE(C>=O,C,O,3.5,0),COLOR0000E5;   

STICKLINE(红色持股,CLOSE,O,2.8,0),COLOR000055;   

STICKLINE(红色持股,CLOSE,O,2,0),COLOR000088;   

STICKLINE(红色持股,CLOSE,O,1.5,0),COLOR0000AA;   

STICKLINE(红色持股,CLOSE,O,1,0),COLOR0000CC;   

STICKLINE(红色持股,CLOSE,O,0.5,0),COLOR0000EE;   

STICKLINE(青色观望,CLOSE,O,2.8,0),COLOR555500;   

STICKLINE(青色观望,CLOSE,O,2,0),COLOR888800;   

STICKLINE(青色观望,CLOSE,O,1.5,0),COLORAAAA00;   

STICKLINE(青色观望,CLOSE,O,1,0),COLORCCCC00;   

STICKLINE(青色观望,CLOSE,O,0.5,0),COLOREEEE00;   

CO:=(C-O);   

STICKLINE(急速超跌,O,C-CO/2,2.8,0),COLOR555555;   

STICKLINE(急速超跌,O,C-CO/2,2,0),COLOR888888;   

STICKLINE(急速超跌,O,C-CO/2,1.5,0),COLORAAAAAA;   

STICKLINE(急速超跌,O,C-CO/2,1,0),COLORCCCCCC;   

STICKLINE(急速超跌,O,C-CO/2,0.5,0),COLOREEEEEE;   

STICKLINE(短买,O,O+CO/3,2.8,0),COLOR335555;   

STICKLINE(短买,O,O+CO/3,2,0),COLOR338888;   

STICKLINE(短买,O,O+CO/3,1.5,0),COLOR33AAAA;   

STICKLINE(短买,O,O+CO/3,1,0),COLOR33CCCC;   

STICKLINE(短买,O,O+CO/3,0,0),COLOR33EEEE;   

DRAWTEXT(短买,REF(CLOSE,1),'←短买'),COLOR33FFCC;   

STICKLINE(品红离场,O,O+CO/3,2.8,0),COLOR550055;   

STICKLINE(品红离场,O,O+CO/3,2,0),COLOR880088;   

STICKLINE(品红离场,O,O+CO/3,1.5,0),COLORAA00AA;   

STICKLINE(品红离场,O,O+CO/3,1,0),COLORCC00CC;   

STICKLINE(品红离场,O,O+CO/3,0.5,0),COLOREE00EE;   

DRAWTEXT(品红离场,REF(CLOSE,1)+0.1,'←离场'),COLORFF99FF;

DRAWRECTREL(0,500,147,999.4,IF(120,RGB(10,0,0),0));

超B:=L2_AMO(0,2)/10000.0;

大B:=L2_AMO(1,2)/10000.0;

中B:=L2_AMO(2,2)/10000.0;

小B:=L2_AMO(3,2)/10000.0;

超S:=L2_AMO(0,3)/10000.0;

大S:=L2_AMO(1,3)/10000.0;

中S:=L2_AMO(2,3)/10000.0;

小S:=L2_AMO(3,3)/10000.0;

TESTSKIP(NOT(超B OR 大B OR 中B OR 小B OR 超S OR 大S OR 中S OR 小S)!=0);

大宗进:=(超B)+(大B),NODRAW;

大宗出:=(超S)+(大S),NODRAW;

非大宗进:=(中B)+(小B),NODRAW;

非大宗出:=(中S)+(小S),NODRAW;

大宗进限制:=IF((超B+大B)=0,0,大宗进);

大宗出限制:=IF((超S+大S)=0,0,大宗出);

非大宗进限制:=IF(中B+小B=0,0,非大宗进);

非大宗出限制:=IF(中S+小S=0,0,非大宗出);

主力净流入:=(超B+大B)-(超S+大S),COLORRED,NODRAW;

散户净流入:=(中B+小B)-(中S+小S),COLORRED,NODRAW;

主力强势:=大宗进>大宗出*3;

净流入:=((超B+大B+中B+小B)-(超S+大S+中S+小S));

连续流入:EVERY(净流入>0,2),NODRAW,COLORFFFFFF;

{DDE显示}

DDX:=(LARGEINTRDVOL-LARGEOUTTRDVOL)*1000/FINANCE(7);

DDY:=IF(TRADENUM>0,(TRADEOUTNUM-TRADEINNUM)*100/TRADENUM,0);

DDZ:=IF(TRADENUM>0,(LARGETRDINNUM-LARGETRDOUTNUM)/TRADENUM*100,0);

DRAWRECTREL(150,500,192,540,IF(CONST(DDX)>0,RGB(255,0,0),RGB(0,50,0)));

DRAWRECTREL(150,545,192,585,IF(CONST(DDY)>0,RGB(255,0,0),RGB(0,50,0)));

DRAWRECTREL(150,590,192,630,IF(CONST(DDZ)>0,RGB(255,0,0),RGB(0,50,0)));

DRAWTEXT_FIX(1,0.153,0.500,0,STRCA