?

?來源:程序化99

ZYGJ: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;
章魚哥J: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,ZYGJ,章魚哥J,1,0),COLORFF0000;
AF1:=1;
TT:=BARSLAST(HOUR=9 AND MINUTE=(30+AF1))+1;

均價:=SUM(V*C,0)/SUM(V,0);
價位:=C,COLORWHITE,LINETHICK4;
盤整:=IF(HOUR>9 AND RANGE(HHV(C,60)/LLV(C,60),1,1.02),C,DRAWNULL),COLORRED,LINETHICK2;

V1:=V;
ZYG:=C>REF(C,1) AND C/均價>(1+0.03);

章魚哥:=C< REF(C,1) AND C/均價< (1-0.03);

ZYG1:=CROSS(SUM(ZYG,0),0.5);
章魚哥1:=CROSS(SUM(章魚哥,0),0.5);

SS1:=SUM(ZYG1,0)*CROSS(COUNT(C< REF(C,1),BARSLAST(ZYG1)),0.5);
BB1:=SUM(章魚哥1,0)*CROSS(COUNT(C>REF(C,1),BARSLAST(章魚哥1)),0.5);
CS1:CONST(SUM(IF(SS1,REF(C,1),DRAWNULL),0))DOTLINE,COLORGREEN,LINETHICK1;
CB1:CONST(SUM(IF(BB1,REF(C,1),DRAWNULL),0))DOTLINE,COLORMAGENTA,LINETHICK1;
ZYG2:=CROSS(SUM(ZYG AND C>CS1*1.03,0),0.5);

章魚哥2:=CROSS(SUM(章魚哥 AND C< CB1*0.97,0),0.5);

SS2:=SUM(ZYG2,0)*CROSS(COUNT(C< REF(C,1),BARSLAST(ZYG2)),0.5);
BB2:=SUM(章魚哥2,0)*CROSS(COUNT(C>REF(C,1),BARSLAST(章魚哥2)),0.5);
CS2:CONST(SUM(IF(SS2,REF(C,1),DRAWNULL),0))DOTLINE,COLORGREEN,LINETHICK1;
CB2:CONST(SUM(IF(BB2,REF(C,1),DRAWNULL),0))DOTLINE,COLORMAGENTA,LINETHICK1;
DRAWICON(BB1 OR BB2,REF(C,1)*0.999,44);
DRAWICON(SS1 OR SS2,REF(C,1)*1.00,45);

牽牛線:=EMA(CLOSE,34)-EMA(CLOSE,888);
牛道:=EMA(牽牛線,888);

DRAWICON(CROSS(牽牛線,牛道),C,25);
量價:=(VOL/CLOSE)/3;

A2:=SUM((IF(((量價>0.20) AND (CLOSE>(REF(CLOSE,1)))),量價,0)),0);
A3:=SUM((IF(((量價>0.20) AND (CLOSE< (REF(CLOSE,1)))),量價,0)),0);
A6:=A2+A3;
DD1:=1;

比:=A2/A3;

章魚小哥1:=STRCAT(STRCAT('買= ',CON2STR((100*A2)/A6,0)),'%');

章魚小哥2:=STRCAT(STRCAT('賣= ',CON2STR((100*A3)/A6,0)),'%');

章魚小哥3:=STRCAT(STRCAT('差= ',CON2STR((100*(A2-A3))/A6,0)),'%');

DRAWTEXT_FIX(DD1=1,0,0.04,0,章魚小哥1),COLORRED;
DRAWTEXT_FIX(DD1=1,0,0.12,0,章魚小哥2),COLORGREEN;
DRAWTEXT_FIX(DD1=1,0,0.20,0,章魚小哥3),COLOR00FFFF;
DRAWTEXT_FIX(比>2,0,0.40,0,'漲'),COLORCYAN;
DRAWTEXT_FIX(比>2,0,0.48,0,'停'),COLORMAGENTA;
DRAWTEXT_FIX(比>2,0,0.56,0,'板'),COLORRED;

中期線:=EMA(-100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34)),4)+100;

