通达信王者主图公式 源码

以下是通达信王者主图公式 源码

王者主图公式 源码

中点:(H+L)/2,NODRAW;{御览图}

OK1:=BARSLAST(L=LLV(L,360))+1;

OK2:=REF(L,OK1);

日360最低:=IF(CURRBARSCOUNT<=CONST(OK1+1),CONST(IF(OK1,OK2,OK2)),DRAWNULL)COLORGREEN;

OK6:=IF(CURRBARSCOUNT<=CONST(OK1),CONST(IF(OK1,OK1,OK1)),DRAWNULL);

月开:=O#MONTH;

月高:H#MONTH,NODRAW,COLORRED;

月中:(H#MONTH+L#MONTH)/2,NODRAW,COLORYELLOW;

月低:L#MONTH,NODRAW,COLORGREEN;

月收:=C#MONTH;

STICKLINE(OK6&&月收>=月开,月高,月低,3.2,-1),COLORRED;

STICKLINE(OK6&&月收<=月开,月高,月低,3.2,-1),COLORCYAN;

周开:=O#WEEK;

周高:H#WEEK,NODRAW,COLORRED;

周中:(H#WEEK+L#WEEK)/2,NODRAW,COLORYELLOW;

周低:L#WEEK,NODRAW,COLORGREEN;

周收:=C#WEEK;

STICKLINE(OK6&&周收>=周开,周高,周低,4.1,0),COLORFF0098;{COLORFF0098}

STICKLINE(OK6&&周收<=周开,周高,周低,4.1,0),COLOR006000;{COLOR006000}

DRAWKLINE(H,O,L,C);{K线}

STICKLINE(O>C,C,O,3,1),COLOR00CC00;

O5:=OK6&&O<C;

STICKLINE(O5,C,O,3.03,0),COLOR450099;{红}

STICKLINE(O5,C,O,2.5,0),COLOR4500AA;

STICKLINE(O5,C,O,2,0),COLOR4500BB;

STICKLINE(O5,C,O,1.5,0),COLOR4500CC;

STICKLINE(O5,C,O,1,0),COLOR4500DD;

STICKLINE(O5,C,O,0.5,0),COLOR4500EE;

STICKLINE(O5,C,O,0.1,0),COLOR4500FF;

O2:=OK6&&O>C;

STICKLINE(O2,C,O,3.03,0),COLOR009900;{绿}

STICKLINE(O2,C,O,2.5,0),COLOR00AA00;

STICKLINE(O2,C,O,2,0),COLOR00BB00;

STICKLINE(O2,C,O,1.5,0),COLOR00CC00;

STICKLINE(O2,C,O,1,0),COLOR00DD00;

STICKLINE(O2,C,O,0.5,0),COLOR00EE00;

STICKLINE(O2,C,O,0.1,0),COLOR00FF00;

STICKLINE(中点,中点,中点,0.01,1),COLOR00FFFF;

HHH:=STICKLINE(周中,周中,周中,4.1,0),COLORCYAN;

Q1:=STICKLINE(月中,月中,月中,4.1,-1),COLORYELLOW;

STICKLINE(OK6&&周中,周中,周中,4.1,-1),COLORYELLOW;

K8:=BARSLAST(EMA(C,5)>=EMA(C,20));

K9:=BARSLAST(EMA(C,5)<=EMA(C,20));

K110:=IF(EMA(C,5)>=EMA(C,20),(EMA(C,5)+EMA(C,20))/2,DRAWNULL);

K115:=IF(EMA(C,5)>=EMA(C,20),EMA(C,5),DRAWNULL);

K120:=IF(EMA(C,5)>=EMA(C,20),EMA(C,20),DRAWNULL);

线5:IF(CURRBARSCOUNT<CONST(K9+2),K115,DRAWNULL)COLORYELLOW;

线10:IF(CURRBARSCOUNT<CONST(K9+2),K110,DRAWNULL),COLORYELLOW;

线20:IF(CURRBARSCOUNT<CONST(K9+2),K120,DRAWNULL),COLORYELLOW;

立春:=FILTER(MONTH=2 AND (DAY=3 OR DAY=5 ),2);

雨水:=FILTER(MONTH=2 AND (DAY=18 OR DAY=20),2);

惊蛰:=FILTER(MONTH=3 AND (DAY=5 OR DAY=7 ),2);

春分:=FILTER(MONTH=3 AND (DAY=20 OR DAY=22),2);

清明:=FILTER(MONTH=4 AND (DAY=3 OR DAY=6 ),2);

谷雨:=FILTER(MONTH=4 AND (DAY=19 OR DAY=21),2);

立夏:=FILTER(MONTH=5 AND (DAY=6 OR DAY=8 ),2);

小满:=FILTER(MONTH=5 AND (DAY=20 OR DAY=22),2);

芒种:=FILTER(MONTH=6 AND (DAY=5 OR DAY=7 ),2);

夏至:=FILTER(MONTH=6 AND (DAY=20 OR DAY=22),2);

小暑:=FILTER(MONTH=7 AND (DAY=6 OR DAY=8 ),2);

大暑:=FILTER(MONTH=7 AND (DAY=22 OR DAY=24),2);

立秋:=FILTER(MONTH=8 AND (DAY=7 OR DAY=9 ),2);

处暑:=FILTER(MONTH=8 AND (DAY=22 OR DAY=24),2);

白露:=FILTER(MONTH=9 AND (DAY=7 OR DAY=9 ),2);

秋分:=FILTER(MONTH=9 AND (DAY=22 OR DAY=24),2);

寒露:=FILTER(MONTH=10 AND (DAY=7 OR DAY=9 ),2);

霜降:=FILTER(MONTH=10 AND (DAY=22 OR DAY=24),2);

立冬:=FILTER(MONTH=11 AND (DAY=7 OR DAY=9 ),2);

小雪:=FILTER(MONTH=11 AND (DAY=22 OR DAY=24),2);

大雪:=FILTER(MONTH=12 AND (DAY=6 OR DAY=8 ),2);

冬至:=FILTER(MONTH=12 AND (DAY=21 OR DAY=23),2);

小寒:=FILTER(MONTH=1 AND (DAY=5 OR DAY=7 ),2);

大寒:=FILTER(MONTH=1 AND (DAY=19 OR DAY=21),2);

OK7:=IF(CURRBARSCOUNT<=CONST(4),CONST(IF(4,4,4)),DRAWNULL);

DRAWTEXT(OK7&&立春,L/1.003,'立');

DRAWTEXT(OK7&&立春,L/1.008,'春');

DRAWTEXT(OK7&&雨水,L/1.003,'雨');

DRAWTEXT(OK7&&雨水,L/1.008,'水');

DRAWTEXT(OK7&&惊蛰,L/1.003,'惊');

DRAWTEXT(OK7&&惊蛰,L/1.008,'蛰');

DRAWTEXT(OK7&&春分,L/1.003,'春');

DRAWTEXT(OK7&&春分,L/1.008,'分');

DRAWTEXT(OK7&&清明,L/1.003,'清');

DRAWTEXT(OK7&&清明,L/1.008,'明');

DRAWTEXT(OK7&&谷雨,L/1.003,'谷');

DRAWTEXT(OK7&&谷雨,L/1.008,'雨');

DRAWTEXT(OK7&&立夏,L/1.003,'立');

DRAWTEXT(OK7&&立夏,L/1.008,'夏');

DRAWTEXT(OK7&&小满,L/1.003,'小');

DRAWTEXT(OK7&&小满,L/1.008,'满');

DRAWTEXT(OK7&&芒种,L/1.003,'芒');

DRAWTEXT(OK7&&芒种,L/1.008,'种');

DRAWTEXT(OK7&&夏至,L/1.003,'夏');

DRAWTEXT(OK7&&夏至,L/1.008,'至');

DRAWTEXT(OK7&&小暑,L/1.003,'小');

DRAWTEXT(OK7&&小暑,L/1.008,'暑');

DRAWTEXT(OK7&&大暑,L/1.003,'大');

DRAWTEXT(OK7&&大暑,L/1.008,'暑');

DRAWTEXT(OK7&&立秋,L/1.003,'立');

DRAWTEXT(OK7&&立秋,L/1.008,'秋');

DRAWTEXT(OK7&&处暑,L/1.003,'处');

DRAWTEXT(OK7&&处暑,L/1.008,'暑');

DRAWTEXT(OK7&&白露,L/1.003,'白');

DRAWTEXT(OK7&&白露,L/1.008,'露');

DRAWTEXT(OK7&&秋分,L/1.003,'秋');

DRAWTEXT(OK7&&秋分,L/1.008,'分');

DRAWTEXT(OK7&&寒露,L/1.003,'寒');

DRAWTEXT(OK7&&寒露,L/1.008,'露');

DRAWTEXT(OK7&&霜降,L/1.003,'霜');

DRAWTEXT(OK7&&霜降,L/1.008,'降');

DRAWTEXT(OK7&&立冬,L/1.003,'立');

DRAWTEXT(OK7&&立冬,L/1.008,'冬');

DRAWTEXT(OK7&&小雪,L/1.003,'小');

DRAWTEXT(OK7&&小雪,L/1.008,'雪');

DRAWTEXT(OK7&&大雪,L/1.003,'大');

DRAWTEXT(OK7&&大雪,L/1.008,'雪');

DRAWTEXT(OK7&&冬至,L/1.003,'冬');

DRAWTEXT(OK7&&冬至,L/1.008,'至');

DRAWTEXT(OK7&&小寒,L/1.003,'小');

DRAWTEXT(OK7&&小寒,L/1.008,'寒');

DRAWTEXT(OK7&&大寒,L/1.003,'大');

DRAWTEXT(OK7&&大寒,L/1.008,'寒');

{过左峰提示粉色}

VAR121:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);

VAR141:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3);

