| 以文本方式查看主题 - 金字塔客服中心 - 专业程序化交易软件提供商 (http://weistock.com/bbs/index.asp) -- 公式模型编写问题提交 (http://weistock.com/bbs/list.asp?boardid=4) ---- [求助]改成简单循环语句可以实现 (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=53293) |
| -- 作者：cong -- 发布时间：2013/6/23 11:26:17 -- [求助]改成简单循环语句可以实现 你好，以下是我在文华编程的语句，基本在金字塔可以运行。但是否能用循环语句或者别的函数帮我改成较为简单的程序，但思路不变。 J:=LLV(LOW,5); C1:=IFELSE(CZ>REF(J,1),REF(J,1),0); C2:=IFELSE(CZ>REF(J,2)&&CZ<=REF(J,1),REF(J,2),0); C3:=IFELSE(CZ>REF(J,3)&&CZ<=REF(J,1)&&CZ<=REF(J,2),REF(J,3),0); PX:=CZ<=REF(J,1)&&CZ<=REF(J,2)&&CZ<=REF(J,3); C4:=IFELSE(CZ>REF(J,4)&&PX,REF(J,4),0); C5:=IFELSE(CZ>REF(J,5)&&PX&&CZ<=REF(J,4),REF(J,5),0); PY:=PX&&CZ<=REF(J,4)&&CZ<=REF(J,5); C6:=IFELSE(CZ>REF(J,6)&&PY,REF(J,6),0); C7:=IFELSE(C>REF(J,7)&&PY&&C<=REF(J,6),REF(J,7),0); PZ:=PY&&CZ<=REF(J,6)&&CZ<=REF(J,7); C8:=IFELSE(CZ>REF(J,8)&&PZ,REF(J,8),0); C9:=IFELSE(CZ>REF(J,9)&&PZ&&CZ<=REF(J,8),REF(J,9),0); C10:=IFELSE(CZ>REF(J,10)&&PZ&&CZ<=REF(J,8)&&CZ<=REF(J,9),REF(J,10),0); AC:=C1+C2+C3+C4+C5+C6+C7+C8+C9+C10; PC1:=IFELSE(AC>REF(J,1),REF(J,1),0); PC2:=IFELSE(AC>REF(J,2)&&AC<=REF(J,1),REF(J,2),0); PC3:=IFELSE(AC>REF(J,3)&&AC<=REF(J,1)&&AC<=REF(J,2),REF(J,3),0); XP:=AC<=REF(J,1)&&AC<=REF(J,2)&&AC<=REF(J,3); PC4:=IFELSE(AC>REF(J,4)&&XP,REF(J,4),0); PC5:=IFELSE(AC>REF(J,5)&&XP&&AC<=REF(J,4),REF(J,5),0); YP:=XP&&AC<=REF(J,4)&&AC<=REF(J,5); PC6:=IFELSE(AC>REF(J,6)&&YP,REF(J,6),0); PC7:=IFELSE(AC>REF(J,7)&&YP&&AC<=REF(J,6),REF(J,7),0); ZP:=YP&&AC<=REF(J,6)&&AC<=REF(J,7); PC8:=IFELSE(AC>REF(J,8)&&ZP,REF(J,8),0); PC9:=IFELSE(AC>REF(J,9)&&ZP&&AC<=REF(J,8),REF(J,9),0); PC10:=IFELSE(AC>REF(J,10)&&ZP&&AC<=REF(J,8)&&AC<=REF(J,9),REF(J,10),0); AAC:=PC1+PC2+PC3+PC4+PC5+PC6+PC7+PC8+PC9+PC10; C0:=VALUEWHEN(AAC>0,AAC); |
| -- 作者：jinzhe -- 发布时间：2013/6/24 9:31:17 -- 帮我看下怎么写 这个代码的思路是？ |
| -- 作者：cong -- 发布时间：2013/6/24 9:42:30 -- 您看看，其实就一很简单的思路。 |
| -- 作者：cong -- 发布时间：2013/6/24 9:44:11 -- 这段代码和金字塔的函数都匹配，您看看应该懂的。 |
| -- 作者：cong -- 发布时间：2013/6/24 13:41:53 -- 大侠，还木有答复啊！ |
| -- 作者：RogarZ -- 发布时间：2013/6/24 17:10:38 -- 这东西 怎么改 完全不知道你的意思~ CZ是什么？ 没办法调试的东西，我们都不知道对错~改不来 [此贴子已经被作者于2013/6/24 17:11:30编辑过]
|
| -- 作者：cong -- 发布时间：2013/6/24 20:28:33 -- 非常不好意思： J:=LLV(LOW,5); CZ:=IFELSE(HIGH>=REF(HIGH,1)&&HIGH>=REF(HIGH,2)&&HIGH>=REF(HIGH,3)&&HIGH>=REF(HIGH,4),LOW,0); C1:=IFELSE(CZ>REF(J,1),REF(J,1),0); C2:=IFELSE(CZ>REF(J,2)&&CZ<=REF(J,1),REF(J,2),0); C3:=IFELSE(CZ>REF(J,3)&&CZ<=REF(J,1)&&CZ<=REF(J,2),REF(J,3),0); PX:=CZ<=REF(J,1)&&CZ<=REF(J,2)&&CZ<=REF(J,3); C4:=IFELSE(CZ>REF(J,4)&&PX,REF(J,4),0); C5:=IFELSE(CZ>REF(J,5)&&PX&&CZ<=REF(J,4),REF(J,5),0); PY:=PX&&CZ<=REF(J,4)&&CZ<=REF(J,5); C6:=IFELSE(CZ>REF(J,6)&&PY,REF(J,6),0); C7:=IFELSE(C>REF(J,7)&&PY&&C<=REF(J,6),REF(J,7),0); PZ:=PY&&CZ<=REF(J,6)&&CZ<=REF(J,7); C8:=IFELSE(CZ>REF(J,8)&&PZ,REF(J,8),0); C9:=IFELSE(CZ>REF(J,9)&&PZ&&CZ<=REF(J,8),REF(J,9),0); C10:=IFELSE(CZ>REF(J,10)&&PZ&&CZ<=REF(J,8)&&CZ<=REF(J,9),REF(J,10),0); AC:=C1+C2+C3+C4+C5+C6+C7+C8+C9+C10; PC1:=IFELSE(AC>REF(J,1),REF(J,1),0); PC2:=IFELSE(AC>REF(J,2)&&AC<=REF(J,1),REF(J,2),0); PC3:=IFELSE(AC>REF(J,3)&&AC<=REF(J,1)&&AC<=REF(J,2),REF(J,3),0); XP:=AC<=REF(J,1)&&AC<=REF(J,2)&&AC<=REF(J,3); PC4:=IFELSE(AC>REF(J,4)&&XP,REF(J,4),0); PC5:=IFELSE(AC>REF(J,5)&&XP&&AC<=REF(J,4),REF(J,5),0); YP:=XP&&AC<=REF(J,4)&&AC<=REF(J,5); PC6:=IFELSE(AC>REF(J,6)&&YP,REF(J,6),0); PC7:=IFELSE(AC>REF(J,7)&&YP&&AC<=REF(J,6),REF(J,7),0); ZP:=YP&&AC<=REF(J,6)&&AC<=REF(J,7); PC8:=IFELSE(AC>REF(J,8)&&ZP,REF(J,8),0); PC9:=IFELSE(AC>REF(J,9)&&ZP&&AC<=REF(J,8),REF(J,9),0); PC10:=IFELSE(AC>REF(J,10)&&ZP&&AC<=REF(J,8)&&AC<=REF(J,9),REF(J,10),0); AAC:=PC1+PC2+PC3+PC4+PC5+PC6+PC7+PC8+PC9+PC10; C0:=VALUEWHEN(AAC>0,AAC); IF CO THEN ...... 主要是改前面的那段。后面就是我由CO引发的开平仓。麻烦了！ |
| -- 作者：cong -- 发布时间：2013/6/24 20:29:16 -- 补充一点，一定是对的，我金字塔有运行过的。 |
| -- 作者：cong -- 发布时间：2013/6/25 10:56:04 -- 有没有人啊！！高手何在？？ |
| -- 作者：jinzhe -- 发布时间：2013/6/25 11:15:43 -- 思路是什么？ |