公式模型编写问题提交-[求助]麻烦改成循环语句简化金字塔客服中心 - 专业程序化交易软件提供商

你好，以下是我在文华编程的语句，基本在金字塔可以运行。但是否能用循环语句或者别的函数帮我改成较为简单的程序，但思路不变。

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);