通达信势百变源码副图

[复制链接]
查看30 | 回复0 | 2022-7-24 03:46:02 | 显示全部楼层 |阅读模式

 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);

买1:=F211=100 AND VAR10;

买2:=F211=100 AND (VAR11+VAR13+VAR15+VAR17);

卖1:=(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;
 

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则