相關標簽:

同花順魯南用主圖指標源碼

原理解析：
ED1賦值:(-2*2日前的收盤價+1日前的收盤價+2*收盤價) ED2賦值:(-0.4*4日前的收盤價-0.4*3日前的收盤價-1.1*2日前的收盤價+0.9*1日前的收盤價+2*收盤價) ED3賦值:(-0.8*4日前的收盤價-0.8*3日前的收盤價-0.2*2日前的收盤價+0.8*1日前的收盤價+2*收盤價) CC賦值:(-2*3日前的收盤價+3*2日前的收盤價+6*1日前的收盤價+7*收盤價)/14 JF1賦值:ED1的3日[1日權重]移動平均的3日[1日權重]移動平均 JF2賦值:ED2的4日[1日權重]移動平均的3日[1日權重]移動平均 JF3賦值:ED3的4日[1日權重]移動平均的4日[1日權重]移動平均 工作線賦值:JF1的14日指數移動平均,COLORD96C00 輸出生命線:JF2的25日指數移動平均,COLORFFFFFF 輸出牛熊線:JF3的88日指數移動平均,COLORDB00DB PARTLINE(工作線,工作線>1日前的工作線,自定色,工作線<=1日前的工作線,自定色),線寬為2 二炮賦值:(-0.4*4日前的收盤價-0.4*3日前的收盤價-1.1*2日前的收盤價+0.9*1日前的收盤價+2*收盤價) 攻擊線賦值:二炮的4日[2日權重]移動平均,畫紅色,線寬為2 GJZX賦值:(最高價+最低價+2*收盤價)/4 BLX1賦值:GJZX的18日線性回歸預測值-GJZX的4日線性回歸預測值 BLX2賦值:GJZX的4日線性回歸預測值-BLX1*2 波浪線賦值:BLX2的3日線性回歸斜率*0.5+BLX2的3日簡單移動平均 BDGD賦值:0.8上穿最高價=6日內最高價的最高值 GDSJ賦值:上次BDGD距今天數+1 波峰賦值:GDSJ日前的最高價,COLOR1EFF1E BDDD賦值:0.8上穿最低價=6日內最低價的最低值 DDSJ賦值:上次BDDD距今天數+1 波谷賦值:DDSJ日前的最低價,COLOR7400E8 當滿足條件GDSJ<=8時,在波峰和波峰位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLORFFFF28,線寬為2 當滿足條件DDSJ<=8時,在波谷和波谷位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLORFF2FFF,線寬為2 當滿足條件(開盤價>=收盤價)時,在收盤價和開盤價位置之間畫柱狀線,寬度為10,0不為0則畫空心柱.,COLORA8A800 當滿足條件(開盤價>=收盤價)時,在收盤價和開盤價位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLORC6C600 當滿足條件(開盤價>=收盤價)時,在收盤價和開盤價位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLORE3E300 當滿足條件(開盤價>=收盤價)時,在收盤價和開盤價位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLORFFFF17 //蘭跌STICKLINE((收盤價 >= 開盤價),收盤價,開盤價,10,0),COLOR070084 當滿足條件(收盤價>=開盤價)時,在收盤價和開盤價位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLOR0000A3 當滿足條件(收盤價>=開盤價)時,在收盤價和開盤價位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLOR0000B7 當滿足條件(收盤價>=開盤價)時,在收盤價和開盤價位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOR0000CD 紅持阻擋賦值:(最高價的21日[2日權重]移動平均 * 1.05) 當滿足條件((((收盤價/開盤價)>1.04)AND(收盤價<阻擋))AND((收盤價-1日前的收盤價)>0))時,在收盤價和開盤價位置之間畫柱狀線,寬度為10,0不為0則畫空心柱.,COLOR5100A2 當滿足條件((((收盤價/開盤價)>1.04)AND(收盤價<阻擋))AND((收盤價-1日前的收盤價)>0))時,在收盤價和開盤價位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLOR6300C6 當滿足條件((((收盤價/開盤價)>1.04)AND(收盤價<阻擋))AND((收盤價-1日前的收盤價)>0))時,在收盤價和開盤價位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLOR7600EC 當滿足條件((((收盤價/開盤價)>1.04)AND(收盤價<阻擋))AND((收盤價-1日前的收盤價)>0))時,在收盤價和開盤價位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOR870FFF //紫跟STICKLINE(((((收盤價 < 1日前的收盤價) AND (收盤價 < 1日前的收盤價)) AND (最高價 > 阻擋)) AND (收盤價 < 阻擋)),收盤價,開盤價,10,0),COLORA8A800 當滿足條件((((收盤價<1日前的收盤價)AND(收盤價<1日前的收盤價))AND(最高價>阻擋))AND(收盤價<阻擋))時,在收盤價和開盤價位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLORC6C600 當滿足條件((((收盤價<1日前的收盤價)AND(收盤價<1日前的收盤價))AND(最高價>阻擋))AND(收盤價<阻擋))時,在收盤價和開盤價位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLORE3E300 當滿足條件((((收盤價<1日前的收盤價)AND(收盤價<1日前的收盤價))AND(最高價>阻擋))AND(收盤價<阻擋))時,在收盤價和開盤價位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLORFFFF17 //蘭變

