|
DRAWGBK(C>0,RGB(0,150,150),RGB(0,00,100),0,' ',0),LINETHICK2;
M80:MA(C,80),LINETHICK0;
M200:MA(C,200),LINETHICK0;
DRAWBAND(M200,RGB(40,100,40),M80,RGB(100,100,0)),LINETHICK0;
DRAWKLINE(H,O,L,C);
MA03:MA(C,3),COLORYELLOW,DOTLINE,LINETHICK0;
IF(MA03>=REF(MA03,1),MA03,DRAWNULL),COLOR0066FF,LINETHICK0;
IF(MA03< REF(MA03,1),MA03,DRAWNULL),,COLORGREEN,LINETHICK0;
X:=(3*C+L+O+H)/6;
多空线:(20*X+19*REF(X,1)+18*REF(X,2)+17*REF(X,3)+16*REF(X,4)+15*REF(X,5)+14*REF(X,6)
+13*REF(X,7)+12*REF(X,8)+11*REF(X,9)+10*REF(X,10)+9*REF(X,11)+8*REF(X,12)
+7*REF(X,13)+6*REF(X,14)+5*REF(X,15)+4*REF(X,16)+3*REF(X,17)+2*REF(X,18)+
REF(X,20))/210,COLORGREEN,LINETHICK2;
IF(多空线>=REF(多空线,1),多空线,DRAWNULL),COLORRED,LINETHICK3;
IF(多空线< REF(多空线,1),多空线,DRAWNULL),,COLORGREEN,LINETHICK3;
牛皮熊:DRAWICON(CROSS(MA03,多空线) AND CLOSE/REF(CLOSE,1)>1.03,LOW*0.96,25);
DRAWTEXT(FILTER(牛皮熊,8),多空线-0.05,'↖跟庄买进'),COLORGREEN;
DRAWTEXT(CROSS(MA03,多空线) AND MA03>0,多空线-0.23,'★←'),COLORYELLOW;
花:=SLOPE(EMA(C,3),3);
神:=SLOPE(EMA(C,7),7);
DRAWICON(CROSS(花,神) AND CLOSE/REF(CLOSE,1)>1.03,LOW*0.96,25);
DRAWTEXT(CROSS(花,神) AND CLOSE/REF(CLOSE,1)>1.03,LOW*0.96,'买'),COLORWHITE;
花2:=EMA(SLOPE(1,1)+C,3),COLORRED;
神2:=EMA(SLOPE(1,1)+C,7),COLORBLUE;
A02:=3*EMA((C-LLV(L,30))/(HHV(H,30)-LLV(L,30))*100,5)-2*EMA((C-LLV(L,30))/(HHV(H,30)-LLV(L,30))*100,5);
A4:=(HHV(H,34)-C)/(HHV(H,34)-LLV(L,34))*100;
A5:=EMA(CLOSE,12)-EMA(CLOSE,26);
A6:=EMA(A5,9);
A7:=(A5<-0.1 AND A5>A6);
财神:IF(A7,LLV(L,21),DRAWNULL)COLORRED,CIRCLEDOT;
DRAWTEXT_FIX(1,0.07,0,0,HYBLOCK)COLOR0080FF;
DRAWTEXT_FIX(1,0.01,0.08,0,'主题投资：')COLOR0000FF;
DRAWTEXT_FIX(1,0.09,0.08,0,EXTERNSTR(0,1))COLOR0000FF;
窗口显示:=C>REF(C,1)*1.095 AND C=H;
T:=BARSLAST(窗口显示),LINETHICK0;
涨停价:REF(C,T)NODRAW,LINETHICK0;
涨停日期:REF(DATE-1000000,T)NODRAW,LINETHICK0;
STICKLINE(L>REF(H,1),L,REF(H,1),20,1001), COLORYELLOW ,LINETHICK0;
STICKLINE(REF(L,1)>H,REF(L,1),H,20,1001), COLORGREEN ,LINETHICK0;
TJ01:=C<O AND REFX(C<O,1) AND REFX(C>O,2);
DRAWLINE(TJ01,REFX(LLV(L,2),1),REF(TJ01,1),REF(REFX(LLV(L,2),1),1),1)COLORYELLOW,LINETHICK0;
DRAWLINE(TJ01,REFX(HHV(C,2),1),REF(TJ01,1),REF(REFX(HHV(C,2),1),1),1)COLORYELLOW,LINETHICK0;
{波峰}
TY:=H;
A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BACKSET(B1,10+1);
HD:=FILTER(C1,10);
A2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2,10); C002:=BACKSET(B2,10+1);
LD:=FILTER(C002,10);
波峰:REF(H,BARSLAST(HD)),COLOR00808F,POINTDOT,LINETHICK4;
STICKLINE(H,波峰,波峰,8,0),COLOR00808F,LINETHICK4;
BDGD:=C=HHV(C,13);
GDSJ:=BARSLAST(FILTER(CROSS(0.8,BDGD),2))+1;
高点:REF(C,GDSJ),COLORGREEN,LINETHICK4,POINTDOT;
突破:CROSS(C,REF(高点,1)),COLOR00FFFF,POINTDOT,LINETHICK0;
STICKLINE(GDSJ<=6,高点,高点,8,0),COLORGREEN,LINETHICK2;
BDDD:=C=LLV(C,13);
DDSJ:=BARSLAST(FILTER(CROSS(0.8,BDDD),2))+1;
低点:REF(C,DDSJ),COLOR0055FF,POINTDOT,LINETHICK4;
STICKLINE(DDSJ<=6,低点,低点,8,0),COLOR0055FF,LINETHICK4;
AAA:=(REF(CLOSE,1)+REF(CLOSE,2)+OPEN)/3;
前高:DRAWLINE(CURRBARSCOUNT=3,H,REF(CURRBARSCOUNT=3,1),REF(H,1),1),LINETHICK2;
昨收:DRAWLINE(CURRBARSCOUNT=2,C,REF(CURRBARSCOUNT=2,1),REF(C,1),1),LINETHICK2;
压力线:DRAWLINE(HIGH>=HHV(HIGH,10),HIGH,LOW<=LLV(LOW,3),HHV(HIGH,3),1),COLORYELLOW,LINETHICK0;
DRAWTEXT(压力线,L-0.2,'压力↙'),COLORYELLOW,LINETHICK0;
MA010:=MA(CLOSE,10),COLORYELLOW,LINETHICK0;
MA54:=MA(CLOSE,54),COLORFFCCCC,LINETHICK0;
PL1:=(((CLOSE - MA54) / MA54) < 0.1);
PL2:=(((CLOSE - MA010) / MA010) < 0.3);
偏离率:=(((PL1 = 1) AND (PL2 = 1)) * 0.2);
评台突破:=((((偏离率 = 0) AND (REF(偏离率,1) = 0.2)) AND (REF((COUNT((偏离率 = 0.2),10) = 10),1) = 1)) * 1);
DRAWTEXT(评台突破,L,'＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝'),COLORWHITE;
DRAWTEXT(评台突破,L-0.05,'评台突破'),COLORGREEN;
三日最低:=EMA((REF(L,4)+REF(L,3)+REF(L,2))/3,3);
三日最高:=EMA((REF(H,4)+REF(H,3)+REF(H,2))/3,3);
EXITLONG:CROSS(CROSS(三日最高,C),0.6);
ENTERLONG:CROSS(CROSS(C,三日最低),0.5);
STICKLINE(C/REF(C,1)>1.095,C,O,2,0),COLORYELLOW;
涨停:=IF(REF(C,1)*1.095-C<0.01 ,1,0);
STICKLINE(涨停,OPEN,CLOSE,2.5,0),COLORYELLOW;
DRAWTEXT(涨停,L-0.1,'涨停'),COLORYELLOW;
C3:=REF(C,1);
跌停:=IF((C3-C)*100/C3>=(10-0.01*100/C3),1,0);
STICKLINE(跌停,OPEN,CLOSE,2.5,0),COLORBLUE;
DRAWTEXT(跌停,H+0.3,'跌停'),COLORBLUE;
NN:=120;
{跳空}
STICKLINE(REF(L,1)>H,H,REF(L,1),5,0),COLORGRAY;
STICKLINE(REF(H,1)<L,L,REF(H,1),5,0),COLORGRAY;
{彩色K线}
TYX3:=MA(REF(HHV((C+L+O+H)/4,30),1),3);
TYX4:=MA((C+L+O+H)/4,13);
TYX5:=EMA((C+L+O+H)/4,21);
{空心红}
STICKLINE(C<TYX5 AND C>O,H,L,0,0),COLORRED;
STICKLINE(C<TYX5 AND C>O,C,O,3,1),COLORRED;
{深绿}
STICKLINE(C<TYX5 AND C<O,H,L,0,0),COLOR007700;
STICKLINE(C<TYX5 AND C<O,C,O,3,0),COLOR005500;
STICKLINE(C<TYX5 AND C<O,C,O,2,0),COLOR006600;
STICKLINE(C<TYX5 AND C<O,C,O,1,0),COLOR007700;
{蓝}
STICKLINE(C>TYX5 AND C<O,H,L,0,0),COLORFFDD44;
STICKLINE(C>TYX5 AND C<O,C,O,3,0 ),COLORFF7700;
STICKLINE(C>TYX5 AND C<O,C,O,2,0 ),COLORFFAA22;
STICKLINE(C>TYX5 AND C<O,C,O,1 ,0 ),COLORFFDD44;
{黄}
STICKLINE(C>TYX5 AND C>O,H,L,0,0 ),COLOR00EEFF;
STICKLINE(C>TYX5 AND C>O,C,O,3,0 ),COLOR00AAFF;
STICKLINE(C>TYX5 AND C>O,C,O,2,0 ),COLOR00CCFF;
STICKLINE(C>TYX5 AND C>O,C,O,1,0 ),COLOR00EEFF;
{粉红}
STICKLINE(C>TYX4 AND C>O,H,L,0,0),COLORFF66AA;
STICKLINE(C>TYX4 AND C>O,C,O,3,0 ),COLORFF11FF;
STICKLINE(C>TYX4 AND C>O,C,O,2,0 ),COLORFF44FF;
STICKLINE(C>TYX4 AND C>O,C,O,1,0 ),COLORFF66FF;
{亮灰}
STICKLINE(C>TYX4 AND C<O,H,L,0,0),COLOR999999;
STICKLINE(C>TYX4 AND C<O,C,O,3,0),COLOR555555;
STICKLINE(C>TYX4 AND C<O,C,O,2,0),COLOR777777;
STICKLINE(C>TYX4 AND C<O,C,O,1,0),COLOR999999;
{深红}
STICKLINE(C>TYX3 AND C>O,H,L,0,0),COLOR0000DD;
STICKLINE(C>TYX3 AND C>O,C,O,3,0),COLOR000099;
STICKLINE(C>TYX3 AND C>O,C,O,2,0),COLOR0000BB;
STICKLINE(C>TYX3 AND C>O,C,O,1,0),COLOR0000DD;
{涨跌停K线}
STICKLINE((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(C,1)),OPEN,CLOSE,1,0),COLORYELLOW;
STICKLINE((REF(C,1)-C)*100/REF(C,1)>=(10-0.01*100/REF(C,1)),OPEN,CLOSE,1,0),COLORWHITE;
{突破}
STICKLINE(REF(COUNT(C<TYX3,5)=5,1) AND C>TYX3 AND C>O,C,O,1,0),COLOR00CCFF;
STICKLINE(REF(COUNT(C<TYX3,5)=5,1) AND C>TYX3 AND C>O,C,O,1,0),COLOR00CCFF;
{红绿三角【副图】}
A10304:=REF(HIGH,3)=HHV(HIGH,2*3+1);
B10304:=FILTER(A10304,3);
C10304:=BACKSET(B10304,3+1);
D10304:=FILTER(C10304,3);{高点}
A20304:=REF(LOW,3)=LLV(LOW,2*3+1);
B20304:=FILTER(A20304,
p20203243175445383.jpg
|
