源码
{fxj}
DRAWGBKLAST(C>0,STRIP(RGB(90,90,90),RGB(0,0,0),0));
DRAWTEXTREL(8,5,'代码:'+STKLABEL),ColorFFFFFF;
DRAWTEXTREL(8,5,' 所属板块:'+selfstring('所属板块')),colorffffff;
DRAWTEXTREL(8,55,' 机构评级:'+selfstring('评级')),coloryellow;
反压线:HHV(FORCAST(C,10),18),coloree8fff,linethick1;
A1:MA(C,5),ColorFFFfff,linethick1;
A2:MA(C,10),Color00Ffff,linethick1;
A3: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),ALIGN1,VALIGN0;
DRAWTEXT(((c>界 and 指导线>界 and cross(指导线,界))),l,'买点'),ALIGN1,VALIGN0;
DRAWTEXT(((c>界 and 指导线>界 and cross(指导线,界))),l,'⊕'),ALIGN1,VALIGN0,Colorffffff;
DRAWICON(cross(H,上限),h,10),ALIGN1,VALIGN2;
DRAWICON(cross(上限,H),h,9),ALIGN1,VALIGN2;
DRAWICON((h>上限 and cross(h,上限)),h,12),ALIGN1,VALIGN2;
DRAWTEXT(cross(H,上限),H,' ̄'),ALIGN1,VALIGN0,Color00ffff;
DRAWICON((h>卖 and cross(上限,H)),h,9),ALIGN1,VALIGN2;
DRAWTEXT(cross(上限,H),H,' ̄'),ALIGN1,VALIGN0,Colorff00ff;
DRAWTEXT(cross(下限,L),l,'限'),ALIGN1,VALIGN2,Color00ff00;
DRAWTEXT(cross(下限,L),l,' ̄'),ALIGN1,VALIGN2,Color00ff00;
DRAWTEXT(cross(买,L),l,'△'),ALIGN1,VALIGN0,Colorffff00;
DRAWTEXT(cross(买,L),l,' ̄'),ALIGN1,VALIGN0,Colorffff00;
DRAWTEXT(cross(买,C),L,'▲'),ALIGN1,VALIGN0,Colorffff00;
DRAWTEXT(cross(买,C),L,' ̄'),ALIGN1,VALIGN0,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<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,O,H,0,0),COLORRED;
STICKLINE(C>=年 AND C<O,C,L,0,0),COLORRED;
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,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;
DRAWtext(CROSS(h,年) and o>=年,l,'B'),coloryellow,ALIGN1,VALIGN0;
DRAWtext(CROSS(年,l) and c<=年,h,'S'),colorgreen,ALIGN1,VALIGN2;
dp:=if(c=INDEXC,0,1);
gj:=AMOUNT/v/100;
明日阻力:=l+(gj-l)+(c-l);
明日支撑:=l+(c-gj);
今日阻力:=REF(明日阻力 , 1);
今日支撑:=REF(明日支撑 , 1);
STICKLINE(DISPSTATUS=2 and dp=1 and c>=今日阻力,今日阻力,今日阻力,30,0),Color0000FF;
STICKLINE(DISPSTATUS=2 and dp=1 and c<今日阻力,今日阻力,今日阻力,30,0),Color00FF00;
STICKLINE(DISPSTATUS=2 and dp=1 and c>=今日支撑,今日支撑,今日支撑,30,0),ColorFF00FF;
STICKLINE(DISPSTATUS=2 and dp=1 and c<今日支撑,今日支撑,今日支撑,30,0),ColorFF0000;
DRAWTEXTREL(5,105,' 今日支撑=:'+NUMTOSTRN(今日支撑 ,2 )),ColorFF00FF;
DRAWTEXTREL(5,205,' 明日支撑=:'+NUMTOSTRN(明日支撑 ,2 )),Color00FFFF;
DRAWTEXTREL(5,155,' 今日阻力=:'+NUMTOSTRN(今日阻力 ,2 )),ColorFFFF00;
DRAWTEXTREL(5,255,' 明日阻力=:'+NUMTOSTRN(明日阻力 ,2 )),Color00FF00;
RH:=H-L;
R:=DYNAINFO(13)*100;
DRAWTEXTREL(5,105,' 当天振幅:'+NUMTOSTRN(R,2)+'% ['+NUMTOSTRN(RH,2)+'元 ]'),Color00FF00;