发新话题
打印

多空博弈

多空博弈

复制内容到剪贴板
代码:
Var1:=DYNAINFO(4)=O AND DYNAINFO(5)=H AND DYNAINFO(6)=L AND DYNAINFO(7)=C;
Var2:=(1*OPEN+3*HIGH+3*LOW+1*CLOSE)/8;
ZIG趋势线:ZIG(MA(Var2,3),10),COLOR0000FF,LINETHICK0;
FILLRGN(C>0,ZIG趋势线,HHV(ZIG趋势线,248)),COLORFF9A9A;
FILLRGN(ZIG趋势线>REF(ZIG趋势线,1),ZIG趋势线,LLV(H,0)),COLOR1A1A3A;
FILLRGN(ZIG趋势线<=REF(ZIG趋势线,1),ZIG趋势线,LLV(L,0)),COLOR1A3A3A;
上轨:HHV(MA(H,3),21)*1.025,COLOR0000AA,LINETHICK1;
中轨:MA((O+C)*0.5,3),COLOR00AACC,LINETHICK0;
下轨:LLV(MA(L,3),21)*0.975,COLOR00AA00,LINETHICK1;
多头线:EMA(CLOSE,3),COLOR0000FF,LINETHICK2;
多空均衡线:EMA(CLOSE,8),COLOR0099FF,LINETHICK0;
空头线:EMA(CLOSE,13),COLOR00FFFF,LINETHICK2;
DRAWTEXT(Var1 AND FILTER(COUNT(CROSS(多空均衡线,多头线),3)>=1 AND COUNT(CROSS(空头线,多空均衡线),3)>=1,5),多空均衡线,'↓要跌'),COLOR00FFAA,SHIFT2;
DRAWTEXT(Var1 AND FILTER(COUNT(CROSS(多头线,多空均衡线),3)>=1 AND COUNT(CROSS(多空均衡线,空头线),3)>=1,5),多空均衡线,'↑要涨'),COLORAA00FF,SHIFT2;
RSI1:=SMA(MAX(CLOSE-REF(CLOSE,1),0),5,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),5,1)*100;
RSI2:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;
DRAWICON(Var1 AND RSI1>=80,多空均衡线+0.15,5),ALIGN0;
DRAWTEXT(Var1 AND RSI1>=80,多空均衡线+0.15,'减仓'),COLOR00FF99,SHIFT2;
DRAWICON(Var1 AND RSI1<=20,多空均衡线-0.15,4),ALIGN0;
DRAWTEXT(Var1 AND RSI1<=20,多空均衡线-0.15,'补仓'),COLORFF0099,SHIFT2;
DRAWICON(Var1 AND REF(RSI1,1)>=80 AND RSI1<80,多空均衡线+0.30,7),ALIGN0;
DRAWTEXT(Var1 AND REF(RSI1,1)>=80 AND RSI1<80,多空均衡线+0.30,'空仓'),COLOR99FF00,SHIFT2;
DRAWICON(Var1 AND REF(RSI1,1)<=20 AND RSI1>20,多空均衡线-0.30,6),ALIGN0;
DRAWTEXT(Var1 AND REF(RSI1,1)<=20 AND RSI1>20,多空均衡线-0.30,'满仓'),COLOR99000FF,SHIFT2;
DRAWTEXT(Var1 AND CROSS(REF(RSI1,1),RSI1) AND RSI1>=75,多空均衡线+0.45,'逃顶!'),COLOR00FF00,SHIFT2;
DRAWTEXT(Var1 AND CROSS(RSI1,REF(RSI1,1)) AND RSI1<=25,多空均衡线-0.45,'炒底!'),COLORFF00FF,SHIFT2;
RSI3:=SMA(MAX(Var2-REF(Var2,1),0),5,1)/SMA(ABS(Var2-REF(Var2,1)),5,1)*100;
RSI4:=SMA(MAX(Var2-REF(Var2,1),0),13,1)/SMA(ABS(Var2-REF(Var2,1)),13,1)*100;
最大强值:=MA(MA(MAX(RSI3-RSI4,0),5),3);
最小弱值:=MA(MA(MIN(RSI3-RSI4,0),5),3);
试买:=IF(最大强值=REF(最大强值,1) AND REF(最大强值,1)=0,1,0),COLORAA00FF,linethick0;
追买:=IF(最大强值>REF(最大强值,1) AND REF(最大强值,1)=0,1,0),COLOR0000FF,linethick0;
止盈:=IF(最小弱值=REF(最小弱值,1) AND REF(最小弱值,1)=0,1,0),COLOR00FFFF,linethick0;
止损:=IF(最小弱值<REF(最小弱值,1) AND REF(最小弱值,1)=0,1,0),COLOR00FFAA,linethick0;
买入:IF(试买 OR 追买,1,0),COLOR0000FF,linethick0;
卖出:IF(止盈 OR 止损,1,0),COLOR00FFFF,linethick0;
DRAWTEXT(Var1 AND 试买,多空均衡线-0.30,'试买'),COLORAA00FF,SHIFT8;
DRAWTEXT(Var1 AND 追买,多空均衡线-0.15,'追买'),COLOR0000FF,SHIFT8;
DRAWTEXT(Var1 AND 止盈,多空均衡线+0.30,'止盈'),COLOR00FFFF,SHIFT8;
DRAWTEXT(Var1 AND 止损,多空均衡线+0.15,'止损'),COLOR00FFAA,SHIFT8;
DRAWTEXT(Var1 AND 买入,多空均衡线-0.45,'买入'),COLOR0000FF,SHIFT8;
DRAWTEXT(Var1 AND 卖出,多空均衡线+0.45,'卖出'),COLOR00FFFF,SHIFT8;
DIFF:=(EMA(CLOSE,5)-EMA(CLOSE,13))*100;
DEA:=EMA(DIFF,5);
MACD:=(DIFF-DEA)*2;
ROC1:=(CLOSE-REF(CLOSE,5))/REF(CLOSE,5)*100;
ROC2:=(CLOSE-REF(CLOSE,13))/REF(CLOSE,13)*100;
BIAS1:=(CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*100;
BIAS2:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;  
Var5:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100;
Var6:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;
RSV:=(5*Var5+3*Var6)/8;
K:=SMA(RSV,15,1);
D:=SMA(K,15,1);
KDJ:=3*K-2*D;
Var7:=IF(KDJ>=80 AND RSI1>=75  AND RSI3>=70 AND MACD>0 AND ROC1>0 AND BIAS1>0,1,0);
Var8:=IF(KDJ<=20 AND RSI1<=25 AND RSI3<=30 AND MACD<0 AND ROC1<0 AND BIAS1<0,1,0);
DRAWTEXT(Var1 AND Var7,多空均衡线,'共振顶!'),COLOR00FFAA,SHIFT8;
DRAWTEXT(Var1 AND Var8,多空均衡线,'共振底!'),COLORAA00FF,SHIFT8;

TOP

谢谢,感觉此公式好.

TOP

多空博弈-修改一处错误

复制内容到剪贴板
代码:
Var1:=DYNAINFO(4)=O AND DYNAINFO(5)=H AND DYNAINFO(6)=L AND DYNAINFO(7)=C;
Var2:=(1*OPEN+3*HIGH+3*LOW+1*CLOSE)/8;
ZIG趋势线:ZIG(MA(Var2,3),10),COLOR0000FF,LINETHICK0;
FILLRGN(C>0,ZIG趋势线,HHV(ZIG趋势线,248)),COLORFF9A9A;
FILLRGN(ZIG趋势线>REF(ZIG趋势线,1),ZIG趋势线,LLV(H,0)),COLOR1A1A3A;
FILLRGN(ZIG趋势线<=REF(ZIG趋势线,1),ZIG趋势线,LLV(L,0)),COLOR1A3A3A;
上轨:HHV(MA(H,3),21)*1.025,COLOR0000AA,LINETHICK1;
中轨:MA((O+C)*0.5,3),COLOR00AACC,LINETHICK0;
下轨:LLV(MA(L,3),21)*0.975,COLOR00AA00,LINETHICK1;
多头线:EMA(CLOSE,3),COLOR0000FF,LINETHICK2;
多空均衡线:EMA(CLOSE,8),COLOR0099FF,LINETHICK0;
空头线:EMA(CLOSE,13),COLOR00FFFF,LINETHICK2;
DRAWTEXT(Var1 AND FILTER(COUNT(CROSS(多空均衡线,多头线),3)>=1 AND COUNT(CROSS(空头线,多空均衡线),3)>=1,5),多空均衡线,'↓要跌'),COLOR00FFAA,SHIFT2;
DRAWTEXT(Var1 AND FILTER(COUNT(CROSS(多头线,多空均衡线),3)>=1 AND COUNT(CROSS(多空均衡线,空头线),3)>=1,5),多空均衡线,'↑要涨'),COLORAA00FF,SHIFT2;
RSI1:=SMA(MAX(CLOSE-REF(CLOSE,1),0),5,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),5,1)*100;
RSI2:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;
DRAWICON(Var1 AND RSI1>=80,多空均衡线+0.15,5),ALIGN0;
DRAWTEXT(Var1 AND RSI1>=80,多空均衡线+0.15,'减仓'),COLOR00FF99,SHIFT2;
DRAWICON(Var1 AND RSI1<=20,多空均衡线-0.15,4),ALIGN0;
DRAWTEXT(Var1 AND RSI1<=20,多空均衡线-0.15,'补仓'),COLORFF0099,SHIFT2;
DRAWICON(Var1 AND REF(RSI1,1)>=80 AND RSI1<80,多空均衡线+0.30,7),ALIGN0;
DRAWTEXT(Var1 AND REF(RSI1,1)>=80 AND RSI1<80,多空均衡线+0.30,'空仓'),COLOR99FF00,SHIFT2;
DRAWICON(Var1 AND REF(RSI1,1)<=20 AND RSI1>20,多空均衡线-0.30,6),ALIGN0;
DRAWTEXT(Var1 AND REF(RSI1,1)<=20 AND RSI1>20,多空均衡线-0.30,'满仓'),COLOR99000FF,SHIFT2;
DRAWTEXT(Var1 AND CROSS(REF(RSI1,1),RSI1) AND RSI1>=75,多空均衡线+0.45,'逃顶!'),COLOR00FF00,SHIFT2;
DRAWTEXT(Var1 AND CROSS(RSI1,REF(RSI1,1)) AND RSI1<=25,多空均衡线-0.45,'炒底!'),COLORFF00FF,SHIFT2;
RSI3:=SMA(MAX(Var2-REF(Var2,1),0),5,1)/SMA(ABS(Var2-REF(Var2,1)),5,1)*100;
RSI4:=SMA(MAX(Var2-REF(Var2,1),0),13,1)/SMA(ABS(Var2-REF(Var2,1)),13,1)*100;
最大强值:=MA(MA(MAX(RSI3-RSI4,0),5),3);
最小弱值:=MA(MA(MIN(RSI3-RSI4,0),5),3);
试买:=IF(最大强值=REF(最大强值,1) AND REF(最大强值,1)=0,1,0),COLORAA00FF,linethick0;
追买:=IF(最大强值>REF(最大强值,1) AND REF(最大强值,1)=0,1,0),COLOR0000FF,linethick0;
止盈:=IF(最小弱值=REF(最小弱值,1) AND REF(最小弱值,1)=0,1,0),COLOR00FFFF,linethick0;
止损:=IF(最小弱值<REF(最小弱值,1) AND REF(最小弱值,1)=0,1,0),COLOR00FFAA,linethick0;
买入:IF(试买 OR 追买,1,0),COLOR0000FF,linethick0;
卖出:IF(止盈 OR 止损,1,0),COLOR00FFFF,linethick0;
DRAWTEXT(Var1 AND 试买,多空均衡线-0.30,'试买'),COLORAA00FF,SHIFT8;
DRAWTEXT(Var1 AND 追买,多空均衡线-0.15,'追买'),COLOR0000FF,SHIFT8;
DRAWTEXT(Var1 AND 止盈,多空均衡线+0.30,'止盈'),COLOR00FFFF,SHIFT8;
DRAWTEXT(Var1 AND 止损,多空均衡线+0.15,'止损'),COLOR00FFAA,SHIFT8;
DRAWTEXT(Var1 AND 买入,多空均衡线-0.45,'买入'),COLOR0000FF,SHIFT8;
DRAWTEXT(Var1 AND 卖出,多空均衡线+0.45,'卖出'),COLOR00FFFF,SHIFT8;
DIFF:=(EMA(CLOSE,5)-EMA(CLOSE,13))*100;
DEA:=EMA(DIFF,5);
MACD:=(DIFF-DEA)*2;
ROC1:=(CLOSE-REF(CLOSE,5))/REF(CLOSE,5)*100;
ROC2:=(CLOSE-REF(CLOSE,13))/REF(CLOSE,13)*100;
BIAS1:=(CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*100;
BIAS2:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;  
Var5:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100;
Var6:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;
RSV:=(5*Var5+3*Var6)/8;
K:=SMA(RSV,5,1);
D:=SMA(K,3,1);
KDJ:=3*K-2*D;
Var7:=IF(KDJ>=80 AND RSI1>=75  AND RSI3>=70 AND MACD>0 AND ROC1>0 AND BIAS1>0,1,0);
Var8:=IF(KDJ<=20 AND RSI1<=25 AND RSI3<=30 AND MACD<0 AND ROC1<0 AND BIAS1<0,1,0);
DRAWTEXT(Var1 AND Var7,多空均衡线,'共振顶!'),COLOR00FFAA,SHIFT8;
DRAWTEXT(Var1 AND Var8,多空均衡线,'共振底!'),COLORAA00FF,SHIFT8;

TOP

i see . for 主图?

TOP

谢谢!

TOP

多空博弈(主图)----修改几处错误

Var1:=DYNAINFO(4)=O AND DYNAINFO(5)=H AND DYNAINFO(6)=L AND DYNAINFO(7)=C;
Var2:=(1*OPEN+3*HIGH+3*LOW+1*CLOSE)/8;
ZIG趋势线:ZIG(MA(Var2,3),10),COLOR0000FF,LINETHICK0;
FILLRGN(C>0,ZIG趋势线,HHV(ZIG趋势线,248)),COLORFF9A9A;
FILLRGN(ZIG趋势线>REF(ZIG趋势线,1),ZIG趋势线,LLV(H,0)),COLOR1A1A3A;
FILLRGN(ZIG趋势线<=REF(ZIG趋势线,1),ZIG趋势线,LLV(L,0)),COLOR1A3A3A;
STICKLINE(C>O,O,L,1,0),COLOR1199ff;
STICKLINE(C>O,C,H,2,0),COLOR9F006A;
STICKLINE(C>O,O,L,2,0),COLOR6A009F;
STICKLINE(C<=O,O,H,2,1),COLOR9F003C;
STICKLINE(C<=O,C,L,2,1),COLOR3A9F00;
STICKLINE(O>=C,C,O,8,0),COLORAAAAAA;
STICKLINE(O>=C,C,O,5,0),COLORCCCCCC;
STICKLINE(O>=C,C,O,3,0),COLORDDDDDD;
STICKLINE(O>=C,C,O,1,0),COLORFFFFFF;
STICKLINE(C>O,C,O,8,0),COLOR5A5ACC;
STICKLINE(C>O,C,O,5,0),COLOR6C6CDD;
STICKLINE(C>O,C,O,3,0),COLOR7D7DEE;
STICKLINE(C>O,C,O,1,0),COLOR9F9FFF;
上轨:HHV(MA(H,3),21)*1.025,COLOR0000AA,LINETHICK1;
中轨:MA((O+C)*0.5,3),COLOR00AACC,LINETHICK0;
下轨:LLV(MA(L,3),21)*0.975,COLOR00AA00,LINETHICK1;
多头线:EMA(CLOSE,3),COLOR0000FF,LINETHICK2;
多空均衡线:EMA(CLOSE,8),COLOR0099FF,LINETHICK0;
空头线:EMA(CLOSE,13),COLOR00FFFF,LINETHICK2;
DRAWTEXT(Var1 AND FILTER(COUNT(CROSS(多空均衡线,多头线),3)>=1 AND COUNT(CROSS(空头线,多空均衡线),3)>=1,5),多空均衡线,'↓要跌'),COLOR00FFAA,SHIFT2;
DRAWTEXT(Var1 AND FILTER(COUNT(CROSS(多头线,多空均衡线),3)>=1 AND COUNT(CROSS(多空均衡线,空头线),3)>=1,5),多空均衡线,'↑要涨'),COLORAA00FF,SHIFT2;
RSI1:=SMA(MAX(CLOSE-REF(CLOSE,1),0),5,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),5,1)*100;
RSI2:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;
DRAWICON(Var1 AND RSI1>=80,多空均衡线+0.15,5),ALIGN0;
DRAWTEXT(Var1 AND RSI1>=80,多空均衡线+0.15,'减仓'),COLOR00FF99,SHIFT2;
DRAWICON(Var1 AND RSI1<=20,多空均衡线-0.15,4),ALIGN0;
DRAWTEXT(Var1 AND RSI1<=20,多空均衡线-0.15,'补仓'),COLORFF0099,SHIFT2;
DRAWICON(Var1 AND REF(RSI1,1)>=80 AND RSI1<80,多空均衡线+0.30,7),ALIGN0;
DRAWTEXT(Var1 AND REF(RSI1,1)>=80 AND RSI1<80,多空均衡线+0.30,'空仓'),COLOR99FF00,SHIFT2;
DRAWICON(Var1 AND REF(RSI1,1)<=20 AND RSI1>20,多空均衡线-0.30,6),ALIGN0;
DRAWTEXT(Var1 AND REF(RSI1,1)<=20 AND RSI1>20,多空均衡线-0.30,'满仓'),COLOR99000FF,SHIFT2;
DRAWTEXT(Var1 AND CROSS(REF(RSI1,1),RSI1) AND RSI1>=75,多空均衡线+0.45,'逃顶!'),COLOR00FF00,SHIFT2;
DRAWTEXT(Var1 AND CROSS(RSI1,REF(RSI1,1)) AND RSI1<=25,多空均衡线-0.45,'炒底!'),COLORFF00FF,SHIFT2;
RSI3:=SMA(MAX(Var2-REF(Var2,1),0),5,1)/SMA(ABS(Var2-REF(Var2,1)),5,1)*100;
RSI4:=SMA(MAX(Var2-REF(Var2,1),0),13,1)/SMA(ABS(Var2-REF(Var2,1)),13,1)*100;
最大强值:=MA(MA(MAX(RSI3-RSI4,0),5),3);
最小弱值:=MA(MA(MIN(RSI3-RSI4,0),5),3);
试买:=IF(最大强值=REF(最大强值,1) AND REF(最大强值,1)=0,1,0),COLORAA00FF,linethick0;
追买:=IF(最大强值>REF(最大强值,1) AND REF(最大强值,1)=0,1,0),COLOR0000FF,linethick0;
止盈:=IF(最小弱值=REF(最小弱值,1) AND REF(最小弱值,1)=0,1,0),COLOR00FFFF,linethick0;
止损:=IF(最小弱值<REF(最小弱值,1) AND REF(最小弱值,1)=0,1,0),COLOR00FFAA,linethick0;
买入:IF(试买 OR 追买,1,0),COLOR0000FF,linethick0;
卖出:IF(止盈 OR 止损,1,0),COLOR00FFFF,linethick0;
DRAWTEXT(Var1 AND 试买,多空均衡线-0.30,'试买'),COLORAA00FF,SHIFT8;
DRAWTEXT(Var1 AND 追买,多空均衡线-0.15,'追买'),COLOR0000FF,SHIFT8;
DRAWTEXT(Var1 AND 止盈,多空均衡线+0.30,'止盈'),COLOR00FFFF,SHIFT8;
DRAWTEXT(Var1 AND 止损,多空均衡线+0.15,'止损'),COLOR00FFAA,SHIFT8;
DRAWTEXT(Var1 AND 买入,多空均衡线-0.45,'买入'),COLOR0000FF,SHIFT8;
DRAWTEXT(Var1 AND 卖出,多空均衡线+0.45,'卖出'),COLOR00FFFF,SHIFT8;
DIFF:=(EMA(CLOSE,5)-EMA(CLOSE,13))*100;
DEA:=EMA(DIFF,5);
MACD:=(DIFF-DEA)*2;
ROC1:=(CLOSE-REF(CLOSE,5))/REF(CLOSE,5)*100;
ROC2:=(CLOSE-REF(CLOSE,13))/REF(CLOSE,13)*100;
BIAS1:=(CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*100;
BIAS2:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;  
Var5:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100;
Var6:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;
RSV:=(5*Var5+3*Var6)/8;
K:=SMA(RSV,5,1);
D:=SMA(K,3,1);
KDJ:=3*K-2*D;
Var7:=IF(KDJ>=80 AND RSI1>=75  AND RSI3>=70 AND MACD>0 AND ROC1>0 AND BIAS1>0,1,0);
Var8:=IF(KDJ<=20 AND RSI1<=25 AND RSI3<=30 AND MACD<0 AND ROC1<0 AND BIAS1<0,1,0);
DRAWTEXT(Var1 AND Var7,多空均衡线,'共振顶!'),COLOR00FFAA,SHIFT8;
DRAWTEXT(Var1 AND Var8,多空均衡线,'共振底!'),COLORAA00FF,SHIFT8;


本公式说明:本公式不同于其他公式,必须有行情时对符合条件的参数,才显示文字提示,指导你操作。否则无任何显示。此外,本公式只是本人所有公式中一个简化了的公式,只是为了有兴趣的同行参考我编写公式的思路。如果有兴趣的同行需要公式更多的、符合条件的解盘说明,请与本人联系。
likangbao@hotmail.com/likangbao@163.net    陈桢

TOP

赚钱才是硬道理

附件: 您所在的用户组无法下载或查看附件

TOP

看图炒股,轻松赚钱

不错
附件: 您所在的用户组无法下载或查看附件

TOP

看图炒股,轻松赚钱

真不错,只是含有未来数据,不能作为实战使用

本贴由 清风斜阳 于 2005-1-20 23:28 最后编辑

附件: 您所在的用户组无法下载或查看附件

TOP

谢谢

TOP

只要付出辛苦的就要,顶~~~~~~~~~

TOP

发新话题