相關標簽:通達信凱恩斯雙線主圖 、 雙線合一主圖指標公式 、 雙線抓主升指標公式 、 雙線至勝指標公式圖 、 通達信雙線指標公式 、 雙線選股指標公式 、 通達信主圖指標公式 、 金鉆指標公式主圖 、 黃金柱主圖指標公式 、 強弱主圖指標公式 、 區間主圖指標公式 、 波段主圖指標公式 、 macd主圖指標公式 、 最好的主圖指標公式 、 sar主圖指標公式 、

?

凱恩斯雙線主圖源碼

?

原理解析：
A1賦值:日期 <= 13181231 輸出七天線:收盤價的7日簡單移動平均,畫深灰色 輸出工作線:(收盤價的14日指數移動平均) * A1,POINTDOT,線寬為4,畫黃色 輸出生命線:(收盤價的25日簡單移動平均) * A1,線寬為2,畫洋紅色 輸出不惑線:(收盤價的40日簡單移動平均) * A1,畫青色 輸出姊妹線:(收盤價的56日指數移動平均) * A1,CIRCLEDOT,畫白色 輸出長線啟動點:(收盤價的99日簡單移動平均) * A1,線寬為1,COLOR0099FF 輸出賣線:收盤價的21日線性回歸斜率*21+收盤價的42日指數移動平均,畫紅色,線寬為2 A2賦值:"CPZB@CP" 當滿足條件(A2>=8)時,在最高價和最低價位置之間畫柱狀線,寬度為0.8,1不為0則畫空心柱.,畫綠色 當滿足條件((A2>=8)AND(收陽線))時,在開盤價和收盤價位置之間畫柱狀線,寬度為8,1不為0則畫空心柱.,畫綠色 當滿足條件((A2>=8)AND(收陰線))時,在收盤價和開盤價位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,畫綠色 當滿足條件((A2>0)AND(A2<=2))時,在最高價和最低價位置之間畫柱狀線,寬度為0.8,1不為0則畫空心柱.,畫紅色 當滿足條件(((A2>0)AND(A2<=2))AND(收陽線))時,在開盤價和收盤價位置之間畫柱狀線,寬度為8,1不為0則畫空心柱.,畫紅色 當滿足條件(((A2>0)AND(A2<=2))AND(收陰線))時,在收盤價和開盤價位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,畫紅色 當滿足條件((收盤價>=工作線)AND(收盤價>=開盤價))時,在最高價和最低價位置之間畫柱狀線,寬度為0.5,1不為0則畫空心柱.,畫紅色 當滿足條件((收盤價>=工作線)AND(收盤價>=開盤價))時,在開盤價和收盤價位置之間畫柱狀線,寬度為8,1不為0則畫空心柱.,畫紅色 當滿足條件((收盤價>=工作線)AND(收盤價<=開盤價))時,在最高價和最低價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,畫紅色 當滿足條件((收盤價>=工作線)AND(收盤價<=開盤價))時,在開盤價和收盤價位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,畫紅色 當滿足條件((收盤價<工作線)AND(收盤價>=開盤價))時,在最高價和最低價位置之間畫柱狀線,寬度為0.5,1不為0則畫空心柱.,畫綠色 當滿足條件((收盤價<工作線)AND(收盤價>=開盤價))時,在開盤價和收盤價位置之間畫柱狀線,寬度為8,1不為0則畫空心柱.,畫綠色 當滿足條件((收盤價<工作線)AND(收盤價<=開盤價))時,在最高價和最低價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,畫綠色 當滿足條件((收盤價<工作線)AND(收盤價<=開盤價))時,在開盤價和收盤價位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,畫綠色 當滿足條件(A2=1)時,在最低價位置書寫文字,線寬為2,ALIGN1,COLOR208FFF 當滿足條件(A2=1)時,在最低價位置書寫文字,線寬為5,ALIGN1,畫黃色 當滿足條件(A2=9)時,在最高價位置書寫文字,線寬為2,ALIGN1,畫青色 當滿足條件(A2=9)時,在最高價+0.38位置書寫文字,線寬為5,畫青色 當滿足條件(A2=9)時,在收盤價和開盤價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,畫白色 當滿足條件(A2=9)時,在收盤價和開盤價位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,畫白色 當滿足條件(A2=9)時,在收盤價和開盤價位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,COLORDDDDDD 當滿足條件(A2=9)時,在收盤價和開盤價位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLORCCCCCC 當滿足條件(A2=9)時,在收盤價和開盤價位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,畫白色 當滿足條件(A2=9)時,在收盤價和開盤價位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOREEEEEE 當滿足條件(A2=9)時,在收盤價和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLORDDDDDD 當滿足條件(A2=9)時,在收盤價和開盤價位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLORCCCCCC 當滿足條件(A2=9)時,在收盤價和開盤價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,畫白色 當滿足條件(A2=1)時,在收盤價和開盤價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,COLORFFBBFF 當滿足條件(A2=1)時,在收盤價和開盤價位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,畫洋紅色 當滿足條件(A2=1)時,在收盤價和開盤價位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,COLORFF22FF 當滿足條件(A2=1)時,在收盤價和開盤價位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLORFF44FF 當滿足條件(A2=1)時,在收盤價和開盤價位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLORFF66FF 當滿足條件(A2=1)時,在收盤價和開盤價位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLORFF88FF 當滿足條件(A2=1)時,在收盤價和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLORFF99FF 當滿足條件(A2=1)時,在收盤價和開盤價位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLORFFAAFF 當滿足條件(A2=1)時,在收盤價和開盤價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLORFFBBFF A3賦值:(((收盤價的21日線性回歸斜率)*20)+收盤價)的68日指數移動平均 A4賦值:收盤價的10日指數移動平均 A5賦值:2日前的收盤價 A6賦值:((((收盤價-A5)和0的較大值)的6日[1日權重]移動平均) / ((收盤價-A5)的絕對值的6日[1日權重]移動平均)) * 100 A7賦值:如果((A6<(1日前的A6))AND(A6>79)),返回A6,否則返回0 當滿足條件(A4上穿A3)時,在最低價位置書寫文字,線寬為2,ALIGN1,畫黃色 當滿足條件A7時,在最高價位置書寫文字,線寬為3,畫綠色 A8賦值:21日內最低價的最低值 A9賦值:21日內最高價的最高值 A10賦值:(((收盤價-A8)/(A9-A8))*100)的5日指數移動平均 A11賦值:(((收盤價-A8)/(A9-A8))*50)的13日指數移動平均 A12賦值:((0.667*(1日前的A10))+(0.333*A10))的2日指數移動平均 A13賦值:55日內最低價的最低值 A14賦值:34日內最高價的最高值 A15賦值:(((收盤價-A13)/(A14-A13))*100)的3日指數移動平均 A16賦值:(A11 + A15) / 2 A17賦值:((0.667*(1日前的A15))+(0.333*A10))的2日指數移動平均 A18賦值:A16的5日指數移動平均 A19賦值:((0.667*(1日前的A18))+(0.333*A18))的2日指數移動平均 A20賦值:A10上穿A11 A21賦值:(A10上穿A19) AND (A19 < 30) A22賦值:A21 * 0.6 當滿足條件(A22=0.6)時,在最低價位置書寫文字,線寬為4,ALIGN1,畫黃色 當滿足條件(A20=1)時,在最低價位置書寫文字,線寬為4,ALIGN1,畫白色 A23賦值:((收盤價 + 最低價) + 最高價) / 3 A24賦值:A23的6日指數移動平均 A25賦值:A24的5日指數移動平均 A26賦值:A24上穿A25 當滿足條件A26時,在(最低價/1.005)位置畫3號圖標,線寬為2,ALIGN1,畫洋紅色 當滿足條件((收盤價>=工作線)AND(收盤價>=開盤價))時,在最高價和最低價位置之間畫柱狀線,寬度為0.5,1不為0則畫空心柱.,畫紅色 當滿足條件((收盤價>=工作線)AND(收盤價>=開盤價))時,在開盤價和收盤價位置之間畫柱狀線,寬度為8,1不為0則畫空心柱.,畫紅色 當滿足條件((收盤價>=工作線)AND(收盤價<=開盤價))時,在最高價和最低價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,畫紅色 當滿足條件((收盤價>=工作線)AND(收盤價<=開盤價))時,在開盤價和收盤價位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,畫紅色 當滿足條件((收盤價<工作線)AND(收盤價>=開盤價))時,在最高價和最低價位置之間畫柱狀線,寬度為0.5,1不為0則畫空心柱.,畫綠色 當滿足條件((收盤價<工作線)AND(收盤價>=開盤價))時,在開盤價和收盤價位置之間畫柱狀線,寬度為8,1不為0則畫空心柱.,畫綠色 當滿足條件((收盤價<工作線)AND(收盤價<=開盤價))時,在最高價和最低價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,畫綠色 當滿足條件((收盤價<工作線)AND(收盤價<=開盤價))時,在開盤價和收盤價位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,畫綠色

