「买入」通达信源码:陆股通净买卖量,短绝底强升追+飞龙在天,虎哥优化主图

陆股通净买卖量,适用于新版通达信

{万股}

陆股通持股:=IF(GPJYVALUE(6,1,0)>0,GPJYVALUE(6,1,0),DRAWNULL)/10000;

陆股通净买入量:陆股通持股-REF(陆股通持股,1),NODRAW;

流通股:=CAPITAL/100;

五日增仓:REF(SUM(陆股通净买入量,5)/流通股*100,1),NODRAW;

二十日增仓:REF(SUM(陆股通净买入量,20)/流通股*100,1),NODRAW;

六十日增仓:REF(SUM(陆股通净买入量,60)/流通股*100,1),NODRAW;

一年增仓:REF(SUM(陆股通净买入量,240)/流通股*100,1),NODRAW;

陆股通持股市值:REF(C,1)*陆股通持股/10000,NODRAW;

STICKLINE(陆股通净买入量>0,陆股通净买入量,0,2,1),COLOR3130FF;

STICKLINE(陆股通净买入量<0,陆股通净买入量,0,2,0),COLORFFFF52;{COLORFFFF8};

DRAWTEXT_FIX(C>0,0.015,0,0,'五日增仓=五日净买入量/流通股*100');

短绝底强升追+飞龙在天,超级强强组合双剑合一:

指标用法:

1、在主图上寻找底部寻找发出“飞龙在天“买入信号的股票,配合副图“短绝底强升追”同时发出买入信号,形成共振,双剑合一,效果极佳!
2、 此双指标指标用于做中短线较好;短线出击指标出现,即可买入;买入趋势处于平行震荡及上升为佳;
温馨提示:该指标虽然历史测评成功率非常高,但并不代表未来选出的股票都能达到非常好的效果,一定要配合大盘的走势,大盘不好,啥指标成功率都打折扣!切记!!!股票的上涨从来不是因为某个指标出现了买入信号才上涨,而是因为股票上涨了才可能导致某个指标发出买入信号,仅此而已。切忌过度迷恋指标,否则你一样会被残酷的市场所淘汰。
 
