通达信​新神奇线+大周期百分比主图副图源码

通达信​新神奇线+大周期百分比主图副图源码

主图指标

A1AA:=9;

A2AA:=(REF(CLOSE,A1AA+1)<CLOSE);

VAR66:=REF(C,1);

VAR77:=SMA(MAX(C-VAR66,0),6,1)/SMA(ABS(C-VAR66),6,1)*100;

DRAWGBK(C>0,RGB(10,160,0),RGB(25,15,0),0,’ ‘,0);

上:=(SMA(HIGH,21,2) * 1.05);

DRAWTEXT(FILTER(((((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,1)))

AND (HIGH > 上)) AND (CLOSE < 上)),5),(HIGH*0.995),’–减仓’),COLORFFFFFF;

下轨道:(SMA(LOW,21,2) * 0.969),POINTDOT,COLOR00FFFF;

BMA:=MA(CLOSE,118);

阻挡:=(SMA(HIGH,21,2) * 1.05);

RSV:=(((CLOSE – LLV(LOW,13)) / (HHV(HIGH,13) – LLV(LOW,13))) * 100);

K:=SMA(RSV,3,1);

D:=SMA(K,3,1);

J:=((3 * K) – (2 * D));

RSV12:=(((CLOSE – LLV(LOW,34)) / (HHV(HIGH,34) – LLV(LOW,34))) * 100);

K12:=SMA(RSV12,3,1);

D12:=SMA(K12,3,1);

J12:=((3 * K12) – (2 * D12));

RSV24:=(((CLOSE – LLV(LOW,55)) / (HHV(HIGH,55) – LLV(LOW,55))) * 100);

K24:=SMA(RSV24,3,1);

D24:=SMA(K24,3,1);

J24:=((3 * K24) – (2 * D24));

支撑位:=IF(CROSS(J,J24),LOW,REF(LOW,BARSLAST(CROSS(J,J24))));

压力位:IF(CROSS(J24,J),HIGH,REF(HIGH,BARSLAST(CROSS(J24,J)))),COLOR00FF00;

U2L:=IF((CLOSE >= MA(CLOSE,20)),80,50);

L2L:=IF((CLOSE >= MA(CLOSE,20)),50,20);

RH1:=IF(((J < U2L) AND (REF(J,1) >= U2L)),HHV(REF(HIGH,1),(BARSLAST(((J >= U2L)

AND (REF(J,1) < U2L))) – 1)),REF(HHV(REF(HIGH,1),(BARSLAST(((J >= U2L)

AND (REF(J,1) < U2L))) – 1)),BARSLAST(((J < U2L) AND REF(J,1)))));

RH4:=IF((HIGH > RH1),LOW,REF(LOW,BARSLAST((HIGH > RH1))));

RH42:=IF((HIGH > RH1),J,REF(J,BARSLAST((HIGH > RH1))));

RH5:=IF((((HIGH > RH4) AND (J < RH42)) AND (J < J24)),

HIGH,REF(HIGH,BARSLAST((((HIGH > RH4) AND (J < RH42)) AND (J < J24)))));

RL1:=IF(((J > L2L) AND (REF(J,1) <= L2L)),LLV(REF(LOW,1),(BARSLAST(((J <= L2L)

AND (REF(J,1) > L2L))) – 1)),REF(LLV(REF(LOW,1),(BARSLAST(((J <= L2L)

AND (REF(J,1) > L2L))) – 1)),BARSLAST(((J > L2L) AND REF(J,1)))));

RL4:=IF((LOW < RL1),HIGH,REF(HIGH,BARSLAST((LOW < RL1))));

RL42:=IF((LOW < RL1),J,REF(J,BARSLAST((LOW < RL1))));

RL5:=IF((((LOW < RL4) AND (J > RL42)) AND (J > J24)),LOW,

REF(LOW,BARSLAST((((LOW < RL4) AND (J > RL42)) AND (J > J24)))));

