相關(guān)標(biāo)簽:博發(fā)世家殺四分之一 、 博發(fā)世家免費(fèi)資料大全 、 71期博發(fā)世家九肖王 、 博發(fā)世家原創(chuàng)猛料 、 博發(fā)世家正版九肖 、 95期博發(fā)世家九肖王 、 博發(fā)世家9肖王 論壇 、 博發(fā)世家免資料大全 、 83期博發(fā)世家九肖王 、 藍(lán)月亮博發(fā)世家 、 富民3肖6碼默認(rèn)論壇 、 博發(fā)世家免費(fèi)料大全 、

?

萬法歸一，濃縮精華

原理解析：
填充背景 DRAWTEXTREL(10,900,'㊣十二星座*神獒贏富㊣'),線寬為1,COLOR00EEFF RSV賦值:(收盤價(jià)-9日內(nèi)最低價(jià)的最低值)/(9日內(nèi)最高價(jià)的最高值-9日內(nèi)最低價(jià)的最低值)*100 輸出K:RSV的3日[1日權(quán)重]移動平均,線寬為2,畫白色 輸出D:K的3日[1日權(quán)重]移動平均,線寬為2,COLOR00DDDD 輸出J:3*K-2*D,線寬為2,COLOR800080 輸出DIFF:收盤價(jià)的12日指數(shù)移動平均-收盤價(jià)的26日指數(shù)移動平均,線寬為0,COLOR0099FF 輸出DEA :DIFF的9日指數(shù)移動平均,線寬為0,COLORD89837 輸出平滑異同平均:2*(DIFF-DEA),COLORFF9999,線寬為0 YLZC賦值:如果收盤價(jià)=大盤的收盤價(jià),返回(大盤的收盤價(jià)+大盤的最高價(jià)+大盤的最低價(jià)+大盤的開盤價(jià))/4,否則返回成交額(元)/(成交量(手)+0.01)/100 阻價(jià)賦值:如果收盤價(jià)=大盤的收盤價(jià),返回YLZC+大盤的收盤價(jià)-大盤的最低價(jià),否則返回YLZC+(收盤價(jià)-最低價(jià)) 支價(jià)賦值:如果收盤價(jià)=大盤的收盤價(jià),返回大盤的最低價(jià)+大盤的收盤價(jià)-YLZC,否則返回最低價(jià)+(收盤價(jià)-YLZC) 輸出今壓:1日前的阻價(jià),線寬為0,COLORAA11BB 輸出今撐:1日前的支價(jià),線寬為0,COLOR009900 輸出明壓:阻價(jià),線寬為0 輸出明撐:支價(jià),線寬為0 RSV1賦值:(9.8日內(nèi)最高價(jià)的最高值-收盤價(jià))/(9.8日內(nèi)最高價(jià)的最高值-9.8日內(nèi)最低價(jià)的最低值)*101 KK賦值:RSV1的3日[1日權(quán)重]移動平均 DD賦值:KK的3日[1日權(quán)重]移動平均 JJ賦值:3*KK-2*DD 買賣賦值:如果JJ>=100,返回100,否則返回如果JJ<=0,返回0,否則返回JJ 輸出明天買:如果買賣=100,返回0-10,否則返回0,COLOR00CCCC 輸出明天賣:如果買賣=0,返回90,否則返回100,COLOR00FF00 KX賦值:250 KH賦值:KX日內(nèi)K的最高值 DH賦值:KX日內(nèi)D的最高值 JH賦值:KX日內(nèi)J的最高值 KL賦值:KX日內(nèi)K的最低值 DL賦值:KX日內(nèi)D的最低值 JL賦值:KX日內(nèi)J的最低值 HKMAX賦值:KH和DH和JH的較大值的較大值 LKMIN賦值:KL和DL和JL的較小值的較小值 KHLB賦值:(HKMAX+LKMIN)/2 KHLC賦值:HKMAX-LKMIN MHF賦值:KX日內(nèi)DIFF的最高值 MHD賦值:KX日內(nèi)DEA的最高值 MHM賦值:KX日內(nèi)MACD的最高值 MLF賦值:KX日內(nèi)DIFF的最低值 MLD賦值:KX日內(nèi)DEA的最低值 MLM賦值:KX日內(nèi)MACD的最低值 HMAX賦值:MHF和MHD和MHM的較大值的較大值 LMIN賦值:MLF和MLD和MLM的較小值的較小值 FHLB賦值:(HMAX-LMIN)/100 FHLC賦值:HMAX-LMIN SH賦值:(0-FHLB)*(KHLC/FHLC)+KHLB DIFFA賦值:(DIFF-FHLB)*(KHLC/FHLC)+KHLB DEAA賦值:(DEA-FHLB)*(KHLC/FHLC)+KHLB MACDA賦值:(MACD-FHLB)*(KHLC/FHLC)+KHLB CDA賦值:MACD<1日前的MACD AND MACD>0 CDB賦值:MACD>=1日前的MACD AND MACD>0 CDC賦值:MACD>1日前的MACD AND MACD<0 CDD賦值:MACD<=1日前的MACD AND MACD<0 當(dāng)滿足條件CDA時(shí),在SH和MACDA位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLOR00AAFF 當(dāng)滿足條件CDA時(shí),在SH和MACDA位置之間畫柱狀線,寬度為6.6,0不為0則畫空心柱.,COLOR00BBFF 當(dāng)滿足條件CDA時(shí),在SH和MACDA位置之間畫柱狀線,寬度為4.4,0不為0則畫空心柱.,COLOR00CCFF 當(dāng)滿足條件CDA時(shí),在SH和MACDA位置之間畫柱狀線,寬度為3.3,0不為0則畫空心柱.,COLOR00DDFF 當(dāng)滿足條件CDA時(shí),在SH和MACDA位置之間畫柱狀線,寬度為2.2,0不為0則畫空心柱.,COLOR00EEFF 當(dāng)滿足條件CDA時(shí),在SH和MACDA位置之間畫柱狀線,寬度為1.1,0不為0則畫空心柱.,COLOR00FFFF 當(dāng)滿足條件CDB時(shí),在SH和MACDA位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLOR0000AA 當(dāng)滿足條件CDB時(shí),在SH和MACDA位置之間畫柱狀線,寬度為6.6,0不為0則畫空心柱.,COLOR0011BB 當(dāng)滿足條件CDB時(shí),在SH和MACDA位置之間畫柱狀線,寬度為4.4,0不為0則畫空心柱.,COLOR0022CC 當(dāng)滿足條件CDB時(shí),在SH和MACDA位置之間畫柱狀線,寬度為3.3,0不為0則畫空心柱.,COLOR0033DD 當(dāng)滿足條件CDB時(shí),在SH和MACDA位置之間畫柱狀線,寬度為2.2,0不為0則畫空心柱.,COLOR0044EE 當(dāng)滿足條件CDB時(shí),在SH和MACDA位置之間畫柱狀線,寬度為1.1,0不為0則畫空心柱.,COLOR0055FF 當(dāng)滿足條件CDC時(shí),在SH和MACDA位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLORAA00BB 當(dāng)滿足條件CDC時(shí),在SH和MACDA位置之間畫柱狀線,寬度為6.6,0不為0則畫空心柱.,COLORBB11BB 當(dāng)滿足條件CDC時(shí),在SH和MACDA位置之間畫柱狀線,寬度為4.4,0不為0則畫空心柱.,COLORCC22BB 當(dāng)滿足條件CDC時(shí),在SH和MACDA位置之間畫柱狀線,寬度為3.3,0不為0則畫空心柱.,COLORDD33BB 當(dāng)滿足條件CDC時(shí),在SH和MACDA位置之間畫柱狀線,寬度為2.2,0不為0則畫空心柱.,COLOREE44BB 當(dāng)滿足條件CDC時(shí),在SH和MACDA位置之間畫柱狀線,寬度為1.1,0不為0則畫空心柱.,COLORFF55BB 當(dāng)滿足條件CDD時(shí),在SH和MACDA位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLORFF7700 當(dāng)滿足條件CDD時(shí),在SH和MACDA位置之間畫柱狀線,寬度為6.6,0不為0則畫空心柱.,COLORFF8811 當(dāng)滿足條件CDD時(shí),在SH和MACDA位置之間畫柱狀線,寬度為4.4,0不為0則畫空心柱.,COLORFFAA22 當(dāng)滿足條件CDD時(shí),在SH和MACDA位置之間畫柱狀線,寬度為3.3,0不為0則畫空心柱.,COLORFFBB33 當(dāng)滿足條件CDD時(shí),在SH和MACDA位置之間畫柱狀線,寬度為2.2,0不為0則畫空心柱.,COLORFFDD44 當(dāng)滿足條件CDD時(shí),在SH和MACDA位置之間畫柱狀線,寬度為1.1,0不為0則畫空心柱.,COLORFFDD55 PARTLINE(DIFFA,DIFF>0,自定色,DIFF<0,自定色) PARTLINE(DEAA,DEA>0,自定色,DEA<0,自定色) 當(dāng)滿足條件數(shù)據(jù)位置狀態(tài)=2時(shí),在SH位置書寫文字,COLOR00AAAA TYP賦值:(最高價(jià)+最低價(jià)+收盤價(jià))/3 當(dāng)滿足條件DIFF>1日前的DIFF時(shí),在20和20位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,畫紅色 當(dāng)滿足條件DIFF<1日前的DIFF時(shí),在20和20位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,畫綠色 當(dāng)滿足條件K>=1日前的KORK>DANDDIFF>1日前的DIFF時(shí),在80和80位置之間畫柱狀線,寬度為2,1不為0則畫空心柱.,畫紅色 當(dāng)滿足條件K<1日前的K時(shí),在80和80位置之間畫柱狀線,寬度為2,1不為0則畫空心柱.,畫綠色 MACD金叉賦值:MACD上穿DIFF AND MACD>=(0-0.05) AND MACD<=0.02 當(dāng)滿足條件MACD金叉時(shí),在MACDA*0.82位置書寫文字,COLOR00FFFF XX賦值:最低價(jià)的3日簡單移動平均*0.96的30日指數(shù)移動平均 DIFF金叉賦值:如果DIFF上穿DEAANDXX-1日前的XX>0ANDMACD>=1日前的MACDANDDIFF<=0,返回1,否則返回0 當(dāng)滿足條件DIFF金叉=1時(shí),在DIFFA*1.68位置書寫文字,COLORCDFFBB 低位金叉賦值:DIFF上穿DEA AND DIFF<-0.1 當(dāng)滿足條件低位金叉時(shí),在DEAA*0.99位置書寫文字,COLOR0099DD DIFDEA賦值:統(tǒng)計(jì)上次DEA>=0距今天數(shù)日中滿足DIFF上穿DEA的天數(shù) 二次金叉賦值:DIFF上穿DEA AND DEA<0 AND 統(tǒng)計(jì)21日中滿足DIFDEA=2的天數(shù)=1 當(dāng)滿足條件二次金叉時(shí),在DEAA*0.99-8位置書寫文字,COLORFF00FF A1賦值:上次1日前的DIFF上穿DEA距今天數(shù) 底背離賦值:A1+1日前的收盤價(jià)>收盤價(jià) AND DIFF>A1+1日前的DIFF AND DIFF上穿DEA 當(dāng)滿足條件底背離時(shí),在DEAA*0.99-16位置書寫文字,COLOR0099FF A2賦值:上次1日前的DEA上穿DIFF距今天數(shù) 頂背離賦值:A2+1日前的收盤價(jià)<收盤價(jià) AND A2+1日前的DIFF>DIFF AND DEA上穿DIFF 當(dāng)滿足條件頂背離的5日過濾時(shí),在DEAA*1.02位置書寫文字,COLORDDAAAA 周DIFF賦值:"MACD.DIFF[取周線數(shù)據(jù)]" 周DEA賦值:"MACD.DEA[取周線數(shù)據(jù)]" 周MACD賦值:"MACD.MACD[取周線數(shù)據(jù)]" DIF周金叉賦值:周DIFF上穿周DEA 當(dāng)滿足條件DIF周金叉時(shí),在DEAA位置書寫文字,COLOR0099FF 當(dāng)滿足條件周DEA上穿周DIFF時(shí),在DEAA+4位置書寫文字,ALIGN0,COLORCDFFBB MACD周金叉賦值:周MACD上穿周DIFF AND 周MACD>=(0-0.05) AND 周MACD<=0.02 當(dāng)滿足條件MACD周金叉時(shí),在MACDA-0.03位置書寫文字,COLOR00FFFF 月DIFF賦值:"MACD.DIFF[取月線數(shù)據(jù)]" 月DEA賦值:"MACD.DEA[取月線數(shù)據(jù)]" DIF月金叉賦值:月DIFF上穿月DEA 當(dāng)滿足條件DIF月金叉時(shí),在DEAA*0.98位置書寫文字,COLOR00FFCC 當(dāng)滿足條件月DEA上穿月DIFF時(shí),在DEAA*1.02位置書寫文字,ALIGN0,COLORDDDDDD 周K賦值:"KDJ的K[取周線數(shù)據(jù)]"(9,3,3) 周D賦值:"KDJ的D[取周線數(shù)據(jù)]"(9,3,3) 周J賦值:"KDJ的J[取周線數(shù)據(jù)]"(9,3,3) 月K賦值:"KDJ的K[取月線數(shù)據(jù)]"(9,3,3) 月D賦值:"KDJ的D[取月線數(shù)據(jù)]"(9,3,3) 月J賦值:"KDJ的J[取月線數(shù)據(jù)]"(9,3,3) 月金叉賦值:月K上穿月D 周金叉賦值:周K上穿周D 日金叉賦值:K上穿DANDK<20的4日過濾 當(dāng)滿足條件月金叉時(shí),在月D-2位置書寫文字,ALIGN0,COLOR0022EE 當(dāng)滿足條件月金叉時(shí),在月D-2位置書寫文字,畫黃色 當(dāng)滿足條件周金叉時(shí),在周D位置書寫文字,ALIGN2,COLOR0022EE 當(dāng)滿足條件周金叉時(shí),在周D位置書寫文字,畫綠色 當(dāng)滿足條件日金叉時(shí),在K位置畫1號圖標(biāo),ALIGN2 當(dāng)滿足條件日金叉時(shí),在D-6位置書寫文字,COLOR00CCCC 當(dāng)滿足條件周D上穿周K時(shí),在周D*1.2位置書寫文字,COLOR00DDBB 當(dāng)滿足條件月D上穿月K時(shí),在月D位置書寫文字,COLORFFFFFF KDB賦值:上次1日前的K上穿D距今天數(shù) KDDB賦值:KDB+1日前的收盤價(jià)>收盤價(jià) AND KDB+1日前的K<K AND K上穿D K底背賦值:如果KDDB>0的5日過濾,返回1,否則返回0 當(dāng)滿足條件K底背=1時(shí),在D*0.98位置書寫文字,COLORDDDDDD KDD賦值:上次1日前的D上穿K距今天數(shù) K頂背賦值:KDD+1日前的收盤價(jià)<收盤價(jià) AND KDD+1日前的K>K AND D上穿K 當(dāng)滿足條件K頂背>0的5日過濾時(shí),在D+8位置書寫文字,COLORFFAA22 MD1賦值:收盤價(jià)的80日簡單移動平均-收盤價(jià)的13日簡單移動平均/3 MD2賦值:(收盤價(jià)-MD1)/MD1的3日簡單移動平均 買點(diǎn)1賦值:MD2上穿0 AND 最低價(jià)/1日前的最高價(jià)<1.012 AND J<75 AND J>1日前的J MA12賦值:收盤價(jià)的12日簡單移動平均 佳點(diǎn)賦值:如果MACD>=5日前的MACDANDOPEN<=1日前的收盤價(jià)ANDXX-1日前的XX>0ANDMACD<=0ANDMA12-1日前的MA12>=0的3日過濾ANDJ<80ANDJ>1日前的JANDD>1日前的DAND(DIFF>=1日前的DIFFORDEA>=R,返回F(DEA,1)),否則返回1 當(dāng)滿足條件佳點(diǎn)=1時(shí),在MACDA*0.98位置書寫文字,COLOR0099FF DX0賦值:收盤價(jià)的2日指數(shù)移動平均-開盤價(jià)的5日指數(shù)移動平均 DX1賦值:如果DX0上穿MACDANDLOW<=XXANDMACD<=(0-0.11)AND(J<20ORK<20),返回1,否則返回0 當(dāng)滿足條件DX1的3日過濾時(shí),在0位置書寫文字,COLOR00CC00 MA10賦值:收盤價(jià)的10日簡單移動平均 SS賦值:最高價(jià)的3日簡單移動平均*1.05的30日指數(shù)移動平均 LQS賦值:如果0.7*(DIFF上穿DEAANDCLOSE<SSANDXX-1日前的XX>0ANDCROSS(MACD,0)ANDMACD>=0ANDDIFF>0ANDMA10-1日前的MA10>0ANDVOL>1日前的成交量(手))>=0.7AND(收盤價(jià)<SSANDXX-?日前的XX的?日過濾,返回)>0),5)ANDJ<80,否則返回1 當(dāng)滿足條件LQS=1時(shí),在MACDA*0.98位置書寫文字,COLORCDFFDD 最佳點(diǎn)賦值:如果統(tǒng)計(jì)3日中滿足MD2>1日前的MD2的天數(shù)=3ANDCOUNT(MD2<0,10)=10ANDREF(MD2,3)=10日內(nèi)MD2的最低值A(chǔ)NDJ<80ANDJ>1日前的J,返回1,否則返回0 當(dāng)滿足條件最佳點(diǎn)=1時(shí),在J位置書寫文字,COLORFF00CC 買點(diǎn)2賦值:2日前的MD2=20日內(nèi)MD2的最低值 AND 2日前的MD2<0.071 AND 2日前的MD2<1日前的MD2 ANDNOT(1日前的最低價(jià)>2日前的最高價(jià) AND 最低價(jià)>1日前的最高價(jià)) AND 收盤價(jià)>1日前的收盤價(jià) AND J<75 AND J>1日前的J 當(dāng)滿足條件買點(diǎn)1OR買點(diǎn)2時(shí),在D-1位置書寫文字,COLORFF00CC YZ賦值:(RSV的3日[1日權(quán)重]移動平均的整數(shù)部分+K的3日[1日權(quán)重]移動平均的整數(shù)部分)/2 預(yù)漲賦值:YZ上穿50 AND J<95 AND DIFF>1日前的DIFF AND 最低價(jià)<1日前的收盤價(jià) 當(dāng)滿足條件預(yù)漲時(shí),在D*0.6位置書寫文字,COLORA52A2A KD金叉賦值:K上穿DAND J>20 AND J<80 輸出選股:如果MACD上穿0ORDX1OR佳點(diǎn)ORLQSORK底背OR月金叉OR周金叉OR日金叉OR買點(diǎn)1OR買點(diǎn)2OR最佳點(diǎn)ORMACD金叉ORDIFF金叉OR低位金叉OR二次金叉OR底背離ORDIF周金叉ORMACD周金叉ORDIF?返回金叉ORKD金叉,否則返回2,線寬為0

