今更、雑誌の打ち込み ＰＣ−８００１系
（注）このページは、いまだに雑誌のプログラムを打ちこんだ事を記すだけの なーんの意味の無いコーナー（中島みゆき調）です。
２０２４年１１月の打ち込み ’８５／０８ アスキー ＲＥＭ ＬＵＭ ＰＣ−８００１ ＭＡＩ用 要修正
訂正記事はなさそうですが、このままでは動作しません
原因はマシン語データ（サブルーチン含む）が化けて掲載されています
A040:00 00 ← 06 00
A07F:60←6C
A0B8:00←87 , A0C0:00←20 , A0DC:30←20 , A10C:81←87
A138:00←20 , A140:00←20 , A15E:B5←95 , A17F:E3←F3
A18C:E1←F3 , A1B8:00←6C , A1C0:00←28 , A1DC:F0←B0
A20C:00←02 , A238:00←03 , A240:00←02 , A25C:12←02
A25E:26←06 , A27F:00←04 , A28C:69←FF , A2B8:00←05
A2C0:00←64 , A2DC:74←64 , A2DE:20←00 , A2FF:01←03
’８５ 年刊Ａｈ！Ｓｋｉ ＃５ ＫＷＡＲＴＥＲＫＡ ＰＣ−８００１用 ＯＫ
２０２４年１０月の打ち込み
’８３／０３ アスキー ＦＵＮＫＥＹ ＫＯＮＧ ＰＣ−８００１用 ＯＫ
以前打ち込んだものの無くしてしまい再度の打ち込みです
１周クリア確認済み
’８１／１０ マイコン ピラミッドとエイリアン ＰＣ−８００１用 ＯＫ
以前打ち込んだものの無くしてしまい再度の打ち込みです
クリア確認済み
２０２４年０９月の打ち込み
’８４／１１ ＰｉＯ Ｇｏｌｄ Ｃｒｏｓｓ ＰＣ−８００１用 ＯＫ
クリア確認済み
’８１／０２ マイコン ミミズの滝のぼり ＰＣ−８００１用 ＯＫ
以前打ち込んだものの無くしてしまい再度の打ち込みです
’８３／０１ テクノポリス ＲＯＣＫ ＫＩＣＫ ＰＣ−８００１用 ＯＫ
２０２４年０８月の打ち込み
’８５／０９ テクノポリス トロッコ ＰＣ−８００１用 ＯＫ
クリア確認済み
’８２／０９ マイコン ＣＲＡＺＹ ＤＥＳＣＥＮＤＥＲ ＰＣ−８００１用 ＯＫ
クリア確認済み
２０２４年０７月の打ち込み
’８４／０２ ＰＯＰＣＯＭ マッドパックマン ＰＣ−８００１用 ＯＫ
１周クリア確認済み
読者投稿でミスの報告がありました
1010 DATA -26558,-26528,-26560,-22622,-26535,-26432,-26544,-26615
’８５／０４ ＰｉＯ Ｔｌｉｘ ＰＣ−８００１用 ＯＫ
訂正記事あり
A5B9:40
A5BA:A3
A600:CD 10 AF 00 00 00 00 00 00
AF10:AF 21 00 90 47 77 23 77 23 77 23 10 F8 3D 06 10
AF20:21 10 90 77 23 10 FC C9
２０２４年０６月の打ち込み
’８４／０６ ＰＯＰＣＯＭ ジョーズ ＰＣ−８００１用 ＯＫ
訂正記事有り
270行 のマシン語ＤＡＴＡの＃ＤをＣＤに修正
また、’８５／０３に再録されています
２０２４年０５月の打ち込み
森 巧尚のＢＡＳＩＣ ＭＡＧＩＣ ＣＨＡＯＺ ＰＡＮＩＣ ＰＣ−８００１用 ＯＫ
’８１／０５ Ｉ／Ｏ ＰＣ−ＬＩＳＰ ＰＣ−８００１用 ＯＫ
２０２４年０２月の打ち込み
’８３／０９ ＢＡＳＩＣマガジン ＨＥＬＩＣＯＰＴＥＲ ＳＣＲＡＭＢＬＥ ＰＣ−８００１ｍｋII用 ＯＫ
２０２３年１２月の打ち込み
’８６／０４ ＰｉＯ ＴＨＥ ＣＯＣＫＰＩＴ ＰＣ−８００１ｍｋII用 ＯＫ
６３０行が何もないので’の印字が消えているようですが
訂正記事では
630 REM
となっています（あまり変わりませんが．．．）
’８４／０４ アスキー Ｄｏｇ Ｆｉｇｈｔ ＰＣ−８００１用 ＯＫ
２０２３年１１月の打ち込み
’８２／０７ アスキー タクシードライバー ＰＣ−８００１ ＴＬ／１・ＰＣ用 ＯＫ
’８１／０３ アスキー 浅野オセロ ＰＣ−８００１用 ＯＫ
２０２３年１０月の打ち込み
’８２／０８ アスキー ＨＡＬＬＯＷＥＥＮ ＰＣ−８００１（＋ＰＣＧ）用 ＯＫ
’８１／０９ アスキー アステロイド ＰＣ−８００１ ＧＡＭＥ−ＰＣ用 ＯＫ
’８１／０８ アスキー ギャラクシアン ＰＣ−８００１ ＴＬ／１・ＰＣ用 ＯＫ
以前ディスクベースのＴＬ−１・ＰＣで打ち込んでたのですが
当時ＭＨの２ＨＤドライブでソース作成したので
あまり使わない２ＨＤ用２Ｄ作業ディスクを紛失してしまい
新たに打ち込みとなります
機種によっては実行後すぐにIllegal function call が出ます
原因はマシン語サブルーチンで使用する
ワークデータ０ＦＦＣ０Ｈ〜（本体イニシャライズ後空き領域）が
ＰＣ−８００１のように00Ｈでクリアされておらず
ＰＣ−８８０１では20Ｈや80Ｈとなっており
そこを利用するマシン語サブルーチン内が
使用するワークデータ範囲外となってエラーが出ます
訂正記事ではなく読者投稿欄（ＤＭＡ）で“あるバグとの戦い”として
それぞれ違う読者が２回ＰＣ−８８０１で動作するまでの過程が載っています
ただし、’83／12月号のソースは間違っているので
説明通りのソース修正します
またデモを長く続けているとエラーがでるそうです
＜’83／９月号のあるバグとの戦いの場合＞
C7F0:21 C0 FF 06 21 36 00 23 10 FB C3 00 C8
を追加、実行アドレスは０Ｃ７Ｆ０Ｈ
＜’83／12月号の続・あるバグとの戦いの場合＞
ソース
1585 ' FOR I:=$C0 TO $DE DO MOM($FF,I):=0
を追加、実行アドレスは０Ｃ８００Ｈ
’８２／０８ アスキー ＳＫＹ ＳＨＯＯＩＮＧ ＰＣ−８００１用 ＯＫ
２０２３年０９月の打ち込み
’８２／０９ アスキー 新森田オセロ ＰＣ−８００１用 ＯＫ
通称、森田オセロ Ｖ３．７
マシン語が間違って別のダンプになっています
１０月号に正しいマシン語のダンプが掲載されています
２０２３年０６月の打ち込み
’８５／０２ ＰｉＯ ＣＡＶＥＲＮＯＵＳ ＰＣ−８００１用 ＯＫ
途中まで打ち込んでそのままだったモノを今になって完了
１周（２０面）クリア確認済み
２０２３年０５月の打ち込み
’８４／０７ ＰＯＰＣＯＭ バブルゲーム ＰＣ−８００１ｍｋII用 ＯＫ
２０２３年０２月の打ち込み
’８３／１０ Ｉ／Ｏ Ａｄｅ ＰＣ−８００１用 ＯＫ
サンプルのセーブ、ロード、コンパイルではＯＫです
’８４／１０ ＰＯＰＣＯＭ フィールドオリンピック ＰＣ−８００１用 ＯＫ
途中まで打ち込んでそのままだったモノを今になって完了
またタイトル、パワーゲージ、地面（２００行）等で
[ＧＲＰＨ]＋[Ｌ]のキャラクタが潰れてしまい
合わせた方が良いと思われます（プログラムには影響はありません）
２０２３年０１月の打ち込み
’８４／０６ マイコン フルーツパーラー ＰＣ−８００１ｍｋII用 ＯＫ
以前打ち込んだものの無くしてしまい再度の打ち込みです
１周クリア確認済み
’８５／０１ ＰｉＯ ミサイル＆ボール ＰＣ−８００１用 ＯＫ
２０２２年１２月の打ち込み
’８６／０８ ＢＡＳＩＣマガジン Ｔｈｅ ｂａｄ ｍａｎ ＰＣ−８００１用 ＯＫ
１面クリアした時にラウンド数が＋１されて表示されるのですが
表示位置がずれてしまいます
５４０行のＬＯＣＡＴＥ文の７３→７５
クリア確認済み
’８４／０９ ＢＡＳＩＣマガジン モグラの反乱 ＰＣ−８００１ｍｋII用 ＯＫ
２０２２年１０月の打ち込み
’８３／０６ テクノポリス ＩＣＥ ＣＲＡＳＨＥＲ ＰＣ−８００１用 ＯＫ
環境によっては２番目（下側）の様に画面がおかしくなります
訂正記事はプログラムスペースが少し詰められいるだけなので関係ありません
原因は１２２０行の画面作成で１キャラ消去（12×12ドット）Ａ＝ＵＳＲ（０）で
１キャラ表示ルーチンでＡ＝ＵＳＲ（ｎ）のｎは１〜26までで
０のデータ（消去）は無く、かつキャラクタデータは１から収納されており
インデックスも１から始まるように合わせています（元々用意されていない）
０のキャラクタデータは２５５番目の次となり（Ｂ＝００、ＤＪＮＺで制御の為）
プログラム、データ範囲外で環境によっては空きエリアは不確定なので
誤動作を起こす可能性があります
解決方法は０Ｃ３Ｄ７Ｈ〜０Ｃ３Ｅ８Ｈを全て０００Ｈにする
ＤＯＳを使用しない場合０５０００Ｈをコールして
32ＫＲＡＭを全て０００ＨにしてからＮ−ＢＡＳＩＣ起動、実行
’８３／０４ テクノポリス メテオ ファイト ＰＣ−８００１用 ＯＫ
破損したテープから一部取り出し、残りを打ち直し
Home へ戻る