CB:=((AMOUNT / VOL) / 100);

CD:=((CB > HIGH) OR (CB < LOW));

黑马趋势:=MA(CLOSE,3);

MAP:=MA(CLOSE,8);

AA5:=MA(CLOSE,21);

AA10:MA(CLOSE,8),COLOR0000FF;

AA12:MA(CLOSE,12),COLOR0000FF;

BB10:=((ATAN((AA10 – REF(AA10,1))) * 3.1416) * 10);

BB12:=((ATAN((AA12 – REF(AA12,1))) * 3.1416) * 10);

MA13:=MA(CLOSE,13);

DRAWTEXT(FILTER(((((((CLOSE / OPEN) > 1.04) AND ((CLOSE – REF(CLOSE,1)) > 0))

AND (CLOSE > 下轨道)) AND ((AA10 – REF(AA10,1)) > 0)) AND (CLOSE < 上)),3),

(LOW – 0.07),’追击’),COLORD1E768;

AA100:=IF(((AA12 <= AA10) AND (BB12 >= 1)) AND (BB10 >= 1),AA10,DRAWNULL);

AA122:=IF(((AA12 >= AA10) AND (BB10 <= 1)) AND (BB10 <= 1),AA12,DRAWNULL);

DRAWBAND(AA100,RGB(250,0,0),AA12,RGB(0,250,0));

DRAWBAND(AA122,RGB(0,250,0),AA10,RGB(250,0,0));

VARD:=((((OPEN + LOW) + HIGH) + CLOSE) / 4);

支撑:=EMA(VARD,5);

短期底部:=LLV(OPEN,30);

DRAWTEXT(((((((CROSS(黑马趋势,短期底部) AND ((RL5 – REF(RL5,1)) > 0))

AND ((黑马趋势 – REF(黑马趋势,1)) > 0)) AND (黑马趋势 > 1)) AND (LOW <= 支撑位))

AND (CLOSE > 支撑位)) AND (HIGH < 压力位)),(LOW – 0.15),’←黑马发现’),COLOR00FFFF;

DRAWTEXT((((((((CROSS(黑马趋势,RL5) AND ((黑马趋势 – REF(黑马趋势,1)) > 0))

AND (HIGH < 压力位)) AND (LOW <= 短期底部)) AND (CLOSE > 支撑位)) AND (CD < 1))

AND (CLOSE > OPEN)) AND (CLOSE > RL5)),LOW,’←短买’),COLOR00FF00;

DRAWTEXT(FILTER((((((((LOW <= 短期底部) AND ((CLOSE – REF(CLOSE,1)) > CLOSE))

AND ((MA(CLOSE,10) – REF(MA(CLOSE,10),1)) > 0)) AND (WINNER(CLOSE) < 0.05))

AND (短期底部 = RL5)) AND (LOW <= RL5)) AND (HIGH < 压力位)),3),LOW,’★机会难得’),COLORFFFFFF;

历史大底:DRAWTEXT(FILTER((((((LLV(LOW,0) AND (WINNER(CLOSE) < 0.08))

AND (LOW <= 短期底部)) AND (CLOSE > 短期底部)) AND (J < 80))

AND ((CLOSE / OPEN) > 1.08)),20),(LOW – 0.45),’★★历史大底’);

DRAWTEXT(FILTER(((((((((LOW <= 短期底部) AND (CLOSE > 压力位))

AND ((AA5 – REF(AA5,1)) > 0)) AND (J < 80)) AND (CLOSE > 支撑位))

AND ((黑马趋势 – REF(黑马趋势,1)) > 0)) AND (WINNER(CLOSE) < 0.1))

AND (CLOSE > OPEN)),5),(LOW – 0.15),’★黑马登天’),COLORCDEEC5;

X1:=(((((3 * CLOSE) + HIGH) + LOW) + OPEN) / 6);

X2:=EMA(X1,10);

X3:=REF(X2,1);

