Imports Universe.MilkyWay.Sol.Earth.US.NC.Wake.WakeForest.East.Dunpatrick.642
Protected WithEvents House as System.Constructs.House
Protected WithEvents jSmits as System.Being.Human
Protected WithEvents subconscious as System.Being.Psychology.Subliminal(jSmits)
Private Class jSmitsMorning
Private function awaken()
Define alarm as System.Constructs.AlarmClock;
alarm.Buzz();
jSmits.Wake();
WalkToBathroom();
End function
Private function WalktoBathroom()
jSmits.Step(House.Bathroom, 5);
Urinate();
BrushTeeth();
End Function
Private function Urinate()
jSmits.Pee();
End Function
Private function BrushTeeth()
Define faucet as System.Constructs.Faucet;
Define water as System.Elements.Water;
faucet.Activate();
faucet.Stream(water);
subconscious.Dread();
Define Colgate as System.Constructs.Toothpaste;
Define toothbrush as System.Constructs.Toothbrush;
toothbrush.Brush("teeth", 62);
jsmits.Rinse("mouth")
toothbrush.Deactivate()
faucet.Deactivate()
End Function
End Class
posted on
Thursday, January 07, 2010 7:57 PM |