这是我写的程序,编译和连接都没有问题,但是运行总提示在bc=unite/lp(t),with,lp(t+1)行
" q* N$ @6 Y! b* g7 K0 G) P“正在使用一个无效的对象类型”,不知道是不是第一个jump有问题。请高手看看" Z) s6 q% L/ Z1 P+ y
$ w; y0 x7 ]. R) S, h2 r
entity/lp(50),bc* a* x2 i- {, L- U( M" _
number/t
A0 _7 R3 J- m! N0 |0 b) E: B
3 s" \( u; g' \; Y" x5 @+ cl10:
! w4 e/ X L* i) ]6 ^ident/'请选择多条曲线进行合并',lp,cnt,k,rsp8 G9 }: w( L8 e. g& @; k
jump/l10:,trm:,,,,rsp# t) r& O; V) u6 w/ ?- D4 p
if/k<=1,jump/err1:
], G+ K3 i: P* ]- nt=1
8 D5 G4 h8 O$ J( cl20:4 E+ }3 @- v+ J0 Q& ^/ j7 x/ U
bc=unite/lp(t),with,lp(t+1)1 v2 A0 }+ ~5 z. r3 h% _
t=t+15 n V+ E' L P. L/ j* @% U. \9 ?
ifthen/t==k,jump/trm:
# U& |% R; m& J6 m1 e" yelse, O4 p4 B- `. X
jump/l20:, N4 Q0 a0 A& S' {7 s
endif
9 n; p4 B8 w' T
4 H# ~- m+ S, x* O9 @( Verr1:- x* a! O) \( d/ p
jump/l10:
5 q* J% ~* F" T6 v; atrm:$ b1 z4 d' L4 O* i) w/ k/ u
halt |