相關(guān)標(biāo)簽:

?

原理解析：
輸出趨勢(shì):收盤價(jià)的4日指數(shù)移動(dòng)平均的4日指數(shù)移動(dòng)平均,畫黃色 月K賦值:"KDJ的K[取月線數(shù)據(jù)]" 月D賦值:"KDJ的D[取月線數(shù)據(jù)]" 周K賦值:"KDJ的K[取周線數(shù)據(jù)]" 周D賦值:"KDJ的D[取周線數(shù)據(jù)]" 日K賦值:"隨機(jī)指標(biāo)KD的K" 日D賦值:"隨機(jī)指標(biāo)KD的D" 日金叉賦值:如果日K上穿日D,返回15,否則返回0 周金叉賦值:如果周K上穿周D,返回25,否則返回0 月金叉賦值:如果月K上穿月D,返回35,否則返回0 日周月賦值:如果日金叉=15AND周金叉=25AND月金叉=35,返回1,否則返回0 日周月賺賦值:日周月=1 日周賦值:如果日金叉=15AND周金叉=25,返回2,否則返回0 日周賺賦值:日周=2 周月賦值:如果周金叉=25AND月金叉=35,返回3,否則返回0 日月賦值:如果日金叉=15AND月金叉=35,返回4,否則返回0 日月賺賦值:日月=4 周月賺賦值:周月=3 當(dāng)滿足條件日周月賺時(shí),在趨勢(shì)*0.96位置書寫文字,畫紅色 當(dāng)滿足條件周月賺時(shí),在趨勢(shì)*0.97位置書寫文字,COLORFF00FF 當(dāng)滿足條件日月賺時(shí),在趨勢(shì)*0.98位置書寫文字,畫黃色 DIF賦值:不定周期收盤價(jià)的12日指數(shù)移動(dòng)平均-不定周期收盤價(jià)的26日指數(shù)移動(dòng)平均 DEA賦值:DIF的9日指數(shù)移動(dòng)平均 AAA賦值:(DIF-DEA)*2*60 啟動(dòng)賦值:AAA-1日前的AAA上穿15,畫紅色,線寬為2 當(dāng)滿足條件啟動(dòng)時(shí),在最低價(jià)*0.97位置書寫文字,畫黃色,線寬為2 AA賦值:(收盤價(jià)的3日簡單移動(dòng)平均+收盤價(jià)的6日簡單移動(dòng)平均+收盤價(jià)的12日簡單移動(dòng)平均+收盤價(jià)的24日簡單移動(dòng)平均)/4 BB賦值:AA的2日指數(shù)移動(dòng)平均 TP賦值:(AA上穿BB OR 收盤價(jià)上穿AA) AND 收盤價(jià)>=收盤價(jià)的55日指數(shù)移動(dòng)平均 CC賦值:收盤價(jià)的12日指數(shù)移動(dòng)平均-收盤價(jià)的26日指數(shù)移動(dòng)平均 DD賦值:CC的9日指數(shù)移動(dòng)平均 主升啟動(dòng)賦值:TP AND CC上穿DD AND (DD<=-0.07)*CC 當(dāng)滿足條件主升啟動(dòng)時(shí),在最低價(jià)*0.996位置畫1號(hào)圖標(biāo) 當(dāng)滿足條件主升啟動(dòng)時(shí),在最低價(jià)位置書寫文字 VAR1賦值:(收盤價(jià)+最高價(jià)+開盤價(jià)+最低價(jià))/4 MA1賦值:VAR1的3日簡單移動(dòng)平均 輸出MAA5:收盤價(jià)的5日簡單移動(dòng)平均,畫紅色,線寬為1 A3賦值:(收盤價(jià)-9日內(nèi)最低價(jià)的最低值)/(9日內(nèi)最高價(jià)的最高值-9日內(nèi)最低價(jià)的最低值)*100 A4賦值:A3的3日[1日權(quán)重]移動(dòng)平均 A5賦值:A4的3日[1日權(quán)重]移動(dòng)平均 A6賦值:3*A4-2*A5 A7賦值:收盤價(jià)-1日前的收盤價(jià) A8賦值:100*A7的6日指數(shù)移動(dòng)平均的6日指數(shù)移動(dòng)平均/A7的絕對(duì)值的6日指數(shù)移動(dòng)平均的6日指數(shù)移動(dòng)平均 AAA2賦值:如果收盤價(jià)>1日前的收盤價(jià),返回成交量(手)*收盤價(jià),否則返回0的歷史累和 AAA3賦值:如果收盤價(jià)<1日前的收盤價(jià),返回成交量(手)*收盤價(jià),否則返回0的歷史累和 AAA4賦值:如果收盤價(jià)=1日前的收盤價(jià),返回成交量(手)*收盤價(jià),否則返回0的歷史累和 BB1賦值:0 B1萬元賦值:不定周期成交量*不定周期收盤價(jià)/100 B1差賦值:B1萬元-1日前的B1萬元 B2萬元賦值:不定周期成交量*不定周期收盤價(jià)/100 B2比賦值:B2萬元/1日前的B2萬元 凈流入萬元賦值:(AAA2-AAA3-0.5*AAA4) PM賦值:凈流入萬元的1日簡單移動(dòng)平均 PMA賦值:PM/1日前的PM>1 PMB賦值:1日前的PMA<1 AND PMA 輸出密碼:(B1萬元的2日簡單移動(dòng)平均的2日指數(shù)移動(dòng)平均)/100000,畫黃色,NODRAW 二日比賦值:密碼/1日前的密碼 Z1賦值:字符串相加 Z2賦值:字符串相加 Z3賦值:字符串相加 當(dāng)滿足條件是否最后一個(gè)周期時(shí),在橫軸0.01縱軸0.01位置書寫文字,畫黃色 當(dāng)滿足條件收陽線時(shí),在橫軸0.01縱軸0.9位置書寫文字,畫紅色 當(dāng)滿足條件收陽線時(shí),在橫軸1縱軸1位置書寫文字,畫紅色

