演題 | あるN88ーBASICプログラムのVB4への変換 | |
発表者 (所属) | 石川俊英 (光輪学院) | |
連絡先 |
〒542 大阪市中央区上汐2ー3ー14 TEL 06ー(764)ー0088 | |
キーワード | プログラム言語変換 | |
開発意図 適用分野 期待効果 特徴など |
このファイル変換用プログラムは、N88ーBASICで書かれたプログ ラムをマイクロソフト社のVISUAL BASIC(v4)に変換する際 できるだけ少ない労力で変換できるように作成した。しかし、両方のプログ ラムの機能がかなり異なることから満足すべき結果になっていない。 | |
環境 | 適応機種名 | NEC PCー9801シリーズ と DOS/V |
OS 名 | Windows95、MS−DOS(N88−Basic版) | |
ソース言語 | Visual Basic V4 and N88ーBasic | |
周辺機器 | ||
流通形態 右のいずれ かに○をつけ てください) |
|
具体的方法 |
表 1: N88_BとVB4の比較表
N88_B | VB4 |
---|---|
WINDOW | ScaleHeigth=h : ScaleWidth=w |
VIEW | ScaleTop=t : ScaleLeft=l |
PRINT USING "##.##";A | Print Format$(a,"##.##") |
LINE(X1,Y1)-(X2,Y2),C,B | x=ScaleWidth/5:y=ScaleHeight/5 c=RGB(r,g,b) or c=VBColor(cc) Line(x,y)-Step(x,y),c,B |
LINE-STEP(X,Y),C | Line-Step(x,y),c |
CIRCLE(X,Y),R,C | Circle(w/2,h/2),r,c |
MKI$/MKS$/MKD$ | 対応してない |
DATA | 対応してない(OLEクライアント) |
テキスト画面にメッセージを表示するためのLOCATE X,Y:PRINT”文字”は、VB4では、フォームの中に座標位置を指定して、Msg=”文字”で表示するようになっている。これもトィップ単位で変換するようにした。エラー処理で、ON ERROR GOTO文およびERLの行き先はラベル番号にしている。幸い、ERR=ナンバーがここではVB4と同じだったので特に変更していない。DEF FN文は、VB4ではFUNCTIONオブジェクトとして分けるようにした。変数のデータ型は、特に定義しなかったのでバリアント型になっている。