相關標簽:籌碼分布主圖公式源碼 、 籌碼分布指標公式源碼 、 主力籌碼指標公式源碼 、 籌碼度數指標公式源碼 、 籌碼峰主圖指標公式 、 籌碼主突破圖指標公式 、 現貨主圖指標公式源碼 、 彩色籌碼主圖源碼 、 主升副圖指標公式源碼 、 通達信籌碼主圖指標 、 籌碼集中度指標源碼 、 籌碼分布主圖指標 、 籌碼鎖定指標源碼 、 通達信籌碼指標源碼 、 籌碼指標源碼薈萃 、

?

籌碼分析主圖源碼用于長周期更好自動源碼

?

原理解析：
A0賦值:收盤價的有效數據周期數 A3賦值:SYSPARAM(3) A2賦值:SYSPARAM(2) A4賦值:SYSPARAM(4) A5賦值:SYSPARAM(5) NN0賦值:A3-A2 NN賦值:A0-A2 HH1賦值:(A4-A5)/10 Y0賦值:A0>=A2 VV0賦值:如果Y0=1ANDSYSPARAM(1)>=A0,返回成交量(手),否則返回0 C1賦值:如果收盤價位于A4-0*HH1和A4-1*HH1之間,返回VV0,否則返回0 C2賦值:如果收盤價位于A4-1*HH1和A4-2*HH1之間,返回VV0,否則返回0 C3賦值:如果收盤價位于A4-2*HH1和A4-3*HH1之間,返回VV0,否則返回0 C4賦值:如果收盤價位于A4-3*HH1和A4-4*HH1之間,返回VV0,否則返回0 C5賦值:如果收盤價位于A4-4*HH1和A4-5*HH1之間,返回VV0,否則返回0 C6賦值:如果收盤價位于A4-5*HH1和A4-6*HH1之間,返回VV0,否則返回0 C7賦值:如果收盤價位于A4-6*HH1和A4-7*HH1之間,返回VV0,否則返回0 C8賦值:如果收盤價位于A4-7*HH1和A4-8*HH1之間,返回VV0,否則返回0 C9賦值:如果收盤價位于A4-8*HH1和A4-9*HH1之間,返回VV0,否則返回0 C10賦值:如果收盤價位于A4-9*HH1和A4-10*HH1之間,返回VV0,否則返回0 V1賦值:STRTONUM(NUMTOSTR(如果是否最后一個周期,返回C1的NN0日累和,否則返回0,2)) V2賦值:STRTONUM(NUMTOSTR(如果是否最后一個周期,返回C2的NN0日累和,否則返回0,2)) V3賦值:STRTONUM(NUMTOSTR(如果是否最后一個周期,返回C3的NN0日累和,否則返回0,2)) V4賦值:STRTONUM(NUMTOSTR(如果是否最后一個周期,返回C4的NN0日累和,否則返回0,2)) V5賦值:STRTONUM(NUMTOSTR(如果是否最后一個周期,返回C5的NN0日累和,否則返回0,2)) V6賦值:STRTONUM(NUMTOSTR(如果是否最后一個周期,返回C6的NN0日累和,否則返回0,2)) V7賦值:STRTONUM(NUMTOSTR(如果是否最后一個周期,返回C7的NN0日累和,否則返回0,2)) V8賦值:STRTONUM(NUMTOSTR(如果是否最后一個周期,返回C8的NN0日累和,否則返回0,2)) V9賦值:STRTONUM(NUMTOSTR(如果是否最后一個周期,返回C9的NN0日累和,否則返回0,2)) V10賦值:STRTONUM(NUMTOSTR(如果是否最后一個周期,返回C10的NN0日累和,否則返回0,2)) AV0賦值:V1和V2和V3和V4和V5和V6和V7和V8和V9和V10的較大值的較大值的較大值的較大值的較大值的較大值的較大值的較大值的較大值 FILLRGN(V1/AV0>=NN/NN0 AND NN>=0,A4-0*HH1,A4-1*HH1+1.5),畫洋紅色 FILLRGN(V2/AV0>=NN/NN0 AND NN>=0,A4-1*HH1,A4-2*HH1+1.5),畫洋紅色 FILLRGN(V3/AV0>=NN/NN0 AND NN>=0,A4-2*HH1,A4-3*HH1+1.5),畫洋紅色 FILLRGN(V4/AV0>=NN/NN0 AND NN>=0,A4-3*HH1,A4-4*HH1+1.5),畫洋紅色 FILLRGN(V5/AV0>=NN/NN0 AND NN>=0,A4-4*HH1,A4-5*HH1+1.5),畫洋紅色 FILLRGN(V6/AV0>=NN/NN0 AND NN>=0,A4-5*HH1,A4-6*HH1+1.5),畫洋紅色 FILLRGN(V7/AV0>=NN/NN0 AND NN>=0,A4-6*HH1,A4-7*HH1+1.5),畫洋紅色 FILLRGN(V8/AV0>=NN/NN0 AND NN>=0,A4-7*HH1,A4-8*HH1+1.5),畫洋紅色 FILLRGN(V9/AV0>=NN/NN0 AND NN>=0,A4-8*HH1,A4-9*HH1+1.5),畫洋紅色 FILLRGN(V10/AV0>=NN/NN0 AND NN>=0,A4-9*HH1,A4-10*HH1+1.5),畫洋紅色

