復活！ＣＰ／Ｍ　ワンボードマイコンでＣＰ／Ｍを！
ＣＰ／ＭがＴＫ−８０互換のワンボードマイコンの上で復活します
ＮＤ８０Ｚ�VとＭＹＣＰＵ８０の上でＣＰ／Ｍが走ります！

［第３５９回］


●ＣＰ／Ｍ互換ＤＯＳの起動

ずっとＣＰ／Ｍ互換ソフトを作るというテーマでやってきましたのでＣＰ／Ｍ互換ＤＯＳという名前をつけましたが、その実態は現行のＺＢ３ＢＡＳＩＣシステムにＣＰ／Ｍ互換ＤＯＳを追加した形になっています。
今までＮＤ８０Ｚ�V（ＮＤ８０Ｚ３．５）で使っていただいておりますＺＢ３ＢＡＳＩＣシステムはそのまま今まで通りに使うことができて、その上さらにＣＰ／Ｍ互換ＤＯＳを起動して使うことができます。
現行のＺＢ３ＢＡＳＩＣはＺＢ３．ＥＸＥですが、ＣＰ／Ｍ互換ＤＯＳはＺＢ３ＤＯＳ．ＥＸＥというファイル名での供給になります。
ＣＤＲＯＭで供給をしますので、ＣＤＲＯＭからＺＢ３ＤＯＳ．ＥＸＥを現行のＮＤ８０Ｚ３フォルダにコピーしていただくか、または新しいフォルダを作ってそこにコピーして使ってください。

現行では
ＺＢ３［Ｅｎｔｅｒ］
でＺＢ３ＢＡＳＩＣを起動していますが、ＣＰ／Ｍ互換ＤＯＳは
ＺＢ３ＤＯＳ［Ｅｎｔｅｒ］
で起動します。

今まで　ＺＢ３［Ｅｎｔｅｒ］　と入力して起動していたところを　ＺＢ３ＤＯＳ［Ｅｎｔｅｒ］　と入力して起動するところが違うだけで、そのほかは今までのＺＢ３ＢＡＳＩＣの起動、操作方法と全く同じです。
ＮＤ８０Ｚ�V（ＮＤ８０Ｚ３．５）をパソコンにＵＳＢ接続して、先にＮＤ８０Ｚ�V（ＮＤ８０Ｚ３．５）の電源を入れておきます。
ＤＯＳプロンプト（コマンドプロンプト）を開いて（必要ならばＣＤコマンドでＺＢ３ＤＯＳ．ＥＸＥのあるディレクトリに移動して）、
ＺＢ３ＤＯＳ［Ｅｎｔｅｒ］

と入力すると、

ＮＤ８０Ｚ�Vに接続しました

と表示されますから、ＮＤ８０Ｚ�V（ＮＤ８０Ｚ３．５）から
［＊（Ｉ／Ｏ）］［８］
と入力します。

ＤＯＳプロンプト（コマンドプロンプト）画面に

０００１　００００　−

と表示されますから、そこで
ｚ
と入力すると、ＺＢ３ＢＡＳＩＣが起動します。
起動後は今まで通りＺＢ３ＢＡＳＩＣの全ての機能が使えます。

●ＣＰ／Ｍモード

ＺＢ３ＢＡＳＩＣのコマンド入力画面（＞が表示されています）で、

／ＣＰＭ［Ｅｎｔｅｒ］

と入力すると、ＣＰ／Ｍ互換ＤＯＳが起動し、それ以後はＣＰ／Ｍモードになります。

ＣＰ／Ｍモードでの操作中に、

ＺＢ３［Ｅｎｔｅｒ］

と入力すると、ＺＢ３ＢＡＳＩＣに戻ります。

以上の操作を実際の画面で見ていただくことにいたします。
ＣＰ／Ｍ互換ＤＯＳを起動します。

