同花顺蛮不错的主图公式
-
相关简介:蛮不错的主图公式,各位可以看看 INPUT:ZF(5,0,50); DRAWGBKlast(c0,strip(RGB(0,0,190),RGB(0,40,0),0)); {K线} STICKLINE(CLOSEOPEN or CLOSE=OPEN and CLOSEREF(CLOSE,1),LOW,HIGH,0.1,0),colorred; STICKLINE(CLOSEOPEN or CLOSE=OPEN and CLOSEREF(CLOSE,1),OPEN,CLOSE,0,0),colorr
-
文章来源:股海网作者:股海网发布时间:2015-09-23浏览次数:
蛮不错的主图公式,各位可以看看
INPUT:ZF(5,0,50);
DRAWGBKlast(c>0,strip(RGB(0,0,190),RGB(0,40,0),0));
{K线}
STICKLINE(CLOSE>OPEN or CLOSE=OPEN and CLOSE>REF(CLOSE,1),LOW,HIGH,0.1,0),colorred;
STICKLINE(CLOSE>OPEN or CLOSE=OPEN and CLOSE>REF(CLOSE,1),OPEN,CLOSE,0,0),colorred;
STICKLINE(CLOSE<OPEN or CLOSE=OPEN and CLOSE<=REF(CLOSE,1),LOW,HIGH,0.1,0),colorcyan;
STICKLINE(CLOSE<OPEN or CLOSE=OPEN and CLOSE<=REF(CLOSE,1),OPEN,CLOSE,0,0),colorcyan;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,8,0 ),COLOR006600;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,7,0 ),COLOR008800;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),COLOR00AA00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLOR00BB00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,4,0 ),COLOR00CC00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLOR00DD00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2,0 ),COLOR00EE00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,0,0 ),COLOR00FF00;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8,0) ,COLOR000066;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLOR000088;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,COLOR0000AA;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLOR0000BB;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLOR0000CC;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLOR0000DD;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLOR0000EE;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLOR0000FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0,0) ,COLOR0000FF;
{通道}
CC:=WMA(C,3); HH:=HHV(H,3); LL:=LLV(L,3);
ZC:=(2*CC+HH+LL)/4;
WM3:WMA(ZC,3),COLORFF9900;
PARTLINE(WM3 ,(WM3>REF(WM3,1))-1,rgb(0,150,255),1,rgb(255,150,0) ),LINETHICK2,LAYER0;
MID : WMA(ZC,18),COLOR00ffFF,DOTLINE;
UPPER: MID + 2*STD(ZC,18),COLOR0077FF;
LOWER: MID - 2*STD(ZC,18),COLORFF9900;
FILLRGN(UPPER,MID,UPPER>MID,RGB(60,0,60)),LAYER7;
FILLRGN(LOWER,MID,LOWER<MID,RGB(20,20,20)),LAYER7;
{ZIG买卖}
级买1:=ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)<=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)<=REF(ZIG(3,10),3);
级卖1:=ZIG(3,10)<REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)>=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)>=REF(ZIG(3,10),3);
级买2:=ZIG(3,20)>REF(ZIG(3,20),1) AND REF(ZIG(3,20),1)<=REF(ZIG(3,20),2) AND REF(ZIG(3,20),2)<=REF(ZIG(3,20),3);
级卖2:=ZIG(3,20)<REF(ZIG(3,20),1) AND REF(ZIG(3,20),1)>=REF(ZIG(3,20),2) AND REF(ZIG(3,20),2)>=REF(ZIG(3,20),3);
级买3:=ZIG(3,30)>REF(ZIG(3,30),1) AND REF(ZIG(3,30),1)<=REF(ZIG(3,30),2) AND REF(ZIG(3,30),2)<=REF(ZIG(3,30),3);
级卖3:=ZIG(3,30)<REF(ZIG(3,30),1) AND REF(ZIG(3,30),1)>=REF(ZIG(3,30),2) AND REF(ZIG(3,30),2)>=REF(ZIG(3,30),3);
级买4:=ZIG(3,55)>REF(ZIG(3,55),1) AND REF(ZIG(3,55),1)<=REF(ZIG(3,55),2) AND REF(ZIG(3,55),2)<=REF(ZIG(3,55),3);
级卖4:=ZIG(3,55)<REF(ZIG(3,55),1) AND REF(ZIG(3,55),1)>=REF(ZIG(3,55),2) AND REF(ZIG(3,55),2)>=REF(ZIG(3,55),3);
级买5:=ZIG(3,79)>REF(ZIG(3,79),1) AND REF(ZIG(3,79),1)<=REF(ZIG(3,79),2) AND REF(ZIG(3,79),2)<=REF(ZIG(3,79),3);
级卖5:=ZIG(3,79)<REF(ZIG(3,79),1) AND REF(ZIG(3,79),1)>=REF(ZIG(3,79),2) AND REF(ZIG(3,79),2)>=REF(ZIG(3,79),3);
买:=(级买1+级买2+级买3+级买4+级买5);
卖:=(级卖1+级卖2+级卖3+级卖4+级卖5);
DRAWTEXT(买>=2,L-0.12,''+NUMTOSTRN(买,0)+'级买'),COLOR00FFFF,LINETHICK3,ALIGN1,LAYER0;
DRAWTEXT(买>=2,L-0.03,'★'),COLOR0000FF,LINETHICK3,ALIGN1,LAYER0;
DRAWTEXT(卖>=2,H+0.2,''+NUMTOSTRN(卖,0)+'级卖'),COLOR00FFFF,LINETHICK3,ALIGN1,LAYER0;
DRAWTEXT(卖>=2,H+0.12,'★'),COLOR00FF00,LINETHICK3,ALIGN1,LAYER0;
{股价趋势:}
Z10:ZIG(3,ZF),COLOR00FF00,LINETHICK2,LAYER3;
PARTLINE(Z10,Z10>REF(Z10,1),rgb(255,50,0) ),LINETHICK2,LAYER3;
持有:LAST(Z10>REF(Z10,1)),PRECIS0 ,LINETHICK0;
空仓:LAST(Z10<REF(Z10,1)),PRECIS0,LINETHICK0;
X:=BARSLAST(DISPSTATUS=1)+1;
JD:=HHvall(HHv(H,X))*1.06;
DRAWTEXT(barstatus=2 AND 持有>0,JD,'★升势【第'+NUMTOSTRN(持有,0)+'天】'),ALIGN2,Color00FFff,linethick4,LAYER0;
DRAWTEXT(barstatus=2 AND 空仓>0,JD,'★跌势【第'+NUMTOSTRN(空仓,0)+'天】'),ALIGN2,ColorFF00FF,linethick4,LAYER0;
Low1:=TROUGH(3,ZF ,1);
High1:=PEAK(3,ZF,1);
STICKLINE(BARSTATUS=2 AND 持有>0,Low1,Low1,150,1),COLOR00FF00,LINETHICK2,LAYER4;
STICKLINE(BARSTATUS=2 AND 持有>0,Low1*1.03,Low1*(1+ZF/100),25,0),COLOR0099DD,LINETHICK1,LAYER6;
STICKLINE(BARSTATUS=2 AND 持有>0,Low1,Low1*1.03,25,0),COLORFF9900,LINETHICK1,LAYER5;
STICKLINE(BARSTATUS=2 AND 空仓>0,High1,High1*(1-ZF/100),25,0),COLORff9900,LINETHICK1,LAYER5;
STICKLINE(BARSTATUS=2 AND 空仓>0,High1*(1-ZF/100),High1*(1-ZF/100),25,0),COLOR00ffFF,LINETHICK1,LAYER5;
STICKLINE(BARSTATUS=2 AND 空仓>0,High1,High1,150,1),COLOR0099ff,LINETHICK2,LAYER4;
DRAWTEXT(barstatus=2 AND 空仓>0,High1,' 【'+NUMTOSTRN(High1,2)+'元】'),ALIGN1,Color00FFFF,linethick1,LAYER0;
DRAWTEXT(barstatus=2 AND 持有>0,Low1,' 【'+NUMTOSTRN(Low1,2)+'元】'),ALIGN1,Color00FFFF,linethick1,LAYER0;
DRAWTEXTABS(3,10,IFS((持有>0),'【ZIG(3,'+ZF+')】低点转折上涨小于【'+ZF+'%='+NUMTOSTRN(Low1*(1+ZF/100),2)+'元】时如果【C='+C+'元】低于【转折价='+Low1+'元】趋势将向下飘逸','')),LINETHICK2,Color00FFFF;
DRAWTEXTABS(3,10,IFS((空仓>0),'【ZIG(3,'+ZF+')】高点转折下跌小于【'+ZF+'%='+NUMTOSTRN(High1*(1-ZF/100),2)+'元】时如果【C='+C+'元】高于【转折价='+High1+'元】趋势将向上飘逸','')),LINETHICK2,Color9999FF;
{RSI.KDJ}
var6:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(var6,3,1);
D:=SMA(K,3,1);
J:=(3*K-2*D);
LC:=REF(C,1);
RSI:((SMA(MAX((C - LC),0),3,1) / SMA(ABS((C - LC)),3,1)) * 100),LINETHICK0;
DRAWTEXT(DISPSTATUS=2,JD*0.98,'【RSI:'+NUMTOSTRN(RSI,0)+'】'),COLOR00FFFF,LINETHICK2,ALIGN2;
DRAWTEXT(DISPSTATUS=2,JD*0.965,'【J:'+NUMTOSTRN(J,1)+'】'),COLOR00FF00,LINETHICK2,ALIGN2;
{高抛低吸}
SJ:=WMA(((2*C+H+L)/4-LLV(L,5))/(HHV(H,5)-LLV(L,5))*100,2);
ZJ:=WMA(0.618*REF(SJ,1)+0.382*SJ,2);
DRAWTEXT(CROSS(SJ,ZJ) AND SJ<30,L,'←吸'),COLOR00FFFF,LAYER3;
DRAWTEXT(CROSS(ZJ,SJ) AND SJ>70,H,'←抛'),COLOR00FFFF,LAYER3;