对于公式和用人一样也要用人不疑,疑人不用,你用[心悦诚服]就要心悦诚服的用，他们叫军令如山有点强迫性，我说要心悦诚服的用，高高兴兴的信他，你认为K线历史上它没骗过你，你就心悦诚服的信它发出的信号，照它信号去做，在公式里，下了三道金牌【1】买卖的明码标记【2】卖黄金K线【3】背景变色，你还不信它，不如别用它，另请高明吧，今天你下载它你就心悦诚服得用它，信他，按它的信号去买卖，你会财源滚滚，祝你在2012年你将钵满盆满，[心悦诚服]将会帮大忙的，记住【三道金牌】就是你发财的法宝，
这个主图图面清晰，色泽分明，【可用于不同周期，适用于大盘】，附图是主题的注解，联合作战达到功半事倍的目的，看过，路过，别白来---顶一下，你不费力贴不沉，大家都受益何乐而不为-----你看过顶了没有，谢谢！
主图:源码----
{心悦诚服主图}
input:N(10,0,90);
DRAWTEXTREL(10,15,'★可调【买卖标记:N='+N+', [0---不显示,优化:个股N=20,大盘N=30]】'),COLOR00FFFF,linethick2;
{K线}
STICKLINE(CLOSE>OPEN,HIGH,LOW,0.5,0 ),COLOR0000FF;
STICKLINE(OPEN>=CLOSE,HIGH,LOW,0.5 ,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,0,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,8,0 ),COLOR009900;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLOR00BB00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLOR00DD00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLOR00FF00;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0,0) ,COLORFFBBFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8,0) ,COLORFF22FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLORFF66FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLORFF99FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLORFFBBFF;
{卖黄金,RSI=80}
LC:=REF(C,1);
卖黄金:((SMA(MAX((C - LC),0),3,1) / SMA(ABS((C - LC)),3,1)) * 100),LINETHICK0;
STICKLINE(CROSS(80,卖黄金) AND C<O,H,L,2,0),COLOR00ffff,LAYER0;
STICKLINE(CROSS(80,卖黄金) AND C<O,C,O,12,0 ),COLOR007777,LAYER0;
STICKLINE(CROSS(80,卖黄金) AND C<O,C,O,8,0 ),COLOR009999,LAYER0;
STICKLINE(CROSS(80,卖黄金) AND C<O,C,O,6,0 ),COLOR00BBBB,LAYER0;
STICKLINE(CROSS(80,卖黄金) AND C<O,C,O,4,0 ),COLOR00DDDD,LAYER0;
STICKLINE(CROSS(80,卖黄金) AND C<O,C,O,2 ,0 ),COLOR00ffff,LAYER0;
{心悦诚服}
BBI:=(2*C+H+L+O/2)/4.5;
心悦:EMA(((SLOPE(BBI,18)*21)+C),43),COLOR00FF00,LINETHICK1;
PARTLINE(心悦,心悦>ref(心悦,1),rgb(255,0,0)),LINETHICK3,LAYER3;
阻拦:EMA(REF(HHV(H*0.987,30),1),2),COLOR0077FF;
支护:EMA(REF(LLV(L*1.013,30),1),2),COLOR99ff99;
FILLRGN(阻拦,心悦,阻拦>心悦,RGB(0,80,0)),COLORFF9900,LAYER7;
FILLRGN(支护,心悦,支护<心悦,RGB(50,0,30)),COLOR00FF00,LAYER7;
FILLRGN(阻拦,支护,心悦>ref(心悦,1),RGB(0,0,255)),COLORFF9900,LAYER5;
诚服:WMA(BBI,8),COLOR00FFFF,PRECIS2;
{买卖标记}
A3:=REF(H,N)=HHV(H,2*N+1);
B3:=FILTER(A3,N);
C3:=BACKSET(B3,N+1);
D3:=FILTER(C3,N);{高点}
A4:=REF(L,N)=LLV(L,2*N+1);
B4:=FILTER(A4,N);
C4:=BACKSET(B4,N+1);
D4:=FILTER(C4,N);{低点}
drawbmp(D3 or (D3 AND C<O AND VOL>MA(VOL,5) AND VOL>MA(VOL,60)),(H)*1.04,'LC.bmp'),align1,layer0;
drawbmp(D4 or (D4 AND C>O AND VOL>ref(LLV(VOL,60),1)),(l)*0.99,'LR.bmp'),align1,layer0;
{心悦诚服副图}
{VOLK}
DRAWRECTREL(-1,0,1000,1000,RGB(0,0,40)),color0077FF,LINETHICK0,LAYER7;
线5:MEMA(EMA(VOL,5),5),color77ff00,linethick1;
PARTLINE(线5,线5>(REF(线5,1)),RGB(255,0,0)),linethick3,color00ffff,LAYER0;
线20:MEMA(EMA(VOL,20),20),color0077ff,linethick1;
FILLRGN(线5,线20,线5>线20,RGB(0,0,255)),COLORFF9900,LAYER7;
FILLRGN(线5,线20,线5<线20,RGB(0,80,0)),COLORFF9900,LAYER7;
STICKLINE(C>ref(c,1),0,V,2,0),COLOR0000FF,linethick1;
STICKLINE(C=ref(c,1),0,V,2,0),COLOR00FFFF,linethick1;
STICKLINE(C<ref(c,1),0,V,2,0),COLOR00FF00,linethick1;
地量121:V<=LLV(VOL,121),color0000ff,LINETHICK0;
STICKLINE(地量121,0,V,9,0),color0000ff,LINETHICK2,LAYER3;
DRAWTEXT(地量121,vol*2,'地量' ),COLOR00ff00,linethick1,LAYER0;
倍量2:V>=REF(V,1)*2,color00FFff,LINETHICK0;
STICKLINE(倍量2 ,0,V,3,0),color00FFff,LINETHICK2,LAYER3;
DRAWTEXT(倍量2,vol*1.05,'倍量' ),COLORred,linethick1,LAYER0;
缩量2:V<=REF(V,1)/2,color00FF00,LINETHICK0;
STICKLINE(缩量2 ,0,V,3,0),color00FF00,LINETHICK2,LAYER3;
DRAWTEXT(缩量2,vol*1.2,'缩量' ),COLOR00ffff,linethick1,LAYER0;
天量121:V>=HHV(VOL,121),colorFF00ff,LINETHICK0;
STICKLINE(天量121 ,0,V,4,0),colorFF00ff,LINETHICK2,LAYER3;
DRAWTEXT(天量121,vol*1.01,'天量' ),COLOR0077ff,linethick1,LAYER0;
A1:=DYNAINFO(23) / DYNAINFO(22);
A2:=DYNAINFO(17);
DRAWTEXTABS(10,10,IFS((A1 >= 1),'能量(外盘比内盘):'+NUMTOSTRN(A1,2)+' 量比(当日): '+NUMTOSTRN(A2,2),'')),linethick4,color0000FF;
DRAWTEXTABS(10,10,IFS((A1 < 1),'能量(外盘比内盘):'+NUMTOSTRN(A1,2)+' 量比(当日): '+NUMTOSTRN(A2,2),'')),linethick4,color00FF00;
 |
