通达信黄金分割主图源码,用法
S月收盘价:=REF(C,1+BARSLAST(NOT(MONTH=REF(MONTH,1))))COLORRED,LINETHICK2;
Q月收盘价:=REF(S月收盘价,1+BARSLAST(NOT(MONTH=REF(MONTH,1))))COLORRED,LINETHICK2;
Z月收盘价:=REF(Q月收盘价,1+BARSLAST(NOT(MONTH=REF(MONTH,1))))COLORRED,LINETHICK2;
楼梯股:(Z月收盘价+S月收盘价+Q月收盘价)/3,COLORGREEN,LINETHICK3;
%10:楼梯股*1.1,DOTLINE;
STICKLINE(C>=O AND C>%10,C,O,3,0),COLOR000045;
STICKLINE(C>=O AND C>%10,C,O,2.5,0),COLOR000065;
STICKLINE(C>=O AND C>%10,C,O,2,0),COLOR000085;
STICKLINE(C>=O AND C>%10,C,O,1.5,0),COLOR0000A5;
STICKLINE(C>=O AND C>%10,C,O,1,0),COLOR0000C5;
STICKLINE(C>=O AND C>%10,C,O,0.5,0),COLOR0000E5;
STICKLINE(C>=O AND C>%10,H,L,0,0),COLOR0000F5;
STICKLINE(C<O AND C>%10,C,O,3,0),COLOR353500;
STICKLINE(C<O AND C>%10,C,O,2.5,0),COLOR454500;
STICKLINE(C<O AND C>%10,C,O,2,0),COLOR555500;
STICKLINE(C<O AND C>%10,C,O,1.5,0),COLOR656500;
STICKLINE(C<O AND C>%10,C,O,1,0),COLOR757500;
STICKLINE(C<O AND C>%10,C,O,0.5,0),COLOR858500;
STICKLINE(C<O AND C>%10,H,L,0,0),COLOR959500;
MA5:MA(C,5);MA10:MA(C,10);
%20:楼梯股*1.2,COLORGREEN;
%38.2:楼梯股*1.382,COLORYELLOW;
%50:楼梯股*1.5,COLORRED,LINETHICK2;
%61.8:楼梯股*1.618,COLORYELLOW;
%80:楼梯股*1.8,COLORGREEN;
%100:楼梯股*2,COLORBLUE,LINETHICK3;
DRAWTEXT(ISLASTBAR,%20,' 弱股止步');
DRAWTEXT(ISLASTBAR,%38.2,' 牛股起步');
DRAWTEXT(ISLASTBAR,%50,' 中轴');
DRAWTEXT(ISLASTBAR,楼梯股,' 水平面');
IF(MA5>REF(MA5,1),MA5,DRAWNULL),COLORMAGENTA,LINETHICK2;
IF(MA10>REF(MA10,1),MA10,DRAWNULL);