分享

【】【】【】【】【】立体K线(主图指标)

 游龙mg 2011-09-28

指标名称:立体K线
指标类型:主图
指标参数:无
公式使用平台:飞狐
公式用法说明:无
指标公式源码:

wx:=MA(CLOSE,0);
M1:MA(CLOSE,5);
M2:MA(CLOSE,10);
M3:MA(CLOSE,21);
M4:MA(CLOSE,34);
M5:MA(CLOSE,55);
M6:MA(CLOSE,144);{技术指标}

STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,9,0 ),COLOR009900;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),COLOR00cc00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2.4,0 ),COLOR33ff00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1.1,0 ),COLOR66ff00;

STICKLINE(CLOSE>OPEN,CLOSE,OPEN,9,0 ),COLOR000099;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6 ,0 ),COLOR0000cc;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.4 ,0 ),COLOR0000ff;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1.1 ,0 ),COLOR0033ff;

STICKLINE(CLOSE>OPEN,OPEN,LOW,0.5,0 ),COLOR9933ff;
STICKLINE(CLOSE>OPEN,CLOSE,HIGH,0.5 ,0 ),COLOR9933ff;
STICKLINE(OPEN>=CLOSE,CLOSE,LOW,0.5 ,0 ),COLOR66cc33;
STICKLINE(OPEN>=CLOSE,OPEN,HIGH,0.5 ,0 ),COLOR66cc33;

A0:=NUMTOSTR(MA(VOL,5),2);{技术指标}
B0:=NUMTOSTR(MA(VOL/CAPITAL*100,5)*5,2);
TYP:=(HIGH+LOW+CLOSE)/3;
LL:=LLV(LOW,12);
HH:=HHV(HIGH,12);
WR:=TYP+(TYP-LL);
WS:=TYP-(HH-TYP);
WA:=NUMTOSTR(WR,2);
WB:=NUMTOSTR(WS,2);

{送给大家两个指标量价共振多空布林线,最后收藏起来吖}
DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,STKNAME+'\n'+STKLABEL+'\n'+BLKNAME)align4,COLORGREEN;

A1:=BARSLAST(REF(CROSS("macd.diff","macd.dea"),1));
B1:=REF(CLOSE,A1+1)>CLOSE and REF("macd.diff",A1+1)<"macd.diff" and CROSS("macd.diff","macd.dea");

A2:=BARSLAST(REF(CROSS("kdj.k","kdj.d"),1));
B2:=REF(CLOSE,A2+1)>CLOSE and REF("kdj.k",A2+1)<"kdj.k" and CROSS("kdj.k","kdj.d");

A3:=BARSLAST(REF(CROSS("RSI.RSI1","RSI.RSI2"),1));
B3:=REF(CLOSE,A3+1)>CLOSE and REF("RSI.RSI1",A3+1)<"RSI.RSI1" and CROSS("RSI.RSI1","RSI.RSI2");

FIL1:=FILTER(B1>0,7) or FILTER(B2>0,7) or FILTER(B3>0,7);
DRAWTEXT(FIL1,LOW-0.02,'K线底背'),COLORRED;

C1:=BARSLAST(REF(CROSS("macd.dea","macd.diff"),1));
D1:=REF(CLOSE,C1+1)<CLOSE and REF("macd.diff",C1+1)>"macd.diff" and CROSS("macd.dea","macd.diff");

C2:=BARSLAST(REF(CROSS("kdj.d","kdj.k"),1));
D2:=REF(CLOSE,C2+1)<CLOSE and REF("kdj.k",C2+1)>"kdj.k" and CROSS("kdj.d","kdj.k");

C3:=BARSLAST(REF(CROSS("RSI.RSI2","RSI.RSI1"),1));
D3:=REF(CLOSE,C3+1)<CLOSE and REF("RSI.RSI1",C3+1)>"RSI.RSI1" and CROSS("RSI.RSI2","RSI.RSI1");

