/* 靚仔追女程式 */
/* 有C語言基礎閱讀效果更佳. :) */

result love(boy, girl)

{
if( boy.有房() and boy.有車() )
{
boy.set(nothing);
return girl.嫁給(boy);
}

if( girl.願意等 () )
{
while(!( boy.賺錢 > 100,000 and girl.感情 > 8 ) )

{
for( day=1; day <=365; day++)
{
if( day == 情人節 )
if( boy.givegirl(玫瑰) )
girl.感情++;
else
girl.感情--;

if( day == girl.生日)
if( boy.givegirl(玫瑰) )
girl.感情++;
else
girl.感情--;
boy.拼命賺錢();
}
}

if( boy.有房() and boy.有車() )
{
boy.set(nothing);
return girl.嫁給(boy);
}

年齡++;
girl.感情--;
}

return girl.goto( another_boy);

}

--~--~-----~--~----~-----~----~