|
WEEKDAY |
BEGSR |
||||
|
DAYS |
ADD |
1 |
NEXT-DAY |
||
|
DOUEQ |
NEXT-DAY |
||||
|
TIME |
IFLT |
7.00.02 |
|||
| GOTO |
NEXT-SECOND |
||||
| ENDIF | |||||
|
TIME |
IFGE |
7.00.02 |
|||
|
TIME |
ANDLT |
7.05.30 |
|||
|
MOVE |
'Rrrringg' |
ALARM-CLOCK |
|||
|
MOVE |
KICK |
ALARM-CLOCK |
|||
| GOTO |
NEXT-SECOND |
||||
|
ENDIF |
|||||
|
TIME |
IFGE |
7.05.32 |
|||
|
TIME |
ANDLT |
7.10.50 |
|||
|
MOVE |
BODY |
TOILET |
|||
|
MOVE |
URINE |
OUT |
|||
|
MOVE |
BODY |
SHOWER |
|||
|
MOVE |
WATER |
DOWN |
|||
|
MOVE |
'Brrrrrrr' |
MESSAGE |
|||
| GOTO |
NEXT-SECOND |
||||
|
ENDIF |
|||||
|
TIME |
IFGE |
7.10.52 |
|||
|
TIME |
ANDLT |
7.16.00 |
|||
|
MOVE |
COFFEE |
CUP |
|||
|
MOVE |
COMFITURE |
BREAD |
|||
|
MOVE |
BREAD |
MOUTH |
|||
|
MOVE |
CUP |
MOUTH |
|||
| GOTO |
NEXT-SECOND |
||||
|
ENDIF |
|||||
|
TIME |
IFGE |
7.16.48 |
|||
|
TIME |
ANDLT |
7.21.00 |
|||
|
SEXE |
ANDEQ |
MALE |
|||
|
PERFORM |
SHAVING |
||||
| GOTO |
NEXT-SECOND |
||||
|
ENDIF |
|||||
|
TIME |
IFGE |
7.21.08 |
|||
|
TIME |
ANDLT |
7.24.00 |
|||
|
PERFORM |
TOOTH-BRUSH |
||||
| GOTO |
NEXT-SECOND |
||||
|
ENDIF |
|||||
|
TIME |
IFGE |
7.24.32 |
|||
|
TIME |
ANDLT |
7.35.00 |
|||
|
MOVE |
KISS |
PARTNER |
|||
|
MOVE |
KISS |
KIDS |
|||
|
MOVE |
BODY |
CAR |
|||
|
MOVE |
CAR |
HIGHWAY |
|||
| GOTO |
NEXT-SECOND |
||||
|
ENDIF |
|||||
|
TIME |
IFGE |
7.35.53 |
|||
|
TIME |
ANDLT |
8.41.00 |
|||
|
MOVE |
CAR |
TRAFFIC JAM |
|||
|
NEXT-SECOND |
|||||
|
ENDIF |
|||||
|
TIME |
IFGE |
8.59.44 |
|||
|
TIME |
ANDLT |
9.01.52 |
|||
|
MOVE |
CAR |
OFFICE |
|||
|
MOVE |
BODY |
DESK |
|||
|
MOVE |
SIGH |
BREST |
|||
| GOTO |
NEXT-SECOND |
||||
| ENDIF | |||||
|
TIME |
IFGE |
9.01.53 |
|||
|
TIME |
ANDLT |
12.21.00 |
|||
|
PERFORM |
LABOR |
||||
|
NEXT-SECOND |
|||||
|
ENDIF |
|||||
|
TIME |
IFGE |
12.22.03 |
|||
|
TIME |
ANDLT |
13.00.00 |
|||
|
MOVE |
BODY |
RESTAURANT |
|||
|
MOVE |
BREAD |
MOUTH |
|||
|
MOVE |
SOUP |
MOUTH |
|||
|
MOVE |
BREAD |
MOUTH |
|||
|
MOVE |
COFFEE |
MOUTH |
|||
|
NEXT-SECOND |
|||||
|
ENDIF |
|||||
|
TIME |
IFGE |
13.00.01 |
|||
|
TIME |
ANDLT |
13.04.44 |
|||
|
MOVE |
BODY |
TOILET |
|||
|
MOVE |
PANTS |
DOWN |
|||
|
MOVE |
FAECES |
DOWN |
|||
|
MOVE |
PANTS |
UP |
|||
|
NEXT-SECOND |
|||||
|
ENDIF |
|||||
|
TIME |
IFGE |
13.04.45 |
|||
|
TIME |
ANDLT |
17.34.46 |
|||
|
MOVE |
BODY |
DESK |
|||
|
MOVE |
SIGH |
BREST |
|||
|
PERFORM |
LABOR |
||||
|
NEXT-SECOND |
|||||
|
ENDIF |
|||||
|
TIME |
IFGE |
17.34.46 |
|||
|
TIME |
ANDLT |
17.35.00 |
|||
|
MOVE |
'Tralala' |
MESSAGE |
|||
|
MOVE |
BODY |
CAR |
|||
|
MOVE |
CAR |
HIGHWAY |
|||
| GOTO |
NEXT-SECOND |
||||
|
ENDIF |
|||||
|
TIME |
IFGE |
17.35.53 |
|||
|
TIME |
ANDLT |
18.51.19 |
|||
|
MOVE |
CAR |
TRAFFIC JAM |
|||
|
NEXT-SECOND |
|||||
|
ENDIF |
|||||
|
TIME |
IFGE |
18.52.20 |
|||
|
TIME |
ANDLT |
19.10.55 |
|||
|
MOVE |
KISS |
PARTNER |
|||
|
MOVE |
KISS |
KIDS |
|||
| GOTO |
NEXT-SECOND |
||||
|
ENDIF |
|||||
|
TIME |
IFGE |
19.11.53 |
|||
|
TIME |
ANDLT |
19.31.52 |
|||
|
MOVE |
BODY |
DINNER |
|||
|
MOVE |
POTATOES |
MOUTH |
|||
|
MOVE |
STEAK |
MOUTH |
|||
|
MOVE |
VEGETABLES |
MOUTH |
|||
|
MOVE |
WATER |
MOUTH |
|||
|
MOVE |
POTATOES |
MOUTH |
|||
|
MOVE |
WATER |
MOUTH |
|||
|
MOVE |
VEGETABLES |
MOUTH |
|||
| GOTO |
NEXT-SECOND |
||||
|
ENDIF |
|||||
|
TIME |
IFGE |
19.31.53 |
|||
|
TIME |
ANDLT |
23.31.53 |
|||
|
MOVE |
BODY |
TELEVISION |
|||
|
MOVE |
FINGER |
BUTTON |
|||
|
MOVE |
BODY |
CHAIR |
|||
|
MOVE |
EYES |
TELEVISION |
|||
|
NEXT-SECOND |
|||||
|
ENDIF |
|||||
|
TIME |
IFGE |
23.31.54 |
|||
|
TIME |
ANDLT |
23.33.31 |
|||
|
MOVE |
'Mwhaa, I'm tired' |
MESSAGE |
|||
|
MOVE |
BODY |
BATHROOM |
|||
|
PERFORM |
TOOTH-BRUSH |
||||
|
MOVE |
PYAMA |
BODY |
|||
|
MOVE |
BODY |
BEDROOM |
|||
| GOTO |
NEXT-SECOND |
||||
|
ENDIF |
|||||
|
TIME |
IFGE |
23.33.32 |
|||
|
TIME |
ANDLT |
23.45.44 |
|||
|
RANDOMIZE |
HEADACHE |
||||
|
HEADACHE |
IFEQ |
*FALSE |
|||
|
PERFORM |
SEX-INTERCOURSE |
||||
|
ENDIF |
|||||
| GOTO |
NEXT-SECOND |
||||
|
ENDIF |
|||||
|
TIME |
IFGT |
23.45.55 |
|||
|
MOVE |
BODY |
DOWN |
|||
|
ENDIF |
|||||
| NEXT-SECOND |
TAG |
||||
|
CLOCKWORK |
|||||
©2002 JanBais The Algorithm of an Average Taxpayer's Life The Hague The Netherlands