欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件公式模型编写问题提交 → 为何编译时候会出现语句末尾缺少分号错误

   

欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。    


  共有2912人关注过本帖树形打印复制链接

主题:为何编译时候会出现语句末尾缺少分号错误

帅哥哟,离线,有人找我吗?
qq代人发帖
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:18691 积分:0 威望:0 精华:0 注册:2013/7/15 9:22:16
为何编译时候会出现语句末尾缺少分号错误  发帖心情 Post By:2019/5/20 9:11:53    Post IP:180.169.30.6[只看该作者]

<!--StartFragment -->
 if CURRBARSCOUNT=1 then begin
Value1:=0;
 for Value1 = 0 to (DMILEN-1) do
begin
PlusDM=0;
  MinusDM=0;
UpperMove=HIGH[Value1]-HIGH[Value1+1];
LowerMove=LOW[Value1+1]-LOW[Value1]; 
if UpperMove>LowerMove and UpperMove>0 then PlusDM = UpperMove
else if LowerMove > UpperMove and LowerMove > 0 then MinusDM = LowerMove ;
SumPlusDM = SumPlusDM + PlusDM ;
SumMinusDM = SumMinusDM + MinusDM ;
THigh = High[value] ;
TLow = low[value] ;
if close[value+1] >High[value] then THigh = close[value+1]
else if  close[value+1]<low[value] then TLow = close[value+1] ;
SumTR = SumTR +(THigh - TLow );
end;
AvgPlusDM = SumPlusDM / DMILEN ;
AvgMinusDM = SumMinusDM / DMILEN ;
oVolty = SumTR / DMILEN ;
end 
else
begin
PlusDM = 0 ;
MinusDM = 0 ;
UpperMove = high - high[1] ;
LowerMove = low[1] - low ;
if UpperMove > LowerMove and UpperMove > 0 then
PlusDM = UpperMove
else if LowerMove > UpperMove and LowerMove > 0 then
MinusDM = LowerMove ;
AvgPlusDM = AvgPlusDM[1] + SF * ( PlusDM - AvgPlusDM[1] ) ;
AvgMinusDM =AvgMinusDM[1] + SF * ( MinusDM -AvgMinusDM[1] ) ;
THigh = High ;
TLow = low ;
if close[1] >High then THigh = close[1]
else if  close[1] < low then TLow = close[1] ;
SumTR = SumTR +(THigh - TLow );
oVolty = oVolty[1] + SF * ( (THigh - TLow )  - oVolty[1] ) ;
end ;
if oVolty > 0 then
begin
oDMIPlus = 100 * AvgPlusDM / oVolty ;
oDMIMinus = 100 * AvgMinusDM / oVolty ;
end 
else
begin
oDMIPlus = 0 ;
oDMIMinus = 0 ;
end ;

Divisor = oDMIPlus + oDMIMinus ;
if Divisor > 0 then
oDMI = 100 * Abs( oDMIPlus - oDMIMinus ) / Divisor 
else
oDMI = 0 ;

if CURRBARSCOUNT <= DMILEN and CURRBARSCOUNT > 0 then
begin
oADX = ( oDMI+oDMI[1] ) / CURRBARSCOUNT ;
oADXR = ( oADX + oADX[CURRBARSCOUNT - 1 ] ) * .5 ;
end
else
begin
oADX = oADX[1]+SF * (oDMI - oADX[1] ) ;
oADXR = (oADX+oADX[DMILEN - 1 ]) * .5 ;
end ;

 回到顶部
帅哥哟,离线,有人找我吗?
FireScript
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:14496 积分:0 威望:0 精华:0 注册:2017/7/4 13:40:18
  发帖心情 Post By:2019/5/20 9:17:43    Post IP:180.169.30.6[只看该作者]

 
图片点击可在新窗口打开查看此主题相关图片如下:temp.png
图片点击可在新窗口打开查看
你按照报错信息去排查下即可。你这里好几个地方都少了分号。上面那个图就是第一个。少分号的都在报错信息附近。


命数如织,当如磐石。
 回到顶部