相關(guān)標(biāo)簽: 齊魯證券通達(dá)信下載 、 通達(dá)信 、 通達(dá)信官方網(wǎng)站 、 通達(dá)信下載 、 通達(dá)信軟件下載 、 新浪通達(dá)信 、 齊魯證券通達(dá)信 、 國(guó)盛證券通達(dá)信版 、 信達(dá)證券通達(dá)信專業(yè)版 、

棋盤(pán)法則指標(biāo)源碼

{INPUT:之字幅度(70,3,100);}
最低:=TROUGHBARS(L,之字幅度,1);{調(diào)整之字幅度找到低位起點(diǎn)}
斜率:=角度調(diào)節(jié)/1000;{角度調(diào)節(jié)以便把握趨勢(shì)}
P:=橫向調(diào)節(jié);{調(diào)整豎線間隔}

N:=最低;
數(shù)列:INTPART(LOG((1/SQRT(5))*(POW((1+SQRT(5))/2,N)-POW((1-SQRT(5))/2,N)))/POW(N*P,1/5)),NODRAW;
低價(jià):=ref(L,BARSLAST(最低=0));
高價(jià):=CONST(HHV(H,最低))*1.05;
低價(jià)_:DRAWLINE(最低=0,L,ISLASTBAR,低價(jià),0);
前高低:=HHV(H,最低+1)=H;{數(shù)4高}
統(tǒng)計(jì):=CROSS(COUNT(前高低,最低)=4,0.5);
KK:=BARSLAST(統(tǒng)計(jì));
DRAWTEXT(CURRBARSCOUNT=CONST(KK)+7,H*1.05,'起');
DRAWTEXT(CURRBARSCOUNT=CONST(KK)+7,H,'點(diǎn)');
PP:=IF(ref(C,BARSLAST(CROSS(COUNT(前高低,最低)=3,0.5)))>C,ref(C,BARSLAST(CROSS(COUNT(前高低,最低)=3,0.5))),H);
基線:ref(PP,BARSLAST(統(tǒng)計(jì))),NODRAW;
基差:基線-低價(jià),NODRAW;
{橫線加字}{本文來(lái)源:' www.kzuj.com.cn ' }
一0:=低價(jià)+(基差*0.618*1*POW(1.1,1-1));
一:IF(CURRBARSCOUNT<=CONST(KK) AND 一0<=高價(jià),一0
,DRAWNULL),POINTDOT,COLORAAAAAA;
DRAWTEXT(CURRBARSCOUNT=CONST(KK)+5,CONST(一),'一'),COLORFFFFFF;
二0:=低價(jià)+(基差*0.618*2*POW(1.1,2-1));
二:IF(CURRBARSCOUNT<=CONST(KK) AND 二0<=高價(jià),二0
,DRAWNULL),POINTDOT,COLORAAAAAA;
DRAWTEXT(CURRBARSCOUNT=CONST(KK)+5,CONST(二),'二'),COLORFFFFFF; {本文來(lái)至CXH99.COM}
三0:=低價(jià)+(基差*0.618*3*POW(1.1,3-1));
三:IF(CURRBARSCOUNT<=CONST(KK) AND 三0<=高價(jià),三0
,DRAWNULL),POINTDOT,COLORAAAAAA;
DRAWTEXT(CURRBARSCOUNT=CONST(KK)+5,CONST(三),'三'),COLORFFFFFF;
四0:=低價(jià)+(基差*0.618*4*POW(1.1,4-1));
四:IF(CURRBARSCOUNT<=CONST(KK) AND 四0<=高價(jià),四0
,DRAWNULL),POINTDOT,COLORAAAAAA;
DRAWTEXT(CURRBARSCOUNT=CONST(KK)+5,CONST(四),'四'),COLORFFFFFF;
五0:=低價(jià)+(基差*0.618*5*POW(1.1,5-1));
五:IF(CURRBARSCOUNT<=CONST(KK) AND 五0<=高價(jià),五0
,DRAWNULL),POINTDOT,COLORAAAAAA;
DRAWTEXT(CURRBARSCOUNT=CONST(KK)+5,CONST(五),'五'),COLORFFFFFF;
六0:=低價(jià)+(基差*0.618*6*POW(1.1,6-1));
六:IF(CURRBARSCOUNT<=CONST(KK) AND 六0<=高價(jià),六0
,DRAWNULL),POINTDOT,COLORAAAAAA;
DRAWTEXT(CURRBARSCOUNT=CONST(KK)+5,CONST(六),'六'),COLORFFFFFF;
七0:=低價(jià)+(基差*0.618*7*POW(1.1,7-1));
七:IF(CURRBARSCOUNT<=CONST(KK) AND 七0<=高價(jià),七0
,DRAWNULL),POINTDOT,COLORAAAAAA;
DRAWTEXT(CURRBARSCOUNT=CONST(KK)+5,CONST(七),'七'),COLORFFFFFF;
八0:=低價(jià)+(基差*0.618*8*POW(1.1,8-1));
八:IF(CURRBARSCOUNT<=CONST(KK) AND 八0<=高價(jià),八0
,DRAWNULL),POINTDOT,COLORAAAAAA;
DRAWTEXT(CURRBARSCOUNT=CONST(KK)+5,CONST(八),'八'),COLORFFFFFF;
九0:=低價(jià)+(基差*0.618*9*POW(1.1,9-1));
九:IF(CURRBARSCOUNT<=CONST(KK) AND 九0<=高價(jià),九0
,DRAWNULL),POINTDOT,COLORAAAAAA;
DRAWTEXT(CURRBARSCOUNT=CONST(KK)+5,CONST(九),'九'),COLORFFFFFF;
十0:=低價(jià)+(基差*0.618*10*POW(1.1,10-1));
十:IF(CURRBARSCOUNT<=CONST(KK) AND 十0<=高價(jià),十0
,DRAWNULL),POINTDOT,COLORAAAAAA;
DRAWTEXT(CURRBARSCOUNT=CONST(KK)+5,CONST(十),'十'),COLORFFFFFF;
II0:=低價(jià)+(基差*0.618*11*POW(1.1,11-1));
II:IF(CURRBARSCOUNT<=CONST(KK) AND II0<=高價(jià),II0
,DRAWNULL),POINTDOT,COLORAAAAAA;
{豎線加字}
STICKLINE(CURRBARSCOUNT<=CONST(KK) AND 數(shù)列!=ref(數(shù)列,1),低價(jià),高價(jià),0.00001,-1),COLORAAAAAA;
DRAWTEXT(CURRBARSCOUNT=CONST(KK)+5,CONST(II),'II'),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT<=CONST(KK) AND 數(shù)列!=ref(數(shù)列,1)
AND 數(shù)列=1 ,高價(jià)*0.98,'一'),COLORFFFF00;
DRAWTEXT(CURRBARSCOUNT<=CONST(KK) AND 數(shù)列!=ref(數(shù)列,1)
AND 數(shù)列=2 ,高價(jià)*0.98,'二'),COLORFFFF00;
DRAWTEXT(CURRBARSCOUNT<=CONST(KK) AND 數(shù)列!=ref(數(shù)列,1)
AND 數(shù)列=3 ,高價(jià)*0.98,'三'),COLORFFFF00;
DRAWTEXT(CURRBARSCOUNT<=CONST(KK) AND 數(shù)列!=ref(數(shù)列,1)
AND 數(shù)列=4 ,高價(jià)*0.98,'四'),COLORFFFF00;
DRAWTEXT(CURRBARSCOUNT<=CONST(KK) AND 數(shù)列!=ref(數(shù)列,1)
AND 數(shù)列=5 ,高價(jià)*0.98,'五'),COLORFFFF00;
DRAWTEXT(CURRBARSCOUNT<=CONST(KK) AND 數(shù)列!=ref(數(shù)列,1)
AND 數(shù)列=6 ,高價(jià)*0.98,'六'),COLORFFFF00;
DRAWTEXT(CURRBARSCOUNT<=CONST(KK) AND 數(shù)列!=ref(數(shù)列,1)
AND 數(shù)列=7 ,高價(jià)*0.98,'七'),COLORFFFF00;
DRAWTEXT(CURRBARSCOUNT<=CONST(KK) AND 數(shù)列!=ref(數(shù)列,1)
AND 數(shù)列=8 ,高價(jià)*0.98,'八'),COLORFFFF00;
DRAWTEXT(CURRBARSCOUNT<=CONST(KK) AND 數(shù)列!=ref(數(shù)列,1)
AND 數(shù)列=9 ,高價(jià)*0.98,'九'),COLORFFFF00;
DRAWTEXT(CURRBARSCOUNT<=CONST(KK) AND 數(shù)列!=ref(數(shù)列,1)
AND 數(shù)列=10 ,高價(jià)*0.98,'十'),COLORFFFF00;
DRAWTEXT(CURRBARSCOUNT<=CONST(KK) AND 數(shù)列!=ref(數(shù)列,1)
AND 數(shù)列=11 ,高價(jià)*0.98,'十一'),COLORFFFF00;
DRAWTEXT(CURRBARSCOUNT<=CONST(KK) AND 數(shù)列!=ref(數(shù)列,1)
AND 數(shù)列=12 ,高價(jià)*0.98,'十二'),COLORFFFF00;

