涨停价公式改版，感谢涂股海指出原公式不足！

万金弹指间

原帖：

原创涨停价公式！！对写公式的人绝对有用！！熬了大半夜写出来的！
http://www.178448.com/forum.php?mod=viewthread&tid=298586&fromuid=53947

http://www.178448.com/thread-298586-1-1.html

感谢涂股海指出原公式的不足，原公式在遇到复权问题时会出现错误，没有信号。
关键是复权导致收盘及开盘价会在千分位上有值，也就是出现收盘价等于10.153元的情况。
如图：

因此，原公式就会出错。
下面是改进后的涨停价公式，不仅免疫了复权的影响还免疫了ST股只有5%涨停的干扰，增强了公式的适应性(鲁棒性）。

1. 涨率:=IF(NAMELIKE('S')OR NAMELIKE('*S'),5,10);
   
2. RC1:=REF(C,1);
   
3. YS:=MOD((10000+100*涨率)*RC1,100);
   
4. TDOWN:=((10000+涨率*100)*RC1-YS)/10000;
   
5. TUP:=TDOWN+0.01;
   
6. TING:IF(YS>=50,TUP,TDOWN),NODRAW;
   
7. 涨停:=ABS(C-TING)<0.01 AND H=C;
   
8. DRAWICON(涨停,1.01*H,1);
   
9. STICKLINE(涨停,O,C,-1,1);

复制代码

呵呵，收费+隐藏，愿者得之。
如果你不懂公式，也不想学习公式，大可不必浪费学分。

补充内容 (2012-5-3 23:20):
多次复权后公式还是有漏洞，请将第七行<0.01改为<0.03即可。

补充内容 (2012-7-7 11:15):
最终版见51楼。

醉亨人生

涨率:=IF(NAMELIKE('S')OR NAMELIKE('*S'),5,10);
RC1:=REF(C,1);
YS:=MOD((10000+100*涨率)*RC1,100);
TDOWN:=((10000+涨率*100)*RC1-YS)/10000;
TUP:=TDOWN+0.01;
TING:IF(YS>=50,TUP,TDOWN),NODRAW;
涨停:=ABS(C-TING)<0.01 AND H=C;
DRAWICON(涨停,1.01*H,1);
STICKLINE(涨停,O,C,-1,1);

天阳2127

涨率:=IF(NAMELIKE('S')OR NAMELIKE('*S'),5,10);
RC1:=REF(C,1);
YS:=MOD((10000+100*涨率)*RC1,100);
TDOWN:=((10000+涨率*100)*RC1-YS)/10000;
TUP:=TDOWN+0.01;
TING:IF(YS>=50,TUP,TDOWN),NODRAW;
涨停:=ABS(C-TING)<0.01 AND H=C;
DRAWICON(涨停,1.01*H,1);
STICKLINE(涨停,O,C,-1,1);

ylj023121

当前公式 : 涨停价公式改 (指标画线公式)  
错误句 : 1.        涨率:=IF(NAMELIKE(20)OR NAMELIKE(21),5,10)
详细信息 : 在变量 涨率 前又错误的定义一次变量!
错误起始位置 : 3 ; 长度: 4


这是怎么回事呀楼主。

制心一处

不懂公式，只能学习！

安涛

不懂公式，只能学习！

万金弹指间

安涛 发表于 2012-5-3 03:17
不懂公式，只能学习！

助教怎么升的啊？

制心一处

这个公式是主图公式吗？

万金弹指间

制心一处 发表于 2012-5-3 03:20
这个公式是主图公式吗？

是的，主图。

安涛

万金弹指间 发表于 2012-5-3 03:19
助教怎么升的啊？

经常转转论坛

一蓑烟雨1

kanxia ,,,,,,

红色置顶

谢谢分享了

撒单

谢谢分享了

张程

好好学习天天向上

过河红三兵

谢谢楼主分享

王长江

向高手学习

跃乘

谢谢分享，向你学习

光明

不懂公式，也不想学习公式