下沙论坛

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

QQ登录

QQ登录

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

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

[复制链接]

该用户从未签到

跳转到指定楼层
1
发表于 2004-11-1 22:17:00 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
result love(boy, girl) 5 w( Y: q" R3 ~9 T+ E% m Q( Y{ ' ^ n) R+ t: r7 P if( boy.有房() and boy.有车() ) 7 Q2 g- n8 i* I" b3 F0 f' m8 p2 a( W( C{ 6 m' N5 Y p! {' \" Uboy.set(nothing); 5 E, G7 H2 i% greturn girl.嫁给(boy); 2 b6 x7 q: n+ Q' ]" `4 w3 {1 |. T8 g } ; {7 R( f* z# B. D5 m' Sif( girl.愿意等() ) * T+ B- e; i; z+ C' s2 X l{ 1 Z+ d1 ]' J+ C4 p% W: s4 T$ twhille(!(boy.赚钱 > 100,000 and girl.感情 > 8 ) ) 9 ^) F( |$ W) x2 L3 s6 w { - W }" W& y0 a! F- s; J- V3 E for( day=1; day <=365; day++) 4 {) t0 S8 D/ i8 k. M& n{ * @1 P2 u# m/ W& T( m- l ?" {* D- Aif( day == 情人节 ) " M2 R* s2 \# s& U9 P, a% z& [* u* E if( boy.givegirl(玫瑰) ) ; H% ?. I/ h1 u1 @8 S$ _1 b n girl.感情++; ( |% T( T$ u! w, k0 H- ^6 J2 aelse 9 x. }: O" h0 M girl.感情--; , @9 d- ]$ Y* a5 s2 l& `if( day == girl.生日) ! `1 U, m. |, U4 c0 @if( boy.givegirl(玫瑰) ) , m. o) f4 q/ q$ K$ I/ {+ Ugirl.感情++; % j1 i$ R9 Q7 g! q; n0 b" C* Belse ; t* B6 M8 f) w' n/ v3 }) x& o2 m# g girl.感情--; : K! ~$ _ F, S zboy.拼命赚钱(); ; R8 P+ ^+ K# u2 H} L: D. `4 u1 Z3 K, ]} 7 L4 I4 [# F. c. s if( boy.有房() and boy.有车() ) # `9 X$ p: k5 A& _% E4 a{ % |0 {3 {' p# g8 G" P% r3 sboy.set(nothing); O( |$ W9 `1 r) n) [$ P2 Nreturn girl.嫁给(boy); 4 G4 J! o3 B. N7 I) W6 X, n} 3 \+ U# [4 e; S; I1 ` 年龄++; 9 W- l' Q4 h6 V girl.感情--; & o$ B* w( g1 k {# X- y} # o7 m' q' S4 a6 j% c return girl.goto( another_boy); " |3 C ~* C2 p% A& {$ q }4 p j9 U2 ]3 \* V0 h
[此贴子已经被作者于2004-11-1 22:43:08编辑过]
2 x2 h; ~0 t' h3 ^! V4 e
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 顶 踩

该用户从未签到

2
 楼主| 发表于 2004-11-1 22:48:00 | 只看该作者
开心一刻:看后大有感触,顺便也写了一段
3 Z5 v# W4 e6 i% E- Rprivate object love(object boy,object girl)  R. c) c2 N7 p9 h; _; E; c
{//假定已对变量boy和gril赋予了人类的各种属性
* j- T0 I* I& z' ~switch(gril.Condition)
) p4 E8 D; K$ @& c5 p4 U3 I) a! N8 r{5 C! r% S  O' P% e/ c
case gril.HaveMuchMoney://如果女孩很有钱/ ^3 ~+ Y2 N& u+ |
{
% H  d, \1 A; d  p3 J) Tboy.love++;
) P: d7 z6 @5 e& hboy.GiveRoseToGirl++;5 ~- J# w0 Z$ l, k4 w9 R# O
girl.Money--;
! u3 ]0 }5 _8 S8 G+ ~3 s$ I: Q+ qif(girl.Money&lt;1000000)8 T2 P: o5 i" U' k! [" g
{( U9 T2 w- }  z6 T( p, H$ M
boy.love--;) |; r- `* z) ?
boy.GiveRoseToGirl--;
6 E9 D, \+ [- k# m}7 r. i1 }: C& n, K! Z; v
break;" b" Y( j# R( i7 C# r, T
}
% q0 r1 {" J+ l& l; I1 ocase gril.HaveBigDroit://如果女孩有至高的权利
4 ]) h8 S6 [1 D9 m7 p{
' S) @# F3 p# ]9 B% hboy.love++;
& E% f" q1 {( j: f* Q+ }( uboy.GiveRoseToGirl++;
7 B& Q* T8 n* c& U0 Mboy.Money++;( Y/ L4 _1 h8 ^+ c+ _* w# I0 G
if(girl.Droit&lt;=0)//一旦女孩失去权利甚至限于挫折之中
& c% x8 V9 `& R* Y5 M$ ]. d3 \{# l9 _3 d) z2 I8 ?. R. H+ [
boy.love&lt;=0;) C  a/ R! n# M% c7 y3 b
boy.GiveRoseToGirl=0;     
& j7 I2 u9 G( ^4 `}
4 r1 F! q! U, H4 Rbreak;2 w* m) L. {) I% m7 j% E/ x) Y
}( J- }/ U' D2 G( J2 u& F& z' W
case gril.VeryBeautiful://如果女孩很漂亮
, G* Z! F* @: G{1 B- w$ W/ v+ e' Q4 a
boy.love++;
. B  Z* y! G0 ?8 V7 i* nboy.GiveRoseToGirl&gt;=999;
9 [1 g' R, w+ t1 b4 A& J2 k+ ^boy.Money--;  D" e) ?6 w# A0 d) ]6 s  Q
if(girl.OLd&gt;=30)//女孩的年龄大了  c- Y9 `* V' F) P; P; A' T
{+ W, G& l" o: D  I1 {, }+ O
boy.love--;% V. i. z6 |# H+ |* H
boy.loveOtherBeautifulGirl8 T1 Q5 J$ K) F
boy.GiveRoseToGirl=0;
+ l1 n; x1 J; F' f/ k4 _. w}+ N, ^1 G' g8 x" ^: ?% |
break;      C6 W8 n  ?9 L7 p+ X
}+ Y7 Y; ]5 r5 h0 l) ]; f4 B0 }( M
case gril.VertCommonly://如果女孩很普通2 i. o' d3 d# O' s0 q+ y. G" j
{
* e) n1 Z" D- B1 k" e, |0 S- G3 s4 jgril.love++;4 G4 W, N* @8 ?
gril.GiveRoseToBoy++;! ]3 K4 A1 A0 |$ Q+ Q
boy.love++;7 Y3 `0 Q1 g2 o& ~  [
boy.GiveRoseToGirl&lt;=1;3 D0 S- ]* n% E; \. E
if(girl.old&gt;=30)
3 Z$ d1 W2 l: M/ Q{- g. V  `7 l& G, B/ e
boy.love--;
# k0 F5 c7 ~8 u& ?( pboy.GiveRoseToOtherGirl=0;
9 z# F8 M' j0 z. ogril.love++;
2 d5 D  ~# c) f( T* r0 ogril.GiveMoneyToBoy++;4 B7 H1 |' @2 o/ T
boy.love++;1 y" n; Y8 ~) L& y% y# e
}1 K0 h. y! N4 o$ b  b
break;4 H0 y& V6 D8 s$ ]5 ]- }
}
/ A+ `+ S  C& \7 y) j5 t}
  g, e% N' m1 j4 k0 W0 D  
" o6 J# a' X6 G* I2 G0 h1 j$ ~  }
  • TA的每日心情
    擦汗
    昨天 09:14
  • 签到天数: 2395 天

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

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