斜線0:IF(低價(jià)_+CONST(斜率*1.618)*最低<=高價(jià),低價(jià)_+CONST(斜率*1.618)*最低,DRAWNULL);
斜線1:IF(低價(jià)_+CONST(斜率*1.000)*最低<=高價(jià),低價(jià)_+CONST(斜率*1.000)*最低,DRAWNULL);
斜線2:IF(低價(jià)_+CONST(斜率*0.618)*最低<=高價(jià),低價(jià)_+CONST(斜率*0.618)*最低,DRAWNULL);
斜線3:IF(低價(jià)_+CONST(斜率*0.382)*最低<=高價(jià),低價(jià)_+CONST(斜率*0.382)*最低,DRAWNULL);
斜線4:IF(低價(jià)_+CONST(斜率*0.250)*最低<=高價(jià),低價(jià)_+CONST(斜率*0.250)*最低,DRAWNULL);
斜線5:IF(低價(jià)_+CONST(斜率*0.156)*最低<=高價(jià),低價(jià)_+CONST(斜率*0.156)*最低,DRAWNULL);
斜線6:IF(低價(jià)_+CONST(斜率*0.092)*最低<=高價(jià),低價(jià)_+CONST(斜率*0.092)*最低,DRAWNULL);
斜線7:IF(低價(jià)_+CONST(斜率*0.055)*最低<=高價(jià),低價(jià)_+CONST(斜率*0.055)*最低,DRAWNULL);