相關標簽:

?

?

原理解析：
VAR2賦值:1日前的最低價 VAR3賦值:最低價-VAR2的絕對值的13日[1日權重]移動平均/最低價-VAR2和0的較大值的13日[1日權重]移動平均*100 VAR4賦值:如果收盤價*1.2,返回VAR3*13,否則返回VAR3/13的13日指數移動平均 VAR5賦值:34日內最低價的最低值 VAR6賦值:34日內VAR4的最高值 VAR7賦值:如果55日內最低價的最低值,返回1,否則返回0 VAR8賦值:如果最低價<=VAR5,返回(VAR4+VAR6*2)/2,否則返回0的3日指數移動平均/618*VAR7 VAR9賦值:收盤價的5日指數移動平均 VAR10賦值:(收盤價-收盤價的34日簡單移動平均)/收盤價的34日簡單移動平均*(-10) VAR11賦值:如果最低價<=VAR5,返回(VAR4+VAR6*2)/2,否則返回0的3日指數移動平均/618*VAR7*(-1) VAR12賦值:收盤價的5日指數移動平均*(-1) 當滿足條件VAR8>1日前的VAR8時,在0和VAR8位置之間畫柱狀線,寬度為6,1不為0則畫空心柱.,COLOR10FFFF,線寬為3 輸出備錢:如果VAR8>1日前的VAR8,返回0,否則返回VAR8,COLOR0FFFFF 當滿足條件VAR11>1日前的VAR11時,在0和VAR11位置之間畫柱狀線,寬度為6,1不為0則畫空心柱.,COLORFFF810 輸出界:0,COLORFFFFFF,線寬為1 XL1賦值:最低價的2日簡單移動平均*0.96 XL2賦值:最低價的26日簡單移動平均*0.85 XL3賦值:1日前的XL1<XL2 AND 1日前的XL1<XL1 AND 1日前的XL1<2日前的XL1 當滿足條件XL3時,在0和VAR8*3位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,畫紅色 輸出和選股結合用:如果XL3,返回0,否則返回VAR8*3,畫紅色 VA賦值:(2*收盤價+最高價+最低價)/4 VB賦值:5日內最低價的最低值 VC賦值:5日內最高價的最高值 輸出紅線上穿買:(VA-VB)/(VC-VB)*27的5日指數移動平均,畫紅色 輸出紅線下穿賣:紅線上穿買的3日指數移動平均,COLORFFFF00 散戶賦值: ((2*收盤價+最高價+最低價)/4-5日內最低價的最低值)/(4日內最高價的最高值-5日內最低價的最低值)*100的4日指數移動平均 莊家賦值: 0.667*1日前的散戶+0.333*散戶的2日指數移動平均 當滿足條件散戶上穿莊家AND散戶<30時,在5位置書寫文字,COLOR00FF00 當滿足條件散戶上穿莊家AND散戶<30時,在7位置書寫文字,COLORFFFFFF 當滿足條件莊家上穿散戶AND散戶>70時,在25位置書寫文字,COLOR00FF00 當滿足條件莊家上穿散戶AND散戶>70時,在22位置書寫文字,COLOR00FF00 輸出極品底:如果(收盤價的5日簡單移動平均-收盤價)/收盤價>0.04AND(收盤價的10日簡單移動平均-收盤價的5日簡單移動平均)/收盤價的5日簡單移動平均>0.04,返回23,否則返回0,線寬為2,COLORFF00FF 當滿足條件極品底=23時,在23位置畫1號圖標,線寬為2,COLORFFFFFF RSV賦值:(((收盤價 - 9日內最低價的最低值) / (9日內最高價的最高值 - 9日內最低價的最低值)) * 100) K賦值:RSV的3日[1日權重]移動平均 D賦值:K的3日[1日權重]移動平均 J賦值:3*K-2*D X賦值:2日內J的最低值=8日內J的最低值 當滿足條件J上穿1日前的J+0.01ANDXANDJ<19時,在3位置書寫文字,COLORFFFF00 當滿足條件J上穿1日前的J+0.01ANDXANDJ<19時,在7位置書寫文字,畫紅色 當滿足條件J上穿1日前的J+0.01ANDXANDJ<19時,在6位置書寫文字,畫紅色 當滿足條件J上穿1日前的J+0.01ANDXANDJ<19時,在5位置書寫文字,畫紅色 QVAR1A賦值:((21日內最高價的最高值-收盤價)/(21日內最高價的最高值-21日內最低價的最低值))*(100)-10 QVAR1B賦值:((收盤價-21日內最低價的最低值)/(21日內最高價的最高值-21日內最低價的最低值))*(100) QVAR1C賦值:QVAR1B的13日[8日權重]移動平均 QVAR1D賦值:QVAR1A的21日[8日權重]移動平均 機會來臨賦值:QVAR1C的13日[8日權重]移動平均,畫紅色 AAS賦值:(統計3日中滿足(機會來臨-QVAR1D<(-65))的天數=3)的34日過濾 輸出波段買點:如果AAS,返回15,否則返回0,COLORFFFFFF,STICK,線寬為6 當滿足條件波段買點時,在17位置書寫文字,COLORFFFFFF