本当は　ＺＢ３ＤＯＳ［Ｅｎｔｅｒ］　なのですが、今はまだデバッグ作業中なので、後ろにバージョンナンバーがついています。
ＮＤ８０Ｚ�Vに接続しました
と表示されますから、ＮＤ８０Ｚ�V（ＮＤ８０Ｚ３．５）で
［＊（Ｉ／Ｏ）］［８］
と入力します。

０００１　００００　−
と表示されます。

ここでパソコンのキーボードから
ｚ
と入力します。

ＺＢ３ＢＡＳＩＣが起動しました。


試しにＺＢ３ＢＡＳＩＣを実行してみます。

ＺＢ３ＢＡＳＩＣでは省略形が使えます。
ｆ．→　ｆｏｒ
ｐ．→　ｐｒｉｎｔ
ｎ．→　ｎｅｘｔ
．→　ｌｉｓｔ
です。

実行してみました。

ｒ．→　ｒｕｎ
です。

ここまでは現行のＺＢ３ＢＡＳＩＣと全く同じですが…。
ここからが違ってきます。

／ｃｐｍ［Ｅｎｔｅｒ］と入力しました。

Ａ＞
と表示され、ＣＰ／Ｍ互換モードになりました。

ＭＢＡＳＩＣを起動しました。

［注記］
ＭＢＡＳＩＣはＭｉｃｒｏｓｏｆｔが版権を所有していますので勝手に配布はできません。
皆様がご自身の判断で入手してください。
ＭＢＡＳＩＣにつきましては［第１５７回］でご案内をしております。

こちらも実行してみました。
が。
まさかの手違いで画像をキャッチするのを忘れてしまいました。
むむ。
残念です。
本日はちょっと時間がありません。
ＭＢＡＳＩＣの実行画面につきましてはまた次回にあらためてお見せすることにいたします。
ああ。
そうでした。
ログファイルがありました。
今回の終わりのところでログファイルをお見せしますので、それでご確認ください。

ＭＢＡＳＩＣからＣＰ／Ｍ互換モードに戻るには
ＳＹＳＴＥＭ［Ｅｎｔｅｒ］
と入力します。


ＣＰ／Ｍ互換モードからＺＢ３ＢＡＳＩＣに戻るには
ＺＢ３［Ｅｎｔｅｒ］
と入力します。

ここではさきほど入力したＺＢ３ＢＡＳＩＣのプログラムをそのまま実行していますが、いつもこのようにできるというわけではありません。
ＣＰ／Ｍ互換モードやその上で動作するＭＢＡＳＩＣなどのアプリケーションによってＺＢ３ＢＡＳＩＣの作業エリアが破壊されてしまうこともありますから、その場合にはＢＡＳＩＣプログラムも破壊されてしまいます。

［Ｃｔｒｌ］＋［Ｅ］
でＺＢ３ＢＡＳＩＣを終了しました。


ところで、上記の操作のすべて、つまりＺＢ３ＢＡＳＩＣ→ＣＰ／Ｍ互換ＤＯＳ→ＭＢＡＳＩＣの全てがログファイルとして記録されています。
ちょいと自慢したい機能です。

