;サブルーチンのサンプル data="段差表示" dx=100 : count=5 gosub *step_mes pos 50,100 gosub *step_mes stop *step_mes repeat count mes data pos csrx+dx loop return |
;モジュールのサンプル #module #deffunc step_mes str,int,int mref data,32 mref dx,1 mref count,2 repeat count mes data pos csrx+dx loop return #global step_mes "段差表示",100,5 pos 50,100 step_mes "段差表示",100,5 stop |