【通达信免费源码】笑傲股坛顶底指标副图 波段 短线 买卖点 操盘控盘

STICKLINE(C>0,-1,-9,5,0),COLOR0000FF;

STICKLINE(C>0,1,9,5,0),COLOR0000AA;

STICKLINE(C>0,11,19,5,0),COLORCC0000;

STICKLINE(C>0,21,29,5,0),COLORBB0011;

STICKLINE(C>0,31,39,5,0),COLORAA0022;

STICKLINE(C>0,41,49,5,0),COLOR993333;

STICKLINE(C>0,51,59,5,0),COLOR880044;

STICKLINE(C>0,61,69,5,0),COLOR770055;

STICKLINE(C>0,71,79,5,0),COLOR660066;

STICKLINE(C>0,81,89,5,0),COLOR550077;

STICKLINE(C>0,91,99,5,0),COLOR440088;

STICKLINE(C>0,101,109,5,0),COLOR550099;

STICKLINE(C>0,111,119,5,0),COLOR6600AA;

STICKLINE(C>0,121,129,5,0),COLOR7700BB;

{KDJ}

LC:=REF(CLOSE,1);

RSI1:=SMA(MAX(CLOSE-LC,0),13,1)/SMA(ABS(CLOSE-LC),13,1)*100;

AH:=HHV(RSI1,8);

AL:=LLV(RSI1,8);

STO1:=IF(AL=AH,0,100*(RSI1-AL)/(AH-AL));

SK:=EMA(STO1,5);

SD:=EMA(SK,3);

DRAWBAND(SK,RGB(220,0,220),SD,RGB(200,200,200));

J:3SK-2SD,COLORFF00FF,LINETHICK1;

IF(SK>=SD,90.5,DRAWNULL),LINETHICK5,COLORFF00FF;

IF(SK<SD,90.5,DRAWNULL),LINETHICK5,COLORFFFF00;

{短线决策线}

N:=IF(BARSCOUNT(C)>=8,8,BARSCOUNT(C));

AMOV:=VOL*(C+L+H)/3;

MN:=SUM(AMOV,N)/SUM(VOL,N),COLORFFFF00,LINETHICK4;

NOTEXT1:IF(C>MN,59.5,DRAWNULL),LINETHICK5,COLOR0000FF;

NOTEXT2:IF(C<MN,59.5,DRAWNULL),LINETHICK5,COLOR00FFFF;

DRAWTEXT(CURRBARSCOUNT=50,59.5,'短线决策线'),COLOR00FFFF;

{ CCI-10-30}

TYP:=(HIGH+LOW+CLOSE)/3;

CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));

STICKLINE(CROSS(CCI,-120),12,18,2,0),COLORRED;{CCI买}

STICKLINE(CROSS(120,CCI),102,108,2,0),COLOR00FFFF;{CCI卖}

DRAWTEXT(CURRBARSCOUNT=38,15,'CCI买'),COLOR00FFFF;

DRAWTEXT(CURRBARSCOUNT=38,105,'CCI卖'),COLORFFFFFF;

{绝顶买卖}

VAZ4:=(CLOSE-LLV(CLOSE,90))/(HHV(CLOSE,90)-LLV(CLOSE,90))*100;

CCC:=VAZ4=0;

MAICU:=VAZ4=100;

DRAWICON(MAICU>0,85,14);{绝顶卖}

DRAWICON(CCC>0,35,23);{绝底买}

DRAWTEXT(CURRBARSCOUNT=38,35,'绝底买'),COLOR00FFFF;

DRAWTEXT(CURRBARSCOUNT=38,85,'绝顶卖'),COLORFFFFFF;

{短中}

DDA:=(34-HHVBARS(H,34+1))/34*100;

DDB:=100-(34-LLVBARS(L,34+1))/34*100;

EEA:=(89-HHVBARS(H,89+1))/89*100;

EEB:=100-(89-LLVBARS(L,89+1))/89*100;

