下沙论坛

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

QQ登录

QQ登录

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

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

[复制链接]

该用户从未签到

跳转到指定楼层
1
发表于 2004-11-1 22:17:00 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
result love(boy, girl) 7 ]! [9 K2 {8 F/ ~5 I* V) Z, `: {$ _" K1 Q { 7 l2 `% k7 t9 |9 N. k! D if( boy.有房() and boy.有车() ) + o8 k5 \9 g V; j { 7 }- _ Y. x5 l2 I3 b) u t6 Y- iboy.set(nothing); + c# h% _9 U8 Y& o( nreturn girl.嫁给(boy); 4 G' T- f7 C9 C, [9 s& o: O! `} 9 S2 v5 e" y1 y) W+ Pif( girl.愿意等() ) - u) f) B- J5 ^ y% ` { 6 x) ^2 Z: A. P4 [. Z, swhille(!(boy.赚钱 > 100,000 and girl.感情 > 8 ) ) + G; a4 w" _( J _) ` { ! M$ {9 b5 f5 J* n8 X" L for( day=1; day <=365; day++) # T! T ?0 X( d4 D+ B { / @; ]1 V% C- y4 o8 P( p8 k! a if( day == 情人节 ) / [& B3 h8 A$ L- d% [if( boy.givegirl(玫瑰) ) + B# t, k/ n$ Z$ _2 @- `4 g girl.感情++; 1 r3 j) v; O5 d# x. X: velse % H( W6 Q& F8 Y; J& egirl.感情--; ; H. c; |$ P0 G$ h% s; b' j3 _if( day == girl.生日) " I& H& k" \8 a, ~% ?( yif( boy.givegirl(玫瑰) ) 6 A6 P: L z$ b$ }0 v' ~4 j$ P girl.感情++; - E" l! `% T8 |+ L0 W F5 ^' J( @( F* v) Zelse ' \4 G1 ^* k" J( g3 A: H girl.感情--; 0 V: @* v9 g# q" Tboy.拼命赚钱(); 2 `9 B! ^! u8 g* U# f } # R4 Z4 R* F- B6 L& o1 L! r} - n% x% _* X0 k+ G) |* V" g8 Kif( boy.有房() and boy.有车() ) 6 r. c9 Y6 K% ?7 | { 7 m& D( y/ F1 g: u$ O2 `* D8 r( ~boy.set(nothing); 0 h) u. b( m9 K. E6 Ireturn girl.嫁给(boy); % E6 V# Z6 k% u( L ?; Q } + b. L. s& Y6 `8 k' J年龄++; 2 m! u5 g9 ^: _3 P) _girl.感情--; $ j' a) n0 i; v% ]; U } : j/ e8 r$ u$ ~2 L return girl.goto( another_boy); 6 ` P' D- @0 i% o} ' X% Z2 D' [3 R; }4 p+ v0 ]1 o
[此贴子已经被作者于2004-11-1 22:43:08编辑过]
1 N% @% j5 V- X& r0 s2 s. p
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 顶 踩

该用户从未签到

2
 楼主| 发表于 2004-11-1 22:48:00 | 只看该作者