{飞龙在天}
TS:=500;
N:=95;
M1:=5;
M2:=10;
DA1:=IF(TS>TOTALBARSCOUNT,TOTALBARSCOUNT,TS);
VA:=IF((DATETODAY(DATE))<11880,1,DRAWNULL);
DA:=IF(CURRBARSCOUNT>DA1,0,DA1);
HI:=REFDATE(HHV(H,DA),DATE);
{最高价}LO:=REFDATE(LLV(L,DA),DATE);
C1:=IF(CURRBARSCOUNT<=DA,C,DRAWNULL);
XAS:=IF(DATE<2442.46*500,1,DRAWNULL);
GZ:=EXP(LN(HI/LO)/15)*VA;
{对数格值}LH1:=SUM(IF(C1>=(HI/GZ),V,0),DA);
LH2:=SUM(IF(C1>=(HI/POW(GZ,2)) AND C1<(HI/GZ),V,0),DA);
LH3:=SUM(IF(C1>=(HI/POW(GZ,3)) AND C1<(HI/POW(GZ,2)),V,0),DA);
LH4:=SUM(IF(C1>=(HI/POW(GZ,4)) AND C1<(HI/POW(GZ,3)),V,0),DA);
LH5:=SUM(IF(C1>=(HI/POW(GZ,5)) AND C1<(HI/POW(GZ,4)),V,0),DA);
LH6:=SUM(IF(C1>=(HI/POW(GZ,6)) AND C1<(HI/POW(GZ,5)),V,0),DA);
LH7:=SUM(IF(C1>=(HI/POW(GZ,7)) AND C1<(HI/POW(GZ,6)),V,0),DA);
LH8:=SUM(IF(C1>=(HI/POW(GZ,8)) AND C1<(HI/POW(GZ,7)),V,0),DA);
LH9:=SUM(IF(C1>=(HI/POW(GZ,9)) AND C1<LO*POW(GZ,7),V,0),DA);
LH10:=SUM(IF(C1>=(LO*POW(GZ,5)) AND C1<LO*POW(GZ,6),V,0),DA);
LH11:=SUM(IF(C1>=(LO*POW(GZ,4)) AND C1<LO*POW(GZ,5),V,0),DA);
LH12:=SUM(IF(C1>=(LO*POW(GZ,3)) AND C1<LO*POW(GZ,4),V,0),DA);
LH13:=SUM(IF(C1>=(LO*POW(GZ,2)) AND C1<LO*POW(GZ,3),V,0),DA);
LH14:=SUM(IF(C1>=(LO*GZ) AND C1<LO*POW(GZ,2),V,0),DA)*XAS;
LH15:=SUM(IF(C1>=LO AND C1<LO*GZ,V,0),DA)*XAS;
L1:=REFDATE(HHV(LH1,DA),DATE);
L2:=REFDATE(HHV(LH2,DA),DATE);
L3:=REFDATE(HHV(LH3,DA),DATE);
L4:=REFDATE(HHV(LH4,DA),DATE);
L5:=REFDATE(HHV(LH5,DA),DATE);
L6:=REFDATE(HHV(LH6,DA),DATE);
L7:=REFDATE(HHV(LH7,DA),DATE);
L8:=REFDATE(HHV(LH8,DA),DATE);
L9:=REFDATE(HHV(LH9,DA),DATE);
L10:=REFDATE(HHV(LH10,DA),DATE);
L11:=REFDATE(HHV(LH11,DA),DATE);
L12:=REFDATE(HHV(LH12,DA),DATE);
L13:=REFDATE(HHV(LH13,DA),DATE);
L14:=REFDATE(HHV(LH14,DA),DATE);
L15:=REFDATE(HHV(LH15,DA),DATE);
SS:=(L1+L2+L3+L4+L5+L6+L7+L8+L9+L10+L11+L12+L13+L14+L15)*VA;
M13:MA(CLOSE,13);
先知趋势线:MA(CLOSE,34)*VA,COLORRED,LINETHICK2;
快线:(SUM(EMA((CLOSE+LOW)/2,1)/3,3))*VA,COLORRED,LINETHICK1;
中线:EMA(快线,3),COLOR00FFFF,LINETHICK1;
慢线:EMA(中线,3),COLORFF00FF,LINETHICK1;
{MA1:MA(CLOSE,5);
MA2:MA(CLOSE,10);
MA3:MA(CLOSE,30);
MA4:MA(CLOSE,120);
}STICKLINE(CLOSE> REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORRED;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,3.1,0 ),COLOR000055;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLOR000088;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLOR0000AA;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLOR0000CC;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLOR0000FF;
STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLOR0000EE;
STICKLINE(CLOSE< REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLOR666600;
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,3.1,0 ),COLOR555500;
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLOR888800;
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLORAAAA00;
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLORBBBB00;
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLORCCCC00;
STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLOREEEE00;
STICKLINE(CLOSE= REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORWHITE;
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,3.1,0 ),COLOR555555;
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLOR777777;
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLOR999999;
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLORBBBBBB;
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLORDDDDDD;
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLORFFFFFF;
AA11:=(C-REF(C,1))/REF(C,1)>=0.058 AND (C-REF(C,1))/REF(C,1)<0.095*XAS ;
AA22:=(C-REF(C,1))/REF(C,1)>=0.098*VA ;
STICKLINE(AA22,C,O,3,0 ),COLOR00AAFF;
STICKLINE(AA22,C,O,2.1,0 ),COLOR00BBFF;
STICKLINE(AA22,C,O,1.5,0 ),COLOR00CCFF;
STICKLINE(AA22,C,O,1,0 ),COLOR00DDFF;
STICKLINE(AA22,C,O,0.6,0 ),COLOR00EEFF;
STICKLINE(AA22,C,O,0.2,0 ),COLOR00FFFF;

