DE:=CONST(LLV(L,90));JI:=CONST(HHV(H,90))-DE;DE_K:=DE+JI/3*2;JI_K:=JI/2;RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;DE_A:=CONST(LLV(RSV,90));DD_A:=CONST(HHV(RSV,90))-DE_A;R:=(RSV-DE_A)/DD_A;RSV1:=R*JI_K+DE_K;DE_M:=DE+JI/3;JI_M:=JI/2;KDL:=CONST(LLV(EMA(C,26),90));KDH:=CONST(HHV(EMA(C,26),90))-KDL;R_K1:=(EMA(C,12)-KDL)/KDH;R_K2:=(EMA(C,26)-KDL)/KDH;DIF~:(R_K1-R_K2)*JI*1.5+DE_M,NODRAW;DEA~:EMA(DIF~,9),NODRAW;MACD~:=(DIF~-DEA~)*2+DE_M;STICKLINE(MACD~>=DE_M,MACD~,DE_M,1,0),COLOR2F2F4F;D_1:=MACD~>H AND H>=DE_M AND DE_M>=L;D_2:=MACD~>H AND H>=L AND L>DE_M;D_3:=H>MACD~ AND MACD~>=L AND L>DE_M;D_4:=H>MACD~ AND MACD~>DE_M AND DE_M>=L;STICKLINE(D_1>0,H,DE_M,1,0),COLOR2F2F4F;STICKLINE(D_2,H,L,1,0),COLOR2F2F4F;STICKLINE(D_3,MACD~,L,1,0),COLOR2F2F4F;STICKLINE(D_4,MACD~,DE_M,1,0),COLOR2F2F4F;D_5:=MACD~< L AND L<=DE_M AND DE_M<=H;D_6:=MACD~< L AND H< DE_M;D_7:=L< MACD~ AND MACD~<=H AND H< DE_M;D_8:=L< MACD~ AND MACD~< DE_M AND DE_M<=H;STICKLINE(MACD~< DE_M,DE_M,MACD~,1,0),COLOR2F2F4F;STICKLINE(D_5,DE_M,L,1,0),COLOR2F2F4F;STICKLINE(D_6,H,L,1,0),COLOR2F2F4F;STICKLINE(D_7,H,MACD~,1,0),COLOR2F2F4F;STICKLINE(D_8,DE_M,MACD~,1,0),COLOR2F2F4F;HAN:=DATE< 1141230;当前获利筹码:=IF(WINNER(CLOSE),WINNER(CLOSE)*100,0);DRAWKLINE(H,O,L,C);九十成本集中:=(COST(95)-COST(5))/(COST(95)+COST(5))*100;成本价:COST(九十成本集中),LINETHICK2,POINTDOT,COLORFFFFFF;入1:IF(成本价>REF(成本价,1),成本价,DRAWNULL),COLORFF00FF,POINTDOT,LINETHICK4;出1:IF(成本价< REF(成本价,1),成本价,DRAWNULL),COLORFFFF00,POINTDOT,LINETHICK4;STICKLINE(C>=O,H,L,0,0),COLOREAADEA;STICKLINE(C>=O,C,O,3,0),COLOREAADEA;STICKLINE(C< O,H,L,0,0),COLORFF0000;STICKLINE(C< O,C,O,3,0),COLORFF0000;STICKLINE(C>O,C,O,2.0,0),COLOR8C8C00;STICKLINE(C>O,C,O,1.8,0),COLOR959500;STICKLINE(C>O,C,O,1.6,0),COLOR9F9F00;STICKLINE(C>O,C,O,1.3,0),COLORAAAA00;STICKLINE(C>O,C,O,1.0,0),COLORB5B500;STICKLINE(C>O,C,O,0.6,0),COLORBFBF00;STICKLINE(C>O,C,O,0.3,0),COLORD0D000;STICKLINE(C=O,C,O,0.1,0),COLOR8C8C00;STICKLINE(C< O,C,O,2.0,0),COLOR8C8C00;STICKLINE(C< O,C,O,1.8,0),COLOR959500;STICKLINE(C< O,C,O,1.5,0),COLOR9F9F00;STICKLINE(C< O,C,O,1.3,0),COLORAAAA00;STICKLINE(C< O,C,O,1.0,0),COLORB5B500;STICKLINE(C< O,C,O,0.6,0),COLORBFBF00;STICKLINE(C< O,C,O,0.3,0),COLORD0D000;STICKLINE(C=O,C,O,0.1,0),COLOR8C8C00;均线7:MA(C,7),NODRAW;均线13:MA(C,13),NODRAW;STICKLINE((C>均线13),O,C,2,0),COLOR1313FF;STICKLINE((C>均线13),O,C,1.6,0),COLOR2424FF;STICKLINE((C>均线13),O,C,1.2,0),COLOR2D2DFF;STICKLINE((C>均线13),O,C,0.8,0),COLOR4444FF;STICKLINE((C>均线13),O,C,0.5,0),COLOR5757FF;STICKLINE((C>均线13),O,C,0.3,0),COLOR6666FF;STICKLINE((C>均线13),O,C,0.1,0),COLOR7D7DFF;STICKLINE((C>均线7),O,C,0.3,0),COLOREBC79E;B1:=EMA(C,3);B2:=EMA(C,13);B3:=B1-B2;WDIF:EMA(EMA(EMA(C,3),3),3)+B3,COLORFFFFFF;WDEA:EMA(WDIF,3),COLORFFF000;重心:(2*C+H+L)/4,COLOR00FFFF,LINETHICK0;SJ:=WMA((重心-LLV(L,5))/(HHV(H,5)-LLV(L,5))*100,2);ZJ:=WMA(0.618*REF(SJ,1)+0.382*SJ,2);DRAWTEXT(CROSS(SJ,ZJ) AND SJ< 30,L-0.1,'←低吸'),COLOR00FF00;DRAWTEXT(CROSS(ZJ,SJ) AND SJ>70,H+0.1,'←高抛'),COLOR0077FF;