DRAWICON(EEA=100,125,14);{中顶卖}

DRAWICON(EEB=0,25,23);{中底买}

DRAWTEXT(CURRBARSCOUNT=38,125,'中顶卖'),COLORFFFFFF;

DRAWTEXT(CURRBARSCOUNT=38,25,'中底买'),COLOR00FFFF;

STICKLINE(DDA=100,112,118,2,0),COLOR00FFFF;{短顶卖}

DRAWTEXT(CURRBARSCOUNT=38,115,'短顶卖'),COLORFFFFFF;

{趋势线}

RSV1:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;

RSV2:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;

WEN:=3SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))100,5,1)

-2SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))100,5,1),3,1);

{STICKLINE(C>0,90,90,2,0),COLORFFFF00;}

{STICKLINE(C>0,10,10,2,0),COLORFFFF00;}

趋势线:WEN,LINETHICK2,COLOR00FFFF;

DRAWICON(趋势线>88,95,14);

DRAWICON(趋势线<=10,5,23);

DRAWTEXT(CURRBARSCOUNT=38,95,'趋势卖'),COLORFFFFFF;

DRAWTEXT(CURRBARSCOUNT=38,5,'趋势买'),COLOR00FFFF;

{威廉}

威廉波段:=100-(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34))*100,COLORFFFF00,LINETHICK2;

威廉风险:=威廉波段>95;

STICKLINE(威廉波段>95,62,68,2,0),COLOR00FFFF;

DRAWTEXT(CURRBARSCOUNT=38,65,'威廉顶'),COLOR00FFFF;

威廉底部:=威廉波段<5;

威廉底:STICKLINE(威廉波段<5,52,58,2,0),COLORFFFF00;

DRAWTEXT(CURRBARSCOUNT=38,55,'威廉底'),COLOR00FFFF;

市场心理:=COUNT(CLOSE>REF(CLOSE,1),13)/13*100,COLORFF00FF,LINETHICK2;

市场风险:=IF(市场心理>75,100,120);

STICKLINE(市场心理>75,72,78,2,0),COLOR00FFFF;{市场卖}

DRAWTEXT(CURRBARSCOUNT=38,75,'心理卖'),COLORFFFFFF;

市场底部:=IF(市场心理<25,45,0);

STICKLINE(市场心理<25,42,48,2,0),COLORFFFF00;{市场底}

DRAWTEXT(CURRBARSCOUNT=38,45,'心理底'),COLOR00FFFF;

{堪称一绝}

VAR1:=C-REF(C,1);

VAR2:=100*EMA(EMA(VAR1,6),6)/EMA(EMA(ABS(VAR1),6),6);

VAR3:=CROSS(EMA(C,19),EMA(C,7));

VAR4:=CROSS(EMA(C,7),EMA(C,19));

VARZ1:=L=LLV(L,BARSLAST(VAR3)+1);

VARZ2:=LLV(L,BARSLAST(VAR3)+1);

VARZ3:=H=HHV(H,BARSLAST(VAR4)+1);

VARZ4:=HHV(H,BARSLAST(VAR4)+1);

VARA:=DRAWLINE(VARZ1,VARZ2,VARZ3,VARZ4,0);

VARY1:=H=HHV(H,BARSLAST(VAR4)+1);

VARY2:=HHV(H,BARSLAST(VAR4)+1);

VARY3:=L=LLV(L,BARSLAST(VAR3)+1);

VARY4:=LLV(L,BARSLAST(VAR3)+1);

VARB:=DRAWLINE(VARY1,VARY2,VARY3,VARY4,0);

TJ:=IF(VARB<REF(VARB,1) AND VARB=VARA,1,0);

DRAWICON(REF(TJ,1)=0 AND TJ>=1 AND CCI<-40 ,-5,13);

DRAWTEXT(CURRBARSCOUNT=38,-5,'一绝底'),COLOR00FFFF;