?

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

源碼：

?

a0:=BARSCOUNT(c);a3:=SYSPARAM(3);a2:=SYSPARAM(2);
a4:=SYSPARAM(4);a5:=SYSPARAM(5);
nn0:=a3-a2;nn:=a0-a2;hh1:=(a4-a5)/10;
y0:=a0>=a2;vv0:=if(y0=1 and SYSPARAM(1)>=a0,v,0);
c1:=if(BETWEEN(c,a4-0*hh1,a4-1*hh1),vv0,0);
c2:=if(BETWEEN(c,a4-1*hh1,a4-2*hh1),vv0,0);
c3:=if(BETWEEN(c,a4-2*hh1,a4-3*hh1),vv0,0);
c4:=if(BETWEEN(c,a4-3*hh1,a4-4*hh1),vv0,0);
c5:=if(BETWEEN(c,a4-4*hh1,a4-5*hh1),vv0,0);
c6:=if(BETWEEN(c,a4-5*hh1,a4-6*hh1),vv0,0);
c7:=if(BETWEEN(c,a4-6*hh1,a4-7*hh1),vv0,0);
c8:=if(BETWEEN(c,a4-7*hh1,a4-8*hh1),vv0,0);
c9:=if(BETWEEN(c,a4-8*hh1,a4-9*hh1),vv0,0);
c10:=if(BETWEEN(c,a4-9*hh1,a4-10*hh1),vv0,0);
v1:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c1,nn0),0),2));
v2:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c2,nn0),0),2));
v3:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c3,nn0),0),2));
v4:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c4,nn0),0),2));
v5:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c5,nn0),0),2));
v6:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c6,nn0),0),2));
v7:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c7,nn0),0),2));
v8:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c8,nn0),0),2));
v9:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c9,nn0),0),2));
v10:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c10,nn0),0),2));
av0:=max(v1,max(v2,max(v3,max(v4,max(v5,max(v6,max(v7,max(v8,max(v9,v10)))))))));
FILLRGN(v1/av0>=nn/nn0 and nn>=0,a4-0*hh1,a4-1*hh1+1.5),colormagenta;
FILLRGN(v2/av0>=nn/nn0 and nn>=0,a4-1*hh1,a4-2*hh1+1.5),colormagenta;
FILLRGN(v3/av0>=nn/nn0 and nn>=0,a4-2*hh1,a4-3*hh1+1.5),colormagenta;
FILLRGN(v4/av0>=nn/nn0 and nn>=0,a4-3*hh1,a4-4*hh1+1.5),colormagenta;
FILLRGN(v5/av0>=nn/nn0 and nn>=0,a4-4*hh1,a4-5*hh1+1.5),colormagenta;
FILLRGN(v6/av0>=nn/nn0 and nn>=0,a4-5*hh1,a4-6*hh1+1.5),colormagenta;
FILLRGN(v7/av0>=nn/nn0 and nn>=0,a4-6*hh1,a4-7*hh1+1.5),colormagenta;
FILLRGN(v8/av0>=nn/nn0 and nn>=0,a4-7*hh1,a4-8*hh1+1.5),colormagenta;
FILLRGN(v9/av0>=nn/nn0 and nn>=0,a4-8*hh1,a4-9*hh1+1.5),colormagenta;
FILLRGN(v10/av0>=nn/nn0 and nn>=0,a4-9*hh1,a4-10*hh1+1.5),colormagenta;{程序化交易 www.kzuj.com.cn }

?

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

?