{短绝底强升追}
MA5:=MA(VOL,5);
MA8:=MA(VOL,13);
MA144:=MA(VOL,144);
AA:=(O+H+L+C)/4;
BB:=MA(AA,3);
CC:=SUM(IF(AA>REF(AA,1),AA*VOL,0),4)/SUM(IF(AA<REF(AA,1),AA*VOL,0),4);
DD:=REF(100-(100/(1+CC)),1);
LA:=REF(CLOSE,1);
LB:=((SMA(MAX((CLOSE - LA),0),5,1) / SMA(ABS((CLOSE - LA)),5,1)) * 100);
LC:=(HIGH - REF(HIGH,1));
LD:=(REF(LOW,1) - LOW);
LE:=SUM(MAX(MAX((HIGH - LOW),ABS((HIGH - REF(CLOSE,1)))),ABS((LOW - REF(CLOSE,1)))),10);
LF:=SUM(IF(((LC > 0) AND (LC > LD)),LC,0),10);
LG:=SUM(IF(((LD > 0) AND (LD > LC)),LD,0),10);
LH:=((LF * 100) / LE);
LI:=((LG * 100) / LE);
LJ:=MA(((ABS((LI - LH)) / (LI + LH)) * 100),5);
AV:=(LB + LJ);
LK:=((100 * (HHV(HIGH,10) - CLOSE)) / (HHV(HIGH,10) - LLV(LOW,10)));
LL:=(LB - LK);
LM:=(AV + LL);
向导线:=LLV(LM,1);
T:=IF((BARSCOUNT(C) > 7),(100)*((MA(C,7))/(LLV(MA(C,7),7)) - 1),1);
N:=IF((T > 0.35),6,65);
W:=((-((100)*(HHV(H,21) - C))/(HHV(HIGH,21) - LLV(L,21)))),LINETHICK2;
RV2:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;
RG2:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100;
J01:=(HIGH+LOW)/2;
QJ1:=EMA(J01,3);
A1:=HHV(AA,15);
A2:=LLV(AA,15);
A3:=A1-A2;
A4:=EMA((AA-A2)/A3,2)*100;
RG:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100;
RV:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;
J11:=IF(CLOSE>QJ1,VOL,0);
J21:=IF(CLOSE<QJ1,VOL,0);
BB1:=MA(SUM(J11-J21,22),3);
VAR03:=(BB-CC);
股市黑客:=SMA(RV,3,1);
普通投资者:=SMA(股市黑客,5,1);
KK1:=EMA(SMA(RG,3,1),2),COLORFFFFFF;
DD2:=SMA(KK1,3,1),COLOR00FFFF;
RSV3:=(((CLOSE - LLV(LOW,8)) / (HHV(HIGH,8) - LLV(LOW,8))) * 100);
K11:=SMA(RSV3,3,1);
D11:=SMA(K11,3,1);
KK5:=INTPART(SMA(RSV3,3,1));
DD5:=INTPART(SMA(K11,3,1));
JJ5:=INTPART(((3 * K11) - (2 * D11)));
N1:=(KK5 + DD5);
KX:=(N1 < 25);
KX1:=REF(KX,29);
XX:=(N1 < 18);
XX1:=REF(XX,31);
XXX:=(N1 < 23);
XXX1:=REF(XXX,198);
KP:=((KX1 OR XX1) OR XXX1);
B1:=HHV(AA,60);
B2:=LLV(AA,60);
B3:=B1-B2;
B4:=EMA((AA-B2)/B3,2)*100;
KA1:=(((REF(CLOSE,2) / REF(OPEN,2)) < 0.95) AND (REF(CLOSE,2) < REF(CLOSE,3)));
KA2:=(((REF(OPEN,1) < REF(CLOSE,2)) AND (REF(CLOSE,
1) > REF(CLOSE,2))) AND (REF(CLOSE,1) > ((REF(CLOSE,2) + REF(OPEN,2)) / 2)));
KA3:=(CLOSE > REF(CLOSE,1));
KA4:=(LLV(LOW,13) = REF(LOW,1));
KP2:=(COUNT((((KA1 AND KA2) AND KA3) AND KA4),3) > 0);
KP3:=CROSS((-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14))),80);
KD3:=(N1 < 45);{分析家公式网 WWW.70822.COM}
KD1:=(((((REF(KD3,180) OR REF(KD3,179)) OR REF(KD3,
31)) OR REF(KD3,29)) OR REF(KD3,13)) OR REF(KD3,11));
KP4:=((KP2 AND KP3) AND KD1);
DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
KP5:=2*(DIFF-DEA);
KD2:=((((REF(KD3,180) OR REF(KD3,261)) OR REF(KD3,98)) OR REF(KD3,77)) OR REF(KD3,1));
KP6:=((KP2 AND KP5) AND KD2);
KP7:=(N1 < 34);
KP8:=REF(KP7,11);
KP9:=(N1 < 45);
KP10:=((REF(KP9,83) AND KP8) AND KP2);
KP11:=(N1 < 38);
KP12:=((REF(KP11,19) AND REF(KP11,32)) AND KP2);
KP13:=((REF(KP9,28) AND REF(KP11,101)) AND KP2);
KP14:=(N1 < 43);
KP15:=((REF(KP14,28) AND REF(KP14,189)) AND KP2);
I:=((((((REF(CLOSE,2) / REF(OPEN,2)) < 0.95) AND (REF(OPEN,1) < REF(CLOSE,
2))) AND ((ABS((REF(OPEN,1) - REF(CLOSE,1))) / REF(CLOSE,
1)) < 0.03)) AND ((CLOSE / OPEN) > 1.05)) AND (CLOSE > REF(CLOSE,2)));
I1:=2*(DIFF-DEA);
T3:=(N1 < 40);
T4:=((REF(T3,34) OR REF(T3,28)) OR REF(T3,57));
C1:=HHV(AA,240);
C2:=LLV(AA,240);
C3:=C1-C2;
C4:=EMA((AA-C2)/C3,2)*100;
KP16:=((I AND I1) AND T4);
P1:=13;P2:=5;
短期:A4,COLORGREEN;
中期:B4,COLORYELLOW;
长期:C4,COLORFF00FF;
SSRCJL:=EMA(VOL,13);
SSRCJE:=EMA(AMOUNT,13);
SSRCBJX:=((SSRCJE / SSRCJL) / 100);
SSRGL:=(((CLOSE - SSRCBJX) / SSRCBJX) * 100);
趋:=SSRGL<(0-18);
势:=SSRGL<(0-14);
而:=SSRGL<(0-10);
为:=SSRGL<(0-6);
STICKLINE(短期>90 AND 中期>70,86,94,1,0),COLOR00FF00;
STICKLINE(短期<5 AND 中期<30,0,8,1,0);
IF(FILTER(中期<REF(中期,1)AND 中期>90 AND BB<REF(BB,1),5),80,100),COLORBLUE,LINETHICK2;
IF(FILTER(中期>REF(中期,1)AND 中期<5 AND C>REF(C,1),5),20,0),COLORRED,LINETHICK2;
D1:=中期>REF(中期,1) AND 短期>REF(短期,1)AND 长期>REF(长期,1)AND 长期<8 AND 中期<10 AND 短期<15;
D2:=CROSS(短期,中期) AND 中期<8;
D3:=CROSS(短期,长期) AND 长期<8 AND 中期<20;
绝对底④:IF((SSRGL < (0 - 18)),23,0),LINETHICK3,COLORBLUE;
DRAWTEXT((FILTER((SSRGL < (0 - 18)),7)),25,'④'),COLORCYAN;
大底③:IF((SSRGL < (0 - 14)),84,0),LINETHICK3,COLORRED;
DRAWTEXT((FILTER((SSRGL < (0 - 14)),7)),86.5,'③'),COLORMAGENTA;
中底②:IF((SSRGL < (0 - 10)),60,0),LINETHICK3,COLORMAGENTA;
DRAWTEXT((FILTER((SSRGL < (0 - 10)),7)),64.5,'②'),COLORCYAN;
短底①:IF((SSRGL < (0 - 6)),44,0),LINETHICK3,COLORBROWN;
DRAWTEXT((FILTER((SSRGL < (0 - 6)),7)),44,'①'),COLORLIGRAY;
WWW58188COM:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100;
DRAWICON(FILTER((D1 OR D2 OR D3) AND DD<15 AND C>REF(C,1),5),5,1);
DRAWICON(FILTER((中期<REF(中期,1)AND 短期<REF(短期,1)AND 长期<REF(长期,
1)AND 中期>95 AND 短期>85)OR (长期>100 AND 中期>100 AND 短期>100),5),95,2);
¥①:IF(KP AND KP2 OR KP4 OR KP6 OR KP10 OR KP12 OR KP13 OR KP15 OR KP16,60,0),LINETHICK3,COLORLIGRAY;
¥②:IF(CROSS(向导线,(0-3)),21,0),LINETHICK3,COLORLIGREEN;
¥③:IF(CROSS(W,-2) AND CROSS(股市黑客,普通投资者) AND CROSS(KK1,DD2),60,0),LINETHICK3,COLORLICYAN;
DRAWTEXT(KP AND KP2 OR KP4 OR KP6 OR KP10 OR KP12 OR KP13 OR KP15 OR KP16,60,'★★★'),COLORYELLOW;
DRAWTEXT(CROSS(W,-2) AND CROSS(股市黑客,普通投资者) AND CROSS(KK1,DD2),60,'强势追涨'),COLORYELLOW;
强弱分界:50,POINTDOT,COLORWHITE;
警戒区:90,LINETHICK1,COLORWHITE;
安全区:20,COLORFFFF00;
DRAWICON(CROSS(向导线,(0-3)),13,5);
DRAWICON(CROSS(235,向导线),80,6);

