home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / genie-commodore-file-library / C64Software / STRESS-TESTER-92 (.txt) < prev    next >
Encoding:
Commodore BASIC  |  2019-04-13  |  1.0 KB  |  27 lines
  1. 0 REM"[141][145]         [141][145] A 'STRESS TESTER' - THIS IS THE
  2. 1 [143]"GOSUBON        GOSUBON KIND OF PROGRAM THAT COMES OUT OF
  3. 2 REM"[141][145]        [141][145] A PERSON WHO HAS HAD NO SLEEP.
  4. 3 [143]"GOSUBON        GOSUBGOSUBON BROUGHT TO YOU BY PAUL-MB. :) GOSUB
  5. 4 POKE53280,6:POKE53281,0:PRINT"[147]"
  6. 6 PRINTSPC(12)"[158] [211][212][210][197][211][211] [212][197][211][212][197][210] [146]"
  7. 8 PRINT"[155][165][182][146][211][197][206][211][207][210][217] [201][206][208][213][212][181]                     [167]"
  8. 10 FORT=1TO3:PRINT"[155] [146]"SPC(36)" [146]":NEXT
  9. 12 PRINT"[155][165]                                    [167]"
  10. 14 PRINT"[154][201][206][211][212][210][213][195][212][201][207][206][211][160][198][207][210][160][213][211][197]: [208]LACE YOUR"
  11. 16 PRINT"FINGERTIPS ON THE [211]ENSORY [201]NPUT [205]ODULE"
  12. 18 PRINT"ABOVE.  [201]F IT TURNS GREEN[154], THEN YOU"
  13. 20 PRINT"ARE UNDER CONSTANT STRESS.  [201]F IT'S"
  14. 22 PRINT"BLUE[154], YOU ARE UNDER LITTLE STRESS."
  15. 24 PRINT"[201]F IT REMAINS BLACK, YOU ARE NORMAL"
  16. 26 PRINT"AS FAR AS STRESS GOES.  [201]F THE AREA"
  17. 28 PRINT"TURNS RED[154], SHUT OFF YOUR COMPUTER"
  18. 30 PRINT"AND VISIT A COMPUTER PSYCHOLOGIST"
  19. 32 PRINT"IMMEDIATELY."
  20. 34 PRINT"[151][211]TRESS [212]ESTER 1.0 IS [208]UBLIC [196]OMAIN"
  21. 36 PRINT"[198]EEL FREE TO PASS AROUND OR THROW OUT."
  22. 38 PRINT"[151][205]ODULE [210]EADY."
  23. 40 FORT=1TO600:NEXTT
  24. 42 PRINT"             "
  25. 44 FORT=1TO2000:NEXTT
  26. 46 GOTO38
  27.