X4:=((REF(HIGH,1) + REF(LOW,1)) / 2);

X5:=(MA(CLOSE,21) + (2 * STD(CLOSE,21)));

X6:=REF(CLOSE,1);

X7:=((SMA(MAX((CLOSE – X6),0),7,1) / SMA(ABS((CLOSE – X6)),7,1)) * 100);

X8:=CROSS(79,X7);

X9:=FILTER(X8,4);

MAP1:=MA(CLOSE,60);

均线30:=MA(CLOSE,30);

均线89:=MA(CLOSE,89);

均线:=MA(CLOSE,16);

均线34:=MA(CLOSE,34);

均线55:=MA(CLOSE,55);

VAR1:=EMA(CLOSE,8);

VAR2:=EMA(VAR1,20);

VAR3:=CROSS(VAR1,VAR2);

VAR4:=(VAR1 < MA(CLOSE,60));

VAR5:=(((HHV(HIGH,36) – CLOSE) / (HHV(HIGH,36) – LLV(LOW,36))) * 100);

VAR6:=SMA(VAR5,5,1);

VAR7:=SMA(VAR6,8,1);

VAR8:=(CROSS(VAR6,VAR7) AND (VAR7 < 16));

VAR9:=((CLOSE > (LLV(CLOSE,60) + (0.3 * LLV(CLOSE,60)))) AND VAR8);

VARA:=IF((CLOSE > 1000),VAR8,VAR9);

黑马起步:=(VAR3 AND VAR4);

逃遁:=VARA;

均线20:=MA(CLOSE,20);

均线120:=MA(CLOSE,120);

牛熊线:=MA(CLOSE,250);

VA:=CROSS(MA(CLOSE,19),MA(CLOSE,120));

VB:=(MA(CLOSE,20) > MA(CLOSE,120));

VC:=CROSS(MA(CLOSE,120),MA(CLOSE,89));

VD:=(MA(CLOSE,20) < MA(CLOSE,120));

VE:=CROSS(MA(CLOSE,20),MA(CLOSE,250));

VF:=(MA(CLOSE,20) > MA(CLOSE,250));

VG:=CROSS(MA(CLOSE,250),MA(CLOSE,20));

DRAWTEXT(FILTER(((((((((OPEN > 均线120) AND (均线20 < 均线120))

AND (LOW <= 均线120)) AND ((均线20 – REF(均线20,1)) > 0)) AND (CLOSE > OPEN))

AND ((均线120 – REF(均线120,1)) > 0)) AND (HIGH < RH5))

AND (CLOSE >= 均线120)),15),LOW,’★120跳马’),COLOR0089E0;

DRAWTEXT((((VA AND ((均线120 – REF(均线120,1)) > 0)) AND (HIGH < RH5))

AND (CLOSE > OPEN)),LOW,’★宝马望月’),COLORFFFFFF;

DRAWTEXT((((((均线 – REF(均线,1)) > 0) AND CROSS(均线20,均线120))

AND (LOW <= 均线120)) AND (CLOSE >= 均线120)),LOW,’三线开花’),COLORFFFFFF;

短期底部2:LLV(HIGH,30),LINETHICK2,COLOR0000FF;

上轨:(SMA(HIGH,21,2) * 1.092),POINTDOT,COLORFFFFFF;

中轨道:(SMA(HIGH,21,2) * 1.017),POINTDOT,COLORFFFFFF;

DRAWTEXT(FILTER(((((LOW < 下轨道) AND (CLOSE > MA(CLOSE,15)))

AND (CLOSE > 短期底部2)) AND (HIGH < 压力位)),10),LOW,’★短线5%’),COLOR9DC522;

DRAWTEXT(((((((HIGH >= 均线120) AND (CLOSE < REF(CLOSE,1)))

AND (CLOSE < REF(CLOSE,1))) AND (HIGH > 上)) AND (CLOSE < 上))

AND (CLOSE < 均线120)),(HIGH + 1.05),’减仓’),COLOR00FF00;