虎哥优化主图:

炒股学会管理仓位很重要,半仓操作( CB财经 股票学院: http://www.lagzc.com )

M:=6;

{关键位预测}
 
买线:=EMA(C,2); 
卖线:=EMA(SLOPE(C,13)*21+C,49); 
预测:IF(买线<卖线,REFDATE(HHV(H,34),DATE)-(REFDATE(HHV(H,34),DATE)-REFDATE(LLV(L,34),DATE))*(1-0.236),REFDATE(LLV(L,34),DATE)+(REFDATE(HHV(H,34),DATE)-REFDATE(LLV(L,34),DATE))*(1-0.236)),COLORYELLOW,NODRAW;
HUGO:=IF(买线>卖线,REFDATE(LLV(L,34),DATE)+(REFDATE(HHV(H,34),DATE)-REFDATE(LLV(L,34),DATE))*(1-0.236),DRAWNULL),COLORRED;
 
 
{半仓操作判断}
D顶:REFDATE(HHV(H,34),DATE),COLORMAGENTA;
D底:REFDATE(LLV(L,34),DATE),COLORLIBLUE;
 
机构买入:=L2_AMO(0,2)/100000000.0,NODRAW;
机构卖出:=-L2_AMO(0,3)/100000000.0,NODRAW;
机构净买:=机构买入+机构卖出,NODRAW;
累计:=EMA(机构净买,50)*60,NODRAW;
均值:=EMA(累计,MIN(10,10)),NODRAW;
STICKLINE(累计>0,D顶,D底,6,0),COLOR1B0E8B;
STICKLINE(累计<0,D顶,D底,6,0),COLOR6B6B12;
 
{持股持币判断}
DRAWBAND(MA(DKX,M),RGB(10,100,10),DKX,RGB(180,10,10));
持股:IF(DKX>=MA(DKX,M),1,DRAWNULL),COLORRED,NODRAW;
持币:IF(DKX<MA(DKX,M),1,DRAWNULL),COLOR00FF00,NODRAW;
 
 
阻二:(D顶+(D顶+(D顶+D底)/2)/2)/2,COLOR00BB00,DOTLINE;
阻一:(D顶+(D顶+D底)/2)/2,COLOR00BB00,DOTLINE;
中线:(D顶+D底)/2,COLORDD99DD,DOTLINE;
撑一:(D底+中线)/2,COLOR00BB00,DOTLINE;
撑二:(D底+撑一)/2,COLOR33BB33,DOTLINE;
 
{立柱量判断}
均价1:=(3*C+H+L+O)/6;
VAR1AA:=(8*均价1+7*REF(均价1,1)+6*REF(均价1,2)+5*REF(均价1,3)+4*REF(均价1,4)+3*REF(均价1,5)+2*REF(均价1,6)+REF(均价1,8))/36;
VAR2A:=(LLV(VAR1AA,2)+LLV(VAR1AA,4)+LLV(VAR1AA,6))/3;
TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND C>VAR1AA;
立桩量:=FILTER(TJ1,5);
TJ2:=IF(BARSLAST(立桩量)=1 AND C>REF(H,1),1,IF(BARSLAST(立桩量)=2 AND C>REF(H,2),1,IF(BARSLAST(立桩量)=3 AND C>REF(H,3),1,0)));
突破:=TJ2=1;
TJ3:=IF(BARSLAST(立桩量)=1 AND C>REF(L,1),1,IF(BARSLAST(立桩量)=2 AND C>REF(L,2),1,IF(BARSLAST(立桩量)=3 AND C>REF(L,3),1,0)));
三天法则:=TJ3=1;
成立:=三天法则 AND 突破;
条件成立:=FILTER(成立,3),COLORF0099F,NODRAW;
STICKLINE(立桩量>=1,L,H,8,0),COLORF0099F;
STICKLINE(C,REF(H,BARSLAST(立桩量)),REF(H,BARSLAST(立桩量)),3,-1),COLORCYAN;
STICKLINE(C,REF(L,BARSLAST(立桩量)),REF(L,BARSLAST(立桩量)),3,-1),COLORYELLOW;
DRAWTEXT(条件成立,L*0.995,'成立'),COLORMAGENTA;
 
{主升浪判断}
A101:=EMA(CLOSE,5)>EMA(CLOSE,6) AND EMA(CLOSE,6)>EMA(CLOSE,7) AND EMA(CLOSE,7)>EMA(CLOSE,8) AND EMA(CLOSE,8)>EMA(CLOSE,9)
      AND EMA(CLOSE,9)>EMA(CLOSE,10) AND EMA(CLOSE,10)>EMA(CLOSE,11) AND EMA(CLOSE,11)>EMA(CLOSE,12)
      AND EMA(CLOSE,12)>EMA(CLOSE,13) {AND EMA(CLOSE,13)>EMA(CLOSE,14) AND EMA(CLOSE,14)>EMA(CLOSE,15)};
A102:=EMA(CLOSE,15){EMA(CLOSE,15)}>EMA(CLOSE,21) AND EMA(CLOSE,21)>EMA(CLOSE,34) AND EMA(CLOSE,34)>EMA(CLOSE,55) AND EMA(CLOSE,55)>EMA(CLOSE,89)
      AND EMA(CLOSE,89)>EMA(CLOSE,144) AND EMA(CLOSE,144)>EMA(CLOSE,233);
A1:= A101 AND A102;
短升:IF(A101,1,DRAWNULL),COLORFF00FF,NODRAW;
中升:IF(A1,1,DRAWNULL),COLORRED,NODRAW;
STICKLINE(A101,L,H,6,0),COLOR006666;
STICKLINE(A101 AND A102,L,H,4,0),COLOR660066;
 
{K线图}
DRAWKLINE(H,O,L,C);
 
{30日量能平台}
T1:=CONST(HHVBARS(V,30));
量30:IF(CURRBARSCOUNT<=30+7,CONST(IF(T1=0,C,REF(C,T1))),DRAWNULL),COLORYELLOW; 
 
{均线}
MA5:MA(C,5),COLORFFFFFF,LINETHICK2;
MA13:=MA(C,13),COLORWHITE,LINETHICK1;
MA21:=MA(C,21),COLOREE00EE,LINETHICK2;
MA34:=MA(C,34),COLOR00DDDD,LINETHICK1;
MA55:=MA(C,55),COLOR00FFFF,LINETHICK2;
操盘:DKX,COLOR00FF00,LINETHICK3;
    IF(MA5>=REF(MA5,1),MA5,DRAWNULL),COLORFF00FF,LINETHICK2;
    IF(DKX>REF(DKX,1),DKX,DRAWNULL),COLORFF00FF,LINETHICK3;
 
{多空买卖判断}
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)));
多:=(((((((((((VAR1 OR VAR2) OR VAR3) OR VAR4) OR VAR5) OR VAR6) OR VAR7) OR VAR8) OR VAR9) OR VARA) OR VARB) OR VARC);
STICKLINE(多,L,H,0,0),COLOR0000FF;
STICKLINE(多 AND C>=O,C,O{REF(C,1)},3,1),COLOR0000FF;
STICKLINE(多 AND C<O,C,O{REF(C,1)},3,0),COLOR0000FF;
 
