編程思路破譯
ASD賦值:成本均線的CYC3的20日簡單移動平均
多空平衡點賦值:ASD*1.4
第一防守賦值:ASD*1
第二防守賦值:ASD*0.9
AMV0賦值:成交量(手)*(開盤價+收盤價+最高價+最低價)/4
輸出NOTEXT勢:AMV0的21日指數(shù)移動平均/成交量(手)的21日指數(shù)移動平均,NODRAW
輸出NOTEXT壓:6*2日內(nèi)NOTEXT勢的最高值-5*NOTEXT勢,NODRAW
輸出NOTEXT托:2*NOTEXT勢-NOTEXT壓,NODRAW
如果NOTEXT勢不等于NOTEXT托,返回NOTEXT托,否則返回無效數(shù),NODRAW
A1賦值:AMV0的21日指數(shù)移動平均/成交量(手)的21日指數(shù)移動平均
A2賦值:6*2日內(nèi)A1的最高值-5*A1
A3賦值:2*A1-A2
A4賦值:A1=A3
輸出XD:1日前的A3>CANDA2>A3 AND 收陽線ANDA4,NODRAW
防守線賦值:(收盤價的3日簡單移動平均+收盤價的6日簡單移動平均+收盤價的12日簡單移動平均+收盤價的24日簡單移動平均)/4,DOTLINE,畫淡灰色 線寬為1
VAR6賦值:(( (開盤價-收盤價)的絕對值/(最高價-最低價))*成交量(手))
VAR7賦值:(( (最高價-如果(收陽線),返回收盤價,否則返回開盤價)/(最高價-最低價))*成交量(手))
VAR8賦值:(( (如果(收陽線),返回開盤價,否則返回收盤價-最低價)/(最高價-最低價))*成交量(手))
JJ賦值:(3*收盤價+最高價+最低價+開盤價)/6
VAR1賦值:(8*JJ+7*1日前的JJ+6*2日前的JJ+5*3日前的JJ+4*4日前的JJ+3*5日前的JJ+2*6日前的JJ+8日前的JJ)/36
TJ1賦值:成交量(手)=10日內(nèi)成交量(手)的最高值 AND 成交量(手)>2*1日前的成交量(手) AND 收盤價>VAR1 AND 收盤價>1日前的收盤價
LJL賦值:TJ1的5日過濾
輸出NOTEXT加倉:VAR6>=VAR7 AND VAR6>=VAR8 AND 收陽線,NODRAW,畫紅色
輸出NOTEXT減倉:VAR6>=VAR7 AND VAR6>=VAR8 AND 收陰線,NODRAW,畫藍色
輸出NOTEXT洗盤:VAR8>VAR6 AND VAR8>VAR7,NODRAW,畫洋紅色
輸出NOTEXT高拋:VAR7>VAR6 AND VAR7>VAR8,NODRAW,畫洋紅色
輸出NOTEXT地量:成交量(手)<成交量(手)的5日簡單移動平均/2,NODRAW,畫白色
當滿足條件XD時,在(最低價*0.97)位置畫26號圖標
DIFF賦值:收盤價的12日指數(shù)移動平均-收盤價的26日指數(shù)移動平均
DEA賦值:DIFF的9日指數(shù)移動平均
MACD賦值:2*(DIFF-DEA)
輸出平空開多:MACD上穿0,畫紅色,NODRAW
輸出平多開空:0上穿MACD,畫綠色,NODRAW
先平多倉再開空倉
當滿足條件(收盤價+開盤價)/2>多空平衡點ANDNOTEXT減倉=1時,在開盤價和收盤價位置之間畫柱狀線,寬度為2.2,0不為0則畫空心柱.,畫綠色
當滿足條件(收盤價+開盤價)/2>多空平衡點ANDNOTEXT減倉=1時,在最高價位置書寫文字,畫青色,NODRAW
當滿足條件(收盤價+開盤價)/2>多空平衡點ANDNOTEXT減倉=1時,在最高價*1.03位置畫27號圖標
程序源碼
ASD:=MA(cyc.CYC3,20);
多空平衡點:=ASD*1.4;
第一防守:=ASD*1;
第二防守:=ASD*0.9;
AMV0:=vol*(O+C+H+L)/4;
NOTEXT勢:EMA(AMV0,21)/EMA(VOL,21),NODRAW;
NOTEXT壓:6*HHV(NOTEXT勢,2)-5*NOTEXT勢,NODRAW;
NOTEXT托:2*NOTEXT勢-NOTEXT壓,NODRAW;
IF(NOTEXT勢<>NOTEXT托,NOTEXT托,DRAWNULL),NODRAW;
{NOTEXT壓=NOTEXT托 AND REF(NOTEXT壓,1)>REF(NOTEXT托,1);}
A1:=EMA(AMV0,21)/EMA(VOL,21);
A2:=6*HHV(A1,2)-5*A1;
A3:=2*A1-A2;
A4:=A1=A3;
XD:REF(A3>C AND A2>A3,1) AND C>O AND A4,NODRAW;
防守線:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4,DOTLINE,COLORLIGRAY LINETHICK1;
VAR6:=(( Abs((OPEN-CLOSE))/(HIGH-LOW))*VOL);
VAR7:=(( (HIGH-IF((CLOSE>OPEN),CLOSE,OPEN))/(HIGH-LOW))*VOL);
VAR8:=(( (IF((CLOSE>OPEN),OPEN,CLOSE)-LOW)/(HIGH-LOW))*VOL);
JJ:=(3*C+H+L+O)/6;
VAR1:=(8*JJ+7*REF(JJ,1)+6*REF(JJ,2)+5*REF(JJ,3)+4*REF(JJ,4)+3*REF(JJ,5)+2*REF(JJ,6)+REF(JJ,8))/36;
TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR1 AND C>REF(C,1);
LJL:=FILTER(TJ1,5);
NOTEXT加倉:VAR6>=VAR7 AND VAR6>=VAR8 AND CLOSE>OPEN,NODRAW,COLORRED;
NOTEXT減倉:VAR6>=VAR7 AND VAR6>=VAR8 AND CLOSE<OPEN,NODRAW,COLORBLUE;
NOTEXT洗盤:VAR8>VAR6 AND VAR8>VAR7,NODRAW,COLORMAGENTA;
NOTEXT高拋:VAR7>VAR6 AND VAR7>VAR8,NODRAW,COLORMAGENTA;
NOTEXT地量:{VAR9>2 AND }VOL<MA(VOL,5)/2,NODRAW,COLORWHITE;
DRAWICON(XD,(L * 0.97),26);
DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
macd:=2*(DIFF-DEA);
平空開多:crOSS(MacD,0),COLORRED,NODRAW;
平多開空:CROSS(0,MACD),COLORGREEN,NODRAW;
SELL_SELLSHORT(平多開空,H);
STICKLINE((C+O)/2>多空平衡點 AND NOTEXT減倉=1,O,C,2.2,0),COLORGREEN;
DRAWTEXT((C+O)/2>多空平衡點 AND NOTEXT減倉=1,H,' 下坡路'),COLORCYAN,NODRAW;
DRAWICON((C+O)/2>多空平衡點 AND NOTEXT減倉=1,H*1.03,27);
注:
館內(nèi)各種公式為學(xué)習編程而保存,實戰(zhàn)使用前一定要看其中是否有未來函數(shù)并自己親自測試成功率,決不能依據(jù)公式名稱的描述和形容去投資,據(jù)此入市造成投資損失由投資者自己承擔。
發(fā)文不易,如獲益,歡迎贊賞,贊賞必復(fù)!
聯(lián)系客服