DRAWGBK(C>0,RGB(0,0,110),RGB(0,25,0),0,' ',0);
总涨幅:(H-LLV(L,180))/LLV(L,180)*100,NODRAW,COLORMAGENTA;
日时转换:=IF(PERIOD=5,120,240);
VAR30:=(EMA(CLOSE,30)+EMA(CLOSE,72))/2;
{牛熊线:EMA(VAR30,日时转换),LINETHICK1,COLORYELLOW;}
{MA5:MA(CLOSE,5),COLORWHITE;
MA21:MA(CLOSE,21),COLOR00FFCC;
MA55:MA(CLOSE,55),COLORLIBLUE;}
{止盈止损}
CC11:=IF(CURRBARSCOUNT<18,CONST(REF(C,1)),DRAWNULL),COLOR888888,NODRAW;
止赢:1.05*CC11,COLORMAGENTA,LINETHICK1;
{DRAWTEXT(ISLASTBAR,止赢,'止赢'),LINETHICK1;}
止损:0.97*CC11,COLORYELLOW,LINETHICK1;
{DRAWTEXT(ISLASTBAR,止损,'止损'),LINETHICK1;}
{DRAWNUMBER(ISLASTBAR ,C,C),COLORWHITE;}
DRAWBAND(止赢,RGB(65,105,225),止损,RGB(00,00,00));
{金牛}
DRAWTEXT_FIX(1,0.88,5,0,''),COLORRED;
HZZ:=1220601;
HZ:=IF(DATE<HZZ,1,DRAWNULL);
Z1:=STRCAT(HYBLOCK,' ')*HZ;
Z2:=STRCAT(Z1,DYBLOCK)*HZ;
Z3:=STRCAT(Z2,' ');
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORRED;
金牛:=(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1+XMA(XMA(H,25),25)*HZ,DOTLINE,COLORYELLOW;
金钻趋势:XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,LINETHICK1,COLORYELLOW,DOTLINE;
金牛2:=EMA(金钻趋势,25)COLORCYAN,LINETHICK2;
DRAWKLINE(H,O,L,C);
STICKLINE(金钻趋势>LOW AND 金钻趋势<HIGH,金钻趋势,MIN(MIN(OPEN,CLOSE),金钻趋势),2,0),COLORYELLOW;
STICKLINE(金钻趋势>MIN(C,O) AND 金钻趋势<MAX(C,O),金钻趋势,MIN(OPEN,CLOSE),2,0),COLORYELLOW;
STICKLINE(金钻趋势>HIGH,OPEN,CLOSE,2,0),COLORYELLOW;
STICKLINE(金钻趋势>HIGH,HIGH,LOW,0,0),COLORYELLOW;
VAR23:=100*XMA(XMA((C-REF(C,1)),6),6)/XMA(XMA(ABS((C-REF(C,1))),6),6);
回调买:=LLV(VAR23,2)=LLV(VAR23,7) AND COUNT(VAR23<0,2) AND CROSS(VAR23,MA(VAR23,2));
XG:=金钻趋势>HIGH AND 回调买 AND L<=金钻趋势;
DRAWBAND(金钻趋势,RGB(55,0,0),金牛2,RGB(0,91,0));
DRAWTEXT(XG,L,'买'),COLORRED;
JJ:=(HIGH+LOW+CLOSE)/3;
QJ0:=VOL/IF(HIGH=LOW,4,HIGH-LOW);
QJ1:=IF(CAPITAL=0,QJ0*(JJ-MIN(CLOSE,OPEN)),QJ0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW)));
QJ2:=IF(CAPITAL=0,QJ0*(MIN(OPEN,CLOSE)-LOW),QJ0*IF(HIGH=LOW,1,(JJ-MIN(CLOSE,OPEN))));
QJ3:=IF(CAPITAL=0,QJ0*(HIGH-MAX(OPEN,CLOSE)),QJ0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE))));
QJ4:=IF(CAPITAL=0,QJ0*(MAX(CLOSE,OPEN)-JJ),QJ0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-JJ)));
DDX:=((QJ1+QJ2)-(QJ3+QJ4))/IF(CAPITAL=0,10000,10000),COLOR00AAAA,LINETHICK;
V2:=SMA(IF(C>=REF(C,1),DDX,-DDX/100),2,1);
V5:=SMA(V2*120/FROMOPEN*5,2,1);
V10:=SMA(V5,5,1);
V20:=SMA(V10,5,1);
DY:=CURRBARSCOUNT=1 AND C<REF(C,1);
DY2:=REF(V2,1)-DY;
XG2:=C>O AND DY2<0.02 AND MA(C,5)>MA(C,60) AND C/REF(C,1)>=1.02 AND H<金牛;
DRAWTEXT(XG2 AND L<金钻趋势,L,'金钻起涨'),COLORMAGENTA;
N10:=3; N20:=6; N3:=12; N4:=24;
BBI1:(MA(CLOSE,N10)+MA(CLOSE,N20)+MA(CLOSE,N3)+MA(CLOSE,N4))/4,COLORRED,LINETHICK2;
BB:=BBI1<REF(BBI1,1); IF(BB,BBI1,DRAWNULL)COLORGREEN,LINETHICK2;
{DRAWICON(CROSS(C,BBI),BBI1*0.975,1); DRAWICON(CROSS(BBI,C),BBI1*1.015,2);}
TJ:=VOL>=REF(V,1)*2.8 AND C>REF(C,1)*1.01;
{DRAWTEXT(TJ,LOW*0.986,'↖高量柱'),COLORYELLOW;}
STICKLINE(TJ,OPEN,CLOSE,1.5,0),COLORYELLOW;
K1:=SUMBARS(TJ,1);
{STICKLINE(K1,REF(C,K1-1),REF(C,K1-1),1,0),COLORYELLOW;
STICKLINE(K1,REF(O,K1-1),REF(O,K1-1),1,0),COLORYELLOW;}
TJ1:=VOL>=REF(V,1)*3;
{DRAWTEXT(TJ1,LOW*0.986,'↖高量柱'),COLORYELLOW;}
STICKLINE(TJ1,OPEN,CLOSE,1.5,0),COLORYELLOW;
K2:=SUMBARS(TJ1,1);
{STICKLINE(K2,REF(C,K2-1),REF(C,K2-1),1,0),COLORYELLOW;
STICKLINE(K1,REF(O,K2-1),REF(O,K2-1),1,0),COLORYELLOW;}
DRAWKLINE(H,O,L,C);
Z1A:=STRCAT(HYBLOCK,' ');
Z2A:=STRCAT(Z1A,FGBLOCK);
Z3A:=STRCAT(Z2A,DYBLOCK);
Z4A:=STRCAT(Z3A,' ');
DRAWTEXT_FIX(ISLASTBAR,0.25,0.98,0,STRCAT(Z4A,GNBLOCK)),COLORCYAN;
{涨跌停显示}
涨停1:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0);
STICKLINE(涨停1,O,C,2,0),COLORFF00F5;
跌停:=(C-REF(C,1))/REF(C,1)*100;
STICKLINE(跌停<-9.9,O,C,2,0),COLORGREEN;
ST:=NAMELIKE('ST')||NAMELIKE('*ST')||NAMELIKE('SST');
C1:=REF(C,1);
ST涨停:=IF(1.05*C1-C<0.005,2,0)&&ST;
非ST涨停:=IF(1.1*C1-C<0.005,2,0);
STICKLINE(ST涨停,O,C,2,0),COLORFF00F5;
STICKLINE(ST涨停,H,L,0,0),COLORFF00F5;
ST跌停:=IF(C-0.95*C1<0.005,2,0)&&ST;
STICKLINE(ST跌停,O,C,2,0),COLORGREEN;
STICKLINE(ST跌停,H,L,0,1),COLORGREEN;
{寻龙诀}
X_1:=REF(CLOSE,1)/REF(CLOSE,2)>1.095;
X_2:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>9.9 AND (CLOSE-REF(CLOSE,3))/REF(CLOSE,3)*100<31 AND (CLOSE-REF(CLOSE,4))/REF(CLOSE,4)*100<40;
X_3:=X_1 AND X_2 AND CLOSE<16 AND REF(VOL/CAPITAL*100,1)<25 AND MA(CLOSE,5)>MA(CLOSE,10) AND MA(CLOSE,10)>MA(CLOSE,21) AND MA(CLOSE,5)>MA(CLOSE,34) AND VOL<=REF(VOL,1)*3.1 AND (CLOSE-REF(CLOSE,9))/REF(CLOSE,9)*100<50 AND (CLOSE-REF(CLOSE,7))/REF(CLOSE,7)*100<50 AND (CLOSE-REF(CLOSE,12))/REF(CLOSE,12)*100<150 AND REF(VOL/CAPITAL*100,0)<30 AND REF(VOL/CAPITAL*100,2)<45 AND MA(CLOSE,3)>MA(CLOSE,5);
STICKLINE(X_3,OPEN,CLOSE,3,0),COLORMAGENTA;
{DRAWICON(X_3,LOW*1,38);
DRAWICON(X_3,LOW*0.97,28);
DRAWICON(X_3,LOW*0.96,9);
DRAWICON(X_3,LOW*0.98,23);}
X_4:=MACD.MACD>(-1.2) AND CLOSE<50 AND REF(EVERY(CLOSE/REF(CLOSE,1)<0.999,3),1) AND CLOSE>REF(CLOSE,1) AND MACD.DIF>(-0.13) AND (CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>0;
变色:STICKLINE(X_4,OPEN,CLOSE,3,0),COLORYELLOW;
X_5:=VOL>=REF(VOL,1)*1.9 AND IF(CLOSE<OPEN,CLOSE>REF(CLOSE,1),1) AND (CLOSE-REF(CLOSE,3))/REF(CLOSE,3)*100<30 AND (CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>8.1;
X_6:=STICKLINE(X_4,REF(LOW,0),REF(LOW,0),30,0);
DRAWICON(CLOSE<MA(CLOSE,3) AND CLOSE>MA(CLOSE,5) AND (CLOSE-REF(CLOSE,5))/REF(CLOSE,5)*100>5,HIGH+0.01,15);
{DRAWICON(FILTER(X_4,3),LOW*1,38);
DRAWICON(FILTER(X_4,3),LOW*0.99,1);
DRAWICON(FILTER(X_4,3),LOW*0.98,23)}
HGXA:=EMA(SLOPE(C,4)*20+C,42);
JINGDRL:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
JINGDK:=SMA(JINGDRL,3,1);
JINGDD:=SMA(JINGDK,3,1);
JINGDJ:=3*JINGDK-2*JINGDD;
MAHL1:=100*((EMA((H+L)/2,3)-LLV(EMA((H+L)/2,5),30)-(EMA(H,20)-EMA(L,20))) /(LLV(EMA((H+L)/2,5),30)-(EMA(H,20)-EMA(L,20))));
MAHL2:=IF(EMA(C,2)>HGXA AND MAHL1>0,EMA(C,3),LLV(EMA((H+L)/2,5),30));
MAHL3:=IF(EMA(C,2)>HGXA AND MAHL1>0,LLV(EMA((H+L)/2,5),30),EMA(C,5));
TTS1:=SMA(C,6.5,1);
TTS2:=SMA(C,14.5,1);
TTS11:=SMA(C,3,1);
TTS21:=SMA(C,8,1);
TTS12:=SMA(C,3.5,1);
{DRAWTEXT(CROSS(TTS21,TTS11),H,'洗盘'),COLOR00FF00;}
BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,25))/4;
UPR:=BBI+3*STD(BBI,13),LINETHICK2;
DWN:=BBI-3*STD(BBI,13);
EMA55:=MA(CLOSE,55),LINETHICK2;
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
DRAWTEXT( CROSS(82,RSI) AND CLOSE<TTS11 , HIGH,'减仓') ,COLORFF9966,LINETHICK2;
A7:=(2*C+H+L)/4;
CAOZ:=MA(A7,5),COLORBLUE,LINETHICK2;
CAOZ1:=MA(A7,5)*1.03,LINETHICK2;
CAOZ2:=MA(A7,5)*0.97,LINETHICK2;
{DRAWTEXT( CROSS(TTS11,TTS1) AND TTS11>CAOZ,LOW,'买' ),COLORYELLOW;}
YCX:=CAOZ>=REF(CAOZ,1);
H1:=MAX(MAX(TTS1,TTS21),TTS2);
L1:=MIN(MIN(TTS1,TTS21),TTS2);
M1:=1000*CAOZ/TTS2<=1015 AND 1000*CAOZ/TTS2>=975;
M2:=1000*TTS21/TTS2<=1020 AND TTS21/TTS2>=980;
M3:=1000*TTS1/TTS2<=1015 AND TTS1/TTS2>=985;
D:=MA(CLOSE,89)-MA(CLOSE,10)/3;
DRAWTEXT(IF(CLOSE<D AND VOL/240>MA(VOL,5)/240 AND CLOSE>REF(CLOSE,1)*1.08
AND CLOSE<MA(CLOSE,13)*1.3,1,0),LOW,'抄底');
RSV:=(CLOSE-LLV(LOW,25))/(HHV(HIGH,25)-LLV(LOW,25))*100;
K:=SMA(RSV,3,1);
D1:=SMA(K,3,1);
J:=3*K-2*D1;
VAR3:=(2*CLOSE+HIGH+LOW)/4;
VAR4:=EMA(EMA(EMA(VAR3,4),4),4);
E:=(VAR4-REF(VAR4,1))/REF(VAR4,1)*100;
F:=MA(E,3)+0.03;
G:=MA(E,1);
{DRAWICON(CROSS(F,G) AND J>65,HIGH,15),COLORGREEN;
DRAWICON(CROSS(G,F),LOW,9),COLORYELLOW;
DRAWTEXT( CROSS(TTS11,CAOZ) AND M1 AND M2 AND M3,LOW,'买进' ),COLORYELLOW;}
HAN:=DATE<1301230;
TT:=240/FROMOPEN;
比:=TT;
促进指数ＭＦＬ:=(HIGH-LOW)*1000000/(VOL*比),COLORRED;
AY2:=EMA(CLOSE,12)-EMA(CLOSE,26);
AZ2:=EMA(AY2,9);
LT2:=(AY2-AZ2);
L211:=IF(LT2,LLV(L,21),DRAWNULL),COLOR217158,CIRCLEDOT;
ZGD:=HHV(H,80)*0.99;
ZGD2:=CONST(ZGD);
ZDD:=LLV(L211,80);
ZDD2:=CONST(ZDD);
YYA4:=MA(CLOSE,20);
YYA5:=(CLOSE > MA(CLOSE,5));
YYA6:=(MA(CLOSE,5) > MA(CLOSE,10));
YYA7:=(CLOSE > MA(CLOSE,10));
YYA8:=(MA(CLOSE,5) > MA(CLOSE,20));
YYA9:=(CLOSE > MA(CLOSE,20));
YYA10:=REF(YYA4,1);
YYA11:=(YYA4 > YYA10);
YYAVX:=(((((IF(YYA5,10,(0 - 10)) + IF(YYA6,10,(0 - 10))) + IF(YYA7,10,(0 - 10))) + IF(YYA8,10,(0 - 10))) + IF(YYA9,10,(0 -
10))) + IF(YYA11,10,(0 - 10)));
DSLX:=(CLOSE / INDEXC);
DSLX1:=MA(DSLX,5);
YYV1:=MA(VOL,5);
YYV2:=MA(VOL,10);
情况1:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1*HAN >= YYV2)) AND (DSLX >= DSLX1)),1,0));
情况2:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1*HAN < YYV2)) AND (DSLX >= DSLX1)),1,0));
情况3:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1*HAN > YYV2)) AND (DSLX < DSLX1)),1,0));
情况4:=CONST(IF(((CROSS(YYAVX,1) AND (YYV1*HAN <= YYV2)) AND (DSLX < DSLX1)),1,0));
情况9:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 >= YYV2)) AND (DSLX >= DSLX1)),1,0));
情况10:=CONST(IF(((((YYAVX >= 1) AND (REF(YYAVX,1) > 0)) AND (YYV1 < YYV2)) AND (DSLX >= DSLX1)),1,0));
大盘3:=CONST(IF((CROSS(1,YYAVX) AND (YYV1 >= YYV2)),1,0));
大盘5:=CONST(IF((((YYAVX >= 1) AND (REF(YYAVX*HAN,1) > 0)) AND (YYV1 >= YYV2)),1,0));
{DRAWTEXT(情况1=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03),'量能理想,明显走强,仓位在2/3左右')*HAN,COLORWHITE;
DRAWTEXT(情况2=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03)*HAN,'走势趋强,量能不足，短线进场，仓位在1/2左右')*HAN,COLORWHITE;
DRAWTEXT(情况3=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03)*HAN,'量价良好，并没有明显走强，短线进场，仓位1/2左右。 ')*HAN,COLORWHITE;
DRAWTEXT(情况4=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03)*HAN,'形态尚可，量能不足，未完全走强,短线参与，仓位1/3左右')*HAN,COLORWHITE;
DRAWTEXT(情况9=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03)*HAN,'该股形态良好，强势明显，量能充足，可以继续持有。 ')*HAN,COLOR00FFFF;
DRAWTEXT(情况10=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,ZGD2-(ZGD2*0.03)*HAN,'该股上行趋势不变，强势依然，但量能开始转弱，注意风险 ')*HAN,COLOR00FFFF;}
DRAWTEXT(情况1=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,1,'量能理想,明显走强,仓位在2/3左右')*HAN,COLORWHITE;
DRAWTEXT(情况2=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,1,'走势趋强,量能不足，短线进场，仓位在1/2左右')*HAN,COLORWHITE;
DRAWTEXT(情况3=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,1,'量价良好，并没有明显走强，短线进场，仓位1/2左右。 ')*HAN,COLORWHITE;
DRAWTEXT(情况4=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,1,'形态尚可，量能不足，未完全走强,短线参与，仓位1/3左右')*HAN,COLORWHITE;
DRAWTEXT(情况9=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,1,'该股形态良好，强势明显，量能充足，可以继续持有。 ')*HAN,COLOR00FFFF;
DRAWTEXT(情况10=1 AND (CLOSE < 200) AND CURRBARSCOUNT=70,1,'该股上行趋势不变，强势依然，但量能开始转弱，注意风险 ')*HAN,COLOR00FFFF;
VAR1:=(EMA(CLOSE,30)+EMA(CLOSE,72))/2;
强弱线:=EMA(VAR1,日时转换),POINTDOT,COLORRED;
指标王:=CROSS(SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,3,1),SMA(SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,3,1),3,1)) AND SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,3,1)<20;
DRAWTEXT(指标王,L,'建仓'),COLORYELLOW;
{DRAWTEXT(VAR1,L*0.98,'买'),COLORYELLOW;}
DRAWTEXT(CROSS(MA(C,3),MA(C,9)) AND C>=REF(C,1) AND C>O,L*0.98,'加仓'),COLORMAGENTA;
{趋势评分}
X01:=IF(MA(C,5)>MA(C,10),20,0);
X02:=IF(MA(C,20)>MA(C,60),10,0);
X3:=IF(KDJ.J>KDJ.K,10,0);
X4:=IF(MACD.DIF>MACD.DEA,10,0);
X5:=IF(MACD.MACD>0,10,0);
X6:=IF(V>MA(V,60),10,0);
X7:=IF(WINNER(C)>0.5,10,0);
X8:=IF(C/REF(C,1)>1.03,10,0);
XX:=X01+X02+X3+X4+X5+X6+X7+X8;
DRAWTEXT_FIX(V>O,0.45,0.05,0,STRCAT('趋势评分： ',STRCAT(CON2STR(XX,0),' '))),COLORYELLOW;
{上涨下跌数}
上涨:"999999$ADVANCE"+"399001$ADVANCE",COLORRED,NODRAW;
下跌:"999999$DECLINE"+"399001$DECLINE",COLORLIGREEN,NODRAW;
{涨跌:上涨/(上涨+下跌)*100,NODRAW;}
DRAWTEXT_FIX(1,0,0.05,0,STRCAT('上涨:',STRCAT(CON2STR(上涨,0),' '))),COLORRED;
DRAWTEXT_FIX(1,0.25,0.05,0,STRCAT('下跌:',STRCAT(CON2STR(下跌,0),' '))),COLORGREEN;
{短支持压力}
{EE:=(HIGH+LOW+OPEN+2*CLOSE)/5;
阻力1:=2*EE-LOW;
支撑1:=2*EE-HIGH;
DRAWTEXT_FIX(C!=0,0.65,0.05,0,STRCAT('短阻力： ',STRCAT(CON2STR(阻力1,2),' '))),COLORFFFF00;
DRAWTEXT_FIX(C!=0,1,0.05,0,STRCAT('短支撑： ',STRCAT(CON2STR(支撑1,2),' '))),COLOR8E8EFF;}
VAB0:=531;
VAB1:=1510000;
VAB2:=VAB0 + VAB1;
VAB3:=IF(DATE > VAB2,0,1);
VARA12:=SMA(H,10,9)*VAB3;
VARA13:=SMA(L,10,9)*VAB3;
卖价:VARA12,COLORRED,NODRAW;
补仓:VARA13,COLORGREEN,NODRAW;
DRAWTEXT_FIX(1,0.7,0.05,0,STRCAT('补仓:',STRCAT(CON2STR(补仓,2),' '))),COLORRED;
DRAWTEXT_FIX(1,0.95,0.05,0,STRCAT('卖价:',STRCAT(CON2STR(卖价,2),' '))),COLORGREEN;
{买卖点}
VAR03:=LLV(HIGH,240);
VAR04:=100*(CLOSE-VAR03)/VAR03;
VAR5:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100;
VAR6:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100;
VAR7:=0;VAR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100;
VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;
VAR10:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0);
VAR11:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);
VAR12:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);
VAR13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);
VAR14:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3);
VAR15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3);
VAR16:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);
VAR17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);
VAR18:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);
VAR19:=EMA(CLOSE,2)-EMA(CLOSE,150);买１:=VAR10;
买２:=(VAR11+VAR13+VAR15+VAR17);
卖１:=(VAR12+VAR14+VAR16+VAR18);
B:IF(买１>0 OR 买２>0,LOW*0.99,DRAWNULL),CROSSDOT,LINETHICK3,COLORYELLOW;
{DRAWTEXT(买１>0 OR 买２>0,LOW*0.99,'买'),COLORRED;
S:IF(卖１>0,HIGH*1.01,DRAWNULL),CROSSDOT,LINETHICK3,COLORGREEN;
DRAWTEXT(卖１>0,HIGH*1.02,'卖'),COLORGREEN;}
DRAWICON((ZIG(3,5)>REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)<=REF(ZIG(3,5),2)) AND (REF(ZIG(3,5),2)<=REF(ZIG(3,5),3)),LOW*0.98,1) ;
DRAWICON((ZIG(3,5)<REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)>=REF(ZIG(3,5),2)) AND (REF(ZIG(3,5),2)>=REF(ZIG(3,5),3)),HIGH*1.01,2);
ZB:=EMA(EMA(VAR3,5),5)*3, COLORSTICK;
VARA:=IF(VAR9 AND CROSS(MA(CLOSE,3),MA(CLOSE,5)),20,0);
K0:=EMA(VAR7,5)*2, , COLORFF00FF;
D0:=EMA(K0,5), , COLORWHITE;
J0:=K0*3-D0*2, ,COLORYELLOW;
VARB:=BETWEEN(CLOSE,MA(CLOSE,3),MA(CLOSE,5)) AND J>10;
HS:=VOL/CAPITAL*100, , COLORGREEN;
VARE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
VARF:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
DRAWTEXT(VAR11 AND COUNT(VAR11,30)=1,LOW*0.95,'机构进场'),LINETHICK1,COLORLIRED;
DRAWTEXT(CROSS(ZIG(3,8),REF(ZIG(3,8),1)),LOW*0.95,'底'),LINETHICK2,COLORYELLOW;
DRAWTEXT(CROSS(REF(ZIG(3,10),1),ZIG(3,10)),HIGH*1.05,'顶'),LINETHICK2,COLORYELLOW;
JC1:=(REF(C,3)+REF(C,5)+REF(C,7)+REF(C,8)+REF(C,13)+REF(C,21))/6;
{参考价1:SMA(JC1,5,1),CIRCLEDOT,COLORGREEN;IF(C>=参考价1,参考价1,DRAWNULL),CIRCLEDOT,COLOR0000FF;}
PH:=TROUGHBARS(2,5,1);
LL:=HHV(H,PH);
TJ01:=LL=HIGH AND LL<REF(LL,1);{//=1}
TS:=SUMBARS(TJ01,2);
TJ0:=PEAKBARS(2,5,1)=1 AND TS>=PH;DRAWICON(TJ0,HIGH*1.01+0.02,2);
警告灯:IF(TJ0,HIGH*1.008,DRAWNULL),CROSSDOT,LINETHICK2,COLORCYAN;
PL:=BARSLAST(TJ0);
支撑:IF(BARSLAST(TJ01),REF(LOW,BARSLAST(TJ01)),DRAWNULL),COLOREA91B5,DOTLINE;
压力:IF(BARSLAST(TJ0),REF(HIGH,PL),DRAWNULL),COLORFFFF00,DOTLINE;
TJ_2:=LOW>REF(REF(LOW,TS),PL);
DRAWTEXT(ISLASTBAR,压力,'压力'),COLORFFFF00;
DRAWTEXT(ISLASTBAR,支撑,'支撑'),COLOREA91B5;