VAR161:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);

VAR181:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);

卖:=(VAR121+VAR141+VAR161+VAR181),LINETHICK2;

SQ:DRAWLINE(卖,H,BARSLAST(卖)>=1,REF(H,BARSLAST(卖)),1),COLORWHITE,LINETHICK2;

过峰:=C>SQ AND REF(C,1)<SQ;

VVOL:=IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL),NODRAW;

预量:=VVOL/REF(V,1)>1.8;

现量:=V/REF(V,1)>1.5;

过峰1:STICKLINE( 过峰,C,O,5,0)COLORFF00FF;

预量1:DRAWICON(过峰 AND 预量, H*1.01,14);

现量1:DRAWICON(过峰 AND 现量,(O+C)/2,23);

前次低点:LLV(L*1,250)POINTDOT,COLORFF00FF,LINETHICK4;

MA05:=MA(C,5);

MA5角度: ATAN((MA05/REF(MA05,1)-1)*100)*180/3.1416,NODRAW;

T01:=CONST(LLVBARS(LOW,10));

T1HIGH:=CONST(REF(HIGH,T01));

MM:=CONST(CURRBARSCOUNT);

T02:=CONST(BARSLAST(CURRBARSCOUNT>MM+T01 AND H>T1HIGH));

T2HIGH:=CONST(REF(HIGH,T02));

T03:=CONST(BARSLAST(CURRBARSCOUNT>MM+T02 AND HIGH>T2HIGH));

T3HIGH:=CONST(REF(HIGH,T03));

攻击线:DRAWLINE(CURRBARSCOUNT=T03+1, T3HIGH, ISLASTBAR, T3HIGH,1),LINETHICK3,COLOR8080FF;

DRAWTEXT(ISLASTBAR, T3HIGH, '必杀攻击线')LINETHICK2,COLORCYAN;