将这些参数作为形参,编一个功能块。
in:addr1 real
addr2 real
number int
temp:len
程序:
l #addr1
slw 5
lar1
l #addr2
slw 5
lar2
l #number
a1:t #len
opn db1
l dbd[ar1,p#0.0]
opn db2
t dbd[ar2,p#0.0]
+ar1 p#4.0
+ar2 p#4.0
l #len
loop a1
以上程序还需根据数据块类型作一些修改,还根据形参传递的变量是指针形式还是个数形式等不同而稍作修改。