招財貓K線回顧主圖指標公式源碼[通達信公式]

相關標簽:

{招財貓}

?

?

原理解析：
N賦值:2 OK賦值:開盤價的60日指數移動平均 CG賦值:收盤價的60日指數移動平均 PDU賦值:如果OK>1日前的OKANDCG>1日前的CG,返回1,否則返回0 Z1賦值:收盤價的13日簡單移動平均 ZX賦值:13/2+1日前的Z1 LIFE賦值:(收盤價的60日指數移動平均+收盤價的90日指數移動平均)/2 VAR1賦值:(2*收盤價+最高價+最低價)/4 SNOOK賦值:VAR1的99日指數移動平均*0.91 A1賦值:(收盤價-1日前的收盤價)/1日前的收盤價*100 MA5賦值:上次A1>3距今天數 MA20賦值:如果MA5>0,返回1,否則返回0 當滿足條件收盤價>ZXANDC>=LIFE時,在開盤價和收盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR0000FF 當滿足條件收盤價>ZXANDC<=SNOOK時,在開盤價和收盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR00FF00 當滿足條件收盤價>ZXANDC>SNOOKANDC<LIFE時,在開盤價和收盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLORFF0000 當滿足條件收盤價>ZXANDMA20=0時,在開盤價和收盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR00FFFF 當滿足條件收盤價>ZX時,在開盤價和收盤價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLORFFFFFF 當滿足條件收盤價上穿ZX時,在最低價*0.99位置畫1號圖標 當滿足條件ZX上穿收盤價時,在最高價*1.01位置畫5號圖標 BY20賦值:收盤價的5日簡單移動平均 招財貓賦值:收盤價的20日簡單移動平均,線寬為2,COLOR00FFFF 鼠變異賦值:如果BY20>招財貓,返回招財貓,否則返回BY20,線寬為2,COLOR808080 選股賦值:收盤價上穿ZX AND 收盤價>ZX AND MA20=0 ,線寬為0 RB賦值:收盤價的有效數據周期數=是否最后一個周期 RD賦值:上次RB距今天數 K2賦值:50日內最高價的最高值 K1賦值:50日內最低價的最低值 T1賦值:收盤價>ZX AND 收盤價>=LIFE T2賦值:收盤價>ZX AND 收盤價>SNOOK AND 收盤價<LIFE T3賦值:收盤價>ZX AND 收盤價<=SNOOK T4賦值:收盤價<=ZX T5賦值:鼠變異>1日前的鼠變異 AND 鼠變異不等于招財貓 T6賦值:鼠變異>1日前的鼠變異 AND 鼠變異=招財貓 AND PDU不等于1 T7賦值:鼠變異>1日前的鼠變異 AND 鼠變異=招財貓 AND PDU=1 T8賦值:收盤價>ZX AND MA20=0 EEE賦值:T1+T2+T3+T4+T5+T6+T7+T8 E賦值:(K2-K1)/(EEE+8) 當滿足條件收盤價>0ANDT1>0ANDISLASTBAR時,在K2-E位置書寫文字,COLOR0000FF 當滿足條件收盤價>0ANDT2>0ANDISLASTBAR時,在K2-E位置書寫文字,COLORFF7700 當滿足條件收盤價>0ANDT3>0ANDISLASTBAR時,在K2-E位置書寫文字,COLOR00FF00 當滿足條件收盤價>0ANDT4>0ANDISLASTBAR時,在K2-E位置書寫文字,COLOR808080 當滿足條件收盤價>0ANDT5>0ANDISLASTBAR時,在K2-E*2位置書寫文字,COLOR00FF00 當滿足條件收盤價>0ANDT6>0ANDISLASTBAR時,在K2-E*2位置書寫文字,COLORFF66FF 當滿足條件收盤價>0ANDT7>0ANDISLASTBAR時,在K2-E*2位置書寫文字,COLOR0000FF 輸出開:N-1日前的開盤價NODRAW 輸出收:N-1日前的收盤價NODRAW,畫黃色 輸出高:N-1日前的最高價NODRAW,畫白色 輸出低:N-1日前的最低價NODRAW,畫黃色 K線 當滿足條件收陽線時,在橫軸0.01縱軸0.9位置書寫文字,畫紅色 當滿足條件收陽線時,在橫軸1縱軸1位置書寫文字,畫紅色

