$title

#!/usr/bin/perl #↑一行目のパスはサーバーによって違います。サーバに合わせて変更してください。 #このperlは、perl5に対応しています。 #------------------------------------------------------------------------------- # # ◇◆◇ 12星座シンプル恋占い ver1.1 ◇◆◇ # 1999/11/23,2000/6/15 by Mamiko.S(http://www.nmt.ne.jp/~mamiko/) # ・著作権表示は消さないで使ってください。 # ・このプログラムを用いた結果、利用者に万一何らかの損害が生じても作者は責任を負えません。 # ・スクリプトの再配布や有償で他人に設置するといった行為は固く禁じます。 # # === 履歴 === # ・2000/6/15 修正広告を入れやすくしました。 # と書いてある部分に広告を入れます。 # ・2000/6/15 修正画像を含むフォルダーへのパスを指定できるようにしました。 # #------------------------------------------------------------------------------- $title = "◆◆◆SIRENS12星座恋占い◆◆◆"; #--- （ここにタイトルを書いてください。） $script_name = "uranai.cgi"; #---（ここにこのCGIのファイル名を書きます。） $img_folder = "images"; #---（ここに画像のフォルダへのパスを指定します。） $body = ''; # ↑--- （BODYタグをここで書きます。） $girl_color ="pink"; #--- （入力画面の色指定「彼女の星座」） $boy_color = "powderblue"; #--- （入力画面の色指定「彼の星座」） if($ENV{'REQUEST_METHOD'} eq 'GET'){ $query_string=$ENV{'QUERY_STRING'}; }else{ read(STDIN, $query_string,$ENV{'CONTENT_LENGTH'}); } &qs; if($qs{'action'} eq "telling"){ if($qs{'girl'} =~ /\D/){&error('入力エラー','入力値を確かめてください。');} if($qs{'boy'} =~ /\D/){&error('入力エラー','入力値を確かめてください。');} if($qs{'girl'} < 0 || $qs{'girl'} > 11){&error('入力エラー','入力値を確かめてください。');} if($qs{'boy'} < 0 || $qs{'boy'} > 11){&error('入力エラー','入力値を確かめてください。');} &telling; &OutPut; }else{ &astro_form; } #--------（入力データのデコード） sub qs{ for(split(/&/,$query_string)){ tr/+//; tr/ //; s/%([\dA-Fa-f][\dA-Fa-f])/pack("C",hex($1))/ge; ($key,$value)=split(/=/,$_,2); #改行コードの変換（念のため） $value=~s/\r\n/\n/g; $value=~s/\r/\n/g; $value=~s/\n//g; $qs{$key}=$value; #keyを添字としたハッシュ変数に格納している } } #--------（最初の占い入力画面を出力します。編集は慎重に～～） sub astro_form{ print "Content-type: text/html\n\n"; print < $title $body

$title

二人の恋の行方を占う12星座相性占いです。
彼女と彼の星座を選択して、占ってください。
（ラジオボタンをクリックして星座を選択してください）

彼女の星座

牡羊座

牡牛座

双子座

蟹座

獅子座

乙女座

天秤座

蠍座

射手座

山羊座

水瓶座

魚座

彼の星座

牡羊座

牡牛座

双子座

蟹座

獅子座

乙女座

天秤座

蠍座

射手座

山羊座

水瓶座

魚座

