watermint.org

久しぶりに発掘したプログラマブル関数電卓 SHARP EL-5120。これにはBASICライクなプログラムが組める機能が搭載されており、当時プログラミングしたプログラムがそのまま残っていました。たぶん、94年〜95年頃にかけて作ったプログラムですね。何のこと無い、教科書そのままのプログラムです。

GCM : REAL
INPUT A
INPUT B
T=A*B
LABEL G
M=A-INT (A/B)*B
IF M=0GOTO E
A=B
B=M
GOTO G
LABEL E
PRINT "GCM
PRINT B
WAIT
PRINT "LCM
B=T/B
PRINT B

GCM(最大公約数)とLCM(最小公倍数)を求めるためのプログラムです。ユークリッドの互除法ですね。懐かしい。続いては、割ったあまりを求めるだけのプログラム。

MOD : REAL
INPUT A
INPUT B
M=A-INT (A/B) * B
PRINT M

シンプルですね。とはいえ、以外と役に立った記憶があります。次は

CRAMEL : REAL
PRINT"AX+BY=P
PRINT"CX+DY=Q
WAIT 1
INPUT A
INPUT B
INPUT P
INPUT C
INPUT D
INPUT Q
Z=AD-BC
X=(PD-BQ)/Z
Y=(AQ-CP)/Z
PRINT X
WAIT
PRINT Y

これもクラメルの公式通りですね。2元1次方程式の解の公式。次が残っていた最後のプログラムです。素因数分解をするやつですね。

SOINSU : REAL
INPUT A
C=2
M=√A
LABEL K
D=A/C
IF D=INT DGOTO W
C=C+1
IF C>MGOTO F
GOTO K
LABEL W
PRINT C
A=A/C
IF A=1GOTO E
PRINT "HIT KEY
WAIT
GOTO K
LABEL E
END
LABEL F
PRINT A

ちなみに、IF A=1GOTOのようにA=1とGOTOの間にスペースが空かないことに違和感があるかもしれませんが、どうもEL-5120の仕様です。変数は1文字の物しか使えなかったはずです。この電卓を買った当時まだパソコンは所持しておらず、プログラムを組む、ということはとても高貴なことで、制約の多かったEL-5120 BASICでのプログラミングもとても楽しい時間でした。同時期に持っていた、CASIOの関数電卓はぜんぜんグラフィカルではないプログラマブル関数電卓で、しかもメモリも30ステップ分しか無く、途中でうち間違えたらやり直し、というシビアなプログラミング環境でしたが、それでも夢中でプログラムしていたのを思い出します。高校一年の頃です。z80のマイコンボードでハンドアセンブルしたプログラムを16進キーボードで入れてたのは高校三年の頃。今は、その当時と比べれば雲泥の差の環境を持ちながら、うまく使いこなせていないのが少し残念です。がんばらないと！とりあえずコンピュータの数学でも買ってきて久しぶりに勉強しようかな。

最近、忙しかったこともあり、なかなか部屋が片付きません。一応、すこしずつ片付けてはいるものの、基本的に物が多すぎるんですね。きっと。いらないもの、いっぱいある気がします。さて、いらない物もあれば必要な物もあります。たまに思うのが、いま手元にある物で一番古い、長く使っている物は何だろう？という疑問。さて、何が一番古いのか・・・。

電子機器で一番古いものだと、関数電卓ですかね。ちょっと探したけど全然みつからないので、どこにあるかわかりません。SHARPの関数電卓で、中学2年だか、3年ぐらいに小遣いをためて買った気がする。とりあえず15年以上前の物であることは確実。でも、今は使っていないので、現役で一番古いものだとステレオかな。ONKYOのDR-2000というDVDプレーヤです。これは7年半使っています。ちなみに、関数電卓だとほかにはSHARPのEL-5120がすぐ手元に見つかりました。これは94年に買った物なので、14年前の物ですが、これも、もうほとんど使ってません。なにせ、パソコンで、Maximaとか使った方が圧倒的に高性能ですし・・・。すいません。
関数電卓だとCASIOのプログラマブル電卓というのも持っていましたが、これはずいぶん前に兄に譲りました。今、電卓で主力というと、無印良品の電卓12桁・黒と、CASIOのDS-10K ecoというような事務電卓ですね。すっかりsin, cosは使わない生活になってしまいました。

それ以外に古い物と言えば、文具です。一番古いのはダントツでハサミだと思います。何のこと無い、普通のステンレスのハサミですが、買ってもらったのはたしか小学4年ぐらいの頃です。たぶん、300円ぐらいだったと思います。20年選手ですね。これは現役です。それほど大事に使っているわけではありませんが、目立った刃こぼれも無く、テープを切ったときの粘つきもさほど無く、今でも快調に仕事をこなしてくれます。使用頻度を考えれば、この20年で一番使っている道具です。ハサミは歴代、これ以外に2つぐらい買った気がしますが一番古い、今使っているハサミ以外はもう残っていません。
あと、現役を退いた文具で現存する(はずの)一番古い物は竹製の30cm物差しです。これは小学1年の入学時に学校で配布された物です。まだ見つかれば、25年前の物ですね。少なくとも、高校生ぐらいまでは現役で使っていました。

パソコン関連では、パソコンは今のところ同時に一台しか持たないポリシーにしたので、2年前に買ったMacBook Proが現役かつ最新です。ソフトウエアでいうと、どれが一番古いでしょう。これは判断が難しいですね。Mac OS X、というより、Darwinに含まれるソフトウエアの古さを評価するか、NeXTSTEP由来やUNIX由来のAPIを古いとするか迷います。その辺の議論は難しいので、手元にあるデータで一番古い物を探してみました。残念ながらバックアップの段階で日付情報が失われており、最古のデータは1997年5月21日14:29分になってしまっていますが、記憶が正しければそれらは93〜94年代に作成されたものなので、13〜14年前の物ですね。当時の学校の宿題なんかもちょっと残っています。懐かしいなあ。