|
以下是通达信短线黄蓝带公式主图源码（无源码的请下载附件导入）
STICKLINE(CLOSE>=MA(CLOSE,10),REFDATE(HHV(H,0),DATE),REFDATE(LLV(L,0),DATE),6,0),COLOR220080;{多色柱}
STICKLINE(CLOSE<MA(CLOSE,10),REFDATE(HHV(H,0),DATE),REFDATE(LLV(L,0),DATE),6,0),COLOR408048;{空色柱}
VAR1:=(2*CLOSE+HIGH+LOW)/4;
DRAWBAND(MA(VAR1,3),RGB(245,250,0),MA(VAR1,7),RGB(0,200,250));
买:=CROSS(MA(C,3),MA(C,7));
卖:=CROSS(MA(C,7),MA(C,3));
MA5:MA(CLOSE,5),COLORFF00FF,LINETHICK3;
绿降:IF(MA5<=REF(MA5,1),MA5,DRAWNULL),COLORGREEN,LINETHICK3;
DRAWICON((REF(MA5,1)<REF(MA5,2)) AND (MA5>REF(MA5,1)),LOW*0.999,11);{图标 黄食指向上}
DRAWICON((REF(MA5,1)>REF(MA5,2)) AND (MA5<=REF(MA5,1)),HIGH*1.001,12);{图标 黄食指向下}
X_54:=MA(CLOSE,5);{MA5角度取自量学太极线}
MA5角度:ATAN((X_54/REF(X_54,1)-1)*100)*180/3.1416,NODRAW;
{MA5乖离率:(C-MA5)/MA5*100,COLORWHITE,NODRAW;}
{黄蓝带 对照世基软件}
MA10:MA(C,10),COLORWHITE;
STICKLINE(C>=MA10,MA10,REF(MA10,1),5,0),COLOR00BBFF;
STICKLINE(C<MA10,REF(MA10,1),MA10,5,0),COLORBLUE;
DRAWICON(CROSS(C,MA10),LOW*0.99,34);{黄底勾向上}
DRAWICON(CROSS(MA10,C),HIGH*1.025,35);{绿底勾向下}
强弱界:MA(CLOSE,20),COLORCYAN,LINETHICK3;
上升趋势:IF(MA(CLOSE,20)>=REF(MA(CLOSE,20),1),MA(CLOSE,20),DRAWNULL),COLORYELLOW,LINETHICK3;
MA30:MA(C,30),COLORMAGENTA;
MA60:MA(C,60),COLORCYAN;
MA60平升:IF(MA(CLOSE,60)>=REF(MA(CLOSE,60),1),MA(CLOSE,60),DRAWNULL),COLORYELLOW;
MA120:MA(C,120),COLORBLUE;
MA250:MA(C,250),COLOR00FF00;
MA250升:IF(MA(C,250)>=REF(MA(C,250),1),MA(C,250),DRAWNULL),COLORRED;
{CYC∞}
JJJ:=IF(DYNAINFO(8)>0.01,0.01*DYNAINFO(10)/DYNAINFO(8),DYNAINFO(3));
DDD:=(DYNAINFO(5)<0.01 || DYNAINFO(6)<0.01);
JJJT:=IF(DDD,1,(JJJ<(DYNAINFO(5)+0.01) && JJJ>(DYNAINFO(6)-0.01)));
CYC∞:IF(JJJT,DMA(AMOUNT/(100*VOL),100*VOL/FINANCE(7)),EMA((HIGH+LOW+CLOSE)/3,120)),COLORYELLOW,CIRCLEDOT;
半分位:(REF(C,1)+REF(O,1))/2,COLORWHITE,DOTLINE;
STICKLINE(半分位,半分位,半分位,4,0),COLORWHITE;
{波段顶底，属未来，大马路123}
VAR111:=ZIG(3,10);
DRAWICON((REF(VAR111,2) > REF(VAR111,1)) AND (VAR111 > REF(VAR111,1)),LOW*0.95,5);{黄笑脸}
DRAWICON((REF(VAR111,2) < REF(VAR111,1)) AND (VAR111 < REF(VAR111,1)),HIGH*1.05,6);{蓝哭脸}
DRAWKLINE(H,O,L,C);{画K线}
{以下为资金情况}
换手率:VOL/CAPITAL*100,COLORRED,NODRAW;
预换手:IF(CURRBARSCOUNT=1 AND PERIOD=5,换手率*240/FROMOPEN,DRAWNULL),COLORWHITE,NODRAW;
量比:V/REF(MA(V,5),1),NODRAW,COLORWHITE;
{预量比:DYNAINFO(17),NODRAW,COLORWHITE;}
机构:(L2_VOL(0,0) - L2_VOL(0,1))*10000/FINANCE(7),NODRAW,COLORYELLOW;
大户:(L2_VOL(1,0) - L2_VOL(1,1))*10000/FINANCE(7),NODRAW,COLORRED;
中户:(L2_VOL(2,0) - L2_VOL(2,1))*10000/FINANCE(7),NODRAW,COLORMAGENTA;
散户:(L2_VOL(3,0) - L2_VOL(3,1))*10000/FINANCE(7),NODRAW,COLORGREEN;
主力:机构+大户,NODRAW,COLORYELLOW;
主力占比:主力/换手率*100,NODRAW,COLORMAGENTA;
三日主力:SUM(主力,3),COLORYELLOW,NODRAW;
五日主力:SUM(主力,5),COLORRED,NODRAW;
十日主力:SUM(主力,10),COLORMAGENTA,NODRAW;
廿日主力:SUM(主力,20),COLORWHITE,NODRAW;
STICKLINE(主力>0,O,C,2,1),COLORYELLOW;
STICKLINE(主力<0,O,C,2,1),COLORLIBLUE;
STICKLINE(机构>0,O,C,1,0),COLORYELLOW;
STICKLINE(机构<0,O,C,1,0),COLORBLUE;
STICKLINE(大户>0,O,(O+C)/2,1,0),COLORRED;
STICKLINE(大户<0,O,(O+C)/2,1,0),COLORGREEN;
DRAWTEXT(买=1,L,'←买'),COLORLIRED;{三日上穿7日}
DRAWTEXT(卖=1,H*1.01,'↓←卖'),COLORGREEN;{三日下穿7日}
DRAWNUMBER(ISLASTBAR ,C,C),COLORFF00FF;
N1:=10;
N2:=10;
DISP:=2;
K1:=IF(PERIOD=5,1,{日}
IF(PERIOD=6,1,{周}
IF(PERIOD=7,1,{月}
IF(PERIOD=8,1,{多分钟}
IF(PERIOD=9,1,{多日}
IF(PERIOD=10,1,{季}
IF(PERIOD=11,2,{年}
IF(PERIOD=4,1,{60F}
IF(PERIOD=3,1,{30F}
IF(PERIOD=2,1,{15F}
IF(PERIOD=1,1{5F},1{1F})))))))))))/10;
P1:=PEAK(1,K1*N1,1);
P2:=PEAK(1,K1*N1,2);
WP1:=PEAKBARS(1,K1*N1,1);
WP2:=PEAKBARS(1,K1*N1,2);
T1:=TROUGH(2,K1*N2,1);
T2:=TROUGH(2,K1*N2,2);
WT1:=TROUGHBARS(2,K1*N2,1);
WT2:=TROUGHBARS(2,K1*N2,2);
TJ1:=P1>T1 AND P2>T2 ;
ZD:=MAX(T1,T2);
ZG:=MIN(P1,P2);
LL:=MIN(T1,T2);
HH:=MAX(P1,P2);
TJ2:=FILTER(ZG>ZD,2);
TJ3:=ZG=REF(ZG,BARSLAST(TJ2)) OR ZD=REF(ZD,BARSLAST(TJ2));
TJ4:=TJ1&&TJ2&&NOT(TJ3);
TJ5:=BETWEEN(ZD,REF(ZD,REF(BARSLAST(TJ4),1)),REF(ZG,REF(BARSLAST(TJ4),1)));
TJ6:=BETWEEN(ZG,REF(ZD,REF(BARSLAST(TJ4),1)),REF(ZG,REF(BARSLAST(TJ4),1)));
TJ7:=ZG>REF(ZG,REF(BARSLAST(TJ4),1))&&ZD<REF(ZD,REF(BARSLAST(TJ4),1));
TJ8:=TJ4&&NOT(TJ5 OR TJ6 OR TJ7);
ZSD:=IF(TJ8,ZD,DRAWNULL);
ZSG:=IF(TJ8,ZG,DRAWNULL);
ZSH:=IF(TJ8,HH,DRAWNULL);
ZSL:=IF(TJ8,LL,DRAWNULL);
STICKLINE(TJ8,ZSH,ZSL,0,-1),COLORMAGENTA;
STICKLINE(TJ8,ZSD,ZSG,IF(DISP=1,3,0),1),COLORMAGENTA;
{ DRAWTEXT(DISP=2,ZSH,'中枢'),COLORWHITE;不显示中枢二字}
{中枢高:PLOYLINE(DISP=2,REF(ZSD,BARSLAST(TJ8))),CIRCLEDOT,COLORLIRED;看不见折线段，停用
中枢低:PLOYLINE(DISP=2,REF(ZSG,BARSLAST(TJ8))),CIRCLEDOT,COLORLIGREEN;}
{中枢最高:PLOYLINE(DISP=2,REF(ZSH,BARSLAST(TJ8))),POINTDOT,COLORRED;原来就没用
中枢最低:PLOYLINE(DISP=2,REF(ZSL,BARSLAST(TJ8))),POINTDOT,COLORGREEN;}
{趋势高:PLOYLINE(DISP=3,ZIG(1,K1*N1)),COLORLIBLUE;看不见折线段，停用
趋势低:PLOYLINE(DISP=3,ZIG(2,K1*N2)),COLORLIBLUE;}
局部低点预选A:=BACKSET(LLV(L,5)<REF(LLV(L,4),1),4);
局部低点预选B:=BACKSET(局部低点预选A=0 AND REF(局部低点预选A,1)=1,2);
局部低点预选C:=IF(局部低点预选B=1 AND REF(局部低点预选B,1)=0,-1,0);
局部高点预选A:=BACKSET(HHV(H,5)>REF(HHV(H,4),1),4);
局部高点预选B:=BACKSET(局部高点预选A=0 AND REF(局部高点预选A,1)=1,2);
局部高点预选C:=IF(局部高点预选B=1 AND REF(局部高点预选B,1)=0,1,0);
缺口判断:=IF(L>REF(H,1),1,IF(H<REF(L,1),-1,0));
距前高天:=BARSLAST(局部高点预选C=1);
距前低天:=BARSLAST(局部低点预选C=-1);
小值周期:=LOWRANGE(L);
大值周期:=TOPRANGE(H);
低保留AA:=IF(局部低点预选C=-1 AND REF(距前高天,1)>REF(距前低天,1) AND LLV(L,距前高天+1)<REF(LLV(L,距前高天+1),1),-1,0);
低保留AB:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND (距前高天>=4 OR LLV(缺口判断,距前高天)=-1 OR LLV(L,距前低天+2)<REF(LLV(L,距前低天+1),1)),-1,0);
低保留S:=IF((低保留AA=-1 OR 低保留AB=-1) AND L<REF(H,距前高天+1),-1,0);
预判:=IF((距前低天<4 AND HHV(缺口判断,距前低天)!=1) OR REF(低保留S,距前低天)=0,1,0);
判断:=IF(局部高点预选C=1 AND REF(距前低天,1)<=REF(距前高天,1) AND 预判=1 AND 大值周期>REF(小值周期,距前低天+1) AND 大值周期>REF(小值周期,距前低天) AND 大值周期>REF(大值周期,距前高天),1,0);
高保留A:=IF(局部高点预选C=1 AND REF(距前低天,1)>REF(距前高天,1) AND HHV(H,距前低天+1)>REF(HHV(H,距前低天+1),1),1,0);
高保留B:=IF(局部高点预选C=1 AND REF(距前低天,1)<=REF(距前高天,1) AND REF(低保留S,距前低天)=-1 AND (距前低天>=4 OR HHV(缺口判断,距前低天)=1),1,0);
高保留:=IF((高保留A=1 OR 高保留B=1 OR 判断=1) AND H>REF(L,距前低天+1),1,0);
预判A:=IF((距前高天<4 AND HHV(缺口判断,距前高天)!=1) OR REF(高保留,距前高天)=0,1,0);
判断A:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND 预判A=1 AND 小值周期>REF(大值周期,距前高天+1) AND 小值周期>REF(大值周期,距前高天) AND 小值周期>REF(小值周期,距前低天),-1,0);
低保留A:=IF(局部低点预选C=-1 AND REF(距前高天,1)>REF(距前低天,1) AND LLV(L,距前高天+1)<REF(LLV(L,距前高天+1),1),-1,0);
低保留B:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND (距前高天>=4 OR LLV(缺口判断,距前高天)=-1 OR 判断A=-1),-1,0);
低保留:=IF((低保留A=-1 OR 低保留B=-1) AND L<REF(H,距前高天+1),-1,0);
距前高天A:=BARSLAST(高保留=1);
距前低天A:=BARSLAST(低保留=-1);
预判X:=IF((距前低天A<4 AND HHV(缺口判断,距前低天A)!=1) OR REF(低保留,距前低天A)=0,1,0);
判断X:=IF(局部高点预选C=1 AND REF(距前低天A,1)<=REF(距前高天A,1) AND 预判X=1 AND 大值周期>REF(小值周期,距前低天A+1) AND 大值周期>REF(小值周期,距前低天A) AND 大值周期>REF(大值周期,距前高天A),1,0);
高保留XA:=IF(局部高点预选C=1 AND REF(距前低天A,1)>REF(距前高天A,1) AND HHV(H,距前低天A+1)>REF(HHV(H,距前低天A+1),1),1,0);
高保留XB:=IF(局部高点预选C=1 AND REF(距前低天A,1)<=REF(距前高天A,1) AND REF(低保留,距前低天A)=-1 AND (距前低天A>=4 OR HHV(缺口判断,距前低天A)=1),1,0);
高保留X:=IF((高保留XA=1 OR 高保留XB=1 OR 判断X=1) AND H>REF(L,距前低天A+1),1,0);
预判XA:=IF((距前高天A<4 AND HHV(缺口判断,距前高天A)!=1) OR REF(高保留XA,距前高天A)=0,1,0);
判断XA:=IF(局部低点预选C=-1 AND REF(距前高天A,1)<=REF(距前低天A,1) AND 预判XA=1 AND 小值周期>REF(大值周期,距前高天A+1) AND 小值周期>REF(大值周期,距前高天A) AND 小值周期>REF(小值周期,距前低天A),-1,0);
低保留XA:=IF(局部低点预选C=-1 AND REF(距前高天A,1)>REF(距前低天A,1) AND LLV(L,距前高天A+1)<REF(LLV(L,距前高天A+1),1),-1,0);
低保留XB:=IF(局部低点预选C=-1 AND REF(距前高天A,1)<=REF(距前低天A,1) AND (距前高天A>=4 OR LLV(缺口判断,距前高天A)=-1 OR 判断XA=-1),-1,0);
低保留X:=IF((低保留XA=-1 OR 低保留XB=-1) AND L<REF(H,距前高天A+1),-1,0);
距前高天YA:=BARSLAST(高保留X=1);
距前低天YA:=BARSLAST(低保留X=-1);
预判YX:=IF((距前低天YA<4 AND HHV(缺口判断,距前低天YA)!=1) OR REF(低保留X,距前低天YA)=0,1,0);
判断YX:=IF(局部高点预选C=1 AND REF(距前低天YA,1)<=REF(距前高天YA,1) AND 预判YX=1 AND 大值周期>REF(小值周期,距前低天YA+1) AND 大值周期>REF(小值周期,距前低天YA) AND 大值周期>REF(大值周期,距前高天YA),1,0);
高保留YXA:=IF(局部高点预选C=1 AND REF(距前低天YA,1)>REF(距前高天YA,1) AND HHV(H,距前低天YA+1)>REF(HHV(H,距前低天YA+1),1),1,0);
高保留YXB:=IF(局部高点预选C=1 AND REF(距前低天YA,1)<=REF(距前高天YA,1) AND REF(低保留X,距前低天YA)=-1 AND (距前低天YA>=4 OR HHV(缺口判断,距前低天YA)=1),1,0);
高保留YX:=IF((高保留YXA=1 OR 高保留YXB=1 OR 判断YX=1) AND H>REF(L,距前低天YA+1),1,0);
预判YXA:=IF((距前高天YA<4 AND HHV(缺口判断,距前高天YA)!=1) OR REF(高保留YXA,距前高天YA)=0,1,0);
判断YXA:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)<=REF(距前低天YA,1) AND 预判YXA=1 AND 小值周期>REF(大值周期,距前高天YA+1) AND 小值周期>REF(大值周期,距前高天YA) AND 小值周期>REF(小值周期,距前低天YA),-1,0);
低保留YXA:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)>REF(距前低天YA,1) AND LLV(L,距前高天YA+1)<REF(LLV(L,距前高天YA+1),1),-1,0);
低保留YXB:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)<=REF(距前低天YA,1) AND (距前高天YA>=4 OR LLV(缺口判断,距前高天YA)=-1 OR 判断YXA=-1),-1,0);
低保留YX:=IF((低保留YXA=-1 OR 低保留YXB=-1) AND L<REF(H,距前高天YA+1),-1,0);
AAAD:=IF(高保留YX=1 AND 低保留YX=-1 AND H>REF(H,REF(距前高天YA,1)+2),1,IF(高保留YX=1 AND 低保留YX=-1 AND L<REF(L,REF(距前低天YA,1)+2),-1,0));
极点保留:=IF(AAAD=0,高保留YX+低保留YX,AAAD);
局部极点:IF(极点保留=-1,L,IF(极点保留=1,H,DRAWNULL)) CIRCLEDOT COLORYELLOW;
DRAWLINE(极点保留=-1,局部极点,极点保留=1,局部极点,0),COLORCYAN;
DRAWLINE(极点保留=1,局部极点,极点保留=-1,局部极点,0),COLORYELLOW;
DD1:=BARSLAST(ABS(极点保留)!=1);
DRAWTEXT(极点保留=1,局部极点*1.001,'↓卖'),COLORLIBLUE;
STICKLINE(极点保留=1,局部极点,局部极点,30,1),COLORCYAN;
DRAWNUMBER(极点保留=1,局部极点,局部极点)COLORCYAN;
DRAWTEXT(极点保留=-1,局部极点*0.999,'↖买'),COLORYELLOW;
STICKLINE(极点保留=-1,局部极点,局部极点,30,1),COLORRED;
DRAWNUMBER(极点保留=-1,局部极点,局部极点)COLORRED;
{ZIG！
注意：发现未来函数PEAK！
注意：发现未来函数PEAKBARS！
注意：发现未来函数TROUGH！
注意：发现未来函数TROUGHBARS！
注意：发现未来函数PEAK！
注意：发现未来函数PEAKBARS！
注意：发现未来函数TROUGH！
注意：发现未来函数BACKSET！
注意：发现未来函数DRAWLINE！
注意：发现未来函数DRAWLINE！}{原文链接：HTTP://WWW.55188.COM/THREAD-7992925-1-1.HTML}
{K线形态解盘}
TT:=240/FROMOPEN;
比:=TT;
J12:=(HIGH - ((HIGH - LOW) / 3));
J23:=(LOW + ((HIGH - LOW) / 3));
T_1{早晨之星}:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2) < 0.95 AND REF(OPEN,1)
< REF(CLOSE,2) AND ABS(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<0.03 AND
CLOSE/OPEN>1.05 AND CLOSE>REF(CLOSE,2)),1,0));
T_2{黄昏之星}:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2) > 1.03 AND REF(OPEN,1)
> REF(CLOSE,2) AND ABS(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<0.02
AND CLOSE/OPEN<0.97 AND CLOSE<REF(CLOSE,2)),1,0));
T3{长十字}:=CONST(IF((CLOSE=OPEN AND HIGH/LOW >1.03),1,0));
T4{垂死十字}:=CONST(IF((CLOSE=OPEN AND CLOSE=LOW AND CLOSE!=HIGH),1,0));
T5{早晨十字星}:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2) < 0.95 AND REF(OPEN,1)
< REF(CLOSE,2) AND REF(OPEN,1)=REF(CLOSE,1) AND
CLOSE/OPEN>1.05 AND CLOSE>REF(CLOSE,2)),1,0));
T6{黄昏十字星}:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2) > 1.05 AND REF(OPEN,1)
> REF(CLOSE,2) AND REF(OPEN,1)=REF(CLOSE,1) AND
CLOSE/OPEN<0.95 AND CLOSE<REF(CLOSE,2)),1,0));
T7{射击之星}:=CONST(IF((MIN(OPEN,CLOSE)=LOW AND HIGH-LOW >
3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE > MA(CLOSE,5)),1,0));
T8{倒转锤头}:=CONST(IF((MIN(OPEN,CLOSE)=LOW AND HIGH-LOW >
3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE < MA(CLOSE,5)),1,0));
T9{锤头}:=CONST(IF((HIGH = MAX(OPEN,CLOSE) AND HIGH-LOW >
3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE < MA(CLOSE,5)),1,0));
T10{吊颈}:=CONST(IF((HIGH = MAX(OPEN,CLOSE) AND HIGH-LOW >
3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE>MA(CLOSE,5)),1,0));
T11{穿头破脚}:=CONST(IF(((REF(CLOSE,1)/REF(OPEN,1)>1.03 AND CLOSE/OPEN<0.96
AND CLOSE<REF(OPEN,1)
AND OPEN>REF(CLOSE,1))OR (REF(CLOSE,1)/REF(OPEN,1)<0.97 AND CLOSE/OPEN>1.04
AND CLOSE>REF(OPEN,1) AND OPEN<REF(CLOSE,1))),1,0));
T12{乌云盖顶}:=CONST(IF((REF(CLOSE,1)/REF(OPEN,1)>1.03 AND CLOSE/OPEN<0.97
AND OPEN>REF(CLOSE,1) AND CLOSE<REF(CLOSE,1)),1,0));
T13{曙光初现}:=CONST(IF((REF(CLOSE,1)/REF(OPEN,1)<0.97 AND CLOSE/OPEN>1.03
AND OPEN<REF(CLOSE,1) AND CLOSE>REF(CLOSE,1)),1,0));
T14{身怀六甲}:=CONST(IF((ABS(REF(CLOSE,1)-REF(OPEN,1))/REF(CLOSE,1) > 0.04
AND ABS(CLOSE-OPEN)/CLOSE<0.005 AND
MAX(CLOSE,OPEN) < MAX(REF(CLOSE,1),REF(OPEN,1)) AND MIN(CLOSE,OPEN)
> MIN(REF(CLOSE,1),REF(OPEN,1))),1,0));
T15{十字胎}:=CONST(IF((ABS(REF(CLOSE,1)-REF(OPEN,1))/REF(CLOSE,1) > 0.04
AND CLOSE=OPEN AND
CLOSE < MAX(REF(CLOSE,1),REF(OPEN,1)) AND CLOSE > MIN(REF(CLOSE,1)
,REF(OPEN,1))),1,0));
T16{平顶}:=CONST(IF((ABS(HIGH-REF(HIGH,1))/HIGH<0.001),1,0));
T17{平底}:=CONST(IF(((ABS(LOW-REF(LOW,1))/LOW<0.001 AND ABS(REF(LOW,1)
-REF(LOW,2))/REF(LOW,1)<=0.001)),1,0));
T18{大阳烛}:=CONST(IF((CLOSE/OPEN>1.05 AND HIGH/LOW < CLOSE/OPEN+0.018),1,0));
T19{三个白武士}:=CONST(IF((REF(CLOSE,2)>REF(OPEN,2) AND REF(CLOSE,1)
>REF(OPEN,1) AND CLOSE>OPEN
AND REF(CLOSE,1)>REF(CLOSE,2) AND CLOSE>REF(CLOSE,1)),1,0));
T20{双飞乌鸦}:=CONST(IF((REF(CLOSE,1)<REF(OPEN,1) AND CLOSE<OPEN
AND CLOSE/OPEN<0.98),1,0));
T21{孕育线}:=CONST(IF((REF(CLOSE,2)>REF(OPEN,2) AND (REF(CLOSE,2)
-REF(OPEN,2))/REF(OPEN,2)>=2/100 AND REF(OPEN,1)>=REF(CLOSE,1)
AND (REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<=2/100 AND REF(OPEN,1)
<=REF(CLOSE,2) AND REF(CLOSE,1)>=REF(OPEN,2) AND C>=OPEN
AND (CLOSE-OPEN)/OPEN>=2/100 AND CLOSE>=REF(OPEN,1) AND OPEN<=REF(CLOSE,1)
AND (MAX(CLOSE,REF(C,2))-MIN(CLOSE,REF(CLOSE,2)))/MIN(CLOSE,REF(CLOSE,2))
<=1/100),1,0));
T22{多方炮}:=CONST(IF((REF(CLOSE,2)>REF(OPEN,2) AND REF(CLOSE,1)<REF(OPEN,1)
AND CLOSE>OPEN),1,0));
T23{出水芙蓉}:=CONST(IF(((OPEN<EMA(C,20) OR OPEN<EMA(C,40) OR OPEN<
EMA(C,60)) AND (C>MAX(EMA(C,20),MAX(EMA(C,40),EMA(C,60))))AND (V/MA(V,30)
>1.2 AND C/REF(C,1)>1.049)),1,0));
T24{上升三部曲}:=CONST(IF((REF(CLOSE,4)/REF(OPEN,4)>1.03 AND REF(CLOSE,3)
<REF(OPEN,3) AND REF(CLOSE,2)<REF(OPEN,2) AND REF(CLOSE,1)<REF(OPEN,1)
AND REF(LOW,4)<REF(LOW,3) AND REF(LOW,4)<REF(LOW,2) AND REF(LOW,4)
<REF(LOW,1) AND REF(HIGH,4)>REF(HIGH,3) AND REF(HIGH,4)>REF(HIGH,2)
AND REF(HIGH,4)>REF(HIGH,1) AND CLOSE/OPEN>1.03 AND CLOSE>REF(CLOSE,4)),1,0));
T25{下跌三部曲}:=CONST(IF(( REF(CLOSE,4)/REF(OPEN,4)<0.97 AND REF(CLOSE,3)
>REF(OPEN,3) AND REF(CLOSE,2)>REF(OPEN,2) AND REF(CLOSE,1)>REF(OPEN,1)
AND REF(LOW,4)<REF(LOW,3) AND REF(LOW,4)<REF(LOW,2) AND REF(LOW,4)
<REF(LOW,1) AND REF(HIGH,4)>REF(HIGH,3) AND REF(HIGH,4)>REF(HIGH,2) AND REF(HIGH,4)>REF(HIGH,1) AND CLOSE/OPEN<0.97 AND
CLOSE<REF(CLOSE,4)),1,0));
T26{跳空缺口}:=CONST(IF(HIGH<REF(LOW,1) OR LOW>REF(HIGH,1),1,0));
T27{三只乌鸦}:=CONST(IF((REF(CLOSE,2)<REF(OPEN,2) AND REF(CLOSE,1)
<REF(OPEN,1) AND CLOSE<OPEN AND REF(CLOSE,1)<REF(CLOSE,2)
AND CLOSE<REF(CLOSE,1)),1,0));
T28{光脚阴线}:=CONST(IF((LOW=CLOSE AND HIGH!=LOW),1,0));
T29{光头阳线}:=CONST(IF((HIGH=CLOSE AND HIGH!=LOW),1,0));
T30{分离}:=CONST(IF((OPEN=REF(OPEN,1) AND (CLOSE-OPEN)*(REF(CLOSE,1)
-REF(OPEN,1))<0),1,0));
T31{长下影}:=CONST(IF(((MIN(CLOSE,OPEN)-LOW)/(HIGH-LOW)>0.667),1,0));
T32{长上影}:=CONST(IF(((HIGH-MAX(CLOSE,OPEN))/(HIGH-LOW)>0.667),1,0));
T33{十字星}:=CONST(IF((CLOSE=OPEN AND HIGH!=LOW),1,0));
T34{大阴烛}:=CONST(IF((OPEN/CLOSE > 1.05 AND HIGH/LOW < OPEN/CLOSE+0.018),1,0));
T35{好友反攻}:=CONST(IF(((REF(CLOSE,1)<REF(OPEN,1) AND CLOSE>OPEN
AND ABS(CLOSE-REF(CLOSE,1))/CLOSE<0.002) OR (REF(CLOSE,1)>REF(OPEN,1)
AND CLOSE<OPEN AND ABS(CLOSE-REF(CLOSE,1))
/CLOSE<0.002)),1,0));
T36{倾盆大雨}:=CONST(IF((REF(C,1)/REF(O,1)>=1.03 AND O<REF(C,1) AND O
>REF(O,1) AND C<REF(O,1)),1,0));
T37{M9}:=CONST(V*比>REF(V,1) AND MA(V,5)>REF(MA(V,5),1));
T38{M10}:=CONST(V*比<REF(V,1) AND MA(V,5)>REF(MA(V,5),1));
T39{M11}:=CONST(V*比>REF(V,1)AND MA(V,5)<REF(MA(V,5),1));
T40{M12}:=CONST(V*比<REF(V,1)AND MA(V,5)<REF(MA(V,5),1));
T41{M13}:=CONST((((IF((CLOSE = OPEN),1,0) + IF((CLOSE >= J12),1,0)) + IF((CLOSE <= J23),1,0)) > 1));
T42{M14}:=CONST((((AMOUNT / VOL) / 100) > REF(HIGH,1)));
T43{M15}:=CONST((((AMOUNT / VOL) / 100) < REF(LOW,1)));
TS1:=IF(T1=1,0.02+0.02,0.12{原为0.02}),NODRAW;{LCY修改}
TS2:=IF(T2=1,TS1+0.08,TS1),NODRAW;
TS3:=IF(T3=1,TS2+0.08,TS2),NODRAW;
TS4:=IF(T4=1,TS3+0.08,TS3);
TS5:=IF(T5=1,TS4+0.08,TS4);
TS6:=IF(T6=1,TS5+0.08,TS5);
TS7:=IF(T7=1,TS6+0.08,TS6);
TS8:=IF(T8=1,TS7+0.08,TS7);
TS9:=IF(T9=1,TS8+0.08,TS8);
TS10:=IF(T10=1,TS9+0.08,TS9),NODRAW;
TS11:=IF(T11=1,TS10+0.08,TS10);
TS12:=IF(T12=1,TS11+0.08,TS11);
TS13:=IF(T13=1,TS12+0.08,TS12);
TS14:=IF(T14=1,TS13+0.08,TS13);
TS15:=IF(T15=1,TS14+0.08,TS14);
TS16:=IF(T16=1,TS15+0.08,TS15);
TS17:=IF(T17=1,TS16+0.08,TS16);
TS18:=IF(T18=1,TS17+0.08,TS17);
TS19:=IF(T19=1,TS18+0.08,TS18);
TS20:=IF(T20=1,TS19+0.08,TS19);
TS21:=IF(T21=1,TS20+0.08,TS20);
TS22:=IF(T22=1,TS21+0.08,TS21);
TS23:=IF(T23=1,TS22+0.08,TS22);
TS24:=IF(T24=1,TS23+0.08,TS23);
TS25:=IF(T25=1,TS24+0.08,TS24);
TS26:=IF(T26=1,TS25+0.08,TS25);
TS27:=IF(T27=1,TS26+0.08,TS26);
TS28:=IF(T28=1,TS27+0.08,TS27);
TS29:=IF(T29=1,TS28+0.08,TS28);
TS30:=IF(T30=1,TS29+0.08,TS29);
TS31:=IF(T31=1,TS30+0.08,TS30);
TS32:=IF(T32=1,TS31+0.08,TS31);
TS33:=IF(T33=1,TS32+0.08,TS32);
TS34:=IF(T34=1,TS33+0.08,TS33);
TS35:=IF(T35=1,TS34+0.08,TS34);
TS36:=IF(T36=1,TS35+0.08,TS35);
TS37:=IF(T37=1,TS36+0.08,TS36);
TS38:=IF(T38=1,TS37+0.08,TS37);
TS39:=IF(T39=1,TS38+0.08,TS38);
TS40:=IF(T40=1,TS39+0.08,TS39);
TS41:=IF(T41=1,TS36+0.08,TS36);
TS42:=IF(T42=1,TS41+0.08,TS41);
TS43:=IF(T43=1,TS42+0.08,TS42);
DRAWTEXT_FIX(T1=1,0,TS1,0,'早晨之星,见底回升'),COLORFF00FF ;
DRAWTEXT_FIX(T2=1,0,TS2,0,'黄昏之星,见顶回落'),COLORFFFF00 ;
DRAWTEXT_FIX(T3=1,0,TS3,0,'长十字,重要的警告信号,原趋势停顿或反转'),COLORGREEN ;
DRAWTEXT_FIX(T4=1,0,TS4,0,'垂死十字,下跌信号'),COLORFFFF00 ;
DRAWTEXT_FIX(T5=1,0,TS5,0,'早晨十字星,上涨信号,见底回升'),COLORFF00FF ;
DRAWTEXT_FIX(T6=1,0,TS6,0,'黄昏十字星,趋势停顿或反转,下跌或,见顶回落'),COLORFFFF00 ;
DRAWTEXT_FIX(T7=1,0,TS7,0,'射击之星,市场顶部就在眼前,可能见顶回落,可靠性低'),COLORFFFF00 ;
DRAWTEXT_FIX(T8=1,0,TS8,0,'倒转锤头构成一个看涨信号,可能见底回升'),COLORFF00FF ;
DRAWTEXT_FIX(T9=1,0,TS9,0,'锤头,可能见底回升,如有量配合,信号强烈'),COLOR0000FF ;
DRAWTEXT_FIX(T10=1,0,TS10,0,'吊颈,上升行情中见顶回落,顶部出现,见顶信号'),COLORFFFF00 ;
DRAWTEXT_FIX(T11=1,0,TS11,0,'穿头破脚,顶部出现,见顶回落信号'),COLORFFFF00 ;
DRAWTEXT_FIX(T12=1,0,TS12,0,'乌云盖顶,见顶回落信号'),COLORFFFF00 ;
DRAWTEXT_FIX(T13=1,0,TS13,0,'曙光初现,将演化为V型反转或横盘。后市见底回升'),COLORFF00FF ;
DRAWTEXT_FIX(T14=1,0,TS14,0,'身怀六甲,底部,是见底回升,顶部,是见顶回落信号'),COLORGREEN ;
DRAWTEXT_FIX(T15=1,0,TS15,0,'十字胎'),COLORGREEN ;
DRAWTEXT_FIX(T16=1,0,TS16,0,'平顶,行情见顶,股价将反转。但下跌力度较小'),COLORFFFFFF ;
DRAWTEXT_FIX(T17=1,0,TS17,0,'平底,行情探低见底,股价行将反转上升,但力度较小'),COLORFFFFFF ;
DRAWTEXT_FIX(T18=1,0,TS18,0,'大阳烛,上升中,剧烈地向上攀升。下行中,剧烈地向上反弹'),COLOR0000FF ;
DRAWTEXT_FIX(T19=1,0,TS19,0,'三个白武士,每日收盘价上移,表示可能见底回升'),COLORFFFFFF ;
DRAWTEXT_FIX(T20=1,0,TS20,0,'双飞乌鸦,行情开始疲软将见顶回落'),COLORFF0000 ;
DRAWTEXT_FIX(T21=1,0,TS21,0,'孕育线,注意股价位置'),COLOR00FFFF ;
DRAWTEXT_FIX(T22=1,0,TS22,0,'多方炮,底部可能上涨,中间上涨中继,顶部见顶信号'),COLORGREEN ;
DRAWTEXT_FIX(T23=1,0,TS23,0,'出水芙蓉,阳线穿过20、40、60日均线,上攻势头初现'),COLORFF00FF ;
DRAWTEXT_FIX(T24=1,0,TS24,0,'上升三部曲,上涨信号'),COLORFF00FF ;
DRAWTEXT_FIX(T25=1,0,TS25,0,'下跌三部曲,下跌信号'),COLORFFFF00 ;
DRAWTEXT_FIX(T26=1,0,TS26,0,'跳空缺口,突破盘整,向上涨、向下跌开始'),COLORGREEN ;
DRAWTEXT_FIX(T27=1,0,TS27,0,'三只乌鸦站枝头,可能见顶回落'),COLORFFFF00 ;
DRAWTEXT_FIX(T28=1,0,TS28,0,'光脚阴线,下跌信号'),COLORFFFF00 ;
DRAWTEXT_FIX(T29=1,0,TS29,0,'光头阳线,多方积极上攻态势,后市看涨'),COLOR0000FF ;
DRAWTEXT_FIX(T30=1,0,TS30,0,'分离,注意看涨分离和看跌分离'),COLORGREEN ;
DRAWTEXT_FIX(T31=1,0,TS31,0,'长下影,有可能止跌回升,升势末期,须小心'),COLORGREEN ;
DRAWTEXT_FIX(T32=1,0,TS32,0,'长上影,表明行情上档压力沉重,升势受阻'),COLORFFFF00 ;
DRAWTEXT_FIX(T33=1,0,TS33,0,'十字星,重要的警告信号,原趋势停顿或反转'),COLORGREEN ;
DRAWTEXT_FIX(T34=1,0,TS34,0,'大阴烛,后市向淡,发生逆转'),COLORFF0000 ;
DRAWTEXT_FIX(T35=1,0,TS35,0,'好友反攻,跌势已尽,要展开一段反弹行情'),COLORFF00FF ;
DRAWTEXT_FIX(T36=1,0,TS36,0,'倾盆大雨,见顶信号'),COLORFFFF00 ;
DRAWTEXT_FIX(T41=1,0,TS41,0,'极端行情,在未来的几日内有85%的机会变更方向'),COLORWHITE ;
Y_1:=STRCAT(HYBLOCK,' ');{行业}
Y_2:=STRCAT(Y_1,DYBLOCK);{地域}
Y_3:=STRCAT(Y_2,' ');
Y_4:=STRCAT(Y_3,GNBLOCK);{所属概念}
Y_5:=STRCAT(Y_4,' ');
Y_6:=STRCAT(Y_5,FGBLOCK);{所属风格}
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Y_5,FGBLOCK)),COLORYELLOW;{以上组合};
DRAWTEXT_FIX(1,0.00,0.06,0,STRCAT('业绩预报：',EXTERNSTR(0,3))),COLORYELLOW;
DRAWTEXT_FIX(1,0.00,0.12,0,STRCAT('解禁日期：',EXTERNSTR(0,4))),COLORYELLOW;
1612500929.png
|
