【原】通達(dá)信主圖如風(fēng)（附源碼)

通達(dá)信主圖如風(fēng)（附源碼)

{---【如風(fēng)主圖】指標(biāo)-由往事如風(fēng)QQ:105365158經(jīng)海量數(shù)據(jù)分析及精準(zhǔn)校驗(yàn)制作---}

日均價(jià):=DMA(CLOSE,VOL/100);

⑤日:EMA(EMA(EMA((日均價(jià)+REF(日均價(jià),1))/2,2),2),2),COLORFFFFFF,NODRAW;

⑩日:IF(MA((日均價(jià)+REF(日均價(jià),1))/2,9)=DRAWNULL,EMA((日均價(jià)+REF(日均價(jià),1))/2,9),MA((日均價(jià)+REF(日均價(jià),1))/2,9)),COLOR00FFFF,NODRAW;

２０日:EMA(EMA(EMA((日均價(jià)+REF(日均價(jià),1))/2,2),2),16),COLORFF00FF,NODRAW;

６０日:MA(CLOSE,60),COLOR00FF00,NODRAW;

半年:MA(CLOSE,120),COLORCC9999,NODRAW;

年線:MA(CLOSE,250),COLORFF8040,NODRAW;

{-------------------------如風(fēng)股價(jià)趨勢(shì)智能判斷系統(tǒng)-------------------------}

智能判斷線:=(REF((C*3+H+L+O)/6,1)*0.5+REF((C*3+H+L+O)/6,2)+REF((C*3+H+L+O)/6,3)*0.5)/2;

灰蘭風(fēng)險(xiǎn):=IF(C<智能判斷線  AND BETWEEN(智能判斷線,C,O),1,0);

陰跌區(qū)域:=IF(C<智能判斷線  AND NOT(REF(C,1)=智能判斷線),1,0);

銀底初現(xiàn):=IF(C>=智能判斷線 AND BETWEEN(智能判斷線,C,O),1,0);

上升區(qū)域:=IF(C>=智能判斷線 AND REF(C,1)>智能判斷線,1,0);

B1:=REF(CLOSE,1);

B2:=REF(CLOSE,2);

B3:=REF(CLOSE,3);

B4:=REF(CLOSE,4);

CMAX:=MAX(MAX(MAX(CLOSE,B1),B2),B3);

CMIN:=MIN(MIN(MIN(CLOSE,B1),B2),B3);

持股:=(CLOSE=CMAX AND (B1>=B2 OR B1>=B3)) OR ((B1=CMAX AND (B2=CMIN OR B3=CMIN)) AND CLOSE>=B2) OR (B2=CMAX AND B3=CMIN AND CLOSE>=B1) OR (B3=CMAX AND CLOSE>=B1 AND CLOSE>=B2);

變盤(pán):=CLOSE=CMAX AND B1=CMIN;

下跌:=(CLOSE=CMIN AND (B1<B2 OR B1<B3)) OR ((B1=CMIN AND (B2=CMAX OR B3=CMAX)) AND CLOSE<B2) OR (B2=CMIN AND B3=CMAX AND CLOSE<B1) OR (B3=CMIN AND CLOSE<B1 AND CLOSE<B2);

買(mǎi)入:=(B1=CMIN AND CLOSE>=B2) OR ((B2=CMIN AND B1<=B3) OR (B3=CMIN AND B1<=B2) AND B2<B4 AND CLOSE>=B1);

拋售:=(B1=CMAX AND CLOSE<B2) OR ((B2=CMAX AND B1>B3) OR (B3=CMAX AND B1>B2) AND B2>=B4 AND CLOSE<B1);

銀色上升變盤(pán):=(下跌 AND O>REF(C,1)) OR 銀底初現(xiàn) OR 變盤(pán);

銀色下跌變盤(pán):=(B1=CMAX AND CLOSE=CMIN) OR (下跌 AND 拋售);

銀色下跌:=B1=CMAX AND CLOSE=CMIN;

