M:=55;N1:=5;N2:=30;
X_13:=ABS(CLOSE-REF(CLOSE,M));
X_14:=SUM(ABS(CLOSE-REF(CLOSE,1)),M);
X_15:=X_13/X_14;
X_16:=2/(N1+1);
X_17:=2/(N2+1);
X_18:=X_15*(X_16-X_17)+X_17;
X_19:=POW(X_18,2);
王KAMA:DMA(CLOSE,X_19),COLORRED,LINETHICK2;
NOTEXT1:IF(王KAMA<=REF(王KAMA,1),王KAMA,DRAWNULL),COLORGREEN,LINETHICK2;
X_20:=ABS(CLOSE-REF(CLOSE,20))/SUM(ABS(CLOSE-REF(CLOSE,1)),20)*(2/(2+1)-2/(30+1))+2/(30+1);
X_21:=EMA(DMA(CLOSE,X_20*X_20),2);
STICKLINE(CLOSE>=X_21 AND CLOSE>OPEN,OPEN,CLOSE,(-1),1),COLOR0000DD;
STICKLINE(CLOSE>=X_21 AND CLOSE>OPEN,HIGH,CLOSE,0,0),COLOR0000DD;
STICKLINE(CLOSE>=X_21 AND CLOSE>OPEN,OPEN,LOW,0,0),COLOR0000DD;
STICKLINE(CLOSE>=X_21 AND CLOSE<=OPEN,OPEN,CLOSE,(-1),0),COLOR0000DD;
STICKLINE(CLOSE>=X_21 AND CLOSE<=OPEN,HIGH,OPEN,0,0),COLOR0000DD;
STICKLINE(CLOSE>=X_21 AND CLOSE<=OPEN,CLOSE,LOW,0,0),COLOR0000DD;
STICKLINE(CLOSE<X_21 AND CLOSE>OPEN,OPEN,CLOSE,(-1),1),COLORFFBB00;
STICKLINE(CLOSE<X_21 AND CLOSE>OPEN,HIGH,CLOSE,0,0),COLORFFBB00;
STICKLINE(CLOSE<X_21 AND CLOSE>OPEN,OPEN,LOW,0,0),COLORFFBB00;
STICKLINE(CLOSE<X_21 AND CLOSE<=OPEN,OPEN,CLOSE,(-1),0),COLORFFBB00;
STICKLINE(CLOSE<X_21 AND CLOSE<=OPEN,HIGH,OPEN,0,0),COLORFFBB00;
STICKLINE(CLOSE<X_21 AND CLOSE<=OPEN,CLOSE,LOW,0,0),COLORFFBB00;
AMA20:X_21,COLORFFAA00;
UP:IF(AMA20>REF(AMA20,1),AMA20,DRAWNULL),COLORRED;
X_22:=MAX(MAX(HIGH-LOW,ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));
X_23:=SMA(X_22,20,1);
NH20:HHV(HIGH,20),NODRAW;
止盈位:NH20-2*X_23,NODRAW;
X_24:=HHV(HIGH,20);
X_25:=HHVBARS(HIGH,20);
X_26:=BARSLAST(CURRBARSCOUNT=CONST(X_25)+1);
HH20:DRAWLINE(X_26=0,HIGH,ISLASTBAR,REF(HIGH,X_25),0),DOTLINE,COLORYELLOW;
DRAWNUMBER(X_26=0,HIGH,HIGH),COLORYELLOW,LINETHICK9;
●:IF(X_26=0,HIGH,DRAWNULL),POINTDOT,COLORRED,LINETHICK4;
X_27:=MAX(MAX(HIGH-LOW,ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW))/REF(CLOSE,1)*100;
X_28:=ABS(HIGH-LOW)/REF(CLOSE,1)*100;
ATR20:SMA(X_22,20,1),NODRAW;
X_29:=SMA(X_27,20,1);
AMA20乖離:(OPEN-AMA20)/AMA20*100,NODRAW;
MA5抵扣:REF(CLOSE,5),NODRAW,COLORCYAN;
MA20抵扣:REF(CLOSE,20),NODRAW,COLORFFBB00;
X_30:=ABS(CLOSE-REF(CLOSE,20));
X_31:=SUM(ABS(CLOSE-REF(CLOSE,1)),20);
效率系數:SUM(ABS(X_30/X_31),1),NODRAW;
X_**:=FILTER(BACKSET(MA(CLOSE,5) AND ISLASTBAR,5),5);
X_33:=FILTER(BACKSET(MA(CLOSE,20) AND ISLASTBAR,20),20);
STICKLINE(X_**=1,HIGH+(HIGH-LOW),LOW-(HIGH-LOW),0,(-1)),COLORYELLOW;
STICKLINE(X_33=1,HIGH+1.5*(HIGH-LOW),LOW-1.2*(HIGH-LOW),0,(-1)),COLORYELLOW;
M512:MA(CLOSE,512);
M1024:MA(CLOSE,1024),COLORBLUE;
X_34:=HHV(HIGH,256);
X_35:=LLV(LOW,256);
L80%:0.809*X_34+0.191*X_35,COLORMAGENTA;
L61%:0.618*X_34+0.382*X_35,COLORYELLOW;
X_36:=CROSS(CLOSE,L80%) AND CLOSE/REF(HIGH,1)>1.04;
STICKLINE(X_36,LOW,HIGH*0.965,3,0),COLORYELLOW;
X_37:=MA(VOL,2)/REF(MA(VOL,2),3)>=2;
X_38:=VOL=HHV(VOL,21);
X_39:=X_37 AND X_38;
X_40:=BARSLAST(X_36);
X_41:=REF(HIGH,X_40);
X_42:=HIGH>X_41 AND CLOSE>X_36 AND COUNT(X_39,2)>0 AND CLOSE/REF(CLOSE,1)>1.05;
STICKLINE(X_42,HIGH,HIGH*0.95,3,0),COLORMAGENTA;

