-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- 〜恋愛成功率計算プログラム〜 ＝URANAI95＝ Version 0.01 Programmed by ＳＹＯ -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- ●目的 ------------------------------------------------------------------------ 　　名前を元にお二人の恋愛成功率を計算します。 ●アルゴリズム ---------------------------------------------------------------- 　　1.男性の名前を前に、女性の名前を後ろに続けて書きます。 　　2.一文字ずつ数字化していきます。『あ』段ならば１、『い』段なら２という 　　　感じで数字化していきます。なお、『ん』は０とカウントされます。小さい 　　　文字は、大きい文字に変換してカウントします。 　　3.数字化したものを、隣同士の足し算を行い、結果の１の位だけを残します。 　　4.その結果が１００以下になるまでループします。 ●参考例 ---------------------------------------------------------------------- 　　男性：なかじまけん　　　（中嶋　剣） 　　女性：こばやかわみゆき　（小早川　美幸） 　　　　　なかじまけんこばやかわみゆき 　　　　　１１２１４０５１１１１２３２ 　　　　　 ２３３５４５６２２２３５５ 　　　　　　５６８９９１８４４５８０ 　　　　　　 １４７８０９２８９３８ 　　　　　　　５１５８９１０７２１ 　　　　　　　 ６６３７０１７９３ 　　　　　　　　２９０７１８６２ 　　　　　　　　 １９７８９４８ 　　　　　　　　　０６５７３２ 　　　　　　　　　 ６１２０５ 　　　　　　　　　　７３２５ 　　　　　　　　　　 ０５７ 　　　　　　　　　　　５２ 　　　　　　　　　　　　　　　　５２％ ●動作環境及び開発環境 -------------------------------------------------------- 　　Windows95 が動く環境。 　 開発は、PC-9821Nb7/5で行いました。開発言語は F-Basic v4.1 です。 ●使い方 ---------------------------------------------------------------------- 　　ＤＯＳプロンプトから URANAI98 を実行してください。オプションなどは一切 　　ありません。男性、女性の順に名前を『ひらがな』で入力してください。姓と 　　名との間は続けて書いてください（スペースなどで区切らないでください）。 　　２人の名前を入力すれば自動的に計算を開始します。 ●開発裏話（笑） -------------------------------------------------------------- 　　『虹色彗星 ＮetWork』という草の根で、ふとしたことから『こういう占いが 　　あるよ〜』という話題がでてきました。単純な足し算だけど、名前によっては 　　計算量が多くなるため、とある人が『プログラム組んだら〜？』とか言いまし 　　た。というわけで、作ってみました（笑）。 ●プログラムについて ---------------------------------------------------------- 　　単純な力技です（笑）。ループ＆ループ〜。(ｫ しかし、こういうルーチンワー 　　クはプログラムにやらせると手っ取り早いし、確実ですね（爆）。 ●余談 ------------------------------------------------------------------------ 　　ひどい結果がでてもあまり気にしないようにしましょう（笑）。４％という数 　　字をだしていながら、上手く行っているペアもいますし、９２％という数字を 　　だしていながら破滅したペアもあります（涙）。まあ、話のネタ程度に・・・。 ●Special Thanks to（敬称略） ------------------------------------------------- 　　NIJ00024　かわかみ NIJ00062　のーむ 　　NIJ00131　晶 ●著作権など ------------------------------------------------------------------ URANAI95はフリーソフトウェアです。URANAI95のプログラム本体、DOC ファイル等 　の著作権は作者であるＳＹＯに帰属します（占いのアルゴリズムそのものに関して 　は別です）。 URANAI95の使用によってなんらかの損害が生じた場合、例えそれがURANAI95のプロ 　グラム上のバグによるものであっても、作者は一切責任を持ちません。なお、バグ 　を修正する気はあっても、それを修正する義務は負いません。 転載・再配布は原則的に自由ですが、以下の条件は守って下さい。 ・プログラム／DOC ファイルの内容を改変しない事。 (アーカイブ形式の変更(ZIP 等)は可) ・アーカイブに含まれるすべてのファイルを付ける事。 ・実費を越える金銭の授受を伴わない事。 ・作者の著作権が守られないような場所へは転載しない事。 ・雑誌／書籍などに掲載する場合は、事前にご報告下さい。掲載料等は要求 しませんが、その雑誌／書籍を１部いただけるとありがたいです。 なお、転載された場合は、事後でも御一報くださるとありがたいです。(^^)　メー 　ルをくださると、作者からの感謝のメールが届くことでしょう(笑)。 ●サポート場所 ---------------------------------------------------------------- 　　虹色彗星 ＮetWork(京都:075-723-5773) : [18] MAKING ●履歴 ------------------------------------------------------------------------ 　　97/05/17　version 0.01 　　　　作成開始。３０分ほどで完成（笑）。DOC 書くのに要した時間の方が 　　　　長いんじゃないのか？（爆）。ちなみに、ＤＯＳ版の移植版です（笑）。 -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- メール等を下さる場合は、下記のNET でお願いします。これらのNET は全て巡回 　(毎日とは限りませんが)していますので、間違いなく受け取ります(ホストでトラ ブルが起こった場合はその限りではありませんが(汗))。 虹色彗星 ＮetWork NIJ00001 α−ＮＥＴ ALP00114 すだちNetwork AWA00018 NIFTY-Serve BYG02032 Fugitive(逃亡者) FUG00048 Function-Net FUNC0064 さねやす亭 SANE0017 Pleiades Club SBR00013 ゆいＮＥＴ YUI11652 ハンドルはゆい、Ｎｉｆｔｙ以外は全て“ＳＹＯ”で統一しています。 Ｎｉｆｔｙでは"翔"、ゆいでは"SYOSUKE"というハンドルを使っています。 -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-