辛苦老師將文華指標改成博易用,謝謝! [博易POBO]
咨詢內容:
顯示儀表盤1:=1;
//DRAWGBK1(1,RGB(0,0,0),RGB(0,0,0),0,'BJ1',0);
TYP:=(CLOSE+HIGH+LOW)/3;//求最新價,最高價和最低價三者的簡單平均
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
{======================================================}
范圍高A:=REFX1(HHV(H,120),9999)*1.05;
范圍低A:=REFX1(LLV(L,120),9999)*0.95;
MA5:=MA(C,5),COLORCYAN,LINETHICK2;
MA24:=MA(C,24),COLORGREEN,LINETHICK2;
MA72:=MA(C,72),COLORRED,LINETHICK2;
MA200:=IF((MA(C,200)<=范圍高A AND MA(C,200)>=范圍低A) OR C>=MA(C,200),MA(C,200),NULL),COLORBLUE,LINETHICK2;
{=======================儀表盤=========================}
主升浪:=ISLASTBAR AND MA5>MA24 AND MA24>MA72 AND MA72>IF(MA200=NULL,0,MA200);
主浪回調:=ISLASTBAR AND MA24>MA5 AND MA5>MA72 AND MA72>IF(MA200=NULL,0,MA200);
主浪深調:=ISLASTBAR AND MA24>MA72 AND MA72>MA5 AND MA5>IF(MA200=NULL,0,MA200);
初升浪:=ISLASTBAR AND IF(MA200=NULL,300,MA200)>MAX(MA24,MA72) AND MA5>MA24 AND MA24>MA72;
底部反彈:=ISLASTBAR AND IF(MA200=NULL,300,MA200)>MA72 AND MA72>MA24 AND MA5>MA24;
探底階段:=ISLASTBAR AND IF(MA200=NULL,300,MA200)>MA72 AND MA72>MA24 AND MA24>MA5;
觀望:=ISLASTBAR AND IF(MA200=NULL,MA24>MA72 AND C<MA72,MA72>MA200 AND C<MA200);
有牛:=ISLASTBAR AND IF(MA200=NULL,MA24<MA72 AND C>=MA72,MA72<MA200 AND C>=MA200);
放棄:=ISLASTBAR AND IF(MA200=NULL,MA24<MA72 AND C<MA72,MA72<MA200 AND C<MA200);
/*
DRAWGBK(顯示儀表盤1=1 AND 主升浪=0 AND 主浪回調=0 AND 主浪深調=0 AND 初升浪=0 AND 底部反彈=0 AND 探底階段=0 AND 觀望=0 AND 有牛=0 AND 放棄=0,0,0,0,'觀望',0),COLOR00BF00;
DRAWGBK(顯示儀表盤1=1 AND 主升浪,0,0,0,'主升浪',0),COLORFF00FF;
DRAWGBK(顯示儀表盤1=1 AND 主浪回調,0,0,0,'主浪回調',0),COLORFF8080;
DRAWGBK(顯示儀表盤1=1 AND 主浪深調,0,0,0,'主浪深調',0),COLOR009500;
DRAWGBK(顯示儀表盤1=1 AND 初升浪,0,0,0,'初升浪',0),COLOR00FFFF;
DRAWGBK(顯示儀表盤1=1 AND 底部反彈,0,0,0,'底部反彈',0),COLORFFFF00;
DRAWGBK(顯示儀表盤1=1 AND 探底階段,0,0,0,'探底階段',0);
DRAWGBK(顯示儀表盤1=1 AND 觀望,0,0,0,'觀望',0),COLORFFFF00;
DRAWGBK(顯示儀表盤1=1 AND 有牛,0,0,0,'有牛',0),COLOR00FFFF;
DRAWGBK(顯示儀表盤1=1 AND 放棄,0,0,0,'放棄',0),COLOR00BF00;
*/
引差:=REF(C,1)-LOW,LINETHICK1,NODRAW;
引跌幅:IF((REF(C,1)-LOW)/REF(C,1)*100>0,(REF(C,1)-LOW)/REF(C,1)*100,0),LINETHICK1,NODRAW;
三日均跌:MA(引跌幅,3),COLORWHITE,NODRAW;
N:=120;
CURRBARSCOUNT:=REFX1(BARPOS,9999)-BARPOS+1;
K:=BARSLAST(CURRBARSCOUNT=N);
GD:=REFX1(IF(ISLASTBAR=1,HHV(H,K),0),9999),NODRAW;
{高點}
DD:=REFX1(IF(ISLASTBAR=1,LLV(L,K),0),9999),NODRAW;
{低點}
KJ:=GD-DD;
{高低點差值=分區高度}
GD4:=IF(CURRBARSCOUNT<=N/2,GD,NULL);
高區:IF(CURRBARSCOUNT<=N,GD,NULL),COLORRED,LINETHICK2,NODRAW;
低區:IF(CURRBARSCOUNT<=N,DD,NULL),COLOR00FF00,LINETHICK2,NODRAW;
平衡:=IF(CURRBARSCOUNT<=N,DD+KJ/2,NULL),COLOR00FFFF,NODRAW;
低:IF(CURRBARSCOUNT<=N/2,DD,NULL),COLORFFFF00;
高:IF(CURRBARSCOUNT<=N/2,GD,NULL),COLOR00FFFF;
支撐:IF(CURRBARSCOUNT<=N/2,DD+KJ*0.191,NULL),COLOR00FFFF;
強勢: IF(CURRBARSCOUNT<=N/2,DD+KJ*0.382,NULL),COLORFF00FF;
突破:IF(CURRBARSCOUNT<=N/2,DD+KJ/2,NULL),COLOR0000FF;
警示:IF(CURRBARSCOUNT<=N/2,DD+KJ*0.618,NULL),COLOR00FFFF;
壓力:IF(CURRBARSCOUNT<=N/2,DD+KJ*0.809,NULL),COLOR00FF00;
低漲:IF(CURRBARSCOUNT<=N/2,(C/LLV(LOW,K)-1)*100,NULL),COLOR0000FF,NODRAW;
天數:BARSLAST(L=DD),COLORCYAN,NODRAW;
頂點:IF(CURRBARSCOUNT<=N/2, REFX1(IF(ISLASTBAR=1,HHV(H, BARSLAST(CURRBARSCOUNT=60)),1),9999),NULL),COLORRED,CROSSDOT,NODRAW;
低點:IF(CURRBARSCOUNT<=N/2, REFX1(IF(ISLASTBAR=1,LLV(L, BARSLAST(CURRBARSCOUNT=60)),1),9999),NULL),COLORMAGENTA,CROSSDOT,NODRAW;
STICKLINE(CCI>=200 AND H>=頂點,O,C,2,0),COLORBLUE;
STICKLINE(CCI<=100 AND L<=低點,O,C,2,0),COLORYELLOW;
STICKLINE(CURRBARSCOUNT=N/2,GD,DD,0,0),COLOR408080,NODRAW;
STICKLINE(CURRBARSCOUNT<=N/2,支撐,支撐,2,0),COLOR1E1E1E;
STICKLINE(CURRBARSCOUNT<=N/2,強勢,強勢,2,0),COLOR1E1E1E;
STICKLINE(CURRBARSCOUNT<=N/2,突破,突破,2,0),COLOR1E1E1E;
STICKLINE(CURRBARSCOUNT<=N/2,警示,警示,2,0),COLOR1E1E1E;
STICKLINE(CURRBARSCOUNT<=N/2,壓力,壓力,2,0),COLOR1E1E1E;
DRAWTEXT(CURRBARSCOUNT=10,壓力,'壓力-0.809'),COLOR00FFFF,NODRAW;
DRAWTEXT(CURRBARSCOUNT=10,警示,'警示-0.618'),COLOR00FFFF,NODRAW;
DRAWTEXT(CURRBARSCOUNT=10,突破,'突破-0.500'),COLOR00FFFF,NODRAW;
DRAWTEXT(CURRBARSCOUNT=10,強勢,'強勢-0.382'),COLOR00FFFF,NODRAW;
DRAWTEXT(CURRBARSCOUNT=10,支撐,'支撐-0.191'),COLOR00FFFF,NODRAW;
DRAWTEXT(CURRBARSCOUNT=N/4+5,GD-KJ*0.09,'【風險區】--高拋避險'),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=N/4+5,GD-KJ*0.3,'【警示區】--逢高減倉'),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=N/4+5,GD-KJ*0.45,'【突破區】--主力拉升'),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=N/4+5,GD-KJ*0.55,'【拉升區】--強勢畜銳'),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=N/4+5,DD+KJ/3,'【關注區】--逢低買入'),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=N/4+5,DD+KJ/10,'【低吸區】--大膽買入'),COLORFFFFFF;
第一防線:REFX1(低,9999),DOT,COLORYELLOW,NODRAW;
第二防線:REFX1(支撐,9999),DOT,COLORWHITE,NODRAW;
DRAWKLINE1(H,O,L,C);
AHC1:=CLOSE*VOL;
AHC22:=EMA((EMA(AHC1,27)/EMA(VOL,27)+EMA(AHC1,54)/EMA(VOL,54)+EMA(AHC1,108)/EMA(VOL,108)+EMA(AHC1,316)/EMA(VOL,316))/4,34);
上軌:=1.06*AHC22,COLOR40FF00,LINETHICK1;
下軌:=AHC22*0.94;
//DRAWGBK1(1,RGB(0,0,0),RGB(0,0,0),0,'BJ1',0);
TYP:=(CLOSE+HIGH+LOW)/3;//求最新價,最高價和最低價三者的簡單平均
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
{======================================================}
A1:=DATACOUNT-BARPOS-1;
范圍高A:=REFX(HHV(H,120),A1)*1.05;
范圍低A:=REFX(LLV(L,120),A1)*0.95;
MA5:=MA(C,5),COLORCYAN,LINETHICK2;
MA24:=MA(C,24),COLORGREEN,LINETHICK2;
MA72:=MA(C,72),COLORRED,LINETHICK2;
MA200:=IF((MA(C,200)<=范圍高A AND MA(C,200)>=范圍低A) OR C>=MA(C,200),MA(C,200),DRAWNULL),COLORBLUE,LINETHICK2;
{=======================儀表盤=========================}
主升浪:=ISLASTBAR AND MA5>MA24 AND MA24>MA72 AND MA72>IF(MA200=DRAWNULL,0,MA200);
主浪回調:=ISLASTBAR AND MA24>MA5 AND MA5>MA72 AND MA72>IF(MA200=DRAWNULL,0,MA200);
主浪深調:=ISLASTBAR AND MA24>MA72 AND MA72>MA5 AND MA5>IF(MA200=DRAWNULL,0,MA200);
初升浪:=ISLASTBAR AND IF(MA200=DRAWNULL,300,MA200)>MAX(MA24,MA72) AND MA5>MA24 AND MA24>MA72;
底部反彈:=ISLASTBAR AND IF(MA200=DRAWNULL,300,MA200)>MA72 AND MA72>MA24 AND MA5>MA24;
探底階段:=ISLASTBAR AND IF(MA200=DRAWNULL,300,MA200)>MA72 AND MA72>MA24 AND MA24>MA5;
觀望:=ISLASTBAR AND IF(MA200=DRAWNULL,MA24>MA72 AND C<MA72,MA72>MA200 AND C<MA200);
有牛:=ISLASTBAR AND IF(MA200=DRAWNULL,MA24<MA72 AND C>=MA72,MA72<MA200 AND C>=MA200);
放棄:=ISLASTBAR AND IF(MA200=DRAWNULL,MA24<MA72 AND C<MA72,MA72<MA200 AND C<MA200);
引差:=REF(C,1)-LOW,LINETHICK1,NODRAW;
引跌幅:IF((REF(C,1)-LOW)/REF(C,1)*100>0,(REF(C,1)-LOW)/REF(C,1)*100,0),LINETHICK1,NODRAW;
三日均跌:MA(引跌幅,3),COLORWHITE,NODRAW;
N:=120;
CURRBARSCOUNT:=REFX(BARPOS,A1)-BARPOS+1;
K:=BARSLAST(A1=N);
GD:=REFX(IF(ISLASTBAR=1,HHV(H,K),0),A1),NODRAW;
{高點}
DD:=REFX(IF(ISLASTBAR=1,LLV(L,K),0),A1),NODRAW;
{低點}
KJ:=GD-DD;
{高低點差值=分區高度}
GD4:=IF(CURRBARSCOUNT<=N/2,GD,DRAWNULL);
高區:IF(CURRBARSCOUNT<=N,GD,DRAWNULL),COLORRED,LINETHICK2,NODRAW;
低區:IF(CURRBARSCOUNT<=N,DD,DRAWNULL),COLOR00FF00,LINETHICK2,NODRAW;
平衡:=IF(CURRBARSCOUNT<=N,DD+KJ/2,DRAWNULL),COLOR00FFFF,NODRAW;
低:IF(CURRBARSCOUNT<=N/2,DD,DRAWNULL),COLORFFFF00;
高:IF(CURRBARSCOUNT<=N/2,GD,DRAWNULL),COLOR00FFFF;
支撐:IF(CURRBARSCOUNT<=N/2,DD+KJ*0.191,DRAWNULL),COLOR00FFFF;
強勢: IF(CURRBARSCOUNT<=N/2,DD+KJ*0.382,DRAWNULL),COLORFF00FF;
突破:IF(CURRBARSCOUNT<=N/2,DD+KJ/2,DRAWNULL),COLOR0000FF;
警示:IF(CURRBARSCOUNT<=N/2,DD+KJ*0.618,DRAWNULL),COLOR00FFFF;
壓力:IF(CURRBARSCOUNT<=N/2,DD+KJ*0.809,DRAWNULL),COLOR00FF00;
低漲:IF(CURRBARSCOUNT<=N/2,(C/LLV(LOW,K)-1)*100,DRAWNULL),COLOR0000FF,NODRAW;
天數:BARSLAST(L=DD),COLORCYAN,NODRAW;
頂點:IF(CURRBARSCOUNT<=N/2, REFX(IF(ISLASTBAR=1,HHV(H, BARSLAST(CURRBARSCOUNT=60)),1),A1),DRAWNULL),COLORRED,CROSSDOT,NODRAW;
低點:IF(CURRBARSCOUNT<=N/2, REFX(IF(ISLASTBAR=1,LLV(L, BARSLAST(CURRBARSCOUNT=60)),1),A1),DRAWNULL),COLORMAGENTA,CROSSDOT,NODRAW;
STICKLINE(CCI>=200 AND H>=頂點,O,C,2,0),COLORBLUE;
STICKLINE(CCI<=100 AND L<=低點,O,C,2,0),COLORYELLOW;
STICKLINE(CURRBARSCOUNT=N/2,GD,DD,0,0),COLOR408080,NODRAW;
STICKLINE(CURRBARSCOUNT<=N/2,支撐,支撐,2,0),COLOR1E1E1E;
STICKLINE(CURRBARSCOUNT<=N/2,強勢,強勢,2,0),COLOR1E1E1E;
STICKLINE(CURRBARSCOUNT<=N/2,突破,突破,2,0),COLOR1E1E1E;
STICKLINE(CURRBARSCOUNT<=N/2,警示,警示,2,0),COLOR1E1E1E;
STICKLINE(CURRBARSCOUNT<=N/2,壓力,壓力,2,0),COLOR1E1E1E;
DRAWTEXT(CURRBARSCOUNT=10,壓力,'壓力-0.809'),COLOR00FFFF,NODRAW;
DRAWTEXT(CURRBARSCOUNT=10,警示,'警示-0.618'),COLOR00FFFF,NODRAW;
DRAWTEXT(CURRBARSCOUNT=10,突破,'突破-0.500'),COLOR00FFFF,NODRAW;
DRAWTEXT(CURRBARSCOUNT=10,強勢,'強勢-0.382'),COLOR00FFFF,NODRAW;
DRAWTEXT(CURRBARSCOUNT=10,支撐,'支撐-0.191'),COLOR00FFFF,NODRAW;
DRAWTEXT(CURRBARSCOUNT=N/4+5,GD-KJ*0.09,'【風險區】--高拋避險'),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=N/4+5,GD-KJ*0.3,'【警示區】--逢高減倉'),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=N/4+5,GD-KJ*0.45,'【突破區】--主力拉升'),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=N/4+5,GD-KJ*0.55,'【拉升區】--強勢畜銳'),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=N/4+5,DD+KJ/3,'【關注區】--逢低買入'),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=N/4+5,DD+KJ/10,'【低吸區】--大膽買入'),COLORFFFFFF;
第一防線:REFX(低,A1),POINTDOT,COLORYELLOW,NODRAW;
第二防線:REFX(支撐,A1),POINTDOT,COLORWHITE,NODRAW;
DRAWKLINE(H,O,L,C);
AHC1:=CLOSE*VOL;
AHC22:=EMA((EMA(AHC1,27)/EMA(VOL,27)+EMA(AHC1,54)/EMA(VOL,54)+EMA(AHC1,108)/EMA(VOL,108)+EMA(AHC1,316)/EMA(VOL,316))/4,34);
上軌:=1.06*AHC22,COLOR40FF00,LINETHICK1;
下軌:=AHC22*0.94; 這是主圖指標嗎? 來源 程序化久久網
辛苦老師將文華指標改成博易用,謝謝!
顯示儀表盤1:=1;
//DRAWGBK1(1,RGB(0,0,0),RGB(0,0,0),0,'BJ1',0);
TYP:=(CLOSE+HIGH+LOW)/3;//求最新價,最高價和最低價三者的簡單平均
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
{======================================================}
范圍高A:=REFX1(HHV(H,120),9999)*1.05;
范圍低A:=REFX1(LLV(L,120),9999)*0.95;
MA5:=MA(C,5),COLORCYAN,LINETHICK2;
MA24:=MA(C,24),COLORGREEN,LINETHICK2;
MA72:=MA(C,72),COLORRED,LINETHICK2;
MA200:=IF((MA(C,200)<=范圍高A AND MA(C,200)>=范圍低A) OR C>=MA(C,200),MA(C,200),NULL),COLORBLUE,LINETHICK2;
{=======================儀表盤=========================}
主升浪:=ISLASTBAR AND MA5>MA24 AND MA24>MA72 AND MA72>IF(MA200=NULL,0,MA200);
主浪回調:=ISLASTBAR AND MA24>MA5 AND MA5>MA72 AND MA72>IF(MA200=NULL,0,MA200);
主浪深調:=ISLASTBAR AND MA24>MA72 AND MA72>MA5 AND MA5>IF(MA200=NULL,0,MA200);
初升浪:=ISLASTBAR AND IF(MA200=NULL,300,MA200)>MAX(MA24,MA72) AND MA5>MA24 AND MA24>MA72;
底部反彈:=ISLASTBAR AND IF(MA200=NULL,300,MA200)>MA72 AND MA72>MA24 AND MA5>MA24;
探底階段:=ISLASTBAR AND IF(MA200=NULL,300,MA200)>MA72 AND MA72>MA24 AND MA24>MA5;
觀望:=ISLASTBAR AND IF(MA200=NULL,MA24>MA72 AND C<MA72,MA72>MA200 AND C<MA200);
有牛:=ISLASTBAR AND IF(MA200=NULL,MA24<MA72 AND C>=MA72,MA72<MA200 AND C>=MA200);
放棄:=ISLASTBAR AND IF(MA200=NULL,MA24<MA72 AND C<MA72,MA72<MA200 AND C<MA200);
/*
DRAWGBK(顯示儀表盤1=1 AND 主升浪=0 AND 主浪回調=0 AND 主浪深調=0 AND 初升浪=0 AND 底部反彈=0 AND 探底階段=0 AND 觀望=0 AND 有牛=0 AND 放棄=0,0,0,0,'觀望',0),COLOR00BF00;
DRAWGBK(顯示儀表盤1=1 AND 主升浪,0,0,0,'主升浪',0),COLORFF00FF;
DRAWGBK(顯示儀表盤1=1 AND 主浪回調,0,0,0,'主浪回調',0),COLORFF8080;
DRAWGBK(顯示儀表盤1=1 AND 主浪深調,0,0,0,'主浪深調',0),COLOR009500;
DRAWGBK(顯示儀表盤1=1 AND 初升浪,0,0,0,'初升浪',0),COLOR00FFFF;
DRAWGBK(顯示儀表盤1=1 AND 底部反彈,0,0,0,'底部反彈',0),COLORFFFF00;
DRAWGBK(顯示儀表盤1=1 AND 探底階段,0,0,0,'探底階段',0);
DRAWGBK(顯示儀表盤1=1 AND 觀望,0,0,0,'觀望',0),COLORFFFF00;
DRAWGBK(顯示儀表盤1=1 AND 有牛,0,0,0,'有牛',0),COLOR00FFFF;
DRAWGBK(顯示儀表盤1=1 AND 放棄,0,0,0,'放棄',0),COLOR00BF00;
*/
引差:=REF(C,1)-LOW,LINETHICK1,NODRAW;
引跌幅:IF((REF(C,1)-LOW)/REF(C,1)*100>0,(REF(C,1)-LOW)/REF(C,1)*100,0),LINETHICK1,NODRAW;
三日均跌:MA(引跌幅,3),COLORWHITE,NODRAW;
N:=120;
CURRBARSCOUNT:=REFX1(BARPOS,9999)-BARPOS+1;
K:=BARSLAST(CURRBARSCOUNT=N);
GD:=REFX1(IF(ISLASTBAR=1,HHV(H,K),0),9999),NODRAW;
{高點}
DD:=REFX1(IF(ISLASTBAR=1,LLV(L,K),0),9999),NODRAW;
{低點}
KJ:=GD-DD;
{高低點差值=分區高度}
GD4:=IF(CURRBARSCOUNT<=N/2,GD,NULL);
高區:IF(CURRBARSCOUNT<=N,GD,NULL),COLORRED,LINETHICK2,NODRAW;
低區:IF(CURRBARSCOUNT<=N,DD,NULL),COLOR00FF00,LINETHICK2,NODRAW;
平衡:=IF(CURRBARSCOUNT<=N,DD+KJ/2,NULL),COLOR00FFFF,NODRAW;
低:IF(CURRBARSCOUNT<=N/2,DD,NULL),COLORFFFF00;
高:IF(CURRBARSCOUNT<=N/2,GD,NULL),COLOR00FFFF;
支撐:IF(CURRBARSCOUNT<=N/2,DD+KJ*0.191,NULL),COLOR00FFFF;
強勢: IF(CURRBARSCOUNT<=N/2,DD+KJ*0.382,NULL),COLORFF00FF;
突破:IF(CURRBARSCOUNT<=N/2,DD+KJ/2,NULL),COLOR0000FF;
警示:IF(CURRBARSCOUNT<=N/2,DD+KJ*0.618,NULL),COLOR00FFFF;
壓力:IF(CURRBARSCOUNT<=N/2,DD+KJ*0.809,NULL),COLOR00FF00;
低漲:IF(CURRBARSCOUNT<=N/2,(C/LLV(LOW,K)-1)*100,NULL),COLOR0000FF,NODRAW;
天數:BARSLAST(L=DD),COLORCYAN,NODRAW;
頂點:IF(CURRBARSCOUNT<=N/2, REFX1(IF(ISLASTBAR=1,HHV(H, BARSLAST(CURRBARSCOUNT=60)),1),9999),NULL),COLORRED,CROSSDOT,NODRAW;
低點:IF(CURRBARSCOUNT<=N/2, REFX1(IF(ISLASTBAR=1,LLV(L, BARSLAST(CURRBARSCOUNT=60)),1),9999),NULL),COLORMAGENTA,CROSSDOT,NODRAW;
STICKLINE(CCI>=200 AND H>=頂點,O,C,2,0),COLORBLUE;
STICKLINE(CCI<=100 AND L<=低點,O,C,2,0),COLORYELLOW;
STICKLINE(CURRBARSCOUNT=N/2,GD,DD,0,0),COLOR408080,NODRAW;
STICKLINE(CURRBARSCOUNT<=N/2,支撐,支撐,2,0),COLOR1E1E1E;
STICKLINE(CURRBARSCOUNT<=N/2,強勢,強勢,2,0),COLOR1E1E1E;
STICKLINE(CURRBARSCOUNT<=N/2,突破,突破,2,0),COLOR1E1E1E;
STICKLINE(CURRBARSCOUNT<=N/2,警示,警示,2,0),COLOR1E1E1E;
STICKLINE(CURRBARSCOUNT<=N/2,壓力,壓力,2,0),COLOR1E1E1E;
DRAWTEXT(CURRBARSCOUNT=10,壓力,'壓力-0.809'),COLOR00FFFF,NODRAW;
DRAWTEXT(CURRBARSCOUNT=10,警示,'警示-0.618'),COLOR00FFFF,NODRAW;
DRAWTEXT(CURRBARSCOUNT=10,突破,'突破-0.500'),COLOR00FFFF,NODRAW;
DRAWTEXT(CURRBARSCOUNT=10,強勢,'強勢-0.382'),COLOR00FFFF,NODRAW;
DRAWTEXT(CURRBARSCOUNT=10,支撐,'支撐-0.191'),COLOR00FFFF,NODRAW;
DRAWTEXT(CURRBARSCOUNT=N/4+5,GD-KJ*0.09,'【風險區】--高拋避險'),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=N/4+5,GD-KJ*0.3,'【警示區】--逢高減倉'),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=N/4+5,GD-KJ*0.45,'【突破區】--主力拉升'),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=N/4+5,GD-KJ*0.55,'【拉升區】--強勢畜銳'),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=N/4+5,DD+KJ/3,'【關注區】--逢低買入'),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=N/4+5,DD+KJ/10,'【低吸區】--大膽買入'),COLORFFFFFF;
第一防線:REFX1(低,9999),DOT,COLORYELLOW,NODRAW;
第二防線:REFX1(支撐,9999),DOT,COLORWHITE,NODRAW;
DRAWKLINE1(H,O,L,C);
AHC1:=CLOSE*VOL;
AHC22:=EMA((EMA(AHC1,27)/EMA(VOL,27)+EMA(AHC1,54)/EMA(VOL,54)+EMA(AHC1,108)/EMA(VOL,108)+EMA(AHC1,316)/EMA(VOL,316))/4,34);
上軌:=1.06*AHC22,COLOR40FF00,LINETHICK1;
下軌:=AHC22*0.94;
?
?來源:程序化99網( m.kzuj.com.cn )
博易技術人員: 顯示儀表盤1:=1;//DRAWGBK1(1,RGB(0,0,0),RGB(0,0,0),0,'BJ1',0);
TYP:=(CLOSE+HIGH+LOW)/3;//求最新價,最高價和最低價三者的簡單平均
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
{======================================================}
A1:=DATACOUNT-BARPOS-1;
范圍高A:=REFX(HHV(H,120),A1)*1.05;
范圍低A:=REFX(LLV(L,120),A1)*0.95;
MA5:=MA(C,5),COLORCYAN,LINETHICK2;
MA24:=MA(C,24),COLORGREEN,LINETHICK2;
MA72:=MA(C,72),COLORRED,LINETHICK2;
MA200:=IF((MA(C,200)<=范圍高A AND MA(C,200)>=范圍低A) OR C>=MA(C,200),MA(C,200),DRAWNULL),COLORBLUE,LINETHICK2;
{=======================儀表盤=========================}
主升浪:=ISLASTBAR AND MA5>MA24 AND MA24>MA72 AND MA72>IF(MA200=DRAWNULL,0,MA200);
主浪回調:=ISLASTBAR AND MA24>MA5 AND MA5>MA72 AND MA72>IF(MA200=DRAWNULL,0,MA200);
主浪深調:=ISLASTBAR AND MA24>MA72 AND MA72>MA5 AND MA5>IF(MA200=DRAWNULL,0,MA200);
初升浪:=ISLASTBAR AND IF(MA200=DRAWNULL,300,MA200)>MAX(MA24,MA72) AND MA5>MA24 AND MA24>MA72;
底部反彈:=ISLASTBAR AND IF(MA200=DRAWNULL,300,MA200)>MA72 AND MA72>MA24 AND MA5>MA24;
探底階段:=ISLASTBAR AND IF(MA200=DRAWNULL,300,MA200)>MA72 AND MA72>MA24 AND MA24>MA5;
觀望:=ISLASTBAR AND IF(MA200=DRAWNULL,MA24>MA72 AND C<MA72,MA72>MA200 AND C<MA200);
有牛:=ISLASTBAR AND IF(MA200=DRAWNULL,MA24<MA72 AND C>=MA72,MA72<MA200 AND C>=MA200);
放棄:=ISLASTBAR AND IF(MA200=DRAWNULL,MA24<MA72 AND C<MA72,MA72<MA200 AND C<MA200);
引差:=REF(C,1)-LOW,LINETHICK1,NODRAW;
引跌幅:IF((REF(C,1)-LOW)/REF(C,1)*100>0,(REF(C,1)-LOW)/REF(C,1)*100,0),LINETHICK1,NODRAW;
三日均跌:MA(引跌幅,3),COLORWHITE,NODRAW;
N:=120;
CURRBARSCOUNT:=REFX(BARPOS,A1)-BARPOS+1;
K:=BARSLAST(A1=N);
GD:=REFX(IF(ISLASTBAR=1,HHV(H,K),0),A1),NODRAW;
{高點}
DD:=REFX(IF(ISLASTBAR=1,LLV(L,K),0),A1),NODRAW;
{低點}
KJ:=GD-DD;
{高低點差值=分區高度}
GD4:=IF(CURRBARSCOUNT<=N/2,GD,DRAWNULL);
高區:IF(CURRBARSCOUNT<=N,GD,DRAWNULL),COLORRED,LINETHICK2,NODRAW;
低區:IF(CURRBARSCOUNT<=N,DD,DRAWNULL),COLOR00FF00,LINETHICK2,NODRAW;
平衡:=IF(CURRBARSCOUNT<=N,DD+KJ/2,DRAWNULL),COLOR00FFFF,NODRAW;
低:IF(CURRBARSCOUNT<=N/2,DD,DRAWNULL),COLORFFFF00;
高:IF(CURRBARSCOUNT<=N/2,GD,DRAWNULL),COLOR00FFFF;
支撐:IF(CURRBARSCOUNT<=N/2,DD+KJ*0.191,DRAWNULL),COLOR00FFFF;
強勢: IF(CURRBARSCOUNT<=N/2,DD+KJ*0.382,DRAWNULL),COLORFF00FF;
突破:IF(CURRBARSCOUNT<=N/2,DD+KJ/2,DRAWNULL),COLOR0000FF;
警示:IF(CURRBARSCOUNT<=N/2,DD+KJ*0.618,DRAWNULL),COLOR00FFFF;
壓力:IF(CURRBARSCOUNT<=N/2,DD+KJ*0.809,DRAWNULL),COLOR00FF00;
低漲:IF(CURRBARSCOUNT<=N/2,(C/LLV(LOW,K)-1)*100,DRAWNULL),COLOR0000FF,NODRAW;
天數:BARSLAST(L=DD),COLORCYAN,NODRAW;
頂點:IF(CURRBARSCOUNT<=N/2, REFX(IF(ISLASTBAR=1,HHV(H, BARSLAST(CURRBARSCOUNT=60)),1),A1),DRAWNULL),COLORRED,CROSSDOT,NODRAW;
低點:IF(CURRBARSCOUNT<=N/2, REFX(IF(ISLASTBAR=1,LLV(L, BARSLAST(CURRBARSCOUNT=60)),1),A1),DRAWNULL),COLORMAGENTA,CROSSDOT,NODRAW;
STICKLINE(CCI>=200 AND H>=頂點,O,C,2,0),COLORBLUE;
STICKLINE(CCI<=100 AND L<=低點,O,C,2,0),COLORYELLOW;
STICKLINE(CURRBARSCOUNT=N/2,GD,DD,0,0),COLOR408080,NODRAW;
STICKLINE(CURRBARSCOUNT<=N/2,支撐,支撐,2,0),COLOR1E1E1E;
STICKLINE(CURRBARSCOUNT<=N/2,強勢,強勢,2,0),COLOR1E1E1E;
STICKLINE(CURRBARSCOUNT<=N/2,突破,突破,2,0),COLOR1E1E1E;
STICKLINE(CURRBARSCOUNT<=N/2,警示,警示,2,0),COLOR1E1E1E;
STICKLINE(CURRBARSCOUNT<=N/2,壓力,壓力,2,0),COLOR1E1E1E;
DRAWTEXT(CURRBARSCOUNT=10,壓力,'壓力-0.809'),COLOR00FFFF,NODRAW;
DRAWTEXT(CURRBARSCOUNT=10,警示,'警示-0.618'),COLOR00FFFF,NODRAW;
DRAWTEXT(CURRBARSCOUNT=10,突破,'突破-0.500'),COLOR00FFFF,NODRAW;
DRAWTEXT(CURRBARSCOUNT=10,強勢,'強勢-0.382'),COLOR00FFFF,NODRAW;
DRAWTEXT(CURRBARSCOUNT=10,支撐,'支撐-0.191'),COLOR00FFFF,NODRAW;
DRAWTEXT(CURRBARSCOUNT=N/4+5,GD-KJ*0.09,'【風險區】--高拋避險'),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=N/4+5,GD-KJ*0.3,'【警示區】--逢高減倉'),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=N/4+5,GD-KJ*0.45,'【突破區】--主力拉升'),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=N/4+5,GD-KJ*0.55,'【拉升區】--強勢畜銳'),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=N/4+5,DD+KJ/3,'【關注區】--逢低買入'),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=N/4+5,DD+KJ/10,'【低吸區】--大膽買入'),COLORFFFFFF;
第一防線:REFX(低,A1),POINTDOT,COLORYELLOW,NODRAW;
第二防線:REFX(支撐,A1),POINTDOT,COLORWHITE,NODRAW;
DRAWKLINE(H,O,L,C);
AHC1:=CLOSE*VOL;
AHC22:=EMA((EMA(AHC1,27)/EMA(VOL,27)+EMA(AHC1,54)/EMA(VOL,54)+EMA(AHC1,108)/EMA(VOL,108)+EMA(AHC1,316)/EMA(VOL,316))/4,34);
上軌:=1.06*AHC22,COLOR40FF00,LINETHICK1;
下軌:=AHC22*0.94; 這是主圖指標嗎? 來源 程序化久久網
有思路,想編寫各種指標公式,交易模型,選股公式,還原公式的朋友
可聯系技術人員 QQ: 262069696 或微信號:cxh99cxh99 進行 有償收費 編寫!
(注:由于人數限制,QQ或微信請選擇方便的一個聯系我們就行,加好友時請簡單備注下您的需求,否則無法通過。謝謝您!)
相關文章
-
沒有相關內容