復活！ＣＰ／Ｍ ワンボードマイコンでＣＰ／Ｍを！
ＣＰ／ＭがＴＫ－８０互換のワンボードマイコンの上で復活します
ＮＤ８０ＺⅢとＭＹＣＰＵ８０の上でＣＰ／Ｍが走ります！
［第１６８回］
●ＦＯＲＴＲＡＮ８０
先週末から今週はじめまでの３日間は、またもや泥沼でもがいておりまして、更新ができませんでした。
４日ぶりの更新です。
何をやっておったのか、と申しますと。
お題にありますように、Ｍｉｃｒｏｓｏｆｔ社の古典的なＦＯＲＴＲＡＮコンパイラＦＯＲＴＲＡＮ８０をＮＤ８０ＺⅢのＣＰ／Ｍ互換ＤＯＳ上で走らせようともがいておりましたのです。
先日ご紹介しておりましたＭＢＡＳＩＣ（［第１５７回］）はインタプリタですが、このＦＯＲＴＲＡＮ８０はコンパイラです。
ＦＯＲＴＲＡＮは私がはじめて習い覚えた高級言語で、もうかれこれ４０年近く昔のことになります。
当時勤めておりました会社のコンピュータルームに鎮座ましましておりました富士通のＦＡＣＯＭ４５０だったか４５だったかそのような名前の大型（中型？）コンピュータにぞっこん惚れ込んでしまい、無理矢理押しかけて仲間に入れてもらい、業務の合間に「ちょっとこれ、流してくれない」てな調子でパンチカードの束を渡したりしたものでした。
当時はプログラムの１行を１枚のカード（ハガキをもう少し細長くしたくらいのサイズ）にカードパンチャーで穴をあけたものをプログラムとして読み込ませて実行しました。
プログラムの１行が１枚ですから、ちょいと長くて５００行くらいのプログラムになると持ち運びも大変でした。
ともかくそういう懐かしい思い出の残るプログラム言語ですから、そのうち走らせてみたいと思って、実はＭＢＡＳＩＣと同じ時期に（今年２月ごろ）ダウンロードしておいたのです。
入手先はＭＢＡＳＩＣと同じ、こちらのサイト（http://www.retroarchive.org/cpm/lang/lang.htm）からダウンロードさせていただきました。
Ｍｂａｓｉｃ．ｃｏｍの５行ほど下にＦ８０．ＺＩＰがあります。
そこをクリックして、Ｆ８０．ＺＩＰをダウンロードしてディスクに保存してから、解凍します。
解凍すると、ＦＯＲＴＲＡＮ８０本体（Ｆ８０．ＣＯＭ）以外にいくつかのファイルが現れます。
しかし。
さて。
これを一体どのようにして、動かすのだ？
インターネットはほんとに便利でありまして、情報の宝庫であります。
あちこち検索しておりましたら、ちょうどぴったり、というサイトに行きつきました。
こちらのサイトです。
http://ldlabo.hishaku.com/NO35/main.htm
おお。
私と同じところからダウンロードされたようです。
このＦＯＲＴＲＡＮ８０もＭＢＡＳＩＣと同様Ｍｉｃｒｏｓｏｆｔ社の製品でありますから、フリーではないと思うのでありますが。
ま、しかし。
個人として使う分には問題はないでありましょう。
もちろん、配布するなどということはできませぬから、ご興味がお有りの方はご自身でダウンロードなさってくださいませ。
上記サイトにはＦＯＲＴＲＡＮの短いサンプルプログラムが紹介されております。
私自身はもう４０年も前のことですから、ＦＯＲＴＲＡＮなど全く完全に忘却してしまいまして、露カケラほどの記憶も残ってはおりませぬ。
ＦＯＲＴＲＡＮのプログラムをどうやって書いたらよいのか、さっぱりわかりません状態でありましたから、上記サイトにありましたサンプルプログラムをそのままそっくり有り難く使わせていただくことにいたしました。
こちらが、有り難く使わせていただいたＦＯＲＴＲＡＮソースプログラムです。
PROGRAM HELLO
WRITE(3,100)
100 FORMAT(' HELLO WORLD!! by FORTRAN80')
WRITE(3,110)
110 FORMAT(3X,'A,B,C,D=')
READ(3,120) I,J,L,M
120 FORMAT(4I15)
K=I+J+L+M
WRITE(3,200) K
200 FORMAT(3X,'A+B+C+D=',I5)
END
|
