通達信公式——黃金分割主圖指標

pharl 2020-08-09

展開全文

黃金分割主圖

為了能將楊凱老師的黃金分割主圖能讓更多人使用，特改為通達信版，方便大家綜合判斷！指標簡單說明：

1、主圖中的黃金分割圖按楊凱老師的定義編制；

2、圖中變色均線為20日均線，上漲浪下跌浪一目了然，方便看盤；

3、指標不是萬能的，只是一個參考工具！

實收價:=IF((FRACPART((C * 100)) > 0.46),(CEILING((C * 100)) / 100),(FLOOR((C * 100)) / 100));柒%陽:=(實收價 >= IF((FRACPART(((REF(實收價,1) * 1.07) * 100)) > 0.46),(CEILING(((REF(實收價,1) * 1.07) * 100)) / 100),(FLOOR(((REF(實收價,1) * 1.07) * 100)) / 100)));漲停:=(實收價 >= IF((FRACPART(((REF(實收價,1) * 1.1) * 100)) > 0.46),(CEILING(((REF(實收價,1) * 1.1) * 100)) / 100),(FLOOR(((REF(實收價,1) * 1.1) * 100)) / 100)));跌停:=(實收價 <= IF((FRACPART(((REF(實收價,1) * 0.9) * 100)) > 0.46),(CEILING(((REF(實收價,1) * 0.9) * 100)) / 100),(FLOOR(((REF(實收價,1) * 0.9) * 100)) / 100)));二十均線:=(INTPART((MA(C,20) * 100)) / 100);站穩(wěn)狀態(tài):=(SUM((C >= 二十均線),4) = 4);跌破狀態(tài):=(SUM((C <= 二十均線),4) = 4);站穩(wěn)確立:=CROSS(站穩(wěn)狀態(tài),0.5);跌破確立:=CROSS(跌破狀態(tài),0.5);上漲浪:=((((BARSLAST(站穩(wěn)確立) < BARSLAST(跌破確立)) && (BARSLAST(站穩(wěn)確立) >= 0)) || ((BARSLAST(跌破確立) = -(1)) && (BARSLAST(站穩(wěn)確立) >= 0))) || (((BARSLAST(跌破確立) = -(1)) && (BARSLAST(站穩(wěn)確立) = -(1))) && (C > 二十均線)));下跌浪:=((((BARSLAST(跌破確立) < BARSLAST(站穩(wěn)確立)) && (BARSLAST(跌破確立) >= 0)) || ((BARSLAST(站穩(wěn)確立) = -(1)) && (BARSLAST(跌破確立) >= 0))) || (((BARSLAST(跌破確立) = -(1)) && (BARSLAST(站穩(wěn)確立) = -(1))) && (C <二十均線)));SJS:=IF(DATE<=130170917,1,0);{均線時間限制函數(shù)30-09-17}MA5:IF(SJS>0,(INTPART((MA(CLOSE,5) * 100)) / 100),0)COLORWHITE,LINETHICK2;MA10:=IF(SJS>0,(INTPART((MA(CLOSE,10) * 100)) / 100),0)COLORYELLOW,DOTLINE;MA20:IF(SJS>0,(INTPART((MA(CLOSE,20) * 100)) / 100),0)COLORRED,LINETHICK2;MA250:MA(CLOSE,250)DOTLINE;穩(wěn):=CROSS(上漲浪,0.5);破:=CROSS(下跌浪,0.5);站穩(wěn):=IF(上漲浪,(穩(wěn)日 + 1),(-(破日) - 1)),COLORYELLOW,LINETHICK0;不破20日:=((站穩(wěn) > 0) && (站穩(wěn)狀態(tài) = 1));T1:=BARSLAST((穩(wěn) = 1));T2:=BARSLAST((破 = 1));低點點:=IF((T1 = 0),LLV(L,(T2 + 8)),0);高點點:=IF((T2 = 0),HHV(H,(T1 + 8)),0);低收點點:=IF((T1 = 0),LLV(C,(T2 + 8)),0);高收點點:=IF((T2 = 0),HHV(C,(T1 + 8)),0);低點黃:=IF((T2 > T1),REF(SUM(低點點,(T1 + 1)),(T1 + 1)),SUM(低點點,(T1 + 1)));高點原:=SUM(高點點,(T2 + 1));低點原:=SUM(低點點,(T1 + 1));SJS1:=DATE > 1300917;低點:=IF(SJS1,0,IF(((FRACPART((低點黃 * 100)) * 10) > 4.6),(CEILING((低點黃 * 100)) / 100),(INTPART((低點黃 * 100)) / 100))),COLORYELLOW,NODRAW;STICKLINE(CURRBARSCOUNT=13,低點,低點,700,1),COLORYELLOW;%1:=IF(SJS1,0,IF(((FRACPART((高點原 * 100)) * 10) > 4.6),(CEILING((高點原 * 100)) / 100),(INTPART((高點原 * 100)) / 100))),COLORYELLOW,NODRAW;STICKLINE(CURRBARSCOUNT=13,%1,%1,700,1),COLORYELLOW;DRAWTEXT(TTT,%1,'%1'),COLORYELLOW;         DRAWTEXT(TTT,%0.382,'%0.382'),COLORGREEN;     DRAWTEXT(TTT,%0.618,'%0.618'),COLORMAGENTA;     DRAWTEXT(TTT,%1.618,'%1.618'),COLORRED;T1T:=BACKSET(BARSTATUS=2 , 20);TT1T:=FILTER(T1T ,21); DRAWNUMBER(TT1T,%1.618,%1.618),COLORRED; DRAWNUMBER(TT1T,低點*0.015+低點,低點),COLORYELLOW; DRAWNUMBER(TT1T,%0.618,%0.618),COLORMAGENTA;DRAWNUMBER(TT1T,%0.382,%0.382),COLORGREEN;DRAWNUMBER(TT1T,%1,%1),COLORYELLOW; IF(上漲浪 AND SJS>0,MA20,DRAWNULL),LINETHICK2,COLORRED;IF(下跌浪 AND SJS>0,MA20,DRAWNULL),LINETHICK2,COLORGREEN;