【感悟主图】本主图是一个组合的主图指标集成金牛趋势 寻龙诀 解盘主图 趋势评分 支撑压力
指标源码
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.08AND 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;