?

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

源碼：

?

A1:=DATE <= 13181231;
七天線:MA(C,7),colorgray;
工作線:(EMA(C,14)) * A1,POINTDOT,linethick4,colorYellow;
生命線:(MA(C,25)) * A1,linethick2,colorMagenta;
不惑線:(MA(C,40)) * A1,colorCyan;
姊妹線:(EMA(C,56)) * A1,CIRCLEDOT,colorWhite;
長線啟動點:(MA(C,99)) * A1,linethick1,Color0099FF;
賣線:EMA(SLOPE(C,21)*21+C,42),COLORRED,LINETHICK2;
A2:="cpzb@cp";
STICKLINE((A2 >= 8),H,L,0.8,1),colorGreen;
STICKLINE(((A2 >= 8) AND (C > O)),O,C,8,1),colorGreen;
STICKLINE(((A2 >= 8) AND (C < O)),C,O,8,0),colorGreen;
STICKLINE(((A2 > 0) AND (A2 <= 2)),H,L,0.8,1),colorRed;
STICKLINE((((A2 > 0) AND (A2 <= 2)) AND (C > O)),O,C,8,1),colorRed;
STICKLINE((((A2 > 0) AND (A2 <= 2)) AND (C < O)),C,O,8,0),colorRed;
STICKLINE(((C >= 工作線) AND (C >= O)),H,L,0.5,1),colorRed;
STICKLINE(((C >= 工作線) AND (C >= O)),O,C,8,1),colorRed;
STICKLINE(((C >= 工作線) AND (C <= O)),H,L,0.5,0),colorRed;
STICKLINE(((C >= 工作線) AND (C <= O)),O,C,8,0),colorRed;
STICKLINE(((C < 工作線) AND (C >= O)),H,L,0.5,1),colorGreen;
STICKLINE(((C < 工作線) AND (C >= O)),O,C,8,1),colorGreen;
STICKLINE(((C < 工作線) AND (C <= O)),H,L,0.5,0),colorGreen;
STICKLINE(((C < 工作線) AND (C <= O)),O,C,8,0),colorGreen;
DRAWTEXT((A2 = 1),L,'￣'),linethick2,ALIGN1,Color208FFF;
DRAWTEXT((A2 = 1),L,'B'),linethick5,ALIGN1,colorYellow;
DRAWTEXT((A2 = 9),H,'￣'),linethick2,ALIGN1,colorCyan;
DRAWTEXT((A2 = 9),H+0.38,'S'),linethick5,colorCyan;
STICKLINE((A2 = 9),C,O,0,0),colorWhite;
STICKLINE((A2 = 9),C,O,8,0),colorWhite;
STICKLINE((A2 = 9),C,O,7,0),ColorDDDDDD;
STICKLINE((A2 = 9),C,O,6,0),ColorCCCCCC;
STICKLINE((A2 = 9),C,O,5,0),colorWhite;
STICKLINE((A2 = 9),C,O,4,0),ColorEEEEEE;
STICKLINE((A2 = 9),C,O,3,0),ColorDDDDDD;
STICKLINE((A2 = 9),C,O,2,0),ColorCCCCCC;
STICKLINE((A2 = 9),C,O,1,0),colorWhite;
STICKLINE((A2 = 1),C,O,0,0),ColorFFBBFF;
STICKLINE((A2 = 1),C,O,8,0),colorMagenta;
STICKLINE((A2 = 1),C,O,7,0),ColorFF22FF;
STICKLINE((A2 = 1),C,O,6,0),ColorFF44FF;
STICKLINE((A2 = 1),C,O,5,0),ColorFF66FF;
STICKLINE((A2 = 1),C,O,4,0),ColorFF88FF;
STICKLINE((A2 = 1),C,O,3,0),ColorFF99FF;
STICKLINE((A2 = 1),C,O,2,0),ColorFFAAFF;
STICKLINE((A2 = 1),C,O,1,0),ColorFFBBFF;
A3:=EMA((((SLOPE(C,21)) * 20) + C),68);
A4:=EMA(C,10);
A5:=REF(C,2);
A6:=((SMA((MAX((C - A5),0)),6,1)) / (SMA(ABS((C - A5)),6,1))) * 100;
A7:=IF(((A6 < (REF(A6,1))) AND (A6 > 79)),A6,0);
DRAWTEXT((CROSS(A4,A3)),L,'△'),linethick2,ALIGN1,colorYellow;
DRAWTEXT(A7,H,'○'),linethick3,colorGreen;
A8:=LLV(L,21);
A9:=HHV(H,21);
A10:=EMA((((CLOSE - A8) / (A9 - A8)) * 100),5);
A11:=EMA((((CLOSE - A8) / (A9 - A8)) * 50),13);
A12:=EMA(((0.667 * (REF(A10,1))) + (0.333 * A10)),2);
A13:=LLV(L,55);
A14:=HHV(H,34);
A15:=EMA((((C - A13) / (A14 - A13)) * 100),3);
A16:=(A11 + A15) / 2;
A17:=EMA(((0.667 * (REF(A15,1))) + (0.333 * A10)),2);
A18:=EMA(A16,5);
A19:=EMA(((0.667 * (REF(A18,1))) + (0.333 * A18)),2);
A20:=CROSS(A10,A11);
A21:=(CROSS(A10,A19)) AND (A19 < 30);
A22:=A21 * 0.6;
DRAWTEXT((A22 = 0.6),L,'◇'),linethick4,ALIGN1,colorYellow;
DRAWTEXT((A20 = 1),L,'◇'),linethick4,ALIGN1,colorWhite;
A23:=((C + L) + H) / 3;
A24:=EMA(A23,6);
A25:=EMA(A24,5);
A26:=CROSS(A24,A25);
DRAWicon(A26,(LOW / 1.005),3),linethick2,ALIGN1,colorMagenta;
STICKLINE(((C >= 工作線) AND (C >= O)),H,L,0.5,1),colorRed;
STICKLINE(((C >= 工作線) AND (C >= O)),O,C,8,1),colorRed;
STICKLINE(((C >= 工作線) AND (C <= O)),H,L,0.5,0),colorRed;
STICKLINE(((C >= 工作線) AND (C <= O)),O,C,8,0),colorRed;
STICKLINE(((C < 工作線) AND (C >= O)),H,L,0.5,1),colorGreen;
STICKLINE(((C < 工作線) AND (C >= O)),O,C,8,1),colorGreen;
STICKLINE(((C < 工作線) AND (C <= O)),H,L,0.5,0),colorGreen;
STICKLINE(((C < 工作線) AND (C <= O)),O,C,8,0),colorGreen;{程序化交易 www.kzuj.com.cn }

?

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

?