通达信柱力分时建舱主图
章鱼1:=1270915;
章鱼2:=1270920;
章鱼3:=IF(1>章鱼1, IF(CLOSE< 80, 1, 0), 0);
章鱼4:=IF(1>章鱼2, 1, 章鱼3);
章鱼5:=AMOUNT/VOL/100;
章鱼6:=SUM(CLOSE*VOL, 0)/SUM(VOL, 0);
章鱼7:=(SETCODE=0 OR SETCODE=1)AND CLOSE< 500;
章鱼8:=IF(章鱼7, 章鱼6, 章鱼6);
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 章鱼4<>1, HHJ, LLJ, 1, 0), COLORFF0000;
章鱼9:=BARSLAST(HOUR=9 AND MINUTE=(30+1))+1;
章鱼10:=SUM(V*C, 0)/SUM(V, 0);
章鱼11:=C, COLORWHITE, LINETHICK4;
章鱼12:=IF(HOUR>9 AND RANGE(HHV(C, 60)/LLV(C, 60), 1, 1.02), C, DRAWNULL), COLOR0000FF, LINETHICK2;
章鱼13:=C>REF(C, 1)AND C/章鱼10>(1+0.03);
LL:=C< REF(C, 1)AND C/章鱼10< (1-0.03);
章鱼15:=CROSS(SUM(章鱼13, 0), 0.5);
章鱼16:=CROSS(SUM(LL, 0), 0.5);
章鱼17:=SUM(章鱼15, 0)*CROSS(COUNT(C< REF(C, 1), BARSLAST(章鱼15)), 0.5);
章鱼18:=SUM(章鱼16, 0)*CROSS(COUNT(C>REF(C, 1), BARSLAST(章鱼16)), 0.5);
ZYG1:CONST(SUM(IF(章鱼17, REF(C, 1), DRAWNULL), 0))DOTLINE, COLOR00FF00, LINETHICK1;
鱼哥1:CONST(SUM(IF(章鱼18, REF(C, 1), DRAWNULL), 0))DOTLINE, COLORMAGENTA, LINETHICK1;
章鱼19:=CROSS(SUM(章鱼13 AND C>ZYG1*1.03, 0), 0.5);
章鱼20:=CROSS(SUM(LL AND C< 鱼哥1*0.97, 0), 0.5);
章鱼21:=SUM(章鱼19, 0)*CROSS(COUNT(C< REF(C, 1), BARSLAST(章鱼19)), 0.5);
章鱼22:=SUM(章鱼20, 0)*CROSS(COUNT(C>REF(C, 1), BARSLAST(章鱼20)), 0.5);
DRAWTEXT_FIX(1,0.60,0.75,0,'更多指标，低费率交易，私聊 '),COLORYELLOW;
ZYG2:CONST(SUM(IF(章鱼21, REF(C, 1), DRAWNULL), 0))DOTLINE, COLOR00FF00, LINETHICK1;
鱼哥2:CONST(SUM(IF(章鱼22, REF(C, 1), DRAWNULL), 0))DOTLINE, COLORMAGENTA, LINETHICK1;
DRAWICON(章鱼18 OR 章鱼22, REF(C, 1)*0.999, 44);
DRAWICON(章鱼17 OR 章鱼21, REF(C, 1)*1.00, 45);
章鱼23:=EMA(CLOSE, 34)-EMA(CLOSE, 888);
章鱼24:=EMA(章鱼23, 888);
DRAWICON(CROSS(章鱼23, 章鱼24), C, 25);
章鱼25:=(VOL/CLOSE)/3;
章鱼26:=SUM((IF(((章鱼25>0.20)AND(CLOSE>(REF(CLOSE, 1)))), 章鱼25, 0)), 0);
章鱼27:=SUM((IF(((章鱼25>0.20)AND(CLOSE< (REF(CLOSE, 1)))), 章鱼25, 0)), 0);
章鱼28:=章鱼26+章鱼27;
章鱼29:=1;
章鱼30:=章鱼26/章鱼27;
章鱼31:=STRCAT(STRCAT('买= ', CON2STR((100*章鱼26)/章鱼28, 0)), '%');
章鱼32:=STRCAT(STRCAT('卖= ', CON2STR((100*章鱼27)/章鱼28, 0)), '%');
章鱼33:=STRCAT(STRCAT('差= ', CON2STR((100*(章鱼26-章鱼27))/章鱼28, 0)), '%');
DRAWTEXT_FIX(章鱼29=1, 0, 0.04, 0, 章鱼31), COLOR0000FF;
DRAWTEXT_FIX(章鱼29=1, 0, 0.12, 0, 章鱼32), COLOR00FF00;
DRAWTEXT_FIX(章鱼29=1, 0, 0.20, 0, 章鱼33), COLOR00FFFF;
DRAWTEXT_FIX(章鱼30>2, 0, 0.40, 0, '章'), COLORCYAN;
DRAWTEXT_FIX(章鱼30>2, 0, 0.48, 0, '停'), COLORMAGENTA;
DRAWTEXT_FIX(章鱼30>2, 0, 0.56, 0, '板'), COLOR0000FF;
中期线:=EMA(-100*(HHV(HIGH, 34)-CLOSE)/(HHV(HIGH, 34)-LLV(LOW, 34)), 4)+100;
DRAWTEXT(FILTER(章鱼30< 1.1 AND 中期线>98.0, 24), C, '--风险'), COLOR00FFFF;
章鱼34:=MAX(DYNAINFO(3), DYNAINFO(5));
章鱼35:=MIN(DYNAINFO(3), DYNAINFO(6));
章鱼36:=章鱼34-章鱼35;
阻力:=章鱼35+章鱼36*7/8;
支撑:=章鱼35+章鱼36*0.5/8;
DRAWTEXT(LONGCROSS(支撑, C, 2), C, '--主力买入'), COLORFF00FF;
DRAWTEXT(LONGCROSS(C, 阻力, 2), C, '--主力封板'), COLOR00FFFF;
章鱼39:=REF(CLOSE, 1);
章鱼40:=SMA(MAX(CLOSE-章鱼39, 0), 9, 1)/SMA(ABS(CLOSE-章鱼39), 9, 1)*100;
DRAWICON(CROSS(20, 章鱼40), C, 1);
DRAWICON(CROSS(章鱼40, 80), C, 2);
DRAWICON(CROSS(20, "RSI.RSI1"(9)), C, 1);
DRAWICON(CROSS("RSI.RSI1"(9), 80), C, 2);
章鱼41:=SUM(C*V, 240)/SUM(V, 240);
章鱼42:=BARSCOUNT(C);
均:=MA(C, 章鱼42);
上均线:=均+2*STD(C, 3);
下均线:=均-2*STD(C, 3);
章鱼43:=TIME>93000;
章鱼44:=C/REF(C, 1)>1.02;
章鱼45:=C/REF(C, 1)< 0.98;
章鱼46:=((HHV(C, 章鱼42)-LLV(C, 章鱼42))/C)< 0.05;
章鱼47:=SMA(VOL, 30, 1);
章鱼48:=(章鱼47-LLV(LLV(章鱼47, 1), 30))/(HHV(HHV(章鱼47, 1), 30)-LLV(LLV(章鱼47, 1), 30))>0.95;
章鱼49:=章鱼44 OR 章鱼45;
章鱼50:=章鱼49=0 AND 章鱼46 AND 章鱼48 AND CROSS(章鱼41, 均);
DRAWTEXT(FILTER(章鱼50, 10), C, '突'), COLOR00FFFF;
DRAWICON(FILTER(章鱼50, 10), 章鱼41, 1);
IF(MACD.DEA< 0, C, DRAWNULL), COLORMAGENTA, LINETHICK9;
XX:=SUM(AMOUNT, BARSCOUNT(CLOSE))/SUM(V*100, BARSCOUNT(CLOSE));
章鱼51:=EXPMA(CLOSE/XX, 20);
章鱼52:=EXPMA(CLOSE/XX, 60);
章鱼53:=EXPMA(CLOSE/XX, 120);
1.02, NODRAW;
AA:=章鱼51>章鱼52 AND 章鱼51>1.003 AND 章鱼52>章鱼53 AND C>EXPMA(C, 20)AND EXPMA(C, 10)>EXPMA(C, 20)AND EXPMA(C, 20)>EXPMA(C, 60);
DRAWICON(章鱼51>章鱼52 AND 章鱼52>章鱼53 AND C>EXPMA(C, 20)AND EXPMA(C, 10)>EXPMA(C, 20)AND EXPMA(C, 20)>EXPMA(C, 60)AND 章鱼51=HHV(章鱼51, 30)AND CROSS(章鱼51, 1.003), C, 38);
DRAWTEXT(章鱼51>章鱼52 AND 章鱼52>章鱼53 AND C>EXPMA(C, 20)AND EXPMA(C, 10)>EXPMA(C, 20)AND EXPMA(C, 20)>EXPMA(C, 60)AND 章鱼51=HHV(章鱼51, 30)AND CROSS(章鱼51, 1.003), C*0.999, '---分时建仓'), COLOR00FFFF;
DRAWTEXT(CROSS(章鱼51, 1.02), C*0.999, ''), COLORCYAN;
DRAWTEXT(CROSS(章鱼51, 1.04), C*0.999, ''), COLOR0000FF;
DRAWTEXT(CROSS(章鱼53, 章鱼51), C*0.9995, ''), COLOR00FF00;
DRAWTEXT(CROSS(章鱼53, 章鱼52), C*0.9995, '--走弱'), COLOR00FF00;