logfile nd80zlog\03292013.txt open ＮＤ８０Ｚ�Vに接続しました 0001 0000 - z 1000 00C3 - *** nd80z3 basic **** >auto > 10 10'*** nd80z3 basic test > 20 20f.a=0 to 10 > 30 30p."a=";a,"sqrt(";a;")=";sqr(a) > 40 40n.a > 50 50 >. 10 '*** nd80z3 basic test 20 FOR A=0 TO 10 30 PRINT "a=";A,"sqrt(";A;")=";SQR(A) 40 NEXT A >r. a=0 sqrt(0)=0 a=1 sqrt(1)=1 a=2 sqrt(2)=1.41421 a=3 sqrt(3)=1.73205 a=4 sqrt(4)=2 a=5 sqrt(5)=2.23607 a=6 sqrt(6)=2.44949 a=7 sqrt(7)=2.64575 a=8 sqrt(8)=2.82843 a=9 sqrt(9)=3 a=10 sqrt(10)=3.16228 >/cpm can't open D.vfd loading ZBDOS,wait a while... A>b: B>dir B: VFTST23 COM : TEST SAF : VFTST24 COM : VFTST25 COM B: MBASIC COM B>mbasic BASIC-80 Rev. 5.21 [CP/M Version] Copyright 1977-1981 (C) by Microsoft Created: 28-Jul-81 25400 Bytes free Ok auto 10 '*** mbasic test *** 20 for b=0 to 10 30 print "b=";b,"sqrt(";b;")=";sqr(b) 40 next b 50 ^C Ok list 10 '*** mbasic test *** 20 FOR B=0 TO 10 30 PRINT "b=";B,"sqrt(";B;")=";SQR(B) 40 NEXT B Ok run b= 0 sqrt( 0 )= 0 b= 1 sqrt( 1 )= 1 b= 2 sqrt( 2 )= 1.41421 b= 3 sqrt( 3 )= 1.73205 b= 4 sqrt( 4 )= 2 b= 5 sqrt( 5 )= 2.23607 b= 6 sqrt( 6 )= 2.44949 b= 7 sqrt( 7 )= 2.64575 b= 8 sqrt( 8 )= 2.82843 b= 9 sqrt( 9 )= 3 b= 10 sqrt( 10 )= 3.16228 Ok system B>a: A>dir A: F80 COM : HELL1 FOR : HELL1 REL : HELLO FOR A: HELLO REL : HELL2 FOR : HELL2 REL : HELL3 FOR A: HELL3 REL : M80 COM : MVFTST1 MAC : MVFTST1 REL A: MVFTST1B MAC : MVFTST1B PRN : MVFTST1B REL : MVFTST1C MAC A: MVFTST1C PRN : MVFTST1C REL : L80 COM : MVFTST1C COM A: VFTST1 COM : FORLIB REL : HELLO COM : MVFTST1D MAC A: MVFTST1D PRN : MVFTST1D REL : MVFTST1D COM : MVFTST1E MAC A: MVFTST1E PRN : MVFTST1E REL : MVFTST1E COM : MVFTST1F MAC A: MVFTST1F PRN : MVFTST1F REL : MVFTST1F COM : MVFTST1G MAC A: MVFTST1G PRN : MVFTST1G REL : MVFTST1G COM : VFTST9 COM A: VFTST2 COM : VFTST4 COM : VFTST5 COM : VFTST4-1 TXT A: VFTST16 COM : TESTDATA TXT : VFTST14 COM : VFTST6 COM A: VFTST7 COM : VFTST8 COM : VFTST10 COM : FNC0BT-2 COM A: FNC06T-2 COM : FNC03T-2 COM : VFTST102 COM : VFTST105 COM A: VFTST11 COM : VFTST12 COM : VFTST13 COM : VFTST18 COM A: VFTST19 COM : VFTST15 COM : VFTST17 COM : VFTST107 COM A: VFTST202 COM : TEST RAF : FNC05T2 COM : VFTST21 COM A: VFTST22 COM A>zb3 end of ZBDOS >list 10 '*** nd80z3 basic test 20 FOR A=0 TO 10 30 PRINT "a=";A,"sqrt(";A;")=";SQR(A) 40 NEXT A >run a=0 sqrt(0)=0 a=1 sqrt(1)=1 a=2 sqrt(2)=1.41421 a=3 sqrt(3)=1.73205 a=4 sqrt(4)=2 a=5 sqrt(5)=2.23607 a=6 sqrt(6)=2.44949 a=7 sqrt(7)=2.64575 a=8 sqrt(8)=2.82843 a=9 sqrt(9)=3 a=10 sqrt(10)=3.16228 >0000 00C3 - リモート接続を終了しました logfile closed at Fri Mar 29 20:23:02 2013

ワンボードマイコンでＣＰ／Ｍを！［第３５９回］
２０１３．３．２９ｕｐｌｏａｄ

前へ
次へ
ホームページトップへ戻る