大肚自用主圖指標公式源碼[通達信公式]

相關標簽:

?

?

原理解析：
DIFF賦值:(收盤價的26日指數移動平均-收盤價的52日指數移動平均) DEA賦值:DIFF的52日指數移動平均 MACD賦值:(2*(DIFF-DEA)) DIF賦值:(收盤價的26日指數移動平均-收盤價的52日指數移動平均) ESS賦值:收盤價的26日指數移動平均 EGG賦值:收盤價的52日指數移動平均 輸出大肚線:(((((((((52-1)*(26+1))*EGG)*1)-((((52+1)*(26-1))*ESS)*1))+(((26+1)*(52+1))*DIF))*1)/((2*52)-(2*26)))*1) 當滿足條件大肚線>=1日前的大肚線時,在大肚線位置書寫文字,畫紅色,線寬為2 當滿足條件大肚線<1日前的大肚線時,在大肚線位置書寫文字,畫綠色,線寬為2 VARA1賦值:(((收盤價 - 收盤價的6日簡單移動平均) / 收盤價的6日簡單移動平均) * 100) VARA2賦值:(((收盤價 - 收盤價的12日簡單移動平均) / 收盤價的12日簡單移動平均) * 100) VARA3賦值:(((收盤價 - 收盤價的24日簡單移動平均) / 收盤價的24日簡單移動平均) * 100) VARA4賦值:(((VARA1 + (2 * VARA2)) + (3 * VARA3)) / 6) VARA5賦值:VARA4的3日簡單移動平均 LC賦值:1日前的收盤價 RSI賦值:收盤價-LC和0的較大值的6日[1日權重]移動平均/收盤價-LC的絕對值的6日[1日權重]移動平均*100 VARA6賦值:(收盤價-9日內最低價的最低值)/(9日內最高價的最高值-9日內最低價的最低值)*100 VARA7賦值:VARA6的3日[1日權重]移動平均 VARA8賦值:VARA7的3日[1日權重]移動平均 VARA9賦值:(VARA8/2+40)*1.1 VARA10賦值:VARA9的3日[1日權重]移動平均 VARA11賦值:不定周期收盤價的12日指數移動平均-不定周期收盤價的26日指數移動平均 VARA12賦值:VARA11的9日指數移動平均 VARA13賦值:(VARA11-VARA12)*2*60 VARA14賦值:10 VARA15賦值:VARA13-1日前的VARA13 DIF2賦值:不定周期收盤價的12日指數移動平均-不定周期收盤價的26日指數移動平均 DEA2賦值:DIF2的9日指數移動平均 AAA賦值:(DIF2-DEA2)*2*60 買賦值:VARA15上穿VARA14 買1賦值:如果買,返回1,否則返回0 買2賦值:AAA-1日前的AAA上穿15 大肚買賦值:買1 AND 買2 逃頂1賦值:如果VARA10上穿RSI,返回50,否則返回0,STICK,畫洋紅色 逃頂2賦值:如果80上穿RSI,返回-50,否則返回0,STICK,畫綠色 逃頂3賦值:80上穿RSI*35 大肚逃賦值:逃頂1 AND 逃頂2 AND 逃頂3 當滿足條件大肚逃時,在1日前的收盤價和2日前的收盤價位置之間畫柱狀線,寬度為3.2,0不為0則畫空心柱.,COLORFF3300 當滿足條件大肚逃時,在1日前的收盤價和2日前的收盤價位置之間畫柱狀線,寬度為2.7,0不為0則畫空心柱.,COLORFF5500 當滿足條件大肚逃時,在1日前的收盤價和2日前的收盤價位置之間畫柱狀線,寬度為2.1,0不為0則畫空心柱.,COLORFF7700 當滿足條件大肚逃時,在1日前的收盤價和2日前的收盤價位置之間畫柱狀線,寬度為1.5,0不為0則畫空心柱.,COLORFF9900 當滿足條件大肚逃時,在1日前的收盤價和2日前的收盤價位置之間畫柱狀線,寬度為0.9,0不為0則畫空心柱.,COLORFFBB00 當滿足條件大肚逃時,在1日前的收盤價和2日前的收盤價位置之間畫柱狀線,寬度為0.3,0不為0則畫空心柱.,COLORFFDD00 當滿足條件大肚買=1的5日過濾時,在最低價位置書寫文字,COLORFF00FF 當滿足條件大肚買=1的5日過濾時,在最低價位置畫9號圖標 當滿足條件大肚逃=1的5日過濾時,在最高價位置書寫文字,COLOR00FF00 當滿足條件大肚逃=1的5日過濾時,在最高價位置畫15號圖標 DIFF賦值:(收盤價的26日指數移動平均-收盤價的52日指數移動平均) DEA賦值:DIFF的52日指數移動平均 MACD賦值:(2*(DIFF-DEA)) DIF賦值:(收盤價的26日指數移動平均-收盤價的52日指數移動平均) ESS賦值:收盤價的26日指數移動平均 EGG賦值:收盤價的52日指數移動平均 輸出大肚線:(((((((((52-1)*(26+1))*EGG)*1)-((((52+1)*(26-1))*ESS)*1))+(((26+1)*(52+1))*DIF))*1)/((2*52)-(2*26)))*1) 當滿足條件大肚線>=1日前的大肚線時,在大肚線位置書寫文字,畫紅色,線寬為2 當滿足條件大肚線<1日前的大肚線時,在大肚線位置書寫文字,畫綠色,線寬為2 VARA1賦值:(((收盤價 - 收盤價的6日簡單移動平均) / 收盤價的6日簡單移動平均) * 100) VARA2賦值:(((收盤價 - 收盤價的12日簡單移動平均) / 收盤價的12日簡單移動平均) * 100) VARA3賦值:(((收盤價 - 收盤價的24日簡單移動平均) / 收盤價的24日簡單移動平均) * 100) VARA4賦值:(((VARA1 + (2 * VARA2)) + (3 * VARA3)) / 6) VARA5賦值:VARA4的3日簡單移動平均 LC賦值:1日前的收盤價 RSI賦值:收盤價-LC和0的較大值的6日[1日權重]移動平均/收盤價-LC的絕對值的6日[1日權重]移動平均*100 VARA6賦值:(收盤價-9日內最低價的最低值)/(9日內最高價的最高值-9日內最低價的最低值)*100 VARA7賦值:VARA6的3日[1日權重]移動平均 VARA8賦值:VARA7的3日[1日權重]移動平均 VARA9賦值:(VARA8/2+40)*1.1 VARA10賦值:VARA9的3日[1日權重]移動平均 VARA11賦值:不定周期收盤價的12日指數移動平均-不定周期收盤價的26日指數移動平均 VARA12賦值:VARA11的9日指數移動平均 VARA13賦值:(VARA11-VARA12)*2*60 VARA14賦值:10 VARA15賦值:VARA13-1日前的VARA13 DIF2賦值:不定周期收盤價的12日指數移動平均-不定周期收盤價的26日指數移動平均 DEA2賦值:DIF2的9日指數移動平均 AAA賦值:(DIF2-DEA2)*2*60 買賦值:VARA15上穿VARA14 買1賦值:如果買,返回1,否則返回0 買2賦值:AAA-1日前的AAA上穿15 大肚買賦值:買1 AND 買2 逃頂1賦值:如果VARA10上穿RSI,返回50,否則返回0,STICK,畫洋紅色 逃頂2賦值:如果80上穿RSI,返回-50,否則返回0,STICK,畫綠色 逃頂3賦值:80上穿RSI*35 大肚逃賦值:逃頂1 AND 逃頂2 AND 逃頂3 當滿足條件大肚逃時,在1日前的收盤價和2日前的收盤價位置之間畫柱狀線,寬度為3.2,0不為0則畫空心柱.,COLORFF3300 當滿足條件大肚逃時,在1日前的收盤價和2日前的收盤價位置之間畫柱狀線,寬度為2.7,0不為0則畫空心柱.,COLORFF5500 當滿足條件大肚逃時,在1日前的收盤價和2日前的收盤價位置之間畫柱狀線,寬度為2.1,0不為0則畫空心柱.,COLORFF7700 當滿足條件大肚逃時,在1日前的收盤價和2日前的收盤價位置之間畫柱狀線,寬度為1.5,0不為0則畫空心柱.,COLORFF9900 當滿足條件大肚逃時,在1日前的收盤價和2日前的收盤價位置之間畫柱狀線,寬度為0.9,0不為0則畫空心柱.,COLORFFBB00 當滿足條件大肚逃時,在1日前的收盤價和2日前的收盤價位置之間畫柱狀線,寬度為0.3,0不為0則畫空心柱.,COLORFFDD00 當滿足條件大肚買=1的5日過濾時,在最低價位置書寫文字,COLORFF00FF 當滿足條件大肚買=1的5日過濾時,在最低價位置畫9號圖標 當滿足條件大肚逃=1的5日過濾時,在最高價位置書寫文字,COLOR00FF00 當滿足條件大肚逃=1的5日過濾時,在最高價位置畫15號圖標

