相關(guān)標簽:通達信布林線主圖源碼 、 通達信生命線主圖源碼 、 通達信財神主圖源碼 、 通達信箱體主圖源碼 、 通達信魚身副圖源碼 、 boll通達信主圖源碼 、 通達信財務(wù)副圖源碼 、 通達信分時主圖源碼 、 通達信好主圖源碼 、 通達信主圖波浪源碼 、 通達信主圖買賣源碼 、 通達信木蘭主圖源碼 、 通達信逃頂主圖源碼 、 通達信變色主圖源碼 、

?

一線乾坤（投機七劍）主圖+回歸線+散戶線（源碼 主圖+副圖 通達信 貼圖）希望大家喜歡

?

?

原理解析：
GJTJ1賦值:100*(收盤價-5日內(nèi)最低價的最低值)/(5日內(nèi)收盤價的最高值-5日內(nèi)最低價的最低值) GJTJ2賦值:100*(收盤價-10日內(nèi)最低價的最低值)/(10日內(nèi)收盤價的最高值-10日內(nèi)最低價的最低值) GJTJ3賦值:100*(收盤價-20日內(nèi)最低價的最低值)/(20日內(nèi)收盤價的最高值-20日內(nèi)最低價的最低值) GJTJ4賦值:100*(收盤價-30日內(nèi)最低價的最低值)/(30日內(nèi)收盤價的最高值-30日內(nèi)最低價的最低值) A賦值:GJTJ1=GJTJ2 AND GJTJ2=GJTJ3 AND GJTJ1=100 AND GJTJ4>96 B賦值:統(tǒng)計2日中滿足A的天數(shù)=1 D賦值:GJTJ1<GJTJ2 AND GJTJ1<GJTJ3 AND GJTJ1<GJTJ4 AND GJTJ2<GJTJ3 AND GJTJ4<95 YH賦值:大盤的收盤價/1日前的大盤的收盤價*1日前的收盤價 YH1賦值:1日前的收盤價+收盤價-大盤的收盤價/1日前的大盤的收盤價*1日前的收盤價 X1賦值:YH1的7日指數(shù)移動平均 X2賦值:YH1的14日指數(shù)移動平均 X3賦值:X1的14日指數(shù)移動平均 E賦值:X1>X2 AND X2>X3 竟星賦值:B AND D AND E 當滿足條件竟星時,在(最低價*0.95)位置書寫文字,畫白色 XG賦值:上次GJTJ4上穿GJTJ1距今天數(shù)<5 AND GJTJ1>GJTJ4 天瀑賦值:統(tǒng)計3日中滿足XG的天數(shù)=1 AND XG 當滿足條件天瀑時,在(最低價*0.95)位置書寫文字,畫黃色 當滿足條件天瀑時,在收盤價和開盤價位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,畫黃色 當滿足條件天瀑時,在最高價和最低價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,畫黃色 A1賦值:上次30上穿GJTJ1距今天數(shù)<2 AND 上次GJTJ1上穿50距今天數(shù)<2 B1賦值:上次GJTJ4上穿GJTJ1距今天數(shù)<2 AND GJTJ1>GJTJ4 E1賦值:GJTJ1>60 AND GJTJ4>70 白金賦值:A1 AND B1 AND E1 當滿足條件白金時,在(最低價*0.95)位置書寫文字,畫綠色 當滿足條件白金時,在收盤價和開盤價位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,畫綠色 A2賦值:上次97上穿GJTJ1距今天數(shù)<=1 AND 上次GJTJ1上穿85距今天數(shù)<=1 B2賦值:上次97上穿GJTJ2距今天數(shù)<=1 AND 上次GJTJ2上穿85距今天數(shù)<=1 A3賦值:A2 AND B2 AA賦值:上次97上穿GJTJ1距今天數(shù)<=2 AND 上次GJTJ1上穿85距今天數(shù)<=1 BA賦值:上次97上穿GJTJ2距今天數(shù)<=2 AND 上次GJTJ2上穿85距今天數(shù)<=1 A4賦值:AA AND BA AAA賦值:上次97上穿GJTJ1距今天數(shù)<=3 AND 上次GJTJ1上穿85距今天數(shù)<=1 BAA賦值:上次97上穿GJTJ2距今天數(shù)<=3 AND 上次GJTJ2上穿85距今天數(shù)<=1 A8賦值:AAA AND BAA B21賦值:1日前的A3 B3賦值:1日前的A4 B4賦值:1日前的A8 D2賦值:GJTJ1=100 AND GJTJ2=100 AND A3 D3賦值:GJTJ1=100 AND GJTJ2=100 AND A4 D4賦值:GJTJ1=100 AND GJTJ2=100 AND A8 日月賦值:D2 OR D3 OR D3 當滿足條件日月時,在(最低價*0.95)位置書寫文字,COLORF00FF0 A5賦值:上次95上穿GJTJ1距今天數(shù)<=2 B5賦值:上次95上穿GJTJ2距今天數(shù)<=2 E5賦值: GJTJ4<GJTJ1 AND GJTJ1<GJTJ2 AND GJTJ1<GJTJ3 F1賦值:GJTJ2>50 AND GJTJ3>50 G1賦值:GJTJ1=100 AND GJTJ2=100 TX賦值:統(tǒng)計2日中滿足G1的天數(shù)=1 青干賦值:A5 AND B5 AND E5 AND F1 AND TX 當滿足條件青干時,在(最低價*0.95)位置書寫文字,畫紅色 當滿足條件青干時,在收盤價和開盤價位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,畫紅色 當滿足條件青干時,在最高價和最低價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,畫紅色 A6賦值:GJTJ3=100 B6賦值:GJTJ4<90 莫問賦值:統(tǒng)計2日中滿足A6的天數(shù) = 2 AND B6 當滿足條件莫問時,在(最低價*0.95)位置書寫文字,畫藍色 A7賦值:上次50上穿GJTJ1距今天數(shù)<3 AND 上次GJTJ1上穿50距今天數(shù)<3 B7賦值:上次GJTJ4上穿GJTJ1距今天數(shù)<2 AND GJTJ1>GJTJ4 黃金賦值:A7 AND B7 當滿足條件黃金時,在(最低價*0.95)位置書寫文字,COLORFFBB00 輸出三十:收盤價的30日簡單移動平均,畫紅色,線寬為2 輸出跌:如果收盤價的30日簡單移動平均<=1日前的收盤價的30日簡單移動平均,返回收盤價的30日簡單移動平均,否則返回無效數(shù),畫綠色,線寬為2 當滿足條件收陽線時,在橫軸0.01縱軸0.9位置書寫文字,畫紅色 當滿足條件收陽線時,在橫軸1縱軸1位置書寫文字,畫紅色