VARD:=((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,2)));
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)));
空:=(((((((((((VARD OR VARE) OR VARF) OR VAR10) OR VAR11) OR VAR12) OR VAR13) OR VAR14) OR VAR15) OR VAR16) OR VAR17) OR VAR18);
STICKLINE(空,H,L,0 ,0 ),COLOR00FF00;
STICKLINE(空 AND C>=O,C,O{REF(C,1)},3,1),COLOR00FF00;
STICKLINE(空 AND C<O,C,O{REF(C,1)},3,0),COLOR00FF00;
 
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);
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),3,0 ),COLORDDDDDD;
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),3,0),COLORFF8800;  
DRAWICON(VAR19,L*0.995,1);
DRAWICON(VAR1A,H*1.005,2);
 
STICKLINE(CURRBARSCOUNT=1,预测,预测,100,-1),COLOR00FFFF;
STICKLINE(CURRBARSCOUNT=1,HUGO,HUGO,100,-1),COLORFF00FF;
DRAWTEXT(ISLASTBAR,预测,'     【预测关键位】'),COLORFFFFFF,LINETHICK1;
 
DRAWTEXT((A101=1 AND REF(A101,1)=0),O,'短主升'),COLOR00FFFF;
DRAWTEXT((A1=1 AND REF(A1,1)=0),O*0.985,'中长升'),COLOR00FFFF;
 
