相關標簽:

?

?

?

?

原理解析：
TS賦值:1,300,130 N賦值:1,100,99 MT賦值:1,100,3 M1賦值:1,250,5 M2賦值:1,250,7 M3賦值:1,250,21 M4賦值:1,250,12 M5賦值:1,250,50 DA1賦值:如果TS>總的周期數,返回總的周期數,否則返回TS DA賦值:如果到最后交易的周期>DA1,返回0,否則返回DA1 HI賦值:日期日DA日內最高價的最高值 LO賦值:日期日DA日內最低價的最低值 C1賦值:如果到最后交易的周期<=DA,返回收盤價,否則返回無效數 GZ賦值:HI/LO的自然對數/10的指數 LH1賦值:如果C1>=(HI/GZ),返回成交量(手),否則返回0的DA日累和 LH2賦值:如果C1>=(HI/GZ的2乘冪)ANDC1<(HI/GZ),返回成交量(手),否則返回0的DA日累和 LH3賦值:如果C1>=(HI/GZ的3乘冪)ANDC1<(HI/GZ的2乘冪),返回成交量(手),否則返回0的DA日累和 LH4賦值:如果C1>=(HI/GZ的4乘冪)ANDC1<(HI/GZ的3乘冪),返回成交量(手),否則返回0的DA日累和 LH5賦值:如果C1>=(HI/GZ的5乘冪)ANDC1<(HI/GZ的4乘冪),返回成交量(手),否則返回0的DA日累和 LH6賦值:如果C1>=(HI/GZ的6乘冪)ANDC1<(HI/GZ的5乘冪),返回成交量(手),否則返回0的DA日累和 LH7賦值:如果C1>=(HI/GZ的7乘冪)ANDC1<(HI/GZ的6乘冪),返回成交量(手),否則返回0的DA日累和 LH8賦值:如果C1>=(HI/GZ的8乘冪)ANDC1<(HI/GZ的7乘冪),返回成交量(手),否則返回0的DA日累和 LH9賦值:如果C1>=(LO*GZ)ANDC1<LO*GZ的2乘冪,返回成交量(手),否則返回0的DA日累和 LH10賦值:如果C1>=LOANDC1<LO*GZ,返回成交量(手),否則返回0的DA日累和 L1賦值:日期日DA日內LH1的最高值,線寬為0 L2賦值:日期日DA日內LH2的最高值,線寬為0 L3賦值:日期日DA日內LH3的最高值,線寬為0 L4賦值:日期日DA日內LH4的最高值 L5賦值:日期日DA日內LH5的最高值 L6賦值:日期日DA日內LH6的最高值 L7賦值:日期日DA日內LH7的最高值 L8賦值:日期日DA日內LH8的最高值 L9賦值:日期日DA日內LH9的最高值 L10賦值:日期日DA日內LH10的最高值 SS賦值:(L1+L2+L3+L4+L5+L6+L7+L8+L9+L10) 當滿足條件DA*L1/SS的向上舍入*3>=到最后交易的周期時,在HI*N/100和(HI/GZ)位置之間畫柱狀線,寬度為1,1不為0則畫空心柱.COLOR656566,線寬為1 當滿足條件DA*L2/SS的向上舍入*3>=到最后交易的周期時,在HI/GZ的1乘冪*N/100和HI/GZ的2乘冪位置之間畫柱狀線,寬度為1,1不為0則畫空心柱.COLOR656566,線寬為1 當滿足條件DA*L3/SS的向上舍入*3>=到最后交易的周期時,在HI/GZ的2乘冪*N/100和HI/GZ的3乘冪位置之間畫柱狀線,寬度為1,1不為0則畫空心柱.COLOR656566,線寬為1 當滿足條件DA*L4/SS的向上舍入*3>=到最后交易的周期時,在HI/GZ的3乘冪*N/100和HI/GZ的4乘冪位置之間畫柱狀線,寬度為1,1不為0則畫空心柱.COLOR656566,線寬為1 當滿足條件DA*L5/SS的向上舍入*3>=到最后交易的周期時,在HI/GZ的4乘冪*N/100和HI/GZ的5乘冪位置之間畫柱狀線,寬度為1,1不為0則畫空心柱.COLOR656566,線寬為1 當滿足條件DA*L6/SS的向上舍入*3>=到最后交易的周期時,在HI/GZ的5乘冪*N/100和HI/GZ的6乘冪位置之間畫柱狀線,寬度為1,1不為0則畫空心柱.COLOR656566,線寬為1 當滿足條件DA*L7/SS的向上舍入*3>=到最后交易的周期時,在HI/GZ的6乘冪*N/100和HI/GZ的7乘冪位置之間畫柱狀線,寬度為1,1不為0則畫空心柱.COLOR656566,線寬為1 當滿足條件DA*L8/SS的向上舍入*3>=到最后交易的周期時,在LO*GZ的2乘冪和LO*GZ的3乘冪*N/100位置之間畫柱狀線,寬度為1,1不為0則畫空心柱.COLOR656566,線寬為1 當滿足條件DA*L9/SS的向上舍入*3>=到最后交易的周期時,在LO*GZ的1乘冪和LO*GZ的2乘冪*N/100位置之間畫柱狀線,寬度為1,1不為0則畫空心柱.COLOR656566,線寬為1 當滿足條件DA*L10/SS的向上舍入*3>=到最后交易的周期時,在LO和LO*GZ的1乘冪*N/100位置之間畫柱狀線,寬度為1,1不為0則畫空心柱.COLOR656566,線寬為1 K線 JJ賦值:(收盤價+最高價+最低價)/3 當滿足條件(收盤價5%的之字轉向>1日前的收盤價5%的之字轉向)AND(1日前的收盤價5%的之字轉向<=2日前的收盤價5%的之字轉向)AND(2日前的收盤價5%的之字轉向<=3日前的收盤價5%的之字轉向)時,在最低價*0.98位置畫7號圖標 當滿足條件(收盤價5%的之字轉向<1日前的收盤價5%的之字轉向)AND(1日前的收盤價5%的之字轉向>=2日前的收盤價5%的之字轉向)AND(2日前的收盤價5%的之字轉向>=3日前的收盤價5%的之字轉向)時,在最高價*1.02位置畫8號圖標 VAR1賦值:收盤價10%的之字轉向<1日前的收盤價10%的之字轉向 AND 1日前的收盤價10%的之字轉向>2日前的收盤價10%的之字轉向 VAR2賦值:收盤價10%的之字轉向>1日前的收盤價10%的之字轉向 AND 1日前的收盤價10%的之字轉向<2日前的收盤價10%的之字轉向 當滿足條件VAR1時,在收盤價和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,畫黃色,線寬為2 當滿足條件VAR1時,在收盤價和開盤價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,畫黃色,線寬為2 當滿足條件VAR1時,在最高價和最低價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,畫黃色,線寬為2 當滿足條件VAR2時,在收盤價和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLORFF0FF0,線寬為2 當滿足條件VAR2時,在收盤價和開盤價位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLORFF0FF0,線寬為2 當滿足條件VAR2時,在最高價和最低價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLORFF0FF0,線寬為2 當滿足條件(1日前的最高價+1日前的最低價)/2上穿收盤價的20日簡單移動平均+2*收盤價的20日估算標準差時,在最高價*1.06位置書寫文字,畫黃色 輸出EXP7:收盤價的M2日指數移動平均,畫白色,線寬為1 輸出EXP21:收盤價的M3日指數移動平均,畫白色,線寬為1 輸出EXP12:收盤價的M4日指數移動平均,畫紅色,線寬為1 輸出EXP50:收盤價的M5日指數移動平均,畫紅色,線寬為1 輸出MA5:收盤價的M1日簡單移動平均COLORDBDB70,線寬為2 輸出今日保護價:(2日前的收盤價+1日前的收盤價+開盤價)/3 ,COLORCC3299,NODRAW 輸出高區(qū):如果到最后交易的周期<=60,返回如果是否最后一個周期=1,返回上次到最后交易的周期=60距今天數日內最高價的最高值,否則返回1的最后一日取值設為常數,否則返回無效數,畫紅色,DOTLINE 輸出低區(qū):如果到最后交易的周期<=60,返回如果是否最后一個周期=1,返回上次到最后交易的周期=60距今天數日內最低價的最低值,否則返回1的最后一日取值設為常數,否則返回無效數,畫洋紅色,DOTLINE 當滿足條件CCI>=200ANDH>=高區(qū)時,在開盤價和收盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,畫藍色 當滿足條件CCI<=100ANDL<=低區(qū)時,在開盤價和收盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,畫黃色

