Essa fórmula demonstra como o meu cérebro e meu coração funcionam com você.
Procedure InvasionOfLove;
const x : integer := 1000;
var i : integer;
begin
for i := to x -1 do
begin
if x < 10 then
begin
ShowMessage('Penso em você '+x+' Vez(es) por dia!');
end
else
ShowMessage('Módulo loucura de amor iniciado, eu penso em você '+x+' por dia porque te amo!');
end;
end;
Function RazaoCoracao();
Begin
Var
Coracao, Cerebro : Integer;
Coracao := 10;
Try
for i := 0 to Coracao.Bia.Love -1 do
begin
Coracao := Coracao+1;
Cerebro := Cerebro + 1;
if cerebro > 1 then
showMessage('Tenho '+Cerebro+' motivo(S) para te esquecer')
else
showMessage('Nenhum motivo para te esquecer foi encontrado, te amo...!');
end;
Except
Cerebro := 0;
if Pergunta('O cérebro foi reiniciado por falta de memória para armazenar tantos motivos, deseja tentar sobrepor a razão ao amor novamente?)=id_yes then
begin
InvasionOfLove;
// veja como funciona o módulo invasão de amor,
// lá em cima bem no inicio.
end
else
ShowMessage('Impossível completar a tarefa razão acima do amor, o amor sempre vai vencer, tempo perdido!');
Exit;
Application.Terminate;
end;
end;
end;
Bom, se você não entendeu é assim que os nerdinhos apaixonados demonstram o seu amor, nem tente entender porque só existem dois tipos de pessoas no mundo, as que sabem programar e as que não sabem.
Resumindo, eu sou louco pela Bianca.
Então curta essa música que é melhor.
http://letras.be/phil-collins/8213/traducao.html
Ever'n Ever your Dexter.
Nenhum comentário:
Postar um comentário