STICKLINE(銀色上升變盤(pán) OR 銀色下跌變盤(pán),IF(銀色下跌,B2,B1),C,3.1,0),COLORA0A0A0;

STICKLINE(銀色上升變盤(pán) OR 銀色下跌變盤(pán),IF(銀色下跌,B2,B1),C,1.9,0),COLORC0C0C0;

STICKLINE(銀色上升變盤(pán) OR 銀色下跌變盤(pán),IF(銀色下跌,B2,B1),C,0.6,0),COLORE0E0E0;

粉色上升變盤(pán):=(持股 AND 買(mǎi)入);

粉色下跌變盤(pán):=(持股 AND C<REF(C,1));

STICKLINE(粉色上升變盤(pán) OR 粉色下跌變盤(pán),B1,CLOSE,3.1,0 ),COLORAA55BB;

STICKLINE(粉色上升變盤(pán) OR 粉色下跌變盤(pán),B1,CLOSE,1.9,0 ),COLORCC77DD;

STICKLINE(粉色上升變盤(pán) OR 粉色下跌變盤(pán),B1,CLOSE,0.6,0 ),COLORFF99FF;

STICKLINE(買(mǎi)入,B1,B2,3.1,0),COLOR00FFFF;

STICKLINE(買(mǎi)入,B1,B2,3.1,0),COLOR009999;

STICKLINE(拋售,B1,B2,3.1,0),COLOR006B00;

STICKLINE(拋售,B1,B2,1.9,0),COLOR007D00;

STICKLINE(拋售,B1,B2,0.6,0),COLOR008F00;

原始K線:DRAWKLINE(HIGH,OPEN,LOW,CLOSE);

STICKLINE(持股 OR 買(mǎi)入,O,C,3.10,0),COLORRED;

沖高回落變盤(pán):=(O>C AND 持股 AND C<REF(C,1));

補(bǔ)充:=B2<O AND 沖高回落變盤(pán) AND O>REF(C,1);

STICKLINE(下跌 OR 拋售 OR 補(bǔ)充,O,C,3.10,0),COLORBBFF54;

STICKLINE(CLOSE<O,OPEN,CLOSE,2.45,0),COLORCC6600;

STICKLINE(CLOSE<O,OPEN,CLOSE,1.45,0),COLORDD7700;

STICKLINE(CLOSE<O,OPEN,CLOSE,0.45,0),COLOREE8800;

STICKLINE(持股,IF(O>REF(C,1) AND C<O AND 沖高回落變盤(pán),B1,C),CLOSE,1.9,0 ),COLORCC77DD;

STICKLINE(持股,IF(O>REF(C,1) AND C<O AND 沖高回落變盤(pán),B1,C),CLOSE,0.6,0 ),COLORFF99FF;

STICKLINE(買(mǎi)入,B1,B2,1.9,0),COLOR00BBBB;

STICKLINE(買(mǎi)入,B1,B2,0.6,0),COLOR00DDDD;

STICKLINE(C>O,OPEN,CLOSE,2.45,0),COLOR440088;

STICKLINE(C>O,OPEN,CLOSE,1.45,0),COLOR550099;

STICKLINE(C>O,OPEN,CLOSE,0.45,0),COLOR6600AA;

{--------------------身懷六甲孕育K線,嗎BS買(mǎi)賣(mài)點(diǎn)預(yù)測(cè)------------------------}

身懷六甲:=(((((ABS((REF(CLOSE,1) - REF(OPEN,1))) / REF(CLOSE,1)) > 0.04)

AND ((ABS((CLOSE - OPEN)) / CLOSE) < 0.005)) AND (MAX(CLOSE,OPEN) <

MAX(REF(CLOSE,1),REF(OPEN,1)))) AND (MIN(CLOSE,OPEN) > MIN(REF(CLOSE,1),REF(OPEN,1))));

DRAWTEXT(身懷六甲 AND ⑤日<REF(⑤日,1),L-L*0.005,1),COLOR0080FF;

VAR1:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));

VAR2:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));

VAR3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));