?

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

源碼：

?

?

{TS=130,N=99,M=3}
TS:=1,300,130;
N:=1,100,99;
MT:=1,100,3;
M1:=1,250,5;
M2:=1,250,7;
M3:=1,250,21;
M4:=1,250,12;
M5:=1,250,50;
DA1:=IF(TS>TOTALBARSCOUNT,TOTALBARSCOUNT,TS);
DA:=IF(CURRBARSCOUNT>DA1,0,DA1);
HI:=REFDATE(HHV(H,DA),DATE);
LO:=REFDATE(LLV(L,DA),DATE);
C1:=IF(CURRBARSCOUNT<=DA,C,DRAWNULL);
GZ:=EXP(LN(HI/LO)/10);
LH1:=SUM(IF(C1>=(HI/GZ),V,0),DA);
LH2:=SUM(IF(C1>=(HI/POW(GZ,2)) AND C1<(HI/GZ),V,0),DA);
LH3:=SUM(IF(C1>=(HI/POW(GZ,3)) AND C1<(HI/POW(GZ,2)),V,0),DA);
LH4:=SUM(IF(C1>=(HI/POW(GZ,4)) AND C1<(HI/POW(GZ,3)),V,0),DA);
LH5:=SUM(IF(C1>=(HI/POW(GZ,5)) AND C1<(HI/POW(GZ,4)),V,0),DA);
LH6:=SUM(IF(C1>=(HI/POW(GZ,6)) AND C1<(HI/POW(GZ,5)),V,0),DA);
LH7:=SUM(IF(C1>=(HI/POW(GZ,7)) AND C1<(HI/POW(GZ,6)),V,0),DA);
LH8:=SUM(IF(C1>=(HI/POW(GZ,8)) AND C1<(HI/POW(GZ,7)),V,0),DA);
LH9:=SUM(IF(C1>=(LO*GZ) AND C1<LO*POW(GZ,2),V,0),DA);
LH10:=SUM(IF(C1>=LO AND C1<LO*GZ,V,0),DA);
L1:=REFDATE(HHV(LH1,DA),DATE),LINETHICK0;
L2:=REFDATE(HHV(LH2,DA),DATE),LINETHICK0;
L3:=REFDATE(HHV(LH3,DA),DATE),LINETHICK0;
L4:=REFDATE(HHV(LH4,DA),DATE);
L5:=REFDATE(HHV(LH5,DA),DATE);
L6:=REFDATE(HHV(LH6,DA),DATE);
L7:=REFDATE(HHV(LH7,DA),DATE);
L8:=REFDATE(HHV(LH8,DA),DATE);
L9:=REFDATE(HHV(LH9,DA),DATE);
L10:=REFDATE(HHV(LH10,DA),DATE);
SS:=(L1+L2+L3+L4+L5+L6+L7+L8+L9+L10);
STICKLINE(CEILING(DA*L1/SS)*3>=CURRBARSCOUNT,HI*N/100,(HI/GZ),1,1)COLOR656566,LINETHICK1;
STICKLINE(CEILING(DA*L2/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,1)*N/100,HI/POW(GZ,2),1,1)COLOR656566,LINETHICK1;
STICKLINE(CEILING(DA*L3/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,2)*N/100,HI/POW(GZ,3),1,1)COLOR656566,LINETHICK1;
STICKLINE(CEILING(DA*L4/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,3)*N/100,HI/POW(GZ,4),1,1)COLOR656566,LINETHICK1;
STICKLINE(CEILING(DA*L5/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,4)*N/100,HI/POW(GZ,5),1,1)COLOR656566,LINETHICK1;
STICKLINE(CEILING(DA*L6/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,5)*N/100,HI/POW(GZ,6),1,1)COLOR656566,LINETHICK1;
STICKLINE(CEILING(DA*L7/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,6)*N/100,HI/POW(GZ,7),1,1)COLOR656566,LINETHICK1;
STICKLINE(CEILING(DA*L8/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,2),LO*POW(GZ,3)*N/100,1,1)COLOR656566,LINETHICK1;
STICKLINE(CEILING(DA*L9/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,1),LO*POW(GZ,2)*N/100,1,1)COLOR656566,LINETHICK1;
STICKLINE(CEILING(DA*L10/SS)*3>=CURRBARSCOUNT,LO,LO*POW(GZ,1)*N/100,1,1)COLOR656566,LINETHICK1;
DRAWKLINE(H,O,L,C);JJ:=(CLOSE+HIGH+LOW)/3;{BS標志}
DRAWICON((ZIG(3,5)>REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)<=REF(ZIG(3,5),2))
AND (REF(ZIG(3,5),2)<=REF(ZIG(3,5),3)),LOW*0.98,7);
DRAWICON((ZIG(3,5)<REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)>=REF(ZIG(3,5),2))
AND (REF(ZIG(3,5),2)>=REF(ZIG(3,5),3)),HIGH*1.02,8);
VAR1:=ZIG(3,10)<REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)>REF(ZIG(3,10),2);
VAR2:=ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)<REF(ZIG(3,10),2);
STICKLINE(VAR1,C,O,3,0),COLORYELLOW,LINETHICK2;
STICKLINE(VAR1,C,O,1,0),COLORYELLOW,LINETHICK2;
STICKLINE(VAR1,H,L,0,0),COLORYELLOW,LINETHICK2;
STICKLINE(VAR2,C,O,3,0),COLORFF0FF0,LINETHICK2;
STICKLINE(VAR2,C,O,2,0),COLORFF0FF0,LINETHICK2;
STICKLINE(VAR2,H,L,1,0),COLORFF0FF0,LINETHICK2;
DRAWTEXT(CROSS((REF(HIGH,1)+REF(LOW,1))/2,MA(CLOSE,20)+2*STD(CLOSE,20)),HIGH*1.06,'-落袋為安'),COLORYELLOW;EXP7:EXPMA(CLOSE,M2),COLORWHITE,LINETHICK1;
EXP21:EXPMA(CLOSE,M3),COLORWHITE,LINETHICK1;EXP12:EXPMA(CLOSE,M4),COLORRED,LINETHICK1;EXP50:EXPMA(CLOSE,M5),COLORRED,LINETHICK1;
MA5:MA(CLOSE,M1)COLORDBDB70,LINETHICK2;今日保護價:(REF(C,2)+REF(C,1)+O)/3 ,COLORCC3299,NODRAW;
高區(qū):IF(CURRBARSCOUNT<=60, CONST(IF(ISLASTBAR=1,HHV(H, BARSLAST(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORRED,DOTLINE;
低區(qū):IF(CURRBARSCOUNT<=60, CONST(IF(ISLASTBAR=1,LLV(L, BARSLAST(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORMAGENTA,DOTLINE;
STICKLINE(CCI>=200 AND H>=高區(qū),O,C,3,0),COLORBLUE;
STICKLINE(CCI<=100 AND L<=低區(qū),O,C,3,0),COLORYELLOW;{程序化交易 www.kzuj.com.cn }
{程序化交易 www.kzuj.com.cn }

?

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

?