(C)1999 Mamiko's Page END } #--------（以下は占いのデータです。） sub telling{ @constellation = ('牡羊座','牡牛座','双子座','蟹座','獅子座','乙女座','天秤座','蠍座','射手座','山羊座','水瓶座','魚座'); #--- （Aries） $girl[0] = '陽気で明るく、さっぱりとしていて陰のない女性です。困っている人には手を貸さずにはいられないで、自然に行動することができます。恋は激しく、急速に燃え上がるタイプです。行動力があり、恋愛においてもリーダーシップを取る傾向があります。品格のある男性にひかれ、熱烈なラブロマンスをくりひろげます。 '; #--- （Taurus） $girl[1] = '見るからにおだやかな印象を持っていて、口数は多くありません。マイペースでねばり強く、ガマン強い性格です。ゆたかな感性を持っていて、美的センスに優れています。保守的で積極的に出るのが苦手ですが、情熱と嫉妬心を内面にひめています。慎重で誠実な恋愛をし、外見にこだわらず、頼りがいがあり金銭感覚にすぐれた男性にひかれます。 '; #--- （gemini） $girl[2] = '好奇心が旺盛で知性にすぐれ、最新の情報にとても敏感。臨機応変の才能にあふれています。陽気でユーモアがあり、とても寂しがりやで、誰とでもすぐ友達になることができます。盲目的な恋には向いてなく、知的でクールな恋愛遍歴を重ねることもありえます。恋人には、楽しい会話ができ、友達感覚で付き合える知的で優しい男性が良いでしょう。 '; #--- （cancer） $girl[3] = 'ソフトで温和な社交性と、深い愛情とゆたかな感受性を持っています。情が深すぎて情に流されやすいこともあり、そのための浮気もありえます。言葉よりも態度で愛を示そうと相手につくしますが、基本的に受け身で、つねに愛されていたいと願っています。恋人には彼女のジェラシーを素直に受け入れてくれる家庭的であたたかい男性が良いでしょう。'; #--- （leo） $girl[4] = '強いプライドと情熱と大きな愛にあふれています。自分を思ってくれる人には、つつみこむような愛を与えます。積極的で明るく前向きで、面倒見のいいおひとよしですが、さびしがりやな面もあります。派手に見えますが、恋に対しては真剣そのもの。意志が強く一度決めたことはやり通します。 '; #--- （virgo） $girl[5] = 'きちょうめんで神経質。ピュアでロマンチックなため、いくつになっても夢を持ちつづけ、乙女チックなロマンスと理想を求めすぎることがあります。批判精神が旺盛なため、相手の欠点が目につきやすく、異性に対するチェックは厳しいです。恋愛に対して受け身でひかえめ。繊細で心配性のせいか、安全でおちついた愛を求めます。知性と教養のある男性を愛します。'; #--- （libra） $girl[6] = '知性的で、精神的にも肉体的にもバランスがとれた女性です。落ち着いた優雅な雰囲気を持ち、美的センスにすぐれ、自然に人を引きつける魅力があります。恋愛は、激情に流されることなく、バランスのとれたラブストーリーを好みます。美しさに執着する傾向があり、異性に対しても美形好みです。 '; #--- （scorpio） $girl[7] = '理屈よりもカンに頼って行動していくタイプです。さそり座の女性は１２星座中でいちばんセクシーで神秘的です。無口でもの静かな印象ですが、深い情熱を秘めており、強烈な愛を持っています。用心深さから、恋の相手には安全なパートナーを選びます。見た目よりも将来性のあるたくましい男性に魅力を感じます。調子がよくて遊び好きの人、弱々しい人は好みません。'; #--- （sagittarius） $girl[8] = 'ポジティブで頭の回転が速く、表と裏がない人です。アクティブな魅力にあふれ、豊富な話題とユーモアで周りを楽しませます。自由を好み、束縛や干渉されるのが大嫌い。情熱的で理想が高く、熱しやすく冷めやすい性格のため、恋愛を何回か繰り返しがちです。融通のきかない人は嫌いで、知的な美形でワイルドな魅力のある人を好みます。 '; #--- （capricorn） $girl[9] = '堅実な努力家で、つねに慎重に計画を立てて行動していくタイプ。思いやりがあり、周りの人のため自分からすすんで苦労を買ってでるところがあります。恋にも慎重になりすぎてかけひきは苦手。傷つくことを恐れます。恋の相手には、見た目よりも中身を重視し、自分が尊敬できる人でなければ恋におちません。'; #--- （aquarius） $girl[10] = 'とても知的で理性的な性格です。自分をしっかりと持っている積極的でポジティブな人で、個性的な感じがします。また、人あたりがよく、だれとでも楽しく話ができます。いつも冷静で、恋にもおぼれることはなく、友情のような恋愛をします。型にはまらない人なので、複数の異性との恋愛もありえます。 '; #--- （pisces） $girl[11] = 'ゆたかな愛情と思いやりに満ちた女性です。喜ばせ上手でやさしさは人一倍、しかも見返りも期待しません。人を安心させるムードも持っています。恋愛においては、夢見がちでドラマチックなラブストーリーを信じる傾向があり、恋にはまって自分を見失うこともありえます。おちつきの中に強い意志のある男性にひかれます。'; #--- （Aries） $boy[0] = 'どんな困難にもめげず、パワーと勇気をもって立ち向かっていく人です。困っている人には手を貸さずにはいられないで自然に行動することができ、リーダーシップを取るタイプです。恋愛においても、能動的で征服欲に満ちており、困難な相手でも猛然と積極的にアタックしていきます。恋の相手には、中身よりも外見を重視します。'; #--- （Taurus） $boy[1] = '見るからにおっとりとしたおだやかな印象を持っていて、口数は多くありません。マイペースでねばり強く、ガマン強い性格です。所有欲と執着心が強く、一度手にいれたお気に入りのものはカンタンに手放しません。恋愛で積極的な行動に出るのは苦手です。また、積極的な女性よりつつましい女性にひかれます。'; #--- （gemini） $boy[2] = '好奇心が旺盛で知性にすぐれ、臨機応変の才能にあふれています。陽気でユーモアがあり、誰とでもすぐ友達になることができます。そしてとても寂しがりやです。異性にもてるタイプが多く、クールで華麗な恋愛遍歴を重ねることもありえます。恋人には、楽しい会話ができ、友達感覚で対等に付き合える女性が良いでしょう。 '; #--- （cancer） $boy[3] = 'ソフトで温和な社交性と、深い愛情とゆたかな感受性を持つかに座男性は、情が深すぎて情に流されやすいこともあり、そのための浮気もありえます。基本的に受け身の愛で、相手に愛されてこそはじめて、愛情がはっきり表立ってきます。ジェラシーが強く家庭的な彼は、自分と同じタイプの家庭的な雰囲気の女性を好みます。'; #--- （leo） $boy[4] = '強いプライドと情熱と大きな愛にあふれていて、自分を思ってくれる人には、おしみない愛を与えます。積極的で明るく前向きですが、人一倍さびしがりやな面があり、恋愛でも寂しさから誰とでも付き合ってしまう傾向があります。大胆な行動力があり、恋にドラマチックな感動をもとめています。 '; #--- （virgo） $boy[5] = 'きちょうめんで純真、神経質でロマンチックなおとめ座の男性は、幼くあどけない女性を愛します。理想主義なので異性へのこだわりは大きく、相手を冷静に観察し、理想の女性を求めます。いつまでも童心を持ちつづけているため、恋人から頼りないと思われることがあるかもしれません。愛情表現は受け身でひかえめですが、マメな人が多く、若いときは気が多いかもしれませんが、おちついた愛を求めます。'; #--- （libra） $boy[6] = '知性的で、精神的にも肉体的にもバランスがとれ、落ち着いた雰囲気を持った人です。社交的でセンスが良く、自然に人を引きつけるおだやかな魅力があります。いつも冷静で、恋愛においても激情に流されることなく、美しい女性とのバランスのとれたラブストーリーを好みます。'; #--- （scorpio） $boy[7] = '理屈よりもカンに頼って行動していくタイプです。無口で一見もの静かな印象ですが、人とひととの結びつきを大切にするため、みんなに信頼され存在感があります。用心深さから、恋の相手には安全なパートナーを選びます。パートナーの性格よりも環境を重視する傾向があり、お金や地位が得られる相手に弱いようです。いったん愛したら、ひとりの女性に強く執着します。'; #--- （sagittarius） $boy[8] = 'ポジティブで頭の回転が速く、表と裏がない人です。活動的な魅力にあふれ、豊富な話題で周りを楽しませます。自由を好み、束縛や干渉されるのが嫌い。情熱的で理想が高く、熱しやすく冷めやすい性格のため、恋愛を何回か繰り返しがちです。自分と同じアクティブでフレッシュな女性を好みます。'; #--- （capricorn） $boy[9] = '堅実な努力家で、つねに慎重に計画を立てて行動していくタイプ。思いやりがあり、周りの人のため自分からすすんで苦労を買ってでるところがあります。恋にも慎重になりすぎてかけひきは苦手。傷つくことを恐れます。恋の相手には、見た目よりも中身を重視し、尊敬から愛が始まります。'; #--- （aquarius） $boy[10] = 'とても知的で理性的な性格で、自分をしっかりと持っている積極的でポジティブな人です。また、紳士的で人あたりがよく、だれとでも楽しく話ができますが、いつのまにか議論になってしまいがち。男女間を意識することが少なく、友情のような恋愛をします。型にはまらない人なので、複数の異性との恋愛もありえます。'; #--- （pisces） $boy[11] = '情緒がゆたかで直感力に富んだ男性です。喜ばせ上手でやさしさは人一倍で、しかも見返りも期待しません。人を安心させるムードも持っています。恋愛において、いつまでもラブロマンスをもとめつづける傾向があります。自分が支えになってあげたいと思う女性を恋の相手として選びます。 '; #--- （占いの結果データ） if($qs{'girl'} == 0){ #--- （牡羊座と12星座） if($qs{'boy'} == 0){ $result = '良い相性です。お互い気に入ったらすぐ恋に落ちて燃え上がります。ふたりとも同じような性質を持っているので、お互いに譲れないことがあるかも。'; $probabillity = '65'; }elsif($qs{'boy'} == 1){ $result = 'のんきな彼に彼女はイライラさせられるかも。でも彼女をしっかりとささえられる堅実な彼です。彼女のほうがイニシアチブを取ることでおだやかな関係になれるでしょう。'; $probabillity = '45'; }elsif($qs{'boy'} == 2){ $result = 'ふたりは気性の合った良い相性です。双子座の彼はおひつじ座の彼女の激しさを上手に受け流すことができます。また、彼は彼女にいつも新しい感動をもたらしてくれるでしょう。'; $probabillity = '70'; }elsif($qs{'boy'} == 3){ $result = 'すれ違いの多い相性です。多くの忍耐と意識的な努力を必要とするでしょう。お付き合いでは彼女がイニシアチブを取ることによってアクティブで明るいカップルになれます。'; $probabillity = '25'; }elsif($qs{'boy'} == 4){ $result = '少しでも理解しあえれば、友達感覚のすばらしいカップルになれそうです。ロマンチックなことはあまり期待しないほうが吉。'; $probabillity = '85'; }elsif($qs{'boy'} == 5){ $result = '急速に恋がはじまるおひつじ座の彼女と、相手を分析する時間が必要なおとめ座の彼。彼女は焦らず気長に構えて。また、お付き合いでは彼女のほうがイニシアチブをとると良いでしょう。'; $probabillity = '35'; }elsif($qs{'boy'} == 6){ $result = '天秤座の彼が彼女にこころをひらけば、最高のカップルになれそうです。お互いの個性に強い魅力を感じ合い、華やかな恋になります。'; $probabillity = '70'; }elsif($qs{'boy'} == 7){ $result = '恋に落ちたら、とてもスリリングな情熱的で激しいカップルになりそうです。あまりの激しさのため、かみ合わないということもあるかもしれません。'; $probabillity = '30'; }elsif($qs{'boy'} == 8){ $result = '共通の目標に向かっていっしょに歩いていける二人です。寛容ないて座の彼は、おひつじ座の彼女の激しさを愛することができるでしょう。'; $probabillity = '80'; }elsif($qs{'boy'} == 9){ $result = 'おひつじ座女性にとってやぎ座の男性は、とっつきにくい印象を持つかもしれません。お互いの気質と正確を理解するために、会話を大切にしましょう。'; $probabillity = '20'; }elsif($qs{'boy'} == 10){ $result = '良い相性です。水瓶座の彼はおもしろい人という印象で、ふたりはバランスを取ることができます。'; $probabillity = '90'; }elsif($qs{'boy'} == 11){ $result = '気性にややすれちがいがみられるふたりです。おひつじ座の彼女は性急な行動をさけて。うまくいけば、充実した恋人同士になれるでしょう。'; $probabillity = '40'; } } if($qs{'girl'} == 1){ #--- （牡牛座と12星座） if($qs{'boy'} == 0){ $result = 'スリルをもとめるおひつじ座男性と、保守的で安定指向のおうし座女性とは違った考え方を持っています。おうし座の彼女が、おひつじ座の彼の征服欲を満足させることができるなら、彼は力強くリードしてくれます。'; $probabillity = '30'; }elsif($qs{'boy'} == 1){ $result = '派手な恋ではありませんが、気の合ったカップルになれます。慎重で堅実なふたりはすこしずつ愛をたしかめあい、安定した関係を作りあげます。そのため、退屈さが出てくるおそれもあります。'; $probabillity = '80'; }elsif($qs{'boy'} == 2){ $result = 'ゆっくりと恋していきたいおうし座女性と、スピーディなふたご座男性の組み合わせは、テンポが合いません。おうし座の彼女がふたご座の彼に合わすようにすれば、お付き合いは続くでしょう。しかし、寂しい思いはさけられません。'; $probabillity = '20'; }elsif($qs{'boy'} == 3){ $result = '友情の延長のような地味な恋です。かに座男性は、おうし座女性の穏やかな雰囲気にとても安心できます。お互いに思いやれば、強い信頼感でむすばれる二人です。'; $probabillity = '70'; }elsif($qs{'boy'} == 4){ $result = '派手なしし座男性と堅実なおうし座女性のふたりです。何かと衝突してしまう相性ですが、お互いの長所を認め合うことができれば補い合える素敵なカップルになれます。しし座の彼の派手さとプライドに隠れたさびしさを、おうし座女性が理解できるかどうかがポイントです'; $probabillity = '35'; }elsif($qs{'boy'} == 5){ $result = '安定志向のふたりは最高の相性です。もともと、ふたりの考え方も行動もテンポが合います。おうし座女性は知的好奇心を常に心がけることで、おとめ座男性をよりひきつけることができます。'; $probabillity = '90'; }elsif($qs{'boy'} == 6){ $result = 'ロマンチックなてんびん座男性と、堅実なおうし座女性では、恋愛に対する考え方にズレがあります。共通点が多くある二人ですが、お互いの理解と歩み寄りの努力が相当必要です。相手の気持ちを尊重することを忘れずに。'; $probabillity = '25'; }elsif($qs{'boy'} == 7){ $result = '情熱的に愛し合える二人です。おうし座女性の誠実さで、信頼感はより強くなるでしょう。しかし、お互いの強い独占欲や嫉妬心で、トラブルが起こる可能性もあります。'; $probabillity = '60'; }elsif($qs{'boy'} == 8){ $result = '忍耐とお互いの理解が必要な相性です。自由ないて座の彼に対して、おうし座の彼女は寛大でなければいけません。不安やさびしい思いはさけられないかも。'; $probabillity = '30'; }elsif($qs{'boy'} == 9){ $result = 'お互い誠実で尊敬し合える相性です。しかし、やや考え方に柔軟性が欠けるふたりなので、どちらかが一歩下がるようにすれば、さらによい関係になれます。'; $probabillity = '80'; }elsif($qs{'boy'} == 10){ $result = 'クールで自由なみずがめ座男性と独占欲の強いおうし座女性。みずがめ座男性はおうし座女性の豊かな愛情にひかれますが、この恋の前途は多難です。トラブルを覚悟しておいたほうがいいでしょう。'; $probabillity = '35'; }elsif($qs{'boy'} == 11){ $result = 'お互い満足し合える関係になれます。ロマンチストのうお座の彼と堅実なおうし座の彼女では、考え方にズレがありますが、おうし座女性はうお座の彼に安定と堅実さをもたらします。また、うお座の彼のやさしさは彼女にとって魅力です。'; $probabillity = '70'; } } if($qs{'girl'} == 2){ #--- （双子座と12星座） if($qs{'boy'} == 0){ $result = '情熱的で楽しい恋ができる組み合わせです。変化に富んだ付き合い方ができ、一緒にいるととても楽しく退屈しません。行動力のあるおひつじ座男性をふたご座女性はたのもしいと感じるでしょう。'; $probabillity = '70'; }elsif($qs{'boy'} == 1){ $result = '軽快なふたご座女性とのんびりしたおうし座男性。心理的、行動的にも、ふたりのテンポは合いません。また、しだいにふたご座の女性はおうし座の彼の強い嫉妬心を重荷に感じるようになりそう。'; $probabillity = '25'; }elsif($qs{'boy'} == 2){ $result = '同じふたご座同士のふたりは好みや趣味も一致しています。楽しく付き合うにはお互いとてもいい相手です。しかし、お互い似ているため、他へ目移りなんてこともありがち。調子に乗りすぎないように。'; $probabillity = '75'; }elsif($qs{'boy'} == 3){ $result = '二人は違った個性を持っているので、もし恋に落ちるとしたら刺激的な恋になるでしょう。しかし、交際がすすむにつれ、クールなふたご座女性にとって、やさしいけれど愛情深く嫉妬深いかに座の彼は重い存在となる可能性があります。'; $probabillity = '30'; }elsif($qs{'boy'} == 4){ $result = '基本的に上手くいく組み合わせです。おおらかで明るいしし座の彼は、クールなふたご座の彼女を干渉せずに、情熱的につつみこむことができます。'; $probabillity = '85'; }elsif($qs{'boy'} == 5){ $result = '同じことへ関心を持ち、共通の話題が豊富で、知的にお付き合いすることができます。しかし次第に、軽快なふたご座の彼女は、こまやかなおとめ座の彼をわずらわしく感じ出す可能性があります。彼女に忍耐力があれば大丈夫でしょう。'; $probabillity = '40'; }elsif($qs{'boy'} == 6){ $result = '精神的にも肉体的にもとても息の合ったふたりです。すべてに関して刺激しあえる仲になります。同じ趣味を持てば、ますます楽しく協力し合える最高のパートナーになります。'; $probabillity = '90'; }elsif($qs{'boy'} == 7){ $result = 'ふたご座女性は、さそり座男性になんとなくひかれます。しかしふたりはまったく違った感情を持っているため、すれちがいが起こりやすく、お互いに理解し合う努力を続けなければいけません。'; $probabillity = '30'; }elsif($qs{'boy'} == 8){ $result = 'ふたりとも行動的で、明るく外向的。心理的にも行動的にも息の合ったふたりです。二人がお互いの個性と自由を認め合うことが愛を育てる秘訣です。 '; $probabillity = '85'; }elsif($qs{'boy'} == 9){ $result = '明るいふたご座女性はやぎ座男性の心をときほぐすことができます。しかし、おたがい理解しにくい相性です。誠実さを強くもとめるやぎ座男性に、軽やかなふたご座女性は息苦しさを感じてしまうかも。'; $probabillity = '40'; }elsif($qs{'boy'} == 10){ $result = '理想的な相性です。みずがめ座の彼の冷静な知性と寛大な愛は、ふたご座の彼女とうまくとけあいます。かけがいのないパートナーになるはず。'; $probabillity = '90'; }elsif($qs{'boy'} == 11){ $result = 'おたがい理解し合うのがむずかしい相性です。感情のすれちがいになりやすく、だからといって無理に合わそうとするとよけいに苦しくなるかもしれません。'; $probabillity = '20'; } } if($qs{'girl'} == 3){ #--- （蟹座と12星座） if($qs{'boy'} == 0){ $result = 'ついぶつかりあってしまうふたりは、愛し始めたときから忍耐を必要とする関係です。かに座の彼女がしっかり彼を愛し、あたたかく接することができれば、彼も誠意を示すでしょう。 '; $probabillity = '20'; }elsif($qs{'boy'} == 1){ $result = '恋愛観の合うふたりです。かに座の彼女はおうし座の彼に安心して甘えることができます。また、彼にとって彼女はかけがえのない相手となるでしょう。'; $probabillity = '70'; }elsif($qs{'boy'} == 2){ $result = 'いまひとつしっくりこないカップルです。かに座女性はクールなふたご座男性に、深い愛をのぞめばのぞむほど苦しくなるかも。長い付き合いを続けるには、ふたご座の旺盛な好奇心を満たしてあげる必要があります。'; $probabillity = '35'; }elsif($qs{'boy'} == 3){ $result = '家庭的な幸せを追求する組み合わせで、お互い心を許しあえたら、最高のカップルになるでしょう。しかし、ふたりは互いにとてもしっと深く、度がすぎると大喧嘩になることも。'; $probabillity = '80'; }elsif($qs{'boy'} == 4){ $result = '上品なかに座の彼女と情熱的なしし座の彼。かに座の彼女には彼が、「高慢な人」と見えるかもしれません。しかし、明るいしし座の彼は彼女を退屈させないでしょう。'; $probabillity = '40'; }elsif($qs{'boy'} == 5){ $result = 'まめな人が多いおとめ座の彼はかに座の不安定な感情をおさえ、安心を与えることができます。結婚にもっとも適した相性で、ロマンチックなカップルになります。'; $probabillity = '75'; }elsif($qs{'boy'} == 6){ $result = 'トラブルに合いやすい相性です。すてきなカップルとしてお付き合いを続けるにはお互い努力が必要です。すこし距離をおきながらコミュニケーションを多く取ることが心がけて。'; $probabillity = '30'; }elsif($qs{'boy'} == 7){ $result = 'ふたりは運命の糸で結ばれているのかも。生活観も一致し、恋愛にも結婚にもピッタリな相性です。お互い理解し合えば、トラブルも避けられます。'; $probabillity = '85'; }elsif($qs{'boy'} == 8){ $result = '自由ないて座男性と、独占欲の強いかに座女性の組み合わせは、忍耐と妥協が必要な相性です。交際が深まるにつれ、感情や生活観のズレが目立ち始めます。軽く付き合うなら楽しい恋人になれるかも。'; $probabillity = '25'; }elsif($qs{'boy'} == 9){ $result = 'まじめで忍耐強いやぎ座の彼と、堅実なかに座の彼女は、誠実な愛が生まれる相性です。ただ、お互い受け身なので、お付き合いが始まるまでに時間がかかるかも。'; $probabillity = '70'; }elsif($qs{'boy'} == 10){ $result = '恋人の一歩手前の関係が、二人にとっていちばん良い距離と言えます。とても頼りになる彼ですが、自由な彼に独占欲の強い彼女は、苦しくなるときも。うまく付き合うためには、彼が彼女に合わせることです。'; $probabillity = '25'; }elsif($qs{'boy'} == 11){ $result = 'たがいにおぎない合える良い相性です。二人の間に誠実な愛が生まれれば、もう離れることはないかも。お互いによく話し合い協力すれば、トラブルも解決できます。'; $probabillity = '80'; } } if($qs{'girl'} == 4){ #--- （獅子座と12星座） if($qs{'boy'} == 0){ $result = 'さっぱりとした性格のおひつじ座男性とダイナミックなしし座女性はぴったりの相性です。お互い、男性的な性格のため衝突もありますが、すぐに仲直りできるでしょう。'; $probabillity = '80'; }elsif($qs{'boy'} == 1){ $result = 'ゆっくりとしたおうし座男性とスピーディなしし座女性では恋のテンポにズレがあるのかも。しし座女性が、「ゆっくり、上品に」を心がければ長続きするでしょう。'; $probabillity = '50'; }elsif($qs{'boy'} == 2){ $result = 'ふたご座の男性にとって、明るくさっぱりとしたしし座女性は魅力的に映るでしょう。しかし、ふたご座男性にとって、情熱的なしし座の愛は苦しいものとなるかもしれません。'; $probabillity = '15'; }elsif($qs{'boy'} == 3){ $result = 'どちらかというと男性的なしし座女性と女性的なかに座男性。微妙に食い違いがある二人です。しし座女性が繊細でかわいい女性を演じるのが上手くいくコツです。'; $probabillity = '35'; }elsif($qs{'boy'} == 4){ $result = 'とても情熱的なカップルになります。出会ったとたん、すぐに恋は燃え上がり、一気にゴールイン！ということもあるでしょう。'; $probabillity = '70'; }elsif($qs{'boy'} == 5){ $result = '何事にも派手好みなしし座女性と、きちょうめんで地味なおとめ座男性。対照的なふたりです。男性がおおらかになれば、二人の親密さは増してくるでしょう。'; $probabillity = '65'; }elsif($qs{'boy'} == 6){ $result = '何事にもほどよく楽しむ優雅な天秤座男性と、派手で情熱的なしし座女性。しし座女性が彼への独占欲を少しだけおさえれば、楽しく素敵な交際が続くでしょう。'; $probabillity = '85'; }elsif($qs{'boy'} == 7){ $result = '開放的な性格のしし座女性とどこか秘密めいたさそり座男性。前途多難なふたりです。ふたりの価値観は大きく違っており、それがトラブルの元となります。歩み寄るためには、二人とも相当大人にならなければいけません。'; $probabillity = '20'; }elsif($qs{'boy'} == 8){ $result = 'ふたりとも明るく陽気で外向的です。しし座の女性はいて座の男性にたいへん魅力を感じることでしょう。とても楽しいお付き合いができます。おおらかな愛でお互い束縛しないことが、二人の間をつなぎつづけます。'; $probabillity = '90'; }elsif($qs{'boy'} == 9){ $result = 'まじめなやぎ座男性と、明るく陽気なしし座女性の組み合わせは少し異質なカップルです。お互いの長所を認め合えば上手くいくでしょう。'; $probabillity = '40'; }elsif($qs{'boy'} == 10){ $result = 'おおらかなしし座とデリケートなみずがめ座。異質な二人ですが、お互いに強い魅力を感じたとき、とても仲の良いカップルになります。ふたりで寄り添ってずっと生きていけます。'; $probabillity = '80'; }elsif($qs{'boy'} == 11){ $result = 'とてもやさしいうお座の男性にしし座の女性はべったり甘えることができます。ただ、やさしすぎる彼の態度に彼女はものたりなく思ってしまうこともあるのかも。'; $probabillity = '60'; } } if($qs{'girl'} == 5){ #--- （乙女座と12星座） if($qs{'boy'} == 0){ $result = '冒険好きなおひつじ座男性と何事にも慎重な乙女座女性。おとめ座女性はおひつじ座男性にたのもしさを感じ、好意を持つことも。でも、次第に彼のおおざっぱな行動に唖然とし、ついていけないと感じるかもしれません。'; $probabillity = '30'; }elsif($qs{'boy'} == 1){ $result = '誠実でしっかりとした金銭感覚のあるおうし座男性と慎重なおとめ座女性はピッタリの相性と言えるでしょう。しかしおたがいが地味な愛情表現なので、進展には時間がかかりそうです。'; $probabillity = '85'; }elsif($qs{'boy'} == 2){ $result = 'ふたりは共通点が多く、同じ目的を持てばしっかりとした関係を築くことができます。しかし、ふたりの考え方には大きな違いがあります。乙女座女性が柔軟なふたご座男性に合わすことができれば、上手くやっていけるでしょう。'; $probabillity = '75'; }elsif($qs{'boy'} == 3){ $result = 'かに座の男性は彼女への独占欲が強く、おとめ座女性にとってときには息苦しく感じることも。また、おとめ座女性からの批評は、かに座男性の苦手とするところです。でも、豊かな愛情をそそいでくれるかに座の彼。愛し合えば幸せいっぱいのカップルになります。'; $probabillity = '65'; }elsif($qs{'boy'} == 4){ $result = 'しし座男性がおとめ座女性にひとめぼれ、という可能性は大ですが、やや傲慢なしし座男性は、繊細なおとめ座女性の感情を無視したり傷つけてしまうことがあるのかも。女性のほうが素直に愛情表現をすることでうまくやっていけます。'; $probabillity = '45'; }elsif($qs{'boy'} == 5){ $result = '慎重で地味なふたりには派手なロマンスはありません。こまやかな愛情で小さな幸せを大きくし、二人でゆっくりと愛を育てていくでしょう。'; $probabillity = '75'; }elsif($qs{'boy'} == 6){ $result = '天秤座男性は楽天的で、きちょうめんさが苦手です。おとめ座女性もてんびん座男性の気楽な態度に満足はできません。しかし、ロマンチックで実際的なふたりは、豊富な会話で精神的な満足を得られるでしょう。'; $probabillity = '40'; }elsif($qs{'boy'} == 7){ $result = 'むすばれればふたりはいい相手となりますが、どこに共通点を見つけるかが決め手です。気取らずに、素直に接していけばきっといいカップルになるでしょう。'; $probabillity = '70'; }elsif($qs{'boy'} == 8){ $result = 'すぐ行動に移すいて座の彼に、おとめ座女性は唖然としてしまいます。ややガサツないて座男性は、気が付かないうちに繊細なおとめ座女性の感情を無視したり傷つけてしまうことがあるでしょう。おたがい、価値観の違いを認識しましょう。'; $probabillity = '30'; }elsif($qs{'boy'} == 9){ $result = 'まじめな性格のやぎ座男性は、おちついた愛をのぞむ乙女座女性とぴったりの相性です。ふたりは共通点も多く、強い信頼関係で結ばれるでしょう。'; $probabillity = '90'; }elsif($qs{'boy'} == 10){ $result = 'おとめ座女性はみずがめ座男性の知的でクリエイティブなところにひかれます。しかし、あくまで「友達の一人」と考えたほうが良いかも。友人として交際するうちに、恋へ発展するかもしれません。'; $probabillity = '40'; }elsif($qs{'boy'} == 11){ $result = 'ふたりはお互いに無いものを補い合う相性です。たくさんのコミュニケーションを取って、意識して助け合えば、良い恋人同士になるでしょう。'; $probabillity = '60'; } } if($qs{'girl'} == 6){ #--- （天秤座と12星座） if($qs{'boy'} == 0){ $result = 'エレガントな彼女と情熱的な彼。正反対の性格のふたりは、出会ったときからひかれ合います。彼の野生的な魅力を、彼女が素直に受け入れられたら、幸せなカップルになれます。'; $probabillity = '65'; }elsif($qs{'boy'} == 1){ $result = '美的センスの合うふたりです。しかし、彼女はおうし座の彼の嫉妬心の強さに、とまどうことが多いでしょう。'; $probabillity = '15'; }elsif($qs{'boy'} == 2){ $result = '共通の話題で楽しく盛り上がれるふたりです。かっこよくてとにかくもてる彼なので、大切にしないと誰かにとられてしまいます。'; $probabillity = '50'; }elsif($qs{'boy'} == 3){ $result = '最初、彼の深い愛情を彼女は好ましく思います。しかし、理性的な彼女は、べたべたしてくる彼がだんだんうっとおしく思えてきたりします。'; $probabillity = '35'; }elsif($qs{'boy'} == 4){ $result = 'しし座の彼は、彼女の望むことをすべてかなえようと努力する人です。華麗で最高の恋になりそうです。'; $probabillity = '90'; }elsif($qs{'boy'} == 5){ $result = '純粋な彼は、上品でエレガントな彼女に強くひきつけられます。やさしい彼が彼女にとことんつくす優雅な恋になりそうです。'; $probabillity = '45'; }elsif($qs{'boy'} == 6){ $result = '趣味も合うし見た目もバランスがとれていてお似合いのふたり、といった感じです。本音を出し合って付き合っていけば、もっと深い愛で結ばれます。'; $probabillity = '75'; }elsif($qs{'boy'} == 7){ $result = '気質の異なった二人です。この二人が恋におちることはめずらしいでしょう。彼女に、彼の良さはわかりにくいのかもしれません。'; $probabillity = '25'; }elsif($qs{'boy'} == 8){ $result = '友情のような恋愛になります。ふたりとも外向的で明るく、フィーリングも合うので、たくさんの友人にかこまれたにぎやかなお付き合いになりそうです。'; $probabillity = '85'; }elsif($qs{'boy'} == 9){ $result = 'かっこいい恋がしたい彼女ですが、彼とそういった形は期待できそうもありません。しかし、本質的には合うふたりです。'; $probabillity = '40'; }elsif($qs{'boy'} == 10){ $result = '知的で楽しいお付き合いができます。彼女は、彼に対して、しつこさと嫉妬心を見せないようにするのがベターです。'; $probabillity = '80'; }elsif($qs{'boy'} == 11){ $result = '甘いムードのロマンチックな恋ができます。彼のやさしさに彼女は舞い上がってしまいそう。しかし、彼はだれにでも優しい人なのです。'; $probabillity = '30'; } } if($qs{'girl'} == 7){ #--- （蠍座と12星座） if($qs{'boy'} == 0){ $result = 'お互いの良さはわかりあえるけど、努力の必要なカップルです。おひつじ座の彼に主導権を与えたほうが上手くいきます。活動的な彼にお供するつもりで。'; $probabillity = '60'; }elsif($qs{'boy'} == 1){ $result = 'いったんむすびつけば強く、情熱的に愛し合うことができる二人です。うまく付き合いを続けるには、秘密を0らずオープンな関係を保つことです。'; $probabillity = '70'; }elsif($qs{'boy'} == 2){ $result = '人を楽しませることに優れているふたご座男性に、さそり座女性は強くひかれます。でも、燃えるような愛をささげても、クールな彼はさめたままかもしれません。女性は片目をつぶるつもりで。'; $probabillity = '35'; }elsif($qs{'boy'} == 3){ $result = '恋愛から結婚へと自然に進展していく最高のカップルです。かに座男性は、さそり座女性におおきなやすらぎを与えることができます。'; $probabillity = '80'; }elsif($qs{'boy'} == 4){ $result = '性格的に正反対のふたりで、彼のリーダーシップも彼女にとっては強引なだけに見えるかも。恋に落ちるときはおたがいの無いものにひかれ合います。彼女の神秘的な魅力に、彼が強くひかれたら上手くいくでしょう。'; $probabillity = '35'; }elsif($qs{'boy'} == 5){ $result = 'お互い理解しあえる良い相性です。でも、愛情表現の消極的なおとめ座男性だから、進展には時間がかかりそう。'; $probabillity = '55'; }elsif($qs{'boy'} == 6){ $result = '考え方の異なるふたりは前途多難な組み合わせです。お互いの性格的な違いを理解し、むすびつけば楽しい交際ができるでしょう。'; $probabillity = '35'; }elsif($qs{'boy'} == 7){ $result = '似た者同士の組み合わせです。安心感があり、すばらしい相性です。ただ、深刻なムードになりがちな二人なので共通の趣味やスポーツで楽しい雰囲気を心がけましょう。'; $probabillity = '80'; }elsif($qs{'boy'} == 8){ $result = 'ひとめぼれですぐに結びつく可能性のあるカップルです。さそり座女性は、自由を好むいて座男性を束縛したり必要以上に干渉したりしてはいけません。彼に頼らずに、フレンドリーな関係を目指しましょう。'; $probabillity = '35'; }elsif($qs{'boy'} == 9){ $result = '地味で着実な人生を歩もうとする似た性格を持った二人です。やぎ座男性はさそり座女性とのコミュニケーションを忘れてはいけません。'; $probabillity = '60'; }elsif($qs{'boy'} == 10){ $result = '知的な魅力を持つみずがめ座男性に、さそり座女性はひかれます。しかし、性格的な感覚の違いからどこかしっくりしないところがあります。トラブルを解決するには、間に入ってくれる人が必要です。'; $probabillity = '25'; }elsif($qs{'boy'} == 11){ $result = 'ふたりは最高の相性です。やさしくて柔軟性のあるうお座男性にさそり座女性は、ハッピー気分で恋ができます。ほのぼのしたカップルになるでしょう。'; $probabillity = '90'; } } if($qs{'girl'} == 8){ #--- （射手座と12星座） if($qs{'boy'} == 0){ $result = '愛情表現が率直で情熱的なふたりは気の合うカップルになれます。おたがいの短気さとわがままさを認め合えば、ケンカをしながらもずっと仲良くやっていけそうです。'; $probabillity = '80'; }elsif($qs{'boy'} == 1){ $result = 'おうし座の彼の、のんびりとした動作やおっとりした性格は、いて座の彼女とテンポが合いません。しかし、おたがい相手に無い魅力を持つ者同士。歩み寄りと努力で恋人同士になることも可能です。'; $probabillity = '25'; }elsif($qs{'boy'} == 2){ $result = 'フィーリングの合うふたりです。知性的で活発なふたご座の彼と、おなじく知的で行動的ないて座の彼女はひかれ合います。しかし、波乱の多いお付き合いになりそうです。'; $probabillity = '35'; }elsif($qs{'boy'} == 3){ $result = 'おたがい相手に無い魅力を持つ者同士で、妙にひかれ合います。しかし、独占欲の強いかに座の彼に、自由に過ごしたいいて座女性は苦しくなりそうです。'; $probabillity = '40'; }elsif($qs{'boy'} == 4){ $result = '愛し合えば、明るいはなやかなカップルになれます。寛大なしし座の彼は、自由を好むいて座の彼女とよい相性です。いて座の彼女は、いつでもしし座の彼を認めてあげる態度を忘れずに。'; $probabillity = '70'; }elsif($qs{'boy'} == 5){ $result = 'いて座の女性はやさしく知性的な彼にひかれ、おとめ座の男性は活発な彼女にひかれるでしょう。しかし、次第に性格の違いがすれ違いを招きます。もしも、おとめ座の男性がスピーディでいて座の女性が相手に求めすぎないならそれなりに上手くいくでしょう。'; $probabillity = '30'; }elsif($qs{'boy'} == 6){ $result = 'お互い社交的で、フィーリングの合うふたり。楽しいお付き合いが続きそうです。てんびん座の彼は、いつもエネルギッシュないて座の彼女にややおされ気味になりそう。'; $probabillity = '75'; }elsif($qs{'boy'} == 7){ $result = 'いて座女性は、さそり座男性の神秘的な魅力にひかれます。また、さそり座男性はいて座女性の明るい魅力にひかれます。しかし、いて座女性は執着心の強いさそり座男性の束縛に覚悟することが必要です。'; $probabillity = '40'; }elsif($qs{'boy'} == 8){ $result = 'おたがい正直で活発、情熱的でスピーディな良い相性です。長く交際を続けるためには、いつもフレッシュな気持ちを忘れずにしましょう。'; $probabillity = '75'; }elsif($qs{'boy'} == 9){ $result = '一見クールで慎重なやぎ座男性とホットないて座女性は、恋愛に発展しにくい相性です。いて座女性にとってやぎ座の男性は、迫力不足でものたりない存在に映ってしまいそうです。'; $probabillity = '35'; }elsif($qs{'boy'} == 10){ $result = '知的なみずがめ座男性は、激しいテンポのいて座女性にうまくついていくことができます。自由で楽天家のふたりはとても気が合い、深く愛し合うことができるでしょう。友人同士のような関係を意識することが長続きのポイントです。'; $probabillity = '70'; }elsif($qs{'boy'} == 11){ $result = 'はじめはけっこう楽しくお付き合いができますが、だんだんうお座の彼のやさしさがいて座の彼女にとってわずらわしくなってくるかも。トラブル克服のカギはいて座女性にかかっています。'; $probabillity = '40'; } } if($qs{'girl'} == 9){ #--- （山羊座と12星座） if($qs{'boy'} == 0){ $result = '情熱的な彼に押され、彼女にとってドキドキハラハラの恋になりそうです。彼のエネルギッシュでわがままなところは反面教師とわりきっていきましょう。'; $probabillity = '30'; }elsif($qs{'boy'} == 1){ $result = '考え方もテンポもぴったり合うふたりです。彼女は独占欲の強い彼の嫉妬心を理解して、あまり刺激しないようにしましょう。'; $probabillity = '50'; }elsif($qs{'boy'} == 2){ $result = 'ふたりの愛の考え方には大きな違いがあるようです。女性から好きになった場合は、きっかけ作りが大変そう。'; $probabillity = '30'; }elsif($qs{'boy'} == 3){ $result = 'おたがい違ったものを持つふたりですが、不思議とひきつけられます。彼女のほうが精神的に大人であることが上手くいく条件です。'; $probabillity = '65'; }elsif($qs{'boy'} == 4){ $result = 'しし座の彼は情熱的に強引に彼女にアタックしてくるでしょう。山羊座の彼女がほめ上手になることが円満の秘訣です。'; $probabillity = '40'; }elsif($qs{'boy'} == 5){ $result = '良い組み合わせです。長く続く愛を育てられます。やさしくてまじめな彼に、彼女は好感を持つでしょう。'; $probabillity = '80'; }elsif($qs{'boy'} == 6){ $result = 'てんびん座の彼の美的センス、山羊座の彼女の独特な雰囲気にお互いひかれ合います。しかし生活観の違いが大きく、かなりの努力が必要な相性です。'; $probabillity = '30'; }elsif($qs{'boy'} == 7){ $result = '口数の少ない地味なカップルになりそうですが、彼女にとって彼は信頼できる人。安心して心をひらくことができる相手です。デートは明るい雰囲気を心がけましょう。'; $probabillity = '75'; }elsif($qs{'boy'} == 8){ $result = 'やぎ座の彼女は活発でリーダー的ないて座の彼に憧れますが、お付き合いとなるとついていけないものを感じるかもしれません。'; $probabillity = '30'; }elsif($qs{'boy'} == 9){ $result = '交際がはじまるまでに時間がかかりそうです。でも時間をかけて徐々に深まっていく愛なので、確実なものになります。'; $probabillity = '90'; }elsif($qs{'boy'} == 10){ $result = '知性的でクールな彼にやぎ座の彼女はひかれます。そして、華やかなお付き合いになりそうです。しかしデートを重ね、彼を深く知るうちに、彼女の最初の気持ちは薄れていくかもしれません。'; $probabillity = '40'; }elsif($qs{'boy'} == 11){ $result = '現実主義の彼女とロマンチックな彼は、意外といい組み合わせです。ともに愛し愛されるカップルになります。'; $probabillity = '70'; } } if($qs{'girl'} == 10){ #--- （水瓶座と12星座） if($qs{'boy'} == 0){ $result = '相性の良い二人です。お互い強い個性を持っています。ふたりがともに強く自己主張してしまうと、険悪な雰囲気になってしまいます。一歩ゆずる気持ちを忘れずに。'; $probabillity = '75'; }elsif($qs{'boy'} == 1){ $result = '価値観の違うこのふたりが恋におちるのは、まれなことです。お付き合いをした場合、独占欲の強い彼に自由を好む彼女はとまどってしまうかも。'; $probabillity = '30'; }elsif($qs{'boy'} == 2){ $result = '調和のとれたカップルになれます。お互い似たもの同士でべったりとしたお付き合いは苦手。束縛し合うことのないCoolな恋愛ができるでしょう。'; $probabillity = '80'; }elsif($qs{'boy'} == 3){ $result = '家庭的な彼と社交的な彼女。すれちがいのある相性です。彼のべったりとした愛情は彼女に合いません。うまく付き合うためには、相手を理解して合わせる努力が必要です。'; $probabillity = '15'; }elsif($qs{'boy'} == 4){ $result = 'お互いひきつけられる相手です。似たもの同士で、ふたりともにぎやかな雰囲気を好みます。彼女が彼の欠点をおおらかに認めることができれば、人生のパートナーにもなれるでしょう。'; $probabillity = '80'; }elsif($qs{'boy'} == 5){ $result = 'ほのぼのとした恋ができますが、とても繊細な彼と、自由で個性的な彼女の組み合わせには、”ずれ”があります。彼が彼女に合わすのは少し無理があります。彼女が彼に合わすことができればうまくいくでしょう。'; $probabillity = '40'; }elsif($qs{'boy'} == 6){ $result = 'ロマンチックで、とても楽しいおしゃれなお付き合いができます。ふたりとも話題が豊富で、時間も忘れて語り合うでしょう。'; $probabillity = '95'; }elsif($qs{'boy'} == 7){ $result = 'トラブルの多い恋になりそう。彼女が彼の嫉妬心にうんざりするようになれば、終わりが近いかも。。。'; $probabillity = '15'; }elsif($qs{'boy'} == 8){ $result = '共通点が多く友人も多くて、話題のつきない楽しいカップルになるでしょう。親友でもあり恋人同士でもある関係になれます。'; $probabillity = '80'; }elsif($qs{'boy'} == 9){ $result = '彼女は、まじめな彼の才能にひかれます。しかし、いまいちノリの合わないふたりです。彼がおおらかな愛で彼女をつつみこむことができれば、親密な関係になれるでしょう。'; $probabillity = '35'; }elsif($qs{'boy'} == 10){ $result = 'フィーリングの合う良い相性です。仲間同士の延長で恋人同士になれるでしょう。お互い信頼し合い、プライバシーを守ってお付き合いをすることが大切です。'; $probabillity = '70'; }elsif($qs{'boy'} == 11){ $result = 'うお座の彼は、彼女をやさしい愛でつつんでくれます。いつもあまい恋愛感情を持っていればよいですが、ふたりに気楽な付き合い方は向いていません。'; $probabillity = '35'; } } if($qs{'girl'} == 11){ #--- （魚座と12星座） if($qs{'boy'} == 0){ $result = '考え方にテンポの違いがあり、歩みよりのできにくい二人です。うお座の彼女が意志表示をはっきりとして、彼にリードをまかせればいい雰囲気になれるでしょう。'; $probabillity = '30'; }elsif($qs{'boy'} == 1){ $result = '生活のテンポもフィーリングもぴったりと合う相性です。グループ交際から自然に恋へと進展していくでしょう。'; $probabillity = '50'; }elsif($qs{'boy'} == 2){ $result = '彼女のしたことが裏目に出てしまったり・・・考え方の違いすぎる二人です。彼女は彼に対して寛大さをもつことが大切ですが、都合のいい女にならないように気を付けましょう。'; $probabillity = '25'; }elsif($qs{'boy'} == 3){ $result = '家庭的なかに座の彼と精神的な生活を充実させたい魚座の彼女はごく自然に結びつきます。共通の話題や趣味を楽しむことも出来るので、お付き合いはスムーズに進みそうです。'; $probabillity = '65'; }elsif($qs{'boy'} == 4){ $result = '大胆な彼とおちついた情緒を大切にしたい彼女。感性が極端に違う二人です。獅子座の彼の雑さや傲慢な態度に魚座の彼女はついていけないかも。彼女が彼にとことん尽くすつもりがあればうまくやっていけそう。彼女がぐちを言ってはだめです。'; $probabillity = '25'; }elsif($qs{'boy'} == 5){ $result = 'ロマンチックな彼女とピュアな彼。ひとめぼれに近い形で恋愛が始まりそう。おたがい愛する人には尽くす二人です。心の距離は少しずつ縮めていきましょう。'; $probabillity = '50'; }elsif($qs{'boy'} == 6){ $result = 'バランス感覚のとれた愛を持つ天秤座の彼に、魚座の彼女があまい関係を望んでも、むずかしいかも。ふたりだけの世界に閉じこもらず、友人たちとの交流を積極的にしましょう。'; $probabillity = '30'; }elsif($qs{'boy'} == 7){ $result = '静かな情熱を秘めて恋がはじまりそう。考え方も行動もテンポが一致しているので、理想的なカップルといえます。'; $probabillity = '90'; }elsif($qs{'boy'} == 8){ $result = 'うお座の女性が彼に恋をしたら振り回されることになりそう。お付き合いが始まったら、いて座の彼を束縛しないことが長続きの秘訣です。'; $probabillity = '40'; }elsif($qs{'boy'} == 9){ $result = '彼は誠実な愛情で彼女を包んでくれますが、彼女はもの足りなさを感じることがあるかも。しかし、やぎ座の彼はうお座の彼女を幸せにできる人です。ふたりだけの世界に閉じこもらず、できるだけ外出しましょう。'; $probabillity = '45'; }elsif($qs{'boy'} == 10){ $result = '彼は、神秘的なうお座の彼女にひとめぼれしてしまいそう。しかし、夢見がちなうお座女性を現実に引き戻そうとする彼です。大切にしないと彼女は去ってしまいます。'; $probabillity = '30'; }elsif($qs{'boy'} == 11){ $result = '一緒にいるだけでとても幸せを感じられるふたりです。ロマンチックな恋ができるでしょう。堅実な計画性を持つことが長続きの秘訣です。'; $probabillity = '70'; } } } #--------- （結果の出力画面です。編集は慎重に～～） sub OutPut{ print "Content-type: text/html\n\n"; print < $title（結果） $body

◆◆◆SIRENS12星座恋占い◆◆◆

二人の恋の行方を占いました。
| 星座選択画面へ |

$constellation[$qs{'girl'}]の彼女

$girl[$qs{'girl'}]

$constellation[$qs{'boy'}]の彼

$boy[$qs{'boy'}]

二人の相性は・・・・・ $probabillity％以上

$result

"; print "

$msg1

\n"; print "

$msg2

\n"; print " | 入力画面へ |"; print "

"; print "\n"; exit; } exit 0; #---------（おしまい）