?

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

源碼：

?

趨勢(shì):EMA(EMA(C,4),4),COLORYELLOW;
月K:="KDJ.K#MONTH";
月D:="KDJ.D#MONTH";
周K:="KDJ.K#WEEK";
周D:="KDJ.D#WEEK";
日K:="KD.K";
日D:="KD.D";
日金叉:=IF(CROSS(日K,日D),15,0);
周金叉:=IF(CROSS(周K,周D),25,0);
月金叉:=IF(CROSS(月K,月D),35,0);
日周月:=IF(日金叉=15 AND 周金叉=25 AND 月金叉=35,1,0);
日周月賺:=日周月=1;
日周:=IF(日金叉=15 AND 周金叉=25,2,0);
日周賺:=日周=2;
周月:=IF(周金叉=25 AND 月金叉=35,3,0);
日月:=IF(日金叉=15 AND 月金叉=35,4,0);
日月賺:=日月=4;
周月賺:=周月=3;
DRAWTEXT(日周月賺,趨勢(shì)*0.96,'↖LSP大牛'),COLORRED;
DRAWTEXT(周月賺,趨勢(shì)*0.97,'↖LSP金牛'),COLORFF00FF;
DRAWTEXT(日月賺,趨勢(shì)*0.98,'↖LSP牛牛'),COLORYELLOW;
DIF:=EMA(DCLOSE,12)-EMA(DCLOSE,26);
DEA:=EMA(DIF,9);
AAA:=(DIF-DEA)*2*60;
啟動(dòng):=CROSS(AAA-REF(AAA,1),15),COLORRED,LINETHICK2;
DRAWTEXT(啟動(dòng),L*0.97,'↖金牛啟動(dòng)'),COLORYELLOW,LINETHICK2;
AA:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
BB:=EMA(AA,2);
TP:=(CROSS(AA,BB) OR CROSS(C,AA)) AND C>=EMA(C,55);
CC:=EMA(CLOSE,12)-EMA(CLOSE,26);
DD:=EMA(CC,9);
主升啟動(dòng):=TP AND CROSS(CC,DD) AND (DD<=-0.07)*CC;
DRAWICON(主升啟動(dòng),L*0.996,1);
DRAWTEXT(主升啟動(dòng),L,'↖LSP牛');
VAR1:=(C+H+O+L)/4;
MA1:=MA(VAR1,3);
MAA5:MA(C,5),COLORRED,LINETHICK1;
A3:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
A4:=SMA(A3,3,1);
A5:=SMA(A4,3,1);
A6:=3*A4-2*A5;
A7:=C-REF(C,1);
A8:=100*EMA(EMA(A7,6),6)/EMA(EMA(ABS(A7),6),6);
AAA2:=SUM(IF( CLOSE>REF(CLOSE,1),VOL*C,0),0);
AAA3:=SUM(IF( CLOSE<REF(CLOSE,1),VOL*C,0),0);
AAA4:=SUM(IF( CLOSE=REF(CLOSE,1),VOL*C,0),0);
BB1:=0;
B1萬元:=DVOL*DCLOSE/100;
B1差:=B1萬元-REF(B1萬元,1);
B2萬元:=DVOL*DCLOSE/100;
B2比:=B2萬元/REF(B2萬元,1);
凈流入萬元:=(AAA2-AAA3-0.5*AAA4);
PM:=MA(凈流入萬元,1);
PMA:=PM/REF(PM,1)>1;
PMB:=REF(PMA,1)<1 AND PMA;
密碼:(EMA(MA(B1萬元,2),2))/100000,COLORYELLOW,NODRAW;
二日比:=密碼/REF(密碼,1);
Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(Z2,' ');
DRAWTEXT_FIX(ISLASTBAR,0.01,0.01,0,STRCAT(Z3,GNBLOCK)),COLORYELLOW;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á)信公式源碼導(dǎo)入方法教程】 【同花順公式源碼導(dǎo)入方法教程】 【大智慧新一代公式源碼導(dǎo)入方法教程】

?