通达信自用决策主图指标源码

DRAWTEXT_FIX(ISLASTBAR AND TGL<0 AND TGL<=REF(TGL,1),0.99,0.01,1,'资金状况：流出加快'),COLOR00CA00;
VAR1:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);
VAR2E:=SMA(ABS(LOW-VAR1),13,1)/SMA(MAX(LOW-VAR1,0),10,1);
VAR3E:=EMA(VAR2E,10);
VAR4E:=LLV(LOW,33);
VAR5E:=EMA(IF(LOW<=VAR4E,VAR3E,0),3);
VAR21:=SMA(ABS(HIGH-VAR1),13,1)/SMA(MIN(HIGH-VAR1,0),10,1);
VAR31:=EMA(VAR21,10);
VAR41:=HHV(HIGH,33);
VAR51:=EMA(IF(HIGH>=VAR41,VAR31,0),3);
DRAWTEXT_FIX(ISLASTBAR AND VAR51<REF(VAR51,1),0.99,0.08,1,'主力正在拉高'),COLOR0202FF;
DRAWTEXT_FIX(ISLASTBAR AND VAR5>REF(VAR5,1),0.99,0.15,1,'典型吸筹行为'),COLOR1876E9;
DRAWTEXT_FIX(ISLASTBAR AND VAR5<REF(VAR5,1),0.99,0.15,1,'典型洗盘行为'),COLORC08000;
DRAWTEXT_FIX(ISLASTBAR AND VAR5=REF(VAR5,1),0.99,0.15,1,'无特殊行为'),COLORC0C0C0;
DRAWTEXT_FIX(ISLASTBAR AND VAR51>REF(VAR51,1),0.99,0.08,1,'主力正在出货'),COLOR00CA00;
DRAWTEXT_FIX(ISLASTBAR AND VAR51=REF(VAR51,1),0.99,0.08,1,'主力无大动作'),COLORC0C0C0;
VAR78:=C/EXPMA(C,5);
A1:=COST(1.91);
A2:=COST(3.82);
A3:=COST(5);
A4:=COST(6.18);
A5:=COST(8.09);
COSTT:=(A1+A2+A3+A4+A5)/5;
COSTT1:=C/COSTT;
VARD1:=(2*INDEXC+INDEXH+INDEXL)/4;
VARD2:=LLV(INDEXL,21);
VARD3:=HHV(INDEXH,8);
MIJI:=EMA((VARD1-VARD2)/(VARD3-VARD2)*100,9);
MIJI1:=MIJI-VAR78;
MIJI2:=MIJI1-REF(MIJI1,1);
MIJI3:=MIJI-REF(MIJI,1);
DAPAN:=COSTT1-(MIJI3+0.618*MIJI2)/16.18;
DRAWTEXT_FIX(ISLASTBAR AND DAPAN<COSTT1,0.99,0.22,1,'受大盘拉动'),COLOR0202FF;
DRAWTEXT_FIX(ISLASTBAR AND DAPAN>=COSTT1,0.99,0.22,1,'受大盘压制'),COLOR00CA00;
X1E:=(FINANCE(11)-FINANCE(15))/FINANCE(10)*1.2;
X2E:=(FINANCE(31)+FINANCE(17))/FINANCE(10)*1.4;
X3E:=FINANCE(23)/FINANCE(10)*3.3;
X4E:=FINANCE(19)/FINANCE(15)*0.6;
X5E:=FINANCE(20)/FINANCE(15)*0.999;
YAOGU:=X1E+X2E+X3E+X4E+X5E;
XJF:=CON2STR(FINANCE(25)/FINANCE(15),3);
YZZ:=CON2STR((FINANCE(19)-FINANCE(22)-FINANCE(27))/FINANCE(19),2);
DRAWTEXT_FIX(YAOGU<=0,0.99,0.99,1,'拉升潜力：难于登天'),COLOR00FF00;
DRAWTEXT_FIX(YAOGU>0 AND YAOGU<=1.2,0.99,0.99,1,'拉升潜力：难度较大'),COLOR3A8B5C;
DRAWTEXT_FIX(YAOGU>1.2 AND YAOGU<=2.6,0.99,0.99,1,'拉升潜力：尚可一试'),COLOR4747B8;
DRAWTEXT_FIX(YAOGU>2.6 AND YAOGU<=5.8,0.99,0.99,1,'拉升潜力：较为容易'),COLOR2424DB;
DRAWTEXT_FIX(YAOGU>5.8,0.99,0.99,1,'拉升潜力：轻而易举'),COLOR0000FF;
DRAWTEXT_FIX(XJF>=1618,0.99,0.90,1,'过于保守'),COLOR4747B8;
DRAWTEXT_FIX(XJF>=618 AND XJF<1618,0.99,0.90,1,'保守求稳'),COLOR4747B8;
DRAWTEXT_FIX(XJF>=100 AND XJF<618,0.99,0.90,1,'收支平衡'),,COLOR0000FF;
DRAWTEXT_FIX(XJF<100,0.99,0.90,1,'负债过多'),COLOR00FF00;
DRAWTEXT_FIX(YZZ<85,0.99,0.82,1,'资产质地差'),COLOR00FF00;
{伏击优选㊣}
VAR2X:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));
VAR3X:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));

