源码
DRAWGBK(DATE>900101,COLORRGB(95,95,95),COLORRGB(0,0,0),1);
a:=BARPOS; a1:=SYSPARAM(1); a2:=SYSPARAM(2); a3:=SYSPARAM(3);
tt:=BARPOS=SYSPARAM(2);
hh:=SYSPARAM(4); ll:=SYSPARAM(5);
换手率:=100*v/capital,colorfffFff;
RH:=H-L;
R:=DYNAINFO(13)*100;
DRAWTEXT(TT,hh,'
DRAWTEXT(TT,hh,'代码:'+STKLABEL),ColorFFFFFF,pxdn10,align4;
DRAWTEXT(TT,hh,'
DRAWTEXT(TT,hh,'
反压线:HHV(FORCAST(C,10),18),coloree8fff,linethick1;
Ab:MA(C,5),ColorFFFfff,linethick1;
Ac:MA(C,10),Color00Ffff,linethick1;
Ae:MA(C,21),Colorff00ff,linethick1;
A4:MA(C,30),Color00ff00,linethick1;
A5:MA(C,60),Color208fff,linethick1;
A6:MA(C,90),Color00ff00,linethick0;
A7:MA(C,120),Color00Ffff,linethick0;
A8:MA(C,240),Color00ff00,linethick0;
指导线: EMA((EMA(C,4)+EMA(C,6)+EMA(C,12)+EMA(C,24))/4,2),linethick0,ColorFFffFF;
界: MA(CLOSE,21),linethick0,Color00FFFF;
上限: 界+3*STD(C,20),linethick0,Color00FFFF;
卖: 界+2*STD(C,20),linethick0,ColorFF00FF;
买: 界-2*STD(C,20),linethick0,ColorF0FF00;
下限: 界-2.9*STD(close,20),linethick0,Color00FF00;
DRAWICON(((c>界 and 指导线>界 and cross(界,l))),l,8),ALIGN0,pxdn0;
DRAWTEXT(((c>界 and 指导线>界 and cross(指导线,界))),l,'买点'),ALIGN0,pxdn20;
DRAWTEXT(((c>界 and 指导线>界 and cross(指导线,界))),l,'⊕'),ALIGN0,pxdn5,Colorffffff;
DRAWICON(cross(H,上限),h,10),ALIGN0,pxup0;
DRAWICON(cross(上限,H),h,9),ALIGN0,pxup0;
DRAWICON((h>上限 and cross(h,上限)),h,12),ALIGN0,pxup0;
DRAWTEXT(cross(H,上限),H,' ̄'),ALIGN0,pxup0,Color00ffff;
DRAWICON((h>卖 and cross(上限,H)),h,9),ALIGN0,pxup0;
DRAWTEXT(cross(上限,H),H,' ̄'),ALIGN0,pxup0,Colorff00ff;
DRAWTEXT(cross(下限,L),l,'限'),ALIGN0,pxdn5,Color00ff00;
DRAWTEXT(cross(下限,L),l,' ̄'),ALIGN0,pxdn5,Color00ff00;
DRAWTEXT(cross(买,L),l,'△'),ALIGN0,pxdn5,Colorffff00;
DRAWTEXT(cross(买,L),l,' ̄'),ALIGN0,pxdn5,Colorffff00;
DRAWTEXT(cross(买,C),L,'▲'),ALIGN0,pxdn5,Colorffff00;
DRAWTEXT(cross(买,C),L,' ̄'),ALIGN0,pxdn5,Colorffff00;
年:MA(CLOSE,26),color00ff00,LINETHICK0;
STICKLINE(C>=年 AND C>=O,C,O,7,0),COLOR0000aa;
STICKLINE(C>=年 AND C>=O,C,O,5,0),COLOR0000cc;
STICKLINE(C>=年 AND C>=O,C,O,3,0),COLOR0000ee;
STICKLINE(C>=年 AND C>=O,C,O,1,0),COLORRED;
STICKLINE(C>=年 AND C>=O,H,L,0,0),COLORRED;
STICKLINE(C>=年 AND C
STICKLINE(C<年 AND C>O,C,O,5,0),COLORcccc00;
STICKLINE(C<年 AND C>O,C,O,3,0),COLOReeee00;
STICKLINE(C<年 AND C>O,C,O,1,0),COLORffff00;
STICKLINE(C<年 AND C<=O,C,O,7,0),COLORaaaa00;
STICKLINE(C<年 AND C<=O,C,O,5,0),COLORcccc00;
STICKLINE(C<年 AND C<=O,C,O,3,0),COLOReeee00;
STICKLINE(C<年 AND C<=O,C,O,1,0),COLORffff00;
STICKLINE(C<年 AND C<=O,H,L,0,0),COLORffff00;
STICKLINE(C<年 AND C>O,C,H,0,0),COLORffff00;
STICKLINE(C<年 AND C>O,O,L,0,0),COLORffff00;
VAR1:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21))));
VAR2:=(100 - ((90 * (HHV(HIGH,21) - CLOSE)) / (HHV(HIGH,21) - LLV(LOW,21))));
VAR3:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));
DRAWTEXT(CROSS(VAR2,MA(VAR3,6)),L ,'B'),color208fFF,ALIGN0,pxdn5;
DRAWtext(CROSS(h,年) and CROSS(VAR2,MA(VAR3,6)),l,'B'),coloryellow,ALIGN0,pxdn5;
DRAWtext(CROSS(年,l) and c<=年,h,'S'),colorgreen,ALIGN0,pxup25;
dp:=if(c=INDEXC,0,1);
gj:=AMOUNT/v/100;
明日阻力:=l+(gj-l)+(c-l);
明日支撑:=l+(c-gj);
今日阻力:=REF(明日阻力 , 1);
今日支撑:=REF(明日支撑 , 1);{
STICKLINE(a1 and dp=1 and c>=今日阻力,今日阻力,今日阻力,30,0),Color0000FF;
STICKLINE(a1 and dp=1 and c<今日阻力,今日阻力,今日阻力,30,0),Color00FF00;
STICKLINE(a1 and dp=1 and c>=今日支撑,今日支撑,今日支撑,30,0),ColorFF00FF;
STICKLINE(a1 and dp=1 and c<今日支撑,今日支撑,今日支撑,30,0),ColorFF0000;}
DRAWTEXT(TT,hh,'
DRAWTEXT(TT,hh,'
DRAWTEXT(TT,hh,'
DRAWTEXT(TT,hh,'
DD:=FINANCE( 1);
SS:=FINANCE( 7);
FF:=FINANCE(18);
GG:=FINANCE(33);
zz:=FINANCE(53);
JJ:=FINANCE(40);
MM:=JJ/SS;
HH:=DYNAINFO(39);
DRAWTEXT(barpos=SYSPARAM(2),H,'总股本:('+NUMTOSTR(DD,0)+'万股)' +' 流通A股:('+NUMTOSTR(SS,0)+'万股)'+' 市盈率:'+NUMTOSTR(HH,2)+'%'+'