下沙论坛

标题: 一个女孩写的经典程序!!! [打印本页]
作者: 我不是很叼    时间: 2004-11-1 22:17
标题: 一个女孩写的经典程序!!!
result love(boy, girl) 5 `8 Z# O* r/ M. T4 r2 u { 7 i% m+ [3 e* W( @) F" g4 g- L if( boy.有房() and boy.有车() ) ! C6 {$ g" w; M% k{ 6 I4 s4 |4 `2 C0 c3 q; p; Z" U boy.set(nothing); 3 d' Z6 h2 k$ ^, L7 u, h0 Greturn girl.嫁给(boy); 0 ?5 e& [3 W, r+ G4 Q8 a} % j8 D$ r: M* D! H- e2 d if( girl.愿意等() ) 8 {% x8 _. ?4 o" D; w. q- b. _. Q7 n& ~{ $ ]' h9 |/ P- m- e% _( J7 \whille(!(boy.赚钱 > 100,000 and girl.感情 > 8 ) ) , G p5 t! Y# H{ ) C1 v7 f }9 D& n, G( cfor( day=1; day <=365; day++) " Q3 z! b$ ?$ o" i# B4 k{ : \0 e3 B3 G/ G4 X7 G7 T# wif( day == 情人节 ) 5 `4 V3 R' G1 P- d7 i4 j if( boy.givegirl(玫瑰) ) ; _2 \' Q& ~% t9 V- G) Y( s. ?( ` girl.感情++; M F: U/ V4 y5 I9 g8 V else 5 `# U; b5 z2 w) W, Q8 X7 Jgirl.感情--; ! s b/ p6 F Cif( day == girl.生日) 7 o0 [' Y. U& j# z6 Sif( boy.givegirl(玫瑰) ) # N& h* @: _) O5 a' r+ J% agirl.感情++; - F( i( N( L4 f# T6 l2 A% L# g, V' F else ' U2 y) A- |: Q3 d7 b/ `girl.感情--; $ M8 U7 o3 m. @+ x8 H5 Z7 O boy.拼命赚钱(); 4 Z: {; N" p. D7 T. O7 ?5 i } : N8 X. o0 r2 ` } ) G! q, d& J+ D, C+ ~: k& {2 gif( boy.有房() and boy.有车() ) 8 X1 G0 ]4 b+ E6 n& L { 4 k- v2 y! p( Z, d& I: e/ t7 E& eboy.set(nothing); 3 s' I1 v/ a, K7 E0 Y return girl.嫁给(boy); " R- X, q0 Q/ O* f6 D! n- U0 |: i } , ^# [) A3 B: z8 M# m" X年龄++; . I' s9 ?, k' [: Agirl.感情--; : W5 V. c9 q! q$ V, D} 7 @5 m5 q# }6 w( ^0 ^, a' h H" ^ return girl.goto( another_boy); ( s. X% Y# T4 T2 P! G. o}) s3 D8 {1 M0 x: t2 Z! S% L$ \, v
[此贴子已经被作者于2004-11-1 22:43:08编辑过]
1 I0 L; [: h* f5 c' l! d+ l
作者: 我不是很叼    时间: 2004-11-1 22:48
开心一刻：看后大有感触，顺便也写了一段
# U, v; `* b3 V0 J' {2 `# |- A8 pprivate object love(object boy,object girl)3 W% `1 ^& |0 C' l4 Z0 z
{//假定已对变量boy和gril赋予了人类的各种属性
: v2 d/ q% F: x3 P* B- U3 mswitch(gril.Condition)
% x' e8 v" G5 {$ I. J{' t, E) L7 x/ \+ q
case gril.HaveMuchMoney://如果女孩很有钱: C; _+ J* v% a
{
( M7 [; @4 O7 Q# z! X2 Wboy.love++;3 a1 I6 j' E1 v- n* t6 d4 o) n1 _
boy.GiveRoseToGirl++;
# a9 j+ Y2 o: @6 ]girl.Money--;
" }9 P/ \- J" z9 e0 gif(girl.Money&lt;1000000)
% K) D- \4 g9 m{  y7 i& f2 e& T" V
boy.love--;
' W" z- n! ~7 y0 \1 Aboy.GiveRoseToGirl--;
* j! t5 F( t) D4 ^}) U) C; [. {# l$ O& `7 o
break;
# V% B8 x# b3 X" R4 J# F}' t0 X. H0 m, x0 [. u7 t! D$ x5 o$ D
case gril.HaveBigDroit://如果女孩有至高的权利( ~1 D: i5 \* K, x/ {3 g/ q- h
{
% _8 Z7 q+ C  |4 c+ oboy.love++;% F8 @, F9 S# T! J# Q, [+ o
boy.GiveRoseToGirl++;- C; n2 H, H# J5 j- W
boy.Money++;
  z: d7 @! I1 A( Y5 }  eif(girl.Droit&lt;=0)//一旦女孩失去权利甚至限于挫折之中
  `$ i/ @5 t( {9 O{
3 V* Z0 L3 M* p. U8 @4 i& J& Wboy.love&lt;=0;
, {! B* g% s+ [% I7 S! w' {  Gboy.GiveRoseToGirl=0;     ) L( P2 N( [0 g7 I
}3 O; }) ?0 q3 U* w( D
break;
, g- ~5 |. O4 A5 ?! m}3 Z( [' D4 y' Z6 w4 T
case gril.VeryBeautiful://如果女孩很漂亮4 T3 }" ^9 ]5 |2 n
{9 Y& L& E* l' A# e" W
boy.love++;
) d: v4 p  F8 b3 A0 qboy.GiveRoseToGirl&gt;=999;  G. x7 J3 ~$ k2 n
boy.Money--;
1 z  z0 k1 B) Y4 `! qif(girl.OLd&gt;=30)//女孩的年龄大了5 U; v, m; K; m7 s$ K  T
{
+ k& \9 [9 L; ]8 s+ M: Wboy.love--;
( Y' W, r: V8 a9 U" Pboy.loveOtherBeautifulGirl- I7 M0 _, X: ~2 J
boy.GiveRoseToGirl=0;
5 Q+ \5 F. G4 ^  Y}, }1 \  Z$ u# c3 c/ j1 u9 f" f0 M
break;   
2 s5 n: w2 p# c}
- B7 J& _% M& pcase gril.VertCommonly://如果女孩很普通& }% ]5 A2 @. R( ~
{
* `) S% b& s5 B. H- ~. I, a7 mgril.love++;9 Z" `8 Q  \' z/ x
gril.GiveRoseToBoy++;
1 x  U5 }9 d( Uboy.love++;
; V6 V; N$ o# M) e8 gboy.GiveRoseToGirl&lt;=1;& b0 d- X! V  W. D4 J
if(girl.old&gt;=30)- F; V: |6 U+ c8 j7 P& E! E  z  }/ }
{! I, M& c5 {* S1 C/ p
boy.love--;
( \$ Z: S) A, `/ cboy.GiveRoseToOtherGirl=0;
) _" @- Q2 q9 I+ i0 a* E, Jgril.love++;
4 K0 P7 L! b: o2 y& [gril.GiveMoneyToBoy++;: @9 p& n$ s; Q9 L
boy.love++;1 ~( Z: R, b* i, ]7 L
}
, [) y2 L, \1 x& a. rbreak;  v8 U) [0 L) Q
}/ Y6 \( r$ ^% C
}
) o$ x, r. f6 Q8 F' C1 t, t& z  
" L8 `( w( u  e/ h  }
作者: 煎饼    时间: 2004-11-2 00:02
我也写过程序给MM，但是论坛数据掉了，都没有了，想当初真有性质
作者: 游侠无极限    时间: 2004-11-2 01:53

while(1){

if(boy.propose(money)) break ;

money++;

}

作者: hater315    时间: 2004-11-3 14:45
提示: 作者被禁止或删除 内容自动屏蔽
作者: Q7    时间: 2004-11-6 10:22
呵呵。。。好主意。。。写情书也用程序写。。看不懂~~吹~
作者: 阳光    时间: 2004-11-7 04:53

有点意思！！！

作者: oО柒    时间: 2004-11-9 09:48
```````````````````````写了满好
作者: kevins    时间: 2004-12-31 19:06
学VC中



欢迎光临 下沙论坛 (http://bbs.xiasha.cn/) Powered by Discuz! X3.3