Computers SUCK

Computers suck (A non real computer languaged based thought...)

while (My.Status = Alive) { My.UseComputer(); }
print My.Will2live;
end;

Event Will2LiveChanged;
{
if Will2live > 0 My.Status = Alive
else My.Status = Dead;
}

Procedure My.UseComputer();
{
Computer.Start();
if (Hour>8 and hour< 23)
{
Case Computer.Status:
Happy : inc(My.Will2Live);
OK : UseComputer();
UnHappy : dec(My.Will2Live);
Fucked : My.Will2Live=0;
}
}


/run

Will2live is 0
User is dead.
Program ended.

So.. who can guess the status of my PC?