Joke 版 (精华区)
发信人: bage (沉默是金;少说是银;胡说八道引火烧身), 信区: Joke
标 题: [转寄] [转载] 爱情程序(转载)
发信站: 哈工大紫丁香 (2000年11月19日15:58:09 星期天), 转信
【 以下文字转载自 bage 的信箱 】
【 原文由 bage.bbs@melon.gznet.edu.cn 所发表 】
发信人: yue (全力以赴,专心,专心!!!), 信区: HENU
标 题: [转载] 爱情程序
发信站: 华南网木棉站 (Tue Nov 14 19:40:46 2000), 转信
华工爱情C语言(!!!*^-^*)
#define AND && RESULT love(boy, girl)
void main( )
{
if( boy.有房() AND boy.有车() )
{
boy.Set(Nothing);
return girl.嫁给(boy);
}
else if (girl.愿意等() )
{
next_year:
for( day=1; day<=365; day++)
{
if( day == 情人节 )
if( boy.GiveGirl(玫瑰) )
girl.感情++;
else
girl.感情--;
if( day == girl.生日)
if( boy.GiveGirl(玫瑰) )
girl.感情++;
else
girl.感情--;
boy.拼命赚钱();
}
年龄++;
girl.感情--;
if( boy.有房() AND boy.有车() )
{
boy.Set(Nothing);
return girl.嫁给(boy);
}
else if( boy.赚钱 > 100,000 AND girl.感情 > 8 )
goto next_year;
else
return girl.goto( another_boy);
}
return girl.goto( another_boy);
}
--
※ 来源:.华南网木棉站 bbs.gznet.edu.cn.[FROM: 202.38.253.109]
--
※ 转载:.华南网木棉站 bbs.gznet.edu.cn.[FROM: 202.38.253.109]
--
※ 转寄:.华南网木棉站 bbs.gznet.edu.cn.[FROM: bbs.hit.edu.cn]
--
※ 转载:.哈工大紫丁香 bbs.hit.edu.cn.[FROM: es.hit.edu.cn]
Powered by KBS BBS 2.0 (http://dev.kcn.cn)
页面执行时间:3.468毫秒