傳說中的混沌操作法主圖公式代碼源碼

作者：通達信來源：cxh99.com 發布時間：2021年10月21日

相關標簽:

原理解析：

VAR1賦值:(最高價+最低價)/2

AO賦值:VAR1的5日[1日權重]移動平均-VAR1的34日[1日權重]移動平均,COLOR6699CC

AC賦值:(AO-AO的5日[1日權重]移動平均)的5日[1日權重]移動平均,COLOR6699CC

X1賦值:AO>1日前的AO AND AC>1日前的AC

X2賦值:AO<1日前的AO AND AC<1日前的AC

Y賦值:(最高價+最低價)/2

RED賦值:Y的8日[1日權重]移動平均

R2賦值:5日前的RED

KU1賦值:如果最高價=3日內最高價的最高值,返回1,否則返回0

KD1賦值:如果最低價=3日內最低價的最低值,返回1,否則返回0

UL賦值:如果2日前的KU1=1ANDREF(KU1,1)=0ANDKU1=0,返回2日前的最高價,否則返回2+上次2日前的KU1=1ANDREF(KU1,1)=0ANDKU1=0距今天數日前的最高價

DL賦值:如果2日前的KD1=1ANDREF(KD1,1)=0ANDKD1=0,返回2日前的最低價,否則返回2+上次2日前的KD1=1ANDREF(KD1,1)=0ANDKD1=0距今天數日前的最低價

輸出藍:Y的13日[1日權重]移動平均,畫藍色

輸出紅:Y的5日[1日權重]移動平均,畫紅色

輸出綠:Y的3日[1日權重]移動平均,畫綠色

上張賦值:藍>=1日前的藍 AND 紅>=1日前的紅 AND 綠>=1日前的綠

下張賦值:藍<1日前的藍 AND 紅<1日前的紅 AND 綠<1日前的綠

上碎賦值:如果最高價>=R2,返回UL,否則返回上次最高價>R2距今天數日前的UL

下碎賦值:如果最低價<=R2,返回DL,否則返回上次最低價<=R2距今天數日前的DL

當滿足條件上次上碎-1日前的上碎的絕對值距今天數<上次收盤價>上碎ANDREF(收盤價,1)<1日前的上碎距今天數時,在上碎和上碎位置之間畫柱狀線,寬度為3,1不為0則畫空心柱.,畫洋紅色

當滿足條件上次下碎-1日前的下碎的絕對值距今天數<上次收盤價<下碎ANDREF(收盤價,1)>1日前的下碎距今天數時,在下碎和下碎位置之間畫柱狀線,寬度為3,1不為0則畫空心柱.,畫青色

賦值: 4日前的收盤價

RMI賦值:收盤價-LC和0的較大值的7日[1日權重]移動平均/收盤價-LC的絕對值的7日[1日權重]移動平均*100

QS賦值: 13日內RMI的3日簡單移動平均的最高值,COLOR00ADFF

RMIMA賦值: RMI的3日[1日權重]移動平均,COLOR009C00

當滿足條件收盤價>上碎并且是否最后一個周期=1時,在最高價+0位置書寫文字,COLOR0000FF

當滿足條件收盤價<下碎并且是否最后一個周期=1時,在最低價-0位置書寫文字,COLORFFFF00

當滿足條件X1>0并且是否最后一個周期=1時,在最高價+0.3位置書寫文字,COLORFF00FF

當滿足條件X2>0并且是否最后一個周期=1時,在最低價-0.3位置書寫文字,COLOR00FF00

當滿足條件上張并且是否最后一個周期=1時,在最高價+0.6位置書寫文字,COLOR999999

當滿足條件下張并且是否最后一個周期=1時,在最低價-0.6位置書寫文字,COLOR999999

當滿足條件上張并且X1>0并且是否最后一個周期=1時,在最高價+0.8位置書寫文字,COLORFF00FF

當滿足條件下張并且X2>0并且是否最后一個周期=1時,在最低價-0.8位置書寫文字,COLOR00FF00

當滿足條件(RMI>RMIMA并且RMI<QS)并且是否最后一個周期=1時,在最高價+1位置書寫文字,COLOR00FFFF

當滿足條件(RMI>RMIMA并且RMI>QS)并且是否最后一個周期=1時,在最高價+1位置書寫文字,COLOR0000FF

當滿足條件(RMI<RMIMA并且RMI>20)并且是否最后一個周期=1時,在最低價-1位置書寫文字,COLORFF0000

