不思議？なんでエラーになるんだろう。 返り値が一つでいいというのであれば、 ・1行目：MESSAGE(D$,M$,SP,T) ・75行目のENDの上にRETURN ST ・呼び出し側をST=MESSAGE(・・・・ とすることでエラーはでなくなりました。 でも原因はよく分からないです。宣言もしていない変数をOUTに渡してるからなのかな？と思ったりもしましたが、ST=0という行も足してもやっぱりエラーがでました。