?

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

源碼：

?

?

?

VAR2:=REF(LOW,1);
VAR3:=SMA(ABS(LOW-VAR2),13,1)/SMA(MAX(LOW-VAR2,0),13,1)*100;
VAR4:=EMA(IF(CLOSE*1.2,VAR3*13,VAR3/13),13);
VAR5:=LLV(LOW,34);
VAR6:=HHV(VAR4,34);
VAR7:=IF(LLV(LOW,55),1,0);
VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7;
VAR9:=EMA(CLOSE,5);
VAR10:=(CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*(-10);
VAR11:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7*(-1);
VAR12:=EMA(CLOSE,5)*(-1);
STICKLINE(VAR8>REF(VAR8,1),0,VAR8,6,1),COLOR10FFFF,LINETHICK3;
備錢:IF(VAR8>REF(VAR8,1),0,VAR8),COLOR0FFFFF;
STICKLINE(VAR11>REF(VAR11,1),0,VAR11,6,1),COLORFFF810;
界:0,COLORFFFFFF,LINETHICK1;
XL1:=MA(LOW,2)*0.96;
XL2:=MA(LOW,26)*0.85;
XL3:=REF(XL1,1)<XL2 AND REF(XL1,1)<XL1 AND REF(XL1,1)<REF(XL1,2);
STICKLINE(XL3,0,VAR8*3,8,0),COLORRED;
啟動:IF(XL3,0,VAR8*3),COLORRED;
VA:=(2*C+H+L)/4;
VB:=LLV(L,5);
VC:=HHV(H,5);
紅線上穿買:EMA((VA-VB)/(VC-VB)*27,5),COLORRED;
紅線下穿賣:EMA(紅線上穿買,3),COLORFFFF00;
散戶:= EMA(((2*CLOSE+HIGH+LOW)/4-LLV(LOW,5))/(HHV(HIGH,4)-LLV(LOW,5))*100,4);
莊家:= EMA(0.667*REF(散戶,1)+0.333*散戶,2);
DRAWTEXT(CROSS(散戶,莊家) AND 散戶<30,5,'低進'),COLOR00FF00;
DRAWTEXT(CROSS(散戶,莊家) AND 散戶<30,7,'●'),COLORFFFFFF;
DRAWTEXT(CROSS(莊家,散戶) AND 散戶>70,25,'高出'),COLOR00FF00;
DRAWTEXT(CROSS(莊家,散戶) AND 散戶>70,22,'●'),COLOR00FF00;
極品底:IF((MA(C,5)-C)/C>0.04 AND (MA(C,10)-MA(C,5))/MA(C,5)>0.04,23,0),LINETHICK2,COLORFF00FF;
DRAWICON(極品底=23,23,1),LINETHICK2,COLORFFFFFF;
RSV:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 100);
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
X:=LLV(J,2)=LLV(J,8);
DRAWTEXT(CROSS(J,REF(J+0.01,1)) AND X AND J<19,3,'低進'),COLORFFFF00;
DRAWTEXT(CROSS(J,REF(J+0.01,1)) AND X AND J<19,7,'▲'),COLORRED;
DRAWTEXT(CROSS(J,REF(J+0.01,1)) AND X AND J<19,6,'▲'),COLORRED;
DRAWTEXT(CROSS(J,REF(J+0.01,1)) AND X AND J<19,5,'↑'),COLORRED;
QVAR1A:=((HHV(HIGH,21)-CLOSE)/(HHV(HIGH,21)-LLV(LOW,21)))*(100)-10;
QVAR1B:=((CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21)))*(100);
QVAR1C:=SMA(QVAR1B,13,8);
QVAR1D:=SMA(QVAR1A,21,8);
機會來臨:=SMA(QVAR1C,13,8),COLORRED;
AAS:=FILTER((COUNT((機會來臨-QVAR1D<(-65)),3)=3),34);
波段買點:IF(AAS,15,0),COLORFFFFFF,STICK,LINETHICK6;
DRAWTEXT(波段買點,17,'波段買'),COLORFFFFFF;

?

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

?