FIL2:=FILTER(D1>0,7) OR FILTER(D2>0,7) OR FILTER(D3>0,7);
DRAWTEXT(FIL2,HIGH+0.1,'K线顶背'),COLORBLUE;
{解盘模块}
股道卖出价预测:=(CLOSE*2.5/100+CLOSE);
股道买入价预测:=C-CLOSE*2.5/100;
EXPLAIN(c>0,'筹码解盘:') colorwhite;
EXPLAINEX(COST(50),'市场平均成本:',COST(50),2,0),COLORYELLOW;
EXPLAINEX(COST(4),'主力平均成本:',COST(4),2,0),COLORRED;
EXPLAINEX(COST(30),'控盘平均成本:',COST(30),2,0),COLORRED;
EXPLAINEX(COST(75),'拉升平均成本:',COST(75),2,0),COLORYELLOW;
EXPLAINEX(COST(95),'顶部平均成本:',COST(95),2,0),COLORYELLOW;
EXPLAINEX(COST(0.05),'底部平均成本:',COST(0.05),2,0),COLORYELLOW;
EXPLAINEX(股道卖出价预测,'股道卖出价预测:',股道卖出价预测,2,0),COLOR0099FF;
EXPLAINEX(股道买入价预测,'股道买入价预测:',股道买入价预测,2,0),COLOR0099FF;
EXPLAINEX(1,'获利盘比例=',WINNER(C)*100,2,0),COLORRED;
EXPLAINEX(1,'套牢盘比例=',100-WINNER(C)*100,2,1),COLORCYAN;
MA1:MA(CLOSE,5);
MA2:MA(CLOSE,10);
MA3:MA(CLOSE,20);
MA4:MA(CLOSE,60);
a:=MA(WINNER(CLOSE),9)*100;
b:=CROSS(a,1.8);
d:=b>0;
DRAWICON(d,LOW,1);
DRAWTEXT(d,LOw,'见底了! ')coloryellow;
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
e:=CROSS(83,RSI);
DRAWICON(e,high,2);
DRAWTEXT(e,HIGH,'准备清仓逃顶!') COLORff9966;