周期限制:=PERIOD=0 OR PERIOD=1 OR PERIOD=8;

B點(diǎn):=DRAWICON(CROSS(VAR2,MA(VAR3,6)) AND 周期限制=0,(LOW - (LOW*0.015)),11);

S點(diǎn):=DRAWICON(CROSS(MA(VAR3,6),VAR1) AND 周期限制=0,(HIGH+(HIGH*0.005)),8);

{--價(jià)量乃為指標(biāo)之母，亦即先有股價(jià)、成交量，始有指標(biāo)的產(chǎn)生,成反向推算KDJ價(jià)--}

N:=9;M1:=3;M2:=3;

RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;

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

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

J:=3*K-2*D;

K1:=1/3*RSV+REF(K,1)/3*2;

D1:=1/3*K+REF(D,1)/3*2;

JJ:=3*K1-2*D1;

J11:=J;

J昨:=REF(JJ,1);

JX:=IF(J1=-50,J11,IF(J1=-49,J昨,J1));

J拐點(diǎn)價(jià):=CONST(((9/7*JX-2*REF(K1,1)+12/7*REF(D1,1))/100)*(HHV(HIGH,9)-LLV(LOW,9))+LLV(LOW,9));

K高點(diǎn)價(jià):=CONST(((9/7*CONST(HHV(K,BARSSINCE(C)))-2*REF(K1,1)+12/7*REF(D1,1))/100)*(HHV(HIGH,9)-LLV(LOW,9))+LLV(LOW,9));

K低點(diǎn)價(jià):=CONST(((9/7*CONST(LLV(K,BARSSINCE(C)))-2*REF(K1,1)+12/7*REF(D1,1))/100)*(HHV(HIGH,9)-LLV(LOW,9))+LLV(LOW,9));

K中間價(jià):=(K高點(diǎn)價(jià)+K低點(diǎn)價(jià))/2;

STICKLINE(CURRBARSCOUNT=1,K高點(diǎn)價(jià),K高點(diǎn)價(jià),110,0),COLORFF8000;

STICKLINE(CURRBARSCOUNT=1,K低點(diǎn)價(jià),K低點(diǎn)價(jià),110,0),COLORFF0080;

STICKLINE(CURRBARSCOUNT=1,K中間價(jià),K中間價(jià),110,0),COLOR4080FF;

STICKLINE(CURRBARSCOUNT=1,J拐點(diǎn)價(jià),J拐點(diǎn)價(jià),110,-1),COLOR00FFFF;

拐點(diǎn)價(jià):=((9/7*JX-2*REF(K1,1)+12/7*REF(D1,1))/100)*(HHV(HIGH,9)-LLV(LOW,9))+LLV(LOW,9),COLORA0A0A0;

{------------【如風(fēng)主圖】黃金量能智能均線判斷系統(tǒng)各均線重新補(bǔ)畫(huà)------------}

DRAWBAND(年線,RGB(0,0,255),年線,RGB(0,0,255));

DRAWBAND(半年,RGB(128,128,192),半年,RGB(128,128,192));

DRAWBAND(６０日,RGB(0,255,0),６０日,RGB(0,255,0));

DRAWBAND(２０日,RGB(255,0,255),２０日,RGB(255,0,255));

DRAWBAND(⑩日,RGB(255,255,0),⑩日,RGB(255,255,0));

DRAWBAND(⑤日,RGB(255,255,255),⑤日,RGB(255,255,255));

STICKLINE(持股 OR 買(mǎi)入,O,O,3.10,0),COLORRED;

STICKLINE(持股 OR 買(mǎi)入,C,C,3.10,0),COLORRED;

STICKLINE(下跌 OR 拋售 OR 補(bǔ)充,O,O,3.10,0),COLORBBFF54;

STICKLINE(下跌 OR 拋售 OR 補(bǔ)充,C,C,3.10,0),COLORBBFF54;

STICKLINE(C>O,O,L,0,0),COLOR3232FF;

STICKLINE(C=O,C,O,3.10,0),COLORFFFFF;