精华区 [关闭][返回]

当前位置:月光软件>>讨论区精华>>〖软件开发〗>>● ASP>>★ASP的应用★>>恋爱流程表达

主题:恋爱流程表达
发信人: jszk()
整理人: netyum(2002-07-23 19:00:44), 站内信件
#define AND && 
#define OR || 

RESULT love(boy, girl) 



  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.有房() OR 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); 





--
※ 来源:.月光程序代码网 http://www.moon-soft.com.[FROM: 159.226.61.238]

[关闭][返回]






转载请注明:转载自 月光程序代码网 [ http://www.moon-soft.com ]