请大家帮我看看这段程序,谢谢!!s7400 点击:259 | 回复:1



一剑走天下

    
  • 精华:0帖
  • 求助:0帖
  • 帖子:18帖 | 39回
  • 年度积分:0
  • 历史总积分:283
  • 注册:2006年9月26日
发表于:2009-04-01 14:59:25
楼主
A(
O(
L "OB_TIME_DB".OB_1.DAT
T LD 0
SET
SAVE
CLR
A BR
)
O(
L LD 0
L L#180
MOD
T LD 4
AN OV
SAVE
CLR
A BR
)
)
A(
L LD 4
L L#0
==D
)
FP M 123.0
S DB50.DBX 40.0
A "I27.5"
R DB50.DBX 40.0
NOP 0



一剑走天下

  • 精华:0帖
  • 求助:0帖
  • 帖子:18帖 | 39回
  • 年度积分:0
  • 历史总积分:283
  • 注册:2006年9月26日
发表于:2009-04-01 16:34:51
1楼

CALL "DP读写"
A(
CALL "DT_DATE"
IN :="OB_TIME_DB".OB_1.D_T
RET_VAL:="OB_TIME_DB".OB_1.DAT
A BR
)
NOT
JNB _001
CALL "STP"
_001: NOP 0

 


热门招聘
相关主题

官方公众号

智造工程师