Last modified: Tue Jan 19 10:43:36 UTC 2010
Addendum to the
Declaration of Human Rights:
|
The unalienable Right to keep and develop and use any Free Operating System and exchange any information thereof shall not be infringed. |
DE MOGELIJKE WERKING EN OF TOEPASSING VOOR WELK DOEL DAN OOK VAN DEZE CODE OP WELKE MACHINE EN/OF ARCHITECTUUR, ANTIEK, MODERN OF TOEKOMSTIG BERUST UITERAARD OP LOUTER TOEVAL EN MAG DE SCHRIJVER DEZES NIET WORDEN AANGEREKEND.
<--*-- START NAGUALL NEPNERDS --*-->
*/ START IPL BIOSPHERE PDP */
INITIALIZE PROCEDURE-QUEUE
INITIALIZE ALARM-CLOCK-MODE
INSPECT PROCEDURE-QUEUE
LOAD PROCEDURE EXCEPTION-HANDLER
LOAD PROCEDURE LISTEN-MODE
SET LISTEN-MODE "ON"
LOAD PROCEDURE INITIAL-WAKE-MODE
SET INITIAL-WAKE-MODE "ON"
LOAD PROCEDURE POST-WAKE-PROCEDURE
WHEN AUDIO-SIGNAL-STATUS "ON"
MOUNT /DEV/BRAIN
LOAD HUMOR-MODE
KILL ALARM-CLOCK
ELSE WAIT
INITIALIZE PROCEDURE POST-WAKE-PROCEDURE
INITIALIZE PROCEDURE GETTER
WHILE COFFEE-MAKER-STATUS "ON"
INITIALIZE SUB-PROCEDURE COMPILE-AIR-POLLUTING-TOBACCO-ROLL
GET TOBACCO
GET CIGARETTE-PAPER
GET LIGHTER
GET AIR-POLLUTING-TOBACCO-ROLL
TORCH AIR-POLLUTING-TOBACCO-ROLL WITH LIGHTER
INITIALIZE PROCEDURE POOR-CUP-OF-COFFEE
INITIALIZE PROCEDURE SIP-COFFEE
INITIALIZE PROCEDURE INHALE-SMOKE
INITIALIZE PROCEDURE EXHALE-SMOKE-WITH-HAPPY-FACE
ELSE WAIT
TEST KEYB_STATUS 177560, 1
TEST PR_STATUS 177564, -1
IPL TTY %% IPL EMACS %%
IF ANY-STATUS !==0
THEN WRITE TTY00
#> . . .
#> > SUBS-NAGGING-MODE ON
#> > SWITCHED TO USER-MODE ON
#> > IPL BIOSPHERE PDP DONE !
#> > READY FOR YOUR COMMAND MY DEVINE MASTER
#>
ELSE
LOOKUP ERROR
WRITE ERROR-MESSAGE TTY00
INITIALIZE ERROR-PROCEDURE
ENDIF
*/ EXCEPTION-HANDLER */
PROCEDURE ERROR-PROCEDURE
LOAD EXCEPTION-HANDLER
IF !COFFEE
THEN GET MAD
ENDIF
IF !TOBACCO
THEN GET RAVING MAD
ENDIF
IF !COFFEE NOT EXOR !TOBACCO
THEN SLEEP
ENDIF
*/ SUB-ROUTINE PROCEDURE GETTER */
SUB-ROUTINE GETTER
INITIALIZE PROCEDURE KICK-SPOUSE-FROM-BED
REDIRECT GET-MODE TO SPOUSE
GET-ITEM COFFEE
GET-ITEM TOBACCO
GET-ITEM CIGARETTE-PAPER
GET-ITEM LIGHTER
IF SPOUSE THROWS EXCEPTION OR DOMESTIC-UTENSILS
THEN
GET DIVORCE
ELSE
INITIALIZE PROCEDURE REALLY-NICE-HUG
INITIALIZE PROCEDURE ENHANCE-FAMILY
ENDIF
*/ END SUB-ROUTINE PROCEDURE GETTER */
POST-ERROR-PROCEDURE
IF !TTY THEN GET ROYALLY-PISSED-OFF
FORCE WINDOWS-MODE AS USER-MODE
EXECUTE WIN.COM
ENDIF
EXCEPTION-HANDLING END
LOOP
*/ END IPL BIOSPHERE PDP */
<--*-- END NAGUALL NEPNERDS --*-->