IF(CURRBARSCOUNT=T1+1,量30,DRAWNULL),CIRCLEDOT,COLORDD00FF,LINETHICK3;
DRAWTEXT(ISLASTBAR,量30,'  30量能平台');
 
{DRAWTEXT(ISLASTBAR,D顶,'   D顶'),COLORMAGENTA;
DRAWTEXT(ISLASTBAR,D底,'   D底'),COLORLIBLUE;}
DRAWTEXT(ISLASTBAR,中线,'   中线'),COLORDD99DD;
DRAWTEXT(ISLASTBAR,阻一,'   阻一'),COLOR00BB00;
DRAWTEXT(ISLASTBAR,阻二,'   阻二'),COLOR00BB00;
DRAWTEXT(ISLASTBAR,撑一,'   撑一'),COLOR00BB00;
DRAWTEXT(ISLASTBAR,撑二,'   撑二'),COLOR33BB33;
 
{DRAWTEXT_FIX(1,0.12,0.95,0,'【短线】  红白柱买入,蓝绿柱卖出。' ),COLORFFDD00;};
T6:=IF(FINDSTR(EXTERNSTR(0,1),','),STRCAT('千股千评:',EXTERNSTR(0,1)),'');
NNN:=IF(TOTALBARSCOUNT>=120,120,TOTALBARSCOUNT);
{本输出适用于锁定K线数为120,N可改为你习惯的K线数,见下图}
HH0:=HHV(H,NNN);
LL0:=LLV(L,NNN);
MM0:=CONST((HH0+LL0)*0.5);
S01:=CONST(IF(REF(C,NNN-15)>MM0,1.00,-0.08));
S02:=CONST(IF(REF(C,NNN-15)>MM0,-1,1));
S6:=IF(FINDSTR(EXTERNSTR(0,1),','),S01+(0.08*S02),S01);
DRAWTEXT_FIX(1,0,S6,0,T6)COLOR0000FF;
CB财经网:致力于为用户打造一个正规可靠的股票配资、炒股经验分享交流平台。

本文标题:「买入」通达信源码:陆股通净买卖量,短绝底强升追+飞龙在天,虎哥优化主图 地址: http://www.lagzc.com/gppz/11402.html

(0)

相关推荐