开心一刻:看后大有感触,顺便也写了一段
8 I6 A1 B8 _0 G0 u& Qprivate object love(object boy,object girl)
5 s" G- x7 J9 M* T$ |  h* K{//假定已对变量boy和gril赋予了人类的各种属性& N7 @% t) ~; ^" ]: c9 o6 ^1 a; @
switch(gril.Condition). Y& z: |2 i  n1 o# N2 R% _
{
; t  o- i( D, F. @8 ncase gril.HaveMuchMoney://如果女孩很有钱
7 @# R+ U. e; L0 k: m{; b' B% i' ^9 ], A+ Q1 G) s
boy.love++;
7 _- m. ~% ]5 ?: R9 \# qboy.GiveRoseToGirl++;
0 |$ r) _$ p/ V4 h! M6 W. qgirl.Money--;0 A6 P; e  c' j9 z3 {4 O
if(girl.Money&lt;1000000)
1 J; O- R+ L% `5 {: M{5 _/ z% P' C* B1 {) P/ i5 j
boy.love--;$ Z8 Z4 ^0 }, B' z9 _, r7 d
boy.GiveRoseToGirl--;- p* M' u3 Z$ z/ K$ P
}& W: b& ~$ u" U. g: }# J& x
break;
! H7 |4 b( q: d0 ^}
- J5 E& g, m. @( Z- b; {( ucase gril.HaveBigDroit://如果女孩有至高的权利9 e- u  f3 O: r3 _
{! p$ c4 i" O- O3 f6 Z9 c& n( U7 }. M- E4 z
boy.love++;6 W0 e6 _& ]) a
boy.GiveRoseToGirl++;
9 s3 N1 M; \" J  ?( W6 Q% V6 R; f' mboy.Money++;
# n& ~8 k# f2 T1 ]( h8 l; Lif(girl.Droit&lt;=0)//一旦女孩失去权利甚至限于挫折之中
8 i! G7 d9 \( m4 y* c5 b{' F6 g: K5 w1 k# O& V3 J( t$ o/ F
boy.love&lt;=0;+ j) M9 d2 V& O( Q4 j
boy.GiveRoseToGirl=0;     9 l* z' Z' P; ^- g% e
}
2 G3 }+ W; J2 a8 D5 X! T2 K$ d- Hbreak;! V( e% y6 C  P
}
4 B  o- z( x+ A# U. T, s) p- Jcase gril.VeryBeautiful://如果女孩很漂亮
" l2 A) O4 E4 }  R4 T  Z) b{
7 H5 q# W( |, U- s  w- uboy.love++;; r% B) w$ m9 S. `
boy.GiveRoseToGirl&gt;=999;2 I! M! Q- ^' n8 R% [5 l
boy.Money--;1 M# `0 `' S* K& `( k: Y5 X) O. [
if(girl.OLd&gt;=30)//女孩的年龄大了
& ^7 }" P6 D4 H' B+ H{9 _  S/ H/ K, m- Q, Y( |9 k& v* A
boy.love--;/ R& ]( Q. ^7 q, B8 z1 M
boy.loveOtherBeautifulGirl
6 D1 F0 s- i7 [boy.GiveRoseToGirl=0; 5 u4 ?" A0 Z& u! P$ b' w7 Z
}
1 }3 b# @8 k, m+ Ebreak;    ) X. ~+ L: m- `0 c7 I
}: s5 O& k$ T/ A& o3 ]+ W, `. c
case gril.VertCommonly://如果女孩很普通
* H+ w) Z4 N0 |1 E+ W3 y, S, Q+ G% I{
7 k' {9 I$ w0 g: p; A1 J9 e1 Fgril.love++;
& E) W) g3 y# k  \# T4 Q3 \/ jgril.GiveRoseToBoy++;# d/ R( n9 x( f% \/ r3 U0 P" k4 J
boy.love++;4 F! J& \* R# U
boy.GiveRoseToGirl&lt;=1;, c0 X9 T; y+ p, P, L) ^
if(girl.old&gt;=30)* {* J8 k% ^$ Y
{
* j/ b- v: h+ N+ z9 S1 a& n! f8 Y# uboy.love--;% y  R) K+ o2 R  [
boy.GiveRoseToOtherGirl=0;
$ k4 ]! l9 A) Y' Dgril.love++;& j+ e/ ]8 j% M9 H1 h' N$ e- ^
gril.GiveMoneyToBoy++;
1 B4 I! C4 W9 Gboy.love++;
8 B6 Z* ~  O2 \; k5 h  G2 F9 q8 S}
, Q! n1 p; S- l! J% G: G7 G# S' cbreak;
& |' {( `2 R# J: r9 W* ^0 W0 z}
$ H. U' \( H5 c" `6 D4 ?}2 ]5 y  ^. u+ @: q
  * [  F% W+ n2 L1 A$ [; _6 P+ r
  }
  • TA的每日心情
    奋斗
    前天 14:14
  • 签到天数: 2401 天

    [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 下一条

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