源碼：

ED1:=(-2*REF(C,2)+REF(C,1)+2*C);
ED2:=(-0.4*REF(C,4)-0.4*REF(C,3)-1.1*REF(C,2)+0.9*REF(C,1)+2*C);
ED3:=(-0.8*REF(C,4)-0.8*REF(C,3)-0.2*REF(C,2)+0.8*REF(C,1)+2*C);
CC:=(-2*REF(C,3)+3*REF(C,2)+6*REF(C,1)+7*C)/14;
JF1:=SMA(SMA(ED1,3,1),3,1);
JF2:=SMA(SMA(ED2,4,1),3,1);
JF3:=SMA(SMA(ED3,4,1),4,1);
工作線:=EMA(JF1,14,2),ColorD96C00;
生命線:EMA(JF2,25,2),ColorFFFFFF;
牛熊線:EMA(JF3,88,2),ColorDB00DB;
PARTLINE(工作線,工作線>REF(工作線,1),RGB(250,30,30),工作線<=REF(工作線,1),RGB(50,50,250)),LINETHICK2;
二炮:=(-0.4*REF(C,4)-0.4*REF(C,3)-1.1*REF(C,2)+0.9*REF(C,1)+2*C);
攻擊線:=SMA(二炮,4,2),colorred,LINETHICK2;
GJZX:=(H+L+2*C)/4;
blx1:=FORCAST(GJZX,18)-FORCAST(GJZX,4);
blx2:=FORCAST(GJZX,4)-blx1*2;
波浪線:=MA(SLOPE(blx2,3)*0.5+blx2,3);
BDGD:=CROSS(0.8,H=HHV(H,6));
GDSJ:=BARSLAST(BDGD)+1;
波峰:=REF(H,GDSJ),Color1EFF1E;
BDDD:=CROSS(0.8,L=LLV(L,6));
DDSJ:=BARSLAST(BDDD)+1;
波谷:=REF(L,DDSJ),Color7400E8;
STICKLINE(GDSJ<=8,波峰,波峰,8,0),ColorFFFF28,LINETHICK02;
STICKLINE(DDSJ<=8,波谷,波谷,8,0),ColorFF2FFF,LINETHICK02;
STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,10,0),ColorA8A800;
STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,8,0),ColorC6C600;
STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,6,0),ColorE3E300;
STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,4,0),ColorFFFF17;//蘭跌STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,10,0),color070084;
STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,8,0),color0000A3;
STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,6,0),color0000B7;
STICKLINE((CLOSE >= OPEN),CLOSE,OPEN,4,0),color0000CD;//紅持
阻擋:=(SMA(HIGH,21,2) * 1.05);
STICKLINE(((((CLOSE / OPEN) > 1.04) AND (CLOSE < 阻擋)) AND ((CLOSE - REF(CLOSE,1)) > 0)),CLOSE,OPEN,10,0),Color5100A2;
STICKLINE(((((CLOSE / OPEN) > 1.04) AND (CLOSE < 阻擋)) AND ((CLOSE - REF(CLOSE,1)) > 0)),CLOSE,OPEN,8,0),Color6300C6;
STICKLINE(((((CLOSE / OPEN) > 1.04) AND (CLOSE < 阻擋)) AND ((CLOSE - REF(CLOSE,1)) > 0)),CLOSE,OPEN,6,0),Color7600EC;
STICKLINE(((((CLOSE / OPEN) > 1.04) AND (CLOSE < 阻擋)) AND ((CLOSE - REF(CLOSE,1)) > 0)),CLOSE,OPEN,4,0),Color870FFF;//紫跟
STICKLINE(((((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,1))) AND (HIGH > 阻擋)) AND (CLOSE < 阻擋)),CLOSE,OPEN,10,0),ColorA8A800;
STICKLINE(((((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,1))) AND (HIGH > 阻擋)) AND (CLOSE < 阻擋)),CLOSE,OPEN,8,0),ColorC6C600;
STICKLINE(((((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,1))) AND (HIGH > 阻擋)) AND (CLOSE < 阻擋)),CLOSE,OPEN,6,0),ColorE3E300;
STICKLINE(((((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,1))) AND (HIGH > 阻擋)) AND (CLOSE < 阻擋)),CLOSE,OPEN,4,0),ColorFFFF17;//蘭變
F:=100*(C-REF(C,1))/REF(C,1);
p1:=IF(C<REF(O,1) AND f<0,1,0);
p2:=IF(C<REF(O,2) AND f<0,1,0);
STICKLINE(P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1,OPEN,CLOSE,10,0),Color820082;
STICKLINE(P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1,OPEN,CLOSE,8,0),Color9F009F;
STICKLINE(P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1,OPEN,CLOSE,6,0),ColorBD00BD;
STICKLINE(P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1,OPEN,CLOSE,4,0),ColorDB00DB;//粉進
STICKLINE(P1=1 AND REF(P1,1)=0 AND P2=1 AND REF(P2,1)=0,OPEN,CLOSE,10,0),Color00A800;
STICKLINE(P1=1 AND REF(P1,1)=0 AND P2=1 AND REF(P2,1)=0,OPEN,CLOSE,8,0),Color00C400;
STICKLINE(P1=1 AND REF(P1,1)=0 AND P2=1 AND REF(P2,1)=0,OPEN,CLOSE,6,0),Color00E300;
STICKLINE(P1=1 AND REF(P1,1)=0 AND P2=1 AND REF(P2,1)=0,OPEN,CLOSE,4,0),Color0FFF0F;//綠頂
C3:=REF(C,1);
漲停:IF((C-C3)*100/C3>=(10-0.01*100/C3),1,0),Color1188FF;
STICKLINE(漲停,OPEN,CLOSE,10,0),Color0054A8;
STICKLINE(漲停,OPEN,CLOSE,8,0),Color0063C6;
STICKLINE(漲停,OPEN,CLOSE,6,0),Color0072E3;
STICKLINE(漲停,OPEN,CLOSE,4,0),Color1188FF;//暗黃
跌停:IF((C3-C)*100/C3>=(10-0.01*100/C3),1,0),ColorF9A800;
STICKLINE(跌停,OPEN,CLOSE,10,0),Color996700;
STICKLINE(跌停,OPEN,CLOSE,8,0),ColorB57A00;
STICKLINE(跌停,OPEN,CLOSE,6,0),ColorCC8A00;
STICKLINE(跌停,OPEN,CLOSE,4,0),ColorF9A800;//藍
VAR1:=4*SMA((CLOSE-LLV(LOW,4))/(HHV(HIGH,4)-LLV(LOW,4))*100,4,1)-
3*SMA(SMA((CLOSE-LLV(LOW,4))/(HHV(HIGH,4)-LLV(LOW,4))*100,4,1),3.2,1);
VAR2:=7;
CC:=CROSS(VAR1,VAR2);
DRAWTEXT(CC,L*0.98,''),Color20FFFF;
賣出:=CROSS(72,SMA(MAX(CLOSE-REF(CLOSE,1),0),6,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),6,1)*100);
DRAWTEXT(賣出,H*1.05,'◆'),Color0FFF0F;
最新收益:MGSYX(33),Color6700CE;
指數:INDEXC,NODRAW,Color1A1AFF ;
AAA:=(3*C+H+L+O)/6;
VARa:=(8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)+4*REF(AAA,4)+3*REF(AAA,5)+2*REF(AAA,6)+REF(AAA,8))/36;
TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VARa;
立樁量:=FILTER(TJ1,5);
TJ2:=IF(BARSLAST(立樁量)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(立樁量)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(立樁量)=3 AND CLOSE>REF(HIGH,3),1,0)));
突破:=TJ2=1;
LB:='————';
DRAWTEXT(立樁量,REF(HIGH,BARSLAST(立樁量)),LB),Color20FFFF,LINETHICK02;
DRAWTEXT(立樁量,REF(LOW,BARSLAST(立樁量)),LB),Color20FFFF,LINETHICK02;
TJ3:=IF(BARSLAST(立樁量)=1 AND CLOSE>REF(LOW,1),1,IF(BARSLAST(立樁量)=2 AND CLOSE>REF(LOW,2),1,IF(BARSLAST(立樁量)=3 AND CLOSE>REF(LOW,3),1,0)));
三天法則:=TJ3=1;
成立:=三天法則 AND 突破;
條件成立:=FILTER(成立,3);
DRAWTEXT(條件成立,L*0.93,'立樁顯'),Color20FFFF;
立樁顯:=IF(AMOUNT=1,VOL*240/FROMOPEN/REF(VOL,1)-1,VOL/REF(VOL,1)-1);
STICKLINE(立樁顯>=1,O,C,10,0),Color00A8A8;
STICKLINE(立樁顯>=1,O,C,8,0),Color00C6C6;
STICKLINE(立樁顯>=1,O,C,6,0),Color00E3E3;
STICKLINE(立樁顯>=1,O,C,4,0),Color09FFFF;//黃
T12:=立樁顯>=1;
A1:=MIN(O,C);
B1:=ABS(O-C);
LC:=REF(CLOSE,1);
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
FF:=EMA(CLOSE,3);
MA15:=EMA(CLOSE,21);
紫底背:88,ColorFF1E8E;
STICKLINE(CROSS(FF,MA15),A1,A1+B1/2,10,0),ColorB5005A;
STICKLINE(CROSS(FF,MA15),A1,A1+B1/2,8,0),ColorDB006D;
STICKLINE(CROSS(FF,MA15),A1,A1+B1/2,4,0),ColorF9007C;
STICKLINE(CROSS(FF,MA15),A1,A1+B1/2,2,0),ColorFF1E8E;//紫底背
白頂背:88,RSI,ColorFFFFFF;
STICKLINE(CROSS(88,RSI),A1+B1,A1+B1/2,10,0),ColorA5A5A5;
STICKLINE(CROSS(88,RSI),A1+B1,A1+B1/2,8,0),ColorD2D2D2;
STICKLINE(CROSS(88,RSI),A1+B1,A1+B1/2,4,0),ColorF0F0F0;
STICKLINE(CROSS(88,RSI),A1+B1,A1+B1/2,2,0),ColorFFFFFF;//白頂背
MA13:=MA(CLOSE,13);
X1:=(C+L+H)/3;
BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10;
EMA8:=EMA(C,8);
A1:=MIN(O,C);
B1:=ABS(O-C);
T1:=FILTER(BB13>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10);
STICKLINE(T1 AND T12,A1+B1/3,A1+B1*2/3,10,0),Color970097;
STICKLINE(T1 AND T12,A1+B1/3,A1+B1*2/3,8,0),ColorB500B5;
STICKLINE(T1 AND T12,A1+B1/3,A1+B1*2/3,4,0),ColorD200D2;
STICKLINE(T1 AND T12,A1+B1/3,A1+B1*2/3,2,0),ColorF000F0;//粉紅45度升TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' www.kzuj.com.cn '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花順程序化交易');

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