|
N:=3;
M:=30;
VAR0:=(3*CLOSE+LOW+OPEN+HIGH)/6;
攻击:=(20*VAR0+19*REF(VAR0,1)+18*REF(VAR0,2)+17*REF(VAR0,3)+16*REF(VAR0,4)+15*REF(VAR0,5)+14*REF(VAR0,6)+13*REF(VAR0,7)+12*REF(VAR0,8)+11*REF(VAR0,9)+10*REF(VAR0,10)+9*REF(VAR0,11)+8*REF(VAR0,12)+7*REF(VAR0,13)+6*REF(VAR0,14)+5*REF(VAR0,15)+4*REF(VAR0,16)+3*REF(VAR0,17)+2*REF(VAR0,18)+REF(VAR0,20))/210,COLORF00FF0;
生命:=MA(攻击,5),COLORGREEN;
DRAWBAND(攻击,RGB(155,50,50),生命,RGB(50,250,0));
涨停:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0);
STICKLINE(涨停,O,C,3,0),COLORYELLOW;
短线1:攻击,COLORWHITE;
中线1:生命,COLORYELLOW;
{所属板块 所属地域 流通市值}
LTSZ:=C*CAPITAL/1000000;
LTSZ1:=CON2STR(LTSZ,0);
AAA1:=STRCAT('每股公积金= ',CON2STR(FINANCE(18),2));
DRAWTEXT_FIX(CURRBARSCOUNT=1,0,0.8,0,AAA1),COLORYELLOW;
AAA2:=STRCAT('每股未分配利润= ',CON2STR(FINANCE(32),2));
DRAWTEXT_FIX(CURRBARSCOUNT=1,0,0.86,0,AAA2),COLORRED;
AAA3:=STRCAT('每股收益(当期)= ',CON2STR(FINANCE(38),4));
DRAWTEXT_FIX(CURRBARSCOUNT=1,0,0.92,0,AAA3),COLORWHITE;
AAA6:=STRCAT(STRCAT('每股净收益率= ',CON2STR(100*((FINANCE(29)/FINANCE(7))/FINANCE(34)),2)),'%');
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.3,0.92,0,AAA6),COLORYELLOW;
DRAWTEXT_FIX(1,0.760,0.010,0,'涨幅: ');
DRAWTEXT_FIX(1,0.840,0.010,0,'量比: ');
DRAWTEXT_FIX(1,0.920,0.010,0,'换手: ');
DRAWTEXT_FIX(1,0.795,0.010,0,CON2STR(DYNAINFO(14)*100,2));
DRAWTEXT_FIX(1,0.875,0.010,0,CON2STR(DYNAINFO(17),2));
DRAWTEXT_FIX(1,0.955,0.010,0,CON2STR(DYNAINFO(37)*100,2));
{所属板块}
Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(Z2,' ');
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORRED;
VAR1:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,5);
A1:=CLOSE/MA(CLOSE,40);
A2:=(CLOSE-OPEN)/OPEN*100>4;
A3:=LOW*1.051<HIGH;
A4:=A3 AND COUNT(A3,5)>1;
B1:=INDEXC;
B2:=MA(B1,5);
B3:=MA(B1,20);
B4:=B1*1.03<B2 AND B1*1.13<B3;
买入1:=(VAR1<6 AND A1<0.85 AND A2)*90;
买入2:=(VAR1<6 AND A1<0.76 AND A4)*70;
买入3:=(VAR1<6 AND B4)*60;
DRAWICON(VAR1<6 AND A1<0.85 AND A2,L*0.9,1);
DRAWTEXT(VAR1<6 AND A1<0.85 AND A2,L*0.85,'--->买入1'),COLORRED;
DRAWICON(VAR1<6 AND A1<0.76 AND A4,L*0.9,1);
DRAWTEXT(VAR1<6 AND A1<0.76 AND A4,L*0.85,'--->买入2'),COLORRED;
DRAWTEXT(VAR1<6 AND B4,L*0.85,'--->买入3'),COLORRED;
VAR2:=MAX(ABS(HIGH-AMOUNT/VOL/100),ABS(AMOUNT/VOL/100-LOW));
VAR3:=ABS((OPEN+CLOSE)/2-AMOUNT/VOL/100);
MV:=(VAR2+VAR3)/AMOUNT*VOL*100*50;
VAR4:=EMA((EMA(CLOSE,95)-EMA(CLOSE,120)),35);
VAR5:=((EMA(CLOSE,95)-EMA(CLOSE,120))-VAR4)*2;
DRAWTEXT(CROSS(生命,攻击),攻击*1.015,'⊙'),COLORYELLOW;
DRAWTEXT(CROSS(攻击,生命),攻击*0.975,'⊙'),COLORRED;
14O3GS35F-3CD.jpg
|