當滿足條件(RMI<RMIMA并且RMI<20)并且是否最后一個周期=1時,在最低價-1位置書寫文字,COLORFF00FF

源碼：

VAR1:=(H+L)/2;
AO:=SMA(VAR1,5,1)-SMA(VAR1,34,1),COLOR6699CC;
AC:=SMA((AO-SMA(AO,5,1)),5,1),COLOR6699CC;
X1:=AO>REF(AO,1) AND AC>REF(AC,1);
X2:=AO<REF(AO,1) AND AC<REF(AC,1);
Y:=(H+L)/2;
RED:=SMA(Y,8,1);
R2:=REF(RED,5);
KU1:=IF(H=HHV(H,3),1,0);
KD1:=IF(L=LLV(L,3),1,0);
UL:=IF(REF(KU1,2)=1 AND REF(KU1,1)=0 AND KU1=0,REF(H,2),REF(H,2+BARSLAST(REF(KU1,2)=1 AND REF(KU1,1)=0 AND KU1=0)));
DL:=IF(REF(KD1,2)=1 AND REF(KD1,1)=0 AND KD1=0,REF(L,2),REF(L,2+BARSLAST(REF(KD1,2)=1 AND REF(KD1,1)=0 AND KD1=0)));
藍:SMA(Y,13,1),COLORBLUE;
紅:SMA(Y,5,1),COLORRED;
綠:SMA(Y,3,1),COLORGREEN;
上張:=藍>=REF(藍,1) AND 紅>=REF(紅,1) AND 綠>=REF(綠,1);
下張:=藍<REF(藍,1) AND 紅<REF(紅,1) AND 綠<REF(綠,1);
上碎:=IF(H>=R2,UL,REF(UL,BARSLAST(H>R2)));
下碎:=IF(L<=R2,DL,REF(DL,BARSLAST(L<=R2)));
STICKLINE(BARSLAST(ABS(上碎-REF(上碎,1)))<BARSLAST(C>上碎 AND REF(C,1)<REF(上碎,1)),上碎,上碎,3,1),COLORMAGENTA;
STICKLINE(BARSLAST(ABS(下碎-REF(下碎,1)))<BARSLAST(C<下碎 AND REF(C,1)>REF(下碎,1)),下碎,下碎,3,1),COLORCYAN;
LC := REF(C,4);
RMI:=SMA(MAX(C-LC,0),7,1)/SMA(ABS(C-LC),7,1)*100;
QS:= HHV(MA(RMI,3),13),COLOR00ADFF;
RMIMA:= SMA(RMI,3,1),COLOR009C00;
DRAWTEXT(C>上碎&&ISLASTBAR=1,H+0,'向上突破有效上碎型'),COLOR0000FF;
DRAWTEXT(C<下碎&&ISLASTBAR=1,L-0,'向下有效碎型被突破'),COLORFFFF00;
DRAWTEXT(X1>0&&ISLASTBAR=1,H+0.3,'AO與AC為多方趨勢'),COLORFF00FF;
DRAWTEXT(X2>0&&ISLASTBAR=1,L-0.3,'AO與AC為空方趨勢'),COLOR00FF00;
DRAWTEXT(上張&&ISLASTBAR=1,H+0.6,'鱷魚向上張嘴'),COLOR999999;
DRAWTEXT(下張&&ISLASTBAR=1,L-0.6,'鱷魚向下張嘴'),COLOR999999;
DRAWTEXT(上張&&X1>0&&ISLASTBAR=1,H+0.8,'懷疑中期多頭'),COLORFF00FF;
DRAWTEXT(下張&&X2>0&&ISLASTBAR=1,L-0.8,'懷疑中期空頭'),COLOR00FF00;
DRAWTEXT((RMI>RMIMA&&RMI<QS)&&ISLASTBAR=1,H+1,'小心做多'),COLOR00FFFF;
DRAWTEXT((RMI>RMIMA&&RMI>QS)&&ISLASTBAR=1,H+1,'堅決做多'),COLOR0000FF;
DRAWTEXT((RMI<RMIMA&&RMI>20)&&ISLASTBAR=1,L-1,'堅決做空'),COLORFF0000;
DRAWTEXT((RMI<RMIMA&&RMI<20)&&ISLASTBAR=1,L-1,'小心做空'),COLORFF00FF;

?

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