生命線持股線1888主圖公式

{MACD}
RC:=DYNAINFO(3)*1.1;
DK:="MACD.MACD"(60,130,45)*2;
控盤:=DK;
STICKLINE(控盤<0 AND 控盤<REF(控盤,1),控盤+RC,RC,0.00,-1),COLOR333311;
STICKLINE(控盤<0 AND 控盤<REF(控盤,1),控盤+RC,RC,16,-1),COLOR335522;
STICKLINE(控盤<0 AND 控盤<REF(控盤,1),控盤+RC,RC,12,-1),COLOR337733;
STICKLINE(控盤<0 AND 控盤<REF(控盤,1),控盤+RC,RC,8,-1),COLOR339944;
STICKLINE(控盤<0 AND 控盤<REF(控盤,1),控盤+RC,RC,4,-1),COLOR33BB55;
STICKLINE(控盤<0 AND 控盤<REF(控盤,1),控盤+RC,RC,2,-1),COLOR33DD66;
STICKLINE(控盤<0 AND 控盤<REF(控盤,1),控盤+RC,RC,1,-1),COLOR33FF77;
STICKLINE(控盤<0 AND 控盤>REF(控盤,1),控盤+RC,RC,0.05,1),COLORFFFFFF;
STICKLINE(控盤<0 AND 控盤>REF(控盤,1),控盤+RC,RC,16,1),COLOR555555;
STICKLINE(控盤<0 AND 控盤>REF(控盤,1),控盤+RC,RC,12,1),COLOR777777;
STICKLINE(控盤<0 AND 控盤>REF(控盤,1),控盤+RC,RC,8,1),COLOR999999;
STICKLINE(控盤<0 AND 控盤>REF(控盤,1),控盤+RC,RC,4,1),COLORBBBBBB;
STICKLINE(控盤<0 AND 控盤>REF(控盤,1),控盤+RC,RC,2,1),COLORDDDDDD;
STICKLINE(控盤<0 AND 控盤>REF(控盤,1),控盤+RC,RC,1,1),COLORFFFFFF;
STICKLINE(控盤>REF(控盤,1) AND 控盤>0,控盤+RC,RC,0.05,0),COLORRED;
STICKLINE(控盤>REF(控盤,1) AND 控盤>0,控盤+RC,RC,16,0),COLORAA00AA;
STICKLINE(控盤>REF(控盤,1) AND 控盤>0,控盤+RC,RC,12,0),COLORBB00BB;
STICKLINE(控盤>REF(控盤,1) AND 控盤>0,控盤+RC,RC,8,0),COLORCC00CC;
STICKLINE(控盤>REF(控盤,1) AND 控盤>0,控盤+RC,RC,4,0),COLORDD00DD;
STICKLINE(控盤>REF(控盤,1) AND 控盤>0,控盤+RC,RC,2,0),COLOREE00EE;
STICKLINE(控盤>REF(控盤,1) AND 控盤>0,控盤+RC,RC,1,0),COLORFF00FF;
STICKLINE(控盤<REF(控盤,1) AND 控盤>0,控盤+RC,RC,0.05,-1),COLOR00FF00;
STICKLINE(控盤<REF(控盤,1) AND 控盤>0,控盤+RC,RC,16,-1),COLOR005500;
STICKLINE(控盤<REF(控盤,1) AND 控盤>0,控盤+RC,RC,12,-1),COLOR007700;
STICKLINE(控盤<REF(控盤,1) AND 控盤>0,控盤+RC,RC,8,-1),COLOR009900;
STICKLINE(控盤<REF(控盤,1) AND 控盤>0,控盤+RC,RC,4,-1),COLOR00BB00;
STICKLINE(控盤<REF(控盤,1) AND 控盤>0,控盤+RC,RC,2,-1),COLOR00DD00;
STICKLINE(控盤<REF(控盤,1) AND 控盤>0,控盤+RC,RC,1,-1),COLOR00FF00;

STICKLINE(C>=O,C,O,14,0),COLOR650000;
STICKLINE(C>=O,C,O,14,0),COLOR750000;
STICKLINE(C>=O,C,O,12,0),COLOR850000;
STICKLINE(C>=O,C,O,10,0),COLOR950000;
STICKLINE(C>=O,C,O,8,0),COLORA50000;
STICKLINE(C>=O,C,O,6,0),COLORB50000;
STICKLINE(C>=O,C,O,4,0),COLORC50000;
STICKLINE(C>=O,C,O,2,0),COLORD50000;
STICKLINE(C>=O,C,O,1,0),COLORE50000;
STICKLINE(C>=O,H,L,0,0),COLORF50000;
STICKLINE(C<O,C,O,14,0),COLOR555500;
STICKLINE(C<O,C,O,12,0),COLOR777700;
STICKLINE(C<O,C,O,8,0),COLOR999900;
STICKLINE(C<O,C,O,4,0),COLORBBBB00;
STICKLINE(C<O,C,O,2,0),COLORDDDD00;
STICKLINE(C<O,C,O,1,0),COLORFFFF00;
STICKLINE(C<O,H,L,0,0),COLOREEEE00;

MA18:=MA(CLOSE,18),COLORGREEN,LINETHICK2;
MA88:=MA(CLOSE,88),COLOR0000FF,LINETHICK2;
A:=H/MAX(C,O);
B:=MAX(C,O)/MIN(C,O);
D:=MIN(C,O)/L;
T:=BARSLAST(CROSS(C,MA18));
HH:=HHVBARS(H,T+1);
LL:=FINDLOWBARS(L,HH=0,T+1,1);
HC:=REF(C,HH);
LC:=REF(C,LL+1);
ZF:=(HC-LC)/LC*100;
TJ:=B>A AND D>B AND B>A;
TJ1:=MA18>=REF(MA18,1) AND L*0.98>MA18;
TJ2:=RANGE(L/MA18,0.95,1.01) AND MIN(C,O)>=MA18;
TJ3:=TJ AND TJ2;
TJ4:=EVERY(C>=MA18,T+1);
NH:=HHV(MAX(C,O)/MA18,T+1);
XG:=REF(TJ1,2) AND TJ3 AND ZF>15 AND TJ4 AND T>9 AND NH<1.11;