DRAWTEXT(FILTER(比< 1.1 AND 中期線>98.0,24),C,'--風險'),COLORYELLOW;
H1:=MAX(DYNAINFO(3),DYNAINFO(5));
L1:=MIN(DYNAINFO(3),DYNAINFO(6));
P1:=H1-L1;

阻力:=L1+P1*7/8,COLORGREEN;
支撐:=L1+P1*0.5/8,COLORMAGENTA;

DRAWTEXT(LONGCROSS(支撐,C,2),C,'--主力買入'),COLORFF00FF;
DRAWTEXT(LONGCROSS(C,阻力,2),C,'--主力承接'),COLOR70DB93;
LC:=REF(CLOSE,1);
WRSI:=SMA(MAX(CLOSE-LC,0),9,1)/SMA(ABS(CLOSE-LC),9,1)*100;
DRAWICON(CROSS(20,WRSI),C,1);
DRAWICON(CROSS(WRSI,80),C,2);
DRAWICON(CROSS(20,"RSI.RSI1"(9)),C,1);
DRAWICON(CROSS("RSI.RSI1"(9),80),C,2);

均價1:=SUM(C*V,240)/SUM(V,240),COLORYELLOW,LINETHICK1;

TT1:=BARSCOUNT(C);
均:=MA(C,TT1);
上均線:=均+2*STD(C,3);
下均線:=均-2*STD(C,3);
時長:=TIME>93000;
漲幅:=C/REF(C,1)>1.02;
跌幅:=C/REF(C,1)< 0.98;
橫盤:=((HHV(C,TT1)-LLV(C,TT1))/C)< 0.05;

YY:=SMA(VOL,30,1);
放量:=(YY-LLV(LLV(YY,1),30))/(HHV(HHV(YY,1),30)-LLV(LLV(YY,1),30))>0.95;
漲跌幅:=漲幅 OR 跌幅;
橫漲1:=漲跌幅=0 AND 橫盤 AND 放量 AND CROSS(均價1,均);

DRAWTEXT(FILTER(橫漲1,10),C,'突'),COLORYELLOW;
DRAWICON(FILTER(橫漲1,10),均價1,1);
IF(MACD.DEA< 0,C,DRAWNULL),COLORMAGENTA ,LINETHICK9;
XX:=SUM(AMOUNT,BARSCOUNT(CLOSE))/SUM(V*100,BARSCOUNT(CLOSE));

主力:=EXPMA(CLOSE/XX,20);
大戶:=EXPMA(CLOSE/XX,60);
散戶:=EXPMA(CLOSE/XX,120);
底:=1;

1.02,NODRAW;
高:=1.03;DRAWTEXT_FIX(C>O,0,0.07,0,'更多實用指標公式，公眾號：通達信指標公式'),COLORMAGENTA;

AA:=主力>大戶 AND 主力>1.003 AND 大戶>散戶 AND C>EXPMA(C,20) AND EXPMA(C,10)>EXPMA(C,20) AND EXPMA(C,20)>EXPMA(C,60);
DRAWICON(主力>大戶 AND 大戶>散戶 AND C>EXPMA(C,20) AND EXPMA(C,10)>EXPMA(C,20) AND EXPMA(C,20)>EXPMA(C,60) AND 主力=HHV(主力,30) AND CROSS(主力,1.003),C,38);
DRAWTEXT(主力>大戶 AND 大戶>散戶 AND C>EXPMA(C,20) AND EXPMA(C,10)>EXPMA(C,20) AND EXPMA(C,20)>EXPMA(C,60) AND 主力=HHV(主力,30) AND CROSS(主力,1.003),C*0.999,'-主力拉升'),COLORYELLOW;
DRAWTEXT(CROSS(主力,1.02),C*0.999,''),COLORCYAN;
DRAWTEXT(CROSS(主力,1.04),C*0.999,'--沖漲停'),COLORRED;
DRAWTEXT(CROSS(散戶,主力),C*0.9995,'--小心'),COLORGREEN;
DRAWTEXT(CROSS(散戶,大戶),C*0.9995,'--走弱'),COLORGREEN;
還有這一段通達信的也麻煩老師您修改一下，謝謝您了

?

?來源: www.tumamayizhan.com

為了便于在線咨詢管理，多個問題請分別發(fā)帖提問，感謝配合