下沙论坛

 找回密码
 注册论坛(EC通行证)

QQ登录

QQ登录

下沙大学生网QQ群8(千人群)
群号:6490324 ,验证:下沙大学生网。
用手机发布本地信息严禁群发,各种宣传贴请发表在下沙信息版块有问必答,欢迎提问 提升会员等级,助你宣传
新会员必读 大学生的论坛下沙新生必读下沙币获得方法及使用
查看: 2095|回复: 8
打印 上一主题 下一主题

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

[复制链接]

该用户从未签到

跳转到指定楼层
1
发表于 2004-11-1 22:17:00 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
result love(boy, girl) / n8 k! ~1 F4 u8 {0 V5 @- ]{ & T( u/ k% Z6 ?. V3 f if( boy.有房() and boy.有车() ) - B( Y( ]: U; T, s T{ 8 M7 J+ e& ~( f' W6 U' R' c+ X boy.set(nothing); 3 S3 ] A( t% x& [7 g2 ~! Treturn girl.嫁给(boy); ' F3 b: x' V: O; B0 c7 g } + z" l' P) E/ X0 E5 L- @& F* w9 P) qif( girl.愿意等() ) . i( K# ^. q% q& [8 V0 J& H { ; z- q+ ^' Z" V- awhille(!(boy.赚钱 > 100,000 and girl.感情 > 8 ) ) 9 k9 V) }# R/ a{ ' Z$ _0 u% @4 [: N; m) I, \for( day=1; day <=365; day++) 2 Q4 x" [" }* X7 _: I3 Y3 q { " a3 ^5 Z9 L/ k& c if( day == 情人节 ) 6 R5 \' ^) i; P: uif( boy.givegirl(玫瑰) ) * G1 |' _& W) K" ^! l3 s7 a! kgirl.感情++; 7 A$ l% ]+ Y7 {9 I* D% R) U* ~& velse 5 e" R3 z4 S( Z1 Q0 Z9 }8 Xgirl.感情--; , v) P6 O4 j3 }! ^& y0 |if( day == girl.生日) 4 [) N4 {8 T [& h7 }3 {* R if( boy.givegirl(玫瑰) ) % q9 S. h4 \5 h3 }2 D1 } girl.感情++; . J5 G3 n' v8 l" B4 P" ] else 1 L4 d) I8 v3 Y% a7 L. m0 D$ Xgirl.感情--; . o# H3 q* `& C$ Aboy.拼命赚钱(); ! z' i8 v: J/ m; n# C& d( }9 d} 8 V) G/ Y/ h0 s) h) I } $ M3 i0 t1 v6 B$ u6 R& N+ M @ if( boy.有房() and boy.有车() ) $ D$ G4 Y7 `4 L. d6 { { 1 o- d" D D) a8 z' v+ qboy.set(nothing); # C5 O% I) G1 s( T return girl.嫁给(boy); - o2 u0 [) @; F) Z8 O5 X} * G2 P9 n* W2 m( R5 M6 m: F年龄++; 9 r0 S5 p0 K# \5 R% p: |: jgirl.感情--; + o5 q' V2 x/ k7 L# k, c } 6 D5 v, F/ s, K, `) a return girl.goto( another_boy); ; {2 a$ i) O6 n: Z }3 \- F( L O& N& ?$ }
[此贴子已经被作者于2004-11-1 22:43:08编辑过]
1 L, q* O% N/ \8 B2 V D
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 顶 踩

该用户从未签到

2
 楼主| 发表于 2004-11-1 22:48:00 | 只看该作者
开心一刻:看后大有感触,顺便也写了一段
8 r0 f: v" A4 M% h; \private object love(object boy,object girl). `. x, L- h$ u* C6 x; {
{//假定已对变量boy和gril赋予了人类的各种属性
/ G4 h5 c6 E% k" nswitch(gril.Condition), r. Y5 p5 u' P( ]
{
7 o. i, Z: c& g/ Wcase gril.HaveMuchMoney://如果女孩很有钱
* y: P% c  z. t. J9 v{. Z8 T6 F# R8 ~/ P1 N
boy.love++;% g1 {% Q" U/ n" ?  b- g1 A$ s
boy.GiveRoseToGirl++;
& ]' w  |+ y7 e5 q* m5 vgirl.Money--;) O. X# I* f; Q2 Y1 _: i+ x
if(girl.Money&lt;1000000)8 }9 t0 d8 g3 A& K- S
{
9 X/ q4 [) e& bboy.love--;
/ U$ V5 @$ L2 F5 oboy.GiveRoseToGirl--;
' |5 W6 n) i9 m# d$ L}" l. ], r/ W* v4 L  S0 E7 s6 ^
break;
0 f! o3 [$ R& S" R4 p5 [}
: M$ P  J5 J, k1 F6 fcase gril.HaveBigDroit://如果女孩有至高的权利
( @% t  g& m9 X" f" u{
  H/ w* ?" q5 W0 w) Nboy.love++;9 V9 C. j1 M9 J9 _+ i2 F
boy.GiveRoseToGirl++;
- ?6 s! g) b; l4 |- }6 Jboy.Money++;1 d  M5 W% S; f; D, d# ~' _( u. V
if(girl.Droit&lt;=0)//一旦女孩失去权利甚至限于挫折之中* K& u8 k8 c7 Y- g. P( |) H3 [
{
: O6 p* c. a1 U/ @+ }% rboy.love&lt;=0;* P! ?: S( v0 i+ F9 O
boy.GiveRoseToGirl=0;     
/ P/ \" L% U* x$ I1 Y}
" T5 I$ O- J6 j0 }! s8 jbreak;0 p7 {0 w- H$ X8 s; j3 d- T* y
}
$ Q% M+ P# D) t) Hcase gril.VeryBeautiful://如果女孩很漂亮
& X$ m* Y7 \# k% W0 d4 A{! q1 A! t+ ]: [! \1 a
boy.love++;
% A) S8 {6 r" }; o( Y9 M& L, tboy.GiveRoseToGirl&gt;=999;
- n% m( n7 l! O0 @% X5 ^. r6 rboy.Money--;  {3 Q. |) z1 P1 n% p
if(girl.OLd&gt;=30)//女孩的年龄大了
9 }+ t, Z  t( @9 H5 K4 `{9 I0 J0 V! ^* U% E
boy.love--;8 a' b: n8 \& D6 a
boy.loveOtherBeautifulGirl  ], _- u% y* O! I. I+ h
boy.GiveRoseToGirl=0; 7 v7 X2 y5 W& t
}
3 R9 B& i# ^2 h7 h8 ?; Nbreak;   
& \6 V3 E4 i/ R! r6 B}4 M! w1 B4 G# l9 z/ l9 R3 y
case gril.VertCommonly://如果女孩很普通4 C  L2 g8 }; q$ R! L* y2 y; ?2 C
{3 @5 N7 o; Z! I- c: ]# }
gril.love++;
4 ~; f8 u' ?9 i' l! m9 Wgril.GiveRoseToBoy++;0 o/ [& ?) k6 B9 _" I, U% s+ g, Z
boy.love++;
! T1 B+ V7 v* m$ L4 {1 cboy.GiveRoseToGirl&lt;=1;
& Y2 h  ]2 L7 A5 G& t: U9 o9 dif(girl.old&gt;=30)  o* z' F3 y5 O* @6 S5 G* C% k$ r$ z" G
{. m9 {& e3 |( B8 |
boy.love--;$ f( R* I3 W9 U7 m2 f* f8 s/ F4 z
boy.GiveRoseToOtherGirl=0;5 F) d$ }' N4 w7 f+ j
gril.love++;
: E5 X# f" p" xgril.GiveMoneyToBoy++;
( _1 G# f- Z/ V; R" K) Y5 s' T# ?boy.love++;* J7 f9 U9 {+ I7 O: k2 `
}
& T! s3 k0 b, K; Q8 Ebreak;* Z6 p/ t0 O: P" f
}
0 n2 V% o* {' @1 g}% [) D7 [' p; d# W) r
  
9 E: Y; w% t4 ?* Y; }+ Q' w  }
  • TA的每日心情
    奋斗
    前天 10:07
  • 签到天数: 2385 天

    [LV.Master]伴坛终老

    3
    发表于 2004-11-2 00:02:00 | 只看该作者
    我也写过程序给MM,但是论坛数据掉了,都没有了,想当初真有性质

    该用户从未签到

    4
    发表于 2004-11-2 01:53:00 | 只看该作者

    while(1){

    if(boy.propose(money)) break ;

    money++;

    }

    头像被屏蔽
  • TA的每日心情
    奋斗
    2018-4-25 09:36
  • 签到天数: 1 天

    [LV.1]初来乍到

    5
    发表于 2004-11-3 14:45:00 | 只看该作者
    按照这个标准。。。。。
  • TA的每日心情
    开心
    2023-3-31 09:11
  • 签到天数: 9 天

    [LV.3]偶尔看看II

    6
    发表于 2004-11-6 10:22:00 | 只看该作者
    呵呵。。。好主意。。。写情书也用程序写。。看不懂~~吹~

    该用户从未签到

    7
    发表于 2004-11-7 04:53:00 | 只看该作者

    有点意思!!!

    该用户从未签到

    8
    发表于 2004-11-9 09:48:00 | 只看该作者
    ```````````````````````写了满好

    该用户从未签到

    9
    发表于 2004-12-31 19:06:00 | 只看该作者
    学VC中

    本版积分规则

    关闭

    下沙大学生网推荐上一条 /1 下一条

    快速回复 返回顶部 返回列表