立体K线(主图指标)
改通达信用如下:
WX:=MA(CLOSE,0);
M1:MA(CLOSE,5);
M2:MA(CLOSE,10);
M3:MA(CLOSE,21);
M4:MA(CLOSE,34);
M5:MA(CLOSE,55);
M6:MA(CLOSE,144);{技术指标}
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLOR009900;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2,0 ),COLOR00CC00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1.4,0 ),COLOR33FF00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,0.5,0 ),COLOR66FF00;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0 ),COLOR000099;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0 ),COLOR0000CC;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1.4 ,0 ),COLOR0000FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0,0 ),COLOR0033FF;
STICKLINE(CLOSE>OPEN,OPEN,LOW,0,0 ),COLOR9933FF;
STICKLINE(CLOSE>OPEN,CLOSE,HIGH,0,0 ),COLOR9933FF;
STICKLINE(OPEN>=CLOSE,CLOSE,LOW,0,0 ),COLOR66CC33;
STICKLINE(OPEN>=CLOSE,OPEN,HIGH,0,0 ),COLOR66CC33;
A0:=MA(VOL,5);{技术指标}
B0:=MA(VOL/CAPITAL*100,5)*5;
TYP:=(HIGH+LOW+CLOSE)/3;
LL:=LLV(LOW,12);
HH:=HHV(HIGH,12);
WR:=TYP+(TYP-LL);
WS:=TYP-(HH-TYP);
WA:=WR;
WB:=WS;
{DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,STKNAME+'\N'+STKLABEL+'\N'+BLKNAME)ALIGN4,COLORGREEN;}
A1:=BARSLAST(REF(CROSS("MACD.DIF","MACD.DEA"),1));
B1:=REF(CLOSE,A1+1)>CLOSE AND REF("MACD.DIF",A1+1)<"MACD.DIF" AND CROSS("MACD.DIF","MACD.DEA");
A2:=BARSLAST(REF(CROSS("KDJ.K","KDJ.D"),1));
B2:=REF(CLOSE,A2+1)>CLOSE AND REF("KDJ.K",A2+1)<"KDJ.K" AND CROSS("KDJ.K","KDJ.D");
A3:=BARSLAST(REF(CROSS("RSI.RSI1","RSI.RSI2"),1));
B3:=REF(CLOSE,A3+1)>CLOSE AND REF("RSI.RSI1",A3+1)<"RSI.RSI1" AND CROSS("RSI.RSI1","RSI.RSI2");
FIL1:=FILTER(B1>0,7) OR FILTER(B2>0,7) OR FILTER(B3>0,7);
DRAWTEXT(FIL1,LOW-0.02,'K线底背'),COLORRED;
C1:=BARSLAST(REF(CROSS("MACD.DEA","MACD.DIF"),1));
D1:=REF(CLOSE,C1+1)<CLOSE AND REF("MACD.DIF",C1+1)>"MACD.DIF" AND CROSS("MACD.DEA","MACD.DIF");
C2:=BARSLAST(REF(CROSS("KDJ.D","KDJ.K"),1));
D2:=REF(CLOSE,C2+1)<CLOSE AND REF("KDJ.K",C2+1)>"KDJ.K" AND CROSS("KDJ.D","KDJ.K");
C3:=BARSLAST(REF(CROSS("RSI.RSI2","RSI.RSI1"),1));
D3:=REF(CLOSE,C3+1)<CLOSE AND REF("RSI.RSI1",C3+1)>"RSI.RSI1" AND CROSS("RSI.RSI2","RSI.RSI1");
FIL2:=FILTER(D1>0,7) OR FILTER(D2>0,7) OR FILTER(D3>0,7);
DRAWTEXT(FIL2,HIGH+0.1,'K线顶背'),COLORBLUE;
{解盘模块}
股道卖出价预测:=(CLOSE*2.5/100+CLOSE);
股道买入价预测:=C-CLOSE*2.5/100;
{EXPLAIN(C>0,'筹码解盘:') COLORWHITE;
EXPLAINEX(COST(50),'市场平均成本:',COST(50),2,0),COLORYELLOW;
EXPLAINEX(COST(4),'主力平均成本:',COST(4),2,0),COLORRED;
EXPLAINEX(COST(30),'控盘平均成本:',COST(30),2,0),COLORRED;
EXPLAINEX(COST(75),'拉升平均成本:',COST(75),2,0),COLORYELLOW;
EXPLAINEX(COST(95),'顶部平均成本:',COST(95),2,0),COLORYELLOW;
EXPLAINEX(COST(0.05),'底部平均成本:',COST(0.05),2,0),COLORYELLOW;
EXPLAINEX(股道卖出价预测,'股道卖出价预测:',股道卖出价预测,2,0),COLOR0099FF;
EXPLAINEX(股道买入价预测,'股道买入价预测:',股道买入价预测,2,0),COLOR0099FF;
EXPLAINEX(1,'获利盘比例=',WINNER(C)*100,2,0),COLORRED;
EXPLAINEX(1,'套牢盘比例=',100-WINNER(C)*100,2,1),COLORCYAN;}
A:=MA(WINNER(CLOSE),9)*100;
B:=CROSS(A,1.8);
D:=B>0;
DRAWICON(D,LOW,1);
DRAWTEXT(D,LOW,'见底了! ')COLORYELLOW;
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
E:=CROSS(83,RSI);
DRAWICON(E,HIGH,2);
DRAWTEXT(E,HIGH,'准备清仓逃顶!') COLORFF9966;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0,0,0,HYBLOCK),COLOR0099FF;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.1,0,0,'卖出价:'),COLOR0099FF;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.15,0,0,(CLOSE*2.5/100+CLOSE)),COLOR0099FF;

DRAWTEXT_FIX(CURRBARSCOUNT=1,0.2,0,0,'买入价:'),COLOR0099FF;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.25,0,0,C-CLOSE*2.5/100),COLOR0099FF;


    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约