相關標簽:飛狐主圖最新指標源碼 、 自動畫線主圖公式源碼 、 自動畫線指標公式源碼 、 飛狐指標公式分時主圖 、 飛狐缺口主圖指標公式 、 自動畫線主圖指標公式 、 boll主圖指標公式源碼 、 macd主圖指標源碼公式 、 主圖買賣指標公式源碼 、 白金主圖指標公式源碼 、 三角形畫線主圖源碼 、 倍量畫線主圖指標公式 、 超宏主圖指標公式源碼 、 飛狐自動畫線指標 、 通達信畫線主圖指標 、

?

原理解析：
填充背景 KLINE(開盤價,最高價,最低價,收盤價,0) 輸出INPUT:N(10,1,88) V1賦值:是否最后一個周期 V2賦值:N日前的最高價=2*N+1日內最高價的最高值 V3賦值:V2的N日過濾 V4賦值:若V3則將最近N+1周期置為1 V5賦值:V4的N日過濾 V6賦值:V5 OR V1 V7賦值:N日前的最低價=2*N+1日內最低價的最低值 V8賦值:V7的N日過濾 V9賦值:若V8則將最近N+1周期置為1 VA賦值:V9的N日過濾 VB賦值:VA AND 取反 VC賦值:若V6則將最近1日前的上次VB距今天數+1周期置為1 VD賦值:VC>1日前的VC VE賦值:若VD則將最近2周期置為1 VF賦值:VE>1日前的VE V10賦值:若VFANDCOUNT(V6,1日前的上次VB距今天數+2)=0則將最近1日前的上次VB距今天數+2周期置為1 V11賦值:V10>1日前的V10 V12賦值:若V11ANDCOUNT(V6,1日前的上次VB距今天數+2)=0則將最近1日前的上次VB距今天數+2周期置為1 V13賦值:V12>1日前的V12 V14賦值:如果V6,返回統計1日前的上次V6距今天數+1日中滿足VB的天數,否則返回0 V15賦值:如果V14=1ANDV6,返回上次VF距今天數,否則返回0 V16賦值:如果V6ANDREF(最低價,上次VF距今天數)>=上次V11距今天數日前的最低價,返回上次V11距今天數,否則返回上次VF距今天數 V17賦值:如果V14=2ANDV6,返回V16,否則返回0 V18賦值:如果V14>=3ANDV6,返回如果V6ANDREF(最低價,V16)>=上次V13距今天數日前的最低價,返回上次V13距今天數,否則返回V16,否則返回0 V19賦值:V15+V17+V18 V1A賦值:若V6則將最近V19周期置為1 V1B賦值:V1A>1日前的V1A V1C賦值:若V1B則將最近2周期置為1 V1D賦值:V1C>1日前的V1C V1E賦值:V1D OR V1 V1F賦值:若V1E則將最近1日前的上次V6距今天數+1周期置為1 V20賦值:V1F>1日前的V1F V21賦值:若V20則將最近2周期置為1 V22賦值:V21>1日前的V21 V23賦值:若V22ANDCOUNT(V1E,1日前的上次V6距今天數+2)=0則將最近1日前的上次V6距今天數+2周期置為1 V24賦值:V23>1日前的V23 V25賦值:若V24ANDCOUNT(V1E,1日前的上次V6距今天數+2)=0則將最近1日前的上次V6距今天數+2周期置為1 V26賦值:V25>1日前的V25 V27賦值:如果V1E,返回統計1日前的上次V1E距今天數+1日中滿足V5的天數,否則返回0 V28賦值:如果V27=1ANDV1E,返回上次V22距今天數,否則返回0 V29賦值:如果V1EANDREF(最高價,上次V22距今天數)<=上次V24距今天數日前的最高價,返回上次V24距今天數,否則返回上次V22距今天數 V2A賦值:如果V27=2ANDV1E,返回V29,否則返回0 V2B賦值:如果V27>=3ANDV1E,返回如果V1EANDREF(最高價,V29)<=上次V26距今天數日前的最高價,返回上次V26距今天數,否則返回V29,否則返回0 V2C賦值:V28+V2A+V2B V2D賦值:若V1E則將最近V2C周期置為1 V2E賦值:V2D>1日前的V2D V2F賦值:若V2E則將最近2周期置為1 V30賦值:V2F>1日前的V2F 當滿足條件V1D時,在最低價位置畫直線起點，當滿足條件V30時,在最高價位置畫直線終點,0表示是否延長.,線寬為4,畫紅色 當滿足條件V30時,在最高價位置畫直線起點，當滿足條件V1D時,在最低價位置畫直線終點,0表示是否延長.,線寬為4,畫綠色 當滿足條件1日前的V1D時,在1日前的最低價位置畫直線起點，當滿足條件V1D時,在最低價位置畫直線終點,0表示是否延長.,線寬為2,,畫藍色 當滿足條件1日前的V30時,在1日前的最高價位置畫直線起點，當滿足條件V30時,在最高價位置畫直線終點,0表示是否延長.,線寬為2,,畫藍色

?

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

源碼：

?

