中短彩带均线系统 通达信主图指标 源码 附图
DRAWBAND(MA(CLOSE,60),RGB(130,40,130),MA(CLOSE,120),RGB(20,100,150));{长涨跌彩带}DRAWBAND(MA(CLOSE,5),RGB(170,50,50),MA(CLOSE,10),RGB(83,123,68));{短涨跌彩带}
{均线}
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
BDGD:=C=HHV(C,13);
GDSJ:=BARSLAST(FILTER(CROSS(0.8,BDGD),2))+1;
高点:REF(C,GDSJ),COLORYELLOW,POINTDOT;
突破:CROSS(C,REF(高点,1)),COLORWHITE,POINTDOT,NODRAW;
STICKLINE(GDSJ =6,高点,高点,3,0),COLORYELLOW;
DRAWTEXT(突破,LOW,' 突'),COLORWHITE;
BDDD:=C=LLV(C,13);
DDSJ:=BARSLAST(FILTER(CROSS(0.8,BDDD),2))+1;
低点:REF(C,DDSJ),COLORFFCCCC,POINTDOT;
STICKLINE(DDSJ =6,低点,低点,3,0),COLORFFCCCC;
M5:MA(CLOSE,5),COLORWHITE;
M10:MA(CLOSE,10),COLORYELLOW;
M20:MA(C,20),COLORMAGENTA;
M60:MA(CLOSE,60),COLORCYAN;
M120:MA(CLOSE,120),COLOR00AAAA;
M250:MA(C,250),COLOR0099FF,LINETHICK1;
{粉买兰卖}
MA6:=MA(C,6),COLOR0000FF;
MA18:=MA(C,18),COLOR0096FF;
MA30:=MA(C,30),COLOR00FF99;
MA60:=MA(C,60),COLORFF00FF;
AAF:LLV(LOW,34),LINETHICK1,COLORFFFFCC;{低底}
BBF:MA(AAF,4),LINETHICK1,COLORFF9933;{低撑}
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),4.1,1)/SMA(ABS(CLOSE-LC),4.1,1)*100;
{DRAWICON(CROSS(84,RSI) ,H*1.03,5);}{笑卖1}
{DRAWICON(CROSS(RSI,11) ,L*0.99,4);}{哭买}
VAR27:=REF(CLOSE,1);
VAR28:=SMA(MAX(CLOSE-VAR27,0),5.5,1)/SMA(ABS(CLOSE-VAR27),6,1)*100;
{DRAWICON(IF(CROSS(76,VAR28),1,0),H*1.03,5);}{笑卖2}
DRAWTEXT(FILTER(EMA(CLOSE,60)-EMA(CLOSE,12) 0 AND EMA(CLOSE,12)/LOW 1.15,5),
LOW,'☆'),LINETHICK7,COLORYELLOW;
VARA:=((AMOUNT)/(VOL))/(100);
VARB:=((3)*(HIGH)+LOW+OPEN+(2)*(CLOSE))/(7);
VARC:=((SUM(AMOUNT,7))/(VARA))/(100);
VARD:=DMA(VARB,(VOL)/(VARC));
VARE:=((CLOSE-VARD)/(VARD))*(100);
VARF:=((CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)))*(100);
VARJ:=MA(VARE,20)+STD(VARE,20);
BIAS18:=((CLOSE-MA(CLOSE,18))/(MA(CLOSE,18)))*(100);
AA:=SMA(VARF,3,1);
SS:=(REF(BIAS18,1) =5) AND CROSS(VARJ,VARE) AND (AA
DRAWTEXT((REF(BIAS18,1) =5) AND CROSS(VARJ,VARE) AND (AA SS),H*1.02,'☆'),
LINETHICK7,COLORGREEN;
VAR1:=ZIG(3,10) REF(ZIG(3,10),1) AND REF(ZIG(3,10),1) REF(ZIG(3,10),2);
VAR2:=ZIG(3,10) REF(ZIG(3,10),1) AND REF(ZIG(3,10),1) REF(ZIG(3,10),2);
STICKLINE(VAR1,C,O,1,0),COLORBLUE,LINETHICK2;
STICKLINE(VAR1,C,O,1,0),COLORBLUE,LINETHICK2;
STICKLINE(VAR1,H,L,1,0),COLORBLUE,LINETHICK2;
STICKLINE(VAR2,C,O,1,0),COLORMAGENTA,LINETHICK2;
STICKLINE(VAR2,C,O,1,0),COLORMAGENTA,LINETHICK2;
STICKLINE(VAR2,H,L,1,0),COLORMAGENTA,LINETHICK2;
DRAWICON(CROSS((CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100 -6,0.5),L*0.975,1);{买前红箭}
{LC:=REF(CLOSE,1);
RSI5:=((SMA(MAX((CLOSE - LC),0),5,1) / SMA(ABS((CLOSE - LC)),5,1)) * 100);
TR1:=SUM(MAX(MAX((HIGH - LOW),ABS((HIGH - REF(CLOSE,1)))),ABS((LOW - REF(CLOSE,1)))),10);
HD:=(HIGH - REF(HIGH,1));
LD:=(REF(LOW,1) - LOW);
DMP:=SUM(IF(((HD 0) AND (HD LD)),HD,0),10);
DMM:=SUM(IF(((LD 0) AND (LD HD)),LD,0),10);
PDI:=((DMP * 100) / TR1);
MDI:=((DMM * 100) / TR1);
ADX:=MA(((ABS((MDI - PDI)) / (MDI + PDI)) * 100),5);
AV:=(RSI5 + ADX);
DXR:=(((ADX + REF(ADX,5)) / 2) + RSI5);
WR10:=((100 * (HHV(HIGH,10) - CLOSE)) / (HHV(HIGH,10) - LLV(LOW,10)));
NEWVOL:=(RSI5 - WR10);
回调买:=(AV + NEWVOL);
DRAWTEXT(CROSS(回调买,0),L*0.95,' 回调买'),COLORYELLOW;
DRAWICON(CROSS(回调买,-5),L*0.98,1);
STICKLINE(CLOSE OPEN,CLOSE,OPEN,2,0) ,COLORFFAAFF;
STICKLINE(CLOSE OPEN,CLOSE,OPEN,1,0) ,COLORFFBBFF;}
{涨跌停K线显示 }
C3:=REF(C,1);
涨停:=IF((C-C3)*100/C3 =(10-0.01*100/C3),1,0);
STICKLINE(涨停,OPEN,CLOSE,2,1),COLORYELLOW;
跌停:=IF((C3-C)*100/C3 =(10-0.01*100/C3),1,0);
STICKLINE(跌停,OPEN,CLOSE,2,1),COLORFF9933;