今更、雑誌の打ち込み Ｓ−ＯＳ
（注）このページは、いまだに雑誌のプログラムを打ちこんだ事を記すだけの 全機種共通モニタのページです。 Ｓ−ＯＳ ＳＷＯＲＤのコマンド ＃Ｄ［〈デバイス〉：］ ディレクトリ表示 ＃Ｌ〈ファイル〉［：〈アドレス〉］ ファイルロード ＃Ｓ〈ファイル〉：〈Sadd〉：〈Eadd〉［：〈Start〉］ ファイルセーブ ＃ＳＴ〈ファイル〉：Ｐ または ：Ｒ ライトプロテクト（Ｐ：オン、Ｒ：オフ） ＃Ｋ〈ファイル〉 ファイル削除 ＃Ｎ〈旧ファイル〉：〈新ファイル〉 新ファイル名に変更 ＃ＤＶ〈デバイス〉： デフォルトデバイス変更 ＃Ｊ〈アドレス〉 プログラムコール ＃Ｍ 各機種のモニタへ飛ぶ ＃Ｗ 画面の40字、80字モードの切り替え ＃！ ブートコマンド デバイス名 Ａ〜Ｄ：ディスクドライブ Ｅ〜Ｆ：リザーブ Ｔ ：共通フォーマットテープ Ｓ ：各システムフォーマットテープ Ｑ ：ＱＤ
２０２５年０２月の打ち込み Ｏｈ！ｍｚ ’８５／０６：Ｌｉｓｐ−８５インタプリタ Ｓ−ＯＳ用 ＯＫ
ＥＤＡＳＭでアセンブル
２０２５年０１月の打ち込み
Ｏｈ！ｍｚ ’８５／０８：ゲーム開発パッケージＢＥＭＳ Ｓ−ＯＳ用 ＯＫ
ＢＥＭＳ本体、サンプルをＺＥＤＡでアセンブル
ただしそのままでアセンブルすると
ソースリストを破壊しながら作成されるのでエラーとなります
Ｘ８０００でソーステキスト格納エリア変更するか
６行の；をＯＦＦＳＥＴ ２０００Ｈ等にしてアセンブルします
２０２４年１２月の打ち込み
Ｏｈ！ｍｚ ’８５／１０：ＣＡＰ−Ｘ８５ Ｓ−ＯＳ用 ＯＫ
ＥＤＡＳＭでアセンブル
Ｏｈ！ｍｚ ’８７／０７：アドベンチャーゲーム作成ツール ＳＴＯＲＹ ＭＡＳＴＥＲ Ｓ−ＯＳ用 ＯＫ
ＺＥＤＡ−３でアセンブル
掲載誌でサンプルゲームのダンプリスト(シークレットファイル)
となっていますが実際にはサンプルソースのダンプリストになっています
８月号にテープロードの不具合と乱数ルーチンの訂正記事あり
訂正ソースを使用する場合、訂正ソースだけをアセンブルして
分割してオブジェクトをセーブしてＳＴＯＲＹ ＭＡＳＴＥＲをロードしてから
訂正のオブジェクトをロード、変更箇所を書き換えるようにします
２０２４年１１月の打ち込み
Ｏｈ！ｍｚ ’８７／０２：テキストアドベンチャー作成ツール ＣＯＮＴＥＸ Ｓ−ＯＳ用 ＯＫ
コンバートとＭＡＩＮのソースをＺＥＤＡ−３でアセンブル
サンプルのメッセージデータが１行が長いので
Ｅ−ＭＡＴＥでないと作成出来ない部分があるようです
他のエディタやテキスト編集機能のあるソフトでは
途中までしか入力できません（ＺＥＤＡ、ＴＥＤ等）
またコンバートは１度に全部コンバートして
その状態で各コンバートしたデータ、ＣＩＮＴＥＸのＭＡＩＮをロードして
実行ファイルを作成しないといけないようです
後で各コンバートしたデータだけで作成してもハングアップするようです
２０２４年 ７月の打ち込み
Ｏｈ！Ｘ ’８８／０４：ＷＡＬＲＵＳ Ｓ−ＯＳ用 ＯＫ
ソースリストの方を打ち込みＺＥＤＡ−３でアセンブル
２０２４年 ６月の打ち込み
Ｏｈ！Ｘ ’８９／１１：ＰＵＳＨ ＢＯＮ！ Ｓ−ＯＳ、ＴＴＩ用 ＯＫ
キー操作の説明では[Ｉ][Ｍ][Ｊ][Ｋ]となっていますが
実際には[８][２][４][６]となっています
Ｏｈ！Ｘ ’８９／１０：超小型インタプリタＴＴＩ Ｓ−ＯＳ用 ＯＫ
ソースリストのマシン語部分を見れば
ダンプリストとかなり違うのがわかります
入力、実行方法ではダンプリストの方になっています
ソースはＺＥＤＡ−３でアセンブル、実行が可能です
２０２３年 ９月の打ち込み
Ｏｈ！Ｘ ’８９／０１：ＬＡＳＴ ＯＮＥ Ｓ−ＯＳ用 ＯＫ
以前に貰ったのですがソースからアセンブルする為
ＳＯＵＲＣＥＲＹでソースジェネレート、ＺＥＤＡ−３でアセンブルします
Ｏｈ！ｍｚ ’８５／０９：ＭＡＣＩＮＴＯ−Ｓ Ｓ−ＯＳ用 ＯＫ
以前に貰ったのですがソースからアセンブルする為
ソースリストの方を打ち込みＺＥＤＡ−３でアセンブル
２０２３年 ３月の打ち込み
Ｏｈ！ｍｚ ’８５／０８：ＺＩＮＧ Ｓ−ＯＳ用 ＯＫ
以前に貰ったのですがソースからアセンブルする為
Ｓ−ＯＳ ＳＷＯＲＤ、ＳＯＵＲＣＥＲＹでソースジェネレート、
ＭＡＣＥ、ＺＥＤＡでアセンブル
ＥＤＡＳＭだと条件文等でエラーになるので
少し修正が必要になります
またＸ１、ＺＥＤＡでアセンブルする際
７行の；を外し、ＯＦＳＥＴ ＄Ｃ０００−＄４Ｄ００を
ＯＦＳＥＴ ＄Ｄ０００−＄４Ｄ００にした方が
ソースを壊さずに修正が出来るので楽になります
Ｏｈ！ｍｚ ’８５／０７：ＺＡＩＤ Ｓ−ＯＳ用 ＯＫ
以前に貰ったのですがソースからアセンブルする為
Ｓ−ＯＳ ＳＷＯＲＤ、ＳＯＵＲＣＥＲＹでソースジェネレート、
ＭＡＣＥ、ＺＥＤＡでアセンブル
ＥＤＡＳＭだと条件文ＩＦ ＰＶ＝０〜でエラーになるので
少し修正が必要になります
Ｏｈ！ｍｚ ’８５／０７：ＺＥＤＡ Ｓ−ＯＳ用 ＯＫ
まずＳ−ＯＳ ＭＡＣＥ ＶＥＲ０をＶＥＲ１にします
＜０１Ｆ６ＡＨの変更＞
Ｘ１／Ｃ／Ｄ／turbo 00FF
MZ- 2000／2200(G-RAM 有) FFFF
MZ- 80Ｂ／2000(G-RAM 無) 00D0
MZ- 700 ／1500 00D0
MZ- 80K ／Ｃ／1200 00C0
＜バージョンナンバー変更＞
Ｘ１／Ｃ／Ｄ／turbo 154DＨ 00→01
MZ-80B／2000／2200 132AＨ 00→01
MZ-80K／Ｃ／1200／ 700／1500 123AＨ 00→01
以前に貰ったのですがソースからアセンブルする為
Ｓ−ＯＳ ＳＷＯＲＤ、ＳＯＵＲＣＥＲＹでソースジェネレート、
ＣＯＰＹでディスクファイルを共通テープファイルへ変換
共通テープファイルをＥＤＡＳＭ Ｘ１でアセンブルします
オブジェクトはＸ１テープフォーマットなのでＳ−ＯＳではロード出来ません
Ｓ−ＯＳ ＭＡＣＥ起動後ＮＭＩでモニタからロード
Ｇ１ＦＦＡでＳ−ＯＳに戻りＳコマンドでセーブ
ＭＺ−８０Ｋ用もＭＺ−７００でＭＺ−７００ Ｓ−ＯＳ ＭＡＣＥ起動
リセットでモニタからロード、Ｊ１ＦＦＡでＳ−ＯＳに戻りＳコマンドでセーブ
訂正記事あり（ＤＥＦＢ）、ＤＥＦＷ）のデータのセパレータ
4910 1E FE 2D 28 23 FE 2A 28 :E4
4918 2B FE 2F 28 34 3A D6 4C :10
4920 B7 C0 CD A6 38 C8 FE 29 :11
4928 C8 FE 2C C8 23 18 F3 23 :0B
4930 D5 CD 94 49 E3 19 18 09 :9C
4938 23 D5 CD 94 49 E3 B7 ED :29
4940 52 E3 18 0A 23 D5 CD 94 :B0
--------------------------------
SUM: 12 3F CE A5 01 E9 8D 4A :85
Ｏｈ！ｍｚ ’８５／０６：新バージョンチェックサム プログラム Ｓ−ＯＳ用 ＯＫ
ＥＤＡＳＭでアセンブル
訂正記事あり
＜３０００Ｈ〜＞
（誤） ３０７２〜 ０Ｄ ２０ ＦＡ ０Ｅ
（正） ３０７２〜 ２Ｄ ２０ ＦＡ ２Ｅ
（誤） ３０Ｅ８〜 ＣＤ Ｂ８ ３１ Ｆ５
（正） ３０Ｅ８〜 Ｆ５ ＣＤ Ｂ８ ３１
＜Ｂ０００Ｈ〜＞
（誤） Ｂ０７２〜 ０Ｄ ２０ ＦＡ ０Ｅ
（正） Ｂ０７２〜 ２Ｄ ２０ ＦＡ ２Ｅ
（誤） Ｂ０Ｅ８〜 ＣＤ Ｂ８ Ｂ１ Ｆ５
（正） Ｂ０Ｅ８〜 Ｆ５ ＣＤ Ｂ８ Ｂ１
ただしソースに対しての変更部分がないので下記の様にします
ソースの場合（共通部分のみの変更でＯＫ）
７８ ＤＥＣ Ｌ
８１ ＬＤ Ｌ，３
１５０ ＰＵＳＨ ＡＦ
１５１ ＣＡＬＬ ＠ＰＲＮＴ
２０２３年 ２月の打ち込み
Ｏｈ！Ｘ ’８９／０５：ソースジェネレータ ＲＩＮＧ Ｓ−ＯＳ ＳＷＯＲＤ用 ＯＫ
以前にダンプリストで打ち込んだのですが
ＳＯＵＲＣＥＲＹ変更プログラムをＲＥＤＡでアセンブル
その変更プログラムでＲＩＮＧにして
ダンプリストと同じになったのでＯＫとします
Ｏｈ！Ｘ ’８９／０６：超小型コンパイラＴＴＣ Ｓ−ＯＳ ＳＷＯＲＤ用 ＯＫ
以前に貰ったのですがソースからアセンブルする為
ＳＯＵＲＣＥＲＹでソースジェネレート、ＺＥＤＡ−３でアセンブルします
ＴＴＣ自体にテキストエディタが無いためサンプルプログラムは
ＺＥＤＡ−３のエディタを利用します
これはテキストソースが０４Ｅ００Ｈから置かれるので
参考例と同じになり都合が良い為です
２０２１年 ３月の打ち込み
Ｏｈ！Ｘ ’８９／０２：ＲＥＤＡ Ｓ−ＯＳ ＳＷＯＲＤ用 ＯＫ
以前にダンプリストで打ち込んだのですが
ＲＩＮＧでソースジェネレート、ＲＥＤＡ自身でアセンブルします
アセンブラ、エディタ部分は単独で使用可なので
それぞれ別でアセンブルします
Ｏｈ！Ｘ ’８９／０１：ＦＬＩＣＫ Ｓ−ＯＳ ＳＷＯＲＤ用 ＯＫ
以前にダンプリストで打ち込んだのですが
ＲＩＮＧでソースジェネレート、ＺＥＤＡ−３でアセンブルします
ただしソースは参考なのでまずＺＥＤＡ−３用に修正します
ＥＱＵ命令内の計算、ＩＮＣ Ｈ，Ｈ等は展開してＩＮＣ Ｈ：ＩＮＣ Ｈ
［ニモニック］はオペコードに変換（ＢＩＴ命令の所は若干違う）
メッセージはＤＭでＤＢを分ける
プログラム中のラベル＋ｎｎ＊ｍｍの掛け算は計算してラベル＋ａａに変換等
なお訂正記事は標準以外のキャラクタを使用していたのを変更
5010:A5 A5 A5 A5 → 2E 2E 2E 2E
２０２１年 ２月の打ち込み
Ｏｈ！Ｘ ’８８／０９：超小型エディタ ＴＥＤ−７５０ Ｓ−ＯＳ ＳＷＯＲＤ用 ＯＫ
ソースからオブジェクト作成して手動でリロケータブルファイル作成しています
２０１行が途中で切れていますがＡＤＤ Ａ，’０’−’ ’
２０１９年 ４月の打ち込み
Ｏｈ！ｍｚ ’８７／０４：ＴＡＮＧＥＲＩＮＥ Ｓ−ＯＳ ＳＷＯＲＤ用 ＯＫ
以前にもらったものですが
ＲＩＮＧでソースジェネレート、ＺＥＤＡ−３でアセンブルします
メイン部分ダンプで０８８０９Ｈ−０８ＦＦＦＨが余分に出力となっていますが
０８６Ｃ０Ｈ−０８８０８Ｈもソースでは
ＤＥＦＢ、ＤＥＦＳ命令で０００Ｈで埋まりますが
ダンプでは数値が入っています（ゲーム自体に問題はありません）
０８８０９Ｈ−０８ＦＦＦＨはソースリストの一部です
Ｏｈ！ｍｚ ’８７／０４：ＩＮＶＡＤＥＲ ＧＡＭＥ Ｓ−ＯＳ ＳＷＯＲＤ用 ＯＫ
以前にダンプリストで打ち込んだのですが
ＲＩＮＧでソースジェネレート、ＺＥＤＡ−３でアセンブルします
ここで注意するのは説明されている通りに
分割ではなく個別でアセンブルします
なお分割で行なおうとすると
ラベルの２重定義のエラーがでます
＜ＭＺ−８０Ｂ／２０００／２２００ Ｓ−ＯＳ＞
Ｓ−ＯＳ上でキー入力時にカーソルキャラクタの取り込み
１Ｂ６１：２０ → １Ｅ
＜ＰＣ−８８０１ Ｓ−ＯＳ＞
ブロックが突き抜ける症状
１１７８：２０ → ７Ｂ
Ｏｈ！Ｘ ’８８／１０：ＭＡＮＫＡＩ Ｓ−ＯＳ ＳＷＯＲＤ用 ＯＫ
以前にダンプリストで打ち込んだのですが
ＲＩＮＧでソースジェネレート、ＺＥＤＡ−３で分割アセンブルします
ただ、このままではＤＥＭＯ部分で１行抜けている為アセンブルできません
ＭＡＮＫＡＩ ＤＥＭＯソースリスト
３０９ ＰＬ１：
これでダンプリストと同じになります
２０１９年 ３月の打ち込み
Ｏｈ！ｍｚ ’８７／０２：ＭＡＲＭＡＬＡＤＥ Ｓ−ＯＳ ＳＷＯＲＤ用 ＯＫ
以前にダンプリストで打ち込んだのですが
ＳＯＵＲＣＥＲＹでソースジェネレート、ＺＥＤＡ−３でアセンブルします
Ｏｈ！ｍｚ ’８６／０４：ＬＩＦＥ ＧＡＭＥ Ｓ−ＯＳ ＳＷＯＲＤ用 ＯＫ
以前にダンプリストで打ち込んだのですが
ソースリストからＺＥＤＡ−３でアセンブルします
アセンブルでは２行のＯＦＦＳＥＴ ＄５０００−＄３０００を
＄８０００−＄３０００に変更してアセンブルします
Ｏｈ！Ｘ ’８８／０２：ＥＬＦＥＳ Ｓ−ＯＳ ＳＷＯＲＤ用 一応ＯＫ
以前にダンプリストで打ち込んだのですが
ＳＯＵＲＣＥＲＹでソースジェネレート、ＺＥＤＡ−３でアセンブルします
ただＯＲＧが２つあり、８バイト隙間が出来るのですが
その中にソースリストが残ってしまいます
それが１バイトずれています（私自身のタイプミスの可能性有り）
作成したオブジェクト自体はＯＫなので
例えば＋０１Ｈを＋１Ｈ等のタイプミスが考えられるのですが
何回見直してもありませんでした
そこでＺＥＤＡ−３のテキストをディタコマンドＸ４Ｅ０１を実行して
１つ後ろにずらしてからアセンブルで作成すればダンプリスト通りになります
＜ＭＺ−８０Ｋ／７００／１５００＞
ゲーム終了時の誤動作
８Ｆ６Ｄ：８０
９１４Ａ：００ ００
９１５４：００ ００
Ｏｈ！ｍｚ ’８６／０８：五目並べ Ｓ−ＯＳ ＳＷＯＲＤ用 ＯＫ
以前にダンプリストで打ち込んだのですが
ＳＯＵＲＣＥＲＹでソースジェネレート、ＺＥＤＡ−３でアセンブルします
プログラム本体は＄３０００からなので
Ｏ２０００、Ｘ７０００等の設定でソースジェネレートを行います
アセンブルでは５８行のＯＦＦＳＥＴ ＄１Ｄ００を
＄１Ｅ００に変更してからでないとＺＥＤＡ−３ではアセンブル出来ません
なお訂正記事はＬＯＣルーチンの動作関連です
＜変更＞
４７５１：ＣＤ １Ｅ ２０→ＣＤ Ｂ０ ４Ａ
４７５Ｂ：ＣＤ １Ｅ ２０→ＣＤ Ｂ０ ４Ａ
＜追加＞
４ＡＢ０：Ｆ５ ＣＤ １Ｅ ２０ Ｆ１ Ｃ９
Ｏｈ！ｍｚ ’８７／０８：ＳＯＵＲＣＥＲＹ Ｓ−ＯＳ ＳＷＯＲＤ用 訂正記事あり
以前にダンプリストで打ち込んだのですが
ＳＯＵＲＣＥＲＹ自体をソースジェネレートしてテキストを抽出
テキストエディタで編集、イメージに書き直しました
ソースリストはＺＥＤＡ−３で分割アセンブルします
また訂正記事があります
＜マクロ関係の訂正＞
38DD FE 40 DA DF 33 FE 70 D2 : 6A
38E5 DF 33 E6 07 FE 06 D2 DF : B4
38ED 33 4E 23 CD 58 40 CA DF : B2
38F5 33 7E A9 FE 09 C2 DF 33 : 35
38FD A1 28 05 FE 09 C2 DF 33 : A9
3905 CD 69 40 4C 44 20 20 20 : 66
390D 00 79 0F 0F 0F 0F E6 03 : 9E
3915 47 79 0F E6 03 4F C3 5D : 27
391D 3B : 3B
---------------------------------
SUM: 33 C2 EF F0 F1 46 93 76 3A06
Ｏｈ！ｍｚ ’８７／０８：碁石拾い Ｓ−ＯＳ ＳＷＯＲＤ用 ＯＫ
以前にダンプリストで打ち込んだのですが
ソースリストからＺＥＤＡ−３でアセンブルします
２０１７年１０月の打ち込み
Ｏｈ！ｍｚ ’８６／１１：ＭＡＺＥ ＩＮ ＭＡＺＥ Ｓ−ＯＳ ＳＷＯＲＤ用 一応ＯＫ
ＭＺ−２０００ Ｓ−ＯＳなら完全に動作しますが
他の機種のＳ−ＯＳでは動作しない場合が多いようです
ソースからのアセンブルもＯＫ
ＳＯＵＲＣＥＲＹでソースジェネレートする場合
ＤＥＦＭ（ＤＭ）を一気に指定するとバッファオーバーする場合があります（マップデータ）
Ｘ１で作成の場合マップデータ（ＢＩＮ）だけセーブしてディスクＢＡＳＩＣ上で
フリーアドレス内にロードしてアスキー変換をすれば楽にマップデータを作成できます
ＰＣ−８００１ Ｓ−ＯＳ 画面が少しおかしい （プレイ可）
ＰＣ−８８０１ Ｓ−ＯＳ 画面が少しおかしい （プレイ可）
ＭＺ−８０Ｂ Ｓ−ＯＳ 画面が出ない （プレイ不可）
Ｘ１ Ｓ−ＯＳ ３Ｄ迷路表示がおかしい（プレイ不可）
Home へ戻る