原理解析：

M賦值:55
N1賦值:5
N2賦值:30
X_13賦值:收盤價-M日前的收盤價的絕對值
X_14賦值:收盤價-1日前的收盤價的絕對值的M日累和
X_15賦值:X_13/X_14
X_16賦值:2/(N1+1)
X_17賦值:2/(N2+1)
X_18賦值:X_15*(X_16-X_17)+X_17
X_19賦值:X_18的2乘冪
輸出王KAMA:以X_19為權重收盤價的動態移動平均,畫紅色,線寬為2
輸出NOTEXT1:如果王KAMA<=1日前的王KAMA,返回王KAMA,否則返回無效數,畫綠色,線寬為2
X_20賦值:收盤價-20日前的收盤價的絕對值/收盤價-1日前的收盤價的絕對值的20日累和*(2/(2+1)-2/(30+1))+2/(30+1)
X_21賦值:以X_20*X_20為權重收盤價的動態移動平均的2日指數移動平均
當滿足條件收盤價>=X_21ANDCLOSE>開盤價時,在開盤價和收盤價位置之間畫柱狀線,寬度為(-1),1不為0則畫空心柱.,COLOR0000DD
當滿足條件收盤價>=X_21ANDCLOSE>開盤價時,在最高價和收盤價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,COLOR0000DD
當滿足條件收盤價>=X_21ANDCLOSE>開盤價時,在開盤價和最低價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,COLOR0000DD
當滿足條件收盤價>=X_21ANDCLOSE<=開盤價時,在開盤價和收盤價位置之間畫柱狀線,寬度為(-1),0不為0則畫空心柱.,COLOR0000DD
當滿足條件收盤價>=X_21ANDCLOSE<=開盤價時,在最高價和開盤價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,COLOR0000DD
當滿足條件收盤價>=X_21ANDCLOSE<=開盤價時,在收盤價和最低價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,COLOR0000DD
當滿足條件收盤價<X_21ANDCLOSE>開盤價時,在開盤價和收盤價位置之間畫柱狀線,寬度為(-1),1不為0則畫空心柱.,COLORFFBB00
當滿足條件收盤價<X_21ANDCLOSE>開盤價時,在最高價和收盤價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,COLORFFBB00
當滿足條件收盤價<X_21ANDCLOSE>開盤價時,在開盤價和最低價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,COLORFFBB00
當滿足條件收盤價<X_21ANDCLOSE<=開盤價時,在開盤價和收盤價位置之間畫柱狀線,寬度為(-1),0不為0則畫空心柱.,COLORFFBB00
當滿足條件收盤價<X_21ANDCLOSE<=開盤價時,在最高價和開盤價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,COLORFFBB00
當滿足條件收盤價<X_21ANDCLOSE<=開盤價時,在收盤價和最低價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,COLORFFBB00
輸出AMA20:X_21,COLORFFAA00
輸出UP:如果AMA20>1日前的AMA20,返回AMA20,否則返回無效數,畫紅色
X_22賦值:最高價-最低價和1日前的收盤價-最高價的絕對值的較大值和1日前的收盤價-最低價的絕對值的較大值
X_23賦值:X_22的20日[1日權重]移動平均
輸出NH20:20日內最高價的最高值,NODRAW
輸出止盈位:NH20-2*X_23,NODRAW
X_24賦值:20日內最高價的最高值
X_25賦值:20日內最高價距今天數
X_26賦值:上次到最后交易的周期=X_25的最后一日取值設為常數+1距今天數
輸出HH20:當滿足條件X_26=0時,在最高價位置畫直線起點，當滿足條件是否最后一個周期時,在X_25日前的最高價位置畫直線終點,0表示是否延長.,DOTLINE,畫黃色
當滿足條件X_26=0時,在最高價位置書寫數字,畫黃色,線寬為9
輸出●:如果X_26=0,返回最高價,否則返回無效數,POINTDOT,畫紅色,線寬為4
X_27賦值:最高價-最低價和1日前的收盤價-最高價的絕對值的較大值和1日前的收盤價-最低價的絕對值的較大值/1日前的收盤價*100
X_28賦值:最高價-最低價的絕對值/1日前的收盤價*100
輸出ATR20:X_22的20日[1日權重]移動平均,NODRAW
X_29賦值:X_27的20日[1日權重]移動平均
輸出AMA20乖離:(開盤價-AMA20)/AMA20*100,NODRAW
輸出MA5抵扣:5日前的收盤價,NODRAW,畫青色
輸出MA20抵扣:20日前的收盤價,NODRAW,COLORFFBB00
X_30賦值:收盤價-20日前的收盤價的絕對值
X_31賦值:收盤價-1日前的收盤價的絕對值的20日累和
輸出效率系數:X_30/X_31的絕對值的1日累和,NODRAW
X_**賦值:若收盤價的5日簡單移動平均ANDISLASTBAR則將最近5周期置為1的5日過濾
X_33賦值:若收盤價的20日簡單移動平均ANDISLASTBAR則將最近20周期置為1的20日過濾
當滿足條件X_**=1時,在最高價+(最高價-最低價)和最低價-(最高價-最低價)位置之間畫柱狀線,寬度為0,(-1)不為0則畫空心柱.,畫黃色
當滿足條件X_33=1時,在最高價+1.5*(最高價-最低價)和最低價-1.2*(最高價-最低價)位置之間畫柱狀線,寬度為0,(-1)不為0則畫空心柱.,畫黃色
輸出M512:收盤價的512日簡單移動平均
輸出M1024:收盤價的1024日簡單移動平均,畫藍色
X_34賦值:256日內最高價的最高值
X_35賦值:256日內最低價的最低值
輸出L80%:0.809*X_34+0.191*X_35,畫洋紅色
輸出L61%:0.618*X_34+0.382*X_35,畫黃色
X_36賦值:收盤價上穿L80% AND 收盤價/1日前的最高價>1.04
當滿足條件X_36時,在最低價和最高價*0.965位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,畫黃色
X_37賦值:成交量(手)的2日簡單移動平均/3日前的成交量(手)的2日簡單移動平均>=2
X_38賦值:成交量(手)=21日內成交量(手)的最高值
X_39賦值:X_37 AND X_38
X_40賦值:上次X_36距今天數
X_41賦值:X_40日前的最高價
X_42賦值:最高價>X_41 AND 收盤價>X_36 AND 統計2日中滿足X_39的天數>0 AND 收盤價/1日前的收盤價>1.05
當滿足條件X_42時,在最高價和最高價*0.95位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,畫洋紅色








如有需要，請加QQ：88652583 或微信： 88652583