?

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

源碼：

?

GJTJ1:=100*(C-LLV(L,5))/(HHV(C,5)-LLV(L,5));
GJTJ2:=100*(C-LLV(L,10))/(HHV(C,10)-LLV(L,10));
GJTJ3:=100*(C-LLV(L,20))/(HHV(C,20)-LLV(L,20));
GJTJ4:=100*(C-LLV(L,30))/(HHV(C,30)-LLV(L,30));
A:=GJTJ1=GJTJ2 AND GJTJ2=GJTJ3 AND GJTJ1=100 AND GJTJ4>96;
B:=COUNT(A,2)=1;
D:=GJTJ1<GJTJ2 AND GJTJ1<GJTJ3 AND GJTJ1<GJTJ4 AND GJTJ2<GJTJ3 AND GJTJ4<95;
YH:=INDEXC/REF(INDEXC,1)*REF(C,1);
YH1:=REF(C,1)+C-INDEXC/REF(INDEXC,1)*REF(C,1);
X1:=EMA(YH1,7);
X2:=EMA(YH1,14);
X3:=EMA(X1,14);
E:=X1>X2 AND X2>X3;
竟星:=B AND D AND E;
DRAWTEXT(竟星,(L * 0.95),'竟星'),COLORWHITE;
XG:=BARSLAST(CROSS(GJTJ4,GJTJ1))<5 AND GJTJ1>GJTJ4;
天瀑:=COUNT(XG,3)=1 AND XG;
DRAWTEXT(天瀑,(L * 0.95),'天瀑'),COLORYELLOW;
STICKLINE(天瀑,C,O,6,0),COLORYELLOW;
STICKLINE(天瀑,H,L,1,0),COLORYELLOW;
A1:=BARSLAST(CROSS(30,GJTJ1))<2 AND BARSLAST(CROSS(GJTJ1,50))<2;
B1:=BARSLAST(CROSS(GJTJ4,GJTJ1))<2 AND GJTJ1>GJTJ4;
E1:=GJTJ1>60 AND GJTJ4>70;
白金:=A1 AND B1 AND E1;
DRAWTEXT(白金,(L * 0.95),'白金'),COLORGREEN;
STICKLINE(白金,C,O,6,0),COLORGREEN;
{日月}
A2:=BARSLAST(CROSS(97,GJTJ1))<=1 AND BARSLAST(CROSS(GJTJ1,85))<=1;
B2:=BARSLAST(CROSS(97,GJTJ2))<=1 AND BARSLAST(CROSS(GJTJ2,85))<=1;
A3:=A2 AND B2;
AA:=BARSLAST(CROSS(97,GJTJ1))<=2 AND BARSLAST(CROSS(GJTJ1,85))<=1;
BA:=BARSLAST(CROSS(97,GJTJ2))<=2 AND BARSLAST(CROSS(GJTJ2,85))<=1;
A4:=AA AND BA ;
AAA:=BARSLAST(CROSS(97,GJTJ1))<=3 AND BARSLAST(CROSS(GJTJ1,85))<=1;
BAA:=BARSLAST(CROSS(97,GJTJ2))<=3 AND BARSLAST(CROSS(GJTJ2,85))<=1;
A8:=AAA AND BAA ;
B21:=REF(A3,1);
B3:=REF(A4,1);
B4:=REF(A8,1);
D2:=GJTJ1=100 AND GJTJ2=100 AND A3 ;
D3:=GJTJ1=100 AND GJTJ2=100 AND A4 ;
D4:=GJTJ1=100 AND GJTJ2=100 AND A8 ;
日月:=D2 OR D3 OR D3;
DRAWTEXT(日月,(L * 0.95),'日月'),COLORF00FF0;
A5:=BARSLAST(CROSS(95,GJTJ1))<=2;
B5:=BARSLAST(CROSS(95,GJTJ2))<=2;
E5:= GJTJ4<GJTJ1 AND GJTJ1<GJTJ2 AND GJTJ1<GJTJ3;
F1:=GJTJ2>50 AND GJTJ3>50;
G1:=GJTJ1=100 AND GJTJ2=100;
TX:=COUNT(G1,2)=1;
青干:=A5 AND B5 AND E5 AND F1 AND TX;
DRAWTEXT(青干,(L * 0.95),'青干'),COLORRED;
STICKLINE(青干,C,O,6,0),COLORRED;
STICKLINE(青干,H,L,1,0),COLORRED;
A6:=GJTJ3=100;
B6:=GJTJ4<90;
莫問:=COUNT(A6,2) = 2 AND B6;
DRAWTEXT(莫問,(L * 0.95),'莫問'),COLORBLUE;
A7:=BARSLAST(CROSS(50,GJTJ1))<3 AND BARSLAST(CROSS(GJTJ1,50))<3;
B7:=BARSLAST(CROSS(GJTJ4,GJTJ1))<2 AND GJTJ1>GJTJ4;
黃金:=A7 AND B7;
DRAWTEXT(黃金,(L * 0.95),'黃金'),COLORFFBB00;
三十:MA(C,30),COLORRED,LINETHICK2;
跌:IF(MA(CLOSE,30)<=REF(MA(CLOSE,30),1),MA(CLOSE,30),DRAWNULL),COLORGREEN,LINETHICK2;DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.kzuj.com.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

?

?

?

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

?