Código de Sexta - Feira

Main()

R1=Al_Dente
{
While (Tempo < 18h30)
Trabalhar();
Goto R1;
While (Estado=Sóbrio)
Cerveja();
If (Estado==AindaFrio && Tempo==20h00)
Jantar(Vinho OR Sangria);
If (Estado==Aborrecido && Tempo==21h00)
Goto Pista de Gelo;
While (!Pisado)
Continuar a Cair no Chão();
Goto R1;
While (Sentir o Pisado()==TRUE)
Cerveja();
If (Alc/Sangue> 1.5 && Capacidade Condução==FALSE)
Goto MaKumba;