?

?來源:程序化99（ www.tumamayizhan.com ）

源碼：

?

?

N:=2;
OK:=EMA(O,60);
CG:=EMA(C,60);
PDU:=IF(OK>REF(OK,1) AND CG>REF(CG,1),1,0);
Z1:=MA(C,13);
ZX:=REF(Z1,13/2+1);
LIFE:=(EMA(C,60)+EMA(C,90))/2;
VAR1:=(2*C+H+L)/4;
SNOOK:=EMA(VAR1,99)*0.91;
A1:=(C-REF(C,1))/REF(C,1)*100;
MA5:=BARSLAST(A1>3);
MA20:=IF(MA5>0,1,0);
STICKLINE(C>ZX AND C>=LIFE,O,C,3,0),COLOR0000FF;
STICKLINE(C>ZX AND C<=SNOOK,O,C,3,0),COLOR00FF00;
STICKLINE(C>ZX AND C>SNOOK AND C<LIFE,O,C,3,0),COLORFF0000;
STICKLINE(C>ZX AND MA20=0,O,C,3,0),COLOR00FFFF;
STICKLINE(C>ZX,O,C,1,0),COLORFFFFFF;
DRAWICON(CROSS(C,ZX),L*0.99,1);
DRAWICON(CROSS(ZX,C),H*1.01,5);
BY20:=MA(C,5);
招財貓:=MA(C,20),LINETHICK2,COLOR00FFFF;
鼠變異:=IF(BY20>招財貓,招財貓,BY20),LINETHICK2,COLOR808080;
選股:=CROSS(C,ZX) AND C>ZX AND MA20=0 ,LINETHICK0;
RB:=BARSCOUNT(C)=ISLASTBAR;
RD:=BARSLAST(RB);
K2:=HHV(H,50);
K1:=LLV(L,50);
T1:=C>ZX AND C>=LIFE;
T2:=C>ZX AND C>SNOOK AND C<LIFE;
T3:=C>ZX AND C<=SNOOK;
T4:=C<=ZX;
T5:=鼠變異>REF(鼠變異,1) AND 鼠變異!=招財貓 ;
T6:=鼠變異>REF(鼠變異,1) AND 鼠變異=招財貓 AND PDU!=1;
T7:=鼠變異>REF(鼠變異,1) AND 鼠變異=招財貓 AND PDU=1;
T8:=C>ZX AND MA20=0 ;
EEE:=T1+T2+T3+T4+T5+T6+T7+T8 ;
E:=(K2-K1)/(EEE+8) ;
DRAWTEXT(C>0 AND T1>0 AND ISLASTBAR,K2-E,'出洞了逮住它！'),COLOR0000FF;
DRAWTEXT(C>0 AND T2>0 AND ISLASTBAR,K2-E,'鼠玩貓守著它！，'),COLORFF7700;
DRAWTEXT(C>0 AND T3>0 AND ISLASTBAR,K2-E,'露尾巴動作快！，'),COLOR00FF00;
DRAWTEXT(C>0 AND T4>0 AND ISLASTBAR,K2-E,'沒有了打個盹！，'),COLOR808080;
DRAWTEXT(C>0 AND T5>0 AND ISLASTBAR,K2-E*2,'發現鼠跡！'),COLOR00FF00;
DRAWTEXT(C>0 AND T6>0 AND ISLASTBAR,K2-E*2,'瞬間鼠影！'),COLORFF66FF;
DRAWTEXT(C>0 AND T7>0 AND ISLASTBAR,K2-E*2,'惡鼠難遁！'),COLOR0000FF;
{K線回顧副圖}
開:REF(OPEN,N-1)NODRAW;
收:REF(CLOSE,N-1)NODRAW,COLORYELLOW;
高:REF(HIGH,N-1)NODRAW,COLORWHITE;
低:REF(LOW,N-1)NODRAW,COLORYELLOW;
DRAWKLINE(高,開,低,收);DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.tumamayizhan.com '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

?

?

公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】

?