|
編程思路破譯 DIF賦值:收盤價的12日指數(shù)移動平均-收盤價的26日指數(shù)移動平均 DEA賦值:DIF的9日指數(shù)移動平均 MACDD賦值:(DIF-DEA)*2 P賦值:上次DIF上穿0.01距今天數(shù)+1 PER03賦值:上次DIF上穿DEA距今天數(shù) PER05賦值:上次DEA上穿DIF距今天數(shù) AA賦值:如果DIF上穿DEA,返回DEA,否則返回上個輸出值 間隔A賦值:PER03 間隔B賦值:間隔A+1日前的上次DIF上穿DEA距今天數(shù) 間隔E賦值:間隔B+間隔A+2日前的上次DIF上穿DEA距今天數(shù) 間隔C賦值:PER05 間隔D賦值:間隔C+1日前的上次DEA上穿DIF距今天數(shù) 似錦距離1賦值:間隔C-間隔A 似錦距離2賦值:間隔D+間隔C+1-(間隔B+間隔A+1) 上上次金叉賦值:間隔A+間隔B+1 上次金叉賦值:PER03 CCC1賦值:最低價在間隔A日前的間隔B+1天內(nèi)第1個最低價 CCC2賦值:最低價在間隔B+1日前的間隔B+間隔E+1天內(nèi)第1個最低價 CC1賦值:如果似錦距離1<=3,返回CCC1,否則返回最低價在上次金叉日前的似錦距離1+1天內(nèi)第1個最低價 CC2賦值:如果似錦距離2<=3,返回CCC2,否則返回最低價在上上次金叉日前的似錦距離2+2天內(nèi)第1個最低價 站上三十賦值:上次收盤價>收盤價的30日簡單移動平均距今天數(shù) PER8賦值:如果上次DIF上穿DEA距今天數(shù)<=1,返回1,否則返回上次DIF上穿DEA距今天數(shù) PER9賦值:統(tǒng)計(jì)PER03+1日中滿足收盤價>收盤價的30日簡單移動平均的天數(shù) PER10賦值:上次PER9=1距今天數(shù) A1賦值:PER8+1日前的DIF A2賦值:PER8日前的DIF B1賦值:PER8+1日前的DEA B2賦值:PER8日前的DEA JD賦值:((A1+A2)/2+(B1+B2)/2)/2 XG2賦值:最近PER8日一直存在DIF>DEA XG4賦值:(PER8日前的DIF<1.1*PER8日前的MACDD) XG5賦值:CC1<CC2 XG6賦值:站上三十<PER03+1 XG7賦值:AA>PER8+1日前的AA XG10賦值:(XG2 AND XG4 AND XG5 AND XG6 AND XG7) XG11賦值:條件連續(xù)成立次數(shù)>9 AND XG10 PP賦值:上次1日前的XG11>0ANDXG11=0距今天數(shù)<=5 線618賦值:(PER03+1日內(nèi)最高價的最高值-CC1)*0.618+CC1 線382賦值:(PER03+1日內(nèi)最高價的最高值-CC1)*0.382+CC1 輸出XG:上次XG11距今天數(shù)<PER03+1 AND (線618上穿最低價 OR 線382上穿最低價) AND 收盤價的20日簡單移動平均>1日前的收盤價的20日簡單移動平均 AND (收盤價-5日內(nèi)收盤價的最高值)/5日內(nèi)收盤價的最高值*100<-5 程序源碼 DIF:=EMA(CLOSE,12)-EMA(CLOSE,26); DEA:=EMA(DIF,9); macdD:=(DIF-DEA)*2; P:=BArslAST(crOSS(DIF,0.01))+1; PER03:=BARSLAST(CROSS(DIF,DEA)); PER05:=BARSLAST(CROSS(DEA,DIF)); AA:=VALUEWHEN(CROSS(DIF,DEA),DEA); 間隔A:=PER03; 間隔B:=REF(BARSLAST(CROSS(DIF,DEA)),間隔A+1); 間隔E:=REF(BARSLAST(CROSS(DIF,DEA)),間隔B+間隔A+2); 間隔C:=PER05; 間隔D:=REF(BARSLAST(CROSS(DEA,DIF)),間隔C+1); 似錦距離1:=間隔C-間隔A; 似錦距離2:=間隔D+間隔C+1-(間隔B+間隔A+1); 上上次金叉:=間隔A+間隔B+1; 上次金叉:=PER03; CCC1:=FINDLOW(L,間隔A,間隔B+1,1); CCC2:=FINDLOW(L,間隔B+1,間隔B+間隔E+1,1); CC1:=IF(似錦距離1<=3,CCC1,FINDLOW(L,上次金叉,似錦距離1+1,1)); CC2:=IF(似錦距離2<=3,CCC2,FINDLOW(L,上上次金叉,似錦距離2+2,1)); 站上三十:=BARSLAST(C>MA(C,30)); PER8:=IF(BARSLAST(CROSS(DIF,DEA))<=1,1,BARSLAST(CROSS(DIF,DEA))); PER9:=COUNT(C>MA(C,30),PER03+1); PER10:=BARSLAST(PER9=1); A1:=REF(DIF,PER8+1);A2:=REF(DIF,PER8); B1:=REF(DEA,PER8+1);B2:=REF(DEA,PER8); JD:=((A1+A2)/2+(B1+B2)/2)/2; XG2:=EVERY(DIF>DEA,PER8); XG4:=(REF(DIF,PER8)<1.1*REF(MacDD,PER8)); XG5:=CC1<CC2; XG6:=站上三十<PER03+1; XG7:=AA>REF(AA,PER8+1); XG10:=(XG2 AND XG4 AND XG5 AND XG6 AND XG7); XG11:=BARSLASTCOUNT(C>MA(C,20))>9 AND XG10; PP:=BARSLAST(REF(XG11,1)>0 AND XG11=0)<=5; 線618:=(HHV(H,PER03+1)-CC1)*0.618+CC1; 線382:=(HHV(H,PER03+1)-CC1)*0.382+CC1; XG:BARSLAST(XG11)<PER03+1 AND (CROSS(線618,L) OR CROSS(線382,L)) AND MA(C,20)>REF( MA(C,20),1) AND (C-HHV(C,5))/HHV(C,5)*100<-5; 注： 館內(nèi)各種公式為學(xué)習(xí)編程而保存，實(shí)戰(zhàn)使用前一定要看其中是否有未來函數(shù)并自己親自測試成功率，決不能依據(jù)公式名稱的描述和形容去投資，據(jù)此入市造成投資損失由投資者自己承擔(dān)。 發(fā)文不易，如獲益，歡迎贊賞，贊賞必復(fù)！ |
|
|
