通达信分时建仓主图



ZYG1:=1270915;
ZYG2:=1270920;
ZYG3:=IF(1>ZYG1,IF(CLOSE< 80,1,0),0);
ZYG4:=IF(1>ZYG2,1,ZYG3);
ZYG5:=AMOUNT/VOL/100;
ZYG6:=SUM(CLOSE*VOL,0)/SUM(VOL,0);
ZYG7:=(SETCODE=0 OR SETCODE=1) AND CLOSE< 500;
ZYG8:=IF(ZYG7,ZYG6,ZYG6);
HHJ:IF(SETCODE>=0 AND CONST(BARSSINCE(CLOSE))< 900,CONST(IF(BARSSINCE(C>0)< 30,HHV(CLOSE,0),SUM(IF(BARSSINCE(C>0)=30,1,0)*HHV(CLOSE,0),0))),DRAWNULL),DOTLINE,COLORBLUE;
LLJ:IF(SETCODE>=0 AND CONST(BARSSINCE(CLOSE))< 900,CONST(IF(BARSSINCE(C>0)< 30,HHV(CLOSE,0),SUM(IF(BARSSINCE(C>0)=30,1,0)*LLV(CLOSE,0),0))),DRAWNULL),DOTLINE,COLORBLUE;
STICKLINE((BARSSINCE(C>0)=1 OR BARSSINCE(C>0)=30) AND ZYG4<>1,HHJ,LLJ,1,0),COLORFF0000;
ZYG9:=BARSLAST(HOUR=9 AND MINUTE=(30+1))+1;
ZYG10:=SUM(V*C,0)/SUM(V,0);
ZYG11:=C,COLORWHITE,LINETHICK4;
ZYG12:=IF(HOUR>9 AND RANGE(HHV(C,60)/LLV(C,60),1,1.02),C,DRAWNULL),COLOR0000FF,LINETHICK2;
ZYG13:=C>REF(C,1) AND C/ZYG10>(1+0.03);
LL:=C< REF(C,1) AND C/ZYG10< (1-0.03);
ZYG15:=CROSS(SUM(ZYG13,0),0.5);
ZYG16:=CROSS(SUM(LL,0),0.5);
ZYG17:=SUM(ZYG15,0)*CROSS(COUNT(C< REF(C,1),BARSLAST(ZYG15)),0.5);
ZYG18:=SUM(ZYG16,0)*CROSS(COUNT(C>REF(C,1),BARSLAST(ZYG16)),0.5);
CS1:CONST(SUM(IF(ZYG17,REF(C,1),DRAWNULL),0))DOTLINE,COLOR00FF00,LINETHICK1;
CB1:CONST(SUM(IF(ZYG18,REF(C,1),DRAWNULL),0))DOTLINE,COLORMAGENTA,LINETHICK1;
ZYG19:=CROSS(SUM(ZYG13 AND C>CS1*1.03,0),0.5);
ZYG20:=CROSS(SUM(LL AND C< CB1*0.97,0),0.5);
ZYG21:=SUM(ZYG19,0)*CROSS(COUNT(C< REF(C,1),BARSLAST(ZYG19)),0.5);
ZYG22:=SUM(ZYG20,0)*CROSS(COUNT(C>REF(C,1),BARSLAST(ZYG20)),0.5);
CS2:CONST(SUM(IF(ZYG21,REF(C,1),DRAWNULL),0))DOTLINE,COLOR00FF00,LINETHICK1;
CB2:CONST(SUM(IF(ZYG22,REF(C,1),DRAWNULL),0))DOTLINE,COLORMAGENTA,LINETHICK1;
DRAWICON(ZYG18 OR ZYG22,REF(C,1)*0.999,44);
DRAWICON(ZYG17 OR ZYG21,REF(C,1)*1.00,45);
ZYG23:=EMA(CLOSE,34)-EMA(CLOSE,888);
ZYG24:=EMA(ZYG23,888);
DRAWICON(CROSS(ZYG23,ZYG24),C,25);
ZYG25:=(VOL/CLOSE)/3;
ZYG26:=SUM((IF(((ZYG25>0.20) AND (CLOSE>(REF(CLOSE,1)))),ZYG25,0)),0);
ZYG27:=SUM((IF(((ZYG25>0.20) AND (CLOSE< (REF(CLOSE,1)))),ZYG25,0)),0);
ZYG28:=ZYG26+ZYG27;
ZYG29:=1;
ZYG30:=ZYG26/ZYG27;
ZYG31:=STRCAT(STRCAT('买= ',CON2STR((100*ZYG26)/ZYG28,0)),'%');
ZYG32:=STRCAT(STRCAT('卖= ',CON2STR((100*ZYG27)/ZYG28,0)),'%');
ZYG33:=STRCAT(STRCAT('差= ',CON2STR((100*(ZYG26-ZYG27))/ZYG28,0)),'%');
DRAWTEXT_FIX(ZYG29=1,0,0.04,0,ZYG31),COLOR0000FF;
DRAWTEXT_FIX(ZYG29=1,0,0.12,0,ZYG32),COLOR00FF00;
DRAWTEXT_FIX(ZYG29=1,0,0.20,0,ZYG33),COLOR00FFFF;
DRAWTEXT_FIX(ZYG30>2,0,0.40,0,'涨'),COLORCYAN;
DRAWTEXT_FIX(ZYG30>2,0,0.48,0,'停'),COLORMAGENTA;
DRAWTEXT_FIX(ZYG30>2,0,0.56,0,'板'),COLOR0000FF;
中期线:=EMA(-100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34)),4)+100;
DRAWTEXT(FILTER(ZYG30< 1.1 AND 中期线>98.0,24),C,'--风险'),COLOR00FFFF;
ZYG34:=MAX(DYNAINFO(3),DYNAINFO(5));
ZYG35:=MIN(DYNAINFO(3),DYNAINFO(6));
ZYG36:=ZYG34-ZYG35;
阻力:=ZYG35+ZYG36*7/8;
支撑:=ZYG35+ZYG36*0.5/8;
DRAWTEXT(LONGCROSS(支撑,C,2),C,'--主力买入'),COLORFF00FF;
DRAWTEXT(LONGCROSS(C,阻力,2),C,'--主力封板'),COLOR00FFFF;
ZYG39:=REF(CLOSE,1);
ZYG40:=SMA(MAX(CLOSE-ZYG39,0),9,1)/SMA(ABS(CLOSE-ZYG39),9,1)*100;
DRAWICON(CROSS(20,ZYG40),C,1);
DRAWICON(CROSS(ZYG40,80),C,2);
DRAWICON(CROSS(20,"RSI.RSI1"(9)),C,1);
DRAWICON(CROSS("RSI.RSI1"(9),80),C,2);
ZYG41:=SUM(C*V,240)/SUM(V,240);
ZYG42:=BARSCOUNT(C);
均:=MA(C,ZYG42);
上均线:=均+2*STD(C,3);
下均线:=均-2*STD(C,3);
ZYG43:=TIME>93000;
ZYG44:=C/REF(C,1)>1.02;
ZYG45:=C/REF(C,1)< 0.98;
ZYG46:=((HHV(C,ZYG42)-LLV(C,ZYG42))/C)< 0.05;
ZYG47:=SMA(VOL,30,1);
ZYG48:=(ZYG47-LLV(LLV(ZYG47,1),30))/(HHV(HHV(ZYG47,1),30)-LLV(LLV(ZYG47,1),30))>0.95;
ZYG49:=ZYG44 OR ZYG45;
ZYG50:=ZYG49=0 AND ZYG46 AND ZYG48 AND CROSS(ZYG41,均);
DRAWTEXT(FILTER(ZYG50,10),C,'突'),COLOR00FFFF;
DRAWICON(FILTER(ZYG50,10),ZYG41,1);
IF(MACD.DEA< 0,C,DRAWNULL),COLORMAGENTA ,LINETHICK9;
XX:=SUM(AMOUNT,BARSCOUNT(CLOSE))/SUM(V*100,BARSCOUNT(CLOSE));
ZYG51:=EXPMA(CLOSE/XX,20);
ZYG52:=EXPMA(CLOSE/XX,60);
ZYG53:=EXPMA(CLOSE/XX,120);
1.02,NODRAW;
DRAWTEXT_FIX(1,0.60,0.75,0,'更多指标,低费率交易,私聊 '),COLORYELLOW;
AA:=ZYG51>ZYG52 AND ZYG51>1.003 AND ZYG52>ZYG53 AND C>EXPMA(C,20) AND EXPMA(C,10)>EXPMA(C,20) AND EXPMA(C,20)>EXPMA(C,60);
DRAWICON(ZYG51>ZYG52 AND ZYG52>ZYG53 AND C>EXPMA(C,20) AND EXPMA(C,10)>EXPMA(C,20) AND EXPMA(C,20)>EXPMA(C,60) AND ZYG51=HHV(ZYG51,30) AND CROSS(ZYG51,1.003),C,38);
DRAWTEXT(ZYG51>ZYG52 AND ZYG52>ZYG53 AND C>EXPMA(C,20) AND EXPMA(C,10)>EXPMA(C,20) AND EXPMA(C,20)>EXPMA(C,60) AND ZYG51=HHV(ZYG51,30) AND CROSS(ZYG51,1.003),C*0.999,'---分时建仓'),COLOR00FFFF;
DRAWTEXT(CROSS(ZYG51,1.02),C*0.999,''),COLORCYAN;
DRAWTEXT(CROSS(ZYG51,1.04),C*0.999,''),COLOR0000FF;
DRAWTEXT(CROSS(ZYG53,ZYG51),C*0.9995,''),COLOR00FF00;
DRAWTEXT(CROSS(ZYG53,ZYG52),C*0.9995,'--走弱'),COLOR00FF00;