打印本文
關閉窗口
相關標簽:
?
自上次“股龍之水”老師發了一個《金龍喜舞》精華分時指標公式，許多使用飛狐軟件的朋友不能使用，感覺比較可惜，近幾天我單位提前放假，相對有一些時間，幫大家改了一下，并結合我自己常用的分時主圖，做了一個完整的飛狐分時指標公式，權當新春禮物送給大家，祝大家新春快樂，萬事順意！同時，在此感謝“股龍之水”老師的指標創意！！！
{公式名稱——自定}
{分時布林}
tt:=BARSCOUNT(C);
zz:=SUM(AMOUNT,tt)/SUM(VOL*100,tt);
zz1:=BETWEEN(C/zz,1.05,0.95);
均線:=IF(zz1=0,MA(C,TT),zz);
上軌:均線 + AVEDEV(C,tt)*2,Color0000FF;
下軌:均線 - AVEDEV(C,tt)*2,Color00FF00;
{開盤后前45分鐘高點提示}
k1:=HHV(C,0);
t1:=BARSLAST(OPENMINUTES(TIME)<=45);
高點線:REF(k1,t1),LINEDOT,ColorCACA00;
DRAWICON(OPENMINUTES(TIME)>45 and CROSS(CLOSE,高點線+0.001),高點線,4);
DRAWTEXTEX(1,1,20,20,'分時布林上軌線價咯:'+NUMTOSTR(上軌,2)+'元'),Color0000FF;
DRAWTEXTEX(1,1,20,90,'分時布林下軌線價咯:'+NUMTOSTR(下軌,2)+'元'),Color00FF00;
DRAWTEXTEX(1,1,20,160,'開盤45分鐘高點價咯:'+NUMTOSTR(高點線,2)+'元'),ColorCACA00;
{坐標設置計算共用數據}
rc:=DYNAINFO( 3);
q:=DATACOUNT;
hh:=DYNAINFO(5);
LL:=DYNAINFO(6);
f:=MAX(hh-rc,rc-LL);
ff:=f/rc*100;
{對應大盤線}
q1h:=IF(ff<1,0.9898*rc,rc-f*1.02);
q1l:=IF(ff<1,0.9798*rc,rc-2*f*1.016);
R:=INDEXC;
Rh:=hhv(r,0);
RL:=LLv(r,0);
Rb:=(q1h-q1l)/(RH[q]-RL[q]);
Ry:=(q1h+q1l-rb*(RH[q]+RL[q]))/2;
大盤線:r*rb+ry,Colorcc99ff;
DRAWTEXT(ISLASTBAR,大盤線,'大盤線'),COLORWHITE;
{金龍喜舞}
q2h:=IF(ff<1,0.9797*rc,rc-2*f*1.016);
q2l:=IF(ff<1,0.9697*rc,rc-3*f*1.011);
q2h,color0000cc,LINETHICK2;
FILLRGN(1,q2h,q2l),COLORBLACK;
a1:=(EMA(CLOSE,10)+EMA(CLOSE,32))/2;
mh:=HHV(a1,0);
mL:=LLV(a1,0);
mb:=(q2h-q2l)/(mH[q]-mL[q]);
my:=(q2h+q2l-mb*(mH[q]+mL[q]))/2;
QZS:=a1*mb+my;
CXH1:=(EMA(CLOSE,30)+EMA(CLOSE,72))/2*mb+my;
CXH1_60:=EMA((EMA(CLOSE,30)+EMA(CLOSE,72))/2,60)*mb+my;
CXH2:=(EMA(VOL,10)+EMA(VOL,32))/2*mb+my;
CXH3:=(CXH1+CXH2)/2;
CXH4:=EMA(CXH3,30);
CXH5:=EMA(CXH3,60);
CXH6:=EVERY(CXH1>REF(CXH1,1),5) AND EVERY(CXH4>REF(CXH4,1),5);
FILLRGN(CXH1>CXH1_60,CXH1,CXH1_60),coloraa;
FILLRGN(CXH1<CXH1_60,CXH1,CXH1_60),Color008000;
牽引線:CXH1,COLORYELLOW;
趨勢關注:=IF(CROSS(CXH1,CXH1_60) AND CXH6,1,0);
量價關注:=IF(CROSS(CXH3,CXH5) AND CXH6,1,0);
沖擊量:=IF(CXH3>CXH5 AND CXH6,1,0);
STICKLINE(QZS>CXH1,QZS,CXH1,2,0),COLORFF00FF;
STICKLINE(沖擊量=1,QZS,CXH1,2,0),COLORYELLOW;
DRAWICON(趨勢關注=1 ,CXH1_60,1);
DRAWTEXT(量價關注=1 ,CXH1_60,'L0V'),COLORWHITE;
?
公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】
?