Chapter 6 Programming
6-87
Example: for Visual BASIC
Dim ret As Long
：
ret = pa_add_pnt(ARM0,PT_ARC1)
ret = pa_add_pnt(ARM0,PT_ARC2)
ret = pa_add_pnt(ARM0,PT_ARC3)
:
ret = pa_chg_pnt(ARM0,PM_TOP,0)
ret = pa_mov_pnt(ARM0,WM_WAIT)
ret = pa_ply_pnt(ARM0,PB_FORE,WM_WAIT)
