注意
| １． | 営利を目的としない限り、本プログラム、及びマニュアルを、許可なく複製、改造してよい。但し、プログラム（及びマニュアル）を改造した場合は、著作権所有者名と、改造者名を併記すること。 |
| ２． | 本プログラムを運用した結果については、著作権所有者は責任を負わない。 |
本システムは、少年サンデー連載中の漫画「うる星やつら」の、エピソード・キャラクター・マトリックスを作成し、種々の観察を行なうものである。
エピソード・キャラクター・マトリックスとは、縦軸にキャラクター（原則として登場順）、横軸にエピソード（原則として発表順）をとった２次元配列で、配列の各要素には、そのエピソード（ex.「かけめぐる青春」）に於けるそのキャラクター（ex.「諸星あたる」）の属性（ex.「Ａ」。意味は後述）が書き込まれているものである。この配列を、横方向に（即ち、キャラクター別に）、又、縦方向に（即ち、エピソード別に）、スキャンするなどして、様々な興味深い出力を得ることが出来る。又、キャラクターの多重検索機能を用いて、エピソードにアクセスする（ex.「お雪」と「弁天」と「ラム」と「蘭」と「レイ」がいたあの話を読みたいのだが、何巻に収録されている何という話であろうか？）ことも可能である。
以下、本システムの応用例を列挙する。
| １． |
特定エピソードに登場したキャラクターの出力。 （ex.「かけめぐる青春」に登場したのは誰か？） |
| ２． |
特定キャラクター（単数、複数）が登場したエピソードの出力（キャラクターの多重検索）。 （ex.「校長」と「コタツ猫」が登場しているエピソードの一覧表。） |
| ３． | 全エピソードの一覧表出力。 |
| ４． | シーズン別のキャラクター・ランキング出力（後述）。 |
| ５． |
キャラクター、又はエピソードの間接検索。 （ex.「あたる」と「終太郎」と「飛麿」がいた、あのエピソードに登場していた、あのキャラクターの名前を知りたい、そして、そのキャラクターが「蘭」と共演していたあのエピソードの名前を知りたい、読みたい！） |
| ６． |
特定キャラクターの消長。 （ex.「四人組」は、「終太郎」の登場と共に姿を消した。ex.「しのぶ」は、最初は主役級であったが、「蘭」の“危機一髪シリーズ”から始まる半年間、殆ど姿をみかけなくなり、その後、ゆっくりと回復した。云々） |
等である。
本システムの走行環境を以下に示す。
| １． |
ＰＣ−９８０１／Ｆ／Ｅ（本体）。 （ＲＡＭ １２８Ｋｂｙｔｅで動作可能（コミックス１９巻までのデータ入力時）だが、２５６Ｋｂｙｔｅ以上に増設するのが望ましい。） |
| ２． | ＰＣ−８８５３Ｎ、ｏｒ、ＰＣ−ＫＤ５５１、ｏｒ 相当品（カラーモニター）。 |
| ３． | ５インチ ｏｒ ８インチディスクドライブ（ＰＣ−９８０１／Ｅ 使用時。１ドライブで可）。 |
| ４． |
ヴァージョン１．０では、プリンタをサポートしていない。 |
以下のファイルが収められているディスケットをドライブ１にセットし、Ｎ88日本語ＢＡＳＩＣをブートする。
URUSEI
URUSEI.EPS
URUSEI.CHR
URUSEI.MAT
URUSEI.VER
usfont.n88
RUN"URUSEI"<RET>（以下、“<RET>”はリターン・キーを、アンダーラインは、その通りにタイプすることを示す）。
続けて、ハードウェアの内蔵クロックが保持している日付を表示するので、直す必要がなければ、<RET>。直す必要があれば、表示に従い、８桁の文字列をキーインする。時刻についても同様。
本システムは、データベースがアップデートされる度に、その時の日付と時刻をヴァージョンＮｏ，としてアップデートし、終了時にファイルに書き込む。従って、単に出力するだけであれば、内蔵時計が狂っていても、直す必要はない。
各エピソードに於ける、各キャラクターの属性を、以下の様にして決定する。
| Ａ − |
そのキャラクターがいなければ、話自体成立しない。 （ex.「かけめぐる青春」に於ける、「あたる」と「ラム」。「ラムの父」は、判断が分かれるところである。） |
| Ｂ − |
何らかの形で、話に参加している。例えギャグなどに関与していなくても、セリフ、動作等で、話を先に進めている。 （ex.「かけめぐる青春」に於ける、「錯乱坊」、「しのぶ」、等。「しのぶ」がＡでないことに注意。この時点では、まだ三角関係が明確でなかった。） |
| Ｃ − |
コマかせぎ。 （ex.「かけめぐる青春」に於ける、「だっぴゃ怪獣」。） |
| Ｄ − | 余白ウメ。モブシーン等にまとめて登場することが多い。 |
| Ｅ − | 登場せず。 |
各エピソードに、必ず、属性Ａのキャラクターがいるかというと、そうではない。みんなでワイワイ騒いでいるタイプのエピソードでは、どのキャラクターを抜いても、何とか話が成立してしまう、ということがめずらしくない。
又、属性Ｃ、属性Ｄのキャラクターも、必ずしも存在しない。逆に、属性Ｂのキャラクターは、必ず存在する。
属性の決定は、多分に主観的なものであり、人によって判断が異なって当然であるが、一般に、下記の基準に従って決定すれば、それ程大きなくい違いはないと思われる。
| １． | まず、属性Ｄのキャラクターをみつける。（端に隠れていることも多い。）セリフをしゃべっていれば、Ｄではない。又、数コマに渡って登場していても、その他大勢としての役割しかはたしていなければ、Ｄである。 |
| ２． | 上記以外の登場キャラクターは、全て属性Ｂと仮定する。ここで、各キャラクターを順に、消してみる。もし、話が成立しなければ、彼（女）は、属性Ａである。 |
| ３． | 最後に、属性Ｂと属性Ｃの分離であるが、これがも最も微妙である。２．同様、各キャラクターを順に消してみる（今回は、とにもかくにも、話は成立するはずである）。このとき、話に大穴があくか、大切なギャグが一つ消えてしまうか、または台無しになるか、あるいは、話の進行が不自然になれば、Ｂ。１コマ、２コマ使えなくなるだけであれば、Ｃ。 |
更に、
| ４． | ゲスト・キャラクターの属性は、一般にＡである。 |
ということもできる。
以上に加えて、筆者は、
| ５． | 平安京シリーズ、宮本武蔵シリーズのような「学芸会」では、属性Ａを認めない。即ち前者では「ラム」が、後者では「温泉マーク」が、一見、属性Ａであるが、属性Ｂとみなす。 |
| ６． | 「惑星教師ＣＡＯ−２」、「失われたモノを求めて」三部作のような、“少数のレギュラー陣の集団の演技”で話が進行する場合には、全員の属性をＡとする。即ち、前者では、「ラム」「お雪」「弁天」「蘭」「ＣＡＯ−２」を、後者では、「ラム」「弁天」「お雪」「仏のじんじゃあ」「七色のしゅがあ」「毒蛇のぺっぱあ」「そると一号」を、Ａとする。 |
という規則も採用している。
以後、属性間に、Ａ＞Ｂ＞Ｃ＞Ｄ＞Ｅ なる関係を導入し、左辺の属性を右辺の属性より「高い」、右辺の属性を左辺の属性より「低い」という。即ち、Ａは最高位の属性であり、Ｅは最低位の属性である。
又、属性Ｄ以上を持つキャラクターを、そのエピソードの「登場キャラクター」と呼ぶ。
第２章で詳述するが、本システムでは、キャラクター、エピソードを、各々、通し番号で管理しており、それぞれ、キャラクターＮＯ．、エピソードＮｏ．と呼んでいる。これらの数字を入力する際に、ＨＥＬＰ key がサポートされているので、あらかじめ説明しておく。
キャラクターＮｏ．の入力が促されているときに、ＨＥＬＰ key を押すと、画面の右半分に、Ｎｏ．１〜Ｎｏ．１５までのキャラクター名が、番号付きで現われる。ここで、<RET>、または ↓ を押すと、次の１５人が、↑ を押すと、前の１５人が現われる。最後の１５人、又は、それ以下が現われた時点で、<RET>、又は ↓ を押すと、最初の１５人に戻る。逆も同様。.（ピリオド）を押すと、HELP 終了である。（ピリオドは、テン・キーのものを用いると便利である。）
エピソードＮｏ．の入力が促されているときにも、同様の機能が働く。
起動を終えると、メニュー画面となる。ここから“１”〜“７”のキーを押すことによって、様々な作業に移る。“Ｅ”を押すと、終了。
右肩に表示されている日時は、最後にデータベースに変更を加えた日時で、以後、これを、“ヴァージョンＮｏ．”と呼ぶ。
エピソードを登録・修正するためには、メニューで 1 を押す。
新たにエピソードを登録するためには、ＨＥＬＰ機能を用いて、（現時点での）最終エピソードＮｏ．を調べ、その次の番号を入力するか、又は、（現時点での）最終エピソードＮｏ．より大きい数（ex. 999）を入力する。
続いて、タイトル、掲載号、収録巻、収録巻（アニメ版）、コメントを、順に入力する。不必要な項目は <RET> のみでもよい。コメントを入力し終えると、エコーバックしてくるので、間違いが無ければ Y、さもなければ N を押す。
エピソードファイルを修正するためには、やはり、ＨＥＬＰ機能を用いてエピソードＮｏ．を調べた上で、そのＮｏ．を入力する。タイトル、コメント等が表示されるので、そのエピソードを修正するのなら、Y、さもなくば、それ以外の任意のキーを押す。Y を押すと、上記同様、タイトル、掲載号、収録巻、収録巻（アニメ版）、コメントの順に聞いてくるので、入力する。このとき、<RET> のみだと、その項目は修正されない。従って、例えば、コメント等を消したいときは、ブランクを一つ入力すること。入力し終えると、上記同様、正しいかどうか聞いてくるので、Y か N を押す。
エピソードファイルの作成を終了したら、エピソードＮｏ．入力時に、<RET> のみ押す。（メニューに帰る。）
エピソードＮｏ．入力時に、“ＡＬＬ”を入力すると、エピソードファイルの一覧表が出力される。
キャラクターを登録・修正するためには、メニューで 4 を押す。
以降の操作は、前節と全く同様であり、相違点は、各キャラクターに付き、入力項目がキャラクターＮｏ．とコメントだけである点と、“ＡＬＬ”モードがない点だけである。
エピソード・キャラクター・マトリックスを作成するためには、エピソードを固定して、各キャラクターの属性を記入する方法と、逆に、キャラクターを固定して、各エピソードに於ける属性を記入する方法とがある。ここでは、前者を説明する。
メニューで 2 を押すと、エピソードＮｏ．をきいてくるので、ＨＥＬＰ機能の助けを借りつつ、入力する。
続いて、キャラクターＮｏ．をきいてくるので、例えば、1<RET> と入力すると、“諸星あたる”とエコーバックしてくる。続いて、属性“Ａ”〜“Ｅ”のいずれかを押す。（“Ｅ”は“ｅｒａｓｅ”と考えてもよい。非登場キャラクターの属性（即ち、“Ｅ”）を、いちいち押す必要は、ない。）例えば、A を押したとする。続けて、キャラクターＮｏ．をきいてくるので、例えば、12<RET> と入力したとすると、“サクラ”とエコーバックしてくるので、B と押したとする。ここで、諸星あたるの属性を修正したければ、1<RET>、B、などと、押す。サクラを消したければ、12<RET>、E、と押す。全キャラクターの属性を記入したら、キャラクターＮｏ．に、<RET> のみ入力すると、次のエピソードの入力に移る。これにも、<RET> のみ入力すると、メニューに帰る。キャラクターＮｏ．入力時には、勿論、ＨＥＬＰが効く。
各エピソードに於ける各キャラクターの属性は、必ずしも全部一度に記入する必要はない。キャラクターの追加、削除、属性の修正等、一人ずつパッチ当てすればよい。
エピソードＮｏ．とキャラクターＮｏ．の関係が入れ換わった他は、前節と全く同様である。メニューで 5 を押す。
まとめて入力するときには、エピソード別の方が便利なので、この機能は、もっぱら、パッチ当てに使うことになろう。
メニューで 3 を押すと、各エピソードにどのキャラクターが登場しているのかがわかる。
ＨＥＬＰ機能の助けをかりて、エピソードＮｏ．を入力すると、エピソード名の下にサブメニューが現れる。<RET> を押すと、そのエピソードの内容がわかる。↓ を押すと次のエピソードに、↑ を押すと前のエピソードに戻り、. を押すと、メニューに帰るのである。
さて、<RET> を押すと、キャラクター名がカラーで表示される。緑はＡ、赤はＢ、紫はＣ、青はＤである。<RET> を押すと、次のエピソード名が現れ、サブメニューが表示される。次々とチェックしていくのに便利である。
単数検索と複数検索に分けて説明する。
“錯乱坊”の登場するエピソードを知りたければ、メニューで 6 を押した後、3<RET>、<RET> と入力する（ＨＥＬＰが効くことは、いうまでもない）。すると、画面の右半分に、登場したエピソードが、属性のカラー（緑＝Ａ、赤＝Ｂ、紫＝Ｃ、青＝Ｄ）付きで、１５個ずつ表示される。
複数のキャラクターが同時に登場するエピソードを知りたければ、全キャラクターのキャラクターＮｏ．を押した後、<RET> を押す。例えば“ラム”、“弁天”、“お雪”、“蘭”の４人組が登場するエピソードを知りたいのなら、7<RET>、20<RET>、24<RET>、90<RET>、<RET> と入力する。
このときのカラーの意味は、“そのエピソードに於ける各キャラクターの属性のうち、最高のもの”となっている。即ち、“赤”ならば、“少なくとも一人はＢで、Ａはいない”ということがわかる。
又、“*”が表示されているときは、全員がその属性を持っている。即ち、“赤”で“*”が表示されていれば、“全員Ｂ”ということがわかる。（勿論、“青”のときは、必ず“*”が表示される。）
<RET> のみ押すと、メニューに帰る。
このプログラムは、シーズン別に“活躍度”という、興味深い数字を計算する機能を有している。計算法は A-3 節に示すが、経験則とほとんど完全に一致する。この活躍度をキーにして、シーズン別にキャラクターのランキングを出力する機能が、メニュー 7 である。
まず、ランキングを計算する範囲をきいてくるので、ＨＥＬＰ機能を使いつつ、入力する。どこでも自由に設定してよいが、レンジは１５〜３０位が適当である。（５０以上は、好ましくない。）数字がダラダラと現れるが、これは、活躍度計算中のキャラクターＮｏ．である。
計算が終了すると、まずベストテンが、後、<RET> を押す度に１５人ずつ出力される。９０点以上は緑、７０点以上は水色、６０点以上は黄色に色分けされている。
“第何エピソードから？”に、<RET> で答えると、メニューに帰る。
筆者なりのシーズン設定は、エピソードのコメント欄に書き込んである。（メニュー“１”の“ＡＬＬ”モードだと、わかり易い。）キャラクターの変動に着目しつつ、一年を、“新学期〜夏休み”、“秋〜新春”と、区切ったものである。
本システムは、以下のファイルから構成されている。
| ＵＲＵＳＥＩ | − | ＢＡＳＩＣメインプログラム。 |
| ＵＲＵＳＥＩ．ＥＰＳ | − | エピソード名が収録されている、シーケンシャル・ファイル。 |
| ＵＲＵＳＥＩ．ＣＨＲ | − | キャラクター名が収録されている、シーケンシャル・ファイル。 |
| ＵＲＵＳＥＩ．ＭＡＴ | − | エピソード・キャラクター・マトリックスが収録されている、ランダム・ファイル。 |
| ＵＲＵＳＥＩ．ＶＥＲ | − | データのヴァージョンＮｏ．が収録されている、シーケンシャル・ファイル。 |
ｕｓｆｏｎｔ．ｎ８８ | − |
外字登録ファイル。（ｍｋｆｏｎｔ．ｎ８８によって作成される。ユーザーズ・マニュアル参照。） 84/03/19 Version では、「愛▼ダーリンの危機」の“▼”にのみ、用いられている。（“▼”はハートマークを示し、“ラブ”とルビがふられている。） |
走行中のエラーによって、入力データが無駄にならないよう、エラー・トラップがかけられている。
なんらかのエラーが発生すると、エラー番号とエラー行を表示して、リターン待ちになる。<RET> でメニューに戻るので、直ちに E で終了すれば、最新の入力データを守ることができる。
84/03/19 Version では、コミックス第１９巻まで入力終了しているが、標準搭載の１２８Ｋｂｙｔｅ ＲＡＭ では、これがほぼ限界で、しばしば、Out of Strings Space Error、Out of memory Error が発生するであろう。
本質的な解決策としては、メモリーを２５６Ｋｂｙｔｅに拡張するしかない（推定１００巻以上、耐え得るはずである）が、消極的解決策も存在する。
ひとつは、度々メニューに帰ること（メニューに帰る度に、ガベージ・コレクションが行われる）。もう一つは、日本語ＢＡＳＩＣのかわりに、ＤＩＳＫ ＢＡＳＩＣをブートすること（実際、出力するだけであれば。これで十分である）。
又、おそらく第２４巻の入力時点で、Subscript out of Range Error がでるが、対策については、A-4 節を参照せよ。
各シーズン（２０〜３０エピソード）に於ける、各キャラクターの活躍度は、次の様に計算される。
活躍度 ＝ ４０ × ｌｏｇ 10（（Ａ ＋ Ｂ ＋ Ｃ ＋ Ｄ／２）／Ｎ × １００） ＋ （２０ × Ａ ＋ １０ × Ｂ ＋ ５ × Ｃ）／（Ａ ＋ Ｂ ＋ Ｃ ＋ Ｄ） 但し、Ａ ＝ 属性Ａのエピソードの総数 Ｂ ＝ 属性Ｂのエピソードの総数 Ｃ ＝ 属性Ｃのエピソードの総数 Ｄ ＝ 属性Ｄのエピソードの総数 Ｅ ＝ 属性Ｅのエピソードの総数 Ｎ ＝ Ａ ＋ Ｂ ＋ Ｃ ＋ Ｄ ＋ Ｅ （即ち、そのシーズンの、総エピソード数） 又、そのシーズンに於いて Ａ ＝ Ｂ ＝ Ｃ ＝ Ｄ ＝ ０ のキャラクターに対しては、 活躍度は定義されない。
右辺第一項は、いわば出席点であり、出席回数の百分率を、常用対数で補正している。第二項は、内容点であり、属性の加重平均をとっている。
プログラム内の諸定数は、１２８Ｋｂｙｔｅ ＲＡＭ を使いこなす様に設定されているので、２５６Ｋｂｙｔｅ以上のシステムでは、一部書き直す必要がある。
まず、マシン語プログラムをリロケートするために、プログラム第１行のＣＬＥＡＲ文とＤＥＦ ＳＥＧ文を書き直す。次に、最大エピソード数、最大キャラクター数を、同じ行で、ＭＡＸＥ、ＭＡＸＣに、各々２５０、３００とセットしているので、これらを５００に書き直す。
これで、推定４６巻までは対応できるはずである。これ以上の拡張を望む場合には、多少、面倒な手続きが必要となる。即ち、単に、エピソード名、キャラクター名を収録する配列を大きくするだけでなく、ＵＲＵＳＥＩ．ＭＡＴの構造を変える必要があるからである。
現在、ＵＲＵＳＥＩ．ＭＡＴは、fig.1 の様な構造を持っている。即ち、先頭から２レコードずつ各キャラクターにふりわけ、各レコード中２５０ｂｙｔｅ、計５００ｂｙｔｅを、各エピソードの属性記入に用いている。
これを、fig.2 の様に、最大７５０エピソード（及び、最大７５０キャラクター（注））に拡張する方法を、以下に示す。
（注：エピソード数とキャラクター数は、ほぼ、１：１の比を保って増加する傾向がある。）
fig.1
+-------------------+
| 1 - 250 episode | 1. あたる
+-------------------+
| 251 - 500 episode |
+-------------------+
| 1 - 250 episode | 2. しのぶ
+-------------------+
| 251 - 500 episode |
+-------------------+
| |
+-------------------+
| |
...
fig.2
+-------------------+
| 1 - 250 episode | 1. あたる
+-------------------+
| 251 - 500 episode |
+-------------------+
| 501 - 750 episode |
+-------------------+
| 1 - 250 episode | 2. しのぶ
+-------------------+
| 251 - 500 episode |
+-------------------+
| 501 - 750 episode |
+-------------------+
| |
+-------------------+
| |
...
| １． |
次のプログラムを走らせる。 100 NAME "URUSEI.MAT" AS "TEMP" 110 OPEN "TEMP" AS #1 120 OPEN "URUSEI.MAT" AS #2 130 FILELD #1, 250 AS F1$ 140 FILELD #2, 250 AS F2$ 150 FOR I=1 TO 500 160 FOR J=1 TO 2 170 GET #1 180 LSET F2$=F1$ 190 PUT #2 200 NEXT 210 LSET F2$=SPACE$(250) 220 PUT #2 230 NEXT 240 FOR I=1 TO 250*3 250 PUT #2 260 NEXT 270 CLOSE 280 KILL "TEMP" 290 END |
| ２． |
プログラム中、チャンネル１を通してＵＲＵＳＥＩ．ＭＡＴにアクセスしている。以下のサブルーチンを、７５０エピソード仕様に書き直す。 *GET.A、*PUT.A は、エピソードＮｏ．が２５０以上か以下かで、第１レコードか第２レコードか判断しているので、これを拡張する。 *MENU6 では、高速化のため、２レコードを同時にＧＥＴしているので、これを３レコードに拡張する。 *MENU7 では、これに加えて、範囲指定が２レコードにまたがっているか否かの判断もしているので、それも拡張する。 |
| ３． | 第１行で、MAXC=750 : MAXE=750 とする。 |
最大１０００エピソード（キャラクター）以上に拡張する場合も、これに準ずる。但し、ディスク容量に注意すること。
倉田わたるのミクロコスモスへの扉
Last Updated: Feb 8 1999
Copyright (C) 1999 倉田わたる Mail [KurataWataru@gmail.com] Home [http://www.kurata-wataru.com/]