标题：请版主指导程序，写个模板

1楼

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语句的简洁而运行高效的方法？！

关键是能行得通，且金字塔运行效率高，少占资源。

谢谢帮忙！

2楼

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

诸如此类

3楼

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;

按实际过程应该值有变化才对，不知为什么？

能否帮忙解答？！

谢谢！

4楼

jinzhe 发表于：2013/5/21 9:00:08

逐k线还是序列计算的？

5楼

sun999 发表于：2013/5/21 15:24:07

是在序列模式下。

我发现 IF then 语句一直不太好用，不知是我的原因，还是本身原因？！

6楼

jinzhe 发表于：2013/5/21 15:27:14

改成逐k线，序列会计算最后根k线的值，

共6 条记录, 每页显示 10 条, 页签: [1]