?

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

源碼：

?

?

?

{大肚線}
DIFF:=(EMA(C,26)-EMA(C,52));
DEA:=EMA(DIFF,52);
MACD:=(2*(DIFF-DEA));
DIF:=(EMA(C,26)-EMA(C,52));
ESS:=EMA(C,26);
EGG:=EMA(C,52);
大肚線:(((((((((52-1)*(26+1))*EGG)*1)-((((52+1)*(26-1))*ESS)*1))+(((26+1)*(52+1))*DIF))*1)/((2*52)-(2*26)))*1);
DRAWTEXT(大肚線>=REF(大肚線,1),大肚線,'*'),COLORRED,LINETHICK2;
DRAWTEXT(大肚線<REF(大肚線,1),大肚線,'*'),COLORGREEN,LINETHICK2;
VARA1:=(((CLOSE - MA(CLOSE,6)) / MA(CLOSE,6)) * 100);
VARA2:=(((CLOSE - MA(CLOSE,12)) / MA(CLOSE,12)) * 100);
VARA3:=(((CLOSE - MA(CLOSE,24)) / MA(CLOSE,24)) * 100);
VARA4:=(((VARA1 + (2 * VARA2)) + (3 * VARA3)) / 6);
VARA5:=MA(VARA4,3);
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
VARA6:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
VARA7:=SMA(VARA6,3,1);
VARA8:=SMA(VARA7,3,1);
VARA9:=(VARA8/2+40)*1.1;
VARA10:=SMA(VARA9,3,1);
VARA11:=EMA(DCLOSE,12)-EMA(DCLOSE,26);
VARA12:=EMA(VARA11,9);
VARA13:=(VARA11-VARA12)*2*60;
VARA14:=10;
VARA15:=VARA13-REF(VARA13,1);DIF2:=EMA(DCLOSE,12)-EMA(DCLOSE,26);
DEA2:=EMA(DIF2,9);
AAA:=(DIF2-DEA2)*2*60;
買:=CROSS(VARA15,VARA14);
買1:=IF(買,1,0);
買2:=CROSS(AAA-REF(AAA,1),15);
大肚買:=買1 AND 買2;
逃頂1:=IF(CROSS(VARA10,RSI),50,0),STICK,COLORMAGENTA;
逃頂2:=IF(CROSS(80,RSI),-50,0),STICK,COLORGREEN;
逃頂3:=CROSS(80,RSI)*35;
大肚逃:=逃頂1 AND 逃頂2 AND 逃頂3;
STICKLINE(大肚逃,REF(CLOSE,1),REF(CLOSE,2),3.2,0),COLORFF3300;
STICKLINE(大肚逃,REF(CLOSE,1),REF(CLOSE,2),2.7,0),COLORFF5500;
STICKLINE(大肚逃,REF(CLOSE,1),REF(CLOSE,2),2.1,0),COLORFF7700;
STICKLINE(大肚逃,REF(CLOSE,1),REF(CLOSE,2),1.5,0),COLORFF9900;
STICKLINE(大肚逃,REF(CLOSE,1),REF(CLOSE,2),0.9,0),COLORFFBB00;
STICKLINE(大肚逃,REF(CLOSE,1),REF(CLOSE,2),0.3,0),COLORFFDD00;
DRAWTEXT(FILTER(大肚買=1,5),LOW,' 買進'),COLORFF00FF;
DRAWICON(FILTER(大肚買=1,5),LOW,9);
DRAWTEXT(FILTER(大肚逃=1,5),HIGH,' 逃頂'),COLOR00FF00;
DRAWICON(FILTER(大肚逃=1,5),HIGH,15);{大肚線}
DIFF:=(EMA(C,26)-EMA(C,52));
DEA:=EMA(DIFF,52);
MACD:=(2*(DIFF-DEA));
DIF:=(EMA(C,26)-EMA(C,52));
ESS:=EMA(C,26);
EGG:=EMA(C,52);
大肚線:(((((((((52-1)*(26+1))*EGG)*1)-((((52+1)*(26-1))*ESS)*1))+(((26+1)*(52+1))*DIF))*1)/((2*52)-(2*26)))*1);
DRAWTEXT(大肚線>=REF(大肚線,1),大肚線,'*'),COLORRED,LINETHICK2;
DRAWTEXT(大肚線<REF(大肚線,1),大肚線,'*'),COLORGREEN,LINETHICK2;
VARA1:=(((CLOSE - MA(CLOSE,6)) / MA(CLOSE,6)) * 100);
VARA2:=(((CLOSE - MA(CLOSE,12)) / MA(CLOSE,12)) * 100);
VARA3:=(((CLOSE - MA(CLOSE,24)) / MA(CLOSE,24)) * 100);
VARA4:=(((VARA1 + (2 * VARA2)) + (3 * VARA3)) / 6);
VARA5:=MA(VARA4,3);
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
VARA6:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
VARA7:=SMA(VARA6,3,1);
VARA8:=SMA(VARA7,3,1);
VARA9:=(VARA8/2+40)*1.1;
VARA10:=SMA(VARA9,3,1);
VARA11:=EMA(DCLOSE,12)-EMA(DCLOSE,26);
VARA12:=EMA(VARA11,9);
VARA13:=(VARA11-VARA12)*2*60;
VARA14:=10;
VARA15:=VARA13-REF(VARA13,1);DIF2:=EMA(DCLOSE,12)-EMA(DCLOSE,26);
DEA2:=EMA(DIF2,9);
AAA:=(DIF2-DEA2)*2*60;
買:=CROSS(VARA15,VARA14);
買1:=IF(買,1,0);
買2:=CROSS(AAA-REF(AAA,1),15);
大肚買:=買1 AND 買2;
逃頂1:=IF(CROSS(VARA10,RSI),50,0),STICK,COLORMAGENTA;
逃頂2:=IF(CROSS(80,RSI),-50,0),STICK,COLORGREEN;
逃頂3:=CROSS(80,RSI)*35;
大肚逃:=逃頂1 AND 逃頂2 AND 逃頂3;
STICKLINE(大肚逃,REF(CLOSE,1),REF(CLOSE,2),3.2,0),COLORFF3300;
STICKLINE(大肚逃,REF(CLOSE,1),REF(CLOSE,2),2.7,0),COLORFF5500;
STICKLINE(大肚逃,REF(CLOSE,1),REF(CLOSE,2),2.1,0),COLORFF7700;
STICKLINE(大肚逃,REF(CLOSE,1),REF(CLOSE,2),1.5,0),COLORFF9900;
STICKLINE(大肚逃,REF(CLOSE,1),REF(CLOSE,2),0.9,0),COLORFFBB00;
STICKLINE(大肚逃,REF(CLOSE,1),REF(CLOSE,2),0.3,0),COLORFFDD00;
DRAWTEXT(FILTER(大肚買=1,5),LOW,' 買進'),COLORFF00FF;
DRAWICON(FILTER(大肚買=1,5),LOW,9);
DRAWTEXT(FILTER(大肚逃=1,5),HIGH,' 逃頂'),COLOR00FF00;
DRAWICON(FILTER(大肚逃=1,5),HIGH,15);

?

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

?