DRAWGBK(c>0 , COLORRgb(0,0,0), COLORRGB(0,0,1),1);
KLINE(O,H,L,C,0);
input:N(10,1,88);
V1:=ISLASTBAR;
V2:=REF(HIGH,N)=HHV(HIGH,2*N+1);
V3:=FILTER(V2,N);
V4:=BACKSET(V3,N+1);
V5:=FILTER(V4,N);
V6:=V5 OR V1;
V7:=REF(LOW,N)=LLV(LOW,2*N+1);
V8:=FILTER(V7,N);
V9:=BACKSET(V8,N+1);
VA:=FILTER(V9,N);
VB:=VA AND NOT(V5);
VC:=BACKSET(V6,REF(BARSLAST(VB),1)+1);
VD:=VC>REF(VC,1);
VE:=BACKSET(VD,2);
VF:=VE>REF(VE,1);
V10:=BACKSET(VF AND COUNT(V6,REF(BARSLAST(VB),1)+2)=0,REF(BARSLAST(VB),1)+2);
V11:=V10>REF(V10,1);
V12:=BACKSET(V11 AND COUNT(V6,REF(BARSLAST(VB),1)+2)=0,REF(BARSLAST(VB),1)+2);
V13:=V12>REF(V12,1);
V14:=IF(V6,COUNT(VB,REF(BARSLAST(V6),1)+1),0);
V15:=IF(V14=1 AND V6,BARSLAST(VF),0);
V16:=IF(V6 AND REF(LOW,BARSLAST(VF))>=REF(LOW,BARSLAST(V11)),BARSLAST(V11),BARSLAST(VF));
V17:=IF(V14=2 AND V6,V16,0);
V18:=IF(V14>=3 AND V6,IF(V6 AND REF(LOW,V16)>=REF(LOW,BARSLAST(V13)),BARSLAST(V13),V16),0);
V19:=V15+V17+V18;
V1A:=BACKSET(V6,V19);
V1B:=V1A>REF(V1A,1);
V1C:=BACKSET(V1B,2);
V1D:=V1C>REF(V1C,1);
V1E:=V1D OR V1;
V1F:=BACKSET(V1E,REF(BARSLAST(V6),1)+1);
V20:=V1F>REF(V1F,1);
V21:=BACKSET(V20,2);
V22:=V21>REF(V21,1);
V23:=BACKSET(V22 AND COUNT(V1E,REF(BARSLAST(V6),1)+2)=0,REF(BARSLAST(V6),1)+2);
V24:=V23>REF(V23,1);
V25:=BACKSET(V24 AND COUNT(V1E,REF(BARSLAST(V6),1)+2)=0,REF(BARSLAST(V6),1)+2);
V26:=V25>REF(V25,1);
V27:=IF(V1E,COUNT(V5,REF(BARSLAST(V1E),1)+1),0);
V28:=IF(V27=1 AND V1E,BARSLAST(V22),0);
V29:=IF(V1E AND REF(HIGH,BARSLAST(V22))<=REF(HIGH,BARSLAST(V24)),BARSLAST(V24),BARSLAST(V22));
V2A:=IF(V27=2 AND V1E,V29,0);
V2B:=IF(V27>=3 AND V1E,IF(V1E AND REF(HIGH,V29)<=REF(HIGH,BARSLAST(V26)),BARSLAST(V26),V29),0);
V2C:=V28+V2A+V2B;
V2D:=BACKSET(V1E,V2C);
V2E:=V2D>REF(V2D,1);
V2F:=BACKSET(V2E,2);
V30:=V2F>REF(V2F,1);
DRAWLINE(V1D,LOW,V30,HIGH,0),linethick4,colorred;
DRAWLINE(V30,HIGH,V1D,LOW,0),linethick4,colorgreen;
DRAWLINE(REF(V1D,1),REF(L,1),V1D,L,0),LINETHICK2,,COLORBLUE;
DRAWLINE(REF(V30,1),REF(H,1),V30,H,0),LINETHICK2,,COLORBLUE;
V31:=BACKSET(V1,BARSLAST(V1D)+1);
V32:=V31>REF(V31,1);
V33:=BACKSET(V1,BARSLAST(V30)+1);
V34:=V33>REF(V33,1);
V35:=IF(BARSLAST(V32)<BARSLAST(V34),V32,V34);
V36:=IF(BARSLAST(V32)<BARSLAST(V34),LOW,HIGH);
DRAWLINE(V35,V36,V1,CLOSE,0),linethick2;
V37:=BACKSET(V1,BARSLAST(V1D)+1);
V38:=V37>REF(V37,1);
V39:=BACKSET(V38,REF(BARSLAST(V1D),1)+2);
V3A:=V39>REF(V39,1);
DRAWLINE(V3A,LOW,V38,LOW,1),linethick2;
V3B:=BACKSET(V1,BARSLAST(V30)+1);
V3C:=V3B>REF(V3B,1);
V3D:=BACKSET(V3C,REF(BARSLAST(V30),1)+2);
V3E:=V3D>REF(V3D,1);
DRAWLINE(V3E,HIGH,V3C,HIGH,1),linethick2;
前一低: REF(LOW,BARSLAST(V38)),colorccff99,LINEDOT,linethick2;
前一高: REF(HIGH,BARSLAST(V3C)),colorccff99,linethick2;
前二低: REF(LOW,BARSLAST(V3A)),colormagenta,LINEDOT,linethick2;
前二高: REF(HIGH,BARSLAST(V3E)),colormagenta,linethick2;{程序化交易 www.kzuj.com.cn }

?

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

?