DRAWTEXT(((VE > VG) AND (HIGH < 阻挡)),(LOW – 0.65),’★黑马短线’),COLOR00FFFF;

DRAWTEXT(FILTER(((((((OPEN < X2) AND (WINNER(CLOSE) < 0.2)) AND (CLOSE > X2))

AND ((X2 – REF(X2,1)) > 0)) AND (HIGH < 阻挡)) AND ((CLOSE – REF(CLOSE,1)) > 0.35)),4),

(LOW – 0.05),’★黑马狂奔’),COLORD18073;

DRAWTEXT((((((((CROSS(支撑,均线) AND (HIGH < 中轨道)) AND (WINNER(CLOSE) < 0.2))

AND (CLOSE < 阻挡)) AND (CLOSE > OPEN)) AND (LOW <= X2)) AND (CLOSE >= X2))

AND CROSS(支撑,X2)),LOW,’★黑马起步’),COLOR00FFFF;

DRAWTEXT(CROSS(X4,X5),HIGH,’●减仓’),COLOR00B4FF;

DRAWTEXT(X9 AND CROSS(82,VAR77),(HIGH * 1.03),’出货’),COLOR9000F5;

DRAWTEXT((((黑马起步 > 0) AND (LOW <= X2)) AND ((均线 – REF(均线,1)) > 0)),

(LOW – 0.11),’★黑马起步’),COLOR00FF00;

DRAWTEXT((逃遁 > 0),(HIGH + 0.15),’●逃命’),COLORFFFFFF;

RDV:=SMA(LOW,8,1);

DRAWTEXT(((((CROSS(K,D) AND (CLOSE >= OPEN)) AND ((X2 – REF(X2,1)) > 0))

((RDV – REF(RDV,1)) > 0)) AND (K <= 33)),(LOW – 0.08),’★黑马初现’),COLOR8500DE;

DRAWTEXT(FILTER((((((((LOW <= 短期底部) AND (WINNER(CLOSE) < 0.2))

AND (CLOSE < 牛熊线)) AND (HIGH < 阻挡)) AND ((X2 – REF(X2,1)) > 0))

AND (CLOSE > OPEN)) AND (HIGH >= X3)),5),(LOW – 0.03),’←黑马筑底’),COLOR85B256;

RCK:=(SMA(LOW,21,2) * 0.95);

趋势线:=SMA(LOW,5,1);

大胆买入:DRAWTEXT(((CROSS(趋势线,RCK) AND (LOW <= X2)) AND ((X2 – REF(X2,1)) > 0)),

LOW,’←★大胆买入’),COLORE50000;

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

B6:=HHV(B1,(4 * 15));

B7:=LLV(B1,(4 * 15));

B8:=(B6 – B7);

飞龙顶底线:=(MA(((B1 – B7) / B8),2) * 80);

DRAWTEXT(FILTER(((((((飞龙顶底线 <= 1) AND (WINNER(CLOSE) < 0.02))

AND (HIGH < 趋势线)) AND (CLOSE > OPEN)) AND (LOW <= 短期底部))

AND (CLOSE > 短期底部)),8),(LOW – 0.02),’←黑马寻底’),COLORE7DD1F;

DRAWTEXT(FILTER((((((((LOW <= 短期底部) AND (WINNER(CLOSE) < 0.015))

AND ((OPEN / CLOSE) > 0.99)) AND ((J – REF(J,1)) > 0)) AND (CLOSE > OPEN))

AND (HIGH < 支撑位)) AND (CLOSE > 短期底部)),25),(LOW – 0.09),’←开始建仓’),COLOR00FFFF;

DRAWTEXT(FILTER((((((((LOW <= 均线30) AND ((AA10 – REF(AA10,1)) > 0))

AND ((均线 – REF(均线20,1)) > 0)) AND ((趋势线 – REF(趋势线,1)) > 0))

AND (CLOSE >= 均线30)) AND (WINNER(CLOSE) < 0.15)) AND ((CLOSE / OPEN) > 1.01)),3),

LOW,’★天马奔月’),COLOR76B0FC;

