( 一同 ) 「ははあっ . 』 上文は , どんなふうでもよいから 部の紹介をやっといてくれ , という彼 の希望によるものです . なお , その研究会は , 機械語を中心 に活動しているそうです . くたばれ / オリジナルばんざい / マンネリ . しかし , オリジナル・ゲー ムを作るのは , むつかしい . このゲー ムは , オリジナル度 80 % といったとこ ろです . ・ BA S I C 用自殺プログラム ? 「文番号 ENDJ を「文番号 NEWJ にする ・世界一小さいプログラム ? 10 L I S T ( プログラムの表示をするプログラム ) あとがき 桃が流れて来る所を予知して , そこに構える . 念力を使って , 人間の所に桃 を流す . マイコン内の乱数を調べて , どのように桃が流れるかを調べる . プログラムを書き直して , 点 がたくさん取れるようにする . いいかげんにしろ / このプログラムのリストは , 、、ツクモ マイコンセンター名古屋店″の協力に よるものです . ありがとうございまし た ( それにしても , プリンタが欲しい / 頭カゞ高い / このヒ ラメ・・・しゃなかった . マイコンが目に こにおわすお方をどな 入らぬか / たと心得る / おそれ多くも岐阜大学 マイコン研究会の一員 , 奥村公であら せられるぞ / 』 塗塗塗 MZ-80 K モモタロウ・ゲー 乙 プログラ乙・リスト全 - - - - -4- - . 塗 . 2 自 , ) = 計に ( わ 1 目 REM シンセモをロウ・ - : O ひ 1 自 ( 18 , 1 ) 73 PÜKE 自 ( I + 1 , 煽 目 OEF FN 日 ( ト : ) = 印 : : ト : + 1 , 目 ) + INT ( RNO ( 1 ) * 3 ) + 了 9 74 F ・ロト : E 用 : I , 目 ) , 4 日 4 自 ( 1 ) = 532 斗甞 + 259 75 NEXT 1 5 目 SH = ー・ヨ・ヨ 9 : い = ・ヨ・ヨ ? 7é朝ら 0 LI 日 4 6ü 6 ロ 3 し旧 7 IF TZ = 1 らロ〒ロ 1 19 T こ = 目 ヨ目らロ TO 3 1 1 匸 = 目 1 ト : 2 目 2 : M ソ = 目 : L 自 = ロ 1 目臼 12 「・帽 = 5 24 ら + ? ・ヨ 5 1 1 PF.:INT T 自日 ( 1 ①峠 " ワリテ、、 1 ごらロ SL 旧ら目目 1 目 F ・ RINT 14 F'ÜKE M は 1 ト : 1 3 目 I F こ : H THEN SH = 印 : TI ま = " ら目自 " 1 目 4 目 IF ミ匸 : く引 d THEN Sb.I=SC: 31 T = 5 1 自 5 PRINT T 自 E : ( 1 ) 創」 F. : ミ匸 : ロ RE SC 229 FÜR l=ø TO ? ・ヨ ? 1 PRINT T 自日 ( 1 目 ) HI ら H ミ〔 : ロ : E SH 23 TI=TEI—WAL(TI$) 1 目 79 PRINT T 自 8 ( 1 目 i'IdÜRST 印 : ロ F, : E ・ミい 24 ら F ・ F.INT " T 自日 ( 27 “れイシ TI 1 臼 E : 臼 F ・ RINT を IF TI = ら CIT ロ 27 1 創ヨ 9 PRINT T 自日 ( : 5 " をウイチト・、 三ロスカ : いド ES = 1 : NÜ= ニé朝 NEXT I 1 1 目目 GET I PRINT ”田 T 自 8 ( 27 ) 当 1 1 19 I F I = 1 ら 0T0 1 目 1 12 目 I F I = THEN ENC' 39 O=INT<Z'*P..NO(I)> 1 1 目らロ T ロ 1 1 目 31 目自 ( 7 , 1 ・ ) = ら 3 * 〔ト 224 工トい GET L$ 3 目日ロミ L 旧 2 目目 2 1 IF L ま = " 日 " THEN L 自 = 目 IF MY=I THEN MY=Ü: らロ T ロ 42 IF L ま = " リ” THEN L 自 = ー 1 4 1 目 PÜKE 自 ( , 目 ) , IF L$•="N" THEN L 自 = 1 42 4 IF L 自 = 目 THEN RETLIF.:N 43 目自 ( い = 自 ( 1 3 1 ) ニ 1 目 t'll 帥 1 自 + L 自 44 F ・ロに E 自 ( 1 , 目目 : 1 1 t'12=F ・ EEE.•q•t ・ 11 ) 45 IF F ・ EE に ( 自 ( 自 , 臼 ) ) ) 朝らロ SL 旧 3 目自 : 129 IF t'12 = ららロ T ロ 22 4é THEN 印 : : 目 , 1 ) = 1 7 213 IF M2 = ・ヨらロ T ロ 2 ご 47 F ・ 0 に E 自 ( 目 , 目 ) , 自 ( 1 ) ニ 14 目 L 自 = 目 : RETLIRN 48 毛 05L 旧 4 目 PÜKE 享 4 ・ヨ IF TZ=I 日ロ T ロ 1 自 1 目 F ・ロに E 国 1 は 1 : : く " 5 目 FÜR 1 = 1 TO 6 MØ=MI 51 目らロ引 - 旧 2 目目 RETLIF.:N 心上 0 り 5Z' 自 ( I, 目 ) =FNE: ( I ) IF M ト : = 2 2 THEN L 自 = : RETLIP..N 53 自 ( I , 1 ) = 自 ( I + 1 , 231 鬻 54 目 F 、ロに E 自 ( I + ) 3 32 F ・ÜKE 「 , 1 2 ら 2 55 PCIKE 自 ( I , のリ中 : 1 , 1 ) F ・ CIKE 5424 83 560 NEXT I 234 M リ SI ロ“ - こ目” 57 目 らロ SL 旧 4 目 ← 2359 PCIKE 54246 , ・ヨ 53 IF T こ = 1 らロ T ロ 1 自 驀 236 目 S こ = ミ匸 + 5 自 6 目目 F 〔旧 1=7 TCI 12 らロ SL 旧 5 目目 E ・ 1 日〔旧 L 旧 299 目 L 自 = 目 E. 2 目 . 自 ( 1 , 目 ) = F ト旧 ( い 囓・ヨら RETLIRN 日目 F'OKE 自 ( I + 1 , 目 ) , I F 自 ( 目 , い =e,.3 らロ T ロ 31 ら目 64 目 PÜト :ZE 自 ( I , ) , 13 IF 自 ( い = 24 THEN 印 : : = ら〔 : ー目 了 1 目 E , 5 ・ <T I ご自 2 F ・ロに E PIÜ , 2 目 3 日朝日〔劇 - 旧 4 目 ら 7 目 IF T こ = 1 日 0T0 1 目 3 目 4 目た信 = 292 79 ら FCiR I = 13 TO - 17 自 ( ら , 1 ) = 292 こ目 5 71P らロリ日 5 目 ルる能力はあ・ ) ませんので ( イ 0 ンには , その能力はあるだろうが・・・ ・・ ) , もつばら M Z ー 80K 専用プログラムのみ . マイコンを手足の如く使いこ なせるようになるまで生きておられるかどうか , 心配が先に立つマイコン地獄 ( ノイローゼ ) でアリマスデス . MZ 一 80K 標準装備で , そのバイト数内におさまるゲームのプログラム ( すでに I / 0 誌などで発表ずみ ) があれば人助けと思らておせ一て〃類 ( 大阪・ビギナーおじさん ) はミナ兄弟 / ′ますは , マイコン愛好者先輩諸氏への仲間入り御挨拶 / ′

スターウォーズ・ゲー乙・プログラ乙・リスト 491 目 4 ら 2 目 493 目 4 目 4 ら 4 ら 5 自 斗ら 79 4 臼目 4 目 ? 4 目自目 4 E: 目 4 創 : 臼 4 目 O 目 4 自 E 4 目 F 目 41 411 目 412 41 ご目 414 目 415 416 417 目 418 41 ? 目 41 自目 41 日 41 CÉI 410 目 41 Eü 41 FÜ 42 陬 421 ・ 422 424 ら 42 ら 4270 428 42 ヨ目 42 日目 42 こ目 420 42E 目 42F 43 自 4310 4 了 2 433 ら 4 4 4 こ 5 目 4 こ E. ら 4 7 目 4 了 8 ら 4 了目 4 了自目 43 日 4 こ〔 4 4 了 E 目 43F 44 目自 441 目 442 44 了 444 445 目 44E. 447 目 44 44 ・ヨ 44 自 9 44 日目 4 中 : 目 44D ら 44E 自 44F 目 45 目 451 452 白 453 454 4 目 4 日自 F 匸自ロ 1 〔 : 3 E ・匸 : 4E ・ 21 4E ・ 21 4E ・ 21 [ 旧 FF 4 こ匸 1 : : ヨ [ EO 52 OA 〔 : 4 こ 3 こ 4 .- 心 4E 2 日ら OE. 41 SE C3 こ 4 46 当匸こ自 C.Z' 2F 〔 3 CF 46 こ 0 FE 目 0 匸 : 自 E ・目 4 ら C.O 目自こ 0 目目 34 73 3 ら 4F 43 こ自自 2 41 FZ F6 CZ E. 1 7 目 41 OE 目 5 自 ~ 41 目〔日目 41 18 47 E.5 EB 2E: ら 1 ? C 1 7 こ EB 4 ら 4 ・ヨ 20 53 4 こ 4F 52 45 目 4 ・ヨ 15 4 目 EO 52 1 望 1 1 28 0 EO ・ 52 0 自 55 自 3 [ EO 52 0 自 4 ら 1 こ 41 47 C3 03 EO 52 [ E: 1 斗 7 üC 目 2 47 こ 3 自 7 朝 3 1 1 E5 こ 5 6F 3 こ石 5 自 23 目日 78 FE 14 こ 1 4 自了 5 47 3 自 4F 54 1 ら 4F 4 こ 45 4 7 こ E6 FØ C2 C17 13 4 目自 7 CA 47 ZC' 自 4 7 6F ~ 日 ニ SF 15 4F E2 47 7 ・ヨご 2 40 4F . ーな 1 1 ES 1 4 目 : 4 : ヨ FE 4 CO IE: 目目 1 1 ・ 11 34 こ自 43 FE 1 こ 47 15 48 52 54 1 1 ~ 臼 1 13 55 4 ら 4F 15 4 ら 4F 4 斗 45 53 4F 45 53 0 日 FF 目 ? こ 0 3E 目ら 70 FE 7E 〔に 13 45 45 5 ~ 47 1 こ 49 11 41 4F 5E 13 斗 1 13 F7 52 [ : 嚼日自 48 5 目、 41 4 丁 45 43 5 44 45 ロ匸 3 自 5 ? 45 44 31 ::,:z 48 こ 3 éZ 4 自こ自 13 4 E:3 匸自 EO 1 ニ 4 目 ~ 5F 心 - 、こ自 1 ミ 4F 1 了 45 13 . 58 1 了 4 こ 1 こ 41 13 4E 1 ご 54 13 4 ? 13 4F 13 4E 1 C 4 目匸ら 1 1 こ 4F 1 こ 52 11 4E 13 47 14 F5 [ に E3 13 13 匸 : 2 FA こ 2 FA 匸 : F4 C4 F3 FB FA ロ F3 目 C.3 FC 〔 : 4 1 2 日 自 9 匸 : 3 63 1 [ ) 4 目 43 こ こ日当 ~ 7 日 [ 応 了 4 FC 4 ・ヨ に . こ 4 自 4 04 43 C2 40 匸 : 4 42 匸 2 42 こ 4 4 目 : 1 ロら自ら C.3 と 41 目目こロ 7 1 1 1 0 ヨ 4 ここ : 1 目目〔 : 1 42 匸 : 0 54 13 1 1 1 4 13 14 4F 4E 41 12 1 4 1 こ 14 41 5 こ 45 41 13 1 こ F7 45 1 了 4 52 4F 1 了 11 1 45 1 13 14 . C8 FA 03 1 1 1 4 4 ら 4 こ 0 こ目 44 5 28 0 臼目 1 11 ÜE: 44 13 03 üF 13 8 9 EF 日 4 13 E5 匸 : 1 4 目 4 ら匸 : ヨ 4 E 1 3E 1 ヨ 01 CO 63 4 目こ了 FÜ 03 40 ごこ 1 43 こ 2 こ 3 〔 : こ 4 了匸 : 2 匸 : 自 5É. 15 45 41 1 1 14 13 14 12 1 4F 4E 1 4 52 14 14 13 E:I 1 こ 1 こ 1 了 13 1 1 5 14 13 1 1 14 1 自 44 し心 12 41 4 4 こ 40 自ご自 3 ヨヨ 7E 4 ら 4 E 1 13 目 21 自 7 EO 52 〔嚼 E6 4 目 21 4 目 21 18 目 FE 5 こ CA C:a 匸 : 4 ユ ) 1 1 13 14 1 こ 1 1 1 4 12 1 1 1 4 14 1 4 1 了 11 4F 4 1 55 5 54 11 : 1 13 1 了 1 こ 〔旧 FA OC 1 1 1 こ 1 こ 14 1 こ 4 22 3 3E. 自目 ÜF 67 自 7 C'Z' 匸 0 47 目匸 : 3 48 45 臼目 4 日ご自 3 自自了自 43 43 目 日 4 E5 こ自 5 日 5E: C 1 05 1 E 1 21 7E 41 41 1 1 45 54 1 1 14 1 こ 14 5 40 14 14 13 52 14 54 13 40 13 13 41 13 41 1 1 13 13 28 14 1 ご 13 1 1 14 14 54 〔 : 自日 4 目 FE 匸 : 5 〔自日 7 1 é こ自 12 4 E3 F:3 5E E5 こ 0 3E 目 E5 21 1 1 4 14 1 了 4F 46 12 1 了 4E 4 チ 54 1 4 13 43 。 4 ・ヨ 1 1 14 13 1 こ .- 心 48 41 13 55 54 4 ? 4F 4E 13 5 こ 1 1 1 斗 1 了 1 こ 14 13 4 目 : 1 4 自 4 78 FE 4E L•7E: 目日 1 自 FE 匸 0 〔おユ ) ロ自自目 4 目 FE 匸 2 〔自自 7 4 1 ? 01 40 〔 4 43 匸 : 1 C4 41 1 了 1 4 13 1 1 5 こ 12 1 1 1 4 1 4 14 1 1 13 1 了 1 了 1 了 53 43 13 斗 5 1 1 13 45 43 13 14 4F 目自 21 E6 13 CO ご 43 7 こ E6 44 〔 : 了日 FF 1 こ CZ 0 し 12 5 4F 臼 9 它自 1 自 4F 目目 4 21 50 1 9 こ 3 ロ 4 目ら C4 4 ーこ 4 31 44 FE 21 斗斗 8F üO 14 14 13 FA 1 1 1 了 12 1 1 1 了 14 14 14 1 1 52 4 こ 43 13 13 4E 15 1 ご 13 1 1 1 1 1 4 13 1 4 4é k3C' 7C 4 ご Z'4 01 1 1 43 こ 1 匸 : 3 4 : C2 〔 : 4 匸 4 43 匸 4 自〔 : 0 5 日 4 EI 12 目 1 ご 13 57 14 1 1 13 14 14 1 1 1 4 1 こ 5 : 45 4 55 52 4E 1 1 14 . 」朝 43 4F 52 45 14 13 1 4 1 こ 1 こ 1 1 : 1 1 1 13 14 13 1 こ 14 1 10 1 1 2 自 6F 3 CO 自 6 ÜD 自目 7 12 5 4F 目自ら目 9 目目 8 当ヨ 目 02 OE 了自日 4 它自 3 了自 目こ目目目目目目目目自目 9 ら自ら C 1 4 目 臼〔凾こ 9 ”冖 Eä 71 匸 : 4 5 日 1 斗 14 14 14 13 1 4 1 1 1 4 14 14 1 了 11 47 41 13 45 44 31 14 岶 1 こ 1 14 13 1 1 こ 14 13 E:4 ÜF 15 4 21 1 ? 自 2 と 4 目 47 E6 Fü FE こ 0 0 ヨ OS 5 を三 . 4 こ 43 匸 4 1 ミ 13 14 1 1 13 14 14 斗 3 4 ・ヨ 5 12 14 14 14 13 14 13 1 了 13 1 1 13 1 1 4F 14 13 1 1 こ 14 1 日 4 21 4 斗 こ : こ 44 [ 正 : FF 1 1 斗ロヨ 匸 : こ 02 5 日匸 : 4 4 こ 4 4 こ匸 : 4 4 こ 4 ・ 13 14 14 1 1 14 14 13 1 14 14 14 14 14 1 1 ・ 1 : 1 こ 13 4 ? 丐 3 14 1 1 13 55 11 4 13 13 1 こ 14 1 こ 1 : ー 1 こ Z'E: 1 4 1 12 1 1 FE F8 44 IE 4 ロé. 5 13 E3 21 FE 〔富こ自 AE 4 目 4 ら FE こ 6 こ自 4 し ? 7 目 C:3 3 ロ 1 匸 : 1 こ 4 目 C.-Z C.3 43 こ 3 目 しこ目ら〔 0 自 3E 4 E 1 FE 52 ロ自 E. ら し 2 1 了 1 4 1 1 1 4 14 13 1 こ 14 14 14 13 1 4 41 1 4 13 40 1 こ 1 こ 14 1 1 1 45 5 ? 1 4 1 ] 13 14 13 4 目 4 自 1 ・ヨ 1 1 1 1 44 3E 5 斗こ 2 日当 02 :.E 52 、 こ自こ自了自 3 自こ自こ自 3 自 4C 15 üF 4F ロ自 7 EO 52 70 FE 1 1 ・ヨ CI 1 71 2E 41 43 匸 4 4E 匸了 こ目こ 3 目 7E Eé FEI FE 10 こ自 34 1 1 13 1 52 1 キ 1 4 1 4 1 1 40 14 1 3 1 こ 14 1 4 14 14 14 1 こ 45 1 こ 13 14 13 1 3 1 3 14 1 こ 13 1 了 13 こ 1 14 13 1 1 7E FE 1 4 目〔 : ? 匸 5 , 工 : FE 之・ヨ E 4 目 7 こ・ヨ・ 15 4 目 1 1 〔 : 4 4E 匸目 C:O 1 、こ 0 1 1 53 : 目 53 45 53 14 14 14 1 こ 14 13 54 4F 1 4 14 4 ー 4 こ 45 1 4 4D 45 14 13 13 54 、 5 ? 4F 1 1 こ 4 こ 14 1 1 ー 13 1 了 1 こ 13 14 朝 1 こ 13 1 4 4 自 ロ目匸心 33 目 、 : 日・ヨ目 5 4F üE 目 1 こ 0 É・ 3 4 自 1 ~ 18 目 13 1 1 1 1 13 53 1 了 5 こ 1 斗 14 1 4 14 53 13 42 45 4 1 14 14 14 1 4 13 14 1 、こ 13 4 匸 : 13 14 1 了 13 13 13 1 こ 14 1 1 こ 1 1 14 44 1 ヨ 1 ・ヨ 7E 4 ・ヨこ自 E:S ? ・ヨ目ら 13 7E [ 目自 FF こ 2 FE こ 4 , 1 1 自 3 FE 4 4 ご こ 1 匸 2 こ 4 43 43 1 1 13 1 1 14 1 斗 4 ・ヨ 1 了 1 こ 1 1 1 14 1 1 14 1 3 1 こ 1 4 こ 1 了 11 1 こ 14 4 : 14 を 第 455 ら 4 自自 9 4 自 ? 4 目 8 目 4 自 7 4 自 6 ら 4 自 5 目 4 自 4 目 4 自 39 4 自 2 目 4 自 1 4 自 99 4 ? FO 4 ・ヨ E 目 4 ・ヨ C 4 ? E: 4 4 ヨ 79 4 ? ら 4 ? 5 ら 4 ・ヨ 4 目 4 ? 3 4 ? 2 491 目 4 ら F 目 48E9 4 屯 4809 4 ら日 48 自目 04E 9 4e8 目 487 4E : らら 4 5 目 434 目 4339 482 目 4819 4 らロ 9 47F 目 47E 目 47 [ 虜 47 仁 47 日 47 自 479 4789 477 目 47E , 475 目 4749 473 ら 471 目 47 9 46F 46E0 4 ら [ 4 : 4éE:0 4 ら自 4E 目 4é目 4E.7 46E ・目 4E ・ 5 é. 4 ー - 4 ら 39 462 461 目 4E 目 45F . 5E 45 [ 45 匸 : 45E : 145 自ら 45 ? 45 ら 鶩 斗 57 斗 5E 21 自 5 [ 料 03 PE 13 5 こ 4E, .3C' 〔 : 自 5 自 : 8 ZÉ. 48 2 こ 3 ら 4 ら 1 1 21 11 4 目 35 3 49 3 自 コ 3 5 21 匸 : 1 1 了 6 21 FC ここ FC 匸 3 F 1 45 47 〔 : 3 43 47 SF C.D ご 3 ゴ 21 CZ C 1 斗 3 CZ 40 C4 4 了〔 : 1 自目〔 : 0 58 49 21 45 7 日 45 23 4 目ら目 5 CZ 日 12 4 目 こ 6 43 目 7 E ・ F : 1 ' ヨ 了ら 5F 4 目 47 1 ? 1 ・ヨ E.a 47 〔 : 1 72 48 い 2 自 匸心 5 日 4 E 1 48 自 21 きヨ EE: 目 1 EE: EO SE: 12 1 匸 : 4 目 21 21 42 C4 F3 〔 : 3 F3 目匸 : 3 F3 こ 4 FE: こ 1 FC こ 4 F2 CO 匸 6 目 5 ご 2 4 了 4 こ CI 78 CO 目 3 自 3E ÜC ご 2 こ 0 5E: 4 3 自 40 1 1 45 1 1 46 自 7 CZ 5 日 47 21 、 C.O EE 匸 : 了了 52 匸自 41 : 1 目、 3 自 Æニ 26 21 0 自 [ ) 1 C4 C 1 FE: こ 1 3 自 CO C3 44 C4 4 了 こ 1 〔 : 1 C4 ZE: 5 匸 2 40 1 1 45 46 FF FF 1 ? C..3 É. 匸 : 「 CE: 47 匸自自目 4é・ 44 2 了 36 40 ここ〔 : 4 4é. 1 1 1 1 47 14 13 4 30 日・ヨ CA 自目 4 ~ 1 斗ら目 C6 2 1 1 ・ 12 自こ 01 FE ご 2 こ自 32 48 FE こここ自 33 4 : ヨ FE し朝 1 1 3 らら日 23 ÉE し 3 こ 5 1 1 匸 : 0 58 4 こ : こ EIO FA 目 F 1 匸 3 FZ C3 CZ' F6 ここ F3 当しこ FS 匸 1 FZ' こ 3 FC 匸 3 CI 1 1 1 F 4 こ匸 1 21 75 い 1 C 4 らこ 6 ご 2 04 46 CZ E8 44 8 CZ 目 5 C3 EIC こ 3 目 5 5 うマご E. 14 し FA 4F 7 了 23 72 EE: EO 5 日 7 こ E6 目〔 : 〔 : 2 F6 1 ? 7 ? 7 EE: 81 [ : 朝 1 FF 1 ・ヨ 02 15 40 EO 1 。ヨ 4 こ 5 7 ・ヨこ日 47 FC 目目 C4 FC F4 匸 : 4 F3 〔 : 4 F3 匸 3 F ・ヨ目匸 : こ FC 目匸 : こ 目 21 43 0 43 C 1 42 〔 4 C2 43 C2 43 〔 4 43 FZ 5 日 45 45 45 1 こ 5 - EC 1 1 し自 1 ・ヨ匸 : 了é・〔 : 46 4E ・ 1 4 6F 26 4F 1 1 1 了 1 ・ヨ 7 ・ヨ 7 63 丁ヨ 4E: ・ 15 4 ロ 3E 48 1 1 13 匸 : 2 F ・ヨ FC 匸 4 F6 01 4 ' ヨ CO 4 1 1 43 匸 4 こ 4 1 1 5 ロ了 62 こ一 5 13 1 自 7E FE 目こ自 FE: 4 自 CCI こ日 45 3E E6 F3 21 1 F 目目 4 ヨ目目目üE 7 ? ロ 7 CS E 1 自 01 1 自 C:0 5B ら 1 12 4 自 7 78 01 41 F4 CI 10 49 〔 : ら目 7 了 2 4 こ〔 4 E. 自 12 CE ICI 匸 : 3 4F 5E : こ 5 ら 05 ユ ) •éF 4 日 C..Z F3 1 ・ヨ 〔 : 3 5 ら 47 CO 13 、 4 目匸 3 FE 匸℃ 41 4 こ 0 4 52 こ 4 匸 : 2 こ日 e,4 45 4 こ ) 1 10 03 目自〔 0 5 日 40 42 こ 4 こ 2 43 こ 3 4 ここ 4 4 了 7 自 01 1 自 4 目 E. 新 5 1 こ 12 〔朝üF CIF ZE: 45 21 13 4 こ ・ヨ 1 46 4 目 1 1 5F 17 4 1 1 自日 [ に了é. 57 EB 5 4 6 こ 49 匸 C 1 こé. 42 C4 〔 : 2 42 C2 40 こ 4 42 C2 40 〔 : 4 1 1 ド日 FE 日 4 1 ら 4é ロ目目 5 üE 5 12 1 1 4F 47 ? 1 7 ? 6Z' : 1 4 ら 目 5 4 ・ヨこ日 4 自 FC こ 4 目目こ 3 CZ' 匸 : こ F4 4 匸 2 43 こ : 43 こ 1 1 : 4 FE 目こ自 3E 4 自 FE 臼目 C2 E:S AE 4 自匸 0 6.3 1 匸 : 日斗 5 31 45 5 匸 : 2 ? 1 4 4 〔 EIF 7 自 FE 1 自 ご 4 01 斗 E. 30 匸自 15 4 EO 52 1 E ご 3 4 目イし ÜE 新目こ自 EE; 1 ・ヨ [ ) 自 47 C.O E6 .- 自 3 01 し 3 59 4 甞 23 目 9 匸こ 5 了 2 自 2 目 7 éF ・ 2 ら 19 13 EO 52 02 BA こ 4 C4 FE: こ 1 5 4 自し [ ) 6 こ 49 4 こ 自 4 自匸心 31 5F FE H 01 1 ・ヨ 46 4 72 5E. 72 1 1 7 〔 : 砂 2 目 1 日 44 1 a 1 1 41 F2 F4 こ 1 25 2 こ 6 2 目こ自 43 43 こ 1 1 自 EE FÄ日 1 自 45 13 自 5 し 2 自 5 45 1 ミ 1 こ 78 16 匸 : 自Ü6 4 ・ヨ 匸 : 自 70 1 1 13 81 E5 1 1 41 1 1 51 1 1 12 43 F3 F2 F5 [ : 1 匸 : 4 F 1 こ 4 4 匸 4 こ 4 し 2 4 4 目 C.3 ? 目 48 3E こ 4 4 4 21 12 07 1 ・ヨ - EB 7 ? 52 4 匸 : E6 ロ 7 ら 7 匸 : 17 6F 1 日 CD 3E 45 21 ZE 48 目 1 自 3 [ ) 1 4 目・ヨ 1 7 ・ヨ 18 C.O ZE 4F CA C3 4 ? 1 1 自 4 ? C•.O 匸 4 C2 〔 : こ F4 F3 こ 4 匸 : 4 4 自 ムフ 2 ご 3 ら 14 1 1 46 3 目 43 こ 1 40 C 1 5 45 1 1 1 1 02 Eä 0 了 4 日 [ : 月 自 7 匸自 F ・ヨ 4 ら 1 ? 4 ES 7 こ自 4 らロ 5 E:E: FE 4 自〔自 4 ら EO 52 ゞ、 47 FF EE: 4 ら 17 FF FF ー CO 44 目 こ 0 58 49 匸 3 、 い 5 48 1 ヨ ら 7 42 FC FZ こ 4 FZ C4 1 t' 1 自 4 当 21 4 ら éF 1 チ′ 02 〔 4 1 1 1 ヨ 47 C2 47 4 43 4 こ 45 4 自 C3 : 4 FF 21 1 CO FS カセット・サービス 「スターウォーズ・ケーム」のカセット・サービスを実施中です . \ 3 , 500 を現金書留に同封のうえ , 工学社「 T 係』までお申し込みくだ こ・希望の方は , さい . 43 ーこ 2 ー 39 42

プログラ乙・リスト ・ MZ-80K モモタロウ・ゲー乙 é・ 37 ら PCI ト (E 54 5 , 7 3 7 PIY= 1 : る 38 FOKE 5 斗目田 79 3939 F.ETLIRN 64 目 PP.INT れ田 T 自田 : 2 ら ) T ひ IE 自” 31 目 t'l 鸞 = 65 641 目 PRINT T 自印に 5 ) 分 " 了 1 1 t•IUS I C 当 : 朝 " 642 当 PRINT " 凸 T 自に ) ;"É;C.•CIP.E 129 自 ( 1 ) = 65 ・ 5 目 FÜR I=Ø TÜ 17 3139 「・ = 1 E ・ 51 目自 ( I, 目 ) = 53248 + ・ヨ 7 ・ヨー I + 4 149 RETLIRN 652 t•lEXT 1 4 TO=I.IALCTI$) 653 FCIR I=EI 1 ・ 0 1 4 19 IF T ) ・ 1 ヨ・ヨ THEN T こ = 1 é、 54 ら O=INTC.2+:RNO( い ) 6559 自 ( 1 ) = + C' ー 22 中 + : ( 0 ー 1 ) 4 目 39 F'RINT れ 3 T 自 E : ( ご 4 F : I ら HT ( T 工ま 34 ) E ・ 3E ・目 NEXT I 4 目 49 RETLIRN E 宿 ? ヨ R.ETUF..N 5 目目 PRINT 4 細 T 自田 : 35 “ 7 目 PRINT 第“ を 5 目 1 目 PRINT " 田凸凸 T 自田 : 55 第 5 〔 : 5 29 P.ETLIRN 第 7 ら 2 PRINT T 自日 ( 12 " : + : シ : 産当モモつロウ・ 1 、、 - “ をé当 F•RINT " 医 6 1 PRINT ー 7 目 4 目 PRINT ”凸 3 “ ・目 2 目 PRINT 7 目 5 目 F'RINT T 自日 ( 19 ) : HR は ( ヨ 、必 3 F ・ RINT 7 朝 FRINT T 自日 ( 1 ) 缸 : HF 第 ( 225 “ 694 PRINT “ /. 7079 PRINT T 自日 ( 1 ) : HE : ま ( 1 目目い - ・ 695 自 PRINT 7 8 F ・ RINT E 69 F ・ RINT " /. 79 ・ヨ PRINT T 自日 ( 1 ) : HF : れ 4 工 : 峠 6 目 79 PRINT れ中中中中中・・↑ 71 目 PÜKE 53243 + 48 + 1 234 6 8 PRINT 身 711 目 PRINT T 自 8 ( 11 -. 十丿工チ、 : ー 39 “ : る 199 FÜR I = 3 TCI 15 712 目 F ・ RINT 611 F ・ RINT T 自田 : 1 ら一いい 7139 F ・ RINT T 自日 ( 1 目 ) 旧 - - - ST ロ F ・ " E ・ 12 PRINT T 自田 : 22 + い : を 714 PRINT T 自日 ( 1 目 ) リ - -LEFT" É. 13 目 NEXT I 715 ら F ・ RINT TAB<ID;"N---RIGHT" E ・ 14 F ・ RINT T 自 8 ( IE. ー I : 垰“ / 716 PRINT 615 PR I NT T 自 8 ( 32 + I “第 717 PR I NT T 自日く 1 ら ) 物 - ー - ラロストコロ“ 399 PÜKE 53615 , 7 目 718 目 PRINT E31 POKE 536E , 70 72 目 PRINT “ # 自シ、、 . * ・ 1 スカ ? 一 : 一シテコチイ ) “ é・ 32 F ・ロに E 53 2 7 721 ら GET I$ 339 POKE 53757 , 7 722 目 IF I$="" らロ T ロ 721 34 POKE 5331 7 723 目 F.:ETLIRN ~ E ・こ 5 目 POKE 53 7 ・ヨ , 79 é・ 3É・ら PCIKE 538 ヨ 4 , 7 目 - モモヲモ当 今月の I/O の記事のプログラム カヾカセット・テープで 入手できます。 ☆スターウォーズ ( MZ - 8 の *Tiny PASCAL(TK-80BS) ・カセット・サービスについて I / O に掲載されたものや関連するプログラム のカセット・サーピスをしています。現在取 り扱っているのは下記のものです。 カセット代 題名レ 0 掲載 ( 月号 ) 機種 ( 送料込 ) Y4 , 500 を 79 年に月 MZ-80K/C PALL ( 4 / 25 より \ 5 , 5 ) 2 TK-80BS 平安京工イリアン ' 80 年 2 月 3 , 50C 3 MZ-80K/C \ 3 , 500 4 PC ー 80 田 3 , 500 5 MZ- 80K /C スターウォーズ ' 80 年 4 月 Y 3 , 500 Tiny PASCAL ' 80 年 4 月 6 TK-8æS Y4 , 500 TTLSPJ ☆お待ちどうさま / 2 月号の 『平安京工イリアン * 』が カセット・テープになりました。 TK-80BS * 平安京工イリアンは電気音響株の登 MZ-80K/C 録商標です。 PC - 8001 ・詳細は右記の通り ・あ申し込みは現金書留に ①機種名②題名を記入の上 , 下記宛へ 9151 東京都渋谷区代々木 1 ー 37 ー↑せんらくビル 5F 椈工学社「 T 係』 ー 32

W 匸 5 9 ? ら 5 5 1 LL さ - し 0 u.-1 5- ロ」 5- W っ ~ - メ尸こ負ご 参 ム「一 00 4 ・ 4 4 4 4 4 4 ・ 4 4-4 4 。 4 目 9 - り - り目 ・ LL ム 9 7 W LL 9 0 3 CD ム - 1 4 こ 1 1.n 0 1 ク一 : , : 、ラ ~ マ ) ャ朝 ( 1 11 、よ 1 つん 1 一口 ッ サ 0 4 4 4 ・ 4 4 4 4 4 4-4 生 = 自 IX 0 5 2 5 5 4 1 1 3 5 ら 3 1 日′目 u- - し LL. LL - 一 4 4 4 、 1 4 よ 4 4 目 一こ 2 2 3 ら 3 ? 了 8 3 ョ自 19 - しロしし匸目 1 4 14 にい 4 ↓ 1 LL 4 目 5 ? ~ 5 7 8 5 7 ャ 0 7 にリヤは 2 3 3 ロ・ ` しロ . 4 1 ・ロ . 、よ「 4 イ↓れレ - し 4 - こ LL 匸しーよ〔 4 5 新 1 1 5 ら 2 ヤ LL i.J LL 「 . 1 6 4 目 4 1 1 W 了 0 4 - し - し - し - し - い - し 4 3 4 15 0 匸マ ) 1 11- 3 5 5 ら 3 4 1 “ 1 7 - よ - し - し - し 1 4 5 4 4 1 LLJ ? 4 4 → 0 ( ッつ「 4 2 4 こにャ朝 5 目 1 8 4 1 LL 「 . LL 匸 - し 0 1 4 1 4 4 ー 5 4 4 1 ・ 1 マ 7 ロ 2 5 3 3 0 5 ョ•.Z 8 3 " - し - し ` し「 : し、斗 4 51 4 よ , 人 ( し」 4 1 にー、 1 - しマ ) 8 ャ朝 LL : 18 日目こプ 0 し LL LL u- 「 .5 : り 4 4 4 3 5 4 自こう 3 1 1 1 1 1 u.j 1 「マ ) 4 0 自自 : り 7 4 し〔 - し仁 : し 1 3 4 5 1 4 ロ」ら目れい 2 予 4 1 8 ャ 0 プ 0 7 4 日 2 7 巧、つ ~ - し - し LL - し LL 4 5 5 5 4 5 4 5 フー ` し 4 u- - し - しロ匸 3 匸 1 4 5 5 1 W - し 4 5 ・ 4 4 〔 4 - し 1 斗 5 5 2 W ? 8 し u- LL LL LL 1 4 4 4 5 ャ 0 マニ 0 っー 2 ラ ~ : 予」 8 目プ 0 に」 10 8 9 1 「、 ` し「 1 し - し 4 - -4 1 一 4 4 う 4 -1 、ー 4 - 自ら 9 目 - り目ら 9 9 目自ら - し 0 W LL 目 1 2 こ 4 6 7 ? 自 マシン語プログラムテープに 朝ラベル ! ! ! 今回の R A N D 0 M B 0 X は , T K - 80 B S でリモコン カセットを使っていない人向けなので他機種のマイコンの 方 , ゴメンナサイ . 我らの愛機 B S は , 発表当時はすごいマイコンでしたが , 最近は他機種に押され気味 ( これしきのことでは負けませ ・・ ) . しかし , 機械語によるソフトやハードの改良に んが・・ よってそのたびに , グレードアップしてきました ( 健全な I / 0 読者は小生と同しはす ) . 小生のアイディアもそのうち の 1 っとしてもらえれば I 'm very happy ードの改良はゼロです . ソフトの改良 ( ? ) は小さじ一 杯程度ですみます . 1 . B A S I C モードで S A V E H コマンドと機械語に 付けるラベルを入力する . 2 . B s が " R E A D Y ? " と応答してきたらを押 マ機械語のスタート , 工ンド・アドレスの登録ェリア 84 D A 番地 プログラムのスタート アドレスを入れる 84 D D 番地 プログラムのエンド アドレスを入れる 「スターウォーズーのカセット・サービスをいたします . ご希望の方は , 現金書留で rtvl Z -80 スターウォーズ・カセット」と明記の上 , 下記宛お申し込みください . 定価 Y35 クク ( 送料込み ) 〒 1 引東京都渋谷区代々木ト 37 ー 1 ぜんらくビル 5 F 工学社 T 係 カセット・サービス 朝一 △改良につぐ改良を重ねた TK -808S 通株 UPONKO" した後 , ーキーで割り込みをかける . 3 . 今からが小さじ一杯の味付けどころ . C M コマンド を使って 8 4 D A 番地から機械語のスタート番地と工 ンド番地をキーインする ( 80 系は下位アドレスよりて ・ここでテレコをスタートさせる ( 録音のボタンを すんですよ ) . 5 . T V の画面 ( またはモニタの ) に文字の行列が表 れるまでをキーインしてください . これで無事機械語のプログラム・テープにラベルが付け られましたね . これからはテープをロードして R U N させ るまでは何のプログラムかわからないという悲劇は起こら なくなりますよ ( 小生は 16 進キー用の 8255 を 2 度もつぶし てしまった ) . なんだ , こんなことかと笑わないでください . I / 0 に投 稿するのは , オリンピックと同じです . 「参加することに意 義がある』のです . ク 4 ー 40

ークリコン - ター 名作 Z - 80 フレ活用、好評 IIIZ - い・ RAM48K ノトまて、実装の姉妺機 1117-- 凹 [ 物報ネッ ① ② 4 くシステム構成 > ① MZ-80C ②フロッビーディスク MZ -80FD 標準価格 298.000 円 ③ドットプリンター MZ -80P3 標準価格 168 ′ 000 円 ④インターフェースュニット MZ-80% 標準価格 29 ′ 800 円 システムデスク ( 3 点 ) ⑤ S が 1 標準価格 32.800 円 ⑥ SD-2 標準価格 33.000 円 ⑥⑦ SD-3 標準価格 27.400 円 く別売〉 フロッヒ。ーディスク用 % カード・マス ターディスケット・フラットケープル ドットプリンター用紙 3 MZ-80C 標準価格 268 , 000 円 ( 専用カバーっき ) ・ご相談は下記のシャープ相談窓口で・・ 株シャープ中部 サービスセンター 容 ( 0568 ) 73 - 4649 ⑤ 【愛知県】 ・お求めお問い合せは最寄りの専門店へ・・ 名古屋 北名古屋 半田 岡崎 豊橋 浜松 重 伊勢 四日市 伊賀上野 岐 大 濃 高 阜 竡 飛 山 ョロシク SS ( 052 ) 741-4649 SS ( 0568 ) 73-4649 SS ( 0569 ) 22-4649 SS ( 0564 ) 24-4649 SS ( 0532 ) 53-4649 SS ( 0534 ) 63-4649 SS ( 0592 ) 32-6200 SB ( 0596 ) 36-1100 SS ( 0593 ) 51-4649 SB ( 0595 ) 21-2228 SS ( 0582 ) 73-4649 SB ( 0584 ) 89-5771 SS ( 05742 ) 6-4649 SB ( 0577 ) 33-6761 ・・サービスステーション ・・サービスプランチ SB ・ SS ・ 関東電子機器販売株く名古屋バイトショップ〉 〒 460 名古屋市中区大須 3-30-86 谷 052-263-1629 九十九電機株名古屋店 〒 460 名古屋市中区大須 3-30-86 谷 052-263-1655 本多通商株式会社 〒 460 名古屋市中区大須 3-30-86 谷 052-263-1620 カトー無線バーツ株式会社 ( 電気館 5F バーツフロア ) 〒 460 名古屋市中区栄 3 丁目 32 番 28 号谷 052-262-6471 株式会社栄電社バーッセンター 〒 450 名古屋市中村区名駅 4 丁目 23 番 11 号谷 052-581-1231 北川電子製作所 〒 471 豊田市若宮町 5 丁目 47 番谷 0565-31-7644 【静岡県】 株式会社マルツ電波 〒 430 浜松市坂屋町 390-9 谷 0534-54-2366 【三重県】 冫可合ムセン津ノヾーッセンター 〒 514 津市丸の内 31 番 25-2F 谷 0592-26-0111 有限会社三重電化バーツ 〒 514 津市丸の内 6-8 谷 0592-27-5575 【岐阜県】 アダチムセン 〒 500 岐阜市金町 7-8 谷 0582-65-3378 ハムショップ瀬木 〒 509-72 岐阜県恵那市大井町 291-13 谷 05732-5-5421

、ロ ■底研実を PET ・カーソル上移動を行なったとき . ・カーソル左移動が前行におよんだとき . ・ E 519 を通ったとき . ・実際にスクロール U p が起こったとき . ・ HOME したとき . で , これらが A 3 と同し変わり方をすることはありません . したがって以上の条件の 1 つ以上を満たすと , INPUT の 後で変数に取り込まれるものは , カーソルの指す行の左端 からに変わってしまうことがわかります . これらを実際に試してみたのが写真 1 ~ 3 に示すもので こでは A $ , B $ の 2 つの入力を要求しています . す キー入力時点で , その行が最下段にあったかどうか , また カーソル移動キーを使用したかどうかは写真には残らない ので , 実際には各自でいろいろと試してください . 変数が 1 個のときにコメントを含めて応答が表示されると , 入力 要求のラインとまったく見わけがっかないことが起こりま す . ます , 写真 1 から順に ・ RUN の次の行は , 正常な応答です . ・ 2 つの入力要求に 1 っしかキーインしなかったとき 「 ? ? 』が出ますが , これに第す 0 な」で答えるとスト ップはしないで , 2 つ目は空白を回答したことになります ・キーインが 3 行目におよぶと , 3 行目の TOP からが応 答とみなされ , これも 1 つしかキーインしなかったこ とになり『 ? ? 』が表示されています . ・ 2 行以内のキーインでスクロールしなければ , 当然正 常な応答となります . ・カーソルをいくつか上にあげ , また下ろしてきて元のと ころに戻したのちでも , 応答は行の頭から入ってしま ったことを示す例です . 写真 2 INPUT 文のテスト ( その 2 ) 朝 ー NP リアの問 画面表示の E 3 D 8 もすい分入り組んだルーチンですが , 今後しはしは問題を生したときに参照していただくため , ほとんど全部書いてあります . このうちで A 3 の内容が変更されるのは E 519 というス クロール・コントロール・サプルーチンで , その最初に SEC, LSR A 3 というのがあります ( フローチャート 4 ). これがどうもよくわからないのですが , キャリーをセッ トしても LSR すればサインは十になるはすなので , SEC に意味がありません . これが OR ならサインは一になり ますが , この他に A 3 のサインを負にするところが見当た らないので , A 3 のサインを調べること自体の意味がよく わかりません . LSR して値が変わらないのは 0 だけで , それ以外でスク ロール・コントロール・サプルーチンに入れは , 必す A 3 の値は D 8 と不一致になるので , スクロール UP がなくて も E 519 を通るようなことが起これば , C 6 は 00 のままで E2FC に入っていきます . E 519 ( フローチャート 4 ) を通るのは , ・カーソル右移動によってマージナルを超えたとき . ・カーソル下移動によってマージナルを超えたとき . ・ C R カゞ出たとき . ・一般文字が 3 行目に入ったとき . の 4 箇所です力ゞ , このうち C R ・は F 1 E 1 ルーチンから は入らないことは先に説明しました . また , D 8 の方が変わる場合は , 写真 1 INPUT 文のテスト ( その 1 ) 19 1 NPLI T " TES T い ; 日ま 2 8 PR I N T 白ま . $ 3 ら G 0 T 0 1 日 R E 日 D Y . RLIN TESTO XXXX : イ 9' ト響、響 ?-Z 3 こ , t•lt•lt•l ドト 1 XXXX 、響ここ M 国ト 1 卩 1 「・ 1 TESTO XX ト : : イ 99YY9Z22 こ 2 X XX ? ? 、響トにこ 2 ここ TEST•> ト : : イト : X'A ト ( ド : イイÅ',X ド : イドトト : ト : : イ ::€ : イト : : イマ マ ? 、当ト響 9 ト・ ? ト当 ? ト当ト彎ト . = ・ 1 国 MMMMMMM 習 M 国国「・ 1 国卩 1 TE.STP : イドトを : イトく : イ : イ鸞ト : ト : : イト : ト : ド 3 : イ : イト : 3 ト : : イ XXXY 、響 ? ? 量 ? ? 、トト当ト ? ト当 i トロ 1 いを円ト 1 ド「・ 1 卩 1 ト 1 MM RX : イ : イト : トン : イ : 三ト : ドト : ドト : トット : ト : ト : ト : ド : イト : ト : ト : 3 : 3 ト・ト当当ト・ド、Ⅳ 9 「・ 1 卩 1 ド「・ 1 ドドドド習 ST? ト : ト : : イ xx : イ y. , トト・ ? を当を T つト : ン : ト : ト : トット : : イト : TO XXXXXXXXXX,YYYYYYYYYY T? XXXXXXXXXX STO XXXXXXXXXXXXXXXXXXXX,YYYYYYYYYYYYY TESTO XXXXXXXXXXXXXXXXXXXX T E S T ? 日 TESTO ABCDEFGHIJKLMNOPQR .. +BBCCDDEEFFGGH H I I TESTO ABCDEFGHIJKLMNOPQR HHBBCCDDEE FFGGHHI I TESTP 白白 , BB TESTO B B T E 5 T ? 日異 B B BB 日 B TESTO 白自 , 日 「・ T ? 日白 三 188

頭にはすべて 1 0 が入っている 写真 8 2 つ目から後 , 写真 6 書き込んだデータは長さが正しい ど : :. 一一ゴ ytlu 」ら一一一 : ニニイ : IIJ ら一い lxJ taJ 0 11111 : LiJ . N E ト : T イよ・よイよ 14 ・よ 写真 9 配列を使わすに , 固定長のデータを 書くことを試みたが , やはりおかしい トルトルルルい国国い 1 、 、よロー鷲 - ら一をこ ( し 、よ一ど ・ヤー「 : まイよ 1 1 同 4 4 同 1 興量 1 3 3 き 14 ら一 7 三こ 31E CH R$()3 ) のあとの『 ; 』を省いた場合 , 一見まともに LOAD できるようなので , これでもよいものと思ったので すが , メモリ・ダンプしてみると異常になっています . 写真 5 に示すテスト・プログラムで , 文字 W を階段状に 並べた配列を A $ ( 0 ) ~ A $ ( 20 ) に作り , これを DISK に 書き込みます . そのあとで再び読み出してみると LEN(A$(O)) は 1 ですが , LEN(A$(I)) 以降は入っている文字の数より 1 すつ大きくなっていることが知られます . この余分なものは何かを調べるため PRINT ASC(A$(I)) を行なってみると , 10 ( = 0 A16 ) が頭にくっ付いているこ とが判明しました . これだけの現象からみると , CHR$(13) だけで「 ; 』がないときは 0 D 0 A が出て , この 0 A が次の 配列の先頭に回り込んでいるように思えます . しかも 22 個 目のデータとして 0 A16 を 1 個読んでいます . 文字変数の頭に 0 A がいくっ並んでいても , これらは E 3 D 8 サプルーチンによって CRT に表示される際に無視 されることが , フローチャートから確かめられます . した がってディスプレイは一見正常に表示されるわけですが , 配列の内容には確かに入っているので , 配列の内容を調べ るのに LEFT 関数では見つからず , MID 関数を使わない と取り出せないようなことが起こります . A$(I); とした場合 読み出してみると , 231 個の W が一連となっていることが わかりました . A$(I) とした場合 これを試してみると , 結果は A$(I); CH R $ ( 13 ) と同し になりました . 写真 7 DISK から読み出したものは 2 つ目から長さが 1 多い 頭に 0 A がくっ付いたままで SAVE, LOAD を繰り返し ていくと , 0 A の数がどんどん増えてきます . 「 ; 』を忘れて も , SAVE, LOAD, PRINT とも , 一見 , まったく正常に 働くので , 比較的発見しにくいバグになることと思います . そのため , あえて 1 章を設けて注意を喚起した次第です , 写真 6 ~ 9 は ( 筆者自身このバグに手を焼いたので・・ このトラブル追求の涙なくして語れぬ経過です ). すごく時のかかる F E 第数 ( 小噺その 3 ) PET の文字変数配列の処理能力は , 1 変数につき 255 バ イトまで , 要素の数はメモリの許す範囲で無制限です . ま た , 次元の数は 256 まで ( とはいうものの事実上 214 を宣言 しただけでメモリ・オーノヾーしてしまうから , 文字を入 れたらもっと小さな次元しか取れないが ) と , 自由度に富 んでおり , 優れたものと思います . しかし , 一度定まったサイズが後でより大きいサイズに 変更された場合 , メモリが無駄な使われ方になるのは避け られません . このため , 変数配列を使っていて FRE(O) で メモリの余裕を調べる処理は非常に複雑です . 配列の要素 の数が 200 ぐらいでも , FRE(O) の関数の処理時間はたつぶ り数秒かかってしまうことがあります . 913345E7 三ロ -1111 : 1 : : : 1 こ一とこ 情新システム の DISK べースのノヾーソナル・コンピュータで , プログラ ムが容易で , しかもその能力をフルに発揮できる用途とし ては , 何といっても情報検索があげられるのではないかと 思います . マイコン関連の書籍および雑誌が , 月々 10 冊はどすっ刊 行され蓄積していくと , そのなかから参考になる記事を捜 すことに時間を空費するのはなんとも無駄な話です . 191

: 好評 OOACE シリ→ゞ 一体成型により使しく : 。 S@Ä@MIOOACEIII、Ⅳ ! ・カラーグラフィックがつかえる ( Ⅳのみ ) ・ AIO 、 0 がついた・ RS232C ー ・ 10 キーがついた。 ニフロッピー ・ SIOO パス・ CPU .48K パイト・ミ くカラーグラフィック > MIOOACE Ⅲ *470,000 2 回目以降 機種頭金初回金 19 , 400 X29 20,200 Ⅲ 15 , 200 X29 IOO,OOO 1 8,000 MIOOACE Ⅳ *550,000 2 回目以降 機種頭金初回金 22 , 600 X 29 26 , 600 Ⅳ 18 , 600 X29 IOO,OOO 1 8,600 M 100A ( E Ⅳ 最大記慮容量 1.4 メがヾイト、事務処理とオンライ 0 、 0 、 SIO 、 HP-IB ・・拡張性高いマイコン ンに徹した M200 シリーズの低価格傑作モデル -223m0 「 k Ⅲ ・ CPU : Z ー 80A ・メモリー : 64KBRAM ・外部記 ・ CPU:Z-80A ・メモリ—:64KBRAM 、 8KB ユー ニフロッヒ。ーテスク 1 台、 憶 : フロッヒ。ーテンスク 4 台、ミ ザース ROM 工リア・外部記憶 : フロッヒ。ーテンスク 350KB ・ CRT: グリーン文字、 12inc ト 80X24 行・ 1 ~ 4 台、ミニフロッヒ。ーテンスク 1 台、 350KB ・ CRT : キーポード : JIS キー BASIC コマンドキー・ グリーン文字、 12inCh80X24 行・キーポード : JIS 「 1 ロロ・ 拡張 BASIC 、 BASIC コンパイラ、フォートランⅣ、 キー BASIC コマンドキー・言語 : 拡張 BASIC 、 アッセンプラ、コボル・シリアルポート : RS -232C BASIC コン′ヾイラ、フォートランⅣ、アッセンプラ、コ ポル・シリアルポート : RS ー 232C ・ S100 バス ・ S100 バ、ス M203ma 「 k Ⅲ \ 836 , OO M223markIII \ 1 , 236 ′ OOO ( 1 ヶ月のリース料約 Y29 , 000 ) ( 1 ヶ月のリース料約 Y19 , 000 ) 優れたハードの機能をアレに生かすソフトサポートの拠点 べーシック・イン東京が一層便利に、また水戸にもべーシック・イン開設。 べーシックイン水戸 べーシック・イン東京べシック・イン神京川べーシックイン大阪 〒 105 東京都港区新橋 4 ー 28 ー 4 〒 231 横浜市中区寿町 1 丁目 1 ー 8 〒 541 大阪市東区安土町 1 ー 13 〒 310 水戸市袴塚 2 ー 3 ー 44 創 292 ( 26 ) 0116 トラック会館 5F 45 -641 - 四 85 銭屋第 1 ヒ・ル 6F 容 -271 -6521 芝庄ビル創 3 -436 -3091 8 S ′ C 加” 水戸駅より 4 M223E0 「 k Ⅲ M203E0 「 k Ⅲ - べーシック・イン べーシックイン 月 ~ 土曜の毎日 9 : 00 から 17 : 00 まて お気軽にお立寄りください。 ( 第 2 、第 4 土曜日はお休みてす ) 至水戸駅 ※個人の方には便利なクレジットのお取扱い もいたしております。是非ご相談ください。 文 附第中 茨域大学 日 AS に福 城大学より国 Om 店 国画 ] 号 至す新宮 31

システム作クな こんなことで目ったあなたかコンビュータの ことはありませんか ? 専門家である必要はありません。 ■研究室で計測システムを作ることになったけれ ど , コンヒュータの専門家がいない。 ■会社でコンピュータ制御をした方が良い結果が 得られそうだけれど , ニコンでやるべきか , マ イコンで充分なのか全然わからない。 ■現在のシステムを自動化したいけれど方法がわ からない。 ・データ処理を合理化したいけれど予算が足りな ■あなたには専門があるはずて、す。 電気 , 化学 , 建築 , 心理学 , 社会学 , デザイン , ファッシ ・・ etc. その上にコンビュータの専門家てあるというのは理想て、は あっても現実的てはありません。あなたがやらなければな らないのは , あなたの専門分野にコンヒ。ュータを導入する 目的をはっきりさせることて、す。 そして , それをコンヒ。ュータの専門家に相談することて、す。 ロ D 江 0 要第 - 電■・ - 興・■ A 第 0

圧い自 : 阯 ) 了 OF E2 3 ロ E7 ・ 当 E 自 .3D Ø3EE 0 ø.3EF 3 ・ F2 ZO F 蕊 3F E. ら了ド F 23 4 自 04 1 4 : ・ 7E 416 CF 417 ら ら 418 目 41 41 い 07 9421 9425 07 42 ? 07 ら 42 い 07 4 1 4 了 D C9 441 44 FB 9458 9478 4 必 48a ら 4 94 自 E. 4 ~ 4 自 9 BF 94 自自ØF ー 5 2 1 CE•; C 自 1 自 4 03 こいこ自 1 臼 4 事日 C 自 : を重 4 C 自 F 「 : 自它 ロ 1 朝目 Ø3EE.: 匸自 自 2 自自 4 自 2E 4 ø.3Fü C.OE ( 当 当 FB 2 自 7F 甞 4 77 7C FE8E1 40 こ、 . C: 自 1 甞を 04 é. 223F84 040 自 279 4 4 こ : 3 旧ら 41 ら CC' ら C 2 941 C054 941 自 0 蕊 D 2 ら 41 E 匸 04E ら 2 D7 9422 CD.32 ら 2 ら 426 CD17 2 ら 42 自に 02 ア 92 42E COIF 2 07 4 2 3 自 E27F り 4 7 C2E3 1 943 自 C038 3 43E C032 ら 4 FB 9442 C.36.± : 92 9445 CC.' 了 2 4 9449 C 7 2 944C C032 4 944F CD2D ら 1 9452 21 匸 37F 9455 C 7C ら 2 引 : : 日 FEOÄ 94 自 E E69 ア 死 : ド E7F の 483 3E91 い 5 DÉ. 1 ら F ら広ら 17 ら 5 お E 3E11 LHLD 8 斗 RF CALL ら 4 自 3 自 583 3EIF ② 589 FEFF CALL 94 自 3 SHLD 8 ・ ?F 58E 3EF 1 . JMP 38 ・ヨ CALL ら 4 自 3 CALL 54 ら 4E 自 3EFF STA 3 斗 71 CALL 24E CALL 2 事 2 5 自し 3EFEf CALL 9217 4F 自 FECØ CALL 227 ら 585 FEFF CALL ØIEE E15E:F 3EC•iF 435 FE2C CALL 91 EE CALL ら E : CALL 432 CALL ら 4 2 CALL 5 らら CALL ら 40E. CALL 912D CALL ら 40C CALL ら 5 ら 1 5 ら 7 EID ら CALL 94E3 4E ・ 0 OC 94 ら : : : ら 7 G.IF 4 3E 3 1 4 45 SHLD 7F ・ E 自 5 5 22 4 3 朝 5 953 〔 : 3E 它 6 49 9 SHLD 7FEA 94 自 7 EÉ・ F8 . JZ CP 工 . JZ CPI J? . JZ C.ICR BCR JZ DCR JZ 自 01 CALL 国 0 リ 1 ト ( CF ・ I . JZ 国 0 リ ST 自 CALL RST NCIP NÜP NCIF' tÄLL RST RST RST RST CALL RST LDA CP I J トに P.ET EI JMP EI 'IP CALL LXI JMP 41. 自 041 ら り 41E 朝 42 霎 ら 42 自 ロ 42E E ・ヨ ト 1 , 自 9 自 1 E: 自 , M 84 ヨ 1 23D 2 2 2 2 221 F 2 7 ト E2 2C ら 1E1 ら 2É・ 8 ら 2 ~ ら 432 Hi 7F 匸 :. 94 FØ 97 目 4 自 F4 18 29 , 479 93 0 ら 4 4C 64 EIF 25 9498 らら目らら ØC 94 自了 3 自 6F84 らら 9F 5 @C 9 ら RP.C RRC AN I FS OU B,A LDA 84 ら F ら 4 自 0 78 482 4 「 目 4B5 ØF 94 印 ; 5 ら 48 自 F5 の 488 C5 94C2 ~ 94C5 C らら 1 94C3 57 04C8 15 Ø4C:C 9 ら 40 CI ら 401 4D3 ? 94D4 Fi 9405 0 ヨ i0409 BS 4D 自 77 ら 408 C9 を 40F ZF ら 4E 自ら 94E 1 4E2 C9 94E6 自 6 04EF C9 04F9 EF 94F 1 94F4 EF 04F8 ら 4F9 94F DS 95 ら 9 78 9513 7 951 自 C9 ら 521 C9 ら 528 「・ 9 538 C9 9541 ら 544 C9 254E BE 48 〔 : 6 ら 9487 C28524 048C 21 E957 第 Ø4BF OIEOFF 3 自 7 84 94C9 C 自 0994 ら 4 〔 : ロ C3C.E:Ø4 ら E 心ら 94D ら C:O 自 394 ら 4 [ 心 CO 自 3 ら 4 77 ら 4E3 仁 DP394 4E7 CAEC04 4EC 32 ア 184 C32 01 目 4F5 C3FFø1 4F0 C3E3 ら 1 5 らら C084 新 6 95 3 21 E37F 95 ら COEEEII 5 ら自 326F84 5 ら D 21E67F 51 自 CDEE@I 514 COF'AØ4 臼 517 327 ら 84 9518 CD ら 5 951 E CD0604 9522 CO らら 5 6525 C.DDC94 52 ? C.oøら 95 52 匸 : CDE 蕊ら 4 ら 52F C 自 39 5 95 2 21 ら F E 0535 22E 自 7F 539 219F9 ら 95 E 22EA7F 32E ?F ら 545 ら 1 らら 3 9548 21 E. F84 954 日 3 自 7 丐 84 0 円 0 リ ANI AD I MO リ 沖町 RP.C DCR .J トに PLISH PUSH 日 LXI LDA AD I ・ 1 国 0 リ DCR JZ DAD . JMP F ・ÜP リ I DAD POP RET OF : 自 MO リ RE T C 国自 自 N 自 円 0 リ RET 自 N 自 JZ 国リ I RET RS T JMP RS T NÜP NOP CPI RC JMP CAL L LXI O リ ST 自 ~ LX I MO い CALL ST 自 RET R ET CALL RET JZ LXI RET LXI MV I 三 T 自 RE T LXI LX ー LDA 、 CMP ら 1 自 , ら 1 8 0485 PS い H' 57E3 8 , FFEO 847 当 ら 4 〔 8 94 亡 8 B き 9 ら 8 PS い 04EC FF 5 912 5 ØIFF CØ 91E3 ら 684 H*7FE3 846F H , 7FE6 A,B 4F 自 847 ら 95 ら ら 539 H' ØE.ØF H* 6 ら F ?FEC H' 846F 8475 553 7E 554 92 它 55 自 9 ら 55E 2 562 BE 956 ら 5 ~ 25 ら 7 7E ら 56 甞 92 95 ら E 96 9572 78 957 甞 79 9588 79 9598 ?E ら 59 匸 23 5 ・ヨ D BE ら 5 自 1 95 日 1 ら 5e4 79 目 58 自 3E 自 1 目 5 4 」 5 7 4 ら ら 5C8 77 95C 〔 : 28 5 仁 D 95 匸 : E ら 501 50 斗 0 ら自 2 5 [ : 噌 95E ら C ・ヨ Ø5Ei 5E4 、ド E 5E5 3 仁 95E9 7 ~ ら FE 自 23 色 5E 日 BE ら 5F8 86 5F9 9555 06FF 557 C358 5 558 327784 ら 55F 3 自 76 容 4 95 ら 3 026E 5 自 5E ・ 9 EIEFF 95E ・ E : C 了 6F ら 5 の 5E. F 32 ~ 984 57 FEFF 95 ~ 5 亡自 88 ら 5 9579 FEFF 57 日亡自 8 当当 5 058 C3 ・ヨ 595 ら 585 C395 5 . ら 58B C 自 93 曽 5 自 59 ら C 95 ら 5 ら 59 3EFF 595 327384 ら 598 217784 59E D 自日 495 78 35 自 2 FEFF 5 自 4 〔 : 自自 C 5 ら 5 自ド 3E1 5 自 9 C3 自 E ら 5 05 自 E 2 ~ 434 C3CE 目 5 587 C.ABFL3.5 58C C3CI ら 5 らäC し ~ 327484 21 ~ 旧 4 5 匸お自 7784 21 99 : 自 ~ 784 9506 [ 吶 C'D 5 ZC ら 50 自 C.3D4 5 50 い 227584 21 薇 ; : 4 ら 5E6 C 自 5 自らら ø.5EC C 自 F295 Ø5EF D25 ららら 5F2 217584 5F5 3 自 7884 MO リ 5 リ 8 国リ I JMP SU 日 STA I NX LC'A CMP . JNC 0 リ MO リ 5 リ 8 MV I 、 JMP 5 リ 8 ST 自 O リ CP I JZ MO リ CPI JZ 川 . JI . JMF' MV 工 JMP 0 リ CP I JZ 国リ I ー JMP を 1 リ I 5 'TA LX I MO リ 1 NX CMP JC MOV CP I JZ MVI 引 , IP 河リ I STÄ 田 4P MO リ CPI JZ JMP 円リ I ST 自 LXI 国ロリ LOA 国ロリ 0 仁〉く LX I LD 自 5 リ I JC I ト振 引・ IP SHLP RET LXI PIÜリ IN ト : JZ 国 0 リ 1 NX CMP JZ . JNC LXI LDA ADD 国 0 リ B,FF 0558 8477 847 ら 95 ら E D,A ロ , M 0 C , FF 956F 8478 FF 588 自 , C ー FF 583 自 , 1 1 9595 年 1 F 595 自 , C FF 593 自 F 1 り 595 A'FF 84 冫 ' 3 H , 84P7 584 FF ら 5 自 C 自 , 1 95 自 E 自 , FkI 84 ~ 4 E15CE A,C FF 58F 自 , 1 5C 1 自学当 F 84 ~ 4 H' 84 B け・ 1 847 3 3 自 H, ら 84 ~ 7 ら 5 い 0 5 〔 ) 4 8475 H , 847 ら 自は 1 ØE. 59 95F2 965 H , 8475 8478 54F ー 025P95 こ ; NC, 。 55 自