?

?來源:程序化99（ m.weiqiv.net.cn ）

源碼：

?

?

?

DRAWGBK((CLOSE > 0),STRIP(RGB(4,1,28),RGB(4,1,35),0));
DRAWTEXTREL(10,900,'㊣十二星座*神獒贏富㊣'),linethick1,COLOR00EEff;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:SMA(RSV,3,1),LINETHICK2,COLORWHITE;
D:SMA(K,3,1),LINETHICK2,COLOR00DDDD;
J:3*K-2*D,LINETHICK2,COLOR800080;
DIFF:EMA(CLOSE,12)-EMA(CLOSE,26),linethick0,COLOR0099FF;
DEA :EMA(DIFF,9),linethick0,COLORD89837;
MACD:2*(DIFF-DEA),COLORFF9999,linethick0;
YLZC:=if(close=INDEXC,(INDEXC+INDEXh+INDEXl+INDEXO)/4,AMOUNT/(vol+0.01)/100);
阻價(jià):=if(close=INDEXC,YLZC+INDEXC-INDEXl,YLZC+(close-low));
支價(jià):=if(close=INDEXC,INDEXl+INDEXC-YLZC,low+(close-YLZC));
今壓:REF(阻價(jià),1),LINETHICK0,COLORAA11BB;
今撐:REF(支價(jià),1),LINETHICK0,COLOR009900;
明壓:阻價(jià),LINETHICK0;
明撐:支價(jià),LINETHICK0;
rsv1:=(hhv(h,9.8)-c)/(hhv(h,9.8)-llv(l,9.8))*101;
kk:=sma(rsv1,3,1);
dd:=sma(kk,3,1);
jj:=3*kk-2*dd;
買賣:=if(jj>=100,100,if(jj<=0,0,jj));
明天買:if(買賣=100,0-10,0),color00cccc;
明天賣:if(買賣=0,90,100),color00ff00;
KX:=250;
KH:=HHV(K,KX);
DH:=HHV(D,KX);
JH:=HHV(J,KX);
KL:=LLV(K,KX);
DL:=LLV(D,KX);
JL:=LLV(J,KX);
HKMAX:=MAX(KH,MAX(DH,JH));
LKMIN:=MIN(KL,MIN(DL,JL));
KHLB:=(HKMAX+LKMIN)/2;
KHLC:=HKMAX-LKMIN;
MHF:=HHV(DIFF,KX);
MHD:=HHV(DEA,KX);
MHM:=HHV(MACD,KX);
MLF:=LLV(DIFF,KX);
MLD:=LLV(DEA,KX);
MLM:=LLV(MACD,KX);
HMAX:=MAX(MHF,MAX(MHD,MHM));
LMIN:=MIN(MLF,MIN(MLD,MLM));
FHLB:=(HMAX-LMIN)/100;
FHLC:=HMAX-LMIN;
SH:=(0-FHLB)*(KHLC/FHLC)+KHLB;
DIFFA:=(DIFF-FHLB)*(KHLC/FHLC)+KHLB;
DEAA:=(DEA-FHLB)*(KHLC/FHLC)+KHLB;
MACDA:=(macd-FHLB)*(KHLC/FHLC)+KHLB;
CDA:=MACD<ref(MACD,1) and MACD>0;
CDB:=MACD>=ref(MACD,1) and MACD>0;
CDC:=MACD>ref(MACD,1) and MACD<0;
CDD:=MACD<=ref(MACD,1) and MACD<0;
STICKLINE(CDA,SH,macda,6,0),COLOR00AAFF;{黃色段}
STICKLINE(CDA,SH,macda,6.6,0),COLOR00BBFF;
STICKLINE(CDA,SH,macda,4.4,0),COLOR00CCFF;
STICKLINE(CDA,SH,macda,3.3,0),COLOR00DDFF;
STICKLINE(CDA,SH,macda,2.2,0),COLOR00EEFF;
STICKLINE(CDA,SH,macda,1.1,0),COLOR00FFFF;
STICKLINE(CDB,SH,macda,6,0),COLOR0000AA; {紅色段}
STICKLINE(CDB,SH,macda,6.6,0),COLOR0011BB;
STICKLINE(CDB,SH,macda,4.4,0),COLOr0022CC;
STICKLINE(CDB,SH,macda,3.3,0),COLOR0033DD;
STICKLINE(CDB,SH,macda,2.2,0),COLOR0044EE;
STICKLINE(CDB,SH,macda,1.1,0),COLOR0055FF;
STICKLINE(CDC,SH,macda,6,0),COLORAA00BB;{向上粉紅}
STICKLINE(CDC,SH,macda,6.6,0),COLORBB11BB;
STICKLINE(CDC,SH,macda,4.4,0),COLORCC22BB;
STICKLINE(CDC,SH,macda,3.3,0),COLORDD33BB;
STICKLINE(CDC,SH,macda,2.2,0),COLOREE44BB;
STICKLINE(CDC,SH,macda,1.1,0),COLORFF55BB;
STICKLINE(CDD,SH,macda,6,0),COLORFF7700;
STICKLINE(CDD,SH,macda,6.6,0),COLORFF8811;
STICKLINE(CDD,SH,macda,4.4,0),COLORFFAA22;
STICKLINE(CDD,SH,macda,3.3,0),COLORFFBB33;
STICKLINE(CDD,SH,macda,2.2,0),COLORFFDD44;
STICKLINE(CDD,SH,macda,1.1,0),COLORFFDD55;
PARTLINE(DIFFA,DIFF>0,RGB(255,153,153),DIFF<0,RGB(255,153,153));
PARTLINE(DEAA,DEA>0,RGB(65,105,225),DEA<0,RGB(65,105,225));
DRAWTEXT(BARSTATUS=2,SH,'0'),color00aaaa;
TYP:=(HIGH+LOW+CLOSE)/3;
STICKLINE(diff>ref(diff,1),20,20,2,0),COLORRED;
STICKLINE(diff<ref(diff,1),20,20,2,0),COLORGREEN;
STICKLINE(K>=ref(K,1) or k>d and diff>ref(diff,1),80,80,2,1),COLORRED;
STICKLINE(K<ref(K,1),80,80,2,1),COLORGREEN;
MACD金叉:=CROSS(MACD,DIFF) AND MACD>=(0-0.05) AND MACD<=0.02;
DRAWTEXT(MACD金叉,macda*0.82,'MACD金叉'),color00FFFF;
XX:=ema(MA(LOW,3)*0.96,30);
DIFF金叉:=if(CROSS(DIFF,DEA) AND XX-REF(XX,1)>0 AND MACD>=REF(MACD,1) AND DIFF<=0,1,0);
DRAWTEXT(DIFF金叉=1,DIFFA*1.68,'DIFF金叉'),colorCDFFBB;
低位金叉:=CROSS(DIFF,DEA) AND DIFF<-0.1;
DRAWTEXT(低位金叉,deaa*0.99,' 低位金叉'),COLOR0099DD;
DIFDEA:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0));
二次金叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(DIFDEA=2,21)=1;
DRAWTEXT(二次金叉,deaa*0.99-8,' 二次金叉'),ColorFF00FF;
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
底背離:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA);
DRAWTEXT(底背離,DEAA*0.99-16,' 底背離'),Color0099FF;
A2:=BARSLAST(REF(CROSS(DEA,DIFF),1));
頂背離:=REF(CLOSE,A2+1)<CLOSE AND REF(DIFF,A2+1)>DIFF AND CROSS(DEA,DIFF);
DRAWTEXT(FILTER(頂背離,5),DEAA*1.02,'頂背離'),COLORDDAAAA;
{周金叉,死叉}
周DIFF:="MACD.DIFF#WEEK";
周DEA:="MACD.DEA#WEEK";
周MACD:="MACD.MACD#WEEK";
DIF周金叉:=CROSS(周DIFF,周DEA);
DRAWTEXT(DIF周金叉,DEAA,'DIFF周金叉'),COLOR0099FF;
DRAWTEXT(CROSS(周DEA,周DIFF),DEAA+4,'DIFF周死叉'),align0,COLORCDFFBB;
MACD周金叉:=CROSS(周MACD,周DIFF) AND 周MACD>=(0-0.05) AND 周MACD<=0.02;
DRAWTEXT(MACD周金叉,macda-0.03,'MACD周金叉'),color00FFFF;
{月金叉,死叉}
月DIFF:="MACD.DIFF#MONTH";
月DEA:="MACD.DEA#MONTH";
DIF月金叉:=CROSS(月DIFF,月DEA);
DRAWTEXT(DIF月金叉,DEAA*0.98,'DIF月金叉'),COLOR00FFCC;
DRAWTEXT(CROSS(月DEA,月DIFF),DEAA*1.02,'DIF月死叉'),align0,COLORDDDDDD;
周K:="KDJ.K#WEEK"(9,3,3);
周D:="KDJ.D#WEEK"(9,3,3);
周J:="KDJ.J#WEEK"(9,3,3);
月K:="KDJ.K#MONTH"(9,3,3);
月D:="KDJ.D#MONTH"(9,3,3);
月J:="KDJ.J#MONTH"(9,3,3);
月金叉:=cross(月K,月D);
周金叉:=cross(周K,周D);
日金叉:=FILTER(cross(K,D) and K<20,4);
drawtext(月金叉,月D-2,''),ALIGN0,color0022ee;
DRAWTEXT(月金叉,月D-2,'KD月金叉'),coloryellow;
drawtext(周金叉,周D,''),ALIGN2,color0022ee;
DRAWTEXT(周金叉,周D,' KD周金叉'),colorgreen;
DRAWICON(日金叉,K,1),align2;
DRAWTEXT(日金叉,D-6,'低位金叉'),color00CCCC;
DRAWTEXT(CROSS(周D,周K),周D*1.2,'KD周死叉'),COLOR00DDBB;
DRAWTEXT(CROSS(月D,月K),月D,'KD月死叉'),COLORFFFFFF;
KDB:=BARSLAST(ref(cross(k,d),1));
KDDB:=ref(close,KDB+1)>close and ref(k,KDB+1)<k and cross(k,d);
K底背:=if(FILTER(KDDB>0,5),1,0);
DRAWTEXT(K底背=1,D*0.98,'底背離'),COLORDDDDDD;
KDD:=BARSLAST(ref(cross(d,k),1));
K頂背:=ref(close,KDD+1)<close and ref(k,KDD+1)>k and cross(d,k);
DRAWTEXT(FILTER(K頂背>0,5),D+8,'頂背離'),COLORFFAA22;
MD1:=MA(CLOSE,80)-MA(CLOSE,13)/3;
MD2:=MA((CLOSE-MD1)/MD1,3);
買點(diǎn)1:=CROSS(MD2,0) AND LOW/REF(HIGH,1)<1.012 AND J<75 AND J>REF(J,1);
ma12:=MA(CLOSE,12);
佳點(diǎn):=if(FILTER(MACD>=REF(MACD,5) AND open<=ref(close,1) and XX-REF(XX,1)>0 AND MACD<=0 AND ma12-REF(ma12,1)>=0,3) and J<80 and J>ref(J,1) and D>ref(D,1) and (diff>=ref(diff,1) or dea>=ref(dea,1)),1,0);
DRAWTEXT(佳點(diǎn)=1,macda*0.98,'佳點(diǎn)'),color0099FF;
DX0:=EMA(CLOSE,2)-EMA(OPEN,5);
DX1:=if(CROSS(DX0,MACD) AND LOW<=XX AND MACD<=(0-0.11) and (J<20 or K<20),1,0);
DRAWTEXT(FILTER(DX1,3),0,'短10%'),color00CC00;{短線}
MA10:=MA(CLOSE,10);
SS:=EMA(MA(HIGH,3)*1.05,30);
LQS:=if(FILTER(0.7*(CROSS(DIFF,DEA) AND CLOSE<SS AND XX-REF(XX,1)>0 AND CROSS(MACD,0) AND MACD>=0 AND DIFF>0 AND ma10-REF(ma10,1)>0 AND VOL>REF(VOL,1))>=0.7 AND (CLOSE<SS AND XX-REF(XX,1)>0),5) AND J<80,1,0);
DRAWTEXT(LQS=1,macda*0.98,'量價(jià)齊上'),colorCDFFDD;{量價(jià)齊上}
最佳點(diǎn):=IF(COUNT(MD2>REF(MD2,1),3)=3 AND COUNT(MD2<0,10)=10 AND REF(MD2,3)=LLV(MD2,10) and J<80 and J>ref(J,1),1,0);
DRAWTEXT(最佳點(diǎn)=1,J,'最佳點(diǎn)'),colorFF00CC;
買點(diǎn)2:=REF(MD2,2)=LLV(MD2,20) AND REF(MD2,2)<0.071 AND REF(MD2,2)<REF(MD2,1) AND
NOT(REF(LOW,1)>REF(HIGH,2) AND LOW>REF(HIGH,1)) AND CLOSE>REF(CLOSE,1) AND J<75 AND J>REF(J,1);
DRAWTEXT(買點(diǎn)1 or 買點(diǎn)2,D-1,'買'),colorff00CC;
{預(yù)漲}
YZ:=(INTPART(SMA(RSV,3,1))+INTPART(SMA(K,3,1)))/2;
預(yù)漲:=cross(yz,50) and j<95 and diff>ref(diff,1) and low<ref(close,1);
DRAWTEXT(預(yù)漲,d*0.6,'預(yù)漲'),COLORA52A2A;
KD金叉:=cross(K,D)and J>20 and J<80;
選股:if(cross(macd,0) or DX1 or 佳點(diǎn) or LQS or K底背 or 月金叉 or 周金叉 or 日金叉 or 買點(diǎn)1 or 買點(diǎn)2 or 最佳點(diǎn) or MACD金叉 or DIFF金叉 or 低位金叉 or 二次金叉 or 底背離 or DIF周金叉 or MACD周金叉 or DIF月金叉 or KD金叉,2,0),LINETHICK0;

?

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

?