一个女孩写的经典程序!!!

我不是很叼

result love(boy, girl) # W* p, u/ z: k{ ! d! K, m) a! D7 Sif( boy.有房() and boy.有车() ) { boy.set(nothing); return girl.嫁给(boy); ; R" A) {) L0 A' _2 C+ l! R* v, i6 Q} / q6 i$ f/ f% @if( girl.愿意等() ) / e4 x \: w) D{ ! B3 x. q' d' O2 U( Q7 Twhille(!(boy.赚钱 > 100,000 and girl.感情 > 8 ) ) { 7 E' i+ r- F6 W8 M' A9 R, _: Sfor( day=1; day <=365; day++) { * w' B) ?. H$ g3 \if( day == 情人节 ) if( boy.givegirl(玫瑰) ) girl.感情++; else 6 _0 V: O: l7 {; b2 _. R7 wgirl.感情--; 3 W- o2 c8 X* t! Pif( day == girl.生日) " H0 v/ B+ P4 K" v' D# bif( boy.givegirl(玫瑰) ) ( ^. u" j2 i0 v6 n9 |3 ygirl.感情++; 7 p5 h# {* W9 o9 t( oelse girl.感情--; boy.拼命赚钱(); - d5 Y+ x& \( H! H; I% n A* t} + f7 s! T2 B% |5 X. v} 6 p6 N. h, i" w6 H! P& Bif( boy.有房() and boy.有车() ) { 9 R/ s* S' F7 N" tboy.set(nothing); ) Q( d7 I' R" U; a7 Preturn girl.嫁给(boy); } 年龄++; girl.感情--; $ S* T8 v; {! r) ^& j, y} return girl.goto( another_boy); }

[此贴子已经被作者于2004-11-1 22:43:08编辑过]

! h8 u: N/ x' T! e

我不是很叼

开心一刻：看后大有感触，顺便也写了一段
, N5 {! u  E( p9 W2 U6 _private object love(object boy,object girl)
{//假定已对变量boy和gril赋予了人类的各种属性
- p! z' o/ S4 h* C, pswitch(gril.Condition)
& @( A3 c0 t' j{
( W1 T( y8 \* ]: X0 ^6 K/ U5 ^/ Dcase gril.HaveMuchMoney://如果女孩很有钱
{
3 v9 I* p; q* e8 O4 r0 M( H: M* oboy.love++;
* _; s  `$ Q" X  B( r6 w; }boy.GiveRoseToGirl++;
& @& F' E, K2 r! F0 W$ Vgirl.Money--;
if(girl.Money&lt;1000000)
* ~6 ^" V6 p- V; F) W{
4 M8 z8 e. A- pboy.love--;
boy.GiveRoseToGirl--;
) _+ P4 _- f$ [9 X}
break;
}
case gril.HaveBigDroit://如果女孩有至高的权利
, ]( k) e- w0 q7 T# J+ k% y* k2 ~{
, `0 d7 u  J) N  a+ Y8 m! nboy.love++;
boy.GiveRoseToGirl++;
" y3 \% t4 c- E2 |7 v! @boy.Money++;
3 E: Y( e* U# F) ?, r0 V' m" Aif(girl.Droit&lt;=0)//一旦女孩失去权利甚至限于挫折之中
( ]6 T6 {# \# Q6 w5 V$ ~4 \: ^{
) p7 z# a7 |4 mboy.love&lt;=0;
: A: `. E# m3 E5 m+ |boy.GiveRoseToGirl=0;     
}
0 I0 C2 e  [' r, kbreak;
. V/ z6 Y. r8 T' p}
case gril.VeryBeautiful://如果女孩很漂亮
{
boy.love++;
boy.GiveRoseToGirl&gt;=999;
boy.Money--;
if(girl.OLd&gt;=30)//女孩的年龄大了
{
+ k, h' a& B9 Y6 S( E, sboy.love--;
boy.loveOtherBeautifulGirl
2 h% A) g. ^3 o& uboy.GiveRoseToGirl=0;
}
7 C) @6 f4 L# C3 [4 i3 Q( xbreak;   
}
1 c; R: H' Q0 G# ecase gril.VertCommonly://如果女孩很普通
. o: v; B' j# ^! f{
gril.love++;
! Z, n1 X/ D7 E& w! Ygril.GiveRoseToBoy++;
boy.love++;
; G2 V  H0 q; e1 e- e7 Hboy.GiveRoseToGirl&lt;=1;
! x) E; R  x; b5 h1 |if(girl.old&gt;=30)
( I5 f8 h( x: |. y{
. G" w  k* ]$ {/ B! vboy.love--;
' I/ r3 u- [% Z9 j8 X3 l4 Sboy.GiveRoseToOtherGirl=0;
gril.love++;
gril.GiveMoneyToBoy++;
  j8 n2 e# t1 d) l8 r, t6 zboy.love++;
}
break;
7 i: S; F0 j* r- q1 q2 U. p0 p}
}
  
  }

煎饼

我也写过程序给MM，但是论坛数据掉了，都没有了，想当初真有性质

游侠无极限

while(1){

if(boy.propose(money)) break ;

money++;

}

hater315

按照这个标准。。。。。

Q7

呵呵。。。好主意。。。写情书也用程序写。。看不懂~~吹~

阳光

有点意思！！！

oО柒

```````````````````````写了满好

kevins

学VC中