通达信波段神韵副图源码
C/C++ www.gszb.com 股票公式指标网提供 Code复制以下内容到公式管理器
- TYP := (HIGH + LOW + CLOSE)/3;
- CCI1:=(TYP-MA(TYP,6))/(0.015*AVEDEV(TYP,5));
- 差值1:=ABS(REF(CCI1,1)-CCI1),LINETHICK0;
- CCI2:=(TYP-MA(TYP,10))/(0.015*AVEDEV(TYP,10));
- 差值2:=ABS(REF(CCI2,1)-CCI2),LINETHICK0;
- CCI3:=(TYP-MA(TYP,20))/(0.015*AVEDEV(TYP,20));
- 差值3:=ABS(REF(CCI3,1)-CCI3),LINETHICK0;
- CCI4:=(TYP-MA(TYP,30))/(0.015*AVEDEV(TYP,30));
- 差值4:=ABS(REF(CCI4,1)-CCI4),LINETHICK0;
- CCI5:=(TYP-MA(TYP,60))/(0.015*AVEDEV(TYP,60));
- 差值5:=ABS(REF(CCI5,1)-CCI5),LINETHICK0;
- CCI:=(CCI1+CCI2+CCI3+CCI4+CCI5)/2,COLORRED,LINETHICK2;
- 天:=100,COLORBLUE;
- TJ0:=CCI>50;
-
- M1:=WINNER( MA(CLOSE,1))*200;
- M2:=WINNER(MA(CLOSE,20))*200;
- VAR1:=(CLOSE-LLV(LOW,80))/(HHV(HIGH,80)-LLV(LOW,80))*200;
- VAR2:=SMA(VAR1,3,1);
- VAR3:=SMA(VAR2,3,1);
- VAR4:=3*VAR2-2*VAR3;
- VAR5:=LLV(LOW,5);
- VAR6:=HHV(HIGH,5);
- VAR7:=EMA((CLOSE-VAR5)/(VAR6-VAR5)*100,4)*2;
- VAR8:=EMA(0.667*REF(VAR7,1)+0.333*VAR7,2);
- VAR9:=3*VAR7-2*VAR8;
- VARA:=POW(MA(CLOSE,5),2)+MA(CLOSE,5);
- VARB:=POW(MA(LOW,5),2)+MA(LOW,5);
- VARC:=POW(MA(HIGH,5),2)+MA(HIGH,5);
- VARD:=(VARA-LLV(VARB,64))/(HHV(VARC,64)-LLV(VARB,64))*150+65-10;
- VARE:=SMA(VARD,3,1)*1.5-100;
- VARF:=SMA(VARE,3,1);
- VAR10:=3*VARE-2*VARF;
- VAR11:=(HIGH+LOW+CLOSE*2)/4;
- VAR12:=EMA(VAR11,13);
- VAR13:=STD(VAR11,13);
- VAR14:=(VAR11-VAR12)*100/VAR13;
- VAR15:=EMA(VAR14,5);
- VAR17:=EMA(VAR15,13)+200-100;
- VAR18:=EMA(VAR17,10);
- VAR19:=3*VAR17-2*VAR18;
- VAR1A:=VAR2+VAR7+VARE+VAR17;
- VAR1B:=VAR3+VAR8+VARF+VAR18;
- VAR1C:=VAR4+VAR9+VAR10+VAR19;
- VAR1D:=(HIGH+LOW+CLOSE)/3;
- VAR20:=(VAR1D-MA(VAR1D,34))/(0.015*AVEDEV(VAR1D,34));
- VAR21:=DMA(AMOUNT/VOL/100,VOL/CAPITAL);
- VAR22:=(HIGH+LOW+CLOSE+VAR1D)/4;
- VAR23:=EMA(VAR22,24);
- VAR24:=STD(VAR22,24);
- VAR25:=(VAR22-VAR23)/VAR24*100;
- VAR26:=(VAR1D-MA(VAR1D,24))/(0.015*AVEDEV(VAR1D,24));
- VAR27:=EMA(VAR25,5);
- VAR2A:=((VAR27+VAR26+VAR20)/3+165)/4;
- VAR2B:=(EMA(EMA(EMA(VAR2A,15),10),5)-25)*2+VAR21;
- VAR2C:=(VAR1A+VAR1B+VAR1C*30)/32/5-15;
- VAR2D:=EMA(VAR2C,13);{13}
- VAR2E:=(VAR2A+VAR2C)/2/1.1;
- VAR28:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
- VAR29:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100;
- VAR30:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
- VAR31:=REF(CLOSE,1);
- VAR32:=SMA(MAX(CLOSE-VAR31,0),5,1)/SMA(ABS(CLOSE-VAR31),5,1)*100;
- VAR33:=(HIGH+LOW+CLOSE)/3;
- VAR34:=(VAR33-MA(VAR33,14))/(0.015*AVEDEV(VAR33,14));
- VAR35:=(VAR28>=-15.8 AND VAR28<=-12.2 AND VAR29<=-20.8 AND VAR30<=-27.5 AND VAR32<=11.7 AND VAR34<=-145)*100;
- 多空比例:=IF((M1-M2)>-0.02,M1-M2,-0.02),COLORF0F000;
- 超短:EMA(VAR2E,3),COLORGREEN ;
- IF(超短>REF(超短,1), 超短,DRAWNULL),LINETHICK2,COLORRED;
- 短线:EMA(超短,5),COLORWHITE;
- IF(短线>REF(短线,1), 短线,DRAWNULL),LINETHICK2,COLORRED;
- IF(超短<REF(超短,1) AND 超短>短线, 超短,DRAWNULL),LINETHICK2,COLORYELLOW;
- STICKLINE(IF(超短>REF(超短,1), 超短,DRAWNULL),0,10,3,0),COLORFF00FF;
- 趋势:EMA((VAR2B+VAR2D)/2,3) ,COLORYELLOW;
- IF(趋势>REF(趋势,1), 趋势,DRAWNULL),LINETHICK2,COLORRED;
- 底部:=0,COLORF00FF0,LINETHICK2;
- 中位:=50,POINTDOT,COLORYELLOW,LINETHICK4;
- 风险:=80,COLORWHITE,POINTDOT;
- 顶:=100,COLORBLUE;
- 逃命:=120,COLORGREEN,LINETHICK2;
- STICKLINE(IF(超短<REF(超短,1), 超短,DRAWNULL),0,10,3,0),COLOR00FF00;
- DRAWTEXT(CROSS(短线,超短) AND CROSS(趋势,超短) AND CROSS(趋势,短线),
- REF(超短,2)*1.2,'逃'),COLORGREEN;
-
- DRAWBAND(超短,RGB(200,50,55),短线,RGB(0,100,50));
- TJ1:=CROSS(超短,短线) AND 短线<50 AND TJ0 ;
- TJ2:=CROSS(超短,短线) AND 短线<0 AND 趋势<0;
- TJ10:=CROSS(超短,短线) AND 短线<30;
- DRAWICON(TJ10,短线,26);
- SL:=CROSS(短线,超短) AND 短线>80;
- DRAWICON(SL,短线,19);
- STICKLINE(TJ1,0,20,4,0),COLOR000099;
- STICKLINE(TJ1,0,20,2,0),COLOR0000BB;
- STICKLINE(TJ1,0,20,1,0),COLOR0000DD;
- STICKLINE(TJ1,0,20,0.3,0),COLOR0000FF;
- DRAWTEXT(TJ1,25,'买底'),COLOR0000FF;
- STICKLINE(TJ2,0,50,4,0),COLOR009999;
- STICKLINE(TJ2,0,50,2,0),COLOR00BBBB;
- STICKLINE(TJ2,0,50,1,0),COLOR00DDDD;
- STICKLINE(TJ2,0,50,0.3,0),COLOR00FFFF;
- DRAWTEXT(TJ2,53,'超底'),COLOR00FFFF;
- {金叉}
- XXX:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
- K:=SMA(XXX,3,1);
- D:=SMA(K,3,1);
- 叉1:=CROSS(K,D);
- AA:=MACD.DIF;
- AB:=MACD.DEA;
- 叉2:=CROSS(AA,AB);
- 金叉:=叉1 AND 叉2;
- STICKLINE(金叉,0,5,4,0),COLORYELLOW;
- STICKLINE(金叉,0,10,3,0),COLORYELLOW;
- STICKLINE(金叉,0,19,1,0),COLORYELLOW;
- STICKLINE(金叉,0,22,0,0),COLORYELLOW;
- DRAWTEXT(金叉,23,'章鱼哥'),COLOR00FFFF;
{牛牛公式指标网提供:www.tdx001.com}
AF85811998.jpg
|