|
以下是通达信势百变源码副图（无源码的请下载附件导入）
F111:=ZIG(3,15);
F211:=IF((F111> REF(F111,1)),100,80);
昨:REF(C,1),NODRAW,COLORGREEN;
上涨家数:=INDEXADV;
下跌家数:=INDEXDEC;
人气:上涨家数/下跌家数,NODRAW;
M5:MA(C,5),COLORFFFFFF;
M10:MA(C,10)COLOR00FFFF;
M20:MA(C,20),COLOR888800;
M30:MA(C,30),COLORRED;
M60:MA(C,60),COLORGREEN;
半:MA(C,120)COLORBLUE;
年:MA(C,250),COLORMAGENTA;
拟:IF(BARSCOUNT(CLOSE)<250,SUM(CLOSE,BARSCOUNT(CLOSE))/BARSCOUNT(CLOSE),MA(CLOSE,250)),COLORFF00FF;
T01:=CONST(LLVBARS(LOW,10));
T11HIGH:=CONST(REF(HIGH,T01));
CC1:=CONST(CURRBARSCOUNT);
T02:=CONST(BARSLAST((CURRBARSCOUNT >(CC1+T01)) AND (HIGH>T11HIGH)));
T12HIGH:=CONST(REF(HIGH,T02));
T03:=CONST(BARSLAST((CURRBARSCOUNT >(CC1+T02)) AND (HIGH>T12HIGH)));
T13HIGH:=CONST(REF(HIGH,T03));
洗:DRAWLINE(CURRBARSCOUNT=T03+1, T13HIGH, ISLASTBAR, T13HIGH, 1),DOTLINE,COLORFFFFFF;
AY:=REF(H,10)=HHV(H,2*10+1);
QYY:=BACKSET(AY,10+1);
CC:=FILTER(QYY,10) AND H=HHV(H,10+1);
DDD:=BARSLAST(CC);
GDTS:=IF(CC,CURRBARSCOUNT,0);
DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);
GDCS1:=CONST(DINGBUTS);
DINGBUTS1:=REF(DINGBUTS,DDD+1);
GDCS2:=CONST(DINGBUTS1);
压:DRAWLINE(HIGH>=HHV(HIGH,10),HIGH,LOW<=LLV(LOW,3),HHV(HIGH,3),1),COLORFFFF00,LINETHICK1,DOTLINE;
A2:=REF(L,5)=LLV(L,2*5+1);
B2:=FILTER(A2,5);
C2:=BACKSET(B2,5+1);
D2:=FILTER(C2,5);
E2:=BACKSET(ISLASTBAR,BARSLAST(D2)+1);
F2:=E2>REF(E2,1);
支:DRAWLINE(D2,L,F2,L,1),COLORLIRED,DOTLINE;
高1:=REF(HHV(H,150),3);
低1:=REF(LLV(L,150),3);
HH1:=高1-(高1-低1)*0.191;
冲:REFDATE(HH1,DATE),COLORLIGREEN;
LTG:=LLVBARS(L,60);
LT1:=LLVBARS(L,60);
LTT:=BARSLAST(CURRBARSCOUNT=CONST(LTG)+1);
HTG:=FINDHIGHBARS(H,LTG+1,60,1);
锅顶:=DRAWLINE(CURRBARSCOUNT=CONST(HTG)+1,H,ISLASTBAR,REF(H,HTG),0),COLORYELLOW,LINETHICK2;
TT:=BARSLAST(CURRBARSCOUNT=CONST(HTG)+1);
AAG:=CROSS(C,CONST(锅顶));
BB:DRAWLINE(TT=0,H,LTT=0,L,0),COLORRED,LINETHICK2;
锅底:DRAWLINE(CURRBARSCOUNT>CONST(LT1)+0,L,ISLASTBAR,REF(L,LT1),0),COLORWHITE;
ZF1:=(C-REF(C,1))/REF(C,1)*100;
AZ:=IF(C>O,ZF1,1);
TJZ:=EVERY(RANGE(AZ,0,4),3);
TZ:=BARSLAST(COUNT(CROSS(C,MA(C,5)),3)=2 AND CROSS(C,MA(C,5)) AND TJZ);
XGZ:=REF(EVERY(H<REF(H,TZ),TZ),1) AND CROSS(C,REF(H,TZ));
突破价:REF(H,TZ) NODRAW,COLORLIMAGENTA;
LTS:=LLVBARS(L,100);
HTS:=HHVBARS(H,60);
LT1S:=FINDLOWBARS(L,HTS+1,30,1);
LTTS:=BARSLAST(CURRBARSCOUNT=CONST(LTS)+1);
LTT1:=BARSLAST(CURRBARSCOUNT=CONST(LT1S)+1);
HT1:=FINDHIGHBARS(H,LTT1,LTTS+1,1);
HT1T:=BARSLAST(CURRBARSCOUNT=CONST(HT1)+1);
HT2T:=BARSLAST(CURRBARSCOUNT=CONST(HTS)+1);
TJS:=L>REF(L,LTTS);
TJ1S:=H>REF(H,HT1T);
升下轨:DRAWLINE(LTTS=0,L,LTT1=0 AND TJS,L,1),COLORYELLOW,DOTLINE;
升上轨:DRAWLINE(HT1T=0,H,HT2T=0 AND TJ1S,H,1),COLORYELLOW,DOTLINE;
XLT:=FINDLOWBARS(H,0,HT2T+1,1);
XLT1:=BARSLAST(CURRBARSCOUNT=CONST(XLT)+1);
XH1T:=FINDHIGHBARS(H,XLT1,10,1);
XH1TT:=BARSLAST(CURRBARSCOUNT=CONST(XH1T)+1);
DF:=(C-REF(C,HT2T+1))/REF(C,HT2T+1)*100;
XL2TT:=BARSSINCEN(DF<-15,HT2T+1);
TJ2S:=H<REF(H,HT2T);
TJ3S:=L<REF(L,XL2TT);
降上轨:DRAWLINE(HT2T=0,H,XH1TT=0 AND TJ2S,H,1),COLORGREEN,DOTLINE;
降下轨:DRAWLINE(XL2TT=0,L,XLT1=0 AND TJ3S,L,1),COLORGREEN,DOTLINE;
STICKLINE(TZ>=0,REF(H,TZ),REF(H,TZ),4,-1),COLORGREEN;
STICKLINE(CROSS(XGZ=1,0.5),C,O,2,0),COLORBROWN;
STICKLINE(CROSS(XGZ=1,0.5),H,L,0,0),COLORBROWN;
DRAWICON(CROSS(XGZ=1,0.5),L*0.95,11);
VAR3:=LLV(HIGH,240);
VAR4:=100*(CLOSE-VAR3)/VAR3;
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);
买１:=F211=100 AND VAR10;
买２:=F211=100 AND (VAR11+VAR13+VAR15+VAR17);
卖１:=(VAR12+VAR14+VAR16+VAR18);
F1:=ZIG(3,15);
F21:=IF((F1> REF(F1,1)),100,80);
VARE1:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
VAR1A:=IF(VARE1>0,VARE1,0);
VAR1B:=IF(VAR14>=200 AND VAR13>=150,15,IF(VAR14<=-200 AND VAR13<=-150,-15,VAR16))+60;
VAR1C:=VAR1A>48 AND VAR1B>60 AND VAR19<100;
大顶0:=VAR1C AND COUNT(VAR1C,30)=1;
DRAWTEXT(大顶0=1,H*1.03,'大顶!'),COLORWHITE;
PL5:=ZIG(3,5);
EN1:=PL5>REF(PL5,1) AND REF(PL5,1)<=REF(PL5,2) AND REF(PL5,2)<=REF(PL5,3);
EX1:=PL5<REF(PL5,1) AND REF(PL5,1)>=REF(PL5,2) AND REF(PL5,2)>=REF(PL5,3);
PL10:=ZIG(3,10);
EN2:=PL10>REF(PL10,1) AND REF(PL10,1)<=REF(PL10,2) AND REF(PL10,2)<=REF(PL10,3);
EX2:=PL10<REF(PL10,1) AND REF(PL10,1)>=REF(PL10,2) AND REF(PL10,2)>=REF(PL10,3);
PL20:=ZIG(3,20);
EN3:=PL20>REF(PL20,1) AND REF(PL20,1)<=REF(PL20,2) AND REF(PL20,2)<=REF(PL20,3);
EX3:=PL20<REF(PL20,1) AND REF(PL20,1)>=REF(PL20,2) AND REF(PL20,2)>=REF(PL20,3);
走强1:=BARSLAST(PL5<REF(PL5,1));
走弱1:=BARSLAST(PL5>REF(PL5,1));
走强2:=BARSLAST(PL10<REF(PL10,1));
走弱2:=BARSLAST(PL10>REF(PL10,1));
走强3:=BARSLAST(PL20<REF(PL20,1));
走弱3:=BARSLAST(PL20>REF(PL20,1));
ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走强2),0);
ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,走强2),0);
DTJZ5:=IF(PL10<REF(PL10,1),COUNT(EN1,走弱2),0);
DTJD5:=IF(PL10<REF(PL10,1),COUNT(EX1,走弱2),0);
ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,走强3),0);
ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,走强3),0);
DTJZ10:=IF(PL20<REF(PL20,1),COUNT(EN2,走弱3),0);
DTJD10:=IF(PL20<REF(PL20,1),COUNT(EX2,走弱3),0);
DRAWTEXT(EN1 AND DTJZ5=1,L*0.98,'㈠'),COLORFFFFFF;
DRAWTEXT(EX1 AND DTJD5=2,H*1.02,'㈡'),COLORGREEN;
DRAWTEXT(EN2 AND ZTJZ5=1,L*0.98,'㈢'),COLORFFFFFF;
DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJD5=1,H*1.02,'⑴'),COLORFFFFFF;
DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2,L*0.98,'⑵'),COLOR00FFFF;
DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJZ5=2,H*1.02,'⑶'),COLORFFFF00;
DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3,L*0.98,'⑷'),COLOR00FFFF;
DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.02,'⑸'),COLORGREEN;
DRAWTEXT(EN2 AND DTJZ10=1,L*0.95,'Ⅰ'),COLORFFFFFF;
DRAWTEXT(EX2 AND DTJD10=2,H,'Ⅱ'),COLORGREEN;
DRAWTEXT(EN3 AND ZTJZ10=1,L*0.95,'Ⅲ'),COLORFF00FF;
DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.06,'①'),COLORFFFF00;
DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=2,L*0.94,'②'),COLORFF00FF;
DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=2 OR (ZTJD10=0 OR ZTJD10=2) AND EX2,H*1.06,'③'),COLORGREEN;
DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=3,L*0.94,'④'),COLORFF00FF;
MA5:=EMA(C,5);
MA13:=EMA(C,6);
UP:=DRAWLINE(L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS
(MA13,MA5))+1),H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS
(MA5,MA13))+1),0);
AAAL:=(3*C+H+L+O)/6;
VAR1L:=(8*AAAL+7*REF(AAAL,1)+6*REF(AAAL,2)+5*REF(AAAL,3)+4*REF(AAAL,4)
+3*REF(AAAL,5)+2*REF(AAAL,6)+REF(AAAL,8))/36;
VAR6L:=(LLV(VAR1L,2)+LLV(VAR1L,4)+LLV(VAR1L,6))/3;
DRAWTEXT(C>M5 AND O<一0.809 AND C>M10 AND C>M30 AND M30>=REF(M30,1) AND CROSS(C,VAR6L) AND C/REF(C,1)>1.03 AND C>O AND F21=100 AND UP,O,'牛'),COLORFFFFFF;
Z:=ISLASTBAR;
DRAWTEXT (REF(C,2)>REF(O,2)&&REF(C,1)>REF(O,1)&&C<=O&&Z,0.98*REF(H,1),'防调'),COLORGREEN;
DRAWTEXT (REF(C,2)<=REF(O,2)&&REF(C,1)>REF(O,1)&&C<=O&&Z,0.98*REF(H,1),'跌势'),COLORGREEN;
AAA:=CONST(HHV(H,90));
A74:=MA(CLOSE,20);
A75:=(CLOSE > MA(CLOSE,5));
A76:=(MA(CLOSE,5) > MA(CLOSE,10));
A77:=(CLOSE > MA(CLOSE,10));
A78:=(MA(CLOSE,5) > MA(CLOSE,20));
A79:=(CLOSE > MA(CLOSE,20));
A710:=REF(A74,1);
A711:=(A74 > A710);
AVX:=(((((IF(A75,10,(0 - 10)) + IF(A76,10,(0 - 10))) + IF(A77,10,(0 - 10)))
+ IF(A78,10,(0 - 10))) + IF(A79,10,(0 - 10))) + IF(A711,10,(0 - 10)));
DSLX:=(CLOSE / INDEXC);
DSLX1:=MA(DSLX,5);
DSLX2:=MA(DSLX,10);
V1:=MA(VOL,5);
V2:=MA(VOL,10);
T23:=CONST(IF(C>200 AND C>M5 AND M5>REF(M5,1) AND (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)),1,0));
DRAWTEXT(T23=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)
,'大盘重拾升势'),COLORWHITE;
T11:=CONST(IF(C<200 AND JS AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)),1,0));
DRAWTEXT(T11=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)
,'随时警惕变盘'),COLORFFFFFF;
T12:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX < DSLX1)),1,0));
DRAWTEXT(T12=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)
,'反弹逢高空仓'),COLORFFFF00;
T16:=CONST(IF(C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX < DSLX1)),1,0));
现价线:STICKLINE(ISLASTBAR,C,C,2900,-1),COLORWHITE;
低2:=IF(CURRBARSCOUNT<=60, CONST(IF(ISLASTBAR=1,LLV(L, BARSLAST(CURRBARSCOUNT=60)),1)),DRAWNULL);
T:=BARSLAST(C>REF(C,1)*1.095 AND C=H);
T2L:=BARSLAST(C<REF(C,1)*1.095 AND C>REF(C,1)*1.08);
T3L:=BARSLAST(C<REF(C,1)*1.08 AND C>REF(C,1)*1.07);
T4L:=BARSLAST(C<REF(C,1)*1.07 AND C>REF(C,1)*1.06);
T5L:=BARSLAST(C<REF(C,1)*1.06 AND C>REF(C,1)*1.05);
TJ1:=COUNT(T=0,100)=0;
TJ2:=COUNT(T2L=0,100)=0;
TJ3:=COUNT(T3L=0,100)=0;
TJ4:=COUNT(T4L=0,100)=0;
TJ5:=COUNT(T5L=0,100)=0;
TJA:=C>REF(C,1)*1.05;
AA:=REF(T,1)>100 AND REF(T2L,1)>100 AND REF(T3L,1)>100 AND REF(T4L,1)>100 AND REF(T5L,1)>80 AND TJA;
HHM:=HHV(MACD.MACD*100,200);
LLM:=LLV(MACD.MACD*100,200);
D1:=MIN(MIN(M5,M10),M20)<M60;
D3:=MIN(MIN(M5,M10),M20)>M60;
XGT:=BARSLAST(AA AND HHM<60 AND LLM>-55);
D6:=BARSSINCEN(MIN(MIN(M5,M10),M20)>M60,XGT+1);
XG:=CROSS((XGT=0 AND D3) OR D6=0,0.5);
TJ:=COUNT(XG,30)=2 AND XG;
SR1:=REF(HIGH,10)=HHV(HIGH,2*10+1);
SR2:=FILTER(SR1,10);
SR3:=BACKSET(SR2,10+1);
HD:=FILTER(SR3,10);
前高:=REF(H,BARSLAST(HD));
倍量:=VOL/REF(VOL,1)>=1.9;
突破前高:=CROSS(C,前高);
YG:= 倍量 AND 突破前高;
SJ:=BARSLAST(YG);
DIF:=MACD.DIF;
H300:=HHVBARS(DIF,300);
AL:=BOLL.UB;
TQ:=BARSLAST(CROSS(AL>=REF(AL,1),0.5));
E25:=EXPMA(C,25);
ZF:=EVERY(RANGE(C/REF(C,1),0.97,1.05),TQ+1);
ZFF:=(HHV(H,TQ+1)-LLV(L,TQ+1))/LLV(L,TQ+1)*100;
TJQ:=EVERY(MAX(C,O)/AL<1.02 ,TQ+1);
XL:=(ATAN((E25/REF(E25,TQ)-1)*100)*180/3.1415926);
TJ1Q:=CROSS(DIF>=REF(DIF,H300),0.5) AND ZFF<17 AND ZF AND TJQ;
起程:=TJ1Q AND XL>75;
A1F:=REF(C,1);
A3F:=(DCLOSE-A1F)/A1F*100;
AA1F:=(A3F-REF(A3F,1));
选股1:=CROSS(AA1F,9.8);
A11F:=REF(V,1);
A13F:=DVOL/A11F;
AA3F:=(A13F-REF(A13F,1));
选股2:=CROSS(AA3F,500);
潜伏:=选股1 AND 选股2;
R1:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
K1:=EMA(R1,3);
D1D:=EMA(K1,3);
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
N:=IF((陡峭度 > 0.35),6,65);
VAR1AD:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100)*((DATE < 20070110));
获利盘:=(WINNER(CLOSE))*(100);
获利线:=FORCAST(获利盘,7);
线:=(FORCAST(VAR1AD,7))*((DATE < 20070110));
出击:=F211=100 AND CROSS(线,20) AND IF((COUNT(CROSS(K1,D1D),3) = 1) AND (D1D < 40),1,(线 > D1D) OR (K1 > D1D) AND (D1D < 60)) AND IF((N = 6),(获利盘 < 70),(获利盘 < 40)) AND (COUNT((获利线 > 20),20) > 0);
爆发点:=(DCLOSE-REF(C,1))/REF(C,1)*100;
XB:=CROSS(爆发点,20);
VARA:=LLV(LOW,5);
VARB:=HHV(HIGH,5);
确:=EMA((CLOSE-VARA)/(VARB-VARA)*100,4);
趋势:=3*SMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*100,5,1)-2*
SMA(SMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*100,5,1),3,1);
ZZ:=趋势>REF(趋势,1);
K1L:=DVOL/1000000;
K2L:=DCLOSE;
V1L:=EMA(K1L,5);
V2L:=EMA(K2L,5);
价异动:=K2L>REF(V2L,1)*1.06;
量异动:=K1L>REF(V1L,1)*1.6&&ZZ;
停牌:=DYNAINFO(17)>0;
M1:=SUM(价异动,2)>0 AND 停牌;
M2:=SUM(量异动,2)>0 AND REF(趋势,1)<89;
量价共振:=F211=100 AND C>REF(C,1) AND FILTER(M1 AND M2,3);
STICKLINE(量价共振,O,C,1.5,0),COLORFF00FF;
STICKLINE(确>REF(确,1) AND (XB OR 出击 OR 潜伏 OR 起程 OR CURRBARSCOUNT=CONST(SJ)+2 OR TJ OR (CCI<=100 AND L<=低2)),O,C,1.5,0),COLORFF00FF;
DRAWTEXT(XB,L,'爆'),COLORWHITE;
DIR2:=ABS(CLOSE-REF(CLOSE,30));
VIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),30);
ER2:=DIR2/VIR2;
CS2:=ER2*(0.8-2/24)+2/24;
CQ2:=CS2*CS2;
M熊:=EMA(DMA(CLOSE,CQ2),2);
牛熊:=M熊;
XX1:=C>牛熊 AND 牛熊>REF(牛熊,1);
DRAWTEXT_FIX(ISLASTBAR AND XX1,0.08,0,0,'【处于强区】'),COLORFF00FF;
XX2:=C<牛熊 AND 牛熊<=REF(牛熊,1);
DRAWTEXT_FIX(ISLASTBAR AND XX2,0.08,0,0,'【处于弱区】'),COLORFFFF00;
DRAWNUMBER(PEAKBARS(1,10,1)=0,H*1.015,H),COLORFF00FF;
DRAWNUMBER(TROUGHBARS(1,10,1)=0,L*0.985,L),COLOR00FF00;
HT:=HHVBARS(H,15);
LT:=LLVBARS(L,15);
DF1:=(REF(C,LT)-REF(C,HT+1))/REF(C,HT+1)*100;
DF2:=(C-REF(C,LT+1))/REF(C,LT+1)*100;
TJV:=C>=REF(C,HT);
XGV:=HT>LT AND DF1<-5 AND COUNT(TJV,HT+1)=1 AND TJV;
XGTV:=BARSLAST(XGV);
HQF:=BACKSET(XGV,HT+1);
LQF:=BACKSET(XGV,LT+1);
HQFT:=BARSLAST(CROSS(HQF=1,0.5));
LQFT:=BARSLAST(CROSS(LQF=1,0.5));
DRAWLINE(HQFT=0,H,LQFT=0,L,0),COLORRED,LINETHICK2;
DRAWLINE(LQFT=0,L,XGV,L,0),COLORRED,LINETHICK2;
STICKLINE(XGV,C,O,0.5,0),COLORYELLOW;
TY:=LLVBARS(L,15);
HTSS:=HHVBARS(H,15);
TTS:=BARSLAST(TY=0);
XGS:=TY=0 AND REF(TTS,1)<20 AND L>REF(L,REF(TTS,1));
XGTS:=BARSLAST(XGS);
QF:=BACKSET(XGS=1,HTSS+1);
QFT:=BARSLAST(CROSS(QF=1,0.5));
DRAWLINE(QFT=0,H,XGS,L,0),COLORWHITE;
QF1:=BACKSET(QFT=0,TTS+1);
QF1T:=BARSLAST(CROSS(QF1=1,0.5));
DRAWLINE(QF1T=0,L,QFT=0,H,0),COLORWHITE;
DRAWTEXT(QF1T=0,H*1.02,VARCAT(VARCAT('一底价',VAR2STR(REF(L,QF1T),2)),'元'))COLORWHITE;
DRAWTEXT(XGTS=0,H*1.04,VARCAT(VARCAT('双底价',VAR2STR(REF(L,XGTS),2)),'元'))COLORWHITE;
TK:=BARSLAST(H=HHV(H,60) AND C<O AND O>REF(C,1) AND H/L>1.05);
TJ1K:=EVERY(C<REF(C,1),2);
TJ2K:=EVERY(L<=REF(L,1),2);
LTK:=BARSLAST(REF(TK,2)=0 AND TJ1K AND TJ2K);
TJ3K:=TK-LTK=2 AND C>REF(C,TK)*1.02 ;
TJ4K:=BARSLASTCOUNT(C>O)=4 AND C/REF(C,1)>1.045;
XG1:=REF(EVERY(MAX(C,O)<REF(H,TK),TK),1) AND O>REF(H,1) AND TJ3K AND TK<15 AND NOT(TJ4K);
XGK:=COUNT(XG1,T)=1 AND XG1;
QFK:=BACKSET(XGK=1,TK+1);
QFTK:=BARSLAST(CROSS(QFK=1,0.5));
DRAWTEXT(QFT=0,H*1.05,'开始洗盘'),COLORYELLOW;
DRAWICON(QFT=0,H,12);
STICKLINE(QFTK>=0 AND QFK=1,REF(H,TK),REF(H,TK),4,-1),COLORLIBLUE;
DRAWTEXT(XGK=1,L*0.95,'买'),COLORYELLOW;
DRAWTEXT_FIX(1,0.08,0.05,0,'业绩预报：')COLORYELLOW;
DRAWTEXT_FIX(1,0.13,0.05,0,EXTERNSTR(0,11))COLORYELLOW;
DRAWTEXT_FIX(1,0.08,0.1,0,'高送转：')COLORYELLOW;
DRAWTEXT_FIX(1,0.13,0.1,0,EXTERNSTR(0,13))COLORYELLOW;
DRAWTEXT_FIX(C>0,0.08.00,0.15,0,STRCAT('机构关注：',EXTERNSTR(0,0))),COLOR00FFFF;
|
