以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://222.73.7.161/bbs/index.asp)
--  公式模型编写问题提交  (http://222.73.7.161/bbs/list.asp?boardid=4)
----  如何运用循环语句输出画线,谢谢了  (http://222.73.7.161/bbs/dispbbs.asp?boardid=4&id=170193)

--  作者:大道至简时
--  发布时间:2019/5/30 9:17:26
--  如何运用循环语句输出画线,谢谢了
代码如下,该如何循环输出线MA5+M*BZPCD和MA5-M*BZPCD  ?
M=0,Q=8.BZPCD=8;//为方便你们修改,Q,BZPDCD暂时定义
IF BZPCD>0 THEN BEGIN 
IF BZPCD<=10  THEN
M:=M+0.5; 
P:=Q/M;
FOR P=1 TO ROUND( Q/M) EXPR2 MA5+M*BZPCD
FOR P=1 TO ROUND( Q/M) EXPR2 MA5-M*BZPCD

IF BZPCD>10 AND BZPCD<=20  THEN
M:=0.4;
P:=Q/M;
FOR P=1 TO ROUND( Q/M) EXPR2 MA5+M*BZPCD
FOR P=1 TO ROUND( Q/M) EXPR2 MA5-M*BZPCD
END

--  作者:大道至简时
--  发布时间:2019/5/30 9:26:39
--  
其他构想,还是不行。不会编程图片点击可在新窗口打开查看图片点击可在新窗口打开查看图片点击可在新窗口打开查看图片点击可在新窗口打开查看
IF BZPCD>0 THEN BEGIN 
IF BZPCD<=10  THEN
M:=0.5; 
P:=Q/M;
FOR FOR P=1 TO ROUND( Q/M) EXPR2 M=M+0.5
MAX:BBI+M*BZPCD
MAX:BBI-M*BZPCD

--  作者:大道至简时
--  发布时间:2019/5/30 9:31:58
--  
IF BZPCD>0 THEN BEGIN 
IF BZPCD<=10  THEN
M:=0.5; 
P:=Q/M;
FOR P=1 TO ROUND( Q/M) DO M=M+0.5
MAX:BBI+M*BZPCD
MAS:BBI-M*BZPCD

--  作者:yukizzc
--  发布时间:2019/5/30 14:28:18
--  
无法不能循环所有的输出,只能一个个变量的输出