散户之家 » 公式分享 » [猫捉老鼠]主图解盘原码


2007-12-12 07:07 回头太难
[猫捉老鼠]主图解盘原码

[color=#9acd32]{猫捉老鼠}
[/color][size=1][color=#48d1cc]VAR1:=((收盘价 > 向前引用(收盘价,1)) AND (收盘价 > 向前引用(收盘价,2)));
VAR2:=((向前引用(VAR1,1) AND (收盘价 <= 向前引用(收盘价,1))) AND (收盘价 >= 向前引用(收盘价,2)));
VAR3:=((向前引用(VAR2,1) AND (收盘价 >= 向前引用(收盘价,1))) AND (收盘价 <= 向前引用(收盘价,2)));
VAR4:=((向前引用(VAR3,1) AND (收盘价 <= 向前引用(收盘价,1))) AND (收盘价 >= 向前引用(收盘价,2)));
VAR5:=((向前引用(VAR4,1) AND (收盘价 >= 向前引用(收盘价,1))) AND (收盘价 <= 向前引用(收盘价,2)));
VAR6:=((向前引用(VAR5,1) AND (收盘价 <= 向前引用(收盘价,1))) AND (收盘价 >= 向前引用(收盘价,2)));
VAR7:=((向前引用(VAR6,1) AND (收盘价 >= 向前引用(收盘价,1))) AND (收盘价 <= 向前引用(收盘价,2)));
VAR8:=((向前引用(VAR7,1) AND (收盘价 <= 向前引用(收盘价,1))) AND (收盘价 >= 向前引用(收盘价,2)));
VAR9:=((向前引用(VAR8,1) AND (收盘价 >= 向前引用(收盘价,1))) AND (收盘价 <= 向前引用(收盘价,2)));
VARA:=((向前引用(VAR9,1) AND (收盘价 <= 向前引用(收盘价,1))) AND (收盘价 >= 向前引用(收盘价,2)));
VARB:=((向前引用(VARA,1) AND (收盘价 >= 向前引用(收盘价,1))) AND (收盘价 <= 向前引用(收盘价,2)));
VARC:=((向前引用(VARB,1) AND (收盘价 <= 向前引用(收盘价,1))) AND (收盘价 >= 向前引用(收盘价,2)));
画柱线((((((((((((VAR1 OR VAR2) OR VAR3) OR VAR4) OR VAR5) OR VAR6) OR VAR7) OR VAR8) OR VAR9) OR VARA) OR VARB) OR VARC),收盘价,向前引用(收盘价,1),8,0),,colorred;
VARD:=((收盘价 < 向前引用(收盘价,1)) AND (收盘价 < 向前引用(收盘价,2)));
VARE:=((向前引用(VARD,1) AND (收盘价 >= 向前引用(收盘价,1))) AND (收盘价 <= 向前引用(收盘价,2)));
VARF:=((向前引用(VARE,1) AND (收盘价 <= 向前引用(收盘价,1))) AND (收盘价 >= 向前引用(收盘价,2)));
VAR10:=((向前引用(VARF,1) AND (收盘价 >= 向前引用(收盘价,1))) AND (收盘价 <= 向前引用(收盘价,2)));
VAR11:=((向前引用(VAR10,1) AND (收盘价 <= 向前引用(收盘价,1))) AND (收盘价 >= 向前引用(收盘价,2)));
VAR12:=((向前引用(VAR11,1) AND (收盘价 >= 向前引用(收盘价,1))) AND (收盘价 <= 向前引用(收盘价,2)));
VAR13:=((向前引用(VAR12,1) AND (收盘价 <= 向前引用(收盘价,1))) AND (收盘价 >= 向前引用(收盘价,2)));
VAR14:=((向前引用(VAR13,1) AND (收盘价 >= 向前引用(收盘价,1))) AND (收盘价 <= 向前引用(收盘价,2)));
VAR15:=((向前引用(VAR14,1) AND (收盘价 <= 向前引用(收盘价,1))) AND (收盘价 >= 向前引用(收盘价,2)));
VAR16:=((向前引用(VAR15,1) AND (收盘价 >= 向前引用(收盘价,1))) AND (收盘价 <= 向前引用(收盘价,2)));
VAR17:=((向前引用(VAR16,1) AND (收盘价 <= 向前引用(收盘价,1))) AND (收盘价 >= 向前引用(收盘价,2)));
VAR18:=((向前引用(VAR17,1) AND (收盘价 >= 向前引用(收盘价,1))) AND (收盘价 <= 向前引用(收盘价,2)));
画柱线((((((((((((VARD OR VARE) OR VARF) OR VAR10) OR VAR11) OR VAR12) OR VAR13) OR VAR14) OR VAR15) OR VAR16) OR VAR17) OR VAR18),收盘价,向前引用(收盘价,1),8,0),colorblue;
VAR19:=(向前引用((((((((((((VARD OR VARE) OR VARF) OR VAR10) OR VAR11) OR VAR12) OR VAR13) OR VAR14) OR VAR15) OR VAR16) OR VAR17) OR VAR18),1) AND VAR1);
画柱线(VAR19,向前引用(收盘价,1),向前引用(收盘价,2),8,0),colorwhite;
VAR1A:=(向前引用((((((((((((VAR1 OR VAR2) OR VAR3) OR VAR4) OR VAR5) OR VAR6) OR VAR7) OR VAR8) OR VAR9) OR VARA) OR VARB) OR VARC),1) AND VARD);
画柱线(VAR1A,向前引用(收盘价,1),向前引用(收盘价,2),8,1),colormagenta;

ok:=指数平滑移动平均(开盘价,60);
cg:=指数平滑移动平均(收盘价,60);
pdu:=条件函数(ok>向前引用(ok,1) and cg>向前引用(cg,1),1,0);
pdd:=条件函数(ok<向前引用(ok,1) and cg<向前引用(cg,1),1,0);
pdm:=条件函数(pdu=0 and pdu=0,1,0);
z1:=简单移动平均(收盘价,13);
zx:=向前引用(z1,13/2+1);
life:=(指数平滑移动平均(收盘价,60)+指数平滑移动平均(收盘价,90))/2;
var1:=(2*收盘价+最高价+最低价)/4;
snook:=指数平滑移动平均(var1,99)*0.91;
a1:=(收盘价-向前引用(收盘价,1))/向前引用(收盘价,1)*100;
ma5:=上一次条件成立位置(a1>3);
ma20:=条件函数(ma5>0,1,0);
画柱线(收盘价>zx,最高价,最低价,1,0),colorcyan;
画柱线(收盘价>zx and 收盘价>=life,开盘价,收盘价,8,0),colorblue;
画柱线(收盘价>zx and 收盘价<=snook,开盘价,收盘价,8,1),colorgreen;
画柱线(收盘价>zx and 收盘价>snook and 收盘价<life,开盘价,收盘价,8,0),colorff00ff;
画柱线(收盘价>zx and ma20=0,开盘价,收盘价,8,0),colorred;
画柱线(收盘价>zx,开盘价,收盘价,3,0),coloryellow;
画图标(交叉函数(收盘价,zx),最低价*0.99,4);
画图标(交叉函数(zx,收盘价),最高价*1.01,5);
by20:=简单移动平均(收盘价,5);
by21:=简单移动平均(收盘价,20);
by22:=条件函数(by20>by21,by21,by20);
招财猫:by21,colorgreen,Linethick1;
鼠变异:by22,colorblue,Linethick2;
画分段线(鼠变异>向前引用(鼠变异,1) and 鼠变异=by21,鼠变异),Linethick1,colorgreen;
画分段线(鼠变异>向前引用(鼠变异,1) and 鼠变异=by21 and pdu=1,鼠变异),Linethick2,colorred;
画分段线(鼠变异>向前引用(鼠变异,1) and 鼠变异<>by21,鼠变异),coloryellow,Linethick2;
显示解盘文字(收盘价>zx and 收盘价>=life,'老鼠出洞了,逮住它!'),colorff;
显示解盘文字(收盘价>zx and 收盘价>snook and 收盘价<life,'老鼠玩猫猫,守着它!'),colorff0000;
显示解盘文字(收盘价>zx and 收盘价<=snook,'老鼠露尾巴,动作快!'),colorff00;
显示解盘文字(收盘价<=zx,'老鼠没有了,打个盹!'),color808080;
显示解盘文字(鼠变异>向前引用(鼠变异,1) and 鼠变异<>by21,'发现鼠迹!'),colorff00;
显示解盘文字(鼠变异>向前引用(鼠变异,1) and 鼠变异=by21 and pdu<>1,'瞬间鼠影!'),colorff66ff;
显示解盘文字(鼠变异>向前引用(鼠变异,1) and 鼠变异=by21 and pdu=1,'恶鼠难遁!'),colorff;
显示解盘文字(收盘价>zx and ma20=0,'老鼠去哪里,思考哦!'),colorffff;


[/color][/size]

2007-12-12 07:08 博股
沙发,终于坐到沙发了。。。。。。

2007-12-12 07:12 博股
错误,怎么回事?

当前公式 : 猫捉老鼠 (指标画线公式)  
错误句 : VAR1:=((收盘价 > 向前引用(收盘价,1)) AND (收盘价 > 向前引用(收盘价,2)))
详细信息 : 您在括号前写的不是函数、公式等,
且缺少必要的运算符!
错误起始位置 : 0 ; 长度: 0

2007-12-12 07:14 博股
收盘价怎么定义呢。。。。。。。?

页: [1]


Powered by Discuz! Archiver 5.5.0  © 2001-2006 Comsenz Inc.