七星望月 通达信副图

TM:=1200823;

涨停:IF(DATE<TM,ZTPRICE(REF(C,1),IF(CODELIKE('688'),0.2,IF(NAMEINCLUDE('S'),0.05,0.1))),ZTPRICE(REF(C,1),IF(CODELIKE('688') OR CODELIKE('300'),0.2,IF(NAMEINCLUDE('S'),0.05,0.1)))),NODRAW,COLORRED;

跌停:IF(DATE<TM,DTPRICE(REF(C,1),IF(CODELIKE('688'),0.2,IF(NAMEINCLUDE('S'),0.05,0.1))),DTPRICE(REF(C,1),IF(CODELIKE('688') OR CODELIKE('300'),0.2,IF(NAMEINCLUDE('S'),0.05,0.1)))),NODRAW,COLORGREEN;

明涨停:IF(DATE<TM,C*IF(CODELIKE('688'),1.2,IF(NAMEINCLUDE('S'),1.05,1.1)),C*(IF(CODELIKE('688') OR CODELIKE('300'),1.2,IF(NAMEINCLUDE('S'),1.05,1.1)))),NODRAW,COLORLIMAGENTA;

明跌停:IF(DATE<TM,C*IF(CODELIKE('688'),0.8,IF(NAMEINCLUDE('S'),0.45,0.9)),C*(IF(CODELIKE('688') OR CODELIKE('300'),0.8,IF(NAMEINCLUDE('S'),0.45,0.9)))),NODRAW,COLORFFFF00;

ZT:=C=涨停 AND PERIOD=5 AND H=C;

ZT1:=H=涨停 AND PERIOD=5 AND H>C;

DT:=C=跌停 AND PERIOD=5 AND L=C;

DT1:=L=跌停 AND PERIOD=5 AND L<C;

{涨停K线颜色设置}

STICKLINE(ZT,C,(O+C)/2,3,0),COLOR000099;

STICKLINE(ZT,C,(O+C)/2,2.2,0),COLOR0000CC;

STICKLINE(ZT,C,(O+C)/2,1.5,0),COLOR0000FF;

STICKLINE(ZT,C,(O+C)/2,0.5,0),COLORCC66FF;

STICKLINE(ZT,O,(O+C)/2,3,0),COLOR999999;

STICKLINE(ZT,O,(O+C)/2,2.2,0),COLORBBBBBB; 

STICKLINE(ZT,O,(O+C)/2,1.5,0),COLORDDDDDD; 

STICKLINE(ZT,O,(O+C)/2,0.5,0),COLORFFFFFF;

STICKLINE(DT,O,(O+C)/2,3,0),COLOR999999;

STICKLINE(DT,O,(O+C)/2,2.2,0),COLORBBBBBB; 

STICKLINE(DT,O,(O+C)/2,1.5,0),COLORDDDDDD; 

STICKLINE(DT,O,(O+C)/2,0.5,0),COLORFFFFFF;

STICKLINE(DT,C,(O+C)/2,3,0),COLOR009900;

STICKLINE(DT,C,(O+C)/2,2.2,0),COLOR00BB00; 

STICKLINE(DT,C,(O+C)/2,1.5,0),COLOR00DD00; 

STICKLINE(DT,C,(O+C)/2,0.5,0),COLOR00FF00;

{曾涨跌停打开K线颜色设置}

STICKLINE(ZT1,C,(O+C)/2,3,0),COLORFF00FF;

STICKLINE(ZT1,C,(O+C)/2,2.2,0),COLORFF00FF;

STICKLINE(ZT1,C,(O+C)/2,1.5,0),COLOR0000FF;

STICKLINE(ZT1,O,(O+C)/2,3,0),COLOR999999;

STICKLINE(ZT1,O,(O+C)/2,2.2,0),COLORBBBBBB; 

STICKLINE(ZT1,O,(O+C)/2,1.5,0),COLORDDDDDD; 

