Skip to main content

10.4.2.4. CALL

10.4.2.4. CALL

 

说明

呼叫指定的程序

END文相遇时、还原为呼叫的CALL文下一行。

语法

CALL <程序编号>  ......  END

参数

程序编号

算公式. 需要呼叫的程序编号

1~999

使用

 ‘计算P4P7之间的距离

P300=P4

P301=P7

CALL 902

 ‘

 

PRINT #0"Dist = "; V300!

 

REM --- subprog. 902 -------------------------------

REM     V300! = <P300P301之间的距离>

REM ------------------------------------------------------

V300! = (P300.X-P301.X)^2 + (P300.Y-P301.Y)^2

    + (P300.Z-P301.Z)^2

V300! = SQR(V300!)