伏击:CROSS(VAR2X,MA(VAR3X,6));
DRAWTEXT(伏击,L-1.08,'↖伏击');

{猛牛}
MAV:=(C*2+H+L)/4;
SK := EMA(MAV,1) - EMA(MAV,40);
SD := EMA(SK,5);
B:=(SK-SD)*100;
猛牛拉升:=IF(B<-20,-20,IF(B>100,100,B));
强:= 40;
DRAWICON(CROSS(猛牛拉升,强) AND REF(猛牛拉升=-20,1),H+0.38, 24);
DRAWTEXT(CROSS(猛牛拉升,强) AND REF(猛牛拉升=-20,1),L-1.88,'↖猛牛');

W1:=C=HHV(C,20);
W2:=BARSLAST(W1);
W3:=IF(W2>0,REF(C,W2),REF(C,W2));
W4:=CROSS(C,REF(W3,1));
突破盘整:W4 AND COUNT(W4,5)=1;
DRAWICON(突破盘整,L-0.10,34);
DRAWTEXT(突破盘整,L-0.66,'↖突破盘整')COLORYELLOW;

M:=10;
CC:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
DD:=DMA(CLOSE,CC);
下轨通道2:=(1-M/100)*DD;
ARSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(ARSV,2,1);
D:=SMA(K,2,1);
J:=3*K-2*D;
MJ:=CROSS(J,0);
XG:=CROSS(L,下轨通道2) AND MJ AND REF(C<下轨通道2,1) ;
DRAWTEXT(XG,L-0.66,'↖千钧一击'),COLORYELLOW;
{资金监控}
总额:=AMOUNT;
买A:=IF(O=C AND (C-REF(C,1))/REF(C,1)*100>9.8,AMOUNT,AMOUNT/((H-L)*2-ABS(O-C))*(C-L));
买%:=买A/AMOUNT*100;
流入:=AMOUNT*买%/10000000000;
流出:=AMOUNT/100000000-流入;
净流:=(流入-流出);
总额3:=SUM(AMOUNT,3);
流入3:=SUM(流入,3);
流出3:=SUM(流出,3);
净流3:=SUM(流入-流出,3);
总额5:=SUM(AMOUNT,5);
流入5:=SUM(流入,5);
流出5:=SUM(流出,5);
净流5:=SUM(流入-流出,5);
总额10:=SUM(AMOUNT,10);
流入10:=SUM(流入,10);
流出10:=SUM(流出,10);
净流10:=SUM(流入-流出,10);
画:=CONST(FINDHIGH(总额10,0,190,1));
DRAWTEXT_FIX(1,0,0,0,'净流(亿):'),COLORMAGENTA,LINETHICK1;
DRAWTEXT_FIX(1,0,0.05,0,'1日'),COLORMAGENTA,LINETHICK1;
DRAWTEXT_FIX(1,0,0.15,0,'3日'),COLORMAGENTA,LINETHICK1;
DRAWTEXT_FIX(1,0,0.25,0,'5日'),COLORMAGENTA,LINETHICK1;
DRAWTEXT_FIX(1,0,0.35,0,'10日'),COLORMAGENTA,LINETHICK1;
DRAWNUMBER_FIX(1,0.05,0.05,0,CONST((净流))),COLORYELLOW;
DRAWNUMBER_FIX(1,0.05,0.15,0,CONST((净流3))),COLORYELLOW;
DRAWNUMBER_FIX(1,0.05,0.25,0,CONST((净流5))),COLORYELLOW;
DRAWNUMBER_FIX(1,0.05,0.35,0,CONST((净流10))),COLORYELLOW;
 

 

上一页  [1] [2] [3]