OPN "para"
L 0
T MW 100
T DBW 12 //清零
LAR1 P#2.0
L 4
_001: T MW 102
L DBW [AR1,P#0.0]
L MW 100
>I
JCN _002
L DBW [AR1,P#0.0]
T MW 100
L MW 102
T DBW 12
_002: +AR1 P#2.0
L DBW [AR1,P#0.0]
L MW 102
LOOP _001
A "run"
A(
L DBW 12
L 1
==I
)
= Q 0.0
这是我现在的程序。已经调试通过了