命運羅盤主圖指標公式源碼[通達信公式]
相關標簽:
?
命運羅盤主圖公式 源碼
?
?
原理解析：
?
?來源:程序化99（ www.tumamayizhan.com ）
源碼：
?
?
顯示儀表盤1:=0,1,1;DRAWGBK(1,RGB(0,0,0),RGB(0,0,0),0,'BJ1',0);{======================================================}
范圍高A:=REFDATE(HHV(H,120),DATE)*1.05;
范圍低A:=REFDATE(LLV(L,120),DATE)*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);
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;
K:=BARSLAST(CURRBARSCOUNT=N);
GD:=CONST(IF(ISLASTBAR=1,HHV(H,K),0)),NODRAW;{高點}
DD:=CONST(IF(ISLASTBAR=1,LLV(L,K),0)),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, CONST(IF(ISLASTBAR=1,HHV(H, BARSLAST(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORRED,CROSSDOT,NODRAW;
低點:IF(CURRBARSCOUNT<=N/2, CONST(IF(ISLASTBAR=1,LLV(L, BARSLAST(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORMAGENTA,CROSSDOT,NODRAW;
STICKLINE(CCI>=200 AND H>=頂點,O,C,2,0),COLORBLUE;
STICKLINE(CCI<=100 AND L<=低點,O,C,2,0),COLORYELLOW;DRAWBAND(高區,RGB(0,0,0),平衡,RGB(0,0,0));
DRAWBAND(平衡,RGB(0,0,0),低區,RGB(0,0,0));
DRAWBAND(高,RGB(120,100,0),壓力,RGB(0,0,0));
DRAWBAND(壓力,RGB(258,58,0),警示,RGB(0,0,0));
DRAWBAND(警示,RGB(128,58,0),突破,RGB(0,0,0));
DRAWBAND(突破,RGB(68,0,0),強勢,RGB(0,0,0));
DRAWBAND(強勢,RGB(38,0,0),支撐,RGB(0,0,0));
DRAWBAND(支撐,RGB(38,38,38),低,RGB(0,0,0));
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;第一防線:REFDATE(低,DATE),DOTLINE,COLORYELLOW,NODRAW;
第二防線:REFDATE(支撐,DATE),DOTLINE,COLORWHITE,NODRAW;
{今日保護價:(REF(C,2)+REF(C,1)+O)/3 ,COLORCC3299;}
DRAWKLINE(H,O,L,C);
AHC1:=CLOSE*VOL;
AHC22:=EMA((EXPMA(AHC1,27)/EXPMA(VOL,27)+EXPMA(AHC1,54)/EXPMA(VOL,54)+EXPMA(AHC1,108)/EXPMA(VOL,108)+EXPMA(AHC1,316)/EXPMA(VOL,316))/4,34);
上軌:=1.06*AHC22,COLOR40FF00,LINETHICK1;
下軌:=AHC22*0.94;
{STICKLINE(上軌>下軌,上軌,下軌,5,0),COLOR555555;}
ZT:=REF(C,1)*1.1-C<0.01 AND H=C;
啟爆:=CROSS(C,上軌) OR CROSS(C,下軌) AND ZT;
DRAWTEXT(啟爆,L,'啟爆'),COLORCYAN;
STICKLINE(啟爆,C,O,3,1),COLORWHITE;
STICKLINE(啟爆,C,O,1,0),COLORGREEN;
STICKLINE(C>=O ,HIGH,LOW,0,1 ),COLORRED;
STICKLINE(C>=O ,OPEN,CLOSE,3.1,0 ),COLOR000033;
STICKLINE(C>=O,OPEN,CLOSE,2.7,0 ),COLOR000066;
STICKLINE(C>=O ,OPEN,CLOSE,2.1,0 ),COLOR000099;
STICKLINE(C>=O ,OPEN,CLOSE,1.5,0 ),COLOR0000CC;
STICKLINE(C>=O ,OPEN,CLOSE,0.9,0 ),COLOR0000FF;
STICKLINE(C>=O ,OPEN,CLOSE,0.3,0 ),COLORCC66FF;
STICKLINE(C<O ,HIGH,LOW,0,1 ),COLORCYAN;
STICKLINE(C<O ,OPEN,CLOSE,3.1,0 ),COLOR990000;
STICKLINE(CLOSE<O ,OPEN,CLOSE,2.7,0 ),COLORCC0000;
STICKLINE(CLOSE<O ,OPEN,CLOSE,2.1,0 ),COLORFF4400;
STICKLINE(CLOSE<O ,OPEN,CLOSE,1.5,0 ),COLORFF8800;
STICKLINE(CLOSE<O ,OPEN,CLOSE,0.9,0 ),COLORFFCC00;
STICKLINE(CLOSE<O ,OPEN,CLOSE,0.3,0 ),COLORCYAN;
CC:IF(CURRBARSCOUNT<18,CONST(REF(C,1)),DRAWNULL),COLOR000000,NODRAW;
止贏:1.05*CC,COLORMAGENTA,LINETHICK1;
DRAWTEXT(ISLASTBAR,止贏,'止贏'),LINETHICK1;
止損:0.97*CC,COLORYELLOW,LINETHICK1;
DRAWTEXT(ISLASTBAR,止損,'止損'),LINETHICK1;
DRAWNUMBER(ISLASTBAR ,C,C),COLORWHITE;
AAA:=CONST(HHV(H,50));PL5:=HHV(H,45);
F:=100*(C-REF(C,1))/REF(C,1);
博爾:=IF(C<REF(O,1) AND F<0,1,0);
P1:=博爾;
量化:=IF(C<REF(O,2) AND F<0,1,0);
P2:=量化;
STICKLINE(P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1,OPEN,CLOSE,3,0),COLOR0055FF;
操作30日均線:EMA(C,30),COLORYELLOW,LINETHICK4;
紅升:IF(操作30日均線>REF(操作30日均線,1),操作30日均線,DRAWNULL),COLORRED,LINETHICK4;
綠降:IF(操作30日均線<REF(操作30日均線,1),操作30日均線,DRAWNULL),COLOR009300,LINETHICK4;
趨勢55日線:EMA(C,55),COLORYELLOW,LINETHICK1,NODRAW;
紅升4:IF(趨勢55日線>REF(趨勢55日線,1),趨勢55日線,DRAWNULL),COLOR0080FF,LINETHICK1;
綠降4:IF(趨勢55日線<REF(趨勢55日線,1),趨勢55日線,DRAWNULL),COLORFFFF00,DOTLINE,LINETHICK1;年線:EMA(C,250),COLORYELLOW,LINETHICK1,NODRAW;
年紅升:IF(年線>REF(年線,1),年線,DRAWNULL),COLOR8000FF,LINETHICK1;
年綠降:IF(年線<REF(年線,1),年線,DRAWNULL),COLORFFFF00,DOTLINE,LINETHICK1;DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.tumamayizhan.com '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;
?
?
公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】
?
有思路，想編寫各種指標公式，程序化交易模型，選股公式，預警公式的朋友
可聯系技術人員 QQ: 511411198 進行 有償 編寫！（不貴！點擊查看價格！）
相關文章
-
沒有相關內容
會員登錄/注冊