以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  请版主指导程序,写个模板  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=52234)

--  作者:sun999
--  发布时间:2013/5/20 13:03:13
--  请版主指导程序,写个模板
在写条件语句时,遇到稍复杂的多重条件,我用金字塔写的程序,效率不高,或者不能实现。
大侠能否帮我写个效率较高的程序模板?!

如果X=1,则Y=9,Z=10;
如果X=3,则Y=7,Z=11;
如果X=4,则Y=2,Z=4;
如果X=6,则Y=8,Z=6;
其他情况下,Y=1,Z=2。

在金字塔中,如何写出效率较高的程序?
用多重IF  then  else  吗?还是有类似CASE语句的简洁而运行高效的方法?!
关键是能行得通,且金字塔运行效率高,少占资源。

谢谢帮忙!

--  作者:jinzhe
--  发布时间:2013/5/20 13:27:50
--  

这个只能枚举了

if x=1 then begin

y:=9;

z:=10;

end

if x=3 then begin

y:=7;

z:=11;

end

.

.

.

.

.

诸如此类


--  作者:sun999
--  发布时间:2013/5/20 22:50:43
--  求教
依指导,我写了下列程序部分

KDJB:=-1;
PKJB:=-1;
IF QHJB=6&&QLJB>-4 THEN BEGIN KDJB:=-4;PKJB:=-3; END
IF QHJB=5&&QLJB>-3 THEN BEGIN KDJB:=-3;PKJB:=-3; END
IF QHJB=4&&QLJB>-3 THEN BEGIN KDJB:=-3;PKJB:=-2; END
IF QHJB=3&&QLJB>-2 THEN BEGIN KDJB:=-2;PKJB:=-2; END
IF QHJB=2&&QLJB>-1 THEN BEGIN KDJB:=-2;PKJB:=-1; END

通过linethick0来看调试,发现结果总是
KDJB:=-3;PKJB:=-2;
按实际过程应该值有变化才对,不知为什么?
能否帮忙解答?!
谢谢!





--  作者:jinzhe
--  发布时间:2013/5/21 9:00:08
--  
逐k线还是序列计算的?

--  作者:sun999
--  发布时间:2013/5/21 15:24:07
--  请教
是在序列模式下。

我发现  IF  then 语句一直不太好用,不知是我的原因,还是本身原因?!

--  作者:jinzhe
--  发布时间:2013/5/21 15:27:14
--  
改成逐k线,序列会计算最后根k线的值,