STICKLINE(DT1,O,(O+C)/2,3,0),COLOR888888;

STICKLINE(DT1,O,(O+C)/2,2.2,0),COLORBBBBBB;

STICKLINE(DT1,O,(O+C)/2,1.5,0),COLORDDDDDD;

STICKLINE(DT1,C,(O+C)/2,3,0),COLOR009900;

STICKLINE(DT1,C,(O+C)/2,2.2,0),COLOR00BB00; 

STICKLINE(DT1,C,(O+C)/2,1.5,0),COLOR00DD00; 

STICKLINE(DT1,C,(O+C)/2,0.5,0),COLOR00FF00;

DRAWTEXT(ZT AND DT1 AND PERIOD=5,L-0.03,'地天板'),COLORCC00CC;{从跌停到涨停}

DRAWTEXT(DT AND ZT1 AND PERIOD=5,H+0.03,'天地板'),COLOR00CC00;{从涨停到跌停};

DRAWTEXT(DT1,L-0.09,'撬板'),COLORCC00CC;{从涨停到跌停};

DRAWTEXT(ZT1,H+0.03,'炸板'),COLOR00CC00;{从涨停到跌停};

{马牛线}

MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;

牛线:(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16

*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)+11

*REF(MID,9)+10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)+5

*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210,COLORRED;

马线:MA(牛线,6),COLORGREEN;

MAA5:=MA(C,5),COLORFF00FF,LINETHICK2;

日:=74;

高1:=HHV(H,日);

低1:=LLV(L,日);

H1:=高1-(高1-低1)*0.191;

H2:=高1-(高1-低1)*0.382;

H3:=高1-(高1-低1)*0.5;

H4:=高1-(高1-低1)*0.618;

H5:=高1-(高1-低1)*0.809;

顶:=REFDATE(高1,DATE),DOTLINE,COLORRED;

一809:=REFDATE(H1,DATE),DOTLINE,COLORBLUE;

二618:=REFDATE(H2,DATE),DOTLINE,COLORMAGENTA;

三500:=REFDATE(H3,DATE),DOTLINE,COLORWHITE;

四382:=REFDATE(H4,DATE),DOTLINE,COLORGREEN;

五191:=REFDATE(H5,DATE),DOTLINE,COLORYELLOW;

NOTEXT第1压力:REFDATE(五191,DATE),DOTLINE,COLORYELLOW;

DRAWNUMBER(ISLASTBAR AND O<五191,五191,五191),COLORYELLOW;

低:=REFDATE(低1,DATE),DOTLINE,COLORRED;

NOTEXT第2压力:REFDATE(IF(O>五191,四382,DRAWNULL),DATE),COLORGREEN,DOTLINE;

DRAWNUMBER(ISLASTBAR AND O>五191 AND O<四382,四382,四382),COLORGREEN;

NOTEXT第3压力:REFDATE(IF(O>四382,三500,DRAWNULL),DATE),COLORWHITE,DOTLINE;

DRAWNUMBER(ISLASTBAR AND O>四382 AND O<三500,三500,三500),COLORWHITE;

NOTEXT第4压力:REFDATE(IF(O>三500,二618,DRAWNULL),DATE),COLORMAGENTA,DOTLINE;

DRAWNUMBER(ISLASTBAR AND O>三500 AND O<二618,二618,二618),COLORMAGENTA;

NOTEXT第5压力:REFDATE(IF(O>二618,一809,DRAWNULL),DATE),COLORBLUE,DOTLINE;

DRAWNUMBER(ISLASTBAR AND O>二618 AND O<一809,一809,一809),COLORBLUE;

NOTEXT第6压力:REFDATE(IF(O>一809,顶,DRAWNULL),DATE),COLORRED,DOTLINE;

DRAWNUMBER(ISLASTBAR AND O>一809 AND O<顶,顶,顶),COLORRED;