找回密码
 注册
Simdroid-非首页
查看: 31|回复: 2

[子程序] 语法错误,求助各位大神

[复制链接]
发表于 2017-9-13 21:16:17 | 显示全部楼层 |阅读模式 来自 北京
  1. if(EPSL3 .lt. zer0)then
  2.                 if(abs(EPSL3) .ge. epsl_f)then
  3.                     NewDmg = 1
  4.                     stateNew(k,8) = 1.0
  5.                     stateNew(k,9) = 0.0
  6.                 elseif((abs(EPSL3) .gt. abs(sc0)).or.
  7.                        (stateOld(k,8) .gt. zero))then
  8.                        d = 1-abs(sc0/EPSL3)
  9.                        if(d. gt. stateOld(k,8))then
  10.                            NewDmg = 1
  11.                            stateNew(k,8) = d
  12.                        endif
  13.                 endif
  14.             endif
复制代码

发表于 2017-9-14 01:27:37 | 显示全部楼层 来自 德国
Simdroid开发平台
最底下那个Endif没有和第一个IF对齐吧!
回复 不支持

使用道具 举报

 楼主| 发表于 2017-9-14 14:39:31 | 显示全部楼层 来自 北京
cassiliyas 发表于 2017-9-14 01:27
最底下那个Endif没有和第一个IF对齐吧!

找到原因了,是因为elseif那行命令一行写不下,第二行的时候要在前面加上衔接号
回复 不支持

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|小黑屋|联系我们|仿真互动网 ( 京ICP备15048925号-7 )

GMT+8, 2024-3-29 00:34 , Processed in 0.026283 second(s), 11 queries , Gzip On, MemCache On.

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表