返回列表 回复 发帖
cn2002

管理员

Rank: 9Rank: 9Rank: 9

UID
2031431 
威望
27 点 
金钱
2 金币 
点卡
10 点 
1#
打印
tT
发表于 2004-12-19 17:21 | 只看该作者

[推荐]一段追ＭＭ的电脑程序！

[这个贴子最后由cn2002在 2004/12/19 05:23pm 第 1 次编辑]

一个程序员写了一个追女孩的程序，从中反映出女孩、车、房等等的关系，不知能否运行呢？推荐大家看看。
  1. #define AND &&
  2. RESULT love(boy, girl)
  3. {
  4. 　　if( boy.有房() AND boy.有车() )
  5. 　　{
  6. 　　　boy.Set(Nothing);
  7. 　　　return girl.嫁给(boy);
  8. 　　}
  9. 　　else if( girl.愿意等() )
  10. 　　{
  11. 　　　next_year:
  12. 　　　for( day=1; day<=365; day++)
  13. 　　　{
  14. 　　　　if( day == 情人节 )
  15. 　　　　　if( boy.GiveGirl(玫瑰) )
  16. 　　　　　　girl.感情++;
  17. 　　　　　else
  18. 　　　　　　girl.感情--;
  19. 　　　　if( day == girl.生日)
  20. 　　　　　if( boy.GiveGirl(玫瑰) )
  21. 　　　　　　girl.感情++;
  22. 　　　　　else
  23. 　　　　　　girl.感情--;
  24. 　　　　boy.拼命赚钱();
  25. 　　　}
  26. 　　　年龄++;
  27. 　　　girl.感情--;
  28. 　　　if( boy.有房() AND boy.有车() )
  29. 　　　{
  30. 　　　　boy.Set(Nothing);
  31. 　　　　return girl.嫁给(boy);
  32. 　　　}
  33. 　　　else if! ( boy.赚钱 > 100,000 AND girl.感情 > 8 )
  34. 　　　　goto next_year;
  35. 　　　else
  36. 　　　　return girl.goto( another_boy);
  37. 　　}
  38. 　　return girl.goto( another_boy);
复制代码
收藏 分享 评分
哈哈哈！！！！你的IP是不是？我都知道了！！！
回复 引用

订阅 TOP

ロ圭※ロ塞

超级版主

Rank: 8Rank: 8

UID
2035351 
威望
4 点 
金钱
110440 金币 
点卡
0 点 
2#
发表于 2004-12-19 17:44 | 只看该作者

[推荐]一段追ＭＭ的电脑程序！

不懂啊
我学习不好
看不懂
哈哈
-.┏┒      ';  ┕︽   .                 人活一口气，做人一定要争气﹖   ︸︸﹊﹊︸﹊︸︸﹊︸︸﹊︸︸﹊︸
回复 引用

TOP

断浪

超级版主

Rank: 8Rank: 8

UID
2035831 
威望
9 点 
金钱
31674 金币 
点卡
0 点 
3#
发表于 2004-12-21 04:18 | 只看该作者

[推荐]一段追ＭＭ的电脑程序！

你看的懂就奇怪了。。。。。。
[size=6][color=lightblue]醉卧美人膝[/color][/size] [size=6][color=#FF00aa]醒掌杀人权[/color][/size]
回复 引用

TOP

jhg

新手上路

Rank: 1

UID
2032366 
威望
0 点 
金钱
1007 金币 
点卡
0 点 
4#
发表于 2005-1-1 20:22 | 只看该作者

[推荐]一段追ＭＭ的电脑程序！

可以运行吗？
回复 引用

TOP

xiaohuixy

超级版主

Rank: 8Rank: 8

UID
2034600 
威望
7 点 
金钱
137877 金币 
点卡
0 点 
5#
发表于 2005-1-3 14:01 | 只看该作者

[推荐]一段追ＭＭ的电脑程序！

.................
哈哈 运行啥啊  
[color=#4B0082][fly]天空繁星点点[/fly] [fly]每一个人都是恒星[/fly] [fly]每一个人又都会是流星[/fly] [fly]我宁愿只做流星[/fly] [fly]从你的天空划过[/fly][/color]
回复 引用

TOP

泽取快乐

管理员

Rank: 9Rank: 9Rank: 9

UID
2035980 
威望
8 点 
金钱
-1911 金币 
点卡
0 点 
6#
发表于 2005-1-4 19:34 | 只看该作者

[推荐]一段追ＭＭ的电脑程序！

倒。
什么东西。
忽忽。
好笑。
时间让情感一点点沉淀 那些未曾留意的改变 到底应该划在哪里 如果这世间真的还有 这样的第四种情感 无论你肯或不肯 我都选择等 等到你结束爱情旅程 你越是想要诚恳 其实越残忍 ．．．
回复 引用

TOP

xiaohuixy

超级版主

Rank: 8Rank: 8

UID
2034600 
威望
7 点 
金钱
137877 金币 
点卡
0 点 
7#
发表于 2005-1-7 08:59 | 只看该作者

[推荐]一段追ＭＭ的电脑程序！

呵呵　．．．．
好笑吗？
[color=#4B0082][fly]天空繁星点点[/fly] [fly]每一个人都是恒星[/fly] [fly]每一个人又都会是流星[/fly] [fly]我宁愿只做流星[/fly] [fly]从你的天空划过[/fly][/color]
回复 引用

TOP

linndge

新手上路

Rank: 1

UID
2032839 
威望
0 点 
金钱
1 金币 
点卡
0 点 
8#
发表于 2005-1-8 11:00 | 只看该作者

[推荐]一段追ＭＭ的电脑程序！

我还刚刚学VB,,,看不明白...
回复 引用

TOP

ロ圭※ロ塞

超级版主

Rank: 8Rank: 8

UID
2035351 
威望
4 点 
金钱
110440 金币 
点卡
0 点 
9#
发表于 2005-1-8 19:16 | 只看该作者

[推荐]一段追ＭＭ的电脑程序！

嘿嘿
-.┏┒      ';  ┕︽   .                 人活一口气，做人一定要争气﹖   ︸︸﹊﹊︸﹊︸︸﹊︸︸﹊︸︸﹊︸
回复 引用

TOP

返回列表