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毫秒