as/misc/lib_outd/lib_outd/outd.casl

   1 ;; outd.caslを呼び出し、数値を表示する
   2 MAIN    START
   3         LAD     GR1,#8000
   4         CALL    OUTD
   5 FIN     RET