一个组合的指标,看到:BS操盘线+布l林(主图)公式
if DISPSTATUS=2 then aaa:=BARPOS;
if DISPSTATUS=1 then bbb:=BARPOS;
ddd:=aaa-bbb;
if DISPSTATUS=2 then aaa:=BARPOS;
if DISPSTATUS=1 then bbb:=BARPOS;
ddd:=aaa-bbb;
hh:=hhv(h,ddd);;
ll:=llv(l,ddd);
e:=(hh-ll)/100;
DRAWTEXT(BARSTATUS=2,hh-3*e,STKLABEL+' '+STKNAME+' '),Colorred,align2;
换手率:=100*v/capital;
RH:=H-L;
R:=DYNAINFO(13)*100;
DRAWTEXT (BARSTATUS=2,hh-3*e,'当日振幅:'+NUMTOSTRN(R,2)+'% '+NUMTOSTRN(RH,2)+'元 '+' 当前换手率:'+NUMTOSTRN(换手率,2)+'% '+' '),Colorblue,align2;
DRAWTEXT(BARSTATUS=2,hh-11*e,' 机构评级:'+selfstring('评级')+ ' '),colorred,align2;
年:MA(CLOSE,26),colorred,linethick2;
反压线:HHV(FORCAST(C,10),18),coloree8fff,linethick1;
M5:MA(C,5),ColorFFFfff,linethick1;
M10:MA(C,10),Color00Ffff,linethick1;
M60:MA(C,60),Color208fff,linethick1;
M90:MA(C,90),Color00ff00,linethick0;
M125:MA(C,125),Color00Ffff,linethick0;
M250:MA(C,250),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;
DRAWTEXT(((c>界 and 指导线>界 and cross(界,l))),l,'▲'),Color0000ff,ALIGN1,VALIGN0;
DRAWTEXT(((c>界 and 指导线>界 and cross(界,l))),l*0.997,'↑'),Color0000ff,ALIGN1,VALIGN0;
DRAWTEXT(((c>界 and 指导线>界 and cross(指导线,界))),l,'买点'),ALIGN1,VALIGN0,Color00578C;
DRAWTEXT(((c>界 and 指导线>界 and cross(指导线,界))),l,'?'),ALIGN1,VALIGN0,Colorffffff;
DRAWICON(cross(H,上限),h,10),ALIGN1,VALIGN2;
DRAWICON(cross(上限,H),h,9),ALIGN1,VALIGN2;
DRAWTEXT(h>上限 and cross(h,上限),h,'●'),ALIGN1,VALIGN2,Color0000ff;
DRAWTEXT(cross(H,上限),H,'_'),linethick2,ALIGN1,VALIGN2,Color00ffff;
DRAWTEXT(h>卖 and cross(上限,H),h,'▼'),ALIGN1,VALIGN2,Color00ff00;
DRAWTEXT(cross(上限,H),H,'_'),linethick2,ALIGN1,VALIGN2,Colorff00ff;
DRAWTEXT(cross(下限,L),l,'限'),ALIGN1,VALIGN0,Color00ff00;
DRAWTEXT(cross(下限,L),l,' ̄'),ALIGN1,VALIGN0,Color00ff00;
DRAWTEXT(cross(买,L),l,'△'),ALIGN1,VALIGN0,ColorFFFFFF;
DRAWTEXT(cross(买,L),l,' ̄'),ALIGN1,VALIGN0,ColorFFFFFF;
DRAWTEXT(cross(买,C),L,'▲'),ALIGN1,VALIGN0,Colorffff00;
DRAWTEXT(cross(买,C),L,' ̄'),ALIGN1,VALIGN0,Colorffff00;
STICKLINE(C>=年 AND C>=O,C,O,7,0),COLORRED;
STICKLINE(C>=年 AND C>=O,H,L,0,0),COLORRED;
STICKLINE(C>=年 AND C<O,C,O,7,1),COLORRED;
STICKLINE(C>=年 AND C<O,O,H,0,0),COLORRED;
STICKLINE(C>=年 AND C<O,C,L,0,0),COLORRED;
STICKLINE(C<年 AND C>O,C,O,7,1),COLORffff00;
STICKLINE(C<年 AND C<=O,C,O,7,1),COLORffff00;
STICKLINE(C<年 AND C<=O,H,L,0,1),COLORffff00;
STICKLINE(C<年 AND C>O,C,H,0,1),COLORffff00;
STICKLINE(C<年 AND C>O,O,L,0,1),COLORffff00;
gj:=if(c=INDEXC,(INDEXC+INDEXh+INDEXl+INDEXO)/4,AMOUNT/(v+0.01)/100);
明日阻力:=l+(gj-l)+(c-l);
明日支撑:=l+(c-gj);
今日阻力:=REF(明日阻力 , 1);
今日支撑:=REF(明日支撑 , 1);
STICKLINE(BARSTATUS=2 and c>=今日阻力,今日阻力,今日阻力,30,0),Color0000FF;
STICKLINE(BARSTATUS=2 and c<今日阻力,今日阻力,今日阻力,30,0),Color00FF00;
STICKLINE(BARSTATUS=2 and c>=今日支撑,今日支撑,今日支撑,30,0),ColorFF00FF;
STICKLINE(BARSTATUS=2 and c<今日支撑,今日支撑,今日支撑,30,0),ColorFF8800;
DRAWTEXT(BARSTATUS=2 ,hh,'---------------------------------- '),ColorFFFFFF,align2;
DRAWTEXT(BARSTATUS=2 and c>=今日支撑,hh-3*e,' 今日支撑=:'+NUMTOSTRN(今日支撑 ,2 )+' '),ColorFF00FF,align2;
DRAWTEXT(BARSTATUS=2 and c<今日支撑,hh-3*e,' 今日支撑=:'+NUMTOSTRN(今日支撑 ,2 )+' '),ColorFF8800,align2;
DRAWTEXT(BARSTATUS=2 and c>=今日阻力,hh-7*e,' 今日阻力=:'+NUMTOSTRN(今日阻力 ,2 )+' '),Color0000FF,align2;
DRAWTEXT(BARSTATUS=2 and c<今日阻力,hh-7*e,' 今日阻力=:'+NUMTOSTRN(今日阻力 ,2 )+' '),Color00FF00,align2;
DRAWTEXT(BARSTATUS=2 ,hh-3*e,' 明日阻力=:'+NUMTOSTRN(明日阻力 ,2 )+' '),Colorblue,align2;
DRAWTEXT(BARSTATUS=2 ,hh-7*e,' 明日支撑=:'+NUMTOSTRN(明日支撑 ,2 )+' '),Colorblue,align2;
DRAWTEXT(BARSTATUS=2 ,hh-10*e,'---------------------------------- '),ColorFFFFFF,align2;
DRAWTEXT(BARSTATUS=2 and v>ref(v,1) and ma(v,5)>ref(ma(v,5),1),hh-13*e,'今日成交量大于昨日,且有继续增大趋势'+' '),Color8285FF,align2;
DRAWTEXT(BARSTATUS=2 and v<ref(v,1) and ma(v,5)>ref(ma(v,5),1),hh-13*e,'今日成交量小于昨日,但有放大迹象'+' '),Color8285FF,align2;
DRAWTEXT(BARSTATUS=2 and v>ref(v,1)and ma(v,5)<ref(ma(v,5),1),hh-13*e,'今日成交量大于昨日, 但有缩小迹象'+' '),Color8285FF,align2;
DRAWTEXT(BARSTATUS=2 and v<ref(v,1)and ma(v,5)<ref(ma(v,5),1),hh-13*e,'今日成交量小于昨日,且有缩小迹象'+' '),Color8285FF,align2;
if DISPSTATUS=2 then begin;
var100:='所属板块:';
if inblock('电力')=1 then var100:=var100+' 电力';
if inblock('电脑')=1 then var100:=var100+' 电脑';
if inblock('电器')=1 then var100:=var100+' 电器';
if inblock('电子信息')=1 then var100:=var100+' 电子信息';
if inblock('房地产')=1 then var100:=var100+' 房地产';
if inblock('纺织服装')=1 then var100:=var100+' 纺织服装';
if inblock('钢铁')=1 then var100:=v |