サブルーチン
プログラマーからひとこと
これまでいろいろな命令をおぼえてきましたが、そのクライマックスになりそうなのが、これから出てくる「GOSUB」命令です。ここまでおぼえれば初心者のプログラムはもう最後といっていいかもしれません。
英語としてもわりとヘンですが、もともとの意味は「
サブルーチンといえば、前にもちょっとだけ出てきましたね。
「行って帰ってくる小さなプログラムのブロック」なんて説明もしましたが、おぼえてましたか？
この「行って帰ってくる」をカンタンにするのがGOSUB命令ですが、くわしくはインテリ君の説明にまかせましょう。
GOSUB命令
サブルーチンのハナシはもう終わったんじゃねェのか？ ヨウするに「行って帰ってくる小さなプログラムのブロック」がサブルーチンなんだろ？
そこまでは合ってるよ。これからおぼえるＧＯＳＵＢ命令は、それをもっとラクにするための命令だね。
たしかサブルーチンは、こういうものだったよね。
0001#. ’メインルーフ゜
0002#. ＠ＭＡＩＮ
0003#. ＰＲＩＮＴ”ココハ メインルーフ゜ テ゛ス”
0004#. ＧＯＴＯ ＠ＳＵＢ
0005#. ＠ＭＡＩＮ２
0006#. ＧＯＴＯ ＠ＭＡＩＮ
0007#.
0008#. ’サブルーチン
0009#. ＠ＳＵＢ
0010#. ＰＲＩＮＴ”ココハ サフ゛ルーチン テ゛ス”
0011#. ＧＯＴＯ ＠ＭＡＩＮ２
これだとホントにサブルーチンにするイミのない、グルグル回るだけのプログラムだけど……。0002#. ＠ＭＡＩＮ
0003#. ＰＲＩＮＴ”ココハ メインルーフ゜ テ゛ス”
0004#. ＧＯＴＯ ＠ＳＵＢ
0005#. ＠ＭＡＩＮ２
0006#. ＧＯＴＯ ＠ＭＡＩＮ
0007#.
0008#. ’サブルーチン
0009#. ＠ＳＵＢ
0010#. ＰＲＩＮＴ”ココハ サフ゛ルーチン テ゛ス”
0011#. ＧＯＴＯ ＠ＭＡＩＮ２
うん、でもおさらいとしてはこれでいいんじゃないかな。４行目でサブルーチン＠ＳＵＢに行って、11行目でメインループの中の＠ＭＡＩＮ２に帰るんだね。
コレをカンタンにするのがＧＯＳＵＢ命令だってのか？ スデにかなりカンタンな気もするが……
まあ見てみようよ。ＧＯＳＵＢ命令を使うと、こういうプログラムになるね。
0001#. ’メインルーフ゜
0002#. ＠ＭＡＩＮ
0003#. ＰＲＩＮＴ”ココハ メインルーフ゜ テ゛ス”
0004#. ＧＯＳＵＢ ＠ＳＵＢ
0005#.
0006#. ＧＯＴＯ ＠ＭＡＩＮ
0007#.
0008#. ’サブルーチン
0009#. ＠ＳＵＢ
0010#. ＰＲＩＮＴ”ココハ サフ゛ルーチン テ゛ス”
0011#. ＲＥＴＵＲＮ
４行目でＧＯＳＵＢ命令を使っているのがわかるね。0002#. ＠ＭＡＩＮ
0003#. ＰＲＩＮＴ”ココハ メインルーフ゜ テ゛ス”
0004#. ＧＯＳＵＢ ＠ＳＵＢ
0005#.
0006#. ＧＯＴＯ ＠ＭＡＩＮ
0007#.
0008#. ’サブルーチン
0009#. ＠ＳＵＢ
0010#. ＰＲＩＮＴ”ココハ サフ゛ルーチン テ゛ス”
0011#. ＲＥＴＵＲＮ
それだけじゃねェぞ、５行目にあったラベルが消えてんじゃねェか！ これじゃサブルーチンから戻ってこれなく……アレ？
サブルーチンの最後が、ＧＯＴＯ命令じゃなくＲＥＴＵＲＮになっているね。
ＧＯＳＵＢ命令は、ＲＥＴＵＲＮ命令とセットで使うんだ。
プログラムを見ればだいたい分かるかな？ ＧＯＳＵＢのあとにＲＥＴＵＲＮがあると、ＧＯＳＵＢしたすぐアトまで自動で帰るんだね。
プログラムを見ればだいたい分かるかな？ ＧＯＳＵＢのあとにＲＥＴＵＲＮがあると、ＧＯＳＵＢしたすぐアトまで自動で帰るんだね。
……リクツはワカッたぜ。あんがいカンタンなモンなんだな。
サブルーチンに行くたびにラベルを付けなくてよくなるのは、たしかにベンリかな。
しかしコレ……サブルーチンって、ホントにやらなきゃダメか？ ワザワザＧＯＴＯやＧＯＳＵＢで飛ばさなくても、メインループの中でやればいいコトじゃねェか？
いいトコロに気が付いたね。ジツはここまでで使ったサブルーチンは、たしかにサブルーチンの良さがちゃんと出てないんだな。
そこで、このプログラムを見てもらおうか。
そこで、このプログラムを見てもらおうか。
0001#. ’メインルーフ゜
0002#. ＠ＭＡＩＮ
0003#. Ａ＝１
0004#. ＧＯＳＵＢ ＠ＳＵＢ
0005#. Ａ＝２
0006#. ＧＯＳＵＢ ＠ＳＵＢ
0007#. ＧＯＴＯ ＠ＭＡＩＮ
0008#.
0009#. ’サブルーチン
0010#. ＠ＳＵＢ
0011#. ＰＲＩＮＴ Ａ；”カイメ ノ サフ゛ルーチン”
0012#. ＲＥＴＵＲＮ
ドコがポイントか、わかるかな？0002#. ＠ＭＡＩＮ
0003#. Ａ＝１
0004#. ＧＯＳＵＢ ＠ＳＵＢ
0005#. Ａ＝２
0006#. ＧＯＳＵＢ ＠ＳＵＢ
0007#. ＧＯＴＯ ＠ＭＡＩＮ
0008#.
0009#. ’サブルーチン
0010#. ＠ＳＵＢ
0011#. ＰＲＩＮＴ Ａ；”カイメ ノ サフ゛ルーチン”
0012#. ＲＥＴＵＲＮ
サブルーチンに行く前に、変数Ａのナカミを変えているね。それにメインループの中から２回、同じサブルーチンに飛んでいるよ。
それからサブルーチンの中でも変数Ａを使ってるぜ！ つまり……サッパリわからねーな！
そ、そうなの？
まず同じサブルーチンでも、ＲＥＴＵＲＮで帰る行がちがうというのが１つ目のポイントかな。
まず同じサブルーチンでも、ＲＥＴＵＲＮで帰る行がちがうというのが１つ目のポイントかな。
同じＲＥＴＵＲＮなのに、４行目から飛んできたときは４行目に帰ってきて、６行目から飛んできたときは６行目に帰るんだね。ちゃんとしてるなあ。
タシカにそれと同じコトをＧＯＴＯでやるのはメンドクセェな……。アチコチから飛ぶんならＧＯＳＵＢを使えってコトか。
もう１つのポイントは、１コだけのサブルーチンでも、ＧＯＳＵＢする前の変数によってＰＲＩＮＴする字が変わるコトだね。
ＰＲＩＮＴにかぎらず、変数によってやることを変えられるんだね。
そういうコトだね。いろいろなプログラムを見てみるとわかるけど、決まった動きを、変数のナカミによって変えながらできるのがサブルーチンの良さだね。
つまりサブルーチンってのは、プログラムのどこから、どんなジョウタイでも、「オイこれやっとけ」って言えば空気を読みながらひととおりのシゴトをこなすってワケだな。
どうしたのワンパク君、よくわかってるじゃないか！
いや、リソウのパシリってこんなカンジじゃねえかって考えたら……
……
……
- GOSUB～RETURN命令
- ＧＯＳＵＢ ＠（ラベル）
ＲＥＴＵＲＮ
GOSUBで指定したラベルまでジャンプします。その後にRETURNと書いてあれば、GOSUBの直後まで戻ります。