ホ-^ パー ソナ/ レ コンピュータ 情報誌 资 ^ 付 錄 汐ヲ ト钩 多 回 多 発売 記念/ F1XD を お買い上げの 方 4,00 に 括 題の RPG1 F1XD& いている ご 愛 南 者 カードを 送って ください。 毎週 毎週 で 期間 中 合 言 抑 ふこ、 外れた 方 I、 こは もれなく 「イ こ ス」 オリ ジナ, ステ々 カーを さし あけ k くわしくは \ \ 『 イ -んプ レゼ 外 キャン‘ ン 悔しい じ やない i 負けて 帰る のは JI 幻の 雀士 たちとの 世紀の _ 敝. 史上 最強の 相手/ リアルな 卓 デザインに キミの 手は 震える. ©Chatrvor Inc./ Sony Corporation (64K 以上、 V-RAM128K〉 HBS-G059C ¥6,80 2061 年 W\ レー の 雄に _ む ハレー彗星 探査の スカイラブ 「JESUS」 が、 人類 生き残りを 賭けて モンスターと 激闘/ スリリング 度 N0.1/ ミ ラコフ ns 【コメット】 か 多 速 雄 nraKPU/rt 嶋 ようで r •,デ んどん 入って •て* す j カー ノン r 【コメット】 «、 ハレー® a as if 「ええ、 きのう その 遍鼸^ 入り ま V PUSH SPACE KEY 01986. SVl/MOVtC ARTMIC ©1987. SCAPTRUST (64K 以上, V-RAM128K) HBS-G065D ¥6,800 _54, 咖 R/® 機) 名 il: 『イ -ス成 肢 •カタ □グ 送呈 = 住所 •氏名 •年齡 •職業 •電話番号 •檐欞 名を 明記の 上、〒 108 東 京都 高 輪 局 区内 ソ. ニー㈱ カタログ mm 係へ お 申 みください。# CS1 は アスキーの 商標です。 參£23 の ソフトは、 ソフトに 表示して ある 容量 以上の パソコン システム で お使いく ださ X また、 CEh の ソフトは C532 の パ 为 ン システムで お楽しみ 下さい。 *** 巧 n wmm •*! 1 5?. 冬 I > 1 辛 1 ; (|'| *i i \W \*\ 3 杏 9 ±: 1±\ iin 1 一一 1 ^ JANUARY 1988 No.50 ⑱ 特集 这 011 = 蹈 謂0 謂^5 MSX による パーテイ© i8M» 演出 術 あれこれ 年末を 控えて パーティ の 企画を 抱えて いる 人 も 多 いんじ やない かな 7 クリスマス とお 正月と い 5 二大 シチュエーションを 想定した うえで、 MSX の ちょっと 変わった 応用 テクニックを 特製 プロ グラ 厶つ吉 で お贈りし よ 〇。 ©ゲームす とり〜 と # Misio/ の も 5 止まらない 好奇心 © ラッキーの ゲームに 夢中/ エニ ツ クスの 話題 作 「JESUSj に 挑戦 した そ/ ® SOFT TOPICS ©TOP20 ©ソフト レビュー パート 1 —— 八イ ドライ ド 3、 怒 • IKARI、 死霊 戦線、 BREAK IN, スーパー ランナー パー ト 2 —— HALNOTE ❿ クローズアップ ソニーに 直撃 取材/ # SOFT INFORMATION 最新 ゲームの 情報 満載/ ドラゴン バスター/ウル テイ マ IV/ ウイザード リイ/アル カノ イド II/ 5 る 星 やつら/ アシュ ギーネ • 復警の 炎 • 虚空の 牙城な ど 全 20 本を 大 紹介 s 発行 人 ^ 塚本慶 一郎 田 口 旬 一 編集 中 本 健 作 宮川隆 芳賀恵 子 y 野 口岳郎 小 畠 找 醒 協力/ MAG 野 村圭子 山 赚 司 石 川 直 太 永 井 A 健- 伊藤 学 出 浦 美 佐 子 AD 藤 瀬 典 夫 Design/ スタジオ b 4 日本 p クリエ イト Photo 吕 raphy/ 石井宏明 内藤哲 小 池 章 郷景雄 lllustr p ation/ 明日 敏子 める へんめ 一力'- 桜 沢 エリカ 小山 内 仁 美 高 橋 キン タ ト ロー 村 田賴子 野沢朗 秋 山 雫 岩 村実樹 深; M 友賀 水口 幸 広 及 川達郎 佐 藤 多 華 広告/佐 藤敏明 広 岡隆英 出版 営業/ 武藤 正直 西 沢 幹 雄 資材 管理 勝 又 俊 永 金棒 達 幸 £ 唰 /( 株) 大日 本 印刷
7) AND (R=2) ) )+ " n+R^(102+R+5-( (Q>7) AND(R=3) ) ) 2130 IF R<2 AND Q>7 THEN MID 本 (N$ , INSTR:IF DSO0 THEN 2210 2200 N^=" " sAD=AD-l s し N=1 s RETURN 2210 D^=n " sIF MID$(N$,DS-1 ,1>=" ("THEM D 本 = "+d n 2220 N^=FN し T 本 ( DS ) +DS 本 +D 本 +FNRT 多 < DS+1) s AD= AD-1 2230 し N= し N+1 s RETURN 2240 /===== DUMP ===== 2250 AD=- (AD<0) *65536 ! +AD 2255 AD=F I X < AD/8 ) *8 sFOR I =ADT0AD+« =S=VAL("? 2370 IF A^=" Y" OR A •本 =My,,THEN 2380 E し SE F. R I NT " No • : BEEP: GOTO 1 320 2380 PRINT" Yes - " : DEFUSR=AD :A=USR (0) : PRIN T" Comp! ete . " : GOTO 1320 丁 ECHN/CA し AREA 193 7D D280 78 0288 B5 0290 76 0298 A4 D2A0 DF D2A8 11 D2B0 BC D2B8 87 D2C0 11 D2C8 3E D2D0 ED D2D8 B9 D2E0 2F D2E8 AF D2F0 D1 D2F8 03 0300 8E D308 A7 0310 E2 D318 8C 0320 AC D328 56 0330 IB D338 01 D340 96 D348 40 D350 6C D358 69 D360 EC D368 DA D 37121 64 D378 82 D380 62 D388 AC D390 E7 66 2F 6C 74 ,TAKE2 豫馨ム 松原 毅 この プロ グラムは 以下の システムで 動作し ます。 •MSX1 または MSX2 • メイン R A M16K バイ ト 以上 (M S X 1 ) 春 カ セツ ト レコーダ または フロ ツ ピー デイ スク ★ MSX-BAS I C 上で 動作し ます。 最近の 低価格 M S X に、 Caps ロック や カナ ロックの キート ップに L E D (口 ック 状態 表示 ランプ) のつ いてない も のがあります。 またつ いていても 変な 所に あって、 とまどう 人 も 多い かと 思 います。 この プログラムは、 画面 上に 2 つの キーの ロッ ク 状態を 表示させる という もので、 その他に ち よっ と した 便利な (と も 言えない か…) 機能を 付け加えた ものです 0 L プログラムの 入力 方法 この プログラムは MS X - B A S I C 上で 動く ようになって います。 R A M は 16 K バイト あれば 十分です。 プロ グラムは マシン 語で できて います。 入 力は 注意 深く 行なって 下さい (リスト 22C7DD 7927324 F8AD 5 486 5 6AE 2 932085 F7C 4 9IS9 6 2 6 FFEE131E 7 2 7BEF43EB 5 D 0 9E 9 C 6 5 7 S/0935CB 5 60B 43316 5 93 F 793 2 CA7BFO.-9C7F0 3 4 4 49C 6 EB 2 2 4 2 2 E 7DC 2 3 AD 33 6 8A9 6 A AD1F0 D1 0000 E6 5 06D6E3B0D 00000111120001100 20D220 6 93 2F 4 5 5 7 5BCDDDDDDDDDDDDDDDD 0 0DA 9 2 B1F5F 6 23BBDD0FFDBAC9F1 5 3F0 I 9 3 > 9 1 0 0CC44E6ECF 752 E2EED128CF 2 6 7 A 9 999EF 90 snD 0000 B 0 6 0 A D F 5 2 0 2 A 2 0 0 0 IZI 0 1111 2 3 0 110 0 320 DD24BB02E5E7D0CDDDDDDDDDDDDDDD D 0 D 45 NOB2EB A F 00 EEB0 4 D8B 2 9 A 7CA 874960 D1 IZI 299A844F4F2D70E0DC724BE3479B70A-DE00 80011 F 5 0 0 0 3 8 9 11 0 3 0 0 00111112 3 0 2 1 2 0 03 2 00 D 4 CE020D 20 20 DCDDDDDDDDDDDDDDDSI bD 9 B49 0 0 6 A 015 CB9B017DDC8 6 0 2C 33 6 F1FA 324E5C0B 942113 EE10E 2 4AD0479AA17AE11 0-8 90 501B 5 50712686 D1 0000011110 ^0^ 0212 F F 0 匚 250 DD3C2B 2 A 51 FCDDDDDDDDDDDDDDDDF D2 77 AE E5 A0 r1 00 cc 02 FC CD 06 7E EB F9 s F8 F3 AF 00 36 i 28 3A FF 36 25 c 26 54 B0 s DE ED 20 20 3E F9 00 22 2DBDDBCa-e-9003A4F 859051 CEEBD3DDAA 99497 D01 B2 DE FE DE EE EE 5c 3p FE A9 0e 2c c: 3p s DF le K cs 0c 0c D31 3 FCC05302137 B c 0 2 : : D2 ssg D2 CD g FC 3A 35 B7 g D2 72 s DF FF ss 28 s 7E 36 a cc 7D s 4c 6F B7 s DE 5F FE 04 7E s D2 F6 84 B8 21 13 s 23 00 00 AF s 79 08 35 s 19 3E 03 3E 77 D7 3c c3 D2 20 30 3A F3 gs 87 FC 22 29 s c9 E6 FC 77 55 76 3E 1 l FC 13 gs 06 D0 3A Dl Dl FB 78 21 E6 i 28 02 23 c3 7E lE CB 20 02 05 DC 4D 26 87 AF DE 03 3F 09 FB AD AF c3 22 1F 3C AB 03 ED D2 01 F9 C8 AB BC 28 D1 00 AE 9C B7 18 77 D2 D2 36 21 35 FE 28 2A CD 00 87 3A 04 38 CB F9 EB 21 01 32 23 FA 04 3A 30 EB CC D2 C3 B7 CD S D1 BC 00 57 C3 23 AF D2 S CB 2B F5 2B FC 35 F5 F1 00 3D 29 28 29 2F 22 3A E5 28 3E I C0E F 1AE12 0 8BD1 B 0E9A 2100 4 F 3121093 E9B A 2F0 )6 F3F1E3CEDD0 A CDFD7EC 32002 A20D D 02FF 2 411 FErJ 40 48 50 58 60 68 70 78 § 88 90 98 A0 A8 g B8 c0 s D0 D8 E0 E8 F0 F8 l 08 10 18 20 28 30 38 40 48 50 58 60 68 70 78 2 2 22222222 2 2^^^^- DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD 4A17FEC2D 717040 BE70E7DAB 5 922 AEB3D6C946FF D 5 8776 EAEB113 2 F 414340202 B8C7D3D319E8AA3F 2 F C 5 6 CEC 781 A0 3 0E1D 6 0 C5 6 6 39CB 6 E9 A 1877D87A A 6 2 7 AE17B 2 E 0 D0DF 0 CF 0 CE8 0 CD3 4 5BC323B7D2B3 B6 2 4DDDD30-E3CFD38061A 233102 DD33AD7CD8 5CF 761EFFFC0DE 07 53 22 D723DFFEC1ECFC7D0FD12F1 6 5 98 C3E 5 AA83DA3EA6A69CE 007820 C983EBC82D8 5 E71CB A E 0710 C 0 C73 A 2 0CCDB 0 BCD 2 DD27F A 32D A 1 3 3 7 3 2 2 2 7 2 D E EE 1 3 5 7 4 E 7 2 卜 ス リ 11F 5 C3BF117ED 0012 A B 6 2D3E1 0703 A 4 74A3 DDFEC2FDDE5FCD 2 E33 4 5D 32320 B3F32BC31 9BF 2 0 308193 B 5 07 2 F4DDCAD 02 2 22002 C1 I2 3 7DFD 2021 DC 0 2 E0ED A 3ECC1C0DAD0B00F1D1 03 A 7EDDD1E 07115 A A9D 288320 A 326 CC C E A 68 C5E3 D 21 FFFFF9F2B1DD0FCCD7CFD23FD 0 CCCF 322 A 8B1 2 9 F1BE38D 708 A15D713E 0 1C 3 A A AC254 A E1 4 CA 9 01B02E50 2 7DDCBB230BCF 303 FDE83F12 11208 6 A 70 A 0 07C1 021 D 0 91200E0F18ED638 DDDD 200 B 2 002 BC1DD2C0C13B 030 A D 6 3F 302 O-8080B0B 08080808080808080808080808080808 IZI 0112 2 3344 5 5 6 6 778899AABBCCDDEEFF 00112233 0000000000000000000000000000000011111111 DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD F 8 5 0 D 1 C 0 1 0 1 g 194 MSX MAGAZINE 1 988. 1 TOOLS 2)。 入力す るア ドレスは D 0 0 0 H~ D 3 9 0 H です。 入力が 終わったら、 誤りがない かよく 調べてから、 カ セッ 卜な り ディスク なり に セーブし てくだ さい。 「B S A V E “WAR LOCK. B I N^&HDOOO, &HD390, &HD 2 D 4」 のように セーブし ます。 この プログラム は 状況に 応 じて 自分 自身を 勝手に 移動させる ので、 一度で も 起動させる と 元の ア ドレスには 帰っ てきません。 ですから、 入力し 終わっ た らまず セーブと いう こと を' 已粗 けて 下さい。 一度 起動して から セーブす る と、 ぬけがらを 保存して しまう ことに なり ます。 実行 方法と プログラムの 機能 入力の 誤り を チェック し セーブが 完 了したら、 いよいよ 実行です c BAS I C の B LOAD 命令を 実行 するとき に", r” オプションを つける か、 「D EFUSR=&HD2D4 : A = U S R(0)j を 入力す る ことで 完了し ます。 この 実行 後、 フリー エリアが 700 バ イ トち よっ と 減って いる ことを 確認し て 下さい。 なおこの プログラムでは、 フリ ー エリ アの 後の方で はなく 前の 方 を 拝借す るので、 CLEA R 文な どは 必要ありません。 さて、 以上の 様に すると 次の 命令が 拡張され ます。 [ CMD I ON 画面の 最下 行を W A R L 0 C K 用に 確^し、 ロック 状態の 表示を 行います (図 2)。 [ CMD I OFF ロック 状態の 表示を やめます。 ただ し、 プロ グラムは 残って いて、 「C M D I ON」 の 入力で 表示を 再開で きます。 L CMD B ON お ま け 機能で、 カー ソ ルが 点滅す る ようになります。 最初に 実行した とき は、 点滅す る 状態に なって います。 | _ CMDB OFF 力ー ソルの 点滅を やめます。 [_ CMDI CUT WARLOCK を BAS I C から 切 り 宵! します。 L カナ 配列 切り換え よいので、 し£0のある_の人でも 便利に 使って もらえる と 思います。 た だ、 MS X - DOS に 戻れない のが 残 念です が …… 〇 MS X - DO S に デ ハ* イス ドライ ハ ♦ のよう な 物を 組み 込められれば いいの です が、 私は その 方法が わかりません。 それに、 本当は M S X 2 の 場合 現在 時 刻 も 表示 させよう と 思って いたのです が、 プログラムが ものすごく 大きくな GRAPH + かな キーで、 かな キー りそうな 気がした ので やめ ま した。 ボードの 50^— J I S 配列が 簡単に 切り換えられます。 ただし、 当然です が、 キー トップの 表示は 変わりません。 あ しからず。 使用 上の 注意点 プログラムを 実行させる と、 自分 自 身を 転送したり 初期 I 安定を した あとで B AS I C に 戻って きます。 しかし、 このと きは ロック ランプは 表示され ま せん。 画面の ク リア や モー ドを 変更し たと きもそう です が、 シフトキー や 口 ック キーを 押した ときに、 表示され ま す。 表示が 出ない からと、 あわてない でく ださいね。 また、 テキス ト エリアの 先頭 部分を 使う ため、 WARLOCK を 実行す る と 以前の BAS I C プログラム はなく なって しまいます。 同じ 理由で、 切り 離す と、 そのと き あった BAS I C プ ログ ラムは 消えて しまいます。 テキス ト エリ アの 先頭が 動く ために これが 起 こる ので、 注意して 使って ください。 初心者の 方には 少 々めんどう かも しれ ません が、 使って みると とても 便利な ので 是非 実行して みて く ださい。 ところで WA R LOC K プログラム が 動作して いる 時に“ C A L L SYS T EM" で M S X - D 0 S は 呼び出せ ません。 必ず “CMDI CUT" を 実行して から 行って ください。 _ 本当は …… この プロ グラムは 手元を 見なくても DOS 対応 や 現在 時刻表 示 出来る よ うに なったら MS X ネットの P D S に でも 載せたい と 思って います。 画面 表 a n k ANK かな 5 カナ 5 かな J カナ J ろ 一 ま □ー マ キーボードの □ック 状態 英数字 モード (小文字) 英数字 モード (大文字) ひらがな モード (50 音 配列) カタ カナ モード (50 音 配列) ひらがな モード (JIS 配列) カタ カナ モード (JIS 配列) □ー マ 字 かな 変換 モード (MSX2) □ー マ 字 カナ 変換 モード (MSX2) TECHNICS し AREA 195 •短期 重点 連 _■ Mm<>s ♦ 一 V ス 、,翁 最終回 (全 3 回) 最終回は、 各 コマンドの 実行に 際して 重要 な 機能と なる パイプ や リダイレクション など について 説明し ます。 これらの 使い方が わか ると、 ツール ズの コマンド がより 便利に 使え るよう になります。 是非 覚えても らいたい 機 能です。 さて、 この ページ も 3 回目の 最終回 です。 今月は リダイレクション、 ハ。 イ プ、 それに ファイルの 間 旨定 などを 説明し ます。 さて、 MS X - DOS ツール ズ には MS X- DOS の システム (MSXD OS. S YS の ファイル など) と、 ア セン ブラで ある M80 が 入って います。 一方 MS X - C や MS X - S B U G な どは アセンブラ も システム も 入って い ません。 これらを 購入 するとき はまず MS X - DO S ツール ズが '必要です か ら、 C や S BUG の 購入を あきらめる なりけ)、 DOS ツール ズを 買うな り する 必要が あ ります。 では 説明に 入り ましよう。 DOS ツール ズの 重要な 機能 コマン ド 説明のと きに も 少し 説明し ま したが、 各 コマン ドでは 説明し なか った とても 便利な 機 ^ というよりは DOS ツール ズで 必要 不可欠な 機能が 各 コマンドに 付属して います。 ここで、 それらに ついて 説明し ます。 ただし、 これらの 機能は DOS コマンド (例え ば D I R や T Y PE) では 使えません。 リダイレクション コマン ドの 実行 結果は 通常 画面に 表 示される だけです が、 リ ダイ レ クシ ョ ンを 使う と 結果を ファイルに 害き 込ん だり、 プリンタに 直接 印字 させたり で きます。 また 入力の 指定に も 使えます。 これには、" >” や" ぐ’ の 記号を 使い ます。 うしろには ド ライフ 名やフ ァイ ル 名が 続いても いいのです が、 記号の 前には 1 つ 以上の 空白を 置く 必要が あ ります。 "> "は、 それに 続く ファイル 名の フ ァイ ルに 結果を 窨き 込みます。 また、 "ぐは 通常の ファイル 指定と 同 じ 目的 ファイルを 意味し ます。 CAL >NOW. DOC BIO 58/08/28 〉 P R N と 入力す ると、 1 行 目は カレンダーを 「NOW. DOCj という ファイルに 書 き 込み、 2 行 目は バイオリズムの 結果 を プリンタに 印字し ます。 また、 図 1 パイプの 途中 結果を ファイルに 作る プログラム A>type /* */ tee -c tee for MSX by Big Ball Head 6 /Nov/, 87 特 include #de-f ine BUFSIZ 1024 main (argc ,argv) int argc ; char **argv ; char FILE sCBUFSIZD ; ♦teeout ; if (argc ! = 1 && (teeout = -f open (*++argv , " wM ) ) == NU しし) C -fprint-f (stderr , "tee scannot open /%s/¥n" ,*argv) ; ex it (-1 ) ; } whil e (f gets (s , BUFSIZ ,stdin) ) C f puts (s ,stdout ) ; if (argc ! = 1 ) f puts ; } C 言語の ソース リス トです。 コマンド 名は TEE で、 「TEE file 名 _» の 書式で 使います。 もちろん バイフ 中 でない と 意味はありません が。 「sort testdoc I tee temo.doc I wc / し の ふつに 使い ま g。 レイアウト 鉍 日本 ク1 J エイト 196 MSX MAGAZINE 1988. 1 DOS TOOLS DUMP TMP. DOC UN I Q TMP. DOC の 2 行と まったく 同じ 動作を してい ま す。 ここで 「TMP. DOC」 は、 内容 を 一時 保存して おく ファイルと して 使 ってい ます。 実際に パイプの 場合 も、 保存の ための ファイルを 作って います。 なお、 このために ファイルを 作らな い コマンド 行であって も、 フロッピー ディスクの ライ ト プロ テク ト ノッチを ON にして いると、 パイプの 処理が で きず エラーになります。 また" に’ の 前後には 空白が 1 つ以 上 必要です が、“ | B” のように 空白を あけずに ドライブ 名 (コロンは 不要) を 置く と、 一^f 呆存の ファイルを 作る ドライ ブをネ 旨定す る ことができます。 指定が な いと デフ オル ト ドライ ブに作 られ ます。 ちなみに、 デフ オル ト ドラ イブとは、 “A>” などの DOS プ ロン ブトで 表示され ている ドライブ のこと です。 ところで、 UN I X では パイプ 処理 の 途中 結果を フ ァイ ルに 入力す る コマ ン ドが あります。 ところが DOS ツー ルズ には これがない ので、 パイプでは できません。 このような 場合は、 リダ イレ クシ ヨンで ファイルに 出力した あ と、 次の コマンドを シーケンシャル プ ロ セスで つなぎ、 その コマンドで 先に 出力した フ ァイ ルを ネ旨定 す るよう にし ます。 といっても、 MSX-C が 使え る 人なら すぐに 害け てし まいます。 ち よつ と 余計です が、 図 1 に C の ソース を 載せて おきます ね。 これ も 余計な ことです が、 パイプと 出 カリ ダイ レク ショ ンを 同時に ネ旨定 す ると、 リダイレクションの ネ旨定 は 無視 されて しまいます。 シーケンシャル プロセス ただ 単に、 コマンドを 1 行に たくさ ん 指定して 連続 実行で きる という もの です。 これには “;" を 使います。 パ イプと よく 似て いますが、 コマンドの 結果を 引き渡す ことは しま せん。 例えば、 SORT TEST. DOC > TEMP. DOC ; BEEP などす ると、 ソー トの 結果は T E M P . DOC の ファイルに 入り、 ソートが 完 了す ると ビープ 音を 出力し ます。 つま り、 シーケンシャル プロセスは 別々 の コマン ドを まとめて 実行す るのと 同じ わけです。 これに 似た 機能な のが バッチ フ ァイ ルです が、 シーケンシャル プロセスな TECHNICAL AREA 一 最初に1 J ストフ アイ ルの 内容を 表示して います。 これを 間接 指定に して DUMP コマンドを 実 行し だのが その 下です。 「/elf J の スイ ツチは、 最初の 32 バイ トを 表示す るた めの ものです。 197 らいち いち ファイルを 作らなくても 簡 単に 指示で きる わけです。 ファイルの 間接 指定 多くの コマンドでは フ ァイ ル 名の 指 定が必 要です が、 多く の ファイルに 同 —(7) 処理を 行う 場合は 人間が 1 回ず つ コマン ドを 入れな おさない といけ ない ので 大変です (MENU など も ありま ファイル 名を たくさん 窨き 込んだ ファ イル (リス ト ファイル) の 名前を 指定 する ことで、 連続した 処理が できる よ うに なって います。 これを 間接 指定と いい、 ファイル 名の 代わりに ファイル 名が たくさん 書き込まれた ファイルを [ ] でく くって 指定し ます。 実際に 使っ ている 様子を 図 2 に 挙げ て おきます。 ファイルを ファイルで 才旨 例を 見れば 簡単に 理解で きる でしよう。 なお、 リスト ファイル 中の ファイル 名には* や? の ワイル ド カー ドは 使え ません。 エラーに なります。 また リス ト ファイル 中に 別の リス ト ファイルを ネ旨定 する こと もで きません。 間接 指定が できる コマン ドは そんな に 多くありません が、 間接 ファイル ネ旨 定を すると、 同時に ファイル スペック すが)。 そこで、 DOS ツール ズで は、 定 する …… と 説明 か 面倒な のです が、 リ ダイレク シ ョ ン 機能の コ マンド 別 一^! 一 _ コマンド 名 リ ダイレク シ リダ イレ クシ バイフ シー ケン シャ ファイルの ョン (入力) 3 ン (出力) ル アクセス 間接 指定 BEEP X 〇 〇 〇 X BIO X 〇 〇 〇 X BODY 〇 〇 〇 〇 〇 巳 SAVE X 〇 〇 〇 X CAL X 〇 〇 〇 X CALC 〇 〇 〇 〇 X CHKDSK X X X X X C し S X 〇 〇 〇 X DISKCOPY X X X 〇 X DUMP 〇 〇 〇 〇 〇 ECHO X 〇 〇 〇 X EXPAND 〇 〇 〇 〇 〇 GREP 〇 〇 〇 〇 〇 HEAD 〇 〇 〇 〇 〇 HE し P X 〇 〇 〇 X KEY X X X 〇 X LIST X 〇 〇 〇 X し S X 〇 〇 〇 〇 MENU X X X 〇 〇 MORE 〇 〇 〇 〇 〇 PATCH 〇 X X 〇 X SLEEP X X X 〇 X SORT 〇 〇 〇 〇 〇 TAIL 〇 〇 〇 〇 〇 TR 〇 〇 〇 〇 〇 UNIQ 〇 〇 〇 〇 X VIEW 〇 〇 〇 〇 X WC 〇 〇 〇 〇 〇 上記 以外の コマンド X X X X X 表 中〇の 付いている のが、 使える ものです。 x の 場合は、 エラー になる か、 その 指定が 無視され ます。 や ファイル 名 を^ 定 しても 間接^ 定の みが 有効で 他は 無視 さ れ ます。 ファイル スペック について ファイルの ネ旨定 には、 ファイル 名を 1 イ固 置いた り リス トフ ァイ ルを 指定し たりし ます。 ファイル 名のと きは、 M I SX-DOS コマン ドのと きと 同じよ うに 「A : T E S T. DOCj なと^) よ うにして ドライブ 名を 指定で きます。 1 また、 コマンド ライン 中で ファイル 名を 置く 部分に、 間接 指定 以外の 方法 で 複数の フ ァイ ルを 指定す る こと もで きます。 これは、 ファイル 名の 間を + か カンマ (, ) で 区切る ことで でき ま す。 例えば、 DUMP BIO. COM + B : L S. C OM + T E S T. B I N などの ようにし ます。 使える コマンド リ ダイ レ クシ ョ ンや パイプ、 間接 指 | 定 などが 使える かどう かは コマンドに よって 異なって きます。 表 1 に、 どの コマン ドで 使える かを まとめて おき ま した。 ただし、 PATCH コマンドで の リダイレクション (入力) は、 コマ ン ド 自動 実行の 指定に 使います。 また MORE コマン ドの リ ダイレク シ ョンな どは 無意味です。 どう なる か | は 実験して みて ください。 という わけで、 MS X — DOS ツー | ルズの コマン ドに ついての 説明は これ で 終わり です。 簡単に しか 説明で きま せんで したが、 わからない 部分は とに _ かく 実行 させて 確かめて みて く ださい。 _ 最後に、 アセンブラと エディタ につ | いて 簡単に 説明して おきます。 MSX MAGAZINE 1988. 1 DOS TOOLS アセンブラ について ほとんど パソコ ンは 初めて という 人 には、 アセンブラと いわれても 何の こ とだか わからな いと 思います。 バソコ ンの 心臓部 C P U は、 0 〜 255(1 6 進 だ と 00 〜 FFH) ま での 数字の 集まり を 解釈して 実行して います。 この 数字 のこと を マシン 語 コー ドと いいます が、 これは 人間に とって 覚えに く く 忘れ や すいものです。 そこで、 マシン 語は 覚 え やすい 英語の つづり で 表記 さ れ ます が、 この 表記 (ニー モニック という) を マシン 語 コー ドに 変換す るの がアセ ン ブラな のです。 アセンブラには、 二ー モニックの 他、 メモリ 上の 位置の 印になる ラ ベル や、 変換の 指示を 与える 疑似 命令な どの 機 能が 用意され ています。 これらを 窨き 込んだ ファイルを、 ソースと いい、 図 3 がその 例です。 MSX- DOS ツール ズに 入って い る 「M80」 は、 正確には 「マクロ 80」 と 呼ばれます。 80 は かっこよ く エイ テ ィと 発音し ます。 M80 は、 マクロ 機能 やリ ピート、 条件 アセンブル など 豊富 な 付加 機能が あり プロ や セ ミ プロには ありがた いのです が、 初心者に はつら いものが あります。 雑誌 や マニュアル をよ く 読んで 勉強して ください。 詳し く 説明す ると、 それだけで 本が できあ がって しまいます ので、 当然 ここでは 割愛せ ざるを 得ません。 M80 と 一緒に 入って いる L80 (リン 力) や C R E F80 (クロス リフ ァレン サ) 、それに L I B80( ライブラリアン) も、 アセンブラと 一緒に 使用され る も のです。 バックアップを 取る ときは こ れ らも 忘れずに。 もし MS X - DO S 上の マシン 語フ ァイ ルを 作りたい なら、 次の 手順で 行 います 0 ソースファイルを 「S OU. M ACj とすると (拡張 子は MAC にし て おき ましよう)、 M80 =S0U/L L80 SOU, SOU/N/E とします。 実行 後 3 つの ファイルが 作 られ ますが、 「SOU.COM」 が 実行 ファイル、 「SOU. PRN」 がア セン フリ レリス トに なり ます。 スクリーン エディタ MS X - DOS ツール ズ には、 スク リーン エディ タが 付いています。 「M E D j というの がその 名前で、 完璧とは いえません が まあまあの 機能を 持った ものに なって います。 エディタは、 ア セン ブラの ソースな ど 文書 ファイルを 作る ための ものです が、 他と 同様 漢字 は 扱えません。 英数字と カナと いった ところです。 エディタには、 いろいろな 操作を す るた めに たくさんの コマン ドが 用意 さ れ ています。 文字を 入れたり、 肖 lj 除し たりの 基本的な 機能の 他に、 文字 5IJ 検 索 や 置換、 ブロック 移動、 ブロック コ ピーな ど 力 听 える よう にす るた めです。 しかし、 最初から すべての 機能を 使 お うとい うのは 少 々無理が あります。 最 初は、 とにかく 目的の ファイルを 言 売み 込んで、 編集し、 できあがった フ ァイ ルを セーブす る、 といった 基本 操作を 覚えます。 それから、 サーチ や ブロ ッ ク 移動、 画面 移動な どの 機能を 一つ 一 つ 覚えて いった 方が いいで しよう。 マ ニ ュア ルの 説明は、 極力 短く する ため に 説明 不足が ちです から (M E D に 限 ったこと ではない が) 丸暗記は キ ツイ でしよう。 最初に マニュアルを ざっと 読んで どんな 機能 (コマンド 名では な い) が あるか だけを 覚えて おき、 その 機能が 必要に なった ときに 調べて 使う ようにした 方が、 断然 覚え やすいので す 。 エディタには、 入カ モードと コマン ド モードの 2 つの モードが あり、 エデ ィッ ト 中に エスケープ キーを 押す こと で コマンド モードに 入ります。 実行は A>ME D ファイル 名 で 行えます。 ファイル 名を 2 つ 指定す る' 必要は あまりないで しよう。 あとは、 簡単な エディツ トで あれば、 カーソル キーと B S キーな ど B A S 丨 C と 同じ 機能 キ ーを 知って し 、れば 文 害は 作れ ま す。 終了 するとき は、 ESC キーを 押 して コマンド モードに 入り、 U キーを 押して ファイルを セーブし、 ふたたび コマンド モードに して Q キー (これ だ けで も セーブ 可) を 押せば 終了し ます。 なお、 エディット 中に 少し MS 父から 離れる とき や、 長い ファイルを 扱って いると きは、 時々 U コマンドで 内容の バッ クアッ プを 取って おいた 方が 安心 て* す。 まあ、 一度 MS X を 暴走 させた りする と、 その 意味の 重要性が 身に し みるは ずです が …… 。 先頭 部分な ので これ だけでは 動きません。 ソー 戈 ij ス トの 塞き 方 は 人 それぞれで、 これは あ < まで も 一例です。 TECHNICAL AREA 199 回に わけて、 MSX ディスクシステム に 5 インチ ディスクを 接続す る 実際 例 を 紹介し ます。 ディスク インター フエ イスには ヤマハ FD 055 を 使用し、 巳 (拡張) ド ライフと して テイ アツ ク製 2 接続し ます。 今回は、 ディスク ドライ フの 構造と その 信号に ついて 説明し ま この ページでは、 今月と 来月 号の 2 DD5 インチ ディスク FD 55FR を レイアウト _ 日本 クリエ イト MSX MAGAZINE 1988. 1 いてく ださいね。 MSXI こ 5 インチ テイ スク盈 さて、 5 インチ ディスクの 利点は、 まずなん といっても フロッピー デ イス クの 価格が 安い ことです。 5 インチの バソコ ン 通信で 知り合っ た 仲間と、 一緒に 電気街を ブラ ブラす るのは おも しろいものです。 ある 日、 二人で ワイ ワイ 言いながら あちこちの 店を のぞい ていたので すが、 MSX ユ ー ザ ーの 彼 は 「5 インチ ディスクが ほしい/」。 なるほど、 MS X にだって 5 インチ の ディスクは 接続で き るか も しれない。 その 頃 私は、 P C -9801 V M 2 と M S X の データを どうやって やりと りする か 悩んで いたのでした。 P C -9801 V M2 の ディスク ドライブには 1 M バイ 卜と、 MS X のよう な 720 K バイト ま たは 640 ドバイ トが 読み書き 可能な デ ィス ク ドライブが 内蔵され ています 0 そこで、 これに なんとか MS X の 3.5 インチ ディスクを 接続で きない もの か と 苦心して いたのです。 けれども、 M S X の ドライブを 改造して、 300 回転 と 360 回転を 切り換えられる ようにし たり、 いろいろ ト ライして みたので す が、 なかなか 完璧な ものが できません。 そんなと きに、 この 話。 私の 考えと は 逆に、 PC- 9801 で 読み 窨き 可能な 5 インチ ディスク (注1) を、 MSX に 接 続し ちゃう。 これは いけそう だな/ という ことで 衝動買いして、 期待に 胸 を ふくらませながら、 それぞれ 家路に 急ぐ ので ありま した。 家に 帰って すぐ 実験。 あれから 半年 間、 この 5 インチ ディスク ドライブは 何も 問題 もな く 動作し 続けて います。 さて、 これから 窨く 内容は、 筆者の 体験談で あり、 メーカーの 方に いわせ 方は ペラ ペラの 薄い ケースに 収ま って いますが、 3.5 インチ ディスクは 堅い ケース で f 呆護さ れ ていて お金が かかっ ています。 5 インチの 場合、 だいたい 3.5 イ ン チの 半分に 近い 値段で 買う,;: とがで きます。 それから、 他の コンピュータと デ ー 夕の やりとりを 行う 際に、 ディスクを 交換す る だけです みます。 特に PC - 9801 シリ ーズな どの M S - D 0 S マシ ン との やりとりで あれば、 ディスクの フォー マッ トは 同じです から とても 重 宝し ます。 そういった 意味では、 MS X - DOS は 8 ビッ トマシンと 16 ビッ ト マシンの 仲立ちを している ともい え そうです ね。 会社で M S - D 0 S マシ ンを 使用して いて、 自宅では MS X な ん ていう 方に も、 この 5 インチ ドライ ブは 強い 味方です。 ,ー ディスク さて 実際に 工作に 入る 前に、 フロ ッ ピー ディ スク ドライ ブの 基礎的な 事項 を 説明して おき ましよう。 今で こそ、 フロッピー ディスクは パ ソコ ンの 主た る 補助 言 己 憶 装置と なり ま したが、 一昔前までは カ セッ ト テープ が 大半を 占めて いました。 MSX でも カ セッ ト インタ ー フェイス が 標準 装備 になって いて、 ディスクは オプション 仕様です。 カセット テープに 比べる と フロ ッ ビー ディスク は 速度が 比べ も の 【"■からむ いくらい 茂く. また 信賴性 も ると 「とんでもない /j という ことに なります。 読者の 方が トライす るのは いいので すが、 動作し ない、 もしくは 元の ドライブが 壊れて しまった として もこ ちらでは 責 任を 取れません。 そこ のと ころを、 しっかりと 頭に 入れて お 吉 田卓弘 5 の 溢 •; 主 2) 2DD などは、 ディスクの 記録 密度 や トラック 数を 示す 記号です。 最 初の 2 は 両面と いう ことで、 片面 ディ スク では 1 にな ります。 次の D は倍密 度 (記録 密度の こと) を 表し、 単 密度 のとき は S になります。 最後の D は 倍 トラック (2 倍の トラック 数) で 記録 される ことを 表します。 通常の トラ ッ ク 数では 3 桁 目には 何も 付きません。 つまり、 片面 • 倍 密度 •倍 ト ラックな ら 1 D D 、 両面 • 倍 密度な ら 2 D とい う 具合に 表記され る わけです。 大幅に 向上して います。 情報を 記録す る 原理は、 オーデ ィオ 用の カ セッ ト テープな どと 同じです。 ディスク の 表面には 磁性体 力咐 着して いて、 これに 磁気 ヘッドを 通して 信号 を 読み出したり 書き 込んだ りします。 図 1 を 見て ください。 フロッピー ディ スクが 高速で 回転 (2 DD ドライブで は 毎分 300 回) していて、 この 上を へッ ドが 円周と 直角 方向に 動いて います。 このよう にして、 円盤の 全域に わたっ て 言 売み 害き でき ると いう わけです。 フロッピー ディスクの 外観は、 図 2 のように なって います。 実際の データ が 言 己録さ れる 磁性体 ディスク は ケース の 中に 収まって います。 この 中身の サ イ ズ によ り 8 イ ン チ、 5% イ ン チ、 3.5 インチ、 3 インチな どと いうよう に 分 類され ます。 各 サイズの ディスクは、 さらに 記憶 容量で 分類され、 MS X では 最高 720 K バイ ト (フ ォー マツ ト 時) の、 2 D D (注2) と 呼ばれる 記憶容量を サポート しています。 ここで 「フォー マッ ト 時」 という こ とを 説明して おきます。 フロッピー デ ィス ク では、 実際に 記憶され る データ そのものの 他に、 それらの データを 管 理す るた めにある 程度の 容量が 必要で す。 また、 この 他に も 信頼性を 上げる ために、 データと データの かたまりの ギャップ (すきま) を 設けたり してい ます。 フォーマットには、 これらの 管 理を する ための 情報を 害き 込んで おく という 仕事 もあります。 ですから、 フ ォー マットを 行った あとには、 実際の データが 窨き 込める 容量が 少なくなる ゎけです 。 も っ たいないよう な 気がします が、 これらの おかげで 最も コンピュータら しい ランダム アクセス という こと 力、 能になる わけです。 3. 5 インチと 5J4 インチ の 違いは? MS X の 標準 的な ディスクシステム の 構成を 図 3 に 示します。 5 イ ン チの 2 D D と 3.5 イ ン チの 2 DD ディスクは、 当然 ディスクの 大き さは 違い ま すが、 記録 方法な どは まつ たく 同じです。 しかも、 ディスク ドラ イブと コン ト ローラを 接続す る コネ ク 夕の ピン 配列 も そのまま 使えそう です。 ただし、 これは 筆者の 調べた 範囲です ので、 すべての ドライ ブ がそ うなって いるか どうかは 不明です。 この 部分の インタ-フェイスは、 特 に 公的な 規格と いう ものは 定められて いないよう です が、 業界 標準と もい え そうな ものが あって、 多くの メーカー イ吏 われて いるそう です。 ただし 聞く と ころに よると ま ったく 違った ピン 配列 も あるそう ですから、 注意が 必要です。 さて、 その ピン 配^を 表 1 に 示し ま す。 34 ピンの コネクタが 使われて いて、 202 MSX MAGAZINE 1988. 1 SPECIAL そのう ちの 半分は グラ ンド になって い ます。 残りの 17 本の 信号で、 データを 読み 害き したり、 モータ を 回すな どの 制御を 行って います。 信号の 役割 それでは、 各 信号が どのような 働き をして いるかを 説明し ましょう。 (DDRIVE SELECTOR これは、 1 つの コントローラで 複数 の ドライ ブを 制御す ると き に 使用す る、 デイ ジー チェーン 接続と いう 方式のと きに 使用し ます。 多くの ディスク ドラ イブは この 方式を 採用して いて、 MS X も 例外では あり ません。 図 4 を 見て ください。 複数の ドライブが あっても、 この 方式 だと 数珠つな ぎの よう に 次々 と 接続す る ことができます。 デイジー チェーンでは、 DRIVE S E L E C T 信号に よ っ て、 物理的に 4 台までの ディスク ドライブを 接続す る ことができます。 ドライブ 側では こ の 信号を 監視して おり、 自分が 選ばれ たと き だけ、 他の 制御 イ言 号を 入力した り 出力した りします c 選ばれて いない ドライブでは、 インターフェイスに 影 響を 与えない よう に 何も しません。 こうして 並列に 接続 されても、 お 互 いに 邪魔し ないで うまく 動作で き るの です。 実際の ドライブには、 スイッチ または ショート ピン カ M 寸い ていて、 自 分を ドライブ 〇〜 3 のうち 何番に 割り 図 3 MSX の 標準 的な ディスク システム フ □ツビ ー ディスク コン ト □ー ラ 接続 ケーブル 点線 内の システムが、 はじめから MS X 本 体に 内藏 されて いる MSX ちあります。 MSX 本体 表 1 コネクタ 端子 番号と 信号 (FD-55F 闩 など) 信号 名 方向 信号 ij ターン RESERVED (未使用。 ただし 使用して いるもの も ある) 出力 2 1 IN USE (HEAD LOAD または 無 接続) 入力 4 3 DRIVE SE し ECT 3 入力 6 5 INDEX 出力 8 7 DRIVE SE し ECT 0 入力 10 9 DRIVE SE し ECT 1 入力 12 11 DRIVE SELECT 2 入力 14 13 MOTOR ON 入力 16 15 DIRECTION SELECT 入力 18 17 STEP 入力 20 19 WRITE DATE 入力 22 21 WRITE GATE 入力 24 23 TRACK 00 出力 26 25 WRITE PROTECT 出力 28 27 READ DATA 出力 30 29 SIDE ONE SELECT 入力 32 31 READY (まだは 無 接続) 出力 34 33 MSX に ディスク インタ ー フェイスを 接続し、 その 先に ディスク ド ライフ コニ ット がきます。 ディスクを コン ト ロールす るソフ トは インターフェイス 内に、 電 源は ドライ フユ ニッ トの 中 に 入つ ています。 最近では、 インターフェイスと ドライ フガ ー体にな つ だ 機種 も あ ります。 コネクタには 34 本の 端子 があります が、 このろ ち 半 分は 信号1 リターン (共通の クラン ド) になつ ています。 それぞれの 信号の 意味は 本 文を 参照して < ださい。 な お、 すべての ディスク ドラ イブが このよ ラに なつて い る 保証はありません。 ■図 4 デイジー チェイン 方式 (a) とても 簡単な 接続 方法 34 ピン ケー フル ^ 配線され る ビンは すべて 同じ コン ピュー ドラ ゴフ ド ライフ ^11 _ ドラ イプ ド ライフ ター 〇 1 2 3 最大 4 台までの ドライブを、 同じ 配 様で 接 続し ます。 つまり、 この 方法 だと ドライブ ご とに 違 〇 配線を しな < て すむ わけです。 (b) ドライブの セレ クト 部分 DRIVE SELECT 3*^ —— 〇 DRIVE SELECT 2*^ ~ 〇 、 DRIVE SELECT 1 ^ ~ 〇 、 DRIVE SELECT 0^ ~ 0 ?益错 どれ か一 ド ライフ 内 セレ クト 回路べ デイジー チェイン という と 難し そろです が、 実は こ のよ^に 簡単な 構造に なつ ています。 どれ かを ショー ト ピンで 選ぶ と、 その ラち の 1 つの 信号が 取り出され る わけです。 まだ、 2 つ以 上を 同時に 選択で さない こ とも わかります。 TECHNICAL AREA 203 注 3 ) デ ジタ ル 信号では 2 つの 状態で 状態を 表します。 これが High レベルと Low レベルで、 M マガでは H レベル/ L レベルと 表記して います。 電圧を 考 えた 場合は、 H レベルが +5V、 L レ ベルが 0V という ことになります。 ま た、 H レベルの とき 信号に 意味が ある 場合は 「正 論理の 信号」、 L レベルのと き 意味が ある 場合は 「負 論理の 信号 j といい ます。 注 4) パルスの 立ち上が りとは、 信号 が L レベルから H レベルに 立ち上がつ た その 瞬間を いいます。 つまり、 ST E P(4) 信号は、 H レベル や L レベルに あるときは 動作せ ず、 立ち上がりの 変 化を したと き だけ 動作 するとい うこと にな ります。 なお、 逆に H レ ベルから L レベルに 変化した 瞬間を 立ち 下がり と いいます。 フロッピー ディスクは、 カ セッ ト レコー ダから 比べる と、 高価です。 最近は ディスク もとても 安くな り ま したが、 テープ レコーダに はかない ません。 しかし、 その メリ ッ トを 考える と フロッピー ディスクは とっても 安い (/) のです。 データ や プログラムの 読み出し 書き込みが とても 高速、 信 頼 性が とても 高い、 ファイル 名 (プ ログ ラム や データの 入った ブロック の 名前) を 指定す る だけで 読み出し 書き込みが できる、 ランダム アクセ ス がで きる …… などが 大吉い メ リッ 卜です。 フロ ツ ビー ディ スク ディ スク では、 数 100 K パイ トの データで ち 読み出 しは 数十 秒です。 また カ セッ ト レコ ー ダのと きのよ 5 な 位相 合わせ や 音 量 調節ち 不要で、 エラー も ほとんど 出ません。 当てる のか 選択で き るよう になって い ます。 例えば、 ドライブ 1 信号が スイ ッチで 選択され た ドライブは、 DR I V E SELECT1 の 信号が L レべ ル (注3) のとき に 動作し ます。 なお、 MS 父では、 この 部分で 少し 面倒な ことを している ものが あり ます。 これにつ いては 後編で 説明し ます。 (SMOTOR-ON この 信号が L レベルに なると、 デイ スクを 回す ための モータが 0 N になり ます。 INDIRECTION SELECT ステップ ノ り レス (4 が 入力 された とき の、 へ ッ ドの 移動 方向を 選択し ます。 H レベルで 外側、 L レベルで 内側 方向 力 選択され ます。 (4JSTEP へツ ドを D IRECTION SE めんどうな 頭 出しが いらない/ カ セッ トでは、 CLOAD 命令で プログラムを 読み出します。 このと き、 テープの 頭 出しを して PLAY (再生) ボタンを 押して やらない とい けません。 データの 場合で も 同じで す。 また、 1 本の テープの 中に 何が 入って いるかは、 すべて 再生して み ない とわ かりません。 フロッピー ディスクでは、 F 丨 L ES という 命令で、 記録され ている フ ァイ ル 名が一 瞬で 表示で さます。 また ロード や セーブでは ファイル 名 を 指定す る だけで、 フロッピー ディ スク のどの 部分に 記録す るかは すべ て 機械が や ってく れ るので す。 たとえば 「LOAD “GAME. BASj と 入力す ると、 すべての フ アイ ルの 中から 「GAME. BASj という ファイルを 探して 口ー ドして L E C T (3) で 指定した 方向に 移動 させ ます。 パルスの 立ち上 力 く り (注4) で 動! jfF します 0 1 つの ハ。 ルスで 1 ステップ 移 動し ます。 (5) WRITE DATA ディスクに 害き 込む データです。 (6) WRITE GATE この イ言 号が L レベルの ときに、 デ ー 夕を 害き 込む ことができます。 H レべ ルのと き、 WRITE DAT A(5) は 無効になります。 ⑺ SIDE ONE SELECT 読み 窨 きする ディスク 面を 選択し ま す。 L レベルで サイ ド 1 、 H レベルで サイ ド 0 が 選択され ます。 (B)IN USE フロントべ ゼル (ディスクを 入れる 面の プラスチック 部分) LED を 制御 くれます。 デー タのと きは、 プ ログ ラム 中で 「OPEN "GAME. D AT” FOR INPUT AS 林 1 j のよ 5 に 指定す る だけで、 目 的の フ ァイ ルの 読み出しが 可能に な ります。 なおこの よ ラな 方法で 読み 出される のは シー ケン シャルフ ァイ ルと いい、 r INPUT とすると 文字 変数 D$ に データが 1 行 分 読み出されます。 また 「OPEN ttMSX. DAT” FOR OUTPUT AS #2j と プログラム 中に 書いて から、 「PR I NT #E,W$j とすると、 W$ が 記憶して いる 内容が 「MSX. D ATj とい 5 名前の データファイル に 書き込まれます。 ランダム ファイルは コンピュータ フロッピー ディスクの 中では、 プ ログ ラム も データ も、 ばらばらな 位 置に 記憶され ます。 そして、 これら をう まく 取り出す ために、 ディスク 内には ディ レ クトリ とか FAT など という 領域が 取られて います。 これ メ リツ トって 何 だ 7 する 信号です。 なお、 この LED の 点 灯 条件は、 スイッチ または ショー ト ピ ンで 選択で きる よう になって います。 1 (9) TRACK00 L レベルの ときは、 ヘッドが トラッ ク 00 (最外 周 ト ラック) に 位置して い る ことを 示します。 (10) INDEX ディスク 1 回転 ごとに 1 パルス 出力 されます。 この 信号は、 各 ト ラックの1 先頭 部分に へッ ドが きた ことを 意味し ます。 (JDWRITE PROTECT L レベルのと きには、 ライト プロ テ クト (窨き 込み 禁止) されて いる _ ディ スクが 挿入され ている ことを 示します, (lSREADY L レベルの とき、 ドライブが 準 _ が カ セッ ト レコーダとの 大きな 違い です。 前者は ファイル 名 や 大吉 さな どが 記録され ます。 FAT は、 ファ イ ルの 中味が どのよ 5 に 連続して い るかを 記録して います。 ファイルは、 MSX の 場合 512 パイ トを ブロック ; にして 分割して 記録され ています が、 それぞれの 位置が F A 丁で わかる わ けです 。 ディスク 内の ファイルは 分散して 記録で 杏る わけです が、 この 構造を | そのまま 利用す るの が ランダム ファ イ ルです。 ランダム レコード といっ て、 1 から 256 パイ トまでの ブロ ッ クを 1 レコード として 指定す ると、 ブロック番号 ごと に 任意の 位置の レ コードの 読み出し 書吉 込みが で吉ま す。 1 番の 次に 34 番の レコードを 読 み 出し、 続いて 7 番に 書き込む …… 、 とい 5 こと もで きる わけです。 もち ろん レコード 内は、 ブロ グラムの 指 定で いく つかの データ に 分割す る こ ともで きます。 住所録な どが、 簡単 に 作れる わけです ね。 Z04 MSX MAGAZINE 1988. 1 SPECIAL 了して いる ことを 表して います。 電源 が ON になり、 ディスクが 正しく 装着 され、 かつ ディスクが 回転を 始めて か ら十 分に 速度が 安定す る ことにより L レベルに なり ます。 (I3)READ-DATA ディ スク から 読み込んだ データが 出 力され ます。 接続に 必要な もの という わけで、 前編は 終わりです。 実際の 接続 や 電源な どに ついては、 次 回で 説明し ます。 なお、 使用す る ドラ イブな どに ついて、 簡単に 害いて おき ます。 接続に 使用す る インターフェイスは ヤマハの FD-051 です。 また、 5 イン チ ディスク ドライブには、 TEAC 製 FD-55FR を 使います。 購入先は 秋 葉 原の 「パーツ ショップ •ハロー」 と いう お 店で、 通信販売 もやって くれ ま す (電話 03-253-0766)。 他に も 接続 ケーブル や 電源 ユニット (5 V/12V 各 1 AfUt) 力く' W になり ますが、 これらに ついては 後編と いう ことで …… 〇 TECHNICAL AREA 之ジ クラ • レクチャー デジタル 回路を マスター する ための タイマー 1C 555 活用 法 関臑志 10 年 以上 も 前に 閼 発され た 8 本 足の 1C。 それが 555 です。 あまりに も ポビュ ラ 一な 1C ために、 何を 今 さら と 思われる かもしれ ません。 けれども、 この 1C の 中には 電子回路の エッセンスが 凝 18 されて いるので す。 555 の I 、方が 理解で きたら、 デ ジタ f 回路の 中身 もずつ とよく 見えて くるは ずです。 ■ (編) 本誌が 発売され ている 頃は、 もう 初 滑りを 済ませて いるは ずの 関です。 今 年は 担当 z 氏に 首 根っ子を 引っ 捕まえ られ てし まい、 雪 力 僻ろうと、 槍力释 ろうと、 ずう っ とこの デジ タルク ラフ 卜を 窨く ことに なって います …… 。 先日、 あの 知 世 & 貴 和 子が 姉妹 共演 する 映画の 試写 会を 見て き たのです。 もう 気分は 完全に ゲレンデへ。 映画の ノリは、 一昔前の 加 山 雄 三の 若大将 シ リーズに 通じる ところがあります。 才 マケに 青大将だった 田 中邦衛 がその 後 の 若大^! 寺と いう 感じで 出演して いたの には、 思わず ニンマリして しまい まし た。 しかし、 今ではない 方 か 不自然な く らいの キス シーン すらない、 爽やか な 青春 映画でした。 あれ、 若大将を 知らないで すか? 困った な あ。 まあ、 知らなくても いい ですから、 MS X ばっかりい じってな いで、 皆さん もた まには かわいい あの 子と一 铺に 映画で もい かがです か? さて 今月の デジ タルク ラフ トは、 半 年に 1 度の tl 例に なった 名物 「デジ ク ラ. レクチャー」 です。 今回 取り上げ たのは、 デジタル 回路と 親しくな るた めには ぜひ 知って おきたい、 タイマー 1C 555 シリー ズ です。 なお、 この I C の 応用 編と して、 来 月から 2 回に わたって 555 をイ 吏った M S X の 周辺機器の 製作を 行います ので、 そちらの 方 も ぜひ お楽しみに。 そち そちの なれそめ 555 シ し!- タイマー I C 555 は、 次の よう な 優 れた 特徴を 持って います。 ① マイクロ 秒から 時間 ま での 広し 、幅で の タイミングを 発生で きる ② デューテイ サイクル ( H/L レベルの の 時間 比) の 調整が できる ③ 大きな 出力 電流が 取り出せる ( H レべ ル、 L レベル 共に 200mA) ④ 出力で そのまま TTL、 CMOS の ロジック 丨 C を ドライブ できる ⑤ 温度 安定 度 0.0 5%/ で ( I C のみ) ⑥ 電源 電圧 範囲が 広 L 、(4 . 5〜 1 6 V ) ⑦ とても 安価 タイマー 丨 C と 聞けば 555、 555 と 言 え ば タイマー 丨 C と 連想で きないと、 真の 意味で デジタル 回路と 親しく なる ことは できない と 言っても いいく らい です。 この I C と 私が 最初に 出会った のは 今から 14 年 前、 ある 無線 雑誌での 製作 | 己 事からで した。 当時は この I C も 入手 力、 i 隹 しく、 結 構 高価な ものだった のです が、 今では 大変 ポピュラーな ものに なって います。 私が 初めて 思う存分 使いこなす こ とが できた 丨 C が、 この 555 でした。 それ まで I C という と 必要 最小限の 端子 じ か 引き出されて いなくて、 ブラック ボ ッ クス 的に し 力'^ 用 できない と 思い^ ん でいた のです が、 この I C は あまり にも 応用 範囲が 広い のです。 当時 私は この 丨 C の f 言 奉 者に なって しまったく らいです 0 普通、 丨 C は 使われる 周期が あり、 1〇 年 も 前に 発売され た丨 C がい まだに 数多く 使われる ことな ど、 各種 ロジッ ク I C や オペアンプの 一部の 品種 以外 には ほとんどありません。 それは、 こ の丨 C のす ばらし さを 証明して いる わ けです。 ⑧ 入手 性拔群 (各社から セ カン ド ソース 力 策 売され ている) この 555 には 様々 な タイプが あり ます。 単なる 555 は タイマー 回路が 1 セッ トし か 入って いません が、 2 セット 含まれ た 556( 電源 端子の み 共用で、 応用 例は まったく 同じ)、 4 セット 含まれた 558 (ただし 使用方法は 限定され る)、 そし て 高 安定化 • 超 低 消費 電力 化を めざし て 作られた CMOS 版の ものな ど、 さ まざ まな タイ プが 用意され ています。 デジ タルク ラフ トでは これらを ひっく るめ て 555 シリ ーズ 、ま たは 555 フ アミ イラスト ►齐 藤敏 明/レイアウト ►日本 クリエ イト DIGIT4L CF^FT MSX MAGAZINE 1988.1 DIGITAL CRAFT リーと 呼ぶ、 ことにします。 この I C はもと もと、 アメ リカの シ グネ ティ ッ クスが 開発した N E555 と いう 型番だった のです が、 セカンド ソ ー スは各 半導体 メ ーカ ーが こぞっ て 作 ってい ます。 555 に 限って 列挙して みると、 NE 555( シグ ネテ ィクス)、 /M555( フェア チ ヤイ ルド)、 LM555( ナショナル. セミコンダクタ)、 MC1455 (モト ロー ラ)、; / PC 1555( NEC)、 HA17555 (日立)、 丁八7555(東芝)、厶1^555(松 下)、 L B8555( 三洋) などが あり、 自社 内の みで 用いて いると ころも 含める と、 世界中で 20 社 程度は 作って いるよう で す 0 ノ 又 ツ ケージの 種類 555 は その 応用され る 範囲 も 広いた めに、 パッケージ も 何 繼頁 か 存^し ま す。 普通の デジタル 丨 C と 同じ D I P (Dual Inline Package : デイ ップ) タイプ、 高密度 実装 か 可能な F P(Flat Package : フラット パッケージ)、 回路が 組み や すい S I P (Single Inline Package ! シッ プ) タイプ、 そして 使用 条件が 悪い とこ ろで も 使用で きる メタル C A N タイプ と、 実に いろいろと 用意され ています。 等価 回路と 回路 ブ □ック タイマー 丨 C 555 の 等^ 面 回路、 つま リ トランジスタで 組んだら、 このよう になる といった ものが 図 1 です。 最近 はこうい った 図を 載せる のは あまりは やって いません し、 レトロ ブームに 便 乗と いう わけでは ない のです が、 あえ て 掲載し ました。 なお、 555 と 名乗 っ てはいても、 等 イ 面 回路は メーカー によ って 若干 異なって います。 図の 等価 回路は モト ローラの M C 14 55 の ものです。 なぜ こんな 回路を あえ て 掲載した のかと いうと、 1C として はさ すがに 1 5 年 近く 昔に 開発され ただ け あって、 簡単な 回路 (といっても、 卜 ラン ジス タで 組む と 2(H 固] 乂 と) で 構成 されて いる ことを 改めて 認識して 欲し かった からです。 こ の 回路では わか りに く L 、ので、 ブ ロック 構成を 図 2 に 挙げて おきます。 これは、 1 的に おなじみの 個別 部品 (?) で 表されて いるので、 動作 原理が 理解し やすいと 思います。 これによ る と' コンパ レータと 呼ばれる ものが 2 組と 抵抗器 3 本、 RS フ リップ フロ ッ プ、 そして 出 カノく ッ ファと オープン コ レ クタの トランジスタ か M 組ず つ ある のが わかり ます。 コンパレータの 動作 コンパレータは オペアンプ でも 構成 できる ものです が、 日本語の 名前は 電 圧 比^ 器と 少 々いかめしい ものです。 しかし 動作は まさに 電圧 比較な のです。 厳密に いうと、 コンパレータの 中に も ウインド コンパレータ など いろいろな 繼 頁が あるので すが、 単に コンパ レー 夕と 呼ぶ ときは レベル コンパレータと か ボルテージ コンパレータ という 電圧 比較 器を 意味し ます。 それは さておき、 図 3 を ご覧く ださ い。 これが コンパレータを 表す シンポ ル マークです。 入力が 2 つ、 出力が 1 つで、 オペアンプ となんら 変わる とこ ろが ありません。 事実、 オペアンプを コ ン パレー タと して 使用す る こと 力く、 実際には 多い のです。 コ ン パレー タの 動作は 増幅 動作とは 違い、 どちら かとい うと デジタル 回路 的な もので、 + 入力 側の 電圧が 一入 力 側の 電圧より も 高い ときには 出力が H レベルに、 そして 逆に 低い ときには 出 力が L レベルになる という 単純 明快な ものです。 つまり、 一入 力 側に 基準 電 圧 (Vref) を 与えて おきさえ すれば、 + 側 入力の 電圧を 監視で き る わけです。 なお、 電圧 の 結果は そのまま 出 力に 現れる のでは なく、 実際には ヒス テリ シス 幅と いう ものが 存在して いる ために、 微 $ 少な ズ レが 出ます。 つまり、 比較 電圧が Vref より 高い 方から 近づい ていつ たと きには、 ほんの わずか Vref 写真 1 タイマー IC555 シリーズの パッケージ I P タイフ 8 ピンの 555 です。 普通 はこの タ イブの ちのを 使います。 まん 中が CA N タイプの もので、 また 入手 も 難しいで しよ 〇。 左側の 14 ビンの D I P 型丨 Ctfs 555 が 2 回路 入つ だ 556 です。 よりも 低くなら ない と、 出力は H レべ ルから L レベルに 変化し ません。 逆に 比較 電圧が Vref よ り 低い 方から 近づい ていつ た 場合は、 Vref よりも ほんの わ ず か 高くなら ない と 出力は H レベルに 変化し ない のです。 この ヒス テ リシ ス 幅の 存在は 大変 意 味の ある ものです が、 話が 少し それて しまう ので 省略し ます。 いずれ 機会を 見て、 オペアンプと コンパ レー タの 特 番 を 組ん でみ た いと 思って いま すので、 そのと きに でも 紹介し ましょう。 RS フリップフロップ 555 の 内部に ある R S フ リップ フロ ツプ とは、 Reset と Set という 2 つの 入 力が ある ことから 名付けられて います。 こ れは 特に 変わ つた フリッ プ プロップ ではなく、 単に R = H、 S = L のとき には、 Q"=H. そして R = L、 S = L のとき は 前の扰 態を 保持 します。 また、 R = L、 S = H のとき には、 Q = L に なる のです。 この フ リップ フロ ッ プは R E S E T 入力 も 持って います。 これは 最 優先の 入力 端子で、 L レベルに すると フリッ プ フロ ップ ので' =H となり、 出力は 反 転 バッファ 回路を 通って L レベルに な ります。 また トランジスタの コレクタ 出力は グラン ド 電位になります。 TECHNICAL AREA 207 バッファ m 路 cm 転 バッファ) 555 に 内蔵 さ れ ている バッフ ァ 回路 は 大変 用途が 広い ものです。 通常の T TL- 丨 C の バッファ 回路では、 リレ 一 を _ したり ラン プを 点灯 ( L E D で はない) する こと はでき ません。 出力 電 流を あま り 取り出す ことができ ないか ら です。 ところが、 この 555 の バッファ 回路 は 電流を 最大 200mA 流 し 込む こと も、 ま た 逆に 最大 200mA はき 出す こと もで きる のです。 これを シンク 電流が 大き いといい ます。 普通の LED を 点灯す る 場合は 20mA も あれば 十分です から、 200mA という 電流が どんな に 大きい か 理解で きる と 思います。 安い 丨 C であ る こと も あって、 555 を タイマー I C として ではな く ハ •ッ ファ 回路 だけと し て 利用して いる 場合 も あるく らいです。 前に 紹介した 556 や 558 を 用いれば、 安 く て大 電流が コント ロールで き る 回路 を 複数 作る こと もで きます。 オー フン コレクタ 出力 出力 回路には もう 一つ、 オーブン コ レ クタ 出力が あります。 オーブン コレ クタ 出力は、 本来は タイマー 回路を 組 ん だとき の コンデンサを 放電 (後で 説 明) する のに 使用す る、 いわば 電子 スイ ッチの ような ものです。 内部の フ リッ プ フロ ップが リセット される とこの 卜 ラン ジス タが オンに なり、 コレクタは グラ ン ドと ほ (ま 同 電位になります。 応 MSX MAGAZINE 1988.1 DIGITAL CRAFT 用 回路に よっては、 こち て 使う こと もあります。 m あれこれ m m 今 ま での 説明か^ mm でき なくても、 555 は 使いこなす ことができます。 555 の 基礎 となる 2 頁の 回路で あ るアス テー ブル モー ド マルチ バイブレーター 回路と、 モノ ステ ー ブル モード ワン シ ヨット マルチ 回路を 説明 しまし よう。 この 2 つの 回路は この I C を 使い こ なす 第 1 段^ c にな ります。 習うよ りは 情れ ろの 言葉 どおり、 できたら 基本 回 路 でまず 実 してみ てくだ さい。 その 1 ワン シ 灣ツ ト マルチ 555 を ワン シヨ ッ ト マルチ 回路と し て 使用 するとき の 基本 回路、 というよ りは 基本 接続は 図 5 のと おりです。 こ れはモ ノス テーブル マルチと か、 ディ レイ 回路と か、 また タイマと も 呼ばれ る ことがあ ります。 これが どのような 動作を する か、 順に 追ってみ る ことに しまし ょう。 まず、 回路と しては、 抵抗器 RA を 介 して、 コンデンサ C が 充電され る こと になります。 電源を入れた 直後は、 Dis charge 端子が グランド 電位、 つまり ほ ぼ 0V になって いるので、 コンデンサ はまっ たく 充電され ない 状態に なって います。 555 内部の 2 つの コンパレータ A と B には 電源 電圧を 内蔵の 抵抗器 R 3 本 で 分 圧して、 Vref (基準 電圧) が 与えら れ ています。 コンパレータ A には、 2/3 Vcc が、 そして コ ン パレー タ B には 1/3 Vcc が 与えられ ている ことは、 内部 構 成から 理解で きる でしよう。 Control Voltage 端子は 特殊な 使い方 をし ない 限り、 回路の 動作を 安定 させ るた めに も の セラミック コンデ ンサを 入れて おきます。 なお、 CMOS タイプで はこの コンデンサは 必要 あり ません。 Trigger 入力が H レベル (実際には 1/3 Vcc よ り 高い 電圧) が 与えられて いると、 コンパレータ B の 出力は L、 そして コ ン デン サの 電圧を 監視す るた めに、 Threshold 端子が コ ン デン サに 接続され ている ので、 コンパ レータ A の 出力は L です。 つまり R S フリ ップ フロ ップ の 2 つの 入力は 両方と も L レベルが 与 えられて いる ことになるので、 出力 状 態は 電源 投入 時の ままです。 ここで、 Trigger 入力を _§舜 L レベル TECHNICAL AREA 209 図 4 555 ファミリーの ピン 接続 QIgnd vccrg m Trigger Discharge |7| [3J Output Threshold fe] [T Dischargel Vcc 141 Discharge2 7^ Thresholdl [3 Kn T__2 iU (1 RESETT SI g [5 Outoutl RESET2 m H Triggerl Outout2 9] [7 GND Trlgger2 8] 555 が 基本になります。 556 は 555 が 2 回路 入った I C で、 電源 端子 だけが 共用 になっ ています。 一方 558 は 4 回路 入っ ています が、 一部の ビンが 共用され てい る だめ 用途が 制限され ます。 (l/3Vcc 以下の 電圧) にす ると、 その 瞬 間に コンパレータ B は H レベル 出力に なります。 すると、 RS フ リップ フロ ッ プの S 入力には H レベルが 与え られ るので' ^=L になり、 結果と して Out put は H レベルに、 Discharge 端子は ハ イ インピーダンス (無 接続と 同じ) にな り、 抵抗器 RA を 通しての コンデンサ C の 充電が 始まる のです。 コンデンサの 端子 電圧が 2/3Vcc より も 高くなる と、 今度は コンパレータ A が H レベルに、 RS フリップフロップ の 出力 で"= H となり、 555 の Output は H レベルに、 Discharge は 再び グランド 電 圧に なって コ ン デン サ を 放電 してし ま います。 もう おわかり です ね? コ ン デン サ が 充電 されて ある 一定の 電圧に なると 勝手に 放電す るので すが、 それまでの 時間が コンデンサの 電気容量と、 抵抗 器の 抵抗 値に よっ て 決定す るので す。 コンデンサの 充電を 説明す るには、 直流 過度 現^ という 物理的な 事項の 理 解が 前提になる ので、 ここでは とても 説明し きれません。 ともかく コン デン サは 電圧 E によっ て 抵抗器を 通 して 充 電 されます。 t 秒 後の コンデンサの 両 端の 電圧 Ec は 次の 式で 表されます。 Ec= E ( 1 — exp( — t/CR)) ただし、 この 式を 導き出す ためには 微分方程式を 解く 必要が …… 〇 ま た exp (x) とは、 自然対数 e(=2.71 …… )のズ 乗を 表します。 この 式から すると、 Ec =2/3. E となる には、 t 与 1.1C R とな ったと きな のです。 これは B AS I C の 関数で も 十分 解く ことができます。 実際 マニュアル にも t=1.1 C R になる と 書かれて いま した。 555 の タイマ 機能は、 コンデンサの 容量と 抵抗器の 値の 積で ほぼ 決定す る ことになります。 仔 IJ え ば、 100 コン デン サと 1 MQ の 抵抗器を 組み合わせ ると、 この タイマ 回路の 時間 t (秒) は 次のようになります。 t =1 .IX 卿 XI M=U0( 秒) この 時間を 厳密に 調整す るには、 コ ン デン サ はもれ 電流の 少ない 良質で 値 の 正確な ものを、 また 抵抗器は 値の 正 確な ものを 用いる 必要が あります。 こ れは 長時間 タイマ を 構成 しようと する ほど、 影響が 出 やすくな ります。 また 抵抗器を 可 _抗 にす ると、 時間 調整 がで き ます。 データ ブックに よると、 この 時間 幅 は マイク ロ 秒、 単位から 1 時間 ネ1^ まで は 安定して 動作す るとの ことです。 3 分 間の クッキング タイマ も、 この I C が あれば 簡単に 作る こと がで きます。 そ (D2 発振 回路 発振 回路 ( ア ステーブルマ ル チ 回路と もい う ) の 構成は 図 6 のと おり です。 発 振 回路は とて も 重要な 回路です。 この 回路と 先に 述べた ワン ショット マノけ 回路と 比べる と、 大変よ く 似て い る こと に 気付く と 思います。 Trigger 入 力 か llireshold 入力に 接続され、 Dischar ge 端子と の 間に 抵抗器 Re が 入つ てい ま す。 それでは この 回路の 動作を 順に 追 つて 行き ましよう。 電源 投入 時には コ ン デン サ C は 充電 されて いないので、 Threshold 入力と Tr igger 入力に 与えられる 電圧は 0 V にな ります。 このため、 内蔵の コンパ レー 夕 A の 出力は L レベル、 コンパレータ B の 出力は H レベルになります。 すると、 R S フリップフロップので 出力は L レベルに なり、 丨 C の 出力で ある Output は H レベルに、 そして Disch arge 端子は ノ 、イ イン ピー ダンスに なり、 抵抗器 Ra と % を 介して コンデンサ C の 充電が 開始され ます。 コンデンサ C の 端子 電圧が 1 /3Vcc を 越える と、 コンパレータ B の 出力 も L レベルになります。 しかし、 この 状態 では R S フ リップ フロ ッ プの 状態 か 震 化しない ので、 コンデンサへの 充電は 続けられます。 そして、 2/3Vcc を 越える と、 コンパ レー タ A の 出力が H レベルに なり、 こ こで R S フリ ップ フロ ップの Q 出力は H レベルになります。 すると、 出力で ある Output は L レベルに なり > Discharge 端子 も ほぼ グランドに 短絡した 状態に 1 なる ので、 抵抗器 Re を 介して 放電が 開 j 始 されます。 コンデンサ C の 電圧は、 放電と 共に 段々 と 下がって いきます が、 1/3Vcc よ り も 低くなる と、 コンパレータ B の 出 力が H レベルに 変イ 匕し、 再び RS フリ ッ プ フロ ッ プ ので ■出力は L レベルに な ります。 すると、 コンデンサ C には 再 び 抵抗器 Ra と RB を 介して 充電が 開始 さ I れ、 出力 Output は H レベルになる ので _ す。 この 動作 力骑 くと、 一定 波形 (パル I ス) が 出力 Output に 現れる ことは 明ら かです。 Output が H レベルに なって い ] る 時間 tl と L レベルに なって いる 時間 t2 を 求めれば、 この 発振 回路の 周期が わかります。 周期が わかれば、 その 逆 1 数を 取る と 周波数 も わかります。 コンデンサ C の 端子 間 電圧 Ec は〗/ 3 Vcc から 2/3Vcc の 間を 行ったり きたり | する ことになるので、 ワン ショット マ | ル チのと きの 式が ほぼ そのまま 応用で I きます。 tl は、 コンデンサの 端子 電圧 が、 1/3Vcc になって いる 状態から 2/3V I cc になる までの 時間になります 0 ただ I し、 抵抗器は RA と Re が 2 本 直列に 接続 さ れ ている ので、 これを 考慮す ると tl= I 0.695 C(Ra+Rb) になります。 また t2 は、 J コンデンサ C の 端子 電圧が 2/3Vcc から I 1/3Vcc になる までの 時間です。 放電す | ると きは、 抵抗器 Re だけを 介して 行わ I れ るので、 同様に 計算して 求めて みる | と、 t2=0.695CRe となります。 この tl と t2 の 2 つが わかれば、 H レ ベルと L レベルが 現れる 1 周期の 時間 丁は、 T=t1+t2 となります。 つまり、 j T =0.695(Ra+Rb) C となる わけです。 j これにより、 C と Ra、 Rb の 3 つの 部品 j で、 周波数 f と デュー ティ サイクル D | C が 決定す る こと がわ かります。 周波 I 数とは、 1 秒 間にい くつの パルスが 出 I るかを 示す 値です。 また、 デュー ティ | サイクルとは 1 周期の 間で L レベルに j なって いる 時間の 比率です。 f =1/T^1.44/((Ra+2Rb)C) DC=t2/T=R8/(RA+Re) ?I0 MSX MAGAZINE 1988.1 DIGITAL CRAFT (f の 単位は Hz) 例えば RA=10kQ、 RB=5kQ、 C=10//F とすると、 t1=0.695X(l0k+5k)X10/i =0.1 04( 秒) t2=0.695X 5kX10^ 与 0.035 (秒) f=1.44/((10k+2 X 5k)X10") 与 7 .2( Hz) DC=5k/(10k+2 X 5k) =0.25(=25%) となります。 なお、 デュー テ イサ イク ル 50%( つまり H レベルの 時間 と L レべ ノ 間が 同じ) にならない こ とは D C の 式から わかります。 後述し ますが、 Ra を 0Q にして はいけ ません。 使用 するとき の 大切な 注意点 555 の 基本 動作は 以上の よ うな もの なのです が、 なんとなく 物理 や 数学の 講義みたい になって しまいました。 と はいう、 私な りになる ベく 順を 追って 説明して みたつ もりです。 さ て 万能な 555 と いえ ども 電子回路 なので、 使いこなす ためには いくつか 守らなければ いけない ことがあります。 安定した 電源 まず 第 1 に、 安定した 電源 電圧を 供 給して やる 必要が あり ます。 これは 555 に 限りません が。 このためには、 電源 端子 間に 最短距離で コ ン デン サを 入れ ます。 555 では、 Vcc と G N D 間に 1//F 以上 の 電解 コ ン デン サと 0.1//F 程度の セラ ミツ クコ ン デン サ を 入れる こと が 推奨 されて います。 なお、 I C が 2 個に な れ ば、 電解 コンデンサは それに 応じて 容量を 大きく する だけです が、 セラ ミ ツク コンデンサは 丨 C 1 個に ついて 1 個ず つ 入れる ようにし ます。 いけません。 この 電圧を 少しで も オー ノ 《 一す ると、 壊れる 可能性が あ ります 0 通常の 使用 電圧 範囲は 4. 5 〜 16 V です。 電圧 範囲が 広い おかげで、 TTL- I C と 一緒に 使用 したり、 電池 駆動の C MO S 回路と 組み合わせて 使用す る こ とも 簡単に できる わけです。 出力 電流 これ も丨 C の 最大 定格に 関わる こと です が、 出力 Output から 取り出す 戴 荒 は どんな こと が あっても 200mA 以内に します。 リレーの ように 電流が 比較的 多い ものを 駆動 するとき でも、 200mA も 必要で ある ことは まれです。 また、 Discharge 端子に 流し 込む 電流 も 200mA 以下で なければ いけ ま せん。 回路を ちょっと 見て もらえ ば 気付く かもしれ ま せんが、 こ の 制限に より 電 源 電圧に よって、 RA の 抵抗 値の 最小が 決定して しまいます。 つまり、 Ra^Vcc/0.2 となります。 これは オームの 法 IIJ から も 明らかです。 具体的には、 5 V で 使う とき には 25 Q でもよ くても、 15V では 75Q 以上で ない といけ ない ことになる のです。 余 裕を 持って RA を 常に 100Q 以 ii に 取って おくと、 問題は 起こり ま せんが。 ワン シヨ ッ ト 動作 やア ステー ブル 動作は、 と もに コンデンサと 抵抗器の 積で 各種 タイ ミ ング (デュー ティ 比 以外) を 決定 する ことができ るので、 この 制限は 大 きな 問題ではありません。 なお、 コンピュータで 用いる 基準 信 号は デュ ー ティ 50% が 必要だった りし ますが、 このと きは 発振 周波数を 2 倍 で 言^ It して おいて フリ ップ フロ ップを 用いて 2 分周 すれば 簡単に 得られます。 これにつ いては、 実は 来月の デジタル クラフトに 関係して くるので、 ここで は 触れない ことにします。 図 5 555 を 使った ワン ショット マルチ 回路 卜1」 ガ入 力の 立ち 下がりで、 出力が 変化 (C と Ra の 値で 決まります。 図 2 を 見なが します。 出 カバルスの 間隔 時間 t は 卜1」 ガ ら 動作を 考えて みて <だ さい。 入力の 長さに 関係な <、 コンデンサと 抵抗 図 6 555 を 使った 発振 回路 RESET 心 Discharge Outout - ^ +4 .5 〜 16V tl t2 — _ Trigger Threshold control Voltage 0.0 1W t1=0.695(RA+RB)-C t2=0.695RBC f=1/T=1(t14-t2) ^1.44/((RA+2RB)-C) コンデンサの 両端に かかる 電圧が ス レツ シ ョ ルド だけでなく トリ ガ入 力に ち 接続され て いる だめ、 出力は 同じ パルス 波形を <〇 返し 出力し ます。 罔 波 数 や デュー ティ 比は 抵抗器 Ra と Rb' コンデンサ C の 値に よつ て 決まり ます。 動作は 図 2 を 参 考 にして < ださい。 赝大 定格を 箱えない 次に、 最大 定格を 必ず 守って 使用す るよう にして ください 0 電源 電圧は、 どんな ことがあっても 18 V を 越えて は 次回に 続 < 今回は 555 という タイマ 丨 C につい て、 私の 主観を かなり 交えながら スポ ツト を 当てて みま したが、 次回から 2 回に わたって 555 を 使った 製作 例 j を紹 介し ます。 ぜひ、 楽しみに 待って いて ください。 TECHNICAL AREA Z\\ MSX TECHNI NOTE ojin r AL 編集部 ブリン タ 入門 (第 3 回) 24 ドット 漢字 プリンタ 今月は、 24 ドット 漢字 プリンタの 主要な 機能を 紹 介し、 各 機種の 互換性に ついても 触れて みました。 日本語 ワー ド プロセッサ とと もに、 24 ドッ ト 漢字 プリンタが 普及して きま した。 しかし、 互換性な どの 問題 も 同 時に 出て きました。 そこで、 24 ドット 図 1 24 ドット プリンタ による 8 ドット ドット グラフィック 印字 タイ ブ I タイプ II タイプ m タイフ I は 8 ドツト ブリン タと 互換性が あり、 タ イブ II と in は N E C 用ブ U ンタと 互換性が あります。 なお、 図 中で MS 巳は 最上 位ビツ 卜を、 L SB は 最下位 ビツ トを 表します。 漢字 プリンタの 機能の 概要と、 注意す べき 点に ついて 説明し ます。 すでに 持 っ ている 方は、 漢字 プリンタの マニ ユ アルと あわせて 読んで く ださい。 文字コードに ついて 漢字 プリ ン タて う荑^ (注 I ) を 印字す るた めには、 エスケープ シーケンスで 漢字 印字を 選択し、 J I S 漢字 コード を 送って 漢字を 印字し、 最後に 再び ェ ス ケープ コー ドを 送って 英字 印字に 戻 します。 問題は J 丨 S で 定義され ていない 文 字コー ドです。 J I S 辭コ- 上位 バイ トが 2 8 H から 2 FH までの ように、 多くの 「空き」 があります。 そして、 ここに 鮮線 などの 特殊 記号を 入れて いる メーカー もあります。 従つ て、 これらの 特殊 記号には 互換 I 生が あ りません。 また 1983 年度の 新」 [ミコ ー ドでは 爵 線の 漢字 符考 •が 定義され ま したが、 古い 型の プリンタでは 対応し ていない 可能 性 があります。 ところで、 NEC 製の 漢字 プリンタ では、 J I S 漢字 コードの 代わりに 漢字 プリンタの 制御コードは j I S などで 定められて いないため、 メーヵ — によって 大幅に 異なります。 また r S X 用と N E C 用の プリンタの 間で U かなり 互換 I 生が あります。 MS X 用 漢字 プリ ン タの ブラザー M-I024X、 松 下 製 FS- 4700 (ワ _ — ン 内蔵 プリンタ)、 PC-980I 用です MS X と も 相 1 生が いい N E C 製 PC-P R20I(I0I) の 3_ に 共通の 制御 コー ドを 調べ、 表丨に まとめて おきました これが M S X 用 漢字 プリ ンタ の最づ 限の 機能 と 考えても よいで しよう f ただし、 表丨の 制御 コー ドは 3 〗 に 存在す る こと を 確認した だけで、 I 、方 や 細か L 、ところ で 印字 結果が 異な る 可能 I 生が あり ます。 プリンタ を 使う ソフトを 開発す る 場合は、 実際に 動 を 忍して ください。 8 ドツト 印字 24 ドッ ト プリンタ でも 「ESC によって 8 ドッ ト ビット イメ ー ジ日 I を 行う ことができます。 ところが、 ッ ト イメージ データと 印字 ドット <7 応 に、 図 I のよう な 3 つの 種類が 考え られ ます。 図の タイプ 丨 では、 24 ド‘ ト プリンタを 8 ドッ ト プリンタと 同 に 使え るよう に 8 ドット データを 2 ‘ ットに 縦 拡大し ます。 タイプ II と m 0 H で 始まる 2 バイ トを 送る と、 半角 文字 (漢字の 半分の 幅の 英. カナ 文字) を 印字で きます。 この 機能を 使う と 半 角 文字と 全角 文字を 簡単に 混在で きて 便利です が、 一^的ではありません。 結論と しては、 J 丨 S コード 表に な い 文字 セツ トの 印字には ビツ トイ メー ジ 印字を 使い、 半角 文字は エスケープ シーケンス で 漢字 印字を 解除 してから 印字した 方が いいこと になり ます。 N E C 製 プリ ン タの 印字 方式で、 トイメ ージで 印字 さ れた 文字が1 2/3 の 高さに なって しまう と1 点が あります。 なお、 タイプ II で ( 縦横 比を 調節す るた めに 横向きに も 大 されます。 これらの 方式を スイ ツチ や 制 ^ ド で 切 り 換えられる プリンタ も あり す。 しかし、 NEC 純正 プリンタ 部の MS X 用 プリンタには タイプ I 「アウト ►日本 ク V: MSX MAGAZINE 1 TECHNICAL NOTE 機能がない もの もあります。 前回で ソ フ ト ウェアが 8 ドッ トと 24 ドッ トを 選 ぶ 必要が あると 害いた のは、 この 理由 からだった のです。 漢^ 7 リン タ ソフトの デバ ツグ 漢字 プリンタを 使う ソフ ト ウェアは , 動作 確認に 手間が かかり、 思わぬ 落と し 六 も あり ます。 そこで 動作 確認の 要 点を 紹介して おきましょう。 第丨 に、 漢字 コー ド 表に あるす ベて の 文字を 印字して ください。 かつて、 シフ ト J I S の 第 2 バイ トが 8 0 H だ と 動作が おか しくなる ソフト が ありま した。 第 2 に、 字体を 選択で きたり、 外字 登録で き る ソフト ウ ェアでは、 I 行に 各種の 文字を 混在 させて みて く ださい。 例えば ェ リー ト 文字 (幅が 狭い 半角 文 字) に 続けて ビット イメージ 印字を 行 うと、 ドット 間隔が 狭くなる プリンタ とそう でない プリ ンタ があります。 第 3 に、 長い 文書を 印字して みて く たさい。 次の ページが 正 しく 印字され ない こと もあります。 第 4 は爵線 の 問題です。 字体 や 改行 間隔を 変えられる 場合な ど、 驛 線が 正 しくつな がる かどう かを 確認して おき ます。 裏 ワザ^ 用法 ソフトウェアと プリンタの 梱 生が 悪 い 場合で も、 最初に エスケープ シー ケ ンスで プリンタ の 状態を 切り 換える と うまく 印字で きる 場合 もあります。 ① まず B A S I C の L P R 丨 N T 文で エ ス ケープ シーケンスを 送る。 ② プリン タ ケーブルを はずす。 ③ 使用す るソフ 卜を いつも どおりに 走らせる。 ④ プリ ンタ ケーブルを 接続す る。 ⑤ 印字す る。 という 手順です。 プリン タケー ブルを はずす のは、 ソフトを 走らせる ために 電源を切った 場合、 雑音で プリンタが 誤動作したり 不要な データ が 入ったり する からです。 表 1 MSX 用 24 ドット プリ ンタの 主要な 制御コード 記号 16 進 コード 動作 内容 し F OA 改行 FF OC 用紙 送り CR OD バッファの 内容を 印字して 行頭べ 戻る SO OE 拡大 印字 SI OF 拡大 印字 解除 ESC ! 1 巳 21 強調 印字 ESC II 1 巳 22 強調 印字 解除 ESC X 1 巳 58 アンダーライン ESC Y 1 巳 59 アンター ライン 解除 ESC H 1 巳 48 高密度 バイ カ (英字 • カナ 文字) 印字 ESC N 1 巳 4E 高速度 バイ カ (英字 • カナ 文字) 印字 ESC K 1 巳 4 巳 漢字 横 印字 ESC t 1 巳 74 漢字 縦 印字 ESC + 1 巳 2 巳 外字 登録 EOT 04 外字 登録 終了 ESC S 1 巳 53 8 ドット ビット イメージ 印字 ESC 1 1 巳 49 16 ドット ビット イメージ 印字 ESC J 1 巳 4A 24 ドット ビット イメージ 印字 ESC u 1 B 55 24 ドット ビット イメージ U ピー ト 印字 ESC 01 1 巳 01 1 ド ット スペース ( ESC 08 j 1 巳 | 08 ) 8 ドット スペース ESC F 1 巳 46 ドット アドレッシング これらの 制御コードは、 大部分の MSX 用と N ESC A 1 巳 41 通常 改行 (行 間隔 有り) 設定 EC 用 漢字 プリンタに ESC 巳 1 巳 42 グラフィック 用 改行 (行 間隔 無し) 設定 共通です。 だ だし 機種 ESC T 1 巳 54 改行 間隔 1 ドット 単位 設定 によって 機能が 微妙に ESC D 1 巳 44 コピー モード 異なる 場合が あるので、 実際の 使用では 事前に ESC > 1 巳 3E 片方 向 印字 よ < 調べて < ださい。 ESC ] 1 巳 5D 両方 向 印字 このような ときに ソフ トの 中で 手動 で 制御コードが 送れれば 便利です 。初 期 設定 データを ディスク や S RAM に セーブで きれば、 さらに 便利で しよう。 プリンタは 大切な 周辺 觀 メー カーに よって プリンタの 制御 コ ー ドに 互換性が なく、 同じ メーカーの プリ ンタ でも 互換性の ない のは 重大な 問題 だと 思います。 話が 急に 難しく なって しまいました が、 本当に プリンタは 難しい のです。 プリンタを 買う 場合に も、 ソフト ウェ アを 作る 場合に も、 十分な 注意が 必要 です。 注丨) ここでい う 「漢字」 には、 漢字 と 同じ 大きさの 数字な ども 含まれる の で、 厳密には 「全角 文字 』と いいます。 これに 対して 漢字の 半分の 横幅の 文字 を 「半角 文字」 といい ます。 TECHNICAL AREA 213 L^/;^ VI 「ON ERROR」 命令な ど EMS X マガジン 87 年 5 月 号 1 80 ページからの 「スーパー 家計 簿」 プログラムを 入力し ました。 けれ ども エラー メ ッ セージは 出ない のに、 プログラムの 動作 か 茨な のです。 マシ ン語や PO K E 命令を 使って いないよ う なので 暴走 している のでは ない と 思 □本来 この種 類、 の 質問は、 あま り 意味の ない 基礎的な ものな のです が、 同様の 質問が 多い ので 取り 上げる ことにしました。 「スーパー 家計簿」 には バグな どは あ U スト 1 「スーパー 家計簿」 の 問題 部分 400 ON ERROR GOTO 60010 410 DIM KA^(99,6) ,KA(10) 420 OPEN DA 本 AS #1 し EN=37 60000 • • 60010 / == ERROR SUB == 60020 • 60030 IF ERR=70 THEN 60050 6004® RESUME 680 60050 C し Sz し OCATE 5, 5 SPRINT "DISK ヲ f レ テクラ'* サイ •• 60060 FOR 1=1 TO 100 ®:NEXT I 60070 PRINT SPRINT : PRINT" DISK DK? (HIT KEY) 1 60080 A$=INKEY 拿 rIF A^=" " THEN 60080 60090 RESUME 420 りません。 そこで フロ グラムの 中を の ぞいて みま した。 リスト 丨 が 問題の 部 分です 0 400 行の 「ON ERRORj 文が、 質問に ある ように 乍を 変に" してい るので す。 試し に 400 行を 肖 lj 除し て RUN してみ てくだ さい。 うまく 動 作 しないと いう 場合の 多くは、 エラー メッセージが 表示され るで しよう。 そ うならない 場合は、 ここで 説明す る以 外の 原因で そう なって いますから、 リ ス ト 全# を 見直して ください。 「ON ERROR」 の 動作 プロ グラム 実行中に 何ら かの 異常が 発見され ると、 当然 エラーメッセージ 力读示 されて ブロ グラムは 止まります。 しかし、 フロッピー ディスクが 入って いないと きのよう に 入出力 装置 俱 り に 問 題が ある 場合に も 同様になります。 後 者では、 プログラムの 中断は 場合によ って 困ります。 そこで 「ON ERRORj 命令を 使 います。 B A S I C の 文法の 細かい 点 は マニュアルを 見て く ださい。 400 行の 意味は、 「もし エラーが 起き れば 600 1 0 行に 行け」 という こと です。 これは ファンク シヨ ン キーが 押された ときに サブ ルー チンを 実行す る 「ON KEY」 命令と 似て います。 エラー カ笼生 したと き に 呼び出され る プロ グラム、 こ の 例では 600 1 0 行から 60090 行までの プログラムを、 エラー ト ラップと いいます。 60030 行の 「 ERR」 とは 特殊な 変数で、 直前に 発生した ェ の OPEN 命令が やり直されます。 と て も 親《 切な 1舞+ です 0 ところが、 他の エラー、 例えば シン タックス エラー カ< 発生したら どうなる でしよう。 この場合には エラー 番号 Z 2 なので、 60040 行1 の 「RESUME 680_| が 実行され、 なんと メニューが! 示されて しまいます。 これで 何が 起こ った のか わからず、 悩んで しまった 才 けです 。 プロ グラムの 60030 行と 60040 行を リ スト 2 のように 修正して みて ください。 ここで 使って いる 「ERLj とは、 n 前に 発生 した エラ ーの 行 番号を 覚えて いる 特殊な 変数です 0 これを 使って、 420 行の 0 PE N 命令の エラーに 限ゲ エラー ト ラップ カ 嘯 くように してい ミ す 0 また、 他の 行 や 他の 種^の エラ- の とき は 60040 行が 実行 ^さ れ ます。 こ C 文は エラー トラッ プの 機能を 解除し、 通常 通 り エラー メ ッ セージ を 表示して プログラムを 止めます。 分散 エラー ト ラップ ラー 番号を 記憶して います。 70# のエ ラーは 「ディスク オフライン」 で、 つ まり ディ スクが ドライ ブに 入っ ていな いという ことです。 最後の 「R ES U ME420j とは、 420 行から 実行を やり 直せと いう 意味です。 もう 一度、 プログラムの; 荒れを 追っ てみ ましよう。 ディスクが 入って いな いと、 420 行の 0 P E N 命令を 実行した ときに エラー 7 〇番 が^^します。 そこ でプ ログ ラ ムの 流れが 600 1 0 行に 移り、 プログラムで メ ッ セージが 表示され X ディスクを 入れて キ ー を 押す と 420 行 改造した プログラム では、 420 行の 0 P E N 命令の 実行に 失敗した と きのみ エラー ト ラップが 意味を もちます。 1 かし 他の 場所で も ト ラ ップを 使いた し こと もあります。 このような 場合は E R L と E R R の 内容に よって •エ ラー ラ ッ プ 内で 処理を 進める こと がで きま す。 しかし この 部分が 大きく なると、 本体と トラッ プの 部分が 別れて しま こと も あり、 プログラムの; 荒れが よく わから なくなって しまいます。 そこ’ リス ト 3 のよう な 分散 エラー ト ラッフ という 方法 も 使われます。 0 P E N 命令の 直前の 415 行で ェ —ト ラップを 設定し ます。 OPEN 頜 令で エラーが 起きなければ、 ただち t 421 行で ト ラップを 解除して、 430 行か らの 処理を 続けます。 エラーが 起きれ ば メッセ ー ジを 表示し、 キ ー が 押され ると 0 P E •を やり直します。 OPEN 命令 以外で も、 例えば P U T 命令 や C LOS E 命令で も 同様の ラー カ^^す る 可能 I 生が ありま すが、 MSX MAGAZINE 1988.1 TECHNICAL NOTE これらの 命令の 直前に 同様に ト ラップ を 設定し、 直後て 解除す るよう にす る と、 エラー 番号 や エラー 行を 検査す る 必要が なく プロ グラムが すっ きりし ま す。 ただし、 リス ト 3 の 420 行で 「デ ィス ク オフライン」 以外の エラーが 起 きる と (倒 j え ば シンタックス エラー) 話に なりません から、 初心者には 向い ていない かもしれ せん。 初心者で、 プログラム 中に 「ON ERROR」 命令が あって 動作が おか しい 場合は、 この 命令を 一旦 削除して から 実行して みる ことを お勧めし ます。 例外処理 について 「ON E R RO Rj 命令な どのよう に コンピュータ の 動作に なんら かの 異 常が 起きた ときの 娜里 や、 電話の 着信 な どの 外部から の 刺激で 発生す る 処理 を 「例外^ ij といい ます。 特に、 通信 プログラム や 0S (オペ レ— テ ィング •システム) を 設計す 令 場合には、 例外 啦 里の 技術が プロ グラ ムの信 $頁'1 生と 美し さを 左右し ます。 プ ログ ラムを 作る 場合は、 エレガントな 例外処理で 信頼性が 高い ものにす るよ う/!:、 力 < けましょう。 EP C-980I で MS X-DO S が _ するとき きました。 具体 的には どうす るので すか。 (岸 和 田 市 積 J II 敏 文) □カノー プス 電子 製の 「P LU S-80MCX」、 または 「PL US-I80」 などの CPU ボー ドと 付属 の ソフトウェアを 使う と、 PC-980I 上 で MSX-D0S と C P/M-80 が 動き ます (どちらも 98800 円)。 また、 CP /M や MS X-DO S の 片面 フ; j— マツ 卜 (注 丨〉 の ディスクを 読み書き する 機 能 も あるので、 特に 3. 5 イ ンチ ディスク が 接続 さ れて いる 場合は 便利です。 しかし ハードウェアが 本物の MS X とは 異なります から、 動く プログラム は 当然 限られて きます。 入出力の 方法 は B D 0 S コールの みです から、 漢字 や グラフィックは 使えません。 CP/ M に ランダム ブロック リード/ライ ト の B D 0 S コールが 追 jbQ された 程度の ものと 考えて おいた 方が いい かも しれ ません。 MS X-M80^L80 などは 高速 に 実行 さ れて 重宝し ま すが、 MS X-C コ ンパ イラは 動かない よう です。 私は 個人的に MS-DO S の vi エディ 夕で 書いた MS X 用の プログラムを、 P L U S-80 と C P/M 用の L S I -C コンパイラ (注2) で コンパイルし たこ とがあります。 とにかく 速くて 快適で した。 P C-980I と M S X は 対立す る存 在ではなくて、 用途に 応じて 使い分け られ るべき だと 思います。 なお 上記の C P U ボー ドに ついては、 次の 宛先に 葉書で 請求す ると、 カタ ロ グを 送付して くれます。 〒658 神 戸市 東 灘区西 岡 本 卜 4-30 カノー プス ビル カノー プス亀 子^ H MS X の ディスク ドライブに 使つ ている フロ ッ ピー デ ィス クコ ント ローラ (FDC) は、 M8877 系です か。 それとも 765 系です か。 (餓市 仲勉) □残念ながら、 ドライブの ネ歡頁 によって F DC の 種類は 異な る 可能性が あります。 は F D C などに 関する 決まりは なく、 その 部分の ノ 、ー ドウ ェアと 物理的な 制 御 部分は ディスク を 作っ た メーカーが 決める ようになって います。 従って、 FD C の f 截頁や 接続され るア ドレスな どは、 メーカー や 機種に よって 一定で はありません。 ただし 多くの場合、 M 8877 な どの ウェス タ ンデ ジタ ル 系 F D C が 使われて いるよう です。 しかし、 MS X-D0S など B DOS コー ルを 使う 通常の 範囲では F D C を 操作し なくても ディスク が 扱え ま すか ら、 F DC が 何で あっても 問題は あり ません。 一方、 MS X 以外 ワープロの 文書 ディスク や C P/M ディスクの データ を 読み込もう とする ような 場合は、 ド ライ ブの 種類 ごと に 制御 方法を 変えな くて はなり ません。 また、 これらに 関 する 資料な どは 発行 さ れ てし 、ない ので、 自分で すべてを 解析す る 必要が ありま す。 (以上 •石 川) 注 丨 ) P C-980I 上で 動作す る N E C 純 正の M S-D 0 S では、 片面 ディスクを 扱えません。 ただし 片面 ディスクを 扱 える MS-DOS もあります。 注 2) C P/M-80 用に 作られた C コン パイ ラで、 MS X-C もこの 流れを くん でい ます。 「三国志 j の M S X 版な どで の 開発に も 使われた そう です。 MS X の デイ スク システムの 仕様に リス ト 3 分散 エラー ト ラップの 例 ySet error trap 7 Reset error trap 400 / 410 DIM KA^(99,6) ,KA(10) 415 ON ERROR GOTO 423 420 OPEN DA •本 AS #1 し EN=37 421 ON ERROR GOTO 0 422 GOTO 430 423 CLS: LOCATE 5,5:PRINT "DISK ヲ イレ テク デサイ" 424 PRINT : PRINT SPRINT" DISK OK?(HIT KEY) " 425 A^= INPUTS ( 1 ) 'Wait a key 426 RESUME 420 'Return to OPEN 430 FIELD #1,2 AS N0^,6 AS MD$ ,日 AS C0^,9 AS KN 本, 12 AS MM 多 TECHNICAL AREA 215 あけ ま して おめでとう ございます。 読者の 方々 の おかげ。 感謝し ます。 今 いつもの ことながら、 あっとい う 間の 年 も テ レ コンを 見捨てないで ネ / と I 年でした。 みなさんに とって、 今年 宣伝して おいて 才^に 入ります。 は どんな 丨 年でした か? 筆者 もなん とか テレコ ン クラ ブを続 ( する こと がで きました。 これ も 応援して くださった と 通信で 吉 る/ 動作に ついて 先月 号では、 拡張 BAS 丨 C の 命令 では プログラムの 説明を してみ ます: である C 0 M I N I 命令を 説明し まし 1000 行からは 初期化 ルー チンです。 た。 さっそく これらの 拡張 B ASIC 「LOCATE,, I 」 は、 力ーソルを 表 を 使った、 簡単な ターミナル ソフトを 示す るた めの 設定です。 作って みます。 プログラムの フロー チ 1030 行では、 Crtl-S T 0 P が 押され ャー トは 先月 号を 参照して ください。 たと きの 飛び 先を 指定し ます。 リスト 丨 に、 ターミナル ソフトの リス 1050 行は、 電話回線の 音が スピーカ 卜を 示します。 これ だけで、 基本的な から 出る ように 指定して います。 通信を 行う こと がで き るので す。 拡張 1060 行では、 NCU の 初期 < 匕を 行っ B A S I C の おかげで、 簡単に できて ています。 ターミナル ソフトで すから、 しまいます。 モードは オリ ジ ネー トモー ド を 指定し 使い方は、 これ また 簡単 0 プロ グラ ます。 ここでは 回線の ネ重頃 も 指定し ま ムを RUN すると、 ポストの 電話番号 すから、 自分の 使う 電話に 合わせて 変 を 聞いて きます。 ここで キーボード か 更 してく ださい。 この 行では 2 番目の ら mis# 号を 入力し ます。 例えば、 M パラメータが 2 なので、 ダイアル 回線 S X-N E T では 03-797- 1010 です ね 0 の 20 pps に 設定され ています 3 例えは うまく 相手と 接続で きたと きには、 「キ プッシュ 回線の 方は、 「NET I N 1^ ャ リアを 5tl 忍し ました」 という メッセ C0:\0t2)j というよ うに 変更して く ージが 表示され ます。 あとは ター ミナ ださい。 ル モードと なって いますから、 受信し 1070 行は、 先月 号で 詳しく 説明した た 文字 か _ に 表示され、 キーボード COMINI 命令です。 ホス トに 合わ から 入力した 文字が 送信され ます。 せて パラメータを 言 安定して ください: 相手が 話し中な どで 接続で きな かっ アスキー ネッ トは このままで 0 K です たと きには、 メッセージが 表示され ま 1080 行 1 からは、 ダイアル する ための すから、 中止したい ときには Crt 卜 ST 姆里 です。 IN PUT 文で 番号を 入力 します。 1 120 行からの FO R 文は、 相 手が 言 舌し 中、 またはつな がらない とき の® 里を する ためにあります。 キヤ リ アが 受信され たか どう かを 2000 回 試し てみ て、 受信で きなかった ときには 1丨 7听 からの 処理に 進みます。 2000 回と いうと、 ダイアル してから 約 4 漱 かか I ります。 もういち どかけ 直す ときは、 Ctrl-S T 0 P 以外の キーを 押し ます。 I また1、 Ctrl-S T 0 P キーで B ASIC に 戻ります。 キヤ リアが 受信で きたと きには 1 240 行からの 处 S に 進みます 0 1250 行では、 正常に ホス ト 側と 接続 I された ので、 音を 切って います。 1 260 行から は 先月 号の フロ ー チヤ ー 卜 どおりです。 見比べて ください。 L 0C 関数で、 受信 バッファに データが あるか どうかを 判断し ます。 データが あった 場合には これを I N P U T $ 文 で I 文字! U り 出し、 画面に 表示し ます。 1290 行からは 送信の 处 y® です 0 キ_ ポー ドが 押されて いれば その 文字を 送 信し ます。 そして Ctr 卜 STOP キーが I 押される まで、 1260 行から 1320 行まで をく り 返します。 1330 行から エラー の 如® と、 Ctrl-S TO P が 押された ときの 処理を してい といろ わけで 拡張 B AS I C の 基本的な 命令を 10 種 頃 ほど 使って、 簡単な ターミナル ソ フ トが でき ま した。 個々 の 命令の 使い 方を 説明で きませんで したが、 これは 通信 カー トリ ッジの マニュアル などを | 参^に してく ださい。 この ターミナル ソフトは、 本当に 簡 単な ものです。 単に 受信した 文字を 画 面に 表示して、 キーボードから 打った 文字を 送信す る だけです。 これ だけし かありません から、 通 f 言 カー ト リッジ に 内蔵され ている 通信 ソフトの 方がず っと 機能が 多く 使いやす いと 思います。 ただ、 こうした 内蔵 ソフト や 市販の ソフトは、 万人向けに 作られて います か 1 ら、 各個 人の 細かな 要求には なかなか ます 0 COMMUNICATION 応える ことは できません。 そんな 不満 を 解消す るた めには、 やはり 自分で ソ フ トを 作る 必要が 出て きます。 今回の サン プル プログラム を 例に し て、 どんどん 機能を 追加して みて くだ さい。 筆者は 調子に乗って、 ホス ト 用 の 基本 プロ グラム ま で 作っ てみ ました。 これは B B S という ほどの ものでは な く、 かかって きた 電話を 着信して 相手 と チ ヤツ トする というよ うな ものです。 これく らいの プログラムなら、 2 時間 も かからないで 完成して しまいます。 本格的な BBS を 作る ためには もっと 多くの 時間を 必要と します が、 かなめ は 基本 部分です。 チ ヤンスが あったら、 リス トを できる と 思います。 さて 数回に わたって ハー ド 的な 話が 続きました。 ちょっと 難しい 言 趣 も 多 かった かもしれ ません。 そこで、 来月 号では M S X-N E T の 状況 や P DS の 話な どを してみ たいと 思って います。 •リス ト 1 ターミナル •プログラム 1000 CLEAR 1000 1010 SCREEN 0: LOCATE "1 1020 C し S 1030 ON STOP GOSUB 1370 : STOP ON 1040 ON ERROR GOTO 1330 1050 CALL NETSPK 1060 CALL NETINI ("0:OM , 2, 2) *フ*, シ :i カイ t::; ノ ト:!: ヘン □ウス ル 1070 CALI COMINI (,,0:8N1XNNN,*> 7 ホス ト ニ テ ラメ ー ララ テイ スル 1080 INPUT "テ'*:/ ワ iVl/ZT ウ“ " ; TE し 1090 CALL し INESE し (,0> 1100 CALL DIAL <"0s" ,TE し E$> 1110 OPEN "COM0S" AS #1 1120 FOR I = 0 TO 2000 1130 CA しし COMSTAT<"0s" ,STAT> 1140 STAT = STAT AND 1 1150 IF STAT <>0 THEN 1240 1160 NEXT I 1170 C し OSE #1 : CALI し INESE し 1180 PRINT "它"ノソ*ク テ'* 本 1190 PRINT ": 卜 本“ Ctrl -STOP リラ'* イ 7ル A ホ カノ ネー5? ウ テ クラ'* サイ ノ_; 1200 A^=INKEYt:IF M THEN 1200 1210 PRINT : FOR I = 0 TO 1000 s NEXT 1220 GOTO 1090 1230 * - 1240 PRINT " —— 本 1* リ 7 —ヲ カク ニ:; inv ラ. —— ** 1 250 CALL NETSPK ("©:" , 0 > 1260 . - recieve - 1270 IF LOC(l) >0 THEN A^= INPUT^d , #1) : PRINT ; 1280 / - send - 1290 M = INKEY 多 1300 IF THEN 1270 1310 PRINT #1 , 1320 GOTO 1270 1330 v - 1340 IF ER し = 1270 THEN RESUME 126¢ 1350 IF ERL = 1310 THEN RESUME 1260 1 360 PRINT " - I ラー tT 1、,它イシマシヲ, - " 1370 • - 1380 CLOSE 1390 CALL し INESE し (,1> 1400 PRINT 1410 PRINT "BASIC 二 t 卜-ソマ ス,__ 1420 ON ERROR GOTO 0 1430 END {TECHNICAL AREA 217 !T ■▼ T _T '▼ - V T , — 1 T ■零" WWW' - - W 'W W W'- W W' W W ■ P . 'f V W W- .'f" :»W f 1 V W W 囑、 ,奉 ♦♦拳 傘 ♦•拳 •争 •♦♦拳 ♦高イ 直と なっても、 何事 もなかっ たように 受け入れて しまう。 こういう ところは、 よく 見て おいて ほしかった ところ。 あとは、 機能 そのものを ふやす かど 課題は データの 入力 さて、 十 把ヒト カラ ゲに 株式 投資の ソフトと いっても、 内容 的には いろい ろ ある。 大ざっぱに あげてみ ると ① どの 株を 買ったら いい かを 探す た めの 銘柄 選択 プログラム ② さま ざまな テクニカルな 手法で 分 析 し、 主に 売る タイミングを みる もの (MS 資 運用 管 i 里 プログラム という ぐあいになる だろう。 新居 サンの プログラムは このうち ② と③の 性格を 合わせ もった もの。 それ も、 ごく 基本的な レベルに とどまって いる。 そのこと 自体は 悪い こと だとは 思わない し、 むしろ ゴテゴ テと、 これ でも か、 これで も かと あやしげな チヤ 一 卜 を かかせても、 どれ だけの 効果が ある もの やら 疑問 だ。 今の 路線を 変更 する 必要はないだろう。 ただし、 ひとつ 課題に しても らいた いのが 株価 データの 取り込み だ。 今は 新聞から セッ セと 打ち込む よ り 他は な いの だけど、 このごろでは MS X でも 利用で き る 株価 データの 転送 サービス がは やってきた。 そうした ものを 利用 して、 データは キーボードから 打ち込 まなくても いい システムを 作り上げた ら、 これは すごく 便利な 物になる に 違 いない 0 また、 別 プログラムで 銘^ 択のシ ス テムを 作って みるの も おもしろいだ ろう。 ぜひ、 これから も、 この プロ グ ラムを ひとつの ステップ にして、 より よい ものを つく つて いって ほしい。 は、 銘柄の 名前を、 なんと 漢字 コード で 入れなければ ならない という こと だ。 つまり ひと 文字 づつ 自分で コード を 探 して 入れて やらな く っち ゃい けない と いう わけ。 これは、 えらく 大変 だ〇い い 方法はないだろう 力、。 銘柄 そのものの コー ドは 証券取引所 の コードを そのまま 使う。 たとえば ソ ニーなら ば 6758 だった かな。 と、 まあ こんな 具合に 登畫录 してみ て くれ。 あまり ここで スペース をと ると、 残り の 部分が 説明で きな くな っち ゃう から 次に すすもう: 写真 丨 の メイン メニューで 2 番の 「銘 柄 呼 出」 を 選んでも らうと しよう。 こ こ が この プロ グラ ムの もっと も 大切な ところ だ。 ま ず 最初に どの 銘柄を 呼び出す のか を 写真 4 のよう に ネ旨定 し なければ なら ない。 今は サンプル として 2 麵 しか 登録され ていないので、 この どちら か から 選ぶ ことになる。 ここでは 仮に 2 の 三 井 金属 鉱業を 選んで みる: すると、 この 銘柄に 対して どんな 処 理を おこなう のか 写真 5 の メニューの 中から 選択す る。 I の 呼 出 銘柄 売却は、 現在 手持ちの 株を 売ったら、 どのくらいの 利益が 出 るかを 計算す る 機能 だ。 写真 6 を 見て もらう とわ かるけ ど、 単に 買った とき の 金額と 売る ときの 金額を 比較す るの ではなく、 有価証券 取引 税 や、 証券 会 社に 払う 手数料なん かも、 ちゃ一 んと 計算して くれる。 そういった 計算は、 もちろん 手 計算で もで きる けど、 MS X だと 一発で できる から、 ウレ シイ 。 さて、 メニューの 2 株価 グラフ 閲覧 というの が、 いわゆる 株価 チャー トを に 表示し、 プリンタに 印刷す る も の だ (写真 7 )。 ここで 表示され る チャー トは、 ちよ っと 専門 っぽく いうならば、 日足の 口 ーソク 足と よばれる もの だ。 それから 下の ほうには いつく ばっている (?) ポーグ ラフは 出来高と いって、 その 株 式の 取引 量を 示す もの だ。 株価の チャ ー トには、 これ 以外に も 移動 平均 線と か、 ヤギ 足と か 逆 ウォッ チ 曲線と か、 まあいろ いろ あるの だけ れ ど、 この プログラムでは オー ソドッ クスな ものに 限定して いる。 ただし、 この グラフを 見て いて、 ► 写 真 5 ► 写 真 8 「あれ? ここの 株価は いくらなん だ」 と 思、 ったと きに、 カーソル キーで 位置 を 指定して、 その 日の データを 表示 さ せる 機能が ある (写真 8)。 これは パソ コンを 使ったなら ではの メリ ッ トで な かな か、 よい。 新居さん 自身 も 気に入 ってい る 機 育 re はない カナ? この チャートは、 いったん ディスク に 保存して おいて、 あとて 1 売み 込んで 表示させる こと もで きる。 この COP Y して おいた 画面を 呼び出す のが、 写 真 I の メイン メニューの 3 番 にある 「C OPY 記録 呼び出し」 だ。 かけ 足で 次に すすもう。 写真 9 は、 株価を チャー ト ではなく、 数彳 直の 形で 見る ところ: 写真 10 は、 その もとと な る 数値を 入力す る 画面 だ。 毎日の 新聞の カブ シキ 欄を 見る と、 ち ゃあんと、 前の 日の カブの お 値段が でて いるから、 これを 打ち込め ばいい っ てわけ だ。 入力した 株価 データは、 ランダム ア ク セス ファイルに 保存され る。 かくして、 あなたは MS X によって 大金 持ち (大 貧乏人) への 道を 歩きは じめ たのであった。 も 5 少し 見やす い ブロ グラムを あ一 ん、 あんまり 写真を 使った から プロ グラムに ついて くわしく 説明す る スペースが なくなっ ちゃった よ一。 し かたがな いから、 いちいち 全部 見て い くのは あきらめて、 改善 ポイント だけ 触れて おこう。 まず。 う 一ん、 もう 少し 見やす くプ ログ ラムして くれない かな あ、 という のは 毎度 いっている ような 気がする け 1\9 ►••♦••♦••♦♦♦•♦♦••••••♦••♦•••♦♦•♦•••申 •♦♦奉 ■l_N_ • 11_| 111111 III _|1 • 1_ 4 i : - ^ i ▲: i . 丄 ^ ^ … 、 - $?/8ll3 ' ..二,: - ir^i: :. I 432. 0¢¢. J 5,1 432. : ^7^87/13 lT ,从 i ?,• >«U1« Sirw) 三 二 E 辑:ゴ 彻 ,11:;:; 欲:; レ i.l 蘸 デ-夕- 謳 追加 : _ : > 3 2 •: 1 I I 5 i *.: i j4 ie 2( t«ea ssj « ►写真 7 ►写真 10 ►写真 9 10 カフ'* サク ヒ:/ ♦命 20 MAXFILES=3sCLEAR 3000s DIM DY$(112),DT C4) :G0T068 30 GOSUB3290: RESTORE2740 : X= 1 70 : Y=60: P=9s S=32 : C 1 = 1 5 : C2=4: M0$= " : GOSUB3470: G0SUB27 80: FOR I=1TO800:NEXT I 40 CF%=H CO し 0R7, 0: SCREEN0S FI し ES" 本 • COP" : し OCATE10, 10: INPUT"I •ソラ COPY フ 7 イ ルメイ ( CRET ]=> メ ニ:!- ) =U;CF% 50 IF CF^11 "THEN U=0 ELSE U=1 : F»=CF^+" - C OP" 60 J=0: GOSUB3290: ON ERROR GOTO3520 ジ —— O PEN —— 70 ON KEY GOSUB10:KEY(1) ON 80 IF U=0THEN130 90 COPY TO (0,0):GOSUB3280 100 A$= I NKEY^ : IF A$= •• •• THEN 100 110 CO し OR,0,0sGOSUB3240s IF A$=CHR$C 13) TH EN U=0sGOTO60 ELSE IF A$=CHR$ (29) THEN30 ELSE GOSUB3280 s GOTO 1 00 120 GOSUB3070: GOSUB2770: BEEP: RETURN: W ン IT ウフ中 カン!/ •ノ ヒ3ウ!/* 130 C し S : GOSUB3300: QOSUB3500 : X = 1 50 : Y=60sC 1=2: RESTORE2720: GOSUB120: Y=90s REST0RE273 0 : GOSUB 1 20 : Y= 1 20 : RESTORE2740: GOSUB 120: Y= 150: RESTORE2750: GOSUB 120 140 A$=INKEY^s IF AW "THEN 140 ELSE IF VA し (A$〉<5 AND VAL(A$>>0THEN150 ELSE 140 150 GOSUB 3250:Q1=VAL(A^>:ON Q1 GOTO 270 ,410,30, 168 160 C し OSEsCOLOR,0sSCREEN5sOPEN"GRPs "FOR OUTPUT AS#ls A*=n こ* うさ まて'* した ! ! H:X=58sY =48 : C 1 =3 s C2=0 : GOSUB 180 170 A$=">>> おす t わすれ^ l 、 て •ね ! ! << :BEEP:P*=MID*(A$, I, l)s PRESET C X+8 木 I , Y> s CO し OR Cl, C2s PRINT 林 1 , P ♦sNEXT I: FOR I=1TO800:NEXT I : BEEP: RETURN 190 フ 7 イ! l メイ カ'* ラ t ヨウ シ~ ♦ 200 CO し OR , 0 s C2=0 s F I $= " A s メイ tT ラ- DAT": GOSUB 2790: IF E2=0THEN X=162s Y=70: Cl=15: C2=8: Q *=H メイ TT ラ I、 トウ □クサ レ テイ マ t ン ! ! " ELSE X=50s Y =0:C1=7: C2=0s (3¢= M フ 7 イ‘ メイ カ'* ラ メイ •• s C し 0SE#2s 0 PEN FI* FOR INPUT AS#2 210 IF Ql=l AND R=0THEN RETURN ELSE IF Ql=2 AND R=0THEN CO し ORC1 , C2: PRESET (X-10, Y — 23 ) s PR I NT# 1 , : CO し OR , 0 = FOR I = 1 TO 1 0 z BEEP : NEXT Is FOR I = lTO800sNEXT I : PRESET CX- 10, Y-23 ) : PR I NT#1, SPC (30): A$= GOTO 10 220 C し SsCO し OR C 1 , C2 : PRESET C X , Y ) s PR I NT# 1 f 0¢: COLOR, 0s Y=9s B=0: FOR I = 1T0 E2s INPUT #2 IF B 木 150+50 >400THEN B=0:Y=Y+8 230 CO し 0R2 , 0 : PRESET ( B 本 1 50+30 fY):PRI NT#lf USING ••林# > Q1*; I;FA»(I)sB=B+l:NEXT IsC し OS E 林 2: RETURN 240 GOSUB3500: RESTORE2670: X=90s Y=65s Cl=2 : GOSUB 120: RESTORE2680 : X= 1 90 : GOSUB 120: RES TORE2690: X=290s GOSUB120: CO し 0R15, 8: PRESET ¢190, 135):PRINT#lf " メニ jl 一 =[F1 中 一] "s CO し OR, 0s P=9s S=32: M0*=M M s RETURN: f •リイ カ シュウ t イノ ヒ ヨウ シ- 250 LINE(91,60>_(399,82),0rBFsCC»_OR8sPRE SET(100,70)sPRINT#l, 1 •フ 7 イ ル サレ テイ Jt DATA ラヴ シテモ イイ テ'* スカ 7 ( Y/N) H : COLOR, 0: BEEP: BEEP: BE EP: RETURN 260 し I NE ( 9 1 , 43 〉 一 ( 399 ,82),0fBF: RETURN: f \jj 宇 ツイ カ シュウ セイ ラ ケス 270 *♦ トゥ □ク ♦ 280 GOSUB 190 290 Q2=0: P=9: S=32: M0»=" " s 6OSUB260: IF E2> 0THEN300 E し SE360 300 RESTORE2720 :X=160s Y=95 : C 1 = 1 5 : C2=4 : GO SUB3470: GOSUB2780: CO し OR, 0 310 LINE(90,42>-(400,83),4,BsCOLCIR 8:PRE SET( 150, 50) s PRINT#1 , USING"## メイ? T ラ フ 7 イルカ m アリ マス,.; E2:GOSUB240 320 A^=INKEY$: IF A$=" "THEN320 ELSE IF VA し (A$>>0 AND VAL(A$><4 THEN330 ELSE BEEP s GOTO320 330 Q3=VA し (A$〉:ON Q3 GOTO 340,37 0,380 340 GOSUB250 350 A»=INKEY^: IF A»=u nTHEN350 ELSE IF A* = "Y"OR A$="y"THEN360 ELSE IF A*="N'_OR A* =,,n,,THEN290 E し SE350 360 GOSUB2900 : R=ls C2=8s RESTORE2720: GOSUB 3470: P=5: RESTORE2670: GOSUB3470: GOTO390 370 G0SUB29 1 0 : R=E2+ 1 : C2= 1 2 : RESTORE2720: G OSUB3470: P=5s RESTORE2680: G0SUB3478: G0T03 90 380 C2=4s RESTORE2720: GOSUB3470: P=5s RESTO RE2690: GOSUB3470: GOSUB3250 : X = 1 40 : Y= 1 00 : C 1=15: GOSUB2780: GOTO430 390 C し S 400 X=140: Y=55 : C 1 = 1 5 : GOSUB2780: CO し 0R4 , 1 5 : PRESET C X+75 , Y+25 ) s PR I NT# 1 , US I NG " NO. 轉林 M;R: CO し 0R15, 8= PRESET ( 195, 100) s PRINT#1? M メ ニ:! 一 =[ FI 千 一:! n s GOSUB670: «3OTO270 410 3=ヲ~ シ ♦ 420 GOSUB 1 90 :Q2=0:Q3=0:Q5=0 430 P=9s S=32: MO^=H " : RESTORE2730: G0SUB347 0 : X = 1 70 : Y=50 : C 1 = 1 5 : C2=12s GOSUB2780 440 X=200: ¥=80:1'11=3=〇1<=1:〇$="メイカ'*ラ no- = GOSUB3320: T= V A し ( AA$)s PRESET ( X , Y ) s COLO R10:PRINT#1, Q»;T 450 IF T>0AND T<=E2 THEN R=Ts GOSUB2860: G OSUB3000: し INE(0, 0) - (510, 40〉 , 0, BF: Y=0: GOS UB570: GOSUB3250 ELSE BEEP:GOTO440 460 IF Q3=30R Q2=6THEN MOW : C2=4: P=9: S =32: RESTORE2720: GOSUB3470: P=5s RESTORE269 0: GOSUB3470: GOSUB3250: C2=4: GOTO400 470 GOSUB3500: RESTORE2520: X=150: Y=59: Cl= 2: C2=0: GOSUB 120: Y=75s RESTORE2530: GOSUB 12 0: Y=100: RESTORE2540: GOSUB 120: Y=125: RESTO RE2550: GOSUB 120: Y=150s RESTORE2560: GOSUB 1 20: Y=175s RESTORE2570: GOSUB 120 480 INKEY*: IF A»=" "THEN480 E し SE IF VA し (A$)<7 AND VA し (A$) >0THEN490 E し SE480 490 Q2=VAL(A$> 500 GOSUB3250:ON Q2 GOTO950, 1150, 1750, 20 40,510,560 510 M0»=" Hs P=9s S=32: RESTORE2560: GOSUB347 0: X = 170s Y=50sCl = 15: C2=4: GOSUB2780 s F I ♦= " UJ 中ヒ "+SC$+ ••- DAT": GOBUB2800 520 X=170: Y=75: IF E2=0THEN BEEP: CO し 0R8, 0 : PRESET C 138, Y) : PRINT#1 , H シテ イノ フ 7 イ Jtj、 DATA ! ! H s FOR I = 1TO10: BEEP: NEXT IsF OR I=1TD800:NEXT I:GOTO10 530 CO し OR7,0:PRESET(148,90) SPRINT 林 i,USIN G">> トウ □クス'* ミ カウント ### テ ~ス <<"?E2s し INE(1& 0, 75)-(400, 83) f 0, BF: MJ=3s 0¢=" シ 3 ウ tT イ カウ:/ 卜 NO. = ": GOSUB3320:CN 二 VA し (AA$): IF CN>E2 OR CNC1THEN GOSUB3480: BEEP: GOTO530 540 し INEC160, 75)-(400, 83) ,0,BF:R=CN:PRES ET(X — 2,Y)sC0 し 0R8, 15sPRINT#l,USING" NO- # ## ";R 550 CO し OR4, 15: PRESET (X+74, Y) : PRINT#1 , USI NG" » @ H;DY$(R) :GOSUB2880:GOTO2040 560 M0$=" n : P=9: S=32: RESTORE2720: G0SUB347 0: P=5: RESTORE2690: GOSUB3470: C2=4: GOTO400 570 メイ tT ラ DATA DEMO ♦ 580 X= 1 0 : C 1 =2 : C2=0: RESTORE2590: GOSUB3070 : Cl=8: X=60s KA»=FK^: GOSUB308© : COLOR 1 0 s PRE SET ( 135, Y+19) : PRINT#1 f USINGMD-h* C@3" ;SC^ 590 CO し 0R7: PRESET (220, Y+8> :PRINT# 1, •_» __;C : C 1 =2 : X = 1 50 : RESTORE2600: GOSUB3070 600 CO し 0R7s PRESET ¢330, Y+8) SPRINT# 1, USING "林### 轉#, - ";K1 610 CO し ORB s PRESET ( 330 ,Y)sPRI NT# 1 , US I NG ••林 林# 轉 林#, . ";K3s X=280s RESTORE2610: GOSUB3070 620 C □し OR7s PRESET (440, Y+8) : PRINT#1, USING ••斡 林 林# 林#, . M;K2: X=380: RESTORE2620: GOSUB307 0 630 KK=K1 木 K2: TT=KK: GOSUB3130: KT=INT(TS〉 : TA=KK+KT >: CO し 0R7 ,0:PRI NT# 1,USING"@@ M;Q$; F A$ ( O し OR,0 930 GOSUB3270: A»= INKEY* s IF A$=" ELSE IF A$=CHR^ C 1 3 > THEN GOSUB3240: 0 ELSE IF A$=CHR» ( 29 ) THEN 6OSUB3240 : CO し O 640 Y=Y+20s X=50: CO し 0R7: PRESET ( X+60, Y+8) s PR I NT 林 1, USING" 林## 林### 林 林# 林# , . ";KK: RESTORE 2630s GOSUB3070 650 X=205s CO し 0R7 s PRESET ( X+60, Y+8 ):PRI NT# lf USING" 林# 轉林 林## , . H;KT: RESTORE2640: G0SUB3 070 660 X=320 sCO し 0R7s PRESET CX+72, Y+8) SPRINT# 1, USING" 林### 轉 林###### , • •• j T A s RESTORE2650:G - OSUB3070: RETURN - 670 f ♦ メイ tT ラ INPUT Jt — チン ♦ G80 し INEC5, 120〉 一 (508, 180〉 , 4, Bs CO し 0R15, 4= PRESET C 120, 117):PRINT#lf " >> カク DATA J I NPUT して くた-さい ! ! « H s GOSUB2860 690 し INE(6, 130〉-(507, 179>,0,BF 700 G=0: Cl=8s C2=10: X=30: Y=130s RESTORE270 0:GOSUB3070 710 Cl=2s C2=0s X=30s Y=150s Y2=Y: REST0RE259 0 : GOSUB3070: FK$= 720 KW ••: X=210s Y=138s G0SUB34 80: PRESET(X, Y)s CO し 0R15, 0s PRINT 轉 1 , USING"® □□□□•• ;Q 漆: FOR J=1TD4 730 X2=X+( し EN ( Q 本) 一 1 ) 本 8+ J 本 8 s CO し OR 15,0: PRE SET(X2,Y〉:PRINT#1,,.?M 740 K$(J) = INKEY 樂: IF K$ ( J> =•• "THEN740 750 DK= I NSTR C ■* 1 234567 890 ABCDEF " f K* < J ) ) : I F DK=0THEN730 760 CO し OR7 , 0 : PRESET ( X2 , Y > : PR I NT# 1 , K$ ( J ) : NEXT J: K*=K$ ( 1 ) +K 寒 (2)+K$(3) +K»<4) 770 CO し OR 8,0=C=VAL(H&H"+K*>sPRESET(100+ G 本 16,Y2):PUT KANJIf C 780 GOSUB3260 790 A$=INKEY$s IF A^=" " THEN790 800 GOSUB3240: IF A$=CHR* ( 1 1 ) OR A$=CHR$(1 3) OR A$=CHR$ ( 29 ) THEN8 1 0 ELSE GOSUB3260:G OTO790 810 GOSUB3480: IF A»=CHR$ (29) THEN し INE(10 0+G 木 16, Y2) — (100+(G+1) 本 16, Y2+1&) ,0,BFsGOT 0720 820 FK%=FK%+K%z CO し 0R7 , 0 : PRESET ¢90, 170) :P R I NT# 1 , FK$ : GOSUB3480: IF A$=CHR$ (13) THEN8 30 ELSE IF A*=CHR$ (11) THEN840 830 G=G+1:G0T 0720 840 GOSUB3230 : C 1 =8 : X=60 s Y=130s KA$=FK^:GO SUB3080 : C 1 =2 : C2=0 : X = 1 0 : RESTORE2590: GOSUB 3070 : PRESET ( 1 95 , 1 00 ) : PR I NT#lf SPC (16) 850 Y1=Y:X=10:Y=170:MJ=3:Q$= •.シ ヤ メイ = ••: J=0 : HC»=SC$: GOSUB3320 : SC$= A : PRESET ( X,Y): CO し OR10: PRINT#1, USING j Q$;SC«: Y= Yls IF Q3=10R Q3=2THEN HC»=SC» 860 Cl=2: X=150: RESTORE2600: GOSUB3070: X=2 20: Y=138: MJ=1 : 0¢=" f " : S9=l: J=0: GOSUB3320: CA^=AA$: PRESET (X,Y): CO し 0R7 , 0 s PR I NT# 1 , ;CA»; " H s S9=0 870 Cl=2s X=280: Y=130s RESTORE2610: GOSUB30 70: X=350s Y=138: MJ=3: Q$=,,¥" s J=0: GOSUB3320 = K 1 = V A し C A ) s PRESET ( X — 20 , Y ) z CO し 0R7 , 0 s PR I NT# FUSING" 斡### 林 林 , . n;KlsCl=2: X=280 : Y=130 : RESTORE2610: GOSUB3070 880 C 1 =2 : X=380 : Y= 1 30 : RESTORE2620: GOSUB30 70: X=458: Y=138: MJ=3s 0¢=" *' s J=0: GOSUB3320: K2= VA し ( A ) = PRESET (X-10, Y) : CO し 0R7 ?0:PRIN T#l, USING" # 斡## 林# ,.- ;K2;:C1=2: X=380 : Y=130 : RESTORE2620: GOSUB3070 898 X=370sY=170sMJ=3sQ$="t7t3O¥ ="sGOSU B3320: K3=VAL ( AA$ ) : IF K3 >K 1 本 2 THEN890 900 PRESET ( X , Y ) s CO し 0R8 ?0:PRI NT# 1,USING"@ 林#### 林, . ";Q»;K3 910 Y=130:GOSUB570 320 X = 145sY=170sMJ=0zQ$= ••フ フイ ルメイ = " • J=0 : GOSUB3320 : F A«=AA$: FA$ ( R ) =FA»: PRESET (Xf Y LR, 0SQOTO690 ELSE GOSUB3240: GOTO930 940 GOSUB2920: CO し OR , 0 : RETURN - 950 jV ィ 竹ク ♦ 960 X=0: Y=50s Cl =3: C2=0s RESTORE2390 : GOSUB 3078: X=90: Y=58:MJ=1 : Q$=" ” •: J=0:S9=1 : GOSU B3320: BD$=AA^: PRESET (X, Y) s CO し OR 1 1 , 0 : PR I N T#l, •け m;bd$:S9=0 970 X=178: Y=50s Cl =3: RESTORE2480: GOSUB307 0: X=300: Y=58: MJ=3: 0¢=" " s J=0: GOSUB3320: MK = VA し ( AA*)s PRESET (X, Y)s CO し OR 1 1,0:PRI NT#1, USING" 林 轉 林# , . ";MKs U3=K2+MK 980 U2=U3: X=368: Y=50:C1=3: RESTORE2410: GO SUB3070: X=450: Y=58: MJ=3: Q*= J=0: G0SUB3 320:U2=VAL(AA$>:IF U2>U3 THEN GOSUB3480: GOTO980 ELSE PRESET ( X , : CO し OR10, 0: PRINT #1 f USING" 轉 林## 轉, • ; U2 990 X=0: Y=70:C1=3: RESTORE2610: GOSUB3070: X=70: Y=78s MJ=3s Q$=,,¥" : J=0s S9=l : GOSUB3320 sUl=VA し (AA$) sPRESETCX, Y) =C0 し OR10,0sPRINT #1, USING"######, . ,,;U1:SS=0 1 000 UK=U 1 本 U2 : TT=UK: G0SUB3 1 30 : UT= INT(TS) : TZ=INT( UK 木 55/ 1 0000) 1010 X=156: Y=70: Cl=3: CO し OR10: PRESET <236, 78 ) s PR I NT# 1, USING" 林## 林##### 林## , . »;UKs RES TORE 243 0: tiUyUB3W70 1020 X=0s Y=90s Cl=3s CO し 0R1 1 : PRESET (50, 98) :PRINT#lf USING" 林# 林# 林## 轉 , . TZs RESTORE242 0:GOSUB3070 1 030 X=360: Y=70 :C1=3: CO し OR 1 1 : PRESET ( 420 f 78) :PRINT#lf USING" 林轉# 林## 轉# 轉 , . »;UTs RESTOR E2640:GOSUB3070 1040 MH=500s X=120: Y=g0:Cl=3:CO し 0R11:PRES ETC 220 ,S8):PRI NT# 1 , USING" 林## 林 , _ ; MH s REST ORE2460: GOSUB3070: UD=UK-UT-T Z -MH : X=255: Y =90 : Cl=3: CO し OR 1 1 : PRESET ( 395 , 98) :PRI NT 林 1 , US I NG_ •林## 轉 轉林轉 林# 林林轉 ; UDs RESTORE2440: GOS UB3070 1050 US=UD-T A : C4= 1 5 : I F US<0THEN C4=8 1060 CO し OR C4 : PRESET C 395 , 1 1 8 ) : PR I NT# 1 , US I NG" 林## 林## 林 林 林# 林#, . *';US: X=320: Y=110:C1=3: RESTORE2450: GOSUB3070 1070 X=0s Y=130: Cl=3: C2=0s RESTORE2470: GOS UB3070: X=1 10: Y=138: MJ=2: Q^="¥" s J=0: GOSUB 3320: HK=VAL (AA»>s PRESET (Xf Y)s COLOR 11,0: P RINT#1,USING ••林 林# 林, . » ; HK 1 080 X=200 : Y=138: HT=HK 本 K2 木 _ 8 s PRESET (X, Y) s CO し OR 1 1,0: PRINT#1, US I NG1 •林# 林 林# 林## 林轉 林#, • •• ; HT : X=160: Y=130: Cl=3s C2=0: RESTORE2480: GO SUB3070 1090 TS=US+HT:C4=15: IF TS<0THEN C4=8 1100 X=140: Y=158:PRESET(X, Y) :C0 し ORC4,0:P RINT#1, USING" 林# 林####### 林# , . ";TSs X=60: Y=1 50 : C 1 = 1 0 : C2=0: RESTORE2490: GOSUB3070 1110 SR=TS/TA 本 100: X=350 s Y= 1 58 : PRESET ( X f Y ) s CO し 0RC4 : PRINT#1fUSING" ##### ,■林# 林 7."; SR : X=280s Y=150s C 1 = 1 0 : RESTORE2500 : GOSUB3070 1120 GOSUB3270 1130 A$=I NKEY*: IF AW" THEN 1130 ELSE IF A$=CHR^U3)THEN GOSUB3240: GOTO 1 140 ELSE IF A»=CHR* (. 29 ) THEN GOSUB3240: GOTO950 ELS El 130 1140 F C»= ••ゥ •尸, +SC^+" . COP": GOSUB 1 530 : GOTO 1 _ - 0 —— 1158 f ♦ ク~ ラフ tr, テイ ♦ 1160 FI$=,,,=ft,,+SC$+,,_DAT,,sGOSUB2800sIFR =0THEN520 1170 X=50s Y=40: Xl=X-2s LINE (0fY-4)- <512, 1 90),0, BF: » 一一 ラフラ ケス ーー 1180 PRESET (X+230, 182〉 : C0L0R7: PRINT 林 1 , US ING",@ カラ, @ n;DY4»(l);DY*(E) 221 1190 D<1)=K1*2. l:D(2)=Kl^-7s Y5=180:S=150 /(D(l)-D(2)〉 1200 IF K1 く 1000THEN B=10 ELSE IF Kl>1000 AND K1<10000THEN B=100 ELSE B= 10000 1210 AD=S*B:A=1:XD=0 1220 XD=XD+ADs IF XD>8THEN A=A 本 B ELSE A=A +1: GOTO 1220 1230 Y3=Y5-(K1-D(2)) 本 S:ST=XD:H=A 1240 Y6=Y3-(K3-Kl)^cS 1250 IY=0:FOR I=Y3T0 Y STEP -ST: IY=IY+ls し INE(X1, I) — (500, I),4:CC»_0R14:PRESET(4,I_ 3) : PRINT#lf USING"### 林 林" 5 K1 + ( IY-1) 本 Hs NEXT I 1260 IY=8:F0R I=Y3T0188 STEP STs IY=IY+1: し INE(X1, I) — (500, I),4sC0L0R14sPRESET(4,I_ 3): PRINT#1, USING"#####"? Kl-(IY-l) 本 Hs NEXT I 1270 ST=4: IZ=0:FOR I=X+4 TO500 STEP ST: I Z=IZ+1 1280 Y2=180:C2=4s IF IZ MOD 7=0THEN C2=5 1290 し INE(I,Y)-(I,Y2),C2:NEXT I 1300 し INE(Xl,Y3)-(500,Y3),12sCOLOR 7sPRE SET<4r Y3-3 ) s PR I NT# 1 f USINGM#####" ; K1 1310 し INE(X1, Y6> — (500, Y6), GzCO し OR 8:PRE SET ( 4 , Y6-3 ):PRI NT# lf USING" #####" ;K3 1320 し INE(X, 180)-(500, 180>,2sLINE(X,Y)_( 500, 190), 2, B 1330 CO し 0R15zPRESET(8,Y — 20〉sPRINT#l, "1 メモ ■ノ. _ 1 340 PRESET (8, Y-12):PRI NT# lr USING" #####R ";H 1350 PRESET (X+ 100, 182)= CO し OR 8:PRINT#lrU SING" モク ヒ ヨウ >#轉 林 林#, 円" jK3 1360 PRESET (X+5, 182) s CO し 0R13s PRINT#1 , テ ~ +ヲ ~ 力" 1370 DATA ラク'' ラフ ニス H ♦ 1380 DH=0: GOSUB2880: FOR 11=1 TO E 1390 R=I 1 : GOSUB3010: BEEP: IF DT(4)=0THEN1 460 ELSE Y1=(DT(2> — Kl) 本 Ss Y4=(DT(3) — Kl) 木 S 1400 ST=4: IF (DT(1)=0OR DT(2)=0OR DT(3)= 0) AND DT(4)O0THEN Y1 = (DT(4〉一K1 ) 木 S: Y4= 0: GOTO 1430 1410 Cl=10:XX=Il*ST:LINE(X+4-ST+XXf Y3-Y4 ) - ( X+4-ST+X X f Y3-Y 1 ) r C 1 : » t スネ 1420 Yl= Y4THEN Cl=8 1440 IF DT(1)=0THEN Cl=7 1 450 XX=I1 木 ST:LINE(X +4-ST+X X - 1 , Y3-Y4 ) - ( X +4 — ST+XX+1 , Y3-Y1), Cl, BF: r □ー ソク 7iz 1460 D1=DT<0) s IF D1>DH THEN DH=DT(0) ELS E DH=DH 1470 NEXT I1=X し =INT((X+I1 本 ST)/2) — 4 1480 FOR I=1TD E2: XX=I 木 4:R=I:GOSUB3010 1490 IF DT(0)=0THEN1500 ELSE BEEP= し INE(X +4-ST+XX-1, 180)-(X+4-ST+XX+l, 180-INT(25 / DH 木 DT(0) )) , 13,BFs ^ テ* 千 ヲ~ 力 1500 NEXT I 1510 GOSUB1560: XP=E2s GOSUB1550: FC$= ••ク ~ ラフ n +SC^+ u . COP " : GOSUB 1 530 : PUT SPRITE 0, (0,2 17)sGOTO10 1520 f 1530 X8=0s Y0=0: X 9=512: Y9=200s C □し 0R15, 8: P RESETC150, Y3+1) :PRINT#1, M メンヲ COPY シ マス ? (Y/N) "z »7CPvt0 — コヒ0 — 1540 A$= INKEY*: IF A*=" "THEN 1540 ELSE IF A»="Y"OR A*="y"THEN BEEP: CO し 0R8, 0: PRESET (150,200 SPRINT 林 1,M>> メ :/ヲ COPY シ テイ マス ! ! «":COPY ]F 才 9Jt=Cv;l, 3=9 - U=Z^1 > "sCOLORt0:YM=0zGOSU B 1600: RETURN 1560 r スフ* ライト 八0 ラーン t ヨウ-:/* !〇 1570 RESTORE 1740: FOR I2=1T08:READ A$:SP$ =SP$+CHR^ C V A し ( •• " + 6¢ ) ) = NE X T 12 ゥ —— 1580 SPRITE*(0)=SP$:SX=XL_1 —— 1598 PUT SPRITE 0, , 3, 0: RETURN 1600 * スフ0 ライ ト ヲ ^ 1610 A=STICKC0) :0N A GOTO 1630, 1600, 1660 , 1600, 1690, 1600, 1710, 1600 1620 GOTO 1600 1630 IF XP=1THEN DH=0 ELSE R=XP-1 : G0SUB3 010sDH=DT(4) 1640 IF YM=1 THEN 1650 ELSE C3=12: Yl=40: GO SUB1930:YM=1 1650 R=XP: GOSUB3010: H=10: J=60s GOSUB 1950: y GOTO1610 \ 1660 SX=SX+2s IF SX>X し THEN SX=X し 一 1 衾 1670 XP=XP+1: IF XP>E2 THEN XP=E2 f、 1 680 GOSUB 1 590 : GOTO 1610 す 1690 IF YM=0 THEN PUT SPRITE 0,(0,217) 1700 G0SUB3248: RETURN 1710 SX=SX-2s IF SX<24THEN SX=24 1720 XP=XP-1: IF XP<1 THEN XP=1 1 730 GOSUB 1 590: GOTO 1G10 1740 DATA 00010000,0001000 0,0001000 0,011 11100,0011 1000, 000100 00, 00000000,0000000 - 0 —— 1750 t7 シ DATA 3=^ Lr ♦ 1760 C 1 =2 : C2=0 : C3= 1 2 : Y=40 : A 1 =0 1770 GOSUB 1930 1 780 F I " •ソ千 ヒ •• +SC$+M- DAT": GOSUB2800: Y=Y+ 20: Y2=Y: GOSUB2880: IF R=0THEN520 1 790 PR=0: CO し 0R7 , 0 : PRESET ( 1 50 , 80 > : PR I NT# 1, "DATA ヲ イン サフ シ マスカ (Y/N) ?" 1800 A*=INKEYS: IF A^=" "THEN 1800 ELSE IF A$=nY"OR A$="y"THEN B$=“ [ フ4* •ノン ラー]" s PR=1 E し SE IF A$="N"OR A*=HnHTHEN B$=" I: エ "ノラ:/]" : PR=0 ELSE GOSUB 1910: GOTO 1790 1810 GOSUB 1910: CO し 0R7: PRESET (70,80〉 :PRI NT#1, USING"® カウント 林## マテ'' 1820 X=250s Y=80: MJ=3s J=0s Q$="3=^m U カウント no. 7 カラ "sGOSUB3320sAl=VAL(AA$)sIF Al> R OR A1<1THEN GDSUB3480 s GOTO 1 820 1830 GOSUB 1910 1840 Y=Y2s IF A1<=1THEN A=1:ELSE IF A1>=1 07THEN A=107 ELSE IF A1>E2 THEN A=1 ELSE A=A1 1850 H=10:FOR J=Y T0191 STEP Hs IF A=1THE N DH=0 ELSE R=A-1:GOSUB3010:DH=DT ⑷ 1860 R=AsGOSUB3018 1870 GOSUB 1950: IF PR=1THEN GOSUB 2020 1880 A=A+ls IF A>E2 THEN 1890 ELSE NEXT J 1890 CO し 0R15, 8: PRESET (85, 202) = PRINT 林 1, •• カウン ト (パ 0 = C — :! カウ:/ 卜 (文) = H + ] メニュー =CF1 中 一:! "s C0 し OR,0 1900 A^=INKEY$: IF "THEN 1900 ELSE IF A$=CHR$ ( 45 ) THEN GOSUB 1 920: A1 =A-28: GOTO 18 48 ELSE IF A$=CHR$(43)THEN GOSUB 1920= Al= A: GOTO 1840 E し SE1900 1910 BEEP: PRESET ( 50 , 80 ) : PR I NT 轉 1 , SPC ¢70): RETURN 1920 LINE(0, Y2+1)- (512, 212), 0,BF: RETURN 1930 LINEC6, Y+1)-C503,Y+19) f 0,BF:LINE(5, Y)-(504, Y+20) ,C3,B:PRESET(17, Y+8) :C0 し 0R8 ,0:PRI NT# 1 , カウ: / h •• s PRESET ¢62, Y+8): CO し 0R2 s PRINT#1, ••年月 B":C1=2:C2=0: X=112s Y=Y+3s RESTORE3038: GOSUB3070: X=56s Y=Y-3: ST=64sH =20: GQSUB3040: RETURN 1940 » 1 950 BEEP :し INE(6,J+1> - ( 503, J+H- 1),0, BF 1960 し INE(5, J) - (504, J+H) , C3f Bs PRESET (22, J+2)s CO し OR 14,0: PRINT#lf USING"### 林" ;R:PR ESETC59, J+2): CO し 0R8 : PR I NT 林 1 , DY$ ( R ) : CO し OR 5s PRESET (129, J+2 ) s PRINT#1 , USING*1 林 林 林 林 斡 林# # 林## 林 林# 林#### 轉# 林# 林## 林轉 ####### ";DT(1>;DT(2);DT(3> ;DT(4);DT(0> 1970 IF HH$=" "THEN 1980 ELSE C4=7:CO し 株式 投資 ブロ グラム hhhbMbhhui 1 □R 10,0: PRESET (400, J+2): PRINT#1, HH$: GOTO 2300 C4=15: IF DTC4)-DH<0THEN C4=8 2010 2310 IF R=1THEN DH=DT(4) : C4=15 1980 C4=15s IF DT(4)-DH<0THEN C4=8 2320 CO し OR C4 s PRESET d 377 , Y+2 ) : PR I NT# 1 . US^J 1990 IF R=1THEN DH=DT (4) s C4=15 I NG " ######## U;DT(4) -DH iMr 2008 COLOR C4 s PRESET ( 377 , J+2 ) s PR I NT# 1 , US 2330 X=XX+64:NEXT Z I NG " 林# 林 林# 林## M;DT(4) -DH 2340 GOSUB2970: Q2=4: GOTO2060 2010 X=56: Y=Js ST=64s GOSUB3040: RETURN 2350 IF Z=5 THEN 0¢=" " : M J=2 ELSE Q$="¥"s 2028 IF HH$=" "THEN し PR I NT, USING"## 林特 MJ=3 @ 林### 林## 林# 轉## 特# 林##### 枯 轉# 林 林 林# 林 ##### 2360 J=0: GOSUB3320 :DT(P) =VA し (: AA«) : PRESET ## 林# 林## 林 林" ;R;DY*(R) ;DT<1);DT(2); DTC3>;D (X, Y)sPRINT#l,SPC(8)s IF Z=5THEN X=X-2 T ( 4 ) ; DT ( 4 ) -DH ;DT(0)s RETURN 2370 PRESET(X, Y)sCO し OR 7, 0: PRINT#1 , USING 2030 し PR I NT, USING n 林## 轉 @ 林 林# 林## 轉 ####### —— n ########** ; DTCP) : RETURN 轉 林##### 林## 林 林## © 林# 林 林# 林 林 DY$(R>; —— 2380 力: /LT DATA ♦ DT ⑴ ; DT ⑵ ; DT ( 3 > ; DT ⑷; HH$ ;DT<0)s RETURN 2390 DATA 47643551467 C: » ir ^1=1* 2040 f ♦ ヒ 7 シ DATA INPUT ♦ 2400 DATA 4C353D7E 3878495533743 F74 ジ厶シ 3 ゥ 2050 C3= 1 2 s Y=86 s GOSUB 1 330 コウ フカ フ~ スウ 2060 IF Q2=5THEN2180 ELSE FI^=,,,y=f:t,,+SC ♦+ 2410 DATA 4764355133743 F74= イキ 1* ク カフ-スウ H.DATH:GOSUB2800 メ 2420 DATA 3C 68307 A4047: F K Vt=Ft!m ^ 2070 GOSUB260: し INE(90,42)-(400,83〉,4,B: I ユ 2430 DATA 476435513241334 A2327s » iV* イ中 t クカカ F R>=112THEN X=85 s Y=55 s C 1 = 1 5 s C2=6 s A^= " DA 1 ク> TA|J い っは0 いて'* すの 7T FI 中 一老 おして メ ニ:!一 に そ f リ M:GO 1 2440 DATA 3D 74487 1 307 A 38654764355 1 324 1 33 SUB 180:X=a8:Y=65:A$=M T うつて □ヒ * 一して シ i 4A2327: » i/atf* 申コ * iV* イ中 ャクカ カク > ン中 ニ ユウ リヨ ク してく た* さい 《 " : GOSUB 180SCO し OR,0:B I 2450 DATA 476435513 A 3931572327 s f iV* イキ クサ I EEP: BEEP: GOTO 2090 r 中 > 2080 IF R>8THEN CO し 0R7: PRESET ( 150, 50) : PR i 夕 2460 DATA 4C3E 35413 D 7134394 E41 s » メイ 中'* 力 中 カェ I NT# 1, USING" 轉## B9f DATA 力'* 7 リ 7 ス •• j Rz GOSUB リ 3 ゥ 240 E し SE2140 2470 DATA 23313374475 B 45763662 = f 1 カフ' ' 八 イトウ 日 2090 A»=INKEY$: IF A$=H "THEN2090 ELSE IF キン 足 デ 1 V/AL(A$)>0AND V A し (A 多 ><4 THEN2100 E し SE2090 2480 DATA 475B 457636 62: 9 2100 し INEC0, 135) — (512,212>,0,BFsQ5=V/A し (A 2490 DATA 456A3B713C7D 315723 27; » ト ウシ シュウ I 守 1 1 $):ON Q5 GOTO 2120,2 150,2110 > 6 冗 墨 H 2110 IF R>=112THEN 2070 ELSE Q2=5:G0SUB3 2500 DATA 3C7D 31574 E28= f シ ュ ウェキ リ •ソ 250SGOTO510 2510 » し 2120 IF R>=112THEN 2070 ELSE GOSUB250 2520 DATA 233 1 232838463 D504C434A4 1 232847 2130 A$=INKEY^s IF A$=" "THEN2130 ELSE IF 64232835 51: f 1 3 ヒ 14 ラ* シメ イカ** ラ jV* イ 中, ク A$="Y,,OR A»=,,y"THEN2140 ELSE IF AWN "OR 2530 DATA 233223283374324 1 25302569255523 A$=»n,,THEN2070 E し SE2130 28315 C4D77: » 2 カフ" カク'* ラ フェ1 ソラ;/ 2140 C2=8: GOSUB2900: R=0: E=0s E2=0s P=9s S=3 2540 DATA 233323283374324 1 23283 F 74434 D23 2: MOW ••: RESTORE2550: GOSUB3470: P=5s RESTO 2831 5C4D77: 9 3 カフ'* カ スウ チェ, ラン RE2670: GOSUB3470: G0T02168 2550 DATA 233423283374324 1 25472 1 3C253F2 1 2150 IF R>=112THEN 2070 ELSE C2=12: GOSUB 3C3D 71397 Es 9 4 カフ* 力 DATA 力宁 □ミ 2910: RESTORE2550: GOSUB3470: P=5s REST0RE26 2560 DATA 23352328337432412547213 C253F21 80:GOSUB3470 3C3D 244035 s » 5 カフ'' 力 DATAivn ウ t イ 2160 し INE(91 , 43)-(399, 82) , 0, BF: X=130: Y=4 2570 DATA 233623284 C 432328 4 A4 1 232823283 D 9 : C 1 = 1 5 : GOSUB2780: GOSUB2880 242328 4035: » 6 メイ ラシ: it イ 2170 CO し OR 4, 15s X=123: Y=47s Cl = 15s PRESET (: 2580 » 203,7 2) SPRINT 林 1, USING" NO. 林## ";R+lsCO し 2598 DATA 4C434A 412327 s » メイ 7T ラ > □R,0 2600 DATA 3958467 E4G7Cs f □ウ ニ:! ヒ 2180 Y=86: IF R=0THEN Y= Y+ 1 0 : J=Y s H= 1 0 : GOT 2610 DATA 337432412327 s » カフ-力 > 02210 ELSE IF R=1THEN GOSUB 301 0: DH=DT ⑷ 2620 DATA 33743 F 742327 z » カフ'* スウ > :GOTO2190 ELSE R=R- 1 : GOSUB30 1 0 : DH=DT ( 4 ) s 2630 DATA 3958467 E 3241334 As f □ウ ニ:! ウカ カク R=R+1:GOSUB3010 2640 DATA 3C6A3F744E41 s » テ スウ リョウ 2190 Y=Y+20:H=10: J=Y 2650 DATA 456 A3B713B 7136622327 s " ト クシ シキ ン> 2200 GOSUB 1950: DH=DT (4) 2660 » 2210 R=R+1: IF Q2=50R Q5=3THEN R=R-lsGOTO 2670 DATA 233123283 F 372328352 Cs f 1 シン 中 2220 ELSE2230 2680 DATA 233223284449232 83243: f 2 .リイ ヵ 2220 IF R=1THEN2230 ELSE R=R-1 : GOSUB3010 2690 DATA 233323283 D 242328 4035: » 3 La ウ t イ : DH=DT(4):R=R+1 2700 DATA 222D 3668454025332 1 502549244746 2230 し INE(5, Y+ll)-(504, Y+20) f 0, BF: Y=Y+Hs 7E4E4F: » ク テンコ ー ト'* PRESET ( 22 , Y+2 ) = CO し OR 14: PRINT#1 , USING"### 2710 » 林"; R: し INE(5, Y)-(504, Y+H) ,C3,B:; X=56:ST=64 2720 DATA 233 1 23284 C 432328 4 A4 1 2328232845 s GOSUB3840 5023284 F3F: » 1 メイ? T ラ トウ □ク 2240 X=59: Y=Y+2s M J= 1 : 0¢= : J=0; G0SUB332 2730 DATA 233223284 C 432328 4 A4 1 2328232838 0 : DY$=AA$: D Y$ ( R ) =DY»s PRESET ( X , Y ) : CO し 0R7 , 4623283 D50: » 2 メイ? T ラ 3tm ^ U 0 : PR I NT 林 1 , DY^ 4 THEN233 2770 し INE(X+15, Y — l)_(X+33, Y+16) ,8,BsRETU 0 RNs^jV^ia •ウ ワ クト - リ 2280 IF DT(1)=0THEN MJ=2: Q*= •■ヶ ,ャリ ,カイ : X 2780 KA$=MG»s L=LEN( KA$ 〉 s し I NE ( X , Y-3 > 一 ( X + 1 =XX+66:Y=YYs J=0s GOSUB3320: HH$=AA 本: PRESET 6 木し/ 4+31 , Y+17),C2, BFsGOSUB3080: RETURN: (X, Y) :PRINT#1, SPC ( 8 ) s CO し OR 10,0s PRESET C 40 —— ンシ* ノ 1、 イケ イシヨ ク シ テイ 0. Y) : PRINT#1? HHifc: X=56s GOSUB3050 E し SE2300 - 2790 9 ♦ カウ:/ ♦ 2290 IF HH*=n ,,THEN2300 E し SE2330 2800 R=0=E2=0sE=0sCl_OSE#2sOPEN Fit FOR I 22} 株式 投資 ブロ グラム TS=TT 本 ■ 4/100+85000! : RETURN 3210 IF TT>50000000#OR TT< 1000000 00#THEN TS=TT 木- 25/ 100+ 185000! : RETURN 3220 » 3230 し INE(&, 125)-(507, 179) , 0, BF: RETURN: * メイ tT ラ INPUT ノ フク: T イラ ケス 3240 し INE(0, 201〉一( 512,212 ),0, BF:RETURN: f ケ •》 力 tr:/ テイ ケス 3250 LINE(0, 40)-(512, 212) f 0, BFs RETURN: » 3 ヒ~ ヲ ~ シ メイ tT ラ ノン ラスへ* テ ケス 3260 CCM_OR15,8:PRESET(50,201〉:PRINT#1," INPUT フス* ケル =C RET], テイ セイ= カーソル C トウ □ク 10 メイ JT ラ マテ'* < •_ : RETURN: » カフ1* シ+ ヒヨ ウラ*1 イ 3310 DATA 337423282328232823283 C 30232823 2823282328456 A 23282328232823283 B71 : f カフ* シ キト ウシ 3320 DATA INPUT Jt ー チン ♦ 3330 IF S9=1THEN S=9 ELSE S=LEN CQ») +J+1 3340 CO し OR , 0 : PRESET ( X • Y ) : PR I NT#1. SPC(S) 3350 AA$= : GOSUB3480 3360 PRESET CXf Y): CD し OR 1 5 , 0 s PR I NT# 1, USING @ ; Q* : J= 1 : GOSUB3270 3370 X2=X+C し EN ( Q$ ) _ 1 〉 本 8+ J 木 8 s CO し OR 15r0:PR ESET(X2, Y) :PRINT#1, 3380 A»=INKEY*: IF A$=" "THEN3380 ELSE IF A$=CHR* (13) THEN GOSUB3240: GOSUB3480: RETU RN ELSE IF A$=CHR$ ( 29 ) THEN3350 3390 GOSUB3410: IF DK=0THEN3378 3400 CO し 0R7 , 0 s PRESET CX2,Y):PRI NT# 1,A»: AA ^=AA»+A*s J=J+1: GOTO3370 3410 » INPUT tiy" t ン テイ 3420 ON MJ GOTO 3440,345 0,3460 3430 DK=ls RETURN 3440 DK=I NSTRC'l 234567890 /M, A«)s RETURN 3450 DK=INSTR( •• 12345&7890 ケ カイヤ ■ノ , A^) s RETU RN 3460 DK= I NSTR ( 1 234567890 , A* ) : RETURN 3470 READ KA*: MJ$=MID$(KA$, P, S) : MO$=MO^+ MJ*: RETURN 3480 IF J=0THEN S=7 ELSE IF J=0AND S9=1T HEN S=9 ELSE S=ABS ( INT ( ( X2+8-X )/8)) 3490 BEEP: CO し OR , 0 s PRESET CX,Y)sPRI NT# 1 , SP C(S) : RETURN 3500 RESTORE3510: X=60: Y=195s Cl=8sC2=0:GD SUB3070: RETURN 3510 DATA 3B453B 7624724856396624474 1 2 A24 732447323 C 243524 24: f •ソ =T K=9ir jZT ウテ'1 エラン テ'* クラ - サイ 3520 f ♦ エラー シヨ リ ♦ 3530 IF ER し =2800 AND( (Q1=1AND ERR=53)0R SC〆.") THEN GOSUB 3250: GOSUB2900: RESUME2 70 3540 IF ER し =2800 AND ERR=53THEN GOSUB 32 50: GOSUB2900: RESUME2040 3550 IF Q1<>3AND(ER し =90 OR ERR=53 OR ERR =55 OR ERR=6)THEN CO し OR 15, 8: PRESET (40, 10 0) SPRINT 林 1, USING" シ テイ サレ ヲ フ 7 イル DATA A 7l) ?tri/ エラーし I NE= 林# 轉# I ラー コート'* =## 林 "jERljERRs FOR I=1TO50: BEEP: NEXT I : CO し OR, 0: U=0: RESU ME10 3560 GOSUB3290: CD し OR 15,8: PRESET (80,100): PRINT#1, USING" I ラー LINE no_=# 轉 林## エラー コ ー ト~ no.=#### テ ~ス ";ERl5ERRsCCH_OR2,0sFO R I = lTO50s BEEP: NEXT I: RESUME 10 NPUT AS#2 2810 IF E0F(2)=-1 G0T02848 2820 IF FI$=••Asメイ^rラ■DAT••THEN INPUT#2fFA $(R〉 ELSE INPUT#2,DY$(R+1) 2830 R=R+1:GOTG2810 2840 C し 0SE#2 : E2=Rs E=R: RETURN 2850 フ 7 イル ♦ 2860 FI$="AsRANt)7~-DAT"sCL0SE#3s0PEN FI 漆 AS#3 2870 FIELD #3,24 AS KD$f4 AS KC$, 16 AS D A$f8 AS KT»,8 AS KS$,8 AS K3$: RETURN: r RA N カフ'* 2880 FI^=Mt7i/"+SC$+"-DAT"sCL0SE#3s0PENF 1¢ AS#3 2890 FIELD #3,8 AS Dl^,8 AS D2$,8 AS D3$ ,8 AS D4$,4 AS KH$,8 AS D5$: RETURN: » t7i/ 2900 C し OSE#2=OPEN FI$ FOR OUTPUT AS 轉 2s RE TURNS ンキ 2919 C し 0SE#2:0PEN FI% FOR APPEND AS 林 2s RE TURN: ”ソ イカ 2920 »RAN カフ ~ 力 中 □= 2930 KEY < 1 ) OFF: IF Q3=3 OR Q2=6THEN FI$= "A: メイ カ* ラ- DAT ••: GOSUB2900SFOR W=1T0 E2:PRI NT#2,FA^(W) sNEXT W ELSE PRINT 轉 2940 し SET KD$=FK$= し SET KC$=SC$s し SET DA*= CA^sRSET KT$=MKD$(K1):RSET KS$=MKD$ (K2> : RSET K3$=MKD* ( K3 ) : PUT 轉 3 , R 2950 IF SC$<> HC^THEN K し $= •••ソキ • DA T__ SKILL KL$zKI_»="t7!y"+HC$+__-DATMsKILLIO_ % 2960 KEY ⑴ ON: RETURN 2970 r t7L> 2980 KEY(l) OFF: IF Q2=5THEN Fl^-^f+SC - DAT" s GOSUB2900: FOR U=1T0 E2: PR I NT 林 2, DY*CU):NEXT W ELSE PRINT#2,DY» 2990 RSET D1$=MKD*(DT(1)):RSET D2$=MKD$( DT(2)):RSET D3$=MKD$(DT(3)):RSET D4$=MKD $(DT(4)〉s し SET KH»=HH*:RSET D5$=MKD$(DT(0 >):PUT_3,R:KEY(1) ON: RETURN 3030 GET#3,Rs FK$=KD$ s SC%=KC%i CA^=DA* sKl = C VD ( KT* ) : K2=CVDC KS$ ) : K3=CVD (K3«) : RETURN: f RAN カフ ~ 3=ヲ~ シ 3010 GET#3 , R : DT < 1 ) =CVD C D 1 ♦ ) : DT ( 2 ) =CVD (. D2 $) : DT(3〉=CVD(D3*) :DT(4) 二 CVD(D4$> :HH$=KH$ s DT ( 0 ) =CVD ( D5* ) : RETURN : » ヒ7 シ 3 三ヲ ''シ 3020 f 3030 DATA 3B4F 2328434 D 232839622328434 D23 2830422328434 D 23283 D2A 2328434 D 232841 3046 7C 486623283 D504D 68396 2: » ヲ カネ ヤス ネオ フリネ tr- 'Vt テ'* +ヲ ' 力 3040 FOR I=XT0512 STEP ST: し INE(X, Y〉-(X, Y +H) , C3s X=X+ST: NEXT I : RETURN 3050 し I NE ( 5 , Y-2)-( 504, Y-2 八 C3 , B : X =56: ST= 64: Y=Y-2s GOSUB3040: RETURN 3060 f 3070 READ KA わ, ♦ PUT KANJI ♦ 3080 N2=(LEN(»/45COLORCl 3090 FOR N=1T0 N2: CO し OR Cl: IF N<2THEN F= 1 ELSE F=N 木 4 一 3 3180 A»=MID$( K ,F,4)s C= V A し ( •■ &H •• +A$) 3110 CO し OR ClfC2:PRESET(X+N*16,Y):PUT KA NJIf C 3120 NEXT N:C2=0s RETURN 3130 f ♦ テ スウ リョウ ♦ 3140 IF TT<200000!THEN TS=2500: RETURN 3150 IF TT >=200000 ! OR TT< 1000000#THEN TS =TT 本 1 .2/100: RETURN 3160 IF TT>= 1000000 林 OR TT く 3000000 林 THEN T S=TT 术 1 ! / 1 00+2800 : RETURN 3170 IF TT>=3000000#OR TT< 5000000 林 THEN T S=TT 本 .9/1 00+5000: RETURN 3180 IF TT>=5000000#OR TT く 100000 00#THEN TS=TT 本 .75/100+1 0000 : RETURN 3190 IF TT>= 10000000 林 OR TT<30000000#THEN TS=TT 本. 6/ 100+25000: RETURN 3200 IF TT >=30000000 林 OR TT< 50000000 林 THEN 汎用 デ— 夕入 カサ ブル— チン h フン ダム ファイル ファイル 定義 デ— 夕読み 出し. 害き 込み 1 f 手数料の 計算 纖③纖 _ 用語 解説 追いつけ ますよ" という ことで、 それ ’の一 番手っ とり 早い 方法は この クロ ッ では その** メガヘルツの 時計とは い クの 周波数を 上げて しまう ことで、 だ ったいなん だ./ という だろう から そ から 最近 さわがれ ている 80386 だの 68 八 一 F デす スク の 説明に 入る。 030 だの 32532 だの V 70 だの といった 超 ちょっと 電気. 電波 関係の こと を 知 高速 32 ビッ ト C P U でも 必ず ク ロック コンピュータ 本体の* 性能が 上がる に っ てる 人なら メ ヵ ♦ヘルッが 百万 周波数 周波数は どこ ま で 上げられ るかを 書い 連れてい まま で 思い もし なかった 事態 を 表す ことを ご存じだろう し、 そうで て ある。 というの もどん なに 強力で 高 力链 してきた。 そう ノ 周辺機器が 遅 なくても たとえば FM** は 82.2 メガ 性能な C PU でも 速い クロックに 追随 い/〃 の だ。 たとえば コンパイル とい ヘルツ、 なんて 使い方なら 知って るん できない のなら、 もっと 性能は 悪くて う 作業が ある。 プログラムを 機械語に じ ゃない かな? で、 その 百万 周波数 も 高速 クロックで 動ける 物の 方が 結果 翻訳す る 作業な の だが、 その 際 ''元の というのは 時間 的に どうなる かとい う 的に 速い コンピュータを 作れる ことに プログラム〃 だの 、'文法 チェック プロ とそれ は 簡単な 話で、 要するに” 秒 なる からで ある。 そういう わけで おそ グラム" だの ''翻 訢 第 I 段階〃'' 第 2 段 間に 百万 回の 周波" という 意味になる ろしい ことに 上に 掲げた ような 有名な P 皆〃'' 最適化 処理" というぐ あいに 山の ことに なって いる。 周波数 (ヘルツ) C PU は 軒並 20 メガ だ 30 メガ だとい う ように ファイルを やりとり しなくて は というのは そういう 意味で 使う という 話が 飛び交う。 クロック だけで MS X ならない の だ。 で、 やって みると I 回 きまりに なって いるの だ。 の 10^ 丘く 速い の だから まあ、 道理で 20^5: は 平気で かかる。 しかも その か そういう わけなの でた とえば 3 メガ 速い わけ だ。 なり の 時間は ファ イ ルの 読み書き であ ヘルツの クロックは 丨 秒 間に 3 百万 回 そういう わけで MS X でも C P U が る。 これ じゃあい く ら コンピュータの •性 の 電気 ショックを 出す という 意味に な 20 メガで 動いて くれれば いまの 6 倍 位 能を あげても かかる 時間は たいして か る。 ついでに いうと MS X は 約 3. 58 メ の スピードになる わけ だけれ ど、 Z80 わらない。 そうだ/ フロッピーディ ガ ヘルツの クロックを 搭載して いる。 C P U はそんな クロックには 追いつけ スクが 遅 いんだ/ それで 最近は ハー コンピュータの 処理 速度を あげる ため ない のでした。 ド ディスク という 奴が 徐 々に 普及して , きている。 ちょっと 内部構造を 説明す , / / / / ノ y% マ ノ る スペース はない が、 いままで フロ ッ / 〆 ノ / ノブ ピ- だと 辦か かる ことが ほとんど - ゾ c 瞬で できて しまう。 仕事の 高速 化には ひ ^ こういう 本体 鱗 ■への 投資 も 重要 クロック の 意味は 君の 知って ると お り "時計" である。 ただ 大事な ことは コンピュータ も 時計を 見ながら 動いて いると いう こと。 もっと 正確に いうと、 ゃ 時計の 針が 一つ 動けば なに かお 仕事 がで きる〃 というし くみになって いる の だ。 もっとも コンピュータの 中の ク ロック には 針なん かな くて、 代わりに 、まら 動け!〃 と 定期的に 電気 ショ ッ ク (?) を 発生す るよう になって いるの だが 。 新聞 や コンピュータ 関係の 雑誌な ど を 読んで いる 人なら ときどき ''クロ ッ ク 周波数** メガ" なんて 記事が 載っ てるのを 見た ことがある はず だ。 これ はどうい う 意味 かとい うと "その コン ピュー タ (あるいは LS 丨 など) は* * メ ガへ ルツ ま での 速さ の 時計に なら PODKET BANK 点 = 容会缺 知圖 vol.7 ムーン、 今年 も 残す は 後 ウン 日に なって しまった。 だが この 業界、 「年末 商戦」 っての が あるから、 ノーン ピリして いる わけには いかな い。 で、 ボケ バンから も いっちよ まえに 2 冊 同時 発売と あいなる。 1 冊は、 待ちに 待った 「実用 ブロ グラム J の 本、 そしても 51 冊は 「AV ジ彐 ツキ ー j。 チヨ ツト 危ない 担当 編集者 X に 内容を 書いて もら ったから 見て ね 0 そ ラ だ、 今回は ボケ バン ディスク サービスの 話 も ある そ。 わ お 5/ も ラ、 何が何だか ス テキな 気分で、 とんでもな く ワク ワク しちゃろ よろ。 年末 ボケ バン 決ま1 J ンコ 情報 第一 部 めく るめ く ボケ バン 新刊 案内 冒頭で も 述べた ように、 ジングルべ ルが 鳴り響き、 雪 や コン コの 調べが 奏 でられる 中、 ボケ バンが 2 冊 発売され る ことに なった。 さっそく、 内容を 紹 介す る ことにしよう。 デスクワークの 必需品 実用 プログラム 集 1200円 MS X は、 す ぐれた ゲーム マシン だ。 これは 間違いない。 それから、 すぐれ た 実用 マシン だ。 これ も ソウ ってい る 人は 少ない かもしれ ない けど、 本当 に 間違いない。 MS X が どれ だけ 実用 になる かは、 本気で 実用 プログラムを 作って くれる ソフト メーカーが あまり なか ったから 知られて いない だけ なの である。 ソフト メーカーが やらない こ とは、 ボケ バンが やる ッ! 〔オ オッい うね、 この 編集者 X〕 読者 アンケート ハガキ にも、 前から ガンガン 要望が 出 てた しね。 そんな わけで、 この 本では、 スプレ ット シー ト や データベース という、 日 常 生活で 道具に な りうる 実用 ソフトを、 きちんと 作って みた。 家計簿 や ローン 計算と いった、 セコい 実用 もたく さん 載って いる。 それから、 パソコン通信 で ファイルを 転送す る 時の 通話 時間 計 算 プログラムなん ていう、 その 筋の 人 には あり がたい プログラム も ある。 だけど、 これらの プログラムは 『単 に 実用し ましたっ』 て もんじ ゃない ぞ。 ポケ バン 編集部が 特に エバりたい のは、 それらの プログラムが、 てんて V く ラ/マ ラに 成り行き 任せに 作った のでは なく、 操作 体系 や 入出力の 形式なん かが、 き ちんと 統一され ている 点 だ。 つまり、 キミ らが 机の 上で 行う デスクワークを ちゃんと 分析して、 少しで も 人間の 仕 事が 楽になる ような、 あらゆる 配慮が されて いるので ある。 この 本 買って、 雑然とした 机の 上を、 アイ デン ティ ティの ある EDPS (電 子 倩 報 処理 システム) に 進化 させて ち よう だい。 狂気と 幻想の プログラム 集 AV ジョッキー 1200円 ゲームで も 実用で も、 ツールで もな な 気分に させて くれる ので ある 〔危な いな コイ ッ〕 。 すなわち、 この 本に おける プロ グラ ム とは、 呪術で あり 催眠で あり 幻想な の だ。 と、 ここまで 書いて ボケ バンと 長い 付き合いの 読者は、 3 年 前の ボケ バン r プログラム DJj を 思い出した かも しれない。 あの 『レコ ー ドを 聞きな 力く ら 掲載 プログラムを RUN すると、 2 〜 3 日 トリ ップ してし まう j 禁断の 窨 である。 そうと も、 『A V ジョッキー j こそは、 プログラム D J の 続編に あた る A V 版な ので あ る 〔そう だっ たの か、 編集者 X とは アノ ときの…〕。 だが、 筆者と プログラマーと 編集者 の 三位-^ が、 3 年間 も 進歩し ない わ けがない。 r A V ジョッ キー』 では、 この 世の ド グラマ グラ をよ り 種 i 擊的な 形で 表現す る ことができ るよう、 常人 の 域を 逸した (= 狂った) 生活 態度を 貫き通し、 r プログラム DJj を遙か に 凌いだ 狂気の 末の 快楽 を 読者に 提供 せんと 目指した ので ある。 プログラムと 一緒に 見る、 ビデオの 選択 も; 妻い。 **イ レイザー ヘッド j や 『リキッド* スカイ』 といった カル ト ものは 言う に 及ばず、 》*サ クリフ アイ ス』 や 『アレキサンダー 大王 j などの ゲージュ ツ もの も 言う に 及ばず、 『薬師 丸 ひろ子』 もの や、 1 ■ブレー ドラン ナ — j などの メジャー 映画から 1 ■ミ ツバ チの ささやき』 の 美少女 ものまで 登場 する の だ。 もちろん 『ナウ シカ j や 『ル パン 3 世 j などの 宮崎 アニメ も ある ぞ。 この 本 買って 正月には、 プログラム や ビデオの 作る 幻 態と 現実と の 間を、 存分に さまよって ちょう だい。 # いい 忘れた が、 「MSX-D0S スー パー ハンドブック」 と同じように、 こ の 2 冊 も ボケ バン シリ ーズ でな く なっ て しまったの だ。 ; 主意して ね。 年末 ボケ バン 決ま K ンゴ 情報 第二 部 魅惑の ポケ バン デイ スク 情報 10 月 号だった かな。 ポケッ ト バンク の プロ グラムを ディスク に 収めて 発売 する かも 知れな いっていった のは。 あ れ から、 あ 一で も、 こ 一で も 言いな が い プログラムが ある 〔なんだ ソ レは?〕。 この 本に 載って いるのは、 まさに そん な プログラム だ。 その 内容は、 有名 無 名な ビデオを 見ながら (思い出し なが ら でもい いけど) 各 プログラムを 実行 すると、 ディスプレイの 前に 座る 者を、 おおよ そ 現実の 体験では 味わ ったこと のない ドラ ツキー (訳: とても LS D っぽい、 あるいは とても ラッキーの 意) らいろ いろと 進めた 結果、 いよいよ 12 月に 発売され る ことに なった (やっ ほ う/ ホット ラララ)。 今回 出る のは 以 下の 3 タイ ト ルの 予定。 いや 一正 月以 上に めでた いっとく ら あ/ MSX マガジン ソフト □I SK シリーズ ① MSX-D0S スーパー 八ンド ブック プログラム ライブラリ あの、 ス ー パ ー ハンドブック 掲載の プロ グラ 厶をほ trr ベて 集めた もの だ。 具体的には、 DOS 版 アセンブラ、 D os 版 エディタ、 DOS 版 デバッガ、 多 機能 モニタ、 ディスク ダンプ、 ファ イル ダンプ、 漢字 T Y P E、 簡単 ファ イルコ ピー などなど、 MSX- DOS を 数倍 生かせる 環境を 提示す るツ ール ばかり だ。 中で も、 高速 エディタ 「P Z26 丑 弓き もん いの カタ マリの ようになって しまった (編集長、 こんなに 入れち ゃって いい ん です かぁ ) 。定価は 3000円 の 予定 だよ 機能 モニタ」 は MS X-DOS-TOO ノ U ソフ ムフ 1 ノフリ VUL ■ご LS を 持って ぃるュ ー ザ-にも 胸を 張 「マシン 語と ゲームの 交錯」 って ドンと 勸 めら れる 強者。 他の ユー マシン 語から ゲームへ と、 長い 年月 ティ リ ティ も 涙が チョ チョ ぎれ る ほど を かけた 進イ 匕の 集大成が これ だ。 なん た :ぞ 。ダンプ リストと エン ガ チョし といっても、 ゲームを プレイす る 人、 たい キミ、 これは お買い 得 よん。 なお、 ゲームを 作りたい 人の どちらに も 勧め 定価は 4800円 の 予定 だ。 られ ると ころがす ごいの だ。 内容を 紹 介す ると、 「マシン 語 入門 PA RT 2」 より、 モニタ アセンブラ 、「ゲーム 作り の テクニック」 より、 ス プライ トパタ —ン エディタ、 たぬき ウォー ズ、 3D 力 ー レ ー ス…、 「RPG の 作り方」 より, ミネルバの 城、 パレス •ド. エペルネ …、 「アドベンチャー ゲーム ブック」 よ り、 危険な 屋根、 ルーム 918、 フランス 料理の 作り方、 メディア コント ロー ル ".、 「おもしろ ゲーム ブック」 より、 海底 戦争、 トラッ ドレース、 都市 ラリ _Z •••と、 君の 小さな お 目々 が 丸くな ったり 飛び出た りの 充実 度。 しこた ま じ や 一/ これ も 定個 5 は 3000円 の 予定 です う 0 MSX マガジン ソフト □I SK シリーズ ② POCKET BANK ブロ グラム ライブラリ VQL.1 「ツ ー ルよ 永遠 なれ」 ポケ バンの ツール 類を 中心に 構成し たもの だ。 主な 内容は、 「便利 ツール、 コ キイ 吏って j より、 MOL I TOR グラフィック エディタ、 スプラ イトモ —ド 2 用 エディタ、 キャラクタ エディ 夕、 BGM コンパイラ、 逆 アセンブラ _ 「ディスク 徹底 活用 術」 より、 デ ィス ク ダンプ プログラム、 住所 も の 当て QU 丨 Z、 ライン エディタ…、 「プ リ ンタ 徹底 活用 術」 より、 ハード コピ ー プログラム、 プリンタ スプーラ…、 「すぐで きる パソコン通信」 より、 H B 1-300 用 通信 プログラム… と、 MS X を 一気に ノ ワー アツ プさ せる 頼りが 気付いた 人 もい るだろう が、 なんと いろと 考えて いるから 楽しみ だね。 ま 「MS X マガジン ソフトの D I SK シ た 「あれは 絶対に 欲しい」 などと 思つ リーズ」 として 出る の だ。 だから、 M たなら、 すぐ おたより する こと だ。 待 S X マガジンの 編集者が ソノ 気になれ つてる よ。 ば 「プログラム エリア」 とか 「ウーく なお、 これらは 今のところ 直通 販売 ん j なんかの プログラム も、 今後 この と、 書店で 売る 予定。 ただし、 書店は シリーズの ひとつと して 発売され るか かなり 大きな 店で ない とない かもしれ もしれ ない。 むろん ボケ バンで もい ろ ないから 注意す るよう に。 mX- l^\ -V- 1 1 a g 西 春 日并郡 木 村 謙、 新渴県 山 口 麻 矢 さりげなき 11 月 号 当選 発表 兵庫県 嶋高秀 、千葉県 戸田 博 志 M マガ 誌上 初めての ボケ バン ビック 愛知県 福 永 貢 介、 新潟県 輪 倉克昭 プレゼント。 君の 幸運の 女神は 微笑む 大分県 今 山 孝道、 愛知県 横山亮 かってな もんで、 ダ ダっ と 当選者を 発 鳥取県 田口昌 子、 長野県 笠 原紀光 表して しまう の だ。 ちなみに、 応募 総 プログラム 当選者 (20 名) 数は 約 600 通 (本^ 免) 450ii、 プロ グラ 青森県 杉山紀 之、 三重県 西井聪 ムが約 I50il)。 こっこん なにく るとは 船橋 市 木 村 とも子、 埼玉県 古内 隆 …。 当たった 人 もハズ レた 人 も 恨み っ 富山県 鍋 谷 博 志、 大分 市 末 松裕子 こなしよ。 兵庫県 芝元昌 幸、 群馬県 設楽秀 行 書籍 当選者 (20 名) 愛媛県 江戸 道 夫、 宮城県 遠 藤 勝 博 兵庫県 吉川嘉 _、 北海道 近 藤和弘 北海道 小 倉 孝 志、 愛知県 前 田 雄 介 東京都 岩 田 和 也、 神 戸市 箱 崎 光太郎 新潟県 宇田 達、 栃木県 井岡 崇明 神奈川県 吉澤和 美、 長野県 北 沢 健 二 千葉県 佐 藤 祐紀、 東京都 跡 部靖夫 奈良県 中 木 義憲、 東京都 り 韻] 昌博 東京都 宍戸輝 光、 福 岡 市 山 田洋一 足 立 区 相 田 陽 一郎、 愛知県 義 千武昌 大阪府 水 間玲、 福岡県 池 田将臣 濃い ね、 濃い ね、 内容が 濃い ね一。 太っ腹の ボケ バンなら では だね。 うん うん、 また MS X が 賢く なって しまう よう。 うれしい な。 削}^ 行く 卞來る 年 握りし め、 MS X と共に 日夜 働き 続け j., . ノ 7i ^ 1 るぞ。 そう 誓いつつ マガジン 編集部を J クレ イ I 見渡せば、 なんと 5時 記念の 輔と仏 ボケ バンは すでに 来年の 準備に 追わ 知らなかった。 でもい いの、 ごきげん れて おおわらわ だ。 の ほほん と 正月を 情報は いつも マイペース さ。 そんでは 過ごして はいられない。 ミ カンと 餅を また 来月。 in PROGRAM 正しい プ □クラム 入力 ラ □クラム 入力の 流れ 編集部 カクテル テータ ベース | 特製 CG プログラム オリ ジナル/ パー テイ 用 BGMram16 編集部 RAM16K 以上 K 以上 クリスマス/お 正月 回 RAM1BK 以上 ベーし っ 君と ジョイスティックが 必要 松 田浩二 あなたは 未 由に 正しい ブロ グラム 入力の 方法を 知ってい ます か? これは 一歩 間違う と、 何日 間 もの 苦労が 水の 泡に もな り かねない 大事な 常識です から、 入力 経験の あ る 方 も ぜひ 一度は 目を通す ことを おすすめ します。 プロ グラム 入力の 前に 心碼 ていた だ きたい ことが ひとつあります。 絶対 法則: プログラムは、 走らせる 前に 必ず セーブ// これは 一番 重要な 常識です。 はやく RUN したい 気持ちは わかり ますが、 絶 対に その 前に セーブ (保存) してく ださ い。 マシン 語の 場合は もちろん のこと、 最近の BASIC は 何を やって いる かわか っ たもの じゃありません から、 BASIC の 場合で も 絶対に、 RUN する 前に セー ブ してく ださい。 それでは、 セーブの 方法です。 「 カ セツ ト テープの 場合… i l)BASIC プログラムの 場合 : CSAVE^I ファイルネーム H RETURN 1 : 2) マシン 語 プログラムの 場合 : BSAVE *CAS: 「ファィルネーム 1 , 開始 : 番地 終了 番地 実行 開始 番地 「RETURN 1 ; - 注意 - : 開始 番地、 終了 番地、 実行 開始 番地 : は プログラムに よってち がいます。 し i かし、 必ず プログラムの 説明文 中に 害 : いてあります から、 それを 見て くださ i い。 なお、 実行 開始 番地は しばしば 省 ; 略されます。 …… ディスクの 場合 • 丨) BASIC プログラムの 場合 SAVE、 ファィルネーム ⑽ ETURNj 2) マシン 語 プログラムの 場合 BSAVEj^^ ルネー ム 7', 開始 跳 終了 番地 実行 開始 番地 [Return] ©[return] は/リターン キーを 押 す〃 という 意味です。 プログラム エリアに 掲載され る プロ グラムは、 特に 明記し ない 限りす ベて BASIC プログラム か、 マシン 語プ ログ ラムの どちら かです。 今月から プログラムの 先頭に、 その リス ト が 何 語で 書かれて いるかを 明記 する ようにし ましたが、 以前に 掲載 さ れ たもの の 場合には、 その リス トが B ASIC なのか マシン 語な のか、 あら か じめ 知って おかないと、 正しい 入力が できません。 その 見分け 方は、 次章で 説明し ます。 まず、 BASIC の プログラムは、 下の ような 形を しています (リス ト I 参照 )〇 まとめて 言う と、 リス ト 3 のよう な 形に 一般化で き ます。 ちなみに このような ワン セツ トを、 BASIC では'、 I 行" と 数えます。 BASIC の プログラムは、 このような'' 行〃 がた く さん 集まって できて いる わけです。 一方、 マシン 語の プログラムは、 リ スト 2 のよう な 形を とります。 これ も、 まとめる と リスト 5 のよう な 形に 集約され ます。 しかし、 マシン 語の 『アドレス』 は、 BASIC の r 行 番号』 とは 全然 別の もので す。 たと え ば、 リスト 2 は 本当は リス 卜 4 のよう な 意味な のです。 つまり、 BASIC プロ グラムは が 集まって できて いますが、 マシン 語プ ログ ラムは、 各 番地の データ 丨つ丨 つ が 集まって できて いる わけです。 チェックサム、 とは、 チェック 用 の 合計、 という 意味です。 たとえば、 リス ト 2 の 9000 の 行の チ ヱ ック サム の 値は、 簡単に言えば 9000 番地から 9007 番地の データ の 値 を ある 方法で 足した ものです。 では、 なぜ このよ うな ものが わ ざ わ ざ 記されて いるの でしょう か? マシン 語の データを I つ I つ 確認 する のは、 とても 大変な 作業です。 そこで、 せめて'、 I 行ず つ〃 確認で き ないか、 と 考えた 結果、 このような 方式が 生まれた のです。 マシン 語モ ヒタ ( 4 章 を 参照) で 表示 される チェ ック サムの 値が、 掲載され ている リ ス トの 値と 異なって いれば、 必ず そ の 行に 入カ ミスが ある ことにな リま す。 このよう にして、 間違いを 非常 に 効率的に 発見で き るので す。 .しかし チェックサム も 万能では あ りません。 入カ ミスが あっても チェ ック サムの f 直が一 致して し まう こと はいくら でもあります。 チェック サ ムの 値が 合って いるから といって 入 カ ミス がな いとは 限らな L 、のです。 ■J スト 1 固 怂匼 U ◎ヲ 回锣弓 也⑩ ■ 10 SCREEN2: COLORS ,0,0= C し S 2© DEFFNA ( X > = I NT ( RND ⑴木 X > + 1 : DEFFNB CX)=F N A ( X ) +8 : X=RND (— T I ME ) 30 OPEN "grp:" AS# Is PRESET ¢20,0): P$= " CO し OR GRAPHIC DEMONSTRAT I ON PR I NT# 1 , : PRESE TC21, 0>:PRINT#1,P^ 40 FOR 1=1 TO 208 50 ON FNAC14) GOTO 140,80,98, 100, 80f 80f 1 10, 100, 120, 130,80,90,80, 140 60 NEXT: FOR J=0 TO 2808: NEXT: FOR J=0TO9: F ORI=0TO15:CO し OR, I, IsBEEPsNEXTI, J 70 FOR 1=0 TO3000: NEXT: END 80 し INE(FNA(255) ,FNB(183) ) - (FNAt:255),FNB C 183) >, FNA C15>s GOTO60 9© し I NE ( FNAC 255), FNB ¢183))-( FNA ( 255), FNB ( 183)), FNA c;15) tB: GOTO60 100 X =FNA ( 255) : Y=FNB ( 1 83 ) : し I NE ( X , Y ) — ( X +F N A C 50 ) -50, Y+FNA ( 50 ) ) , FNA ¢15) f BFs G0T068 110 Cl RC し E ( FNAC 255) , FNA (150) +50:), FNA ¢50) ,FNAC15>:GOTO60 120 X =FNA( 255) s Y=FNA (130) +68: Z =FNA ( 1 5 ) : C IRC し E(X, Y) ,FNA(40) f Z, , , RNDC 1 >^c2s PAINT(Xf Y>,Z:GOTOG0 130 X =FN A C 208 ) +50 : Y=FN A C 1 40 > +50 s Z=FNA(15 ) :CIRC し ECX, Y) ,FNA(30) f Z s PAINT C X r Y> f Z : GOT 060 140 C=FNA(15):COLOR,C,C:GDTO&0 m 正しい プログラム 入力 U スト e リス ト 3 写7 勤》 圈ヲ回 穸导总 ©■ 0000 21 0008 00 0010 21 D018 DE 0020 9E D028 20 0030 36 0038 45 0040 65 0048 74 0C D0 23 18 15 D0 CF BC DE 21 78 61 20 4E 20 53 20 64 77 61 7E B7 F7 S3 18 EE DD 9A 0D 0A 72 20 45 50 6F 63 65 20 72 65 C8 CD A2 EC EC 00 9A FA 96 DE E0 DE 28 43 29 31 39 38 54 55 4E 69 65 74 53 6F 66 0D 6A 06 :39 :75 : 1& :64 :38 : ID :30 :D4 : A6 :52 广行 番号 (〇 から 65529 までの 数字) 20 DEFFNA ( X ) = I NT ( RND (1) 本 X ) + 1 : DEFFNB ( X ) =F N A ( X ) +8 : X =RND (-TIME) 巳 ASIC ブ □クラム (一般的には 英単語と 記号 •数字な どの 組み合わせ) •、• UXK5 D008 00 23 18 F7 93 EC EC 00 : 75 — [ - 1 - 丁 7 チ エツ クサ 厶 アドレス (番地) マシン 語う 0000 から FFFF 00 から ドドまで' 前 ページ' 、までの 4 桁の 16 進数- .の 2 桁の 16 進数 > J 己 事 参照. U スト 4 D000 番地 D000 D00I D002 D003 D004 D005 D006 D007 D000 〜 からの 番地 番地 番地 番地 番地 番地 番地 番地 D007 の データは には には には には には には には には チェ ック サムは 21 &C D0 7E B7 CS CD = 33 D008 番地 D008 D009 D00A D00B D00C D00D D00E D00F D008 〜 からの 番地 番地 番地 番地 番地 番地 番地 番地 D00F の データは には には には には には には には には チェックサムは D00S 23 1S F"7 33 EC s 75 はじめに さて、 いよいよ 入力です が、 その 前 に丨 つ 注意が あります。 リス トは BASIC なのに 『中で マシン 語を 使って いる』 といった 説明が とき どき 見られ ますが、 これは 入力には ま っ たく 関係ありません。 リ A 卜が BAS 1C なら BASIC の、 マシン 語なら マシン 語の 入力 方法を お読みく ださい。 BASIC BASIC プログラムは、 丨 行を 単位に 入力して ゆきます (3 .構造を 参照)。 こ こま で I 売んで き た 方には おわか りの よ うに、 BASIC の I 行と いうのは ふつう の 文章で いう 丨 行とは ちがいます 。す なわち、 行 番号が あって、 プログラム 本文が あって、 次の 行 番号が ある、 そ の 前まで ■— のこと を さします。 そし て、 BASIC では 丨 行 入力す るた めには 最後に I RETURN I キーを 押す 必要が あ り ます。 したがって、 リス ト丨 では リス 卜 6 にある よう な 位置て |^ETURN~1 キー を 押す ことにな り ます。 なお、 画面 上には、 MSX で 最大 40 文 字、 MSX 2 なら 80 文字を 表示す る こと がで きます が、 一方 リス トの 方は、 プ リン タ や ペー ジの レイアウト の 都合な どで 48 文字. 90 文字な どの いろいろな 場合が あ ります。 ですから、 I 行が 長 い 場合には 必ずしも 画面と リス トとの 改行 位置は 一致し ません。 これは 当然 のこと です 〇( リス ト 7 と 上の 写^を 上 匕 ベて みて ください)。 Z30 正しい プログラム 入力 10 SCREEN2= COLORS f 0,6: C •し S 「RETURN! 20 DEFFNA C X ) = I NT ( RND Cl)*X) + ls DEFFNB ( X ) =F NA(X)+8: X=RND ( — T I ME ) 1 Return L 38 OPEN •• gr p s •• AS# Is PRESET (20,0) : P$= •• CO し OR GRAPH IC:" DEMONSTRAT I ON " : PR I NT# 1 , P$ : PRESE TC21,0>: PRINT#1, P»1 RETURN 40 FOR 1 =1 TO 2001 Return • 58 ON FNAC14) GOTO 140, 80,98, 100,80 ,80, 1 10, 100, 120, 130,80,90,80, 1401 RETURN 1. & 8 NEXT: FOR J=0 TO 2008: NEXT: FOR J=0TO9: F ORI=0TO15:CO し OR, I, I: BEEPs NEXTI • J RETURN j. 70 FOR 1=0 TQ300Q: NEXT: END I Return 80 し I NE ( FNAc; 255 ) , FNB (: 1 83 ) ) - ( FNAC 255), FNB ¢183) > ,FNA ¢15) :GQTQ&01 return]. 90 し I NE ( FNAC 255 ) f FNB C 183) ) - C FNAC 255 ) f FNB C183)),FNAC15)fB: 100 X=FNAC255) s Y= GQTQ691 RETURN L :FNBC183):LINE(X,Y)-(X+F N A ( 50 ) -50 f Y+FNA ( 50 ) ) , FNA ( 1 5 ) , BF : GOTO60 1 RETURN! • 110 CIRC し E(FNA(255),nMAC150)+50:SFNA(50) , FNAC 15) : GOTO60 [return 120 X=FNA ( 255 ) :Y=FNA( 130 )+60: Z=FNA(15)sC IRC し ECX, Y) ,FNA(40) f Z, f , RNDC 1 )*2s PAINTCXf Y),Z:GOTQ&0 Return 130 X=FNAC 200 ) +50: Y=FNA C140) +50: Z=FNAC15 ) :CIRC し E(X, Y) ,FNA(30) , Z s PAINT ( X , Y) , Z : GOT □60LreturnI. 140 C=FNA C15): CO し OR fCfCz GDT068 「return」 ▲リス ト B VU スト 7 20 DEFFNA ( X ) = I NT ( RND (1) 本) < > + 1 : DEFFNB ( X > =F NACX)+8: X=RND(-TIME) しかし、 モニタに よって 使い方が 違い ますので、 MS X マガジンに 掲載して いる 以外の ものを 使う ときには、 必ず 入力 前に 使用法を よく 読んで く ださい。 ここでは 毎回 掲載して いる モニタを 使って マシン 語を 入力す る 方法を 説明 します。 はじめて マシン 語 を 入力す る 方は まず 次 ページの ''マシン 語 モニタ プ ログ ラム〃 を 入力し、 セーブし てくだ さい。 BASIC の 入力 方法は 前に 述べた とおりです。 なお、 この モニタ プ ログ ラムが 正常に 動作し ない 場合、 入力 さ マシン 語 マシン 語の 入力には、 特別に 用意 さ れた 『マシ ン語モ ニ タ』 プロ グラムが 必 要です。 MS X マガジン でも 毎回 掲載 してい ますが、 それ 以外の 雑誌で 紹介 されて いる もの も 使用可能です (ただし もちろん、 MS X 用の ほのに 限ります)。 れた マシン 語 自体 もまった く イ呆 証され ません から、 入力には 細^、 の 注意が 必 要です 。 マシン 語 モニタ の 使い方 この モニタでは、 マシン 語の 書き込 み、 および 書き込んだ データの 表示が できます。 まず、 32 K 以上の システムを お持ち の 方は、 必ず 行 番号 彳 00 の &HC7FF を &H87FF に 書き換えて ください 0 データの 書吉 込み モニタを R U N I RETURN」 で 実行 さ せる と、 左の ような 画面になります。 そして、 たとえば 900 から マシ ン 語を 入力したい ときは、 M9000 [RETURN] と 入力し ます。 M は' ソ モリセット "、 つまり" 書き込み〃 の 意味で、 9000 はも ち ろん 書き込む 番地を 表して います。 そうすると、 となります から、 あとは リス トのと おり 入力して いけば いいのです。 ただ し、 :の あとの 数字は > チェックサム〃 ですから、 入力して はいけ ません。 なお、 途中で 休む ときは ^[return] キー だけを 押す と、 ゃ*〃 が 出て、 モニ 夕の 命令 受け付け 状態に もどり ます c ちなみに、 9000 FF — 57 という 表示は、 ''9000 番地に は 今 F F が 入って るけ ど、 どうす る ?"57 に 書き換える〃 という 意味です。 STEP2 データの 表示 •チェック さて、 ある 程度 入力したら、 正しく 入力で き たか どう か 確認を しなく ては いけません。 そのためには、 D コマン ドを 使います。 たとえば、 9000 番地 か ら表 示させたい ときは、 D 9000 [RETURN | と 入力し ます。 すると、 表示し て 自動的に 4 停止し ます。 さき ほ ど 入力し た 数字が ち ゃん と 表 示される のが わかります。 チェック サ ムも 自動的に 計算 さ れて 表示され ます。 | さ らに 続けて 表示 させたい とき はスぺ -ス バーを、 中断した いとき ば return] キーを 押してく ださい。 231 正しい プログラム 入力 字 読み方 I アイ (英 大文字) 1 エル (英小文字) 1 いち (数字) ei ゼロ (数字) 0 オー (英 大文字) e はち (数字) s エス (英 大文字) Et ビー (英 大文字) = コロン (英 記号) 5 セミコロン (英 記号) 9 カンマ (英 記号) - ピリオド (英 記号) 100 SCREEN 0 = C し EAR200 , &cHC7F~F = Z^= " 0000 " 110 OIM ERROR GO 丁 0 300 1 20 PR I IMXs RRI NT ■■本" 5 = GOSLJB2&0 = PR I IMX ; 1 30 IF A$= •• M ■■ 丁 HEIM 1 50 140 IF A^="E>" THEIM21© ELSE PRIIMTs GOTO 120 1 50 し I IMEI NRUXA^s A=V A し ( " ■■ ) 1 & 0 PR I MX = GOSUB2Q© = V=PEEK CA> = GOSUBe230 = RRI NX 170 GOSUB240= L=V 氺 1&= IF E= 1 XMEM 1 30 ELSE: GOSLJB 240 = し = し + V = IF- E= 1 THEM 1 3© ELSE POKE A , し = A+ 1 1Q0 GOTO 1 & 0 13© IF A$=CHR$ ( 8 ) THEN A=A— 1 ELSE I F A^=CMR^ C 32 > THEN A = AH-1 ELSE IF A^=CHR^ C 1 3 > THEN 1 2© 200 GOTO1&0 210 し I IMEI IMPLJT = A=VA し ( ■• Sch ■• + A 本) 220 FOR し =0 TO 15= GOSUB2Q0 = FOR M=0 TO 7 = V = PE:EK ( A ) = S=S + V = GOSLJB 230 = A=A+ 1 = IMEX 丁 s PR: I IM 丁" = " 5 = V=S s GOSUB2 3©= PRINTS NEXT 230 PR I IM 丁 = GOSUEC2 & © = I F~ A$< >" _• THEN 1 20 E し SE22© 240 E = 0= GOSUB2 & 0= IF" A^< CHR^ C -+S > THEN E= 1 s RETURN s E し SEIF >CHR^ C 70 ) THEIM240 E し SE I F* >CHR$ C 57 ) AM E> A 丰 <1 二 HR 丰 C&5) THEIM24© 250 V= V A し ( ■■ JB CHR!^ C 3 & ) AIMO A^< CHR^ C 1 23 > THEN A^=CHR 车 ( ASC ( 32 ) 270 RETURN 200 A^=HEX$ (A) = PR I NT し EF~ 丁东 ( Z$, 4 一し EIM ( ) ) + A 本 + " " ; = S= I IMT C A/25& ) + (: A AND 255 ) = RETURN 230 a^=R X GHT$ C HEX$ ( V ) , 2 ) = PR I IMT し E:F"T $ ( , 2 —し EIM ( A 东 ) > " 5 = RETURN 3©0 RESUME NEXT _ U スト 8 I 罗勢》 圔卷 S 多^ 回 ダ1 P 卷 言語: BASIC 他の 日 に 続き を 入力 したいと きは モニ 夕 を 起動す る 前に 次の 処理が 必要です。 CLEAR200, &HC7FF1 RETURN 1 (32K 以上の システムの 場合は、 &HC 7FF を &H87FF にして く ださ い。) BLOADw ファイルネーム" I RETURN] カセットの 場合は、 ファイルネーム の 前に CAS : をつ けて ください。 おわりに 正 LA 、入力の ために は 正 LA 、読み取 りが 必要です。 最後に、 まちがい やす い 文字の 一覧表を 掲げて おき ますので 参考に してく ださい。 STEP4 STEPS :4c :ll s :^ :ii 3 ;ii i?l ;!i :86 66 FF FF FF FF I? 2 82 7F F1 F2 19 C3 誌 ist 5 F F F F 9 ぬ BW I0 8 933 ¢<10 1 5FFFF5 3l D 3« 8i52F 3l 30 4FFTFC1045F4A— 4FFRF21421E 24122 33 FF FF FF FF 58 2C 霞 sl i cloto 2 FFFF8 F 4 J88 9 FC 2 2FF F F 2 0I E3 4U 5 2 1 0I 22 1FTFF3FC2F2^-3F2C 1FFFFC022E0^F032 0 66 77 8 08FFTF l> 2B 82 u 1111 08FFRFB1D4DF2B51 a ffff ??FFFF^3BB082A83 FFFF 05 t fff f 32 P 2I 9I 2J 1 322 07 饌 p__^__ lor 囊眾鍪 義證 90 90 || 90< 90< 荔 〇〇 m プログラム 入力の 流れ ヲ回發 ©也從 a® 涵 ® ド な 使用 法の として このような も のを 作って みました。 ただこれ はかな り 単純な サブセット です ので さ まざ ま な データベースに 流用 可能です。 書籍 管理、 物品 管理、 資料 整理、 電話番号 等 …… などなど。 それでは ま ずは カク テル データべ 一 ス としての 使用法から 説明し ましよう。 使い方 はっきり いって 起動して しま え ば だ れ にだって わかります。 より 具体的に は、 飲みたい カクテルの 名前が わかっ ている 場合は I 番、 そうでなくて とり あえず ベースに なるお 酒の 中から 飲み たい ものを 探したい ときには 2 番を選 びます。 メニュー 丨番で 名前を 指定す ると きは、 フルネームを 入力し なくて れ ます (ただし 最初に 一致した ものを 表示し ますから、 まぎらわしくない 程 度には 入力 しないと いけませんが)。 です。 データ 拡張の 方法 データ は 50000 行 以下の データ 文に 圧縮して あります。 ここに 書き加える ことによって いく ら でも メニューを 増 やすこと がで きます。 まず 500 m 行に 登録す る カク テルの 数を 書いて おきます (つまり 最初は 21 種類 登録され ている わけです ね)。 その あとは、 1 : カクテルの 名前 2 : ベース スピリ ッツの 名前 3 : 作り方 の 順番に デー タを 並べます。 最後の 次の 行に 移る 右側に 表示す る という 特殊 記号 洲吏 えます。 応用の 方; [去 もっと まともな データベース にした い/ という 方の ために、 改造の 方法 を 説明し ましよう。 まず ベース スビリー ト - ^ ジャンル カクテルの 名前 — フ 夕 製法 - ^ データの 詳細 という 具合に 頭の 中で 置き換えます。 そう したら 次に メニューの 項目を 書き 換えなければ なりません。 この プロ グ ラムでは メニュー 自 動 表示 ルー チ ンが はいって いますので、 メニュー その も のは 10000 行 台の データ 文を 変える だ メニューの タイ ト ル 選ぶ メニューの 数 メニュー そのもの の 順番で デ ー タが 入って いま すので、 適当に 書き直して ください。 なお 現在は メイン メニュー そのもの と、 メニュー 2 番の 中で、 この ルーチン を 使って いますが、 そのほかに メニュー を 出す 必要が ある 場合は 上の よう な デ¬ ータ 文を 新たに 作って おいて (位置は I 〇 030 行 あたり がわ かり やすいでし よう)、 RESTORE その データ 文の 行 番号: G0SUB 1000 とやれば そういう メニ ューを 表示した うえ キー入力を 受け付け、 何番が 選択 さ れ たかを 変数 A に 入れて 帰って きます 語: BASIC RAM18K 以上 10 20 30 40 50 ed & 0 70 S0 3© I 10© 110 12© 1 30 1 4G* 1 50 1&0 1 70 1 Q0 EIM 130 200 210 9 Cocktail Database ver* 1-0 » Cc) 1987 by IMeiu-t Line Soft Cor p - SCREEN 0 = C し S : Ul I DTH 40 = KEY = COLOR S 9 cocktail RESTORE 50000 s READ CN , c Limber ■二- f i c oc l< -b Is DIM <: CN > c: oc 1 y s nsme DIM E?S$0 二: N) 9 t> 召 spirit DIM Rd C CIM 9 y eci i pe FOR 1 =1 TO CN = READ ■二: K$ c: I , BS 丰 <:! :>, F:d <: = NEXT 9 main menu RESTORE 10010 GOSUB 1 ©00 OIM A 130 丁 O 24 Gi, 1 4© , 9 search sp i r i t ’ s name RESTORE: 10020 130 SIJB 100© i 二し S= PRINT <: A:> ■* へ''— スノ カクテル" X^ = MN^ c: A > s MM= 1 = F"OR 1 =1 TO C:IM = IF- 200 NEXT I = MM=MMh-2s GOTO 210 LOCATE 7 , MM + 2 = RR I NT CK^ (: I ) = MM = MM- •- 1 = GOTO MM = MM+2 = LOCATE 0 T MM = RR I N 丁" - - - ■■ MIM$ <: A ースノ カクテル 、 1 =1 TO C:IM = IF- E*S$ <: I > = カク テ) レ デ ー タべ ー ス RAM1BK 以上 コンピュータの ユーザ オリエ ンテッ も 適当に 頭の 何 文字 か だけで 探して く 作り方のと ころでは、 けで いいように なつて います。 ここに 2M パーティ 用 プログラム 集 220 MM = MM + 2 = し OC:A T t£ ノ , MM = 卜卜] N RIMXs し OC:ATE7= PR: I NT " 中— ヲ オ スト メ: 23© A$=IIMPLJT$ ( 1 ) = GOTO 100 ^■*+0 s 日 •airch cocktail 9 ^ 「isime 25© C し S=PRINT" +++ Search スプ广 = R by •: •〕• 二 l< t a ] m 占 f ,ナ マエ TO ヲ ニ ユウ •ノョ ク シ テクラ'' サイ!" ; |\|$ CM = IF" し EF 丁 车 ( CK 东 C I > , S > = 7, &z RRI IM 丁 1 •ソカリ フ tr J = [>车= INPUTS < < < Cocktail Recipe > > > 1 CK^ t: I ) •リク リカ ヲ' > s I ELS K 生; 5 2&0 l_OC:AXE£ C3,4zlNf_UT 27Gi S = し EN (: N 丰) :: FOR: I = $ THEN 230 280 NEXT I = LOCATE ( 1 ) = GOTO 1 && 230 C: し S = RR I N 丁" 300 MM=0 310 LOCATE 7,4= PRIM 320 LOCATE 7,MM:*c;S + 7 330 FOR J= 1 TO し EIM CRC:$ ( I ) ) = K$=MID$ CRC$ C I ) , J, F" !<$=■■/■■ THEN MM = MM+ 1 s し OCATE フ, MM 本 2 + 7 = NEXT J E IF~ K$="_" THEN LOCATE 23 = N^£XT J E し SE PRINT = NEXT JT 340 MM=MM 木 2+7 卩 GO 丁 O 210 350 GOTO 35© 3 & 0 LOCATE 12, 15= PRINT "オ ワン: T イ モーン! ! ■• = FOR 1=0 丁 〇 00 = NEXT I = GOTO 100 1 000 r men i_ji auto p> ^ ± n t 10 10 READ T I $ = READ MIM s FOR NEXT 1 020 C し S = RRI NTT I 车 1 030 FOR 1 =1 TO MN = LOCATE 8) ; MIM^ (: I ) = NEXT I 1040 LOCATE 7, MINI 本: 2+&z PRINT" ンコ'、 ウヲ ト〜 ウ ! Ia ; s A«= I IMPUTE Cl) 1 050 A = ASC ( ) — 48 = IF A >MtM OR A< 1 THEN BEEP : GOTO 1040 ELSE RETURN 1 0000 9 menu mesBBge d 己 t 这 10010 DA 丁 A •■ 本本 木 Cocki-t^i 1 Ver- 1 _ 0 本木:# ■■,3, レシ ヒ〇 ヲ ヒヨ ウシ、、,,、 ~ — スス ヒ〇リ 叩 ■ソ テ'' サーチ, オシ マイ 10020 DATA "■ + + + Seatr •二 h by sp i r* i *t ’ g 「i 这 me +++••, ウ •才 vTI9 フ〜 ラン テ''—, ウイ ス 中一, ソノ ラ 9 cocktail d 為 tass riame, base, recipe DATA 21 DA 丁 A 卜〜 ライマ テイ ニ, ン ,シ' 'ン 85X/ へ'' ル モ ■» 卜 15ズ/ オレン レ'* 1 テ 中/カナ ラス I: TO MN = READ MN$ ( I ) s 7,1 木: 2 + 3 = RR I NT CMR^ ( I +4 5, シ ''ン 500®© 500 10 50020 ヒ ー ラース ステア 《 50030 DATA アレ 午 サン ラ ' 一, フ〜 ラン テ'' 一, フ〜 ラン テ〜 — 1 _ 5 オンス/クレム カカオ— 1 オンス/ フレ ,v シユク リー乙 一 1 オンス/: T, メク〜 1 フリ /シェ ーク レマス 〇 50040 DATA モス コ ー =ユ ー ル, ウォ "ノ カ, ウォ w Tl 2 〜 3 オンス/ライ 乙シ〜 ユ フ' 'ンノ 三ヲ シ ホ、 1 I し/ ンシ ''ヤー エール テ'' ワリ フフ 《 5005© DATA サイ ト'' 力一, フ〜 ラン テ''—, フ 《 ラン テ、' 一 2 オンス/: 117 ント n — 5 オンス/ライ 乙シ ''ユ ー ス — ■ 5 オンス/ L/i — ク シ マス 《* 500 & 0 DATA マン jVv ヲン ,ウイ ス中 一, (ライ) ウ イス 中一 1 ■ 5 〜 2 オンス/ 7 ン コ チ ユラ ヒ、' ラース〜 —1 テ 中/スイ ー トへ〜 ルモ _v 卜_ 1 オンス 50070 DATA マ I し n* リ ー-ラ, 、ノノ ヲ》 テ 中ー ラ— 1 〜 21 ンス / コ アン ト □— — - 5 オンス/ ライ 厶シ '、ユース ー八 シフ'' ンノ 三 ラ シ ホ'' ル /シェーク シマ ス〇 S00Q0 t>A 丁 A 才 ー ル ト、' フ 7 "V シヨ ン ト 〜 ,ウ ィス 中 一 w I: ライ) ウイス 中 一 1 レ ユカ'' 一ー チヤ サシ'' 2 ハイ/ ヒ〜 ヲース 《 一: 3 テ 中/アイス 3 カゲ/ステア シマ 500*30 E>A 丁 A 中 一 I レ y ソノヲ ,シ C1 フイ ン (カラク チ) 4 オンス/クレム ト〜 ヤ サシ'' 2 八イ ~ 50100 DATA フ ''ラ 《v クル シアン, ウ ォ 力 , ウォ _v 力 1 ■ 5 オンス/カ ル ー ア ス /シェ ー クシ マス。 501 10 DATA フ 、、ラ 《v テ'' イマリー ,ウオ 叫力, ウ n ,v 力 1 _ 5 オンス/ 3 オンス/レモン シ~ ユ —フ • — . 5 オンス/シオ _ コシヨ ゥ / し r ェ —ラ シ マス 501 20 DATA チェ リーフ'' n*v サ 乙, フ ~ ラン テ M — y チェ リ—— フー ラン テ” 一 1 才- ,フ / フ ” ラン テ” ——1 オンス/ ク” レナ テ'' ン _2 〜 3 テ 中/中:! ラソー — 2 〜 3 テ 中/レモ ソ£> 5 オンス/ シ iy 力 ■ノ シ I— ク! 50 1 30 DATA ラ'' イキ ■ノ, ソノ ヴ , ラ 乙 一 1 • 5 〜 21ン ス / ライ 乙シ 〜ユ 三ヲ シホ ” J レ/ シ ユカ” ーシ Cl_v フ ◊ — 1 テ 午/レ: c — ク シフ ス〇 50140 DAT A アース クウ ェ イク, ソノ ク, シ~ ン _ 5 オンス/ I、 〜ーホ 0 ルノ— ■ 5 オンス/ シ I — ク シマ ス〇 50150 DATA シ〜ン フイ ス~ ,シ ''ン ,シーン 2 オン フ / レモン シ 力” 一— 1 オンス/ V— ヲ ' テ 中 •ノ ヨウ/ ン T— ク シ 7 ス〇 -ス ,、ン 2 ス 5 オンス/ カシス チ 75 オン マ ト シ〜ュ -ス ス ス J、 ンフ ~ ンノ ン 5 オンス/へ ュ —ス— 1 オンス/ 1/ ユ 51 ンス / ライ 厶 5 パ、 ユ—ス 1 • 51 こ/ ス 50 1&© DAXA 中'' 厶レ _v 卜, シ 〜 ン, -ヂ ン — 1 • 5 オンス/ラ ィ 厶 5 广 ュ—ス — 1 ■ こ/ ス / シエー ク シフ 50170 DATA j、 イホ ~ -— J し, ウイスキー, jV、 ー ホ〜 ン — 1 • 5 オンス/ =1 才 •ノヲ イレテ V —ヲ '' テ'' ワリ マフ 50180 DATA 7 イ ■ノ _vly ユ コーヒ ウィスキー, (アイリ 呼 シ ュ) ウイ ス宁一 _ 1 ■ 5 オン ス / シュ ー チヤ サシ、' 1j、c イ /: □—ヒ ー — 5 オンス ( コ ィ ヤ "ノ ) / クリー 厶—テ 中 リ ヨウ/ 3 ク T?tT ー マフ •《 50 1 30 DATA フ0 ース カ フエ, ソノ ク, 了 レア テ'' イン _ クレム ト '、 カカオ/ フ ラス キ- ノ オレンジ〜 キュラソー/クレム ト'' =ン ト— 八〇 ルフ I ヲ乙 一I し/コニ ヤ ,v ク /コノ シ“ュ ン j、— ン テ'' テイネイ ニ ソソク ~ 。 50200 DATA スク _ノ ユート'' ライ — , r?n -v TP , ウォ ッカ— 1 ■ 5 オンス/オレンジ,、 : 一, ''ュース テ〜 ワ ■ノ マス。 50210 DATA スフ 〇 リ ,v" ノ: p_, ソノ ラ, シ〇 ワイン (カラク チ) 一: 3 オンス/ソーラ、' _2オ ンス 50220 DAXA テキーラ サン ライス〜, ソノ ヲ , テキーラ _ 1 - 5 オンス/ ク 〜 レ: T テ〜 ィン—- 75 オンス/オレンジ〜 シ〜 ユース 4 オンス 特製 CG ブロ グラム MSX2+VRAM128K+ ディスク + ベーし っ 君) CG の 有名な 一つ ''レイ トレー シン グ〃 プログラムを 掲載し ます。 すべて のドッ トを 描きに いかせる と 丨 時間 強 かかります ので、 実際に パーティ 会場 で 使う 場合は 自分で あ ら かじめ いくつ か 絵を 作って ディ スクに セーブして お いた ほうが 賢明です (セーブ. 口ード 機能は 内蔵して います)。 使い方 :れも 実行して いまえば あとは メニ •を 選んで いく だけです。 最初に た ず ねられる のは 丨 : 画面を 新しくつ く りに いくか、 2: 前に 作った 画面を 口 ー ドす るか、 という ことで、 2 を 選ん だ 場合は 次に 当然 ファイル ネームを 要 求され ます。 丨 を 選んだ 場合は、 これ から 作る 画面を セーブす るか どうかを 聞いて きます から Y か N で 答えて くだ さい。 Y としたと きには ファイル ネー 厶を 要求され ます。 そしてい よいよ 画 面の 作成です が、 ここには 丨 : test I 、 2 : test 2 、 3 : create ! の 3 メニユ 一が あります。 3 番が 最終的な もので (I 時間)、 丨と 2 は テストの ために ド ッ トを 荒く する ものです ( 丨 だと 1分 弱、 2 だと 数 分)。 何のた めにある のか というと、 あたらしく 物体を 置いた と き、 あるいは 光の 位置を 変えて みたと きな ど、 しばしば データの 設 定 ミスに よって 画面が マック ロに なって しまっ たりす る ことがある のです: それを 見 るのに 丨 時間 以上 も 待つ もの ばか ばか しいです から、 テス ト モードで だいた いどん な 感じになる かを チェック させ ようとい うこと になる わけです: テス ドの 2 番 はこれ だけで もなかな か綺屢 なく らいです から チェックには 最適で 学 的 知識を 前提に 説明 させて いただき ます。 わからなかったら ごめんなさい。 ここで 作る 絵は 3 次元 空間 上に ある 平面 および 球に 光を 当てた ときに どう いう 風に 見える か、 という ものな ので すが、 視点は X Y Z 座標系の ( 0 、 0 、 0 ) にあり 、一方 仮想 スクリ ーンは ( 0 、 新しい データの 与え 方 今回 は スペースがない の で 多少の 数 0、 Z) という Z 車 由に 垂直な 平面 Tf。 ここ に 平面 や 球を 適当に 置いて やれば いいだけ です: そんなに 難しく はあり ま せんから と にかく I 式 行 錯誤で やって みて ください。 配置す る 物体の 情報は 5000 衍以 下の データ 文中で 決定し ます。 冒頭には 少 し 別の データが あり、 502(Ht 光の 方向べ ク ト ル ( x 、 y 、 z)、 現在は 左 斜め 上の 後ろ。 たとえば x を一丨 に すれば 右から になる c 5030 行 仮想 ス クリーンの Z 位置。 望 遠 効果の 設定 c スクリーンを 遠くに も って くる (Z の^! を 大きく する) と 映 る 顧が 広がり ますから 物体は 大きく なり ます。 5040 行 平面の チェック 模様の 二つの I 色。 256 色から 選ぶ。 5050 行から 物体の 情報。 ここの 最初 の 数字は 物体が 何 かを 示して いて、 〇 は 平面、 I なら 球と なって います。 球の 場合、 続く データは 球の 中心の X、y、z 座標、 球の 半径、 球の 色 (256 色から 選ぶ) で、 平面の 場合は、 平面の 方程式 ax + by + cz + d = 0 における 8、13、0、〇1、それから色 です。 平面の 場合、 色に 0 を 指定す ると 5030 行で 設定し た 色の チ ェック 模 様に します。 データ 文の 最後には 0 を 置きます (5220 行)。 さあ、 がんばって ばし ばし オリ ジナ ルの 絵を かいてみ ようせ! I MIS: BASIC 上記 説明文に 注意 ■ » RAY TRACING ( BASCOM veirsion) » CO by MSX m 这 gszine staffs SCREEN © = CO し OR 1 5 s WI 0 丁 H 80 = KEYOFR = C し S RR I NT " RAV— TRAC I NG for MSX2" s PR I NT PRINT / load" PRINT '■ 1 = c r- e 2 = sc ir een 1 KY$= I IMPLJT$ C 1 ) s P-R I NXKV^s KY=VA し C KY$ ) I F" KY= 1 THEN 110 INPUT ■■ 1 osid file = 1 ; IMF •丰 = PR I NX 100 110 GOTO 1 130 PR I NTs RRI NT C Y/InO ?36 1 20 KY$= I IMRUX^ c: 1 > = PR I IMTK Y 丰 13© IF- KV^=B,y B, OR KV^=" V THEN TO 150 140 INPUT " save file 「i 召 tme = ■■ 5 | RINT 150 PRIIMT= PRIIMT "detsil select" 1 & 0 PR I NT " 1 = test 1 2 = t e s 3 = «= r~ e ! z 1 70 KV^= I NPUT$ C 1 > = F'R I NTK Y$ s KY=VA し ( K Y$ ) 1 80 IF" KV=3 THEN K 1 X= 1 = KJ2>C= 1 = GOTO 210 1 30 IF K Y=2 THEIM K 1 乂 =4 = K2%=4 = GOTO 210 200 K 1 X= 1 & s K2X= 1 & 210 PRIIMTs PRINT ■■这 1301 rt = C c ur soi- UP] + C c ui- IGHT] ■■ 220 PRINT ■■end = [specie BARD B, 230 —TURBO OIMCKl%,K2X) 240 DIM PTC 50 ) , P 1 C 50 > , R2 C 50 > , R3 C 50 > - P4 C 50 ) * I ; NF$ = F> 230 240 > 250 I l=«cB©001 1 1 00 = I2 = ?UB1 1 1 00000 : I 3 = ««B 000000 1 1 2&0 X U=K 1 X = I V=K2X 270 SCREENS = SET PAGE 1,1 = COLOR 15,0,0= C し S 280 READ RX , RV , RZ , I Z , IG, IM 230 DI=SQR ( RX 氺 RX+RY 木 RY-*~RZ 木 RZ ) 300 RX=— RX /D I = RV=— RV/DI = RZ= — RZ/DI 310 F>IM=1 320 READ PT ( PN ) , primitive code 330 IF P 丁 CF>IM> < 0 THEN F>|\|=F>IM— 1 = F>M=F>N = GOTO 400 , EOE> 340 READ PIC RN> , R2 C RIM > , R3 C RN > , P4 C PN ) , RC C PIM ) 350 IF PTC F>IM) THEN 330 3 & 0 D I =SQR ( P 1 ( PIM ) 本 P 1 ( PIM ) +P2 ( PIM ) 木 F>2 ( PIM > +P3 ( RIM > 木 F> 3 CPIM) ) 370 PI CRM> =P1 CPN) /DI r P2 C RN > =R2 ( PN ) /DI 380 P-3 ( PM ) =R3 ( RN •) /D I : P4 C F>N ) =P4 C PIM ) /E> I 330 PN=PIM+1 = GOTO 320 400 SE>= ■ 2 : HD=. 75 = CK= 1 00 9 Spec i 1 Corrs*t ^tri *fc 410 9 1 0013 420 FOR IS=10& TO —105 STEP 一 IV 430 FOR IR=— 12S TO 1 27 STEP I U 440 IF- STICK (0) < >2 THEN 4 & 0 450 SCREEN 0 = COLOR 15s RR I NX "占 b or t ed ! ■_ = PRINT •国 press [ spate e BAR □ = BEERs END 4&0 S X =0 = SY=0= SZ=0= Bl_ = 0 z H し =0 = 11=0= I T= I Z 470 D I =SQR C I R 木 I R+ I 3木 I S+ I T 木 IT) 4Q0 XX= I R/D I = 丁 Y= IS/DI = 丁 Z=I 丁/ DI 490 し E>=— 1 = UX=XX = UV=XY= UZ=TZ 500 GOSUB 320 , crossing point 510 GOSLJB ^SO , sKic^cJowx i~iq 520 GOSUB 820 S30 OS= ( TX 木 LJX+TY 本 LJY+TZ 木 LPZ ) 木 2 540 TX=TX — OS 木 LJX = X Y = X Y— OS^cU V s T Z =T Z — CDS 木 U Z S50 HI =TX3#cRX-i-XV^cRV-i-XZ3#cRZ 5&0 I F~ HI >HD THEN H し =HL + H I へ8 570 I F" BL_< SD THEN BL_=SD 580 1 厂 PC(PM)<>0 THEN I I =PC C PM ) s GO 丁 O & 1 0 530 丁丁 =:ENT (SX/CK) +IIM 丁 CSY/CK) + I NT CSZ/CK) &00 1 F TT—IIMT (TT/2) 木 2=0 THEN I I = I G ELSE 11 = &10 14 =¢11 AND 11)/4: 15=(11 AND 12)/32: I &= ( AND 13) &2@ IF H し >1 THEN H し = 1 &30 BB=B し = I F~ BB > 1 THEN BB= 1 & 40 I F" H し =0 THEN I 4= I 4 木 = I 5= I 5 本 BB s I &= I & 本 丁 O &&0 &50 1 4= ( 7 — 14) 木 Hl_+ 14=1 5= C 7 — 15) 术 H し + 15=1 &= ( 3 — I H し + I & &&@ I 4=1 NT (14)=1 5=1 NT C I5> = I &= I IMT C I&> &70 I 7=1 5 木: 32+ I 4 木 4+ I & &S@ I — T ISlF7 € T R>-» - 1 ウ d *1 c^£=. 一- t 4=? 、 , RC <50 00000 : I 3 = ««B 000000 1 1 0= c し s I2> /32s I&= & 30 700 710 720 730 740 750 — 1 7&0 770 780 730 Q00 810 820 830 840 850 Q&0 870 880 S30 300 310 320 330 •940 350 NEXT IR NEXT IS GOTO 1070 * sub - IF" PT (し 1) THEN 770 P = T 1 木 LJX+T2 木 UY + T3 本 LJZ IF" P THEN T= CT4 — SX 本 T1 —SY 木 T2 — SZ 本 T3) /P ELSE RETURN T1=SX— T1 = T2=SY — T2= X3=SZ— X3 P=T 1 本 UX+T:2 本 UY + T3 氺 UZ Q=P 木 P —丁 1 木 T 1 一丁 2 氺 T2 — T3 木 T3-I-T4 木 T4 IF" 〇<0 THEN X =— 1 ELSE X=— R — SGIR ( Q ) RETURN IF" PTC PM ) THEN 050 UX=R 1 (F>M) = UY=P2 ( PM ) = UZ=R3 ( PM ) BL=RX 本 UX+RY 木 UY-hRZ 木 UZ s GOTO Q30 UX=SX—P1 ( PM ) = UY=SY— P2 (PM) = UZ=SZ— F=>3 C PM ) D I =SOR ( LJX 本 LJX +UY 木 LJY-i-LJZ 木 LJZ ) UX=UX /D I = UY=UY/E> I = UZ=UZ/DI Bl_= C RX 木 UX+RY 氺 UY + RZ 本 UZ ) I F~ TX 木 LJX+TY 木 UY + TZ 本 UZ >0 THEN B し =_B し IF B し <0 THEN B し =0 RETURN FOR し 1 = 1 TO RN XI =R 1 Cl_l > = T2=P2 (L_l ) = T3=R3 ( l_ 1 ) = T4=P4 C 1 GOSUBt 730 IF T >0 THEN IF し D=_ 1 OR T< し D THEN し! >= 3 & 0 NEXT し 1 ■970 IF~ し E>>=0 THEN RETURN ELSE RETURN en shadowed "b Kien all F> ■ら 380 SX=TX 木し E>+SX s SY=TY 本し D+SY s SZ=TZ 木 I 330 UX=RX = UV=RV s UZ=RZ = 丁 =— 1 1 000 F~OR し 1=1 TO RIM 1010 IF" し 1=PM 丁 HEIM 1050 1 020 XI =P 1 C し 1 ) s T2=P2 (し 1 ) = X3=F>3 (し 1 1 030 GOSUB 730 1040 IF T>0 丁 HEN BL=SD= RETURN 580 1050 NEXT し 1 10&0 RETURN 1 070 9 end 1 0Q0 BEEP 1030 —TURBO OFF- 1 1 00 IF ZF=0 THEN 1120 1110 BSAVE: IMF" $+ ■• ㈣ SCS " , 0 , &HD3FF , S 1120 IF- STRIGC0) THEN END ELSE 1120 1 1 30 9 sc Y- 1 o^d 1140 SCREEN 8= SET PAGE 1 , 1 s C: し S 11 50 BL_OAD NF$+ ■■ - s-= 8 " , S 1 1&0 IF* STRIG (0) THEN END ELSE 1 1 &0 50000 , d a ar ea 50010 » 1<3l± cdl^n 50020 DATA 1 ,一 1 , 1 50030 DATA 25® TZ 木し t>+SZ =P4 C し 50040 DATA 50050 DATA 1 „ Set) 111 00000 500 & 0 DATA 1 , &t> 11111 100 50070 DATA 1 , 8 @@01 1111 50030 DATA 1 , 1 50100 DATA 1 y Sct» 1 1 10001 1 501 10 DATA 1 - 111 00000 100 一 477 ELSE 1 120 Is C し S ELSE 1 1&0 , 1 , &B1 1 1 000 1 f , —232 , 84*9 , 100 , 一 1&& , 735 , 100 , 一 100 r 741 , 1@@ , —33 , 347 , 100 , 33 , 1 153 , 100 F 100 , 1 100 , 100 , 1&& , 104 & , 1O0 パーティ 用 プログラム 集 50120 DATA 1 , S 0©0 1 1111 50 1 50 DAXA 1 , &cb> 000000 1 1 S01&0 DATA 1 , Z 111 0000© 50 1 80 DATA 1 , S C:04EtA _■ , "02 し 4G- し Q02GAB し 4A- LSAB03C " , ■• R2 • R2 _ " &0 PLAY ••し 804 AES05I 二 04 AF + AL4AI 305 E>" , ••し 40 3D02D03D し 20 3BR4" F "R2 - し 202 GR4" 70 PLAY " L 80513 ■し 1 &G し 4GA し -し 1 &B し 4B - L_QB " , " し 204 E> し 4 D し 2D し 805 G" , ••し 203 G し 4F ■•■し: 2G し 4D" S0 PLAY ••し 805 ABO& し 4C05F-HAI3 し 4E>" , ••し 804 C:03B し 4 A04C: し 2 03BR4" , ••し 203 E し 4E> し 2GR4" 30 F-LA V *• L_Q05«3 - し 1 &GL 4 *3 A し ■ し l&EU— 4B- l_SB " , " し 204 DL_4 D し 2E> し 805 G" , "し 203 G し 4R + し 2G し 4D" 1 00 PLAY ••し 805 ABCD& し 4C05F + AI 30 & し 4D " , ••し 804 COC3B し 4A04 C し 20 3E5R4 _• , "し 203 E; し 40 し 2GR4" 110 PLAY ■• し 80&D05B0& し 4E _ LSDDCL.4C - LSC " , ■•し 1 &03G0-4D 03B04D し 4GiE> し 1&03DAF + A04 し 4D03A" , •• R2 し 403 BR2 し 403 E 1 20 RL_AV •• し 80&C05 A し 40 &D _ L& 二: ■二 05B し 4 BO&D " , ■•し 1 &03DAF- + A し 404 D03A し 1&G04D03B04D し 404 D" , " R:2 し 403 F + R2 し 4E> •• 1 30 PLAY •• し 80513 -し 1 &G し 4GAL8B •し 1 &B し 4B _ し F •_ L 404 DD 03 D し 403 G04D_ L_SD " , " し 403131302 Di 303 G - l_SE) " 140 PLAY "し 805 ABO& し 4CCD5F + AG" , ••し 804 C03Esl_4 A04D し 403 1304 D ■■ r •■し 803C02B し 4A03D02GI03G" 150 PLAY "SI 3M300 し 404 B —し 805 E: — - し 1 &E — し 4E — FL8G _ L_ 1 &G L 413 - l_SG " , •• S 1 3M3©GiR4 し 803 B — ■し 1 &B — L4B — B — し 8Et — -し 1 &B — L 4B— ■ l_QB— " , •• S 1 3MC300R4 し 80 3EE— -し 1 &E— し 4E—02B —し 803E— •し 1&E_ し 4E— - し 8E —" 1 & 0 PLAY "し 805 Fa3 し 4A — DFE: —- し 804 B —" , ••し 804 A—B —し 405 CO 4FGGR4" , •■ L 803 A — GL4FB — し 8E — 02 B — 03 G02B — 03EI—F:8 " 1 70 PLAY " し 805 E— -LI &E —し 4E — F し 8G •し 1 &GL 413 - し 8G •• F •• し 80 3B— _ 1_ 1 &B — L_4E« — B — し 8B — - l_ 1 &B — し 4B — - LQB— ,§ , •• し 803 E: — - し 1 &E 一し 4E — 02 B —し 803 し 1 &E— し 4E — - し 8E— _■ 1 Q0 PLAY "し 805 F~GL_4 A — DFE — ■ LS05B— 11 , •■し 804 A—B —し 405 CO 4FGGR4 •_ , ■•し 803 A — G し 4FB —し 1&E; — 02B — 03GB— 04E: — R4" 1 30 PLAY ■■ S 1 M 1 0000 し 805 Bt — GO& し 4C ■ し 805 B — A — l_4A — ■ L_SA — " , ■■ S 1 M 1 0000L 804 GB — GB — GB— F~B 一 FB— — " , ■■ S 1 M 1 0000 し 804 E— R8E: — RQE— RSDRODRQDR8 •' 200 R|_AV "し 805 A — F ■し 4B— _ し 8 A— A — G し 4GCD4 ■■ , •■し 804 FB — F© — F B — GB — し 4G" , •■し 804 DR8DR8DR8E: — R8 し 4E; —" 21© R|_AV "SI 3M 400 し 404 B —し 805 E — -し 1 &E —し 4E — F し 8G _ し 1 &G |_4G - l_QG " , " S 1 3M 4001 —403 — B — B — B — B — B — •■ , ■• S 1 3M400R4 し 403 E: — E— DE — E— E— ■■ 220 PLAY ■■し 805FG し 4A_t>FE — R4 ••,■■し 804 FG し 4A_E>03B— 04E: — R4 " • " し 803 A — G し 4FB —し 2E —し 402 B —" 230 PLAY ■■し 805 Bt — •し 1 &04B —し 405 B—E> し 805 B — •し: L &04B —し 40 5B— B— B, , ■•し 805 G - R 1 &し 405 G04B— し 805 G ■ R 1 & し 405 GG •■ , ■■し 803 E— •し 1 &E —し 4E — F し 8G •し 1 &G し 4G ■ L8G " 240 PLAY •■し 405 A — A 一 A 一 L2G - ■_ , •■し 405 CC04B — し 2B _ - " , •■し 80 3F_GL_4 A — E>F し 2E —" 250 PLAY •■し 805 FG し 4A — DF し: 2E: — ▼ ■•し 804 A_G し 4FB— A —し; 2G , ■•R2- し 204 E— PLAY "S1M 20000 R2 - R2 - ■■ , S 1 M 20000 R2 - R2 - , " S 1 M2 0000 し SO&FGA — F~DF し 2E_- •• 270 F>L_AV _■ し: 207G - G _ •■ , •_ し 20 &B — ■ B— - ■_ , ••し 20 &E— • E— ■ " クリスマス MSX- Audio 用 変更 リス ト 30 CALL AUDIOS CALL VO I CE C @22 , @22 , @22 ) 1 50 P し A Y 林 2 , ■■ ©40S 1 3M300 し 404 Bt— し 805 E — ■し 1 &E: —し 4E—F し 8G ■し 1 &G し 4G _ し 8G " @40S 1 C3M300R4 し 803 B— •し 1 —し — B — し 8© — •し: L &B — し _ L_QB— " , " @40S 1 3M300R4 し 803 E — ■し 1 6E: —し — 〇 2Et— し 803E— - L_ 1 &E — し 4E— ■ l_QE_ " 1 30 F ■し A Y#2 , " @22S 1 M 1 0000 し 805 B — GO& し 4C: - L 805 B— A — L_4 A— ■し 8 A — " , "但 22S 1 M 1 0000 し 804 GB — GB 一 GB 一 F"B 一 F~B 一 F~B 一 _■ , •• @22S 1 M 1 0000 し 804 E — R8E — R8E — R8DR8DR8DR8 ■• 210 P し AY 林 2 , ■• @7S 1 C3M 400 し 404 Bt — し 805 E — ■し 1 &E —し 4E — F" し 8G ■ し: L&G し 4G_ し 8G" , ■■ 07S 1 3M400 し 403 B— B— B — B— B — B— B— ■■ , "@"731 3M 400 R4 し 40C3E — E — DE— E— E— " 2&0 P し AY 林: 2, •■ @22S1 M 20000 R2- R2 - •• , " @22S 1 M 20000 R2 - R2 ■ ■■ r •■ @22S 1 M 20000 し 80 &F"GA — FDF" し: 2E: — お 正月 _ 言語: BASIC RAM〗SK 以上 1 0 ▼木木 木本 本: +: 本本 本: ♦: 本本 本本 htuhdr'LA 本木 本: ♦: 本本:: |c 本: ♦«: 本本 20 9 •= •コ mpi 〇 ち ed t3 y X E«0 Z ENO KIEMGY OLJ 30 y 40 PLAY " T90S 1 M7eii00 •■ ▼ ■■ "I gOS 1 M7000 , ■•丁 90S 1 M700© 50 P し AY ••し 1 &05CI: + G 卜 0&C+E>F~~»-Gi~«~EcG + F"~HDi=: + 05B0& し 2C+ •• , _• R 24 し 1 &04C+G+05C4 DF +G + BG+ トー + DC + 04B05 し 2C-»~ •■ 60 R|_ A V ••し 1 &04F~*~Gi~i" F + I3 + F" + Gi + し 805 DC+04 BO 50 G~*~F~ + DC+ _■ , " R4 し 1 &05BG+F + D •二 413 厂~»~冊3+0& ■二 +CD5AG + F + DF" + G+ A0&D05BG + F- + t>F" + G + B ■• 70 PLAY "し 805 D004BCD 50 r>C+04B05l_4C~*~ - , ,B R 1 &0&I—QDC -H053B0&C + G + F + r>iZ:+ " 80 PLAY ■■ R4 し 206 C: + 05Ai3~t~F + し 2G+ ■し 4DF~+ , ■■ R4 し 205 C+04 A G + R + L2G+ - し 4E>F~+" 30 F ■し A Y ••し 80&AAAG+ し 4F+D05 し 8BO& し 1 &C+D し 8 厂 + し 1 6DC: •♦•し 8 05Bt し 1 &0&C + D し 8F ■•■し 1 &t>i=:+ ■• , •• し 80 5 AA AG + 04 し 1 &B05C~*~E>F + G + F + DC + F + G-»-R-»~G + E>BE>BF"-»"05D04F+E>i3-hF + I> ■二-*-" 100 RL_ A V ••し 1 &04F + G + F+G~»~F"~«~G + し 805 E>C~i~04Et05C: + G + F + DC ••- " , " R4 し 1 &05ftG+F + DC: + t>F + G + CD&C: + 05Ai3+F* + DF+G+ A0&D05BG+ F + E>F" + G + Et ■• 110 PLAY "し805!>|二~^046050卜1>|二 + 04305し40+-", •■ R 1 &0& し SE> C + 05B0&C + G + F + DC:+ •■ _ 120 P|_AY " 04L 1 &Di 二 + F~ + G+BC::~^ DG+F + 1 二: + BG + DC+F +G 如 BC + DG + 「+ C + BG+__ , 〇& し 1 &EsG~«~F~~hDC:~»~05AG~«~R + DC: + 02C: + E>Rh~G + ]B03C:+E> F~ + G + A03C: + E>F + G + Et ■• 1 30 PL_AY ■■ OSL_ 1 GrDC-»-F" -«-i3-»-BC-»-DG-»-F' -hC-«-BG-*-E>C-**F" -»-G-+-BC-»-DG-»- F + C + BG+ ■■ , ■• 0& し 1 & G + B C: + 「 + E> 04 C:~»~ AG + DF" +0;2C:~»~E>C:~*~E)C: + 03F~-»~G パーティ 用 プログラム 集 140 P し AY ■■し 805 C-hG-*-0&C+E>F+G+BG+F*+E>C:+07B0& し: 2C+" , " R 1 & し 803C:-»~G-i-04C: + DF*-»-Gi-*~BG+F-i-DC-»-03B0:2 し 2C+ •• 1 50 PLAY " 05 し 4F~+F+ し 8G~hF+L4E>C:h~04 し 8B05C+04 し 4G+05DL 8C+D し 4F~- •■し SDC + G+G+F ■•- し 4D" , ■■ 04 し 4F+F + し 8G+F-I- し 4DC + CI3 し 8 B04C+03 し 4G+04E>l_8C:-»-D し 4F ■■♦•し SDC+G+G+F-t ■し 4E> __ 1&0 PLAY "04 し SBOSC+O^BOSC + DF+DF+OGC+OSG •••し 4G+F+" , ■■ 03L8B04C:+E>C+F--Ht>C-»~0:3B04B0:3B04B0:3B04BB» 1 70 PLAY " 05 し 8(3 + F-»-DC+BG-»-F + E>0&C + 05AG + F+0&DC:-»-CD5BG+ F"+ •■ , ■■04 し 8F+DC+03B04G+l^+t>C:+AG+F" + t>F~-i-G+F~+G+" 1 Q0 R ■し AY "LI &04F+G+R+G + F*-hG-»- し Q05DC:-i- 04 B05C + G+F+DC:- •- " , " R4L 1 &05BG+F_+E>C+E>F'+G+0&C:-»~05 AG-»~F_-i-E>F"-i~G-»~ A0&D05BG+ F + DF+G + B ■_ 1 30 P し AY ••し 805 E>C+04B05C:-*~E>C:-i~04B05 し 4C+_ ■■ , " R 1 &0&LSD C+05B0&C:-»~G+F_+DC:+ •• 200 PLAY "R4 し 20 &C+05AGH-F- •■•し: 2G- •■■し 4 DF+" , " R4 し: 205C+04 AG+F+ し 2G+ - し 4DF+" 210 PL_ A Y ■■ し 80 & A A AG+ し 4F+D05L8B0& し 1 &C+D し 8F+ し 1 &DC+L 805 B し 1 &0&C+D し 8F+ し 1 &DC+ •■ , " し 805 A A AG+04 し 1 &B05C + DF+G +F-i-E>C:+F~M3+F_-i~G-i-t>BDBF-H05E>04F-«-E>G-»~F_-i-r>C:+" 220 PLAY " l_ 1 &05C + G + 0&C: + r>F-»-G+BG-»-F+r>C+07B0&L:2:C+ " R 1 &し 1 &03C:+G+04C+t>F+G+BG+F+DC:+03B02 し 2C+ •■ お 正月 MSX-Audio 用 変更 リスト 30 CALL AUD I 〇 = CALL VO I CE (<317, @17, 01 7) 特製 本格派 相性 診断 === : 〇 A IV/I1 ° 1/" hi k について は 24 時間 制で 何時 (分は 不用 niMivi I □ IV 以工 です) かを 人力し ます。 それだけです。 言語: BASIC RAM16K 以上 10 , A I SMOU SHI NE>AM 20 , CO 1 387 by NEPTUNE SOFT Coi- p . 30 , 40 SCREEN 0 = Ul I DTH 40= C: し S z KEY OFF z COLOR 1 1 _ L_OCA 丁 E 1 2 y 1 2 = PR I NT ■■テ''— ヲ 3 乙 カラ マ •¥ テ! •• 50 DIM SUN (12,12), AS C 12, 12), SP C 4 ) , AR <4> - X C 1 00 > . Y (100) &0 FOR 1 =1 TO 4 = READ SF> ( I ) , AF> ( I ) = NEXT , ^ fin a 1 cd at a 70 FOR S 1 = 1 TO 12= FOR S2= 1 TO 12 80 READ E>D z SUN C S 1 , S2 ) =SP C E>D ) 30 NEXTsNEXT 100 FOR SEX=0 TO 1 = F~OR Sl = l TO 1 2 s FOR S2= 1 TO 1 2 110 READ DD = AS (: S 1 , S2 ) =AR C E>D ) 120 IMEXT= NEXT= C し S 130 DEF~ FNA C X$ , X ) = ( SGN C VA し C X$ ) > _ 1 ) OR CX= > OR INT C VA し ( X$) ) < >V/A し C X$) 140 DE:F~ RIMB C X ) = C XMOD12) — 12 木 C ( XMOE> 1 2 ) =0 ) 1 50 INPUT ••アナ ラノ ヲン シ、' ヨウ ヒ ~ =? 卜ー ウソ '' ! ( tT イ レ 中 ) " 5 DM 本 1 &0 GOSUB 220 = Q 1 =F>X = Q2=P Y s QX=S : DM$= ■■ ■• z M$= ■■ ■■ s D 生 = ■■ ": 丁 $=" ■•: s$=" •• 170 INPUT ■■アイ テノ ヲンシ 、、ヨウ t 〜 ヲ ト ~ ウソ“ ! C II イレ 中: > •• 5 DM 拿 180 GOSLJB 220= Q3=F>X = GI4=P Y = Q V=S 190 9 m^rt c: H i ng check 200 IF" QX THEN Z=SLJN C Q3 , Q 1 ) ~»~ AS ( GI4 , Q2 > ELSE Z=SUIM ( Q 1 , Q3^ + AS C Q2 , Q4 ) 210 GOTO 370 220 9 V e THEN GOSUB 3 & 0 : IF" Q 1 THEM 1 ?4I THEN GOSUB 3 & 0 = GOTO 240 THEN GOSUB 360 = GOTO 2 & 0 THEN 60 SUB 3 & 0 70 ELSE 150 240 I IMPUT ■■ ■ソキ 250 IF" 2&0 I IMPLJT " ヒニ チ" ; E) 车 270 IF* F~NA CZ>^W 32 > 280 I NPLJT ■• シ〜 カンぐ フカ ラす 力 ヲラ 12:>"5丁$ 230 I F" V AL ( T+ ) THEN IF" F~N A ( T $ , 25 ) : GOTO 280 300 INPUT ••才 トコ C 1 > オンす (2) •• 5 310 i p~ F^MA C S$ , 3 > 丁 HEN GOSLJB 3 & 0 s GOXO 300 320 Y= V A し ( DM^> = M=VA し (: ) = D=VAL_ C ) s X=VAL_ > s S= V A し CS 漆) 一 1 330 F>X=F~NB ( M— ( E> >23 ) +3 ) ’ sun point 340 PY=RNB C PX+3+&+ C T/2 > ) , ascending point 350 RETURN 3 & 0 PR I IM 丁" チャン ト コ ラエ テ!" = RETURN 370 , HEAR: 丁 PRINT SUBROUTINE 380 SCREEN 3 330 COLOR , 10, 10s C し S= F.P=IIMT ( Z ) 400 OPEN GRRs " AS 林 1 410 F~OR 1=0 TO PP 420 X C I ) =RIMD c: 1 > 木: 256 = V C I > =RMD ( 1 > 木 1 32 430 NEXT I 440 , FLASHING SPACE 450 F~OR I =0 TO PP = PSET CXCI>,VCI>>, RIMD C 1 ) 本: L 3 — - 5 = N EX 丁 4 & 0 , HEART MAKER 470 PRESET (0, 32) = COLOR Q 480 A$C0) = -430 Cl) 500 C2> 510 A$C3) 5 ウ Pi A 东 ( 4 ) : 530 FOR 1=0 TO 4 = ( I ) = し EFT$ ( ( I ) 7 > + 1 ) s PRINT# 1 , C I > s NEXT 540 PRESET (0,0)= CO し OR 13s RR I NT" 4t= 1 , Z ; 550 F~OR 1=0 TO F>P= PSET ( X ( I ) , Y ( I ) EXT = IF" I IMKEY$= ■■ •■ THEN 550 5^0 t>M^= ■■ •• = M$= ■■ ■_ = !>$=■■_■ = 丁 $=■••■ = S$ = 570 Q 1 =0 = COLOR 1 1 , & = C: し S 5Q0 C し CDSE s GOTO 15© 530 , hyouka d at a & @0 DATA 2 - 38 , 5 - 23 , 15 - I NT CPP/ 14- 285 > RND < 1 ) 木 15— - 5s N 1 -3 - 87 , 32 - 22, 35. 70 , 4& - 3*7 , 49 - 1& &10 & 20 ▼ 5uin DATA — depemding d 这 "t 这 3,3-3, 1,4 ,2, 1,2 4 1 3 3 & 30 DATA 3, 3 3, 3, 1 r 4, 2, 1 2 4 1 3 &40 DA 丁 A 3, 3 3, 3, 3, 1 , 4 r 2 1 2 4 1 & 50 DATA 1 , 3 3, 3r 3r 3r 1 , 4 2 1 2 4 DATA 4, 1 3 , 3, 3, 3, 3f 1 4 2 1 2 & 70 DATA 2, 4 1 , 3, 3, 3, 3r 3 1 4 2 1 & 6@ DATA 1 r 2 4, 1 , 3r 3, 3, 3 3 1 4 2 & 30 DATA 2, 1 2, 4, 1 , 3, 3, 3 3 3 1 4 70© DATA 4 , •2 1 , 2, 4, 1 , 3f 3 3 3 3 1 710 DATA 1 , 4 2, 1 , 2, 4, 1 F 3 3 3 3 3 720 DATA 3, 1 4 , 2, 1 , 2, 4 , 1 3 3 3 3 730 DATA 3, 3 1 F 4, 2, 1 F 2, 4 1 3 3 3 740 750 r- i si n g DATA 4,2 — 3iir s 3 jr 1 , 4 F cl at; 為 2, 3, 1 4 2 3 1 7&0 DATA 2 4 1 F 3r 4, 1 , 3 2 4 1 3 77© DATA 3 1 4, 2, 3, 1 , 4, 2 3 1 4 2 780 DATA 1 3 2, 4, 1 , 3y 2, 4 1 3 2 4 730 DATA 4 •2 3r 1 F 4 , 2, 3, 1 4 •2 3 1 Q00 DATA 2 4 1 , 3f 2, 4, 1 , 3 2 4 1 3 〇 1 0 DATA 3 1 4 , 2, 3, 1 , 4 , 2 3 1 4 2 820 DATA 1 3 2, 4 , 1 r 3, .一, 4 1 3 2 4 830 DATA 4 2 3, 1 r 4 , 2, 3, 1 4 2 3 1 Q40 DATA 2 4 1 , 3 , 2 , 4 , 1 , 3 •2 4 1 3 850 DATA 3 1 4, 2, 3, 1 , 4 , 2 3 1 4 2 8 & 0 DATA 1 3 2, 4 , 1 , 3, 2, 4 1 3 2 4 ZM D-950 32 57 D3 E>7 03 00 && A& - E1 DAA8 4E C3 30 30 30 0350 ce 09 10 20 4E: 2 & 2D 2B - F~E DABO 00 33 DB 1& 43 D3 & 0 7F 23 7R 28 7R 29 20 2 & - 7E DAB8 FF 10 0B FF- 10 D3 & 8 7F 24 2 & ~7F A8 10 12 F~F - 52 DAC0 33 10 17 F~F~ D970 10 12 A4 1 0 12 RR 10 12 s 52 DA08 10 22 13 ■91 10 03^8 A1 10 12 F~F 10 24 F~F 10 - 5& DAD0 17 1 1 *90 10 17 D3Q0 12 2 & 2D 2B 7F 23 7F~ - 3 & DADO 30 1@ 17 8E: 10 D-9QQ 30 7F 2D 7F 2B 23 ~7¥ - AB - 3A DAE0 OB 33 10 ■9S D330 10 48 F~F 1© 24 FR 1@ 12 : 15 DAE8 38 10 1 A IS 3F" D3-9S 7F 30 B2 10 12 FF 10 24 : 27 DAF© 3F &G 24 3F 30 2D 2B 29 F-F~ 10 12 2S ~7V=- S 02 OAF'S A3 30 30 30 75 D3AS 2& 7F* 23 ~ZF~ 2e 2S 2S 2B Z 71 DB@@ 00 00 3C 0C E:7 D9B0 ~7¥~ 2S 7F~ 24 A6 1 0 12 FF - ■3PA DB06 ■9B @A 02 0A 73 D3BO 10 12 21 24 7F 2 & FF 10 S AC DB10 &e 08 F2 07 Q0 D3O0 3 & 2D 7F 2B 7F~ 2B 20 ~7F~ s F--7 DB1S AF~ &G> -+E: 0 & F4 D3CS 24 ~7JF 2 & F~F~ 10 12 FF 10 S 3A DB20 4E 05 01 05 BA D3D0 48 FF 10 3 & F~JT 00 F-F" 3A S CE: DB2S 3 & 04 F3 03 C0 D3D8 CQ 03 10 B8 0B 1 A 1 A 1 A z A3 DB30 57 03 27 03 RA D3E:0 1 A 1 A 1 A 1 A 1 A 1 A 1 A 1 A Z 83 DB38 A7 ©i2 ei 02 5D D9E:6 1 A 1 A 1 A 1 A 1C 1C 1C 1C Z 33 DB40 IB 02 FD 01 E:0 1C 1 C 1C 1 C 1C 1C 1C 1C S A3 DB46 AC 01 94 01 ~7T> 日 1C 1C 1C 1C ID ID ID ID - B5 DB50 53 0 1 40 @1 2E: ID 1 D ID 1 D ID 1 D 1 D 1 O S C2 DB5S 0D 01 FE: 00 F0 DA06 ID 1 D ID 1R 1R IF" IF" ±F~ s D4 DB&0 D& @@ OA 0& BE: DA 1@ IF- IF* IF- 13 13 13 13 13 S A& OB&O AAi 00 A0 00 ■37 DAIS FR 1@ 03 2D 2E> FF* 10 24 : 37 DB70 87 00 7F 00 78 DA20 7F" 1 A 1 A 1 A 1 A 1 A 1 A 1 A s 2F- DB78 00 & 5 00 5F PA28 1 A 1 A 1 A 1 A 1C 1C 1C 1C S DA DBO@ 55 00 50 00 -4C DA30 18 IS IS IS 1 A 1 A 1 A 1 A : D2 DBS8 43 00 40 00 3C OA38 1 A 1 A 1 A 1 A 1 A 1 A 1 A 1 A s E2 DB30 35 00 32 00 30 DA40 1 A 1 A 1 A 1 A 1 Q 1G 18 ie s E2 DB38 2A 00 20 00 2 & DA46 io IB IS IS 1 A 1 A 1 A 1 A s E:A DBAO 22 00 20 00 IE: DA5@ 1 A 1 A 1 A 1 A 1 A 1 A 1 A 1 A s RA DBAS IB 00 13 00 18 DA58 1 A 1 A ±Ak 1 A F~R 00 & 5 - F~D DBB0 15 && 14 13 DA&@ DA B1 DA @@ 00 BfB oe 1& S 48 DBB8 1 1 00 1@ 00 0F~ DA&S 43 10 10 27 B2 10 -4D DBO@ 0 1 & 0 00 00 00 DA-70 1@ B7 10 @B ee 10 17 13 DB08 0@ 00 00 00 @@ DA-78 BC 10 BB 1@ 22 37 B3 @ & DBD@ 00 0 & 00 00 00 DA8@ 10 2D B2 10 17 33 B7 10 70 DBDO 00 00 @0 00 D/\8e 17 B& 1@ 0B 10 17 FF 27 DBEIO 00 00 ee 00 @0 DA3@ 1@ ©B F~R 1@ 1& B4 16 1 3 QF- DBEO @@ 00 00 00 0© DA38 33 10 ±Ak 37 BF" 08 IE: s A1 DBF"© 00 00 00 0© 00 DAA@ 3E BC @e 24 BC 30 48 20 s 54 DBF^O 00 00 00 00 00 パー テイ 用 プログラム 集 I ついに 出た! ラリ ー ゲームの 決定 版。 全 5 ステージの 興奮を 総数なん と 2 曲の BGM が 盛り上げて くれる。 君 は 感動の エンデ イングを 見る ことが で きる か!? 入力の 手順 ディスク の 方は どういう 順番で も か まいません が、 テープを お使いの 方は 必ず リストを 掲載して いる 順で セーブ してく ださい。 遊び 方 まず、 ジョイス テイ ツク とべ 一し っ 君が 必要 clearlOO, & hcfff と 入力し、 その あと b I 〇 a d ’ b g m” とします。 そう したら あとは load" r a I I yM : r u n で OK です。 あとは 画面の 指示に 従 え ば メイン プロ グラムが I 売み 込まれ、 ゲーム スター トです。 さ て 遊び 方です が、 ジョイス テイ ッ クの 方向に 車は カロ 速し、 トリ ガー I で ブレーキ 、トリ ガー 2 で 現在の データ を 見る ことができます。 データ 画面 か らはト リガ ー丨で 脱出し ます。 あとは 時間 内に チェック ポイント (画面 右の マップ 中の 青し 、地点 :以下 C . P ) に 到 達すれ は 面 クリア ーとなります。 C. P では 傷ついた 車の 修理が でき ます。 各面の 攻略 法 I 面: 分岐点は ない ので 道な り に 走れ ば C. P に 着きます。 コーナーでは ス ローイン • フアス ト アウ ト や、 アウ ト イン アウ トが 有^です。 2 面: 分岐が あ ります。 自 分な り の攻 略 コースを 生み出し ましょう。 近道を 覚える こと が 勝^への 近道です。 3 面: 分岐 あり。 砂の 上では ブレーキ がきかない ので、 レバー コン ト ロール が 重要。 4 面: 分岐 あ り。 コ ー ナ ーが 卑劣な 面。 道の 生を 胃す る こと。 5 面: 分岐な し。 しかし、 ここまで き た 君には、 道な り に 走る だけが 能じゃ ない ことが よく わかる よね。 う まく 走れば 15 秒以」 1 余る ハズ 。が ん ばって エン デイ ングを 見て ね。 なお ゲーム 中に スペースを 押す とゲ ームを 中断して しまいます。 その 場合 は run だけで 再開で きます。 開始 _ D950 終了 番地 DEI F ファイル 名 「-bgm 75 5 043 ML®A 3 0 3 g 8 u 3 c B D 0 D 2 D 3 A iLL 7 習 1 C 3 B 3B3B 3 5 9 D QOD48 DD5@ DD58 DD&0 DD&e DE>70 DD7Q DDQ0 DD88 DD30 DD3Q DDA0 ODAO DDB0 DDB8 DDO0 DDCS DDD0 DODO DDE0 DDES 10 C し EAR300 , : POKE を HF3C0 , : CO し OR 1 5 , 1F 1 20 SCREEN 1 , 2 , © = W I DTH32 = KEYORR 30 C: し S = PR I 卜 IT キャラ クラ ー tt つくって います。 = RR T MT *' 1 よ 勺 まって <た“ さい。" 40 9 中 ャラク ラ ー 50 RESTORE 170 & 0 RORK= 1 T04 = RE ADA 漆, A 713 FORI =0TOA = F0RJ = G«T07 = READER Q© i 二 = V A し ( ■■ ScH " +B 車) = D== V A し ( •■ •• + A 朱) 30 VROKE (: BASE ( 7 ;> + ( E>+ I ) 本 8 + JT , C: 10© IMEXTJs IMEXTI = IMEX 丁 K 11© F~OR I =0XOQ = FOR J=© 丁 C37 = VF'OKEIBASE: (7) + ( フ 14 I) 本 8+ T , 0= IMEXXJ's IMEXTI _ _ _ 八 1 20 RESTORE22© = FOR 1 =1 丁 05 : READ A y B = VPOKF:«a~l ム: 卜 A , B = NEXT I 1 30 » スフ® ライ ト 140 RESTORE 24 Gi 1 50 FOR 1 =1 TO 1 &= S^= ■• ■• = FOR J= 1 X032 = READ = S$ = 号 年^ $(:VA し (こ :> = IMEXTJr SPR I TE$ (: I ) =S$ :: NEXT I = LiOTO^^ 0 1&0 , 中ヤ ラク ヲー _ 170 DA 丁 A 40, &, F~F, Q3, 的, FC, 54, 14, 1C し 98', こナ , 83 w C0 , C0 , C 1 , E0 9 1 8 , 02 , 00 , 00 , 00 f 20 , C 1 , 0 エ, し F , — ie0~DA?A" , FF , FF , FF , FF , FF~ , 04 , 0 日, 3© , C© , c 1 r Cl , ei , 03, 55 , A A , 55 , A A , 55 , A A , 55 , A A - ^ .- iz 130 DATA &0,4, 01 , 01 , 00, 03, 0F, IF", 7F, FR, E , C5, E5, E2, R2, F2, FF~ ▼ FF , FR , FF , FF, FF , FF , 厂厂 二 【- , ’ RB , F"7 , EF , DF , BF , 7F" , 7F , BF , DF , EF , F7 , F~B , F"E> , 上 200 DATA 5S, 3, 0F , OR , 0F~ , 0F , 07 , 07 , 03 , © 1 , ご^:,,,, ラよ F 85, C3, 35, 4A, 3C w &,&,&, FF r 厂厂 ▼ FF, FF ,トト 2T0" daVa^s©,^, ff, ff, FF, FR, FF, Fr , 0,0, 0,0, 0,0, 0,0, A A , 55 , A A w 55 9 A A , 55 9 A A F 55 220 DAXA8, 27, 12, 23& , 11, 28, 10, 1 2"7 , 9 y 2:7 230 , スフ。 ライ ト テ'' ー ヲ ー B= VPOKE&H2300 卜 A , S^= ,B " s ROR J= 1 X032 s READ = S3 $ = S H- CM 卜- ■ z IMEXT J = SPR I TE 丰 (: I ) =S$ = NEXT I = G0T032 ', 30, Q0, SL 1321 r CF"r 〔:7, I w ^ w m w 9 ■ ■ »■■ F • " w - ^ 0,0, AA, 55, AA, 55 F A A , 55, A A F 5^ DAXA8, 27, 12, 23& , 11, 28, 10, 12: 0-4 F 08, 3© , C© , O ■SP7 , OR , C:B 1 , 30 r 5& ,81 FF, FF, FF, FF 00 0 日 00 IE 10 00 DD &E 7E 0 & 0B 30 33 25 AC SI 73 23 SE && 37 3B 0R BE 33 0E IE & 5 D5 2© A& 33 ■3D E& 4F~ 2D 5F 1C AD 3B 3D 75 D& DE E& 15 00 00 00 00 00 23 E5 2 & DB 03 30 87 CD 3 & 00 00 40 DD 7B EG LQa s s gugroQliK s D s E a A l D o D ul D lLLe F- & nBL 3 0 E: 2 @ ULL C < D 3 2 D ® & C O 2 D D D 7 LQQi? 177 0 A557&BD1E20EE0EDE 700033 ee&37^82D8E 3@E7@^^132@O50&DDBD@DE 20010 @000003 AlD5QA^00clQ3EDE0E3E02o5^323303EEe 2 ® D Q @ L9 @ B D ?1 & D D 1 7 Q & L C D LQ 0777 Q 75 5® ®3i A 5 D 4 elL o u 8 23& D < 3 3L& 0 a D D 5 D 33Q 3^^03130E3125DD0220DC0&133ODO 00223 7 0 4 0 U D 1 D 1 & OQ1Q 2500 D 0 5 &2 C E> L® E: E: & E: 5L7 SC2C03D0R20^0E0200B©BBDDD1 055350 ^-1 E 3 D E: E: 0 L & L D L @ & £> 23& e 8 &0 r> L0eli 3 D 3® @ 3 7 UL 3 1 0 L 4 L A i D 20 & il 7 D 4 O QQ 0 2 2 D 2 3 3 4 3 E L10 32001 L 3 3 D 5 1 & 0 00U 127 < 0 5 650 47 LLQ 2 L 9 UL9 3 22 3 L 2 d d q& d q d d ®q1 o 3 0 3 @ 0q @ 113 ?44 オフ ロード 24© DATA 1, 1 A, 1C, 1C, 38, 3E: , 3 A , 3B , 3Q , 60 r 50, 3Q , 38 , 3Q , 20 , 30, 50 , 50 F 10, 1C, "7C , 5C , DC F 1 O F , 0, 1,3,3,3,C3,&,5,5,7,7, 1 F 1 w &9 &9 &9 &w Q0 , C0 r C0 , C0 y OO , &0 , AO 9 AO , EO , EO , O0 9 80 , 0 F 0 , O 250 DAXA0, 0, 13, 3C, 73, F~2, F© , 58, 10F 22, 17,9,3,1 , 40 , E0 F FC , C4 , 84 ,&, 8F , 5E , 54 , 30, 20 , & 0 , F© f E© , CO F 8@ , 0,0ヲ©ヲ0胃0»3,&,13,厂 9 ~Z 9 9 1Df8,0,0,0,0,0f0,38f"78,F~8 , *70 r A0 9 AO , & 0 , C© , OQ r 0 F © r 0 , O 2&0 DATA 0,0, 7C , 7C , 7F , Q, 33, 20 , 20 , 33 , 8 , 7F~ , 7C , 7C , 0 ,0F0F©F0F IE:, DE F 3C, 82 ,41,-41, , 3C , DEI, lE:F©y0F0, 0F 0,0f0,0,7,&, IF, IF, &, 7, 0,0, 0,0, 0,0, 0,0, 0,0, C0, 7C: , 3E:, BE, 7C: , CO ,©,©,©,©,© 270 DATA 1,3,3, 17, 22 ,10, 50, F~0 , F2 , 73 , 3C F 13,0, 1 F 0, O, S@, C0, E0 , F0 , &©F 2© , 30, 54 , 5E: , QF~ ,ら, 84 , C4 , F*C F E0 , 40 , 0,0,0, Q, 1D,F",7,F,E>,&,3,0,0,0,0,0,0,0,0,0, Q0, C0 , A0 , AO, 70 , F-Q , 78 , 38 r 0, 0, © 280 DAT A 0 , 30 r 3B, 3 A , 3E: , 38 ,8, A, A, 3 ,4, 1C, 1C, 1C, 1 A, 1,0, 1C, E>C, 5C, 7C , 1C, 10, 50, 50 , 3©, 2© , 3Q , 38 , 3Q , 5Q r Q& 9 0,0,0, 1, 1,7f7,5,5,&,3,3,3,C3, 1, @,0,0,0, S@ , 8@ , E0 , E0 , AO, A0, & 0, C©, CO , C©, C0 , SO, O 230 DATA l,3,7,R,fc,4Fg, 2 A , 7 A , F: 1 , & 0 ,21, 23, 3F~ ,7,2, 8@, C0, 3©, ES, 44 ,8, 1A,F, 4F , 3E , 3C , CS 9 & 9 Q© ,©,0, 0,0, 0,0, 1,3,&,5f5,EI, IF", IE, 1C, 0,0, 0,0, 0,0, 10, BO F F~0r E0 , F0 , BO , & @ , C0 ,0, 0,0 300 DAXA 0, 0, ©F 78 , 7B , 3C ,41, 82 , 82 ,41, 3C , 7B , 78 ,0,0 ,0,0,0, 3E:, 3E:, FE F 10, 3C ,4,4, 3C , 1&9 RE;, 3E , 3E F 0F 0F 0 , 0,0, 0,0, 3, 3E , 7D , 7E> , 3E ,3,0,0, 0,0,0, 0,0, 0,0,0, E0 , & F~S F f^Q, &© r EI0 F0F0FO,0r© 310 DATA 2,7, 3F , 23 ,21, & 0 , F~ 1 , 7 A , 2A ,3F-+,&,R,^7F3F 1 w 0,0, Q0 , 0 , C8 , 3C: , 3E;, 4F" , R , 1 A, S, 44 , EQ , 3Gi , C© , 〇〇 , 0,0, 0F 1C, IE, lF-,E;,5,Sy&,3, 1 ,©,OF©F0, 0,©,0 , 0 , 0 , C0y & @ , B 0 , F"0 F El©, F0 , BO, 10,0 F0,0 320 CL_S = FORI =0TO22 = LOCATE© , I = PR I IMTSTR I NG$ ( 30 , " Z " ) ; = NEXTI 330 A^= " F*F~F ■■ = B 车 =■■ QGK3" = FOR 1=1 T02 = A$=A$+CHR$ (31) +C HR$ C 23 ) -hCHF:^ C 2:3 > C 29 >-§-'• FF"F _• s 聿 (: 3 1 ) -kC HR$ ( 23 ) -»-CHR^ ¢23 ) +CHR* C 23 ) + " DQGl " r NEXT I 340 RORK=0 丁 O 1 = FORI =©TO 24 STEF.& = LOCATE I , SP + K 本 & s PRIM TA$= LOCATE I +3 , 1 2+K 本& = PRIIMTA$= NEXT I = IMEXXK 350 RORK = 0 丁 O 1 = FORI =0TO24STEF_& = LOCATE I +3 , 3 + K 木 & = PR I NTB+ = LOCATE I , 1 2+K4c& = PF: I IM 丁 B 车 = NEXT I = NEXTK = l_OCATE0 , 2 3 & 0 RRINT ■' ZZGGGZZZZZZZGGK3GZZ Z オフ ■□ー ト〜 ■• 370 PRINT" ZGZZGZZZZZZZZGZZGZZZZZZZZZZZZZ" 3G& PR I NT BB ZGZ ZGZGGZGGZ ZGZ ZGZGGGZGGGZQGZ Z "• 330 F'R I NT " ZGZZGZGiZZGZZ Z GGG Z Z G Z G Z G Z G Z G Z G Z #, 400 PR I IMT " ZGZ ZGZGGZGGZ ZGZ ZGZGZGZGGGZGZGZ ,B 410 PR I IMT ■■ ZGGGZ ZGZ ZGZ Z Z G Z Z G Z GGG Z G Z G Z GGG Z '• 420 VDP ( 1 ) =VDR ( 1 ) OR 1 = FOR I = — 32 丁 O 1 80STEP5 z A=5 = IRI > 1 40 丁 HEIM A = 3 = IF- I > 1 & 0THEIM A= 1 430 PUTSPRITE1 , c: I F 3& > , 1 F A = F.UTSPR I TE0 , Cl, ) . Q, 1 s IMEX 丁 I 440 F-0RI = 1X05= LOCAXE:^, 1241 = PR 1 IM 丁 SF.C: (13)= IMEXT1 = し O CATE 10, 15s PR I fvl 丁 ■•ス ラート h V TT、 一 1 •• 450 I RSTR I G C 1 > =0GOT 0-45GJ 4&0 VDR ( 1 ) =VDF. Cl) AIMD254 = F.LJTSPR I TE© , c: Gi , O :> ,0,0= PUT SRR I TE 1 , (0,0), 0,0: C し S 470 B^=CMR^ C31 > +STR I IMG$ (7, CHR.^ C 23 > > s A$=" ZZ 'b 占 b •■ -hB 东 +•• Z Z X@@ •■- Z Z Z ABC •■ •■ ZZZDE ■• 480 F~OR I =0TO IS: LOCATE 1,3= PR I N 丁 = F~OR J= 1 TO20 = NEXT J = NEXT I 430 = L_OCA 丁 E2 , 3 = PR I IM 丁" テ'' ィ スク ( 1 ) ■■ = LOCATES ,5s PR I NT" テー フ ® <3> " 500 Z$=INKEY$= IFZ$=" 1 •■丁 HEIMC し S z PRINT" テ'' イス ク ■• s RUN #, v — mat i 门 •■ 51© IRZ$="3" 丁 HENC し S= PRINT" テー フ0 •■ = C し OAE> 520 IF"Z$< > " 0 B, GOTO500 530 END 1 0 C し EAR© , 8 g40 = W I DTH32 = E>EFUSR=««HDC00 20 CALL TURBO ON 30 ROKE&HD3-4 1 , 1 = POKEI&HD 342 , 3© 40 GOSUB350 50 » メイン ル ー チン & 0 MX =25 = MY=21 s R= 1 = X=30= Y= 1 00 = PLJTSPRITE0, C X F V> F 1 ,1s PLJTSPR I TE; 1 „ CX,V>,eFS 70 BR= -3s SP= 1 = SS= 1 = SE>= 1 = BD= 1 s XI ME=0 = V=0 s Ul=0 80 Vt>R ( 2 ) =P + 2 = POKES = A^ = R I GHT $ ( " •• + STR$ (丁) , 4 ) = し OCATE25 y 3 = F>R I IMTA$ = I FT< =0 丁 HENFOR 1 =1 TO 3000 = NEXT I = GOTO 1320 110 ON AGOSUB350 , 3 & 0 , 370, 3&0 , 350 , 3 & 0 , 370, 3 & 0 120 I F" I IMKE;Y$= ■■ "GOTO 1530 1 30 I FSTR IG C3>< >0GOTO&30 1 40 I FS 丁 R I G C 1 ) < >0THEN V = V 木 BE) = UI = UI 本 BD = V=— V 木 C ABS ( V ) > - 1 ) = W=— Ul 木 ( ABS C Ul ) > - 1 ) 1 50 I F* ABS (: V ) >20 木 SPTHEIM V = 20 木 SGIM ( V ) 本 SP 1 & 0 I F~ABS ( W ) >20 术 SPTHEIMW=20 本 SGIM ( W ) 木 SP 1 70 X = X+V 本 _ 5 木 SE> = Y = Y + W 本 • 5 木 SE> = 1 =1 1 Q0 I F~ABS (W) >ABS ( V ) 本 2 • 2THEIM I =3+SGN ( W ) 木 2 = GOTO 240 1 30 I F ABtS ( V ) > ABS ( W ) 本 2 - 2 丁 HEIM I =5 — SGN ( V ) 术 2 = GOTO240 200 I F~ c: Ul< 0 ) AND C ABS ( W ) く =ABS ( V ) 本: 2 ■ 2 ) THEN I =2 — ( V< 0 ) 木 & = GOTO: 240 210 I F ( V >0 ) AND c: ABS ( V ) く =ABS ( W ) 木 2 ■ 2 ) THEN I =2 — ( W >0 ) 本 2 = GOTO 240 220 I F ( W >0 ) AND C ABS ( Ul ) < =ABS ( V ) 本 2 - 2 ) 丁 HEN I =4 — ( V< 0 ) 木 2 = GO 丁 0240 230 I F" C V< 0 ) AIMD ( ABS ( V ) < =ABS C Ul > 木 2 - 2 ) 下 HEIM I =&— ( W< 0 ) 木 2 = GOTO240 240 PLJTSPR I XE0, CXFY)F ± w I 本 2— 1 = PUTSPR I TE 1, C X , V> , 9+ CSD= 1),1 木 2 250 I FX< 8XMEN3S0 IFX >184THEN 400 270 I F~V< 0THEIM420 280 I 「Y > 1 7& 丁 HEN 440 230 SD= 1 = BD=BF? = A=VPEEK ( S = GOSUB520 300 A = VPEEK C &H800+ P 木 &H400+ I NX c: ( X + 1 2 ) / 8 ) + I IMX C C V-»-3 )/8) 木 32) = GOSUB520 310 /\= VREEK: ( &cH800+P 木 ScH400+ I N 丁 C C X +4 ) / 8 ) + I IMX C ( Y+ 1 2 ) /8 ) 本 32) s GOSUB52© 320 A= VPEEK ぐ 木 &H400+ I NT C CX+12) / NT C C V-»- 1 2)/8) 木: 32 ) = GOSUB520 330 I FSt>=© 丁 HENV=0 z W=0 s GO 丁 O 720 340 FOR: 1 =1 TO&© = NEXT I = 130 丁 090 350 UJ=W+ ( A 一 3 ) 木 SS/2 z V=V 木- 35 = V= - V 木 ( ABS C V ) > • ©5 ) = RET URM 3 & 0 V=V— C C A< S > 本: 2!+ 1 ) 本 SS 本 ■ 7 = W = UI— ( (: ABS ( A— 5 ) < 2 ) 木 2+ 1 ) 本 SS 木 - 7= RETURN 370 V = V — SS 木 C A— 5 :> / 2 = W = W 本. 35 = Ul=— W 木 ( ABS ( UJ ) > - 05 > = RET URIM 300 jr = MX— 1 = I=MY= GOSUB4 ら 0= I Fr A==255T MEN X = 1 & = GOXO50© 330 X=17&z GOTO 480 … 400 j =MX + 1 = I=MYs GOSLJB4&0= I F~ A=255THEN X := 1 7 StH50:> THEIMA=255= RETURN 470 し OCATEMX y MV = PR: I NT CHR:^ C REEK (■ 2 ゾ HD944) ) = MX— J = MY — I z P" = A: — ^1— l-4-'7 = RtETLJRM I NX C C -5) <2) 术 2-»~l ) 17344 y VRE:E;K c; «= A^ = RI GUT 东 (: " ■• + STR^ ( T ) , 4 :> = し CJC:ATE:25 , 3 = F*R I IMT = GOTO 241 3 500 V=0= W=0 = VDR C 2 :> 二 1 3 = F OKE:S = -F~B1 THEIMEtR=BR4 2 • 5E — 05 = SS = SS—2E; — 05 木 ( V 木 V + W •本 W) = SP=SF,一 1 • 5E — 0&本 ( V:*: V-*-W:*:W > r SE>=SE> 本 ■ 7 5 & 0 IRCHR^ ( A ) ="P" THEIMBR=BR + 2E — 05= SP=SP— 7E — ©4 = V=V 木 ■ 8 s W=W 木 ■ 8 570 I F~CHR^ ( A ) = ■• b •■ THEIMSE>=SD 木 -3s BR=BR+4E - ©S = SS=SS — 5. 5E— 05 = SR = SF>— 1 - 5E — ©4 580 I F~CMR^ C A> = BBQ'1 XHENSE>=0 = RETURN 530 I FBR> 1 XHENBR= 1 & 00 I F~SF>< =0 丁 HENSP=0 & 1 0 I F~SS< =0XMEIMSS=0 & 20 RETURN & 30 , テ'' ーヲー サーヒ ''ス &40 PLJTSPR I TE0 , ¢0,0 ),0,0: PUTSPR I TE 1, ¢©,©>,0,0 & 50 VDF> ( 2 ) = 1 3tt ROKEScHI^323 F 8+ 1 1 本 4 = C し S = F*R I N 丁" RRRRRR RRR,B s P-RINlfRRZZ ' tj^tDR" s PR I IMT •■ RRZ Z R ■• = PRIM 丁" RRZ ZZABCR" s RRIIMT-RRZZZDE R テ''— ヲ ーを 丨 5 ラ こくします 《 B, s RR I NX - R RRf^RRRRR,B &&0 FOR 1 =1 丁 02000 = NEXT I = PRINTS PR: I NT " エン シ ~ ン •■ 5 1 00 — I NT C SP ■木 1 00 ) j •■ズ ラ、、 ウン" &70 FOR 1 =1 TO2000 = NEXT I = RR I IMX s RR I N 丁" フー レー 中 " ; I MT ( C BR— _ g ) 木 1 000 > 5 •• X ラ'' ウン" &Q0 F~OR 1 =1 TO2000 = NEXT I = RR I MX = FF: I NT " サス ,、〇 ンシ ヨン ■■ 5 1 00 — I NX C SS 木 1 00 > j •• % デ ウン" & 30 FOR I = 1TO2000 = PR I IMT = RR I NX = PRINT" リ ヲイ ャす るなら, ぐ 3 : > を おしてく た“ さい。" 700 I F~STR IG C 1 > < >0 THEIMPLJTSPR I TE© , CXFV>y 1, Is PUTSP RI TE 1 , CX,Y),8,2s <30X05 1 0 710 I F I NKEY$="3" GOTO 1 320 = E し SE700 720 » ヒ0 叫 ト イン 730 A=USR ( — 1 ) = FCDRI = 1TO4000= NEXT I = PLJTSPR I TE0 , (0,0 > ,0,0: PLJTSPR I 丁 E 1, <:O,0>,0F© 740 I FPEEK C ««HD34 1 ) =5GOTO 1 330 750 VDF> (2)=13= POKE&HF323 , 8+11 本 4 = C し S = RR I N 丁" コーフ" ; PEIEIK CS ; ■■クリアー ■■ s PRINTS RR I IMT B, ぞ ちし'' か ん ■• 5 T 7&0 RESTORE 770 = FOR I = 1 TOPEEK ( ム Ht>_34 1 ) = RE; AD A s NEXT I 770 DAT A 75,7 5, 105, 120 780 F~ORI = l 丁 02000 = IMEXTI = PRINT" おらた に" 5 Aj ••し〜 か ん おたえ られ ます 《 _• = ROKE&cHD 342 , T + A = し OC ATE4 , 4= PRINT •■そちし'' かん" 5 丁 + A ~730 RRI IM 丁 = RRI NT •■ RRRRRRRRR " = PR I IMT ■■ RRZ Z , bdbR ■■ = RR I NT"RRZZX@@ R" = RRIMX^RRZZZABCR- s RR I MX ■' RR Z Z Z DE: R し 呤ラリ か〜 て ~ きます 《 ■• = RR I IMX - RRRRRRRRR ■■ = J= 1 2 800 し OC:ATE:0 ,12s RR I NT ■• エン シ'' ン ■■丨 1 00 — I NT C SF ■本 1 00 > ; X ヲ~ ウン •• 810 PRINTS PRINT" フ〜 レー 中" 5 I NT C C BR — _ 9 ) 本 1 000 ) 5 ■■ X ヲ - ウン " 820 RRI NTs RRI NT" サス ン シヨ ン ■■ 5 1 00—1 IMT C SS 木 1 00 ) 5 •• % ウン •• 030 PRINTS PRINT" し ゅ ラ ■ノ しない。" 日 40 PRINTS PRINT" 1 かいの しゅ 勹リ て'*: 20X なお tl: ます 〇 _■ = PR! I NT •• たた ~ し 、しよ よウ し〜 かん 5 し〜 かん" 050 A=ST I CK C 1 ) s J= J— C A= 1) 木 t:Jr>12) 木 2+ ( A=5 ) 木 ( J< 18) 本; 2: s PLJTSPR I TE0 , (7, J 本 8 — 4 >,15,5 Q&0 I FSTR I G C 1 ) =0GOTO33© 870 I F" J= 1 2THEIMSP=SP+ -2=1 F~SP > 1 XMEMSF*= 1 08® I F" JT= 1 &THENSS=SS+ -2=1 FSS > 1 THEMSS= 1 8*90 I F~ JT= 1 4 丁 HENBR=EtR— ■ 02= I i^BR< - 3XHENBR= - 3 300 1 卜 a = 1 e I MtlMf-OKtfUMO^-4 1 , PEEK ( ^.HD'3-4 1 ) 卜 1 = PLJTSPR I T E:Oy CO , © ) ,0,0= GOTO40 310 POKE&HD342 , PEEK ( S 942 ) —5= し OC ATE4 , 4 = PR I MX •■そち し'、 かん" 5 PEEK ( « .342 ) 32© 「OR 1=1 TO 1 000 = NEXT I = GOTO 800 330 ROR 1 =1 TOQOCi = IMEXTI 340 IF~INKEY$= •- •• GOTOC38GlEL_St:«50 350 y 八 イ ケイ サク U イ 3&0 A=RND C — PEEK C &HD34 1 ) ) •970 CLSsF_RINTzPRINT" jVf ケイ 左 かさます。 さんこうに してく た、、 さい 〇 ■• = FOR 1 =1 TO 1 00O = IMtEXTI 300 F"ORR=l 丁 03 = RESTORE 1 1 40 330 REIADA^s I F A$< > " RD " GOTO3.30 1 @06 RE: AD A = I F A< >— PEEK ( &HD94 1 ) G0T0330 1010 VDR ( 2 ) =P+2 = POKE&HF ■•ヨ 23 , 8 卜 F ■木 4 = C: し S= FOR I =0 丁07 = R EADA$ = LOCATE25 , &+I 本 2 s PRINT し EF"T$ (: , & > = し OCATE25, 7 + I 木 2 = PRII\ITRIGHT$ (: , & ) = NEXT I 1 020 I FP< > 1 THENFOR: 1 =1 TOP— 1 = READA^ y A = = F"OR J= 1 TO A 木 4 : READA 丰 = IMEXXJTs NEXT I 1 030 REIADA^ r FOR J= 1 T022 = LOCATES w Jz PR I MTSXR I NG$ ( 22 , し EF~r$ (A 丰, 1 ) ) = IMEX 丁 JT= FOR 1 =1 TO 13 = し OCA 丁 E: I IMT CRIME) (: 1 ) 木 20+2 ),1 NT (RNE> C 1 ) 本 20+2) = RR I IMXR I GHX^ c: , 1 ) = NEIXXI 1040 RE: ADD = FORI =1 TOD = READA^ = X=ASC: C し EFT $ <: , 1 ) 〉 一& 3s Y=ASC c: R: I GHT$ ( , 1 ) ) — &5 = READA 车 , MX , MV 1050 RORwT= 1 XOMV s l_OC:ATEX , Y + J = RR I NTSXR I IMG^ (MX, ) : MEXXJT 1 0 & 0 FORJ=l 丁 OMX 木 MY= VPOKE ル! H800 + P 木 8 + CX_l) + ( I IMX CRND ( 1 ) 本 ( M Y + 2 ) ) +Y ) 本: 32 , ASC ( A 隼) s NEXT J = IMEX 丁 I 1 070 FORI =0TO31 = VPOKE 心卜 1800+P 本&卜 1400 + I , &H52 = VPOKE & H800+P 术 《 3XHEN1 1 30 1110 LOCATE 13,3= PR I NT ■■ Y Y " h-CMR^ C 28 ) + •■ Y " = LOCATE 14, 4 = RR I NT "dbbbbc ■■ = LOCATE 10, 5s PRINT" Q Qbdbbc b " = し 〇 CATE 1 O , & = RR I NX ,B O G! bbclcbb •• 1120 LOCATE 10,7= RR! I NT ■■ Q Qt»b •二 dt>b " = し OC ATE 1 0 , Q = PR IIM 丁 ■•Q Q t3C bbdb _■ = LOCATE 10,3= PR I NT •■ Q Oc bbl 313 d •■ = し OC ATE; 15, 10= RRI IM 丁" _• 1 130 NEX TPs RETURN 1 140 DATA RD 9 — 1 , ■• P 〇 し HK し K •■ , ■■ IMKIMJTOO 〇 I •• , ■• M IM J O LIMJT B, , B, し NJT 〇 し K", •• MK 0 1 MHJO", ■_ I l_NHKO *• , ,B I MJT MNK I HIMM J ’• 1 150 DATA ZY, 2, AA, F, 22, 4, AS, F, 22 , 4, Z Y , 2 , A A , R , 4 , 22 , SA , F , 4 , 22 , ZVF 3, AA , F~ , ^ ^ , AS , F , 22 , 4 , SA , F , 4 , 22 , ZV, 3, AA , F-, 22 , 4 , SA , F , 4 , 22 , AS , F ▼ 4 , 4 1 1&0 DATA ZY, 3, AA, F, 22, 4, AA, F, 4, 22, SS, 4, 4, Z Y, 3, AAy F", 4, 22, S A , r , 4 , 4 , AS , F~ , 22,4, ZY, 2, A A , F~ r 22, 5, A R, F-f 22,5, ZY, 2, AA, F, 5, 22, F? A , F, 5, 22, ZV y 1 r A A F V F 22 ,4 1170 DATA RDr — 2 y " ROK し N I ••,"MJTOLNH し K ","し K I NOKJN" F " HM JTO し KH へ •• I IMJKNO I I •■,■•卜! MM JOKH" , "M M IMJLNOKH" , ■■ I M JT し H し 〇 し ■■ 1 1Q0 DATA ZY, 4, A A , ん 7, 22, MK: r V F 3 y 5 F CD A r VF Q, Qr R A , Y F 5f 22 , Z V , 3 , A A , Y , - ネ, 22 , EIK: r V F 3 , 11, l< A y F ,2,8, PL r V, 3, *9, SA, Y, 4, 22 1 130 DATA ZY, 4, A A y Y, 4, 22, M A , V F 10y &, KE , F~ , 3 , 15r SIM r V, -4, 3, ZY, 4, A A F V r 10,7, AF、 Y, 4, 7, JTE: w F" , 3 , 15, SA , V , 4, 2 2, ZY, 4, AA, Yy 7, GfAr V , & F & F AO, Y, 7, 8, PO , Yr 7, 8 1200 DATA ZY, 4, A A F VFQ,Q,AIyV,5F 14, OA , Y, 22, LK F R F , & r Z V r 5W AA F V , &, OA F V, &F 1 AG , Y , & , & , QO, V r & 1210 DATA Z Y , 4 F AA , Y , 22 , 7 , KEJ , Y , 7 , 7 , AP , Y , 22 , 7 » F~P , Z , 15, 3, ZY,2, AA, Gw 22, 4, A A , 6,8,0 1220 D AX ARD , —3 , BB HM I Rl JKH Jf H •• , ■• H し IMK し K し O OK #i , B> H Z48 オフ ロード H MKONMI H"," し JKJTKH し 〇 I , "K し K し IMJM M M H し IMK し! TI HH" , '• JOJ MKH し し"," し NM I HH し N I M 1230 DATA GY, 3, AA, F , 22, GI へ F, &, 22, JT I , Y, 4, 5, G V , 3r AA, F^f 10 12, 5, AP, F, 22, 7, G Y , 4 , A A , F , 22 , 5 , AF> , R , 7 , 7 , RR , F~ , 7 , 7 , GY , 4 , A A , F~ F 7 , & , GIA , F , & , 22 , l_H F Vy 5F &, AF> , F , 7 , 7 1 240 DATA GY , 4 , A A , F~ , 7 , 22 , HG , Y , 4 , ョ , QA , F , & , 7 , QO , F , &, 8 v GF~ , 4 , AA , F , 7 , & , OA , F~ , & , 7 , AO , F~ , 7 , Q , GIR ,F,&f7, G Y F 4 , AA F V, 3, Qr J A , F", 13,-4, AO w F~ , 22 ,ら, ON , R , S F 3 1 250 DATA GY ,5, AA , F~ , & F & , OA , F~ r & , fe ,, AGI , F , & , & , QQ , RF & ,&, GY , 1 y A A , V, 1 Q, 5 12 &0 DATA RD, — 5, ,a R し IMK I I J I •■ , ■■ MO J H I ■•,■■し NK I JI Ml J ","H MJ I し 01 I HMOJ I J ■■ , •• し JT し K I ■• , •■ I I MOKHMK H ■■ , " I MK IH MIM JT ■• 1270 DATA VZ , 3 r QA , Z , O F ^ , KF~ FZ,SF11, GO , Z r Q , S F VZF 3 » I A 9 "Z. 9 ~7 9 & 9 EG f> ^ ^ 9 Q y I O 9 ~Z. 9 ~7 9 O F Y Z , 4 , A I ^ , 5 9 "7 9 DM , ~2L , 13 ,7, IA,Zr7,5, し D, Z, 7,1 2, VZ F 4, AH, Z , &F &, EC, Z , 15,7 , NH , I ,ら, 11, Id,ZF7r& 1280 DATA VZ , 4, DG F Z , 14, GC , Z , 13,5, GIG, Z F IRF Z r 5^ YZ,4, CD, 1,7, 1&, FN, I, 15, &F HA, Z F O, 5, R J , Z , 5, & F VZ , 3, AI , Z,8,7, HE, Z, 9, 7, PI, Z, 7, 7, VZ , 3 „ AG, Z , 8 , 7 , GK , Z , 11 ,7, PGi ,Z,7,7, ZVF 2F AA , d , 8 , 7 , RA r R, 5, 3 1230 DATA RI>? — 4 , , PON し MO J JM •• , ■• I し H JMNK し" ,“ L H HHKOJIMKI " , '■ I 、 し J し M J HH •• , ■• I I IH JIMK し", •■ I J J MMKJIMOJTJT-1 F BB I M JMIMOKK ■■ , ■■ I I I HKNON J B, 1300 DATA F>V , 3 , G A y Z , 3 F O , DM , Z , Q F Q , GIM , Z , 3 F 3 F R V r 3, QA, Z F 3, 8, KM, Z , Q, 8f GN , Z F 3, 3, ZV„ 4F AR , P, 7, 7, F J , Rr 8 » Q » KF~ w ^ w w 9 F5* A 9 9 ~7 9 ~7 9 Z Y , 4 , F~F~ 9 9 O ^ O 9 HCK 9 F-* r ~7 9 ~7 y AA F F>, 7, 7, PP, P, 7, 7 1310 DATA PZ , 3, HA, Z , 8, 22, AH, Z , 22, 8, I I , Y, F>Z , 2, MA, Z r Q, 22, AH, Z , 22, S , RV , 1 , AH, Z , 22, 10, R V , 3, AH, Z r 22, Q, ED, Z , 14, 15, MH F Y, 8, 7, ZYF 1 , A A , F> F 22,5 1 320 C し S = PRINT" RRRRRRRRR,B = PRIIMT" RRZ Z , t>^b>R " = RR I NT" RRZZX@@ R" = PRINT" RRZZZABCRB, s F>R I IMX - RRZZZDE R •• s RRI N 丁" RRRRRRRRR" s RUXSRR I 丁 E0 , RUTSRR I 丁 Ell, C0,0> 1330 A=USR C — 1 > s RR I NX = RR I IMT - さ'' んねん た'' つたわね 《 また こん f か~ たは ~ 5 0 ね!" 1340 PRINT= PRINT z PRINT" ケ ''一 乙 ■才 一j、 〜ー リフ ◊レイ =ス へ 〇 ース J、” 一" 1 350 F>R I MXs RRI NT •■ やめる = C 0 ) 宇一" 13&0 A$=INKEY$= I F"A$= " 0 " GOTO 1 530 1370 IFA$=" "GOXOS© 1330 GOTO13&0 1 330 » エン テ'' イ ンク ~ 1 400 C し S z l_OCAXE0r 22 z RESTORE 1 420 1410 PR I N 下" ■■ -+-STR I N>3^ C 24 , ■• Z ■•: > = GOSUB 1 520 : A=USR C 1 420 DAT A"ZZZZZZZZZZZ Z ZRRRRRRZ Z Z " , B,ZZZZZZZZZZZZR QQQQRRRZ Z ,B , ,B ZZZZZZZZZZ Z Z QGIGIOGIQRR Z Z B, 1 430 DAT AB1ZZZZZZZZZ Z RRRRRRRRF>R Z Z B, , " ZZZZZZZZZZ Z ZG G G ZZ,gF "ZZZZZZZZ Z Z Z ZF~GFF~FR Z Z " 1 440 DATA -ZZZZZZZZZZZ ZGGFGGR Z Z 11 F "ZZZZZZZZZZZZG GRGGRG ZZ - , " ZZZZZZZZZZ Z ZGFFGGFR Z Z •■ 1450 daxa- zzzzzzzzzzzzgqqggf- ZZ , " ZZZZZZZZZZZZG OGGFF ZZZ", " ZQGQGGGGFIGFZ ZRFFFGR RR ,B 14 &0 DATA" ZGZQGGGGFZFZRPGGGRPP P ■• , •■ Z G Z QGGGGF Z F Z RGGRRRR P " , ZGZQGGGGFZFP F>GRR RR ■■ 1470 DATA" ZQZQGGGGFZFPP R PPPPR •■ , ■■ Z ZQZQGGFZFGGF- P RRRRRR ,B , •* Z Z ZQZF"RZRZGGF"F*RRRRRR R ■■ 1480 DAXA" ZZZZZGRZZZGGF-F- RF>R R •_ , ■• Z Z ZGGGGGFFGGF F"RRR R RR"F "•漏 1 430 READ : I > ■• ■• THEINPR I IMT _■ Z Z •■ -»-A^ : GOSLJB 1 52 0s GOTO 1 490 1500 f^OR 1 =1 XO300O = MEXTI = C: し 8 = し OCATE:2, 5= PR I NT ■•おな 广-は みこ” ヒ 5コ ース せい けしました" 1510 A=330— X= PRINTS PRINT" 3 ^< " ; A; ■■し〜 かん ■• s GOTO 1 340 1520 FORI = 1TO500= NEXT I = RETURN 1530 CA しし TURBO OFF 1540 SCRE:E:IM0 : END ?49 1983 年の 10 月に 創刊した M マガ も、 おかげさま でつ いに 50 号まで やって 参 0 ました。 幻の 創刊号 は、 全 100 ページで とても 薄くて、 まん 中が 大吉な ホチキス 2 つで パ ツンと とじられた 本でした。 それが 今、 こ 5 して 創刊 50 号 0 足 かけ 5 年め を 迎えて います。 スタッフが 入れ 換わ っても、 路線 は ガン コに 崩しません。 これ も 読者の みなさんの 熱い ご 支援の おかげです。 ほんと 5 にあ 0 がと これから も、 どろ そよ ろしく お願いします/ C) やった〜、 50 号 だぜ 〜ガ さあ〜 こ れ からが 勝負 だぜガ もっ ともっ と M マガを おもしろく して 50 万 苗 袋!! 吉 'にす るぞ〜 // というと ころで、 起きて し まった。 なんと 夢の 中で 気合いを 入れ ていたので す。 ひえ〜、 いまの 夢 だっ たの か?? 夢に しては ちっこい ゆめ だ な、 なんて 思って います。 ゆっく り 落ち着いて コッコ ッ MS X (マガジン) の 普及 • 拡大を 目ネ 旨し まし よう// 「慌て る 乞食は 貰いが 少ない」 でしょう。 ⑴ €5珊 の M マガを 全部 持って いる 人は、 その 背 表紙を ならべて 写真に とって 送 りなさい。 M マガの オリジナル グッズ を あげち ゃう ぞ。 ほんと。 中 政と ヨーロッパの MS X 事情を 取材した ノ <ーバ リッチ さ んの 報告は、 おもしろい 言 舌 題で いっぱい。 旅行 好き の 私は た まらな く 行き たくな ってます。 息し かし 今は 温泉へ 行きたい。 エリカ ちゃんが く れた四 万 温泉の キッ チュで かわいい おみやげ 手ぬ ぐいが 気を そそ り ます。 (冬沐 みが 待ち遠しい C) C コー トの 襟を 立てて 歌舞伎 町を 歩く 人の 面を 煽って ゆく 冬の 夜風は うっと りする ほど 硬くて 素敵だった のに、 も うそれ も 夢に なって しまった (ゲーム センタ ーが 開 いてない から)。 まだ 2 年 前の こと、 でも それは もう 還って こな い 幻の 時。 僕が 卒業して ここにき たの もちよう ど 同 じ 時期、 奇妙' な 暗^では ある。 幻を追い かける のは やめろ とい うこと か? それは いや だ。 たとえば 欧州では オール ナイ トで アーケードを 営業して たりは しないの かな。 (N) C なんだかんだで 50 号。 思えば ポクが アスキーの バイ トを 始めた の も、 この M マガが 創刊され たと きだった。 当時 は 汚れを 知らない (?) 大学 4 年生。 それが 「たぐっ ちゃん」 の 甘い 言葉に だまされ いつの 間に か 社員と なり、 つ いでに ME R R Y にも だまされ 結婚 も し、 そして あっとい う 間に 4 年の 年月 が たって しまった。 うう …… 、 ポクの 青春は どこへ いってし まったん だ。 ア スキ ーの ノ く カヤ ロー/ 仕事な ん てで きれ〜 だ/ (27 廟闲 性) € 年末が 近づく と、 編集部では 年末 進 行と いう スケジュールに 追い回される。 とにもかくにも、 早く 原稿を あげなけ れ ばなら な いんだけ ど、 ゲームは ちっ ともで きない。 気があせ る ばかりで、 仕事が 全然は かどらない の だ。 困った、 困った、 ほんと に 困った。 などと ブツ ブツ いってる わけに もい かない。 あっ、 そうだ/ 5 時なん だ、 今月 号。 100 号を めざして がんばろ うっと。 めでた い、 めでたい。 おめでたい 私。 なんの こっち や? (困って しまって ワンの H) 圓 mmt 寒い 寒い 冬です ね〜// なんて 季節には、 特 集 「コナミ 人気の 秘密を 探る/」 で 暖まって ください。 これを 読む と きっと 心が 躍っ ち ゃ いますよ。 ソフト トピックス、 ソフト インフォ メー シ ヨンと 1 月 号に 引き続いて、 プレ ゼン 卜も あるから 楽しみに していて ほしいな あ。 暧い 春と MSX マガジンは 待ち遠し いもの だ。 € ニューメディアと 騒がれた ノ ぐ ノコ ン 通信 も、 ある 程度 当たり前 になって き ている よう だ。 MSX — NET や N I FT Y などには 女性の 会員 も 結構 多い し、 パソコン 中心では なく いろいろな 話題で 盛り上がって いる。 おかげで、 今朝な ど 5 時 過ぎまで 酒呑 チャットを やって いたりして、 これを 書いて いる 現在 まだ 宿酔 …… 。 この 編集部へ 来て ちよう ど 40 力 月。 この 先 も いろいろ お もしろ い ことがあり そうで、 実はと っ て も 怖かった りする。 (Z) M マガ 情報 電話 003-486-1824 MSX マガジンは 定期 購読が できます。 本誌の 最後に とじこんで ある、 赤い 文字で 印刷され た 払 込 通知 票に、 必要事 項を 記入して、 郵便局で 手続きを してく ださい。 これで 毎月、 自宅に MSX マガ ジ ンが 届けられます。 遠くの 本屋さん へ 行かない と 買えなかった 方、 ぜひ 利用して くださいね。 また、 月刊 アスキーと ログイン も、 同様 に 申し込めます。 この 件に ついての お 問合せは、 003 ま で、 お願いします。 本誌の 記事の 中に あった まちがいを、 いち 早く お知らせして 訂正す る、 情報 電話です。 内容は、 随時 入れ換え てい ます。 疑問な 点が 出て 吉ま したら、 こ こに 電話を してみ てくだ さい。 テープ が 24 時間 態勢で お応えし ています (ま ちがい 電話を しないよ a にね)。 Z5I 第 33 号 (月刊) 1 987 年 賢 審像 1 適 謹 pl= …外 g s 刪 織 &| aH 特 ク冬ぃ 月 号は 3大特集なのだ=: なんと、 もう' 新卬 3 0てお めでとう e ざい ま す、 11] 年 屮 はたい へん お 世 話に なり 0たが 、本年 も ょろ ->/お願い |{1 とげま す、 という アイ サツを しな ければ ならな いお正 昼 ログインの ログイン 通信を 書か 音 ゃな羟 い 頃に な って しまいました 。本当に ■のた つの ® い PMT さて J 毋 年; A 年 お 正月 号 というのは、 雑誌 も 気分 一 新、 新 企画 やら レイアウト 変更 やら、 とにかく 大変な ん P-KS ら 、ホン ト 1 に 。 当脅刊 ログイン だっ S 誌なん ですから、 お 正§ にあた っ 5 イロ イロ 考 えてい るんで す:^ はた し V-AJI なること やら。 ま ぁ、 期待し 努まえ 。 ヮタ クシの 編集 方針と し ては、 さらに 面白 くって、 タメに なって、 _ で、 二 ュ ー ス性 ^1 1 で、 読み ご たえの ある、 立派な ロ グイ ンを 昭^ 8 年 もめ% しちや い 妾から、 安心して てね 0 決し 系 ヌキ: ^ なんか 掲 故し ないから ね。 ま、 そ 一 ぃ うゎ けだ。 で、 ログィンの お 正!! dD だが、 ド カ ー ン AJCO 大 t* で 右 届:^ る i で 為る。 3 大 i: 一って いうと、 とに かく スゴ ィ〇大 企画が 3 本 象 るって いう ことなので、 とり $> 又ず その ひとつ ひと つを 羿 していこう 。 季は雲 その 1。 こい つは ウレ シィ 恒例の お年玉 ソフトウェア プレゼント ^ 昭 年の 1§ の ソフト ウェア プレゼントが、 646 本 の 人気 ゲ ー ムを プレゼント した こと 春 又れば、 当然 それ以上の 本数を 用意して お 届 る カク ゴ なの だ。 きっと キミが 欲しい ゲーム もたく さん ある: av だ ぜ。 そんで も っ HWS20 こい S、 ログィンが これ までに 発表して^! コン ス ト ラ クシ ョンツ ー ルの 作品 大_ の 第 1 次 結 S 表大 会な の だ 。どんなの が あつ たか、 ちょっと 思い出して みると、 アド ベンチ ャ ー ツ ク ー ルで しょ、 ス クロー ル ゲ ー ム コンスト ラ クシ ョン で しょ、 ログィン 版 カ リグ ラフ n ンスト ラ クシ ヨンで しょ、 ダン ジョン 万 次 郎で しょ、 そして まみ りんと あ つた わけ だ。 実は、 これら の n ン スト ラ クシ ョンツ ー ル li 者の みんなが 作つ VA/ れた作 品が た あ 一 くさん 届いて いたので あつ た 。それ も ケッコ ゥカ 作ぞ ろい なの だ 。もち 交、 い くつ かの 優秀 作品は、 ッ ー ル 付きで タケル に 入る よ 一 にす るつ もり だから、 ツール 霉 つてい ない 人は、 購入して みて くださ い。 それで、 キミ、 だ ^ のす リ ジナル ゲ ー ム^ れば、 ひょっとしたら、 第 2 次 結 果雲で 、キミの 2 に栄 冠が f かもし S いぞ。 じゃ 一 ん、 そして 最後が 毚 その C0。 こいつ 淫っ きりいって 新機軸 だ。 なに 伊藤 ガ ビン?!® 当って とこ^ 0?! スゴィ 。ど 一 ゆ 一 霞になる かとい ぅと、 つ まり その、 ログィンは いま まで パソコン ゲ I 厶の _ して蹇 な S か、 その 洞察力と 知識 を 結 集して、 昭^ 8 年は こんな ゲ ー ムが売 れ る、 こ 一 んな ゲ丄が 登場す るに 違いな d G を K バリ 予測し てし まおうと ぃう わけ 。読 者の シヨ クンは、 r,y む、 なるほど。 じゃあ、 期待し てよ, ぶ」 と ナツ トクして くれて lrM.J 違いない (MI か な)。 ソ フトメ I カ ー の^ HI .担当の 人 もよ一 く 読んで み Wv ださいね。 以上、 駆け足で 月刊 ログ インの お 正 § を 紹介して きたが、 とにかく 盛り だく f で、 ぶ 厚い ログインに なる ハズ なので、 萏 e 購 入のう え、. 一読して みて ほ し い という こと だ。 最新 ゲ-ム 徹底 解剖" お 正 i で 解!^ るゲ ー ム ソフトの ラインナップが 決ま - 〇 たので、 e 報告す る 。 このべ L ジは 、きっと 読 者の 大部分が 注目す る だろ 、と 思^^る ゲ ー 厶 ソフト $んで 、その 面白 さ、 ちよつ とした ヒント、 iiL! 区 西 新 磯 2 7 4 第 20 森 ビル 1F 北濤 道 札 幌市東 区 北 25 粂東 8 逋4 堂 書店 03 503 6586 〒1〇5 聚京 区 新橋 2 16 ニュー 新欉 ビル B1 北; 毎 瑾 札 視耋平 区 清 田二条 2 丁目 15 紀 伊® 屋霱店 住友 ビル 店 03 344 6984 T160 東京 部 新 宿&西 S: 宿 2-6-1 住友 ビル B1 北濞 遂 札 後西 区 発 寒 12 条 3 三 《官 書店 新 宿 西口 店 03-343-4871 t!60 東京都 新 宿 区 西 新 宿 K1 3 小 田 急 スカイ タウン 12F 北海道 旭川 市 2 条 7 丁目 左 1 号 マル カツ 6F 新星 堂 新 宿 NS ビル 店 03-344 2055 03-206 0656 t160 東京都 新 宿 区 西 新 宿 2-4- 1 新 宿 区 NS ビル 1F 北海道 旭川 市诚 ii 盯目右 2 号 未来 堂 書店 t160 東京都 新 宿 区;® 田馬壜 2 丁目 17- 4 北 漘道« 川 市一 粂通 8 丁目 右 11 号 旭 JII 西武 8F 紀伊國屋 書店 本店 03-354-0131 t160 東京都 新 宿 区 新 宿 3 丁目 17-7 北海道® K 市松 里 町 3- 13 裼冢霱 店 センタービル 店 03-345 1246 t160 東京都 新 宿 区 西 新 宿 V 25-1 センタービル MB1 北 濞道小 樽 市棰棟 2 22 8 芳林重 書店 * 田 馬場 店 03-208 0241 T160 東京 部 新 宿 区 H 田馬塌 1 丁目 26-5 F1 ビル 3F 北海 11 北 見 市 北 3 条西 2 丁目 山 下書 店 新 宿 マイ シティ 店 03-352 6685 T160 東京都 新 宿 区 新 宿 3- 38-1 北海 遒 褥広市 西 17 条南 3 丁目 西武 新 宿 フック センター 03 206 0380 T160 棗 京都 新 宿 区 歌舞伎 町 1 丁目 3(H 新 宿 ペペ 北海道 苫小牧 市 表 町 6 丁目 2-1 サン プラザ 6F 新栄堂 龜戸 駅ビル 店 03 638 -2345 〒136 東京都 江 東 区龜戸 5 VI •戸 駅ビル エルナ ー ド 5F 青森屏 H 森 市 新 町 V8 6 八 雪 重畲店 字芸 堂* 店 03-718-8161 03-710-1391 t152 t152 東京都 目熏区 中 根 13-3 東京都 目黑 区鹰番 3- 7- 9 費 森 犋胥 15 市 新 町 1-13- 4 ヤマ ト窗琛 サン カマ タ 03 735-1551 〒144 東京都 大田区 西 1 田 7-68-1 サン カマ タ ビル 爾森供 弘前市 土手 町 126- 1 ヤマ ト窖房 本店 03 733 7511 T144 東京都 大田 区* 田 5- 18- 14 脅 森* 八 戸市 三日 町 13 龜文堂 大森职 ビル 店 03-775-3851 干 143 東京都 大田区 山 王 2- V 5 大森职 ビル 岩 手 索® 岡 市大通 1 21 サン ビル 2F 栄松重 ft 店 潘田店 03-731-2241 T144 東京都 大田区 西 ■田 7- 69-1 潘田東 急 プラザ 6F 東京都 渋 谷 区 渋 谷 2- 21- 12 聚急 文化 会館 5F 岩手県 》 岡市大 通2_2_15 三 《 堂 書店 渋 谷 店 03-407-4545 ▼150 老手* 盛 岡 市 大過 2 丁目 大 S 堂 書店 03-463-0511 t150 東京都 渋 谷 区 神 南 1-22-4 宮城県 仙 台 市 中央 1 1 1 旭* 書店 渋 谷 区 03-476-3971 T150 東京都 渋 谷 区 宇田川 町 23- 3 第一 勖銀 共同 ビル B1 宮城 甬讪台 市 一番 町 2 3-32 紀伊國屋 霤店 渋 谷 店 03 463-3241 T150 東京都 渋 谷 区 道 玄坂 12- 2 東 急 ブラ ザ 宮城 _仙 台 市 中央 2 4 6 ブック センター 获窗 03-393-5571 〒167 栗 京都 杉 並 区 天; 83- 3-2 宮城* 仙 台 市 中央 1 10 1 宮城 ビル 内 書 厣 03-313-6267 t166 東京 &衫龙 区 成田聚 4- 39*8 乏万 ビル S 城 県 仙 台 市中 野 字 出花 西 90 1 旭屋 書店 池 袋 店 03-966-0311 t!71 東京 《 ■鳥 区 西; CSVV25 東 it エア キャッスル 10 宮城県 仙 台 市 一番 町 2- 3- 26 三 《 宜 書店 池 袋 店 03-987-0511 〒171 東京都 鑒 ft 区 南 池 袋 V 28-2 池 袋 パルコ 7F 宮城* 仙 台 市 一番 町 3 丁目 1V15 フォー ラス 6f 新栄堂 アルバ 店 03-988-0181 〒171 東京都 璧 JR 区 東 池 袋 3- 12 S 城 典 泉 市 七 北 田 字 小 堤 23 1 新栄堂 書店 本店 03-984-2345 〒171 東京都 體島 区阑池 袋 1-27-7 秋 田 》 秋 田 市中 通り2-6 51 池 袋 西武 フック センター 03-981 0111 〒ワ 1 東京都 鑒* 区 南 池 袋 1 28-1 西武 百 * 店 11F 秋 田! « 秋 田 m 中通り 2- 1-5 芳林堂 書店 池 袋 店 03-964-1101 〒171 東京都 鑒島区 西 池 袋〗- 17-7 山形* 山形 市 本 町 2 4 11 近代 書店 03-601-5721 干 120 東京都 足 立 区 《 瀬 V 39- 11 福島県 播 ft 市栄町 10 11 コルニエ ツ タヤ 内 不動 書店 03-601-2528 03-689-3621 03-387-8451 t!25 東京都 葛 飾 区 亀 有 3 24-2 福島県い わき 市 平 字 2- 7- 2 a 島* 郡 山 市駅职 2 7-15 文教 堂 書店 西* 西 店 明星 書店 東京 本社 T134 t164 東京都 江戸川 区 西 葛 西 6* 8- 7 朝日 生命 ビル 東京都 中 野 区 中 野 5 52-15 フロード ウェイ センター 茨城県 水 戸市 南 町 1 4 24 明 正 堂 中通り 店 西 友 大森店 03-831 0191 03-768-1211 T110 t140 東京都 台 東 区 上野 4 6-4 東京 脇 川 区 南大并 6 丁目 27 25 茨城* 水 戸市 宮町 2 2-31 芳林堂 塞 店 大 井町 店 03 474 4946 t140 東京都 品 川 区 東大 井 5- 7- 13 茨城 典 日立 市** 町 1-12- 9 明 1 害 店 五反田 店 03 492-3881 T141 東京都 品 川 区 西 五反田 13 8 五反田 CS ビル 1F 茨城県 勝 田 市 元 町 6- 11 < まさ わ 書店 本店 0426-25-1201 0422- 21 -8122 t192 東京都 八 王子 市坦町 2- 13 東? 都 式 逢 野 市 吉锊寺 本 町 1 5 1 茨《 県* 島 郡 神® 町 神 柄 1 丁目 4- 33 バル コ プック センター 吉祥 寺 g 于 180 茨《県新治都《村吾鬌38-6 弘栄堂 書店 吉祥 寺 店 0422 221031 0424 87 2222 0427-23-7088 t180 東京 部武 ftff 市吉锌 寺阐町 1 1 24 茨城県 新 治® 桜 村 3- 25- 10 翼 光 害 店 t182 東京都 調 布 市 布 田 町 136 8 抿木噥 宇都 宮市 市〗 H 向町 V 23 芊都宮 ステーション ビル 久美堂 小 田 急 店 〒194 東京都 町 田 市 厣町田 6 丁 012, 21 小 田 急 スカイ タウン 栃木県 芊都宮 市 曲師町 6- 2 文教 堂 書店 0 川 店 0427 35-4117 t194 東京都 町 田市大 « 町 337 栃木* 罕都 S 市 江 野 町 3 -9 文教 堂 書店 小金 并店 0423-86 0161 0423 -43 9229 x!84 東京都 小金 井 市 霄井南 町 1-8 栃木県 小山 市 城 山 町 3- 3-22 文教 堂窖店 小 平 店 T187 東京都 小 平 市 仲 町 439 抿木県 榇木市 室町 6 28 文教 堂 書店 東 衧山店 0423 96 1115 t189 栗 京 部 東 村 山 市 本 町 V 20 1 辟 馬# 舫 橋 市 本 町 Z 12-1 三 成 堂 書店 国分寺 店 0423 25-3211 0425 75-5061 t185 東京 18 国分寺 市 本 町 2 11 5 群馬県 前 機 市 本 町 V 3- 4 東西 書店 干 186 栗 京都 国 5: 市中 1 8 群馬県 前棰市 野中 町 97 くま ざ わ 書店 桜が 丘 店 0423-37-2531 t 192-02 東京都 多 W 市聞戶 321 -3 群馬県® 味 市 問® 町 1 丁目 10* 26 オリオン 書房 ウィル 店 0425 27 2311 T190 東京都 立 川 市罐町 2 〗 1 ウィル 7F 辟 馬**!® 市 _ 町 4 紀伊 S 屋書店 吉祥 寺 東 急 店 0422 21 5543 0422 44 4904 t180 東京 部武* 野 市 S 祥寺本 町 2 丁目 3- 1 群馬県 》 崤 市* 畜町 5 三 畜重塞 店 三* 店 T181 東京都 二* 市 下 逢 逢 3 丁目 28 23 群禹 《 高 蜗市下 小* 町 421 東西 書房 0422 46 >0275 0423-66 3151 〒181 東京都 三* 市 下; 1*3- 45-1 群禹 « 太 田 市 本 町 14 27 啓 文 堂 〒183 東京 部 府中 市 9065 1 群 馬* 太 田 市 飯 田 町 1007 -2 久蘂重 0427 22 2021 t194 東京都 町 田 市 原 町 田 6 丁目 11 10 埤 玉* 川 □市栄 町 3- 8 4 有 《 堂 町 田 店 0427 23 3018 T^BA 東? 都 町 田 市 原 町 田 6 6 14 町 田 シヨ イナ ル 4F 埤 玉# 滴 和 市 仲 町 2 3 20 栄松重 塞 店 憒浜 ジョイ ナス 店 045 321-6831 〒 220 神 奈川谓 橫浜市 西 区 南 幸 1 丁目 5 1 相 ft シ ヨ イ ナス 4F 埼玉県 澜和 市 « 砂 町 1 12 1 損 浜 そこ 〇 フック センター 045 466 2111 〒220 神奈川県 榷浜市 西 区 高* 2 丁目 18 1 堝 玉* 大宮市 « 町 630 大宮 駅ビル 5F ポ ラー ノ癟科 M5 433-7622 于 222 神奈川 浜 市 港 北 E 菊 名 4 3 明 萷裔木 ビル 埼 玉* 大宮 市宮町 1 18 文蕺堂 戸塚 店 045 864 5151 〒244 神奈川県 横 浜 市 戸塚 区 戸塚 町 73 埼 玉!* 所 沢 市日 吉町 12 1 文教 堂 書店 爾霣台 店 W5 983 5150 〒227 神奈川 頃檷 浜 市 好 E 青葉 台 1 丁目 6 13 埼玉県 所 沢 市綈町 1 2 新 所 沢 パルコ 丸* ブック メイ ツ憒浜 ポルタ 店 045 453 6811 〒220 神奈川県 横 浜 市 西 区 高 島 2 〗6 B1 209 袢奈 川两憒 浜 市 西 区 北 幸 1 6 卜 ー ヨ ー坩下 街 埤 土!* 所 沢 市日 吉町 9 24 有 K 重 卜 一 3 — 店 045-311 6265 〒220 埼玉県 川 越 市 W 田 町 3 6 埼玉県* 市 塚 越 1 4 2 有 》 堂 東 □ルミネ 店 有 R 重 伊勢佐木 店 045 453 0811 045 261-1231 〒220 〒231 神奈川県 損 浜 市 西 区 高島 v 16 1 押 奈川頃 憤 浜 市 甲 g 伊勢 佐 本 町 1 41 埼王味 志 木 市 志 木本 町 5 丁目 17 5 •ララ ポー ト 志 木 5 文教 堂* 店 B ヶ罎店 045 373 0960 〒241 »奈 川!! 橘浜市 旭区 a ヶ嫌 2 丁目 30 埼玉槊 上 福 岡 市上 褊岡 1 7 たま ブラー サ有隣 堂 045 903 2191 干 227 神 奈川頃 播忐市 薨し丘 1 7 たま ブラー サ東急 SC 埼玉県 挟 山 市 ift 圃 2798 4 西 式 狭 山 ステーショ ン ビル 中原 フック ランド 044 711 2346 〒211 神奈川県 川* 6 市中 療区小 杉 町 3 1 千 蕖甬千 霣市新 千*〗 1-1 千蕖职 ビル 3F 文教 堂 害 店 小 杉 店 044 711 0018 044 811-5557 〒211 神?,11' 甬 ]::*?币 中原 区 小 杉 町 3_ 414 千* 頃 千霣币 中央 3-17 1 セン ト ラル プラザ 内 ブック センター 文教 堂 〒213 神 宇; ,パ關 市* 漳 区'; « ノ 0305 « 孕. : a 川 崎 市 多 摩 区 生 田 7 丁目 8 4 小 田 急 マル シ I 千 葉 頃 船 橇市本 町 7 11 船 撟東忒 ウィ フ 5F 大塚軎 店 生田职 ビル 044-932-4771 〒214 千 葉 頃 船 榷市莉 原 西 2 18 1 瀵田沼 パルコ 5F 文教 笮窖店 莒前 平 店 044-855-2583 〒213 » 李 川 》 川 崎 市 宮^ 平 1 丁目 11-1 千蔞頃 船!* 市 木 町 4 2 17 文学 堂 本店 044 244 1251 〒210 禅 奈川屏 川 市 川蝎区 砂子 1 3 ニュー ハトヤ ビル 内 干葉 萝柏市 柏 1 2 31 有 K 室 川 崎 店 044 211 1851 〒210 »牵 川!* JII 嵴市 川嶋区 小川 町 1 千 葉 果柏市 旭町 1 1 4 サクラ 醫店 明 ビル 店 0463 23 -2751 干 254 神奈川県 平 塚 市 S 町 1 1 平 塚 明 ビル 4F 千 葉 南東 全市 東 岩 *68 10 サン ビア 2F サクラ 害 店 《 谷 町 店 0463 -23- 5666 0463 -54 2880 〒254 袢奈 州 県 平 塚 市 《 谷 町 10 4 千 葉 两習志 野 布 谷 >fl 161 文教 堂 書店 四 之宮店 〒254 神奈川県 平 塚 市 四之宮 1131 番 1 東京都 千代 田 区 神 田 鍛治町 2 2 9 島 森 畲 店 大船 店 0467 46-3841 〒247 神 奈川頃 倉 市大舶 1-^5 東京都 千代 田 区 神 田 神 保 町 〗 丁目 1 7 法 倉 書店 0467 46-2619 〒247 神奈川県 a 倉市大 «V 24-1 東京都 千代 田 区 三*® 町 1 丁目 3 10 水遒欉 ヒル 1F 藤 沢 西 It フック センター 0466.2 7 0111 0466 82 9610 〒251 神 奈川典 藤 沢 市 藤 沢 3-1 西武 百貨店 6F 東京都 千代 田 E 神 田!? 台 2 8 文教 t 霱店 六 会 店 〒252 坤奈川 県* 沢 市 龜并野 4 丁目 15"6 東京都 千代 田 E 内 幸 町 2 2 1 日本 プレス センタービル 有® 堂 藤 沢 店 0466 26-1411 T251 神奈川県 藤 沢 市 闸藤沢 2- 1 - 1 フ ジ サワ 名店 ビル 4F 東京都 千代 田 区 外 神 田 1 丁目 17 15 抄 藿厣テ ノで 一 卜 伊. 勢 治 書店 0465 -22- 1366 〒250 神奈川県 小 田 厣市栄 町 2 丁目 13-3 東京都 千代 田 E 神 田 神 保 町 1 1 八 小 堂 書店 0465-22 7111 〒220 神奈 川® 小 田 原 市栄町 14 5 東京都 千代 田 区 神 田 神 保 町 1 3 文教 言 塞 店 星 ケ丘店 0427 58-6121 〒229 神 奈川甬 相楕厣 市 千代 田 6- 3 北海道 讁区 紀伊國屋 書店 礼 《 店 01123 1 2131 札 蠼弘栄 堂 書店 地下 教店 011 211-5510 » 窝重 パルコ フック センター 011 214 2301 リーフ ルな にわ 011 221 3800 旭 霪塞店 <1 規店 011 2413007 タイヤ 塞 房 東 店 011-783-3520 011-712-2541 ダイヤ 書房 本店 ダイヤ 害 房 濞田店 011 883 6365 タイヤ* 房 西 店 011-665-6223 フックス 平和 マル カツ 店 0166 23 6211 旭川 S 貴 穿 0166 26-3481 三 畜堂癦 S 旭 店 0166 22 6411 森 文化 望 0138 23 3238 紀伊圃 屋鏖店 小 梅 店 0134 33 1381 裼丰 18 店 0157-23 3330 0155 33-5020 ザ 本屋さん 旭屋 書店 S 小牧店 0144- 36- 5185 東北 地区 岡 田 書店 0177-23-1381 成 田 本店 0177 23 2431 紀 伊围屋 書店 弘筋店 0172-36 4511 伊吉 菌院 0178- 44 - 1917 東 山 室 フック センター 0196-53-6464 さわ や霱店 0196 53 4411 第一* 店 0196 53 3355 フックス みやぎ 022 264 4422 丸 善 仙 台 一番 町 店 022 224 8018 宝 文 重 本店 022 222 4181 アイエ 鏖店职 荊 店 022 264 0718 ブック ス なにわ 仙 台 中 野 店 022 258 3133 金屬堂 022 225 6521 金 港 重 ブック センター 022 223 0979 金 肩 重* 店 022 373 4373 加* 谷 書) g 本店 0188 33-3111 三 瀾 書店 0188 33 8131 八文字 屋 0236-22 2150 若 瀬 書店 コルニエ ツタヤ 店 0245-21 2101 ヤ 7 二 書房 本店 0246 23-3481 東北 書店 0249 32 0379 藺東 地区 ツル ヤ フック センター 0292 25 2711 川 又 塞 店 駅前 店 0292 31 0102 田 所 書店 0294 22 5537 0292-73-1212 武石 書店 マル エス 》* 店 02999 -2- 1233 0298 52-3665 0298 51 1161 友朋 堂 友朋 重 梅圇店 嫵下 書店 釈 ビル 店 0286 24 2550 新 里 堂 宇都 S 店 028633 -2381 落 含 ■店 オリオン 店 0286^34-3777 進» 堂 駅ビル 店 0285-25-1522 大塚書 e 0282-22-0033 前欉 西武 フック センター 0272-34-1011 煥呼重 0272-23 1211 0272-61 5063 戸田 書店 m 店 サカ 砵蘿 店 0273-62-1500 字 隈曹房 0273-23-4055 新 S 堂 店 0273-27-3961 戸田* 店 «« 店 0273-63-5110 ナカ ムラ ヤ 0276 22 2001 曾 根霪店 0276 45 1228 岩 淵 書店 0482 52 2190 涓原屋 0488 22 5321 湧 原® コル ソ店 0488 24 5321 新栄笮 大宮店 0486 44 2345 押 田 a 文 堂 0486 41 3141 0429 28 3271 いけ だ!! 店 所沢达 所 沢/て ル:! プック センター 0429 98 8175 艿 W 堂 •店 0429 25 5355 0492 25 3138 果 田* 店 須原屋 R 店 0484 44 1211 新? 耋志木 店 0484 74 0182 0492 64 2346 果田 上 裼阐店 离原 西武 狭 山 店 0429 58 6501 4 ティ ランド 千 8 店 0472 25 2011 多田屋 セン ト ラル プラザ 店 0472 24 1333 旭 屋畜店 舶橇店 0474 24-7331 芳料重 書店 ,拿 田 沼 店 0474 78 3737 ときわ 書房 0474 24 0750 新 1 重 柏 店 0471 64 8551 西口, S 野虜店 0471 44 2111 多田屋 サン ピア 店 0475 52 5561 フックス 漳田沼 0474 77 2611 荊 田書祕 03 254 1061 東京 重 虜店 本店 03 291 5181' 旭屋* 店 水 ii 檇店 03-294-3781 丸* 御茶ノ水 店 03-295 5581 丸* プレスセンター 店 03 508 2511 03 257 0758 明 正 堂 狄蕖原 店 =6¢ 窗店 本店 03 233 3314 露* クランテ 03 295 0 011 Asm アスキー ブンク チェーン § 060 060 §§ 065 065 065 063 070 070 070 § 047 § 060 053 030 030 036 031 020 020 020 980 980 900 980 963 960 980 981 010 010 990 960 970 963 310 310 317 312 314 305 305 320 320 320 323 328 371 371 379- 370 370 370 370 373 373 332 338 336 330 330 359 359 359 350 335 353 356 350 260 280 273 272 273 277 r227 283 275 101 101 101 -101 rloo -101 r101 F101 〒〒〒干〒〒〒〒〒〒〒〒〒〒〒〒〒 〒〒〒〒〒〒〒〒〒〒〒〒〒干〒〒〒〒〒〒〒 〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒干〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒 1977-1987 おかげさまで 10 周年 アスキー ブ V ク チェーンでは、 アスキーの 出版物を 常備し、 みなさまの ご 来店を お待ちし ており ま 1; 神奈 川* 大和 币 中央 林間 4 丁目 6 3 旭屋 書店 本店 06 313-1191 T530 大阪府 大阪市 北 区 曾 根 崎 2 丁 目 12- 6 神奈 川* 大和 市 東 V4-4 紀伊國屋 書店 梅 田 店 06-372-5821 〒530 大阪府 大阪市 北 区 芝 田 1 丁目 1 3 神奈 川* 橘須* 市 市 若松 町 V 5 姐 屋霤店 難 液 店 06-644-2561 〒& 42 大阪府 大阪市 蘭 区蠢波 5 丁目 1 60 なんば CITY 神奈川県 厚木 市中 町 2-6 K 々重 心* 橋 店 姐屋 書店 アぺノ 店 06-251 0881 06-631-6051 〒542 〒545 大阪府 大阪市 南 区 南 船 場 3 丁目 5 16 大阪府 大阪市 阿部野 区 阿倍野筋 1-6-6 新潟県 新 海 市 小町 26 番地 オーム 社闐西 大阪店 06 345 0641 〒530 大阪府 大阪市 北 区 重 島 1 丁目 5 20 大阪 毎日 会館の 新 新渴市 古町 遢 り を 958 » 々重 京橇店 06-353-3209 干 534 大阪府 大阪市 《 島 区 東 野 田 町 2 138 京阪 モ_ ル 2F 新潟県 新; S 市 万代 13 30 万代 シルバー ホテル 2F ナン ノゞ ブック センター 06-644-5501 T542 大阪府 大阪市 南 区鼸波 3 丁目 7- 20 新 潟* 長 岡 市 大手 JS2-V2 ヒ バリヤ 書店 鼸波 ビル 06 721-9696 〒545 大阪府 大阪市 南 区 ■波 4 丁目 V 15 迟 鉄鶸波 ビル B 冨山栗 B 山 市 砭曲鴒 3 2-24 ユ ー ゴー 書店 06-623 ZJ41 〒& 45 大阪府 大阪市 阿部野 区 阿倍野筋 1 3- 20 富山県* 山 市 騰田町 1- 25-3 ヒ バリヤ 害 店 本社 06-722-1121 于 577 大阪府 東 大阪市 足代 2- 5- 24 V 山 県冨山 市松' 曲 輪 1 M コーべ フックス 西武* WJS 0726-83 1766 〒569 大阪府 《« 市 白梅 町 1-1 西武 デパート 内 富山県* 岡 市 末広 町 40 旭廣 書店 枚 方 近鉄 店 0720-46 3111 〒573 大阪府 枚 方 市 岡 東 町 12 2-101 V 山 県 驀 岡 市瑞楝 町 4 7 水嶼 書房 京阪 デ パー ト 店 0720-51 3432 〒573 大阪府 枚 方 市 桶 葉 a 圍町 14 1 京阪 デ パー ト 石川県 金 沢市片 H2- V7 不二 書店 0720-31 4314 干 572 大阪府* 屋川市 香 里 新 町 7-1 石 川* 金 沢 市 入江 町 2- 174 海 文 重 害 店 078-331 6501 〒650 兵 雇* 神 戸市 中央 区 元 町 *3- 5 10 石川県 金 沢 市 香林坊 2- 11 コーべ フックス さんち か 店 078 391 4749 T650 兵 雇* 神 戸市 中央 区 三宮町 1 丁目 10- 1 石川県 松 任 市璁丸 357 1 日 東 館 書林 078 391 8701 〒650 兵** 神 戸市 中央 区 三 g 町 3- 3 1 石川県 石 川 郡 野々 市 馬ヶ £4- 3 ジュンク堂 書店 サン ノゞル 店 078-252-0777 〒650 兵* 甫 神 戸市 中央 区 雪 弁 通5 3 1 サン パル 3F 福井県 福并市 中央 1-4- 18 ジ ュンク 重 書店 センター 銜 店 078 39 2 1001 〒650 兵** 神 戸市 中央 区 三宮町 1 丁目 6 18 三宮 センター 福井県 福 井 市* Htl- 1-19 小山 助 堂 館 明 石 店 078-911 2501 0792-85 3344 0792-81 2055 〒673 兵 應県明 石 市 大明石 町 1 丁目 V 23 国鉄 明石职 ビル 2 山 契* 甲 府市貢 月 本 町 1429 新 P 書房 ▼670 兵® 粟 姬路市 駅前 町 265 山梨県 甲府市 中央 2 14 7 波 心 重* 店 〒670 兵* 県 姬路市 駅前 町 347 長野県 畏野市 南 千歳 町 841 守 谷 ビル リ 武 フッ⑺ - つかしん 6 06 420 3070 〒661 兵 靡 県 尼 1¢ 市 塚 □本 町 4 8- 1 西武 百貨店つ かしん 店 長 野* 長 野 市 末広 町 1356 S 野 典 松 本 市 大手 3- 3-2 宮并 平安 堂 ■ 中 (S • 四 B 堆区 0734 31 -1331 〒640 和歌山県 和歌 山 市 本 町 17 長 野* 松 本 市 深 志 1-2 昭和 ビル 2F 冨士窗 店 0857-23-7271 于 680 烏 取 県 鳥 取 市 末広 暹 泉 町 164 長野県 岡 谷 市 a®V 1-25 ブック ランド 今 井 書店 音 生 店 0659-22 2377 0859-32-1151 〒683 爲取県 米 子 市 東 福 原字大 沢 542- 1 長野県 飯 田 市 中央 1SU4 2 米 子 今 并鏖店 本 通 店 〒683 裊 取 県 米 子 市 四日 市町 86 長野県 佐久市 大字 岩 H 田 本 町 中央 ビル 今 弁 書店 本店 0852 24 2230 0653 21 0114 〒690 ft 根 県 松 江 市败町 63 聂野》 譟訪 部下 緬訪町 字 湖浜 6141 ブック センター タケ ダ 〒693 ft 根 県 出 雪 市 邊橋町 1196 岐阜県 岐皋市 北 島 971 ブック シティ ミネ ル/ KJS 0862 72-2316 0862 31 2261 T700 岡 山* 岡 山 市 浜 604- 3 岐皋《 岐隼市 神 田# 14 9 丸* 岡 山 支店 〒700 岡山県 岡 山 市 表 町 V 3-50 岐里 W 大垤市 南鳎町 1 丁目 紀伊 S/S 霱店 网山店 086232 3411 T700 岡山県 岡 山 市中 山 下 2 2 1 岐皋典 大垣市 高 S 町 M-1 ブック ランド あきば 西大# 店 08694 2 1511 〒704 岡 山* 岡 山 市 可 知 3 17 53 岐阜県 各 務原市 韉沼西 町 3 菊 川エ塌 w ブック •スクェア 啓 文 社 0864 26 0720 0862 6 4047 T710 岡山県 倉敷 市 老松 町 5 1 13 岐阜県 可 児 市 広 見 1- 34-1 漳山 BOOK CENTER 〒7〇8 岡 山* 滓 山 市沔辺 1150 岐阜県* 山 市 下 岡 本 町 1426 丸* 広 島 支店 082 245-2252 〒730 広島県 広 島 市中 E 本通り 5-8 岐車県 多 治 見 市 若松 町 1 丁目 26-3 紀伊國屋 霱店 広 島 店 082 225 3232 〒73〇 広 ft* 広 島 市中 区* 町 6 27 広 島 センター ビ) U6F 岐皋県 美 邐加茂 市 太 田 町 2535 1 金 正 堂 082 248-3715 〒730 広 *県 広 島 市中 区 通 り 5*9 胖岡* 舴岡市 七 間 町 3 フック センター アオイ 0824 23 8888 干 724 広 島* 広 島 市 西 条町寺 家 6478 1 H 阔典驊 岡 市 吳昍町 2 6 8 サン ト ー ク厲文 K 0649 2 3 9434 〒720 広島県 福 山 市 三の 丸 町 30 1 辟闳索 W 闳市吳 明 町 2- を 5 啓 文 社 三厣店 0648 64 7951 干 723 広島県 三 厣市城 町 9 19 » 岡!*# 岡 市有 賣 2- 201 啓文钍 尾 遒 店 0848 37 5151 0648 23-3100 〒722 広島県 尾 遒市久 保 16-1 舴岡》» 岡 市 曲 金 5 4 58 啓 文 社 尾 11 ニ チイ 店 干 722 広島県 尾 遒 市 天* 町 17 23 ニ チイ 尾 道 ショッピング 辟 岡 県沼洚 市 大手 町 5 分 20 宝 塚 ビル 内 プック シティ 啓 文 社 0649 25 0050 0649 22 3111 T720 広島県 裼 山市奈 良; 章 町 74 2 舴 岡! R 沼漳市 五月 町 17 28 啓 文 社 福 山 店 干 720 広 島* S 山 市 笠 岡 町 1-7 W 岡!! 浜 松 市* 尺 町 309 1 プック シティ ー 啓 文 社 廿日 市 店 0629 31 0772 干 738 広島県 佐 伯® 廿日 市町 佐 方 本 町 7 1 驊 岡!* 浜 松 市 幸 4 151 1 中 野 書店 0832 22 6181 〒751 山 □県下 間 市 赤 問 町 本 通 1 5 驊岡 》 浜 松 市佐鷗 台 1 丁目 11 10 文栄堂 0839 22 -5611 T753 山 □県 山 □市 道 塌鬥 前1 丁目 3- 11 胖岡県 瀵木市 《痊4 6 五十部 《 文 堂 0839-24-6630 0634 31-2346 〒753 山 口* 山 □市 道 塌所 前1 丁目 2 31 驊岡栗 富 士市永 田 町 2 66 藏 嗚席 干 745 山 口!! i® 山 市 ffl 座 1 25 辟 岡 県 焼漳 市焼淖 16-3 京 J5II 店 0636 31 2323 〒755 〒/ 70 山 口* 宇 部 市松* 町 16 25 1»岡 県 掛川市 中央 V18 4 小山 助 字 館 本 g 0886 54 2135 «島《« 島 市 1 番町 3 22 胖岡捵 田 方 部 函南町 C 田 70 1 小山 助 字館 東 □店 0886 25 1380 T770 » 島 頃 诔島市 寺 島 本 町 東 3 丁目 12 8 愛知 頃 名古屋 市千稽 区内 山 3 丁目 28 1 森 住 丸* 0886 23 3228 0678 43 8571 〒770 «* 県® 島 市#* 本 町 東 3 丁目 12 5 f 知 槳 名 古* 市 東 区 東片瑞 町 49 宮 脇 書店 屋島店 T 761 01 香川県 高 松 市 層 島 西 町 1872 1 愛知* 名古屋 市中 « 区 名状 11 2 名 古* 9 _ ミ ナル ビル B2 宮脇霱 店 本店 0678 51-3733 08774 46 8343 干 760 香川県 高 松 市 丸龜町 4 8 愛知* 名 古* 市中 区大須 3 丁目 30 37 宮 » 害 店 坂 出店 〒762 香川県 坂 出 市 文 京 町 1 1 愛知 用 名 古 屋市名 東 区* ヶ丘 143 丸 三 書店 0899 3V 8501 于 790 費* 索 松 山 市* 町 4-6-G 愛知県 名 古* 市 千 相 区'; 也 下 1 丁目 11 1ア 紀伊國屋 書店 松 山 店 0899-32 0005 〒790 愛播* 松 山 市 千 船 町 5 7 1 爱 知!* 名古屋 市中 时 区名职 12-2 近 鈇ビ) U6F 明 層 書店 大街 遵芭 0899-41-4242 0899^41 4141 0897 33-4121 0888-22-0161 〒/ 90 爱找 頃 松 山市大 ifiil2 4 12 愛知県 名 •古屋 市中 区 栄 3 2 7 愛知!* 名 古* 市中 区 《3 丁目 15 13 セン ト ラル パーク 愛知! S 名古屋 市中 区栄 3 丁目 5 12 栄栗 地下 商店? li 愛知* 名 古® 市中 E 大 5*4 丁目 11 巧 上 地下 Hi 明屋 書店 明 1 書店 新居 浜 店 金高 堂 害 店 ■九州 均 区 〒790 〒792 ¥780 愛 《 県 松 山 市漘町 4 6-6 銀 天 街 愛媢* 断 居 浜 市* 池 町 11 34 « 知 県 高 知 市 帚* 町 1 丁目 13 14 愛知* 名 古餍市 昭和 区 鑼人町 7 1 井商屋 フック センター 093 461-0131 093-521-1044 T806 福岡県 北 九州 市八帽 西区黑 町 2 9 14 愛知 典 名 古 屋市守 山 区 市 森 孝 新田 芊元褐 29 ナカり 書店 〒802 « 岡 県 北 九州 市 小 愈 北 区 角 町 3 1-10 甓知県 ■撟市 吳明町 40 金栄堂 093 531 3685 干 802 福岡県 北 九州 市 小 倉 北 区 魚 町 2 4-6 愛知 南 ■攙市 広小路 1 6 旭 層 書店 北 九州 店 093-631-6421 〒806 福岡県 北 九州 市 八 _ 西区黑 崎 町 V 1 1 そこ o6F 爱 知* 岡 峰 市* 生 a 西 2 丁目 20 2 ブック センター ほんだ 092-581 9558 092- 4 311094 〒814 福岡県 裼岡市 博 多 区 諸 岡 3 丁目 8 15 愛 宮市本 町 4 3 1 金 文 堂 朝日 ビル 店 〒 812 褊岡県 福 岡 市 博 多 区 博 多 职 前 21 朝日 ビル B1 愛知 携靈田 市 瞿多町 2 83 り 一ぶ る 天神 092 713-1001 092 721-7755 〒810 福岡県 福 岡 市 中央 区 天神 4 丁目 4- 11-6F 愛知* 薩田市 八 草 愛知 エ蒙大 T 内 紀伊 B 屋 書店 福 岡 店 〒810 福岡県 福 岡 市 中央 区 天神 1 丁目 11 11 天神 コア ビノ U6 愛知* 安城 市 郝幸本 町 14 14 福 岡 金 文 堂 092 741 2106 〒810 裼岡乘 福 岡 市 中央 区 天神 2 丁目 9 110 愛知!* 岡 峽市本 町 邁2 10 福 岡 金 文 重 アニ 7 — 卜 原 092 844 0088 干 814 福岡県 裼岡市 早 良 区 飯] t3 丁目 21 33 愛知 期 岡喊市 戸崎 町 字 池 下 10 1 明 林 堂窗店 箱 崎 店 092-651 7700 〒812 裼岡典 福 岡 市 東 区 》 崎 4 丁目 15 40 愛知県 春 日并市 if 川 町 7 1 褶 文® 書店 新 天 町 店 092 781 2991 〒810 福 岡!* 福 岡 市 中央 区 天神 2 215 愛知 典 刈 谷 市 新* 町 3 43 1 エ マッ クスた がみ 0942 33-1841 〒830 福 岡 薄 久留米 市 天神 田 316 愛知* 刈 谷 市 《 町 1 24 金 文 重 アニマート 春 日 092 582 6770 〒816 襠岡頃 春 日 市 大和 町 个30 愛知県 小 牧市矚 町 40 金蕞堂 北 バイパス 店 好 文 重 書店 0952 32 1965 0958 23 7171 于 840 01 〒850 佐* 県 佐 賀市御 本 町5 30 長 崎* 長 « 市 浜 町 8- 29 三* 携:章 市栄町 3 14 *11 ビル 3F 金 明 堂 ■店 0956 2 2 4214 0956 22-6311 于 857 長崎県 佐 世 保 市 下 京 町 8 3 二 耋甬潷 市 中央 5- 21 博 文 堂 京 町 店 〒857 ft 崎 県 佐 世 保 市上 京 町 4- 4 三 1県 四日 市 市* 訪栄町 3 7 BOOKS まる ぶん 0963 52-5665 〒860 捕 本 県 熊 本 市上 a 町 5 1 醭本県 厢本市 下 通1 7 18 三靈用 鈴廉市 三日 市 字 赤土 田 1039 1 紀伊 8 屋 書店 蘸本 ig 0963 2 2 5531 〒860 滋* 県彦根 市長 曾 根阑町 437 パルコ フック センター大分 店 0975 35 0643 〒870 大分県 大分 市 府内町 1 1 1 滋* 県 萆漳市 大路 1 16 30 宮蝎 寿屋 0985 27 4111 〒880 宮蝎県 宮 崎市钃 a 東 4 1〇 8 京都府 京都市 北 区 北 大路 駅前 田 中畜店 中央 店 0985 24 3511 〒880 宮 _ 甬宮蝎 市孅 a 東 3- 6 19 京都府 京都市 中京 区 河原 町 4 条上ル 吉田 書店 0992 2 6 4410 〒892 鹿児島県 鹿 児* 市 東 千 石 町 15 2 京都府 京都市 中京 区 河原 町 3 粂上ル 晷苑堂 フック プラザ 0992 2 5 3200 〒892 鹿児島県 鹿 児 島 市 千日 町 1 12 京部府 京都市 南 区 東 九 条西山 王 町 31 珠限堂 塞 房 ビル 店 0988 63 3752 〒900 冲 綱頃那 B 市牧志 3- 2 5 ■林 香 五㈱ 本 文教 笙 書店 中央 林間 店 フックス オオ トり 平 坂香屏 WALK 憤 須黃店 有® 重 厚木 店 ■中部 地区 北光 社 萬 松 堂 紀伊國屋 書店 新 避 店 覚張 書店 BOOKS なか だ 豐田 店 瀬 川 書店 文 55 堂 塞 店 文苑 鲞害店 横 田 店 ラつ のみや 片町店 王 格の 本 人 江 店 香 W 坊 本店 松 任 店 王 枝の 本 野々 市 店 膊木 書店 品 川 書店 貢 月明 月 堂 朗月重 平安 堂 畏野店 長 谷川 害 店_ » 林 堂霱店 プック ス ロクサン 笠 原 ■店 平安 f 瘢田店 大販 屋霱店 平安 宜 獯訪店 大洞堂 歧肇北 店 目 由 書房 大洞堂 フックス 258 東 文 重 塞 店 駅前 店 大洞堂 ルー ト 21 鵜 沼 店 三译 望: 可 児 店 中 田鬌店 バイパス 店 三洋 堂 多 治 見 店 丸 圭塞店 吉見 書店 江 崎 霤 店 聆岡 谷島屋 戸田 書店 SBS 店 戸田 鬌店 曲 金 店 S 塚 マル サン 塞 店 吉 野* 浜 松 谷 鳥屋 戸田 書店 幸 町 店 戸田 叢 店 浜 松 佐 嚷台店 戸田 香 店 滴水 店 戸田 書店 菖士店 戸田 書店 堍漳店 戸田* 店 掛川店 戸田 書店 かんなみ 店 ちく さ 正文 館 正文 館 書店 三 右 堂 霧 店 名 古 層 店 パソコン ショップ 1 臼 掃 害 房 西 店 池 下 三 >笨重 早 野 ■店 近鈇 ビル 店 丸番 名古屋 支店 丸善フ ックメ イツ セン ト ラル ノ トク店 日 進 堂 書店 栄東店 日 進 堂上 前漳店 三洋 堂 本店 四 H 菜 三,? 重 99m 祕 又 館 シビ:] 正文 館 文 岽堂霱 店 原田屋 八睪 栄進 堂 日 新 室 書店 ほんぶん 書店 フックス 》 食 觸川 三洋 堂 フック センター 名鹽 三洋 堂 刈 谷 店 三洋 重 小牧店 ■近 鎌蝤区 別 所 書店 11 ビル 店 別 所 書店 本店 文化 センター 白播 シ I ト ワ白播 粍 板 店 天 しん 重 本部 村 岡 光文 堂 大垣 書店 オーム 社 書店 » 々重 京 宝 店 アバ ン テイ • ブック センター 0266-2 0265-2 0462 75 -働 0462 -63- 3856 0468 25 -5537 0462 -23- 4111 0252 28-2321 0252-29-2221 0252 41-5285 0258-32-1139 0764-24-4166 0764-32-1353 0764 24-4566 0766-21 0333 0766 -21-0431 0762 21 6136 0762 91-6504 0762-20*5011 0762-75-7080 0762-46-5325 0776-24 0428 0776 24-0112 0552 浓 7356 0552 32 2200 0262-26 4545 0262 26 2122 0263 32 5340 0263-35-5655 -23-5070 -24 4545 0267 67 4024 0266 28^1111 0582-32-5334 0582-65-4301 0584 81 2553 0584-75-3536 0583 70-2525 0674 63 2334 0577 32 2270 0572 24 0340 0574-25-2281 0542 52 0157 0542 54 4481 0542-54 1301 0542-81-5733 0542 81 5899 0559 63 0350 0559 23 5676 0534 53 9121 0534-74-4762 0534 48-8286 0543-65 2345 0545-51 5122 05462 7 2199 0)372 3 3077 0559 78 7770 052 741 1137 052 931 9321 052- 5 62 0077 052 251 8334 062 774-7223 052-762-2345 052 581 4796 052 261 2251 052 971-1231 052 951 2727 052 263 0550 052 832-8202 052 773 7722 0532 5 4 6688 0532 54 2345 0564 24 0173 0506 71-2181 0565 32 1317 0565 48 8121 0566 75-2028 0564 22 0243 0564 54 1822 0568 32 7806 0566-21-7121 0566-24-1134 0568 73 3462 0592 24 1014 0592 26-3366 0593 510711 05923 -82-5221 0749-24 2112 0775-62 2261 075 414 0770 075-221 0280 075-223-1003 075 671 8998 , 01 02 - . 01 03 •〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒〒一 I -〒 〒〒〒〒〒〒干〒〒〒〒〒〒 -I 丁 107 東京都 港 区 南 青山 6-1 卜 1 スリー エフ 南 青山 ビル (株) アスキー 出版 営業部 TEL(03)486-1977 MSX MAGAZINE HOT LINE ,まついての お問い合^^ 出版物 ソフト ウェア ファミコン アスキー ネット 関連 4 已 6-1 977 486-8080 250-5600 486-9661 •製品 御 購入 後の お問い合わせは . ♦出版物 ♦ゲー 厶 498-0299 • ビジネス ソフト 49 日- 0205 各 ユーザー サボー ト 宛 月〜 金曜日 (祝祭日を 除く) 10:00~12:00/13:00~17:00 •アスキー に対する 御意 見、 ご 希望、 また 販売に ついて お気付きの 点が ありましたら、 お葉 書で お送りく ださい 0 よろしく お願い致します。 亍 107 東京都 港 区 南 青山 6-1 1-1 ス リー エフ 南 青山 ビル 株式会社 アスキー 営業部 (RPG)『MSX マガジン ホット ライン」 宛 新しい 一年が、 スター トいた します。 みなさん、 あけましておめでとうございます。 今年 も、 株式会社 アスキー、 共々 ホット ライン、 それからつ いでに、 ヒト ミを よろしく お願いいた します。 通信販売の お知らせ その 1 MSX2 用 【魔界 島】 通信販売の お知らせ MSX2 用 【魔界 島】 の 通信販売を、 おこなって おります。 通信販売 だけの 素敵な 景品 もつ いて、 送料 無料です。 下記の お 申込 用紙に 必要事 項を ご 記入の 上、 定価 6.800円 を 現金書留 封筒に 同封して、 お申し込みく ださい。 通信販売 (限定 独占) の お知らせ その 2 ファミコン 用 ターボ ファイル 発売の お知らせ アスキーから ファミコン 用 《ターボ ファイル》 が 発売され ます。 この フ ァミ コン 用 (ターボ ファイル〉 は、 現在、 次の ような 機能を 持って います。 1 ) ファミコン 版 「 覇 邪の 封印』 の パ スワー ド, セーブが 出来る。 2) ファミコン 版 『ウィザード リィ j の キャラクタの データ •セー ブが 出来る。 3) ファミコン 版 r キャッスル •エク セレン ト j を 遊んだ ところまで セーブで 吉 る。 この ファミコン 用 《夕ー ボ ファイル〉 を £,000 台の み 限定して、 かつ、 通信 販売の みの 独占 販売を いたします。 ファミコン 用 《ターボ ファイル〉 は、 あな たの フ ァミコ ン システムに 合わせて、 次の 2 つの タイ ブを 発売し ます。 タイプ A : ファミコン 用ア スキー スティック II ターボ 接続 型 本体 価格 2,900円 (送料 400 円) タイプ 巳: ファミリー コンピュータ 本体 接続 型 本体 価格 3,200円 (送料 4 □□円) ■ファミコン 用 《ターボ ファイル》 についての ご注意 ① く ターボ ファイル》 は、 現在のところ 上記の 3 つの ソフ トの 対応で、 これ 以外 のソフ トに は 対応 して おり ません。 ② 今回の 2,0 □□台の 限定 発売に ついては、 通信販売 だけの 独占 販売に なり ま' T。 ファ ミコ ン 関連の 販売店な どでの 購入は できません。 © 電池は 付属して いません ので、 別売と なります。 ■購入 方法 購入 ご 希望の 方は、 下記の 予約 書と 代金 (タイプ A (本体 価格 2,900 円 + 送 料 40 □円)) (タイプ 巳 (本体 価格 3,200円 十 送料 400 円)) を 現金書留 か 郵便 為 替 にて お申し込み ください 0 ■通信販売の お 申込 先 •お問い合わせ 先 〒107 東京都 港 区 南 青山 6—11 — 1 ス リー エフ 南灣山 ビル 株式会社 アスキー 営業 本部 直販部 MSX2 用 『魔界 島』 または 『ターボ ファイル j 係 宛 電話 03 — 486—711 4 直販部 なお、 下記の 申込 用紙は、 コピー や 自作の もので も お受けいた します。 ゲー 厶ソフ トの 発売中 止 および 発売 延期の お耗び アスキーから 発売 予定でした XI シリーズ 対応 「戦場の 狼』 および MSX1 システム 対応 『魔界 村 j は、 発売中 止と なりました。 , また、 FM-77AV 用 1 ■ファンタジー ソーン j の 発売を 春 頃の 発売に 延期 致し ます。 以上、 上記 ソフ トを お待ちの 方々、 関係者 各位に お詫び 申し上げます。 それでは、 不本意ながら、 大 好評の ヒト S 【P】 の コーナー です。 P: といろ わけで、 またも 登場 致しました。 P です。 ヒ: 年齢 不詳の ヒトミ デス 0 P : ファミコン 用 〈ターボ ファイル》 は 買いで っせ。 お客さん。 ヒ: なに ゆ一 てんねん。 P : え 7 この ページ 漫才の ページじゃなかった の 7 ヒ: ばき。 ぐし ゃ 0 ぼき。 P: あんぎゃ一 どす え。 . やっぱり ド ツキ 漫才 やん か/ ヒ: まだ ゆ 一 てんの。 P: わ あ/わかりました 〇 ともかく、 ファミコン 用 r ウィザード リィ』 には、 必要 不可欠 じ ゃ 0 この 《ターボ ファイル > は〇 ヒ: 〈ターボ ファイル〉 がない と ファミコン 版 『ウィザード •リィ J はで きないの 7 P: そうじゃ なくって、 インチキが できない の。 ヒ: インチキ 7 P : パソコン 版では、 リセ ツトワ ザと か 必殺 ディスク 交換 • 無限 キャ ラク タ 増 殖& クローン キャラクタ 作成 S 上がらぬなら 上がる まで 待と ろ HP などが、 で きたんだ けど、 ファミコン 版では あんまし この 手の ことは できない (八 ズ7) だ けど、 この 《ターボ ファイル》 さえ あれば も 3 安心。 レベル 9 9 9 (フ ァミコ ン 版では どうな のかな 7) なんて、 もうす ぐ じ ゃ// . なんてね。 ヒ: ヒト ミよ くわかん〜 な あ〜 い。 P : わからなくて いいの。 正統派 ウィ ザ ドリアンは しちゃい けんこと だから/ でも、 時間がない ひとには、 これが 一番 0 ヒ: ファミコン 版 『ウィザード リィ 』+ 《ターボ ファイル》 で、 最良の ウィ ズ がで き るって いいたい のね"? . .、. P: 本当の 目的は、 別 シナリオに キャラクタを 送 るんで す。 パソコン 版では シ ナ リオ 4 まで、 じゃなかった シナリオ 3 までです ね。 あくまでも、 そのために く ターボ ファイル > ってつ くったん です。 とい ラ ことは . 。 ヒ: あんまし 不確定の ことは 書かない 方が . それに、 MSX 版の 『ウ ィザ — ドリ ィ j は? P : いまん ところ、 パソコン 版の 画面 フォー マツ トに ファミコン 版の モンス タ — キャラクタが はいって るんで すよ ね。 という ことは、 最強の ウィ ザー ドリ ィ j がで き るって 訳 だ。 MSX 2 システムに DISK 版で お 目見えし ます 0 ヒ: やっぱり MSX システムが 最高って わけね/ P : ところで、 PC-9801 シリー ズ用 rCAND 丫 3j が 発売になります。 広告 作図を 見ても らうと わかる けど、 なんと F-14 なんです よね。 VF-1 じ ゃない けど ほぼ、 同じよ 〇 な もんだ。 実は 『サ ー ディ j に 転送した もの も あるんだ よ ん。 ろ れ ピーんだ よん。 >€ 申し込み書 DMSX2 用 『魔界 島 j ロ ファミコン 版 《ターボ ファイル》 タイプ A (ファミコン 用 アスキー スティック II ターボ 接続 型) □ファミコン 版 《ターボ ファイル〉 タイプ 日 (ファミリー コンピュータ 本体 接続 型) 定価 6,800円 合計 代金 3,300円 (本体 価格 2,900 円 + 送料 400 円) 合計 代金 3,600円 (本体 価格 3,200円 十 送料 400 円) ご 住所 ア パー ト 名、 号 室 番号、 会社 あての 場合は 部署 名まで ご 記入く ださい。 __ フ1 J ガナ お 名前 電話番号 ( ) - 毒 アスキー 使用 欄 (ここに 何も 記入し ないで ください) 靥の 三角 地 箒 作 _ とにかく 超 刺激的 難 かし さ、 パソコン ゲームの 枠を 打ち破った 面白さ だと 注目の フォ ー メ ー シ ヨンゲ ー ム 「ジ ャガ ー 5」〇 シュ ー テ イング あり、 パズル あり、 ロマンス ありと、 これまでの ゲームと ひと 味 違う 0 戦い 方 ひとつで も 「フォーメーション」 の 名の ごとく 考えぬ いた 戦略が 必要な の だ 0 ハツ キリ 言って 難 かじ r ぎる。 だから、 キーワードを 少し だけ 教え ちゃう。 さあ、 キミ もこれ て 最終 画面の 初体験を 終えれば、 ちょっと 大人の 気分に なれる かも。 MATSUSHITA こちらは アクション rpg ァドべ 々ャ- マップ サイズは 驚異の 240 画面。 タテ ヨコに 高速で スクロール します。 敵シ ンボ ルに 接触す ると、 画面 はたち まち 戦闊 シーンに c 凶暴、 複雑な 敵 キャラ。 コンタ 外 モードで 情報が つかめます。 アシュ ギーネ 「 復饕の 炎 」( マイクロ キャビン 〉 SW-M003! は 6.800円 /^qJ) こちらは ス-パ- アクション アドべ w ャ- ホラー 映画 m まけの 恐怖の 戦闘 シーン。 剣を 剌 すと、 敵 キャラは 血し ぶきを 上 げ る。 超 デ カ キャラ も 出現す る、 複雑 な 階層 構造の 6 ステージ 180 面面の 大 興奮。 必殺の 制御 球を 操り 敵を 倒そう。 アシユ ギーネ 1 ■虚空の 牙城 J(T&E ソフト〉 SW-M002SS 6,800円 昭 第 第 50 塚 発 (NEW) 本 行 が 社 式 mi ぐ パナソニックが 連れてき たす ごい ヤツ。 あの A1 に 後 雖機が 誕生し ました a 电緒 正しき アソビ の 血を引く パ ナ r ソニック AiMkn。 連射 式 パワー パッドが ついた から、 さらに ゲームに 強いので 负 その上、 独立 10 キー もつ いて. 実 周 性 も アップ 0 ルーレット、 ヒット カウンタ などの 肉 蔵 ソフト も 充実 て、 こんど もうれ しい 29,800円 0 5 わせ や カタ b 恭 适 の 方は; 每琢 •氏名 • - 9円 3.5 インチ FDD を 搭載、 漢字 ROM 内蔵。 Ala ンポで システムに しよ 5〇 FS-A1F IS. 54,80 GR (NEW) 4 4 i 字 番越 ‘is ホ 雄魏磨 菜㈱ .i 摘 鱗 按^. 晌 .係!; ず, cslu ス衫% 赛 心を 满たす 先端技術 一 Electronics 松下電器 産業 株式会社 7 4 1 出 情 戈 版 報〃 営電 5 業 話 ~ 部 ^ 雑誌 1208 卜 01 Printed in Japan 1988 No.50 580 « •円