A1:REF(MA(C,18),1),COLORLIBLUE,LINETHICK1;
A2:REF(MA(C,88),1),COLORGREEN,CIRCLEDOT;
A1X:=(MA(C,18)-A1)/A1*100,NODRAW;
A2X:=(MA(C,88)-A2)/A2*100,NODRAW;
STICKLINE(CROSS(A1X,0),H,L,0,0 ),COLOR8800FF;
STICKLINE(CROSS(A1X,0),C,O,16.0,1 ),COLOR1100FF;
STICKLINE(CROSS(A1X,0),C,O,12,1 ),COLOR2200FF;
STICKLINE(CROSS(A1X,0),C,O,10,1 ),COLOR3300FF;
STICKLINE(CROSS(A1X,0),C,O,8,1),COLOR4400FF;
STICKLINE(CROSS(A1X,0),C,O,6,1 ),COLOR5500FF;
STICKLINE(CROSS(A1X,0),C,O,4,1),COLOR6600FF;
STICKLINE(CROSS(A1X,0),C,O,2,1),COLOR7700FF;
STICKLINE(CROSS(A1X,0),C,O,1,1),COLOR8800FF;
STICKLINE(CROSS(0,A1X),L,H,0,0 ),COLOR66CC33;
STICKLINE(CROSS(0,A1X),C,O,14,0),COLOR008800;
STICKLINE(CROSS(0,A1X),C,O,12,0),COLOR009900;
STICKLINE(CROSS(0,A1X),C,O,10,0),COLOR00AA00;
STICKLINE(CROSS(0,A1X),C,O,8,0),COLOR00BB00;
STICKLINE(CROSS(0,A1X),C,O,6,0),COLOR00CC00;
STICKLINE(CROSS(0,A1X),C,O,4,0),COLOR00DD00;
STICKLINE(CROSS(0,A1X),C,O,2,0),COLOR00EE00;
STICKLINE(CROSS(0,A1X),C,O,1,0),COLOR00FF00;

￥:IF(A1X>=0,A1,DRAWNULL),COLORRED,LINETHICK2;
●:IF(A2X>=0,A2,DRAWNULL),COLORRED,CIRCLEDOT,LINETHICK8;

DRAWTEXT(CURRBARSCOUNT=5*1,L*1.065,'5');
DRAWTEXT(CURRBARSCOUNT=10*1,L*1.065,'10');
DRAWTEXT(CURRBARSCOUNT=18*1,L*1.065,'18');
DRAWTEXT(CURRBARSCOUNT=30*1,L*1.065,'30');
DRAWTEXT(CURRBARSCOUNT=60*1,L*1.065,'60');
DRAWTEXT(CURRBARSCOUNT=88*1,L*1.065,'88');
DRAWTEXT(CURRBARSCOUNT=120*1,L*1.065,'120');
DRAWTEXT(CURRBARSCOUNT=240*1,L*1.065,'240');
DRAWICON(CURRBARSCOUNT=5*1,L*1.055,30);
DRAWICON(CURRBARSCOUNT=10*1,L*1.055,26);
DRAWICON(CURRBARSCOUNT=18*1,L*1.055,25);
DRAWICON(CURRBARSCOUNT=30*1,L*1.055,24);
DRAWICON(CURRBARSCOUNT=60*1,L*1.055,27);
DRAWICON(CURRBARSCOUNT=88*1,L*1.055,25);
DRAWICON(CURRBARSCOUNT=120*1,L*1.055,14);
谷:=TROUGHBARS(2,5,1);
峰:=PEAKBARS(2,5,1);
DRAWTEXT(CROSS(谷,峰),H*1.008,'高'),COLORGREEN;
DRAWTEXT(CROSS(峰,谷),L*0.995,'低'),COLORRED;
DRAWNUMBER(CROSS(谷,峰),H*1.015,HHV(H,5)),COLORYELLOW;
DRAWNUMBER(CROSS(峰,谷),L*0.985,LLV(L,5)),COLORGREEN;
DRAWTEXT(REF(CROSS(谷,峰),1),REF(H,1)*1.008,'出'),COLORGREEN;
DRAWTEXT(REF(CROSS(峰,谷),1),REF(L,1)*0.995,'進'),COLORRED;
SCGDTS:=BARSLAST(CROSS(谷,峰));
SCDDTS:=BARSLAST(CROSS(峰,谷));
SCGDGZ:=HHV(H,SCGDTS-1);
SCDDDZ:=LLV(L,SCDDTS-1);
ZDD:=(SCGDGZ-L)/L*100;
ZDZ:=(H-SCDDDZ)/SCDDDZ*100;
最大漲幅:=IF(谷<峰,ZDZ,0),NODRAW;
最大跌幅:=IF(谷>峰,ZDD,0),NODRAW;
DRAWNUMBER(谷<峰 AND ISLASTBAR,H*1.04,最大漲幅),COLORRED;
DRAWNUMBER(谷>峰 AND ISLASTBAR,H*1.04,最大跌幅),COLORGREEN;
DRAWLINE(CROSS(谷,峰),H,CROSS(峰,谷),L,0),COLORGREEN;
DRAWLINE(CROSS(峰,谷),L,CROSS(谷,峰),H,0),COLORRED;
DRAWICON(CURRBARSCOUNT=240*1,L*1.115,14);