DRAWTEXT((((((OPEN <= 均线) AND ((均线30 – REF(均线30,1)) > 0))

AND (CLOSE > 均线89)) AND (BB10 > 1)) AND ((CLOSE / OPEN) > 1.04)),

LOW,’★天马过桥’),COLORCC99FF;

DRAWKLINE(HIGH,OPEN,LOW,CLOSE);

STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,2.8,0),COLORFF6C00;

STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,2.5,0),COLORFF7B00;

STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,2.2,0),COLORFF9C00;

STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,1.8,0),COLORFFBE00;

STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,1.5,0),COLORFFCC00;

STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,1,0),COLORFFFF00;

STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,2.8,0),COLOR0000A3;

STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,2.5,0),COLOR0000B7;

STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,1.8,0),COLOR0000CD;

STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,1.5,0),COLOR0000E9;

STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,1,0),COLOR0754E9;

STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,1,0),COLOR076EF3;

STICKLINE(((((CLOSE / OPEN) > 1.04) AND (CLOSE < 阻挡)) AND ((CLOSE – REF(CLOSE,1)) > 0)),CLOSE,OPEN,2.5,0),COLOR009FFF;

STICKLINE(((((CLOSE / OPEN) > 1.04) AND (CLOSE < 阻挡)) AND ((CLOSE – REF(CLOSE,1)) > 0)),CLOSE,OPEN,2,0),COLOR00B5FF;

STICKLINE(((((CLOSE / OPEN) > 1.04) AND (CLOSE < 阻挡)) AND ((CLOSE – REF(CLOSE,1)) > 0)),CLOSE,OPEN,1.5,0),COLOR00E4FF;

STICKLINE(((((CLOSE / OPEN) > 1.04) AND (CLOSE < 阻挡)) AND ((CLOSE – REF(CLOSE,1)) > 0)),OPEN,LOW,0,0),COLOR00FFFF;

STICKLINE(((((CLOSE / OPEN) > 1.04) AND (CLOSE < 阻挡)) AND ((CLOSE – REF(CLOSE,1)) > 0)),CLOSE,HIGH,0,0),COLOR00FFFF;

STICKLINE(((((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,1))) AND (HIGH > 阻挡)) AND (CLOSE < 阻挡)),OPEN,LOW,0,0),COLORFF76FF;

STICKLINE(((((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,1))) AND (HIGH > 阻挡)) AND (CLOSE < 阻挡)),CLOSE,HIGH,0,0),COLORFF76FF;

STICKLINE(((((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,1))) AND (HIGH > 阻挡)) AND (CLOSE < 阻挡)),CLOSE,OPEN,2.5,0),COLORFF62FF;

STICKLINE(((((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,1))) AND (HIGH > 阻挡)) AND (CLOSE < 阻挡)),CLOSE,OPEN,2,0),COLORFF76FF;

STICKLINE(((((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,1))) AND (HIGH > 阻挡)) AND (CLOSE < 阻挡)),CLOSE,OPEN,1.5,0),COLORFFA8FF;

VVARA:=(CLOSE-REF(OPEN,29))/REF(OPEN,29)*100;

VVARB:=EMA(0.667*REF(VVARA,1)+0.333*VVARA,5);

DRAWTEXT(IF(VOL>=1.3*MA(VOL,5) AND COUNT(VVARA>=VVARB AND VVARA<-17,3)

AND REF(LOW,1)=LLV(LOW,120),1,0),LOW*0.95,’★注意买入’);

VVAR1:=(HIGH+LOW+OPEN+2*CLOSE)/5;

VVAR2:=REF(VVAR1,1);

VVAR3:=SMA(MAX(VVAR1-VVAR2,0),10,1)/SMA(ABS(VVAR1-VVAR2),10,1)*100;

HY3:=IF(COUNT(VVAR3<20,5)>=1 AND COUNT(VVAR1=LLV(VVAR1,10),10)>=1

AND CLOSE>=OPEN*1.038 AND VOL>MA(VOL,5)*1.2,1,0);

DRAWTEXT(HY3,LOW,’ 注意买入’),COLORRED;

副图指标

4,COLORBLUE;

3,COLORBLUE;

2,COLORBLUE;

1,COLORGRAY;

0,COLORGRAY;

LOWV:=LLV(LOW,9);

HIGHV:=HHV(HIGH,9);

RSV:=EMA((C-LOWV)/(HIGHV-LOWV)*100,3);

K:=EMA(RSV,3),LINETHICK3;

D:=MA(K,3),COLORYELLOW,DOTLINE;

K1:=BARSLAST(REF(CROSS(K,D),1));

K2:=REF(C,K1+1)>C AND REF(K,K1+1)<K AND CROSS(K,D);

KMJ:=K2>0 AND D<25;

STICKLINE(KMJ,3.3,3.9,5,0),COLORRED;

KMJSKDJ:=KMJ  AND FILTER(KMJ,20);

DRAWTEXT(KMJSKDJ,3.15,’SKDJ’),;

DIFF:=EMA(CLOSE,12) – EMA(CLOSE,26),LINETHICK2;

DEA:=EMA(DIFF,9);

MACD:=2*(DIFF-DEA);

KM1:=BARSLAST(REF(CROSS(DIFF,DEA),1));

底背离:=REF(CLOSE,KM1+1)>CLOSE AND DIFF>REF(DIFF,KM1+1) AND CROSS(DIFF,DEA);

STICKLINE(底背离,2.3,2.9,5,0),COLORYELLOW;

KMJMACD:=底背离  AND FILTER(底背离,20);

DRAWTEXT(KMJMACD,2.15,’MACD 白线’);

KMJ11:=MACD<0 AND DIFF<0 AND REF(MACD,2)>REF(MACD,1) AND REF(MACD,1)<MACD;

KMJ22:=BARSLAST(REF(KMJ11,1));

KMJ6:=IF(KMJ11,MACD>REF(MACD,KMJ22+1),0);

STICKLINE(KMJ6,1.3,1.9,5,0),COLORLIGREEN;

KMJKMJ6:=KMJ6  AND FILTER(KMJ6,20);

DRAWTEXT(KMJKMJ6,1.15,’MACD 绿柱’);

LC:=REF(CLOSE,1);

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

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

A3:=BARSLAST(REF(CROSS(RSI1,RSI2),1));

B3:=REF(C,A3+1)>C AND REF(RSI1,A3+1)<RSI1 AND CROSS(RSI1,RSI2);

STICKLINE(B3,0.3,0.9,3,0),COLORWHITE;

KMJKMJ7:=B3  AND FILTER(B3,20);

DRAWTEXT(KMJKMJ7,0.15,’RSI’);

KMJ666:=EXIST(B3,10);

KMJ777:=EXIST(KMJ,10);

KMJ888:=EXIST(底背离,10);

KMJ999:=EXIST(KMJ6,10);

DRAWICON(KMJ666 AND KMJ777 AND KMJ888 AND KMJ999,1,1);

DRAWICON(KMJ666 AND KMJ777 AND KMJ888 AND KMJ999,2,1);

DRAWICON(KMJ666 AND KMJ777 AND KMJ888 AND KMJ999,3,1);

DRAWICON(KMJ666 AND KMJ777 AND KMJ888 AND KMJ999,4,1);

    © 版权声明
    THE END
    喜欢就支持一下吧
    点赞5赞赏 分享
    评论 抢沙发
    头像
    欢迎您留下宝贵的见解!
    提交
    头像

    昵称

    取消
    昵称表情代码图片

      暂无评论内容