Цитата:

---

if (his_money>0) do;
do while his_money >0;
scandal = scandal+1;
her_money=her_money+1;
his_money=his_money-1;
end;
goto forget_him_baby;
end;
else goto forget_him_baby;

---

оптимистичненько