HUMOR BASIC
FILE INFORMATION
FILENAME(S): HUMOR BASIC
FILE TYPE(S): PRG
FILE SIZE: 3.2K
FIRST SEEN: 2025-11-30 21:24:58
APPEARS ON: 1 disk(s)
FILE HASH
dd308073b3cac9e08c5239e28fb7078a9555813d6fb21daa20c1a02858644d58
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TH VAN TEEFFELEN | HUMOR BASIC | PRG | DuncanTwain | 33 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0E 08 01 00 41 B2 BB 28 AB 54 49 29 00 28 |......A..(.TI).(| 00000010: 08 02 00 97 35 33 32 38 30 2C 32 35 34 3A 97 35 |....53280,254:.5| 00000020: 33 32 38 31 2C 32 34 36 00 56 08 03 00 99 22 93 |3281,246.V....".| 00000030: 11 9A 20 20 20 20 2A 2A 2A 2A 20 43 4F 4D 4D 4F |.. **** COMMO| 00000040: 44 4F 52 45 20 36 34 20 42 41 53 49 43 20 56 32 |DORE 64 BASIC V2| 00000050: 20 2A 2A 2A 2A 22 00 87 08 04 00 99 3A 99 22 20 | ****"......:." | 00000060: 36 34 4B 20 52 41 4D 20 53 59 53 54 45 4D 20 20 |64K RAM SYSTEM | 00000070: 33 38 39 31 31 20 42 41 53 49 43 20 42 59 54 45 |38911 BASIC BYTE| 00000080: 53 20 46 52 45 45 22 00 95 08 05 00 8B 58 58 B2 |S FREE"......XX.| 00000090: 39 45 39 A7 80 00 AF 08 06 00 99 3A 99 22 52 45 |9E9........:."RE| 000000A0: 41 44 59 2E 22 3A 97 35 33 32 36 35 2C 32 37 00 |ADY.":.53265,27.| 000000B0: B9 08 07 00 9F 20 31 2C 30 00 C5 08 08 00 84 31 |..... 1,0......1| 000000C0: 2C 42 24 3A 99 00 D2 08 09 00 8B 42 24 B2 22 22 |,B$:.......B$.""| 000000D0: A7 38 00 F8 08 0A 00 8B C8 28 42 24 2C 31 29 B2 |.8.......(B$,1).| 000000E0: 22 20 22 A7 42 24 B2 C9 28 42 24 2C C3 28 42 24 |" ".B$..(B$,.(B$| 000000F0: 29 AB 31 29 3A 89 31 30 00 14 09 0B 00 8B C5 28 |).1):.10.......(| 00000100: C8 28 42 24 2C 31 29 29 B3 B1 30 A7 42 24 B2 22 |.(B$,1))..0.B$."| 00000110: 22 3A 89 38 00 29 09 0C 00 8B C8 28 42 24 2C 32 |":.8.).....(B$,2| 00000120: 29 B2 22 4C C9 22 A7 34 30 00 40 09 0D 00 8B C8 |)."L.".40.@.....| 00000130: 28 42 24 2C 34 29 B2 22 4C 49 53 54 22 A7 39 33 |(B$,4)."LIST".93| 00000140: 00 56 09 0E 00 8B C8 28 42 24 2C 33 29 B2 22 52 |.V.....(B$,3)."R| 00000150: 55 4E 22 A7 34 33 00 6A 09 0F 00 8B C8 28 42 24 |UN".43.j.....(B$| 00000160: 2C 31 29 B2 22 3F 22 A7 34 36 00 82 09 10 00 8B |,1)."?".46......| 00000170: C8 28 42 24 2C 35 29 B2 22 50 52 49 4E 54 22 A7 |.(B$,5)."PRINT".| 00000180: 35 30 00 AD 09 11 00 8B C8 28 42 24 2C 34 29 B2 |50.......(B$,4).| 00000190: 22 4C 4F 41 44 22 A7 4C B2 B5 28 BB 28 31 29 AC |"LOAD".L..(.(1).| 000001A0: 32 AA 31 29 3A 91 4C 89 35 34 2C 33 38 00 C4 09 |2.1):.L.54,38...| 000001B0: 12 00 8B C8 28 42 24 2C 34 29 B2 22 53 41 56 45 |....(B$,4)."SAVE| 000001C0: 22 A7 35 37 00 DB 09 13 00 8B C8 28 42 24 2C 34 |".57.......(B$,4| 000001D0: 29 B2 22 47 4F 54 4F 22 A7 36 30 00 F0 09 14 00 |)."GOTO".60.....| 000001E0: 8B C8 28 42 24 2C 32 29 B2 22 56 C5 22 A7 36 33 |..(B$,2)."V.".63| 000001F0: 00 09 0A 15 00 8B C8 28 42 24 2C 36 29 B2 22 56 |.......(B$,6)."V| 00000200: 45 52 49 46 59 22 A7 36 33 00 1F 0A 16 00 8B C8 |ERIFY".63.......| 00000210: 28 42 24 2C 33 29 B2 22 4E 45 57 22 A7 36 36 00 |(B$,3)."NEW".66.| 00000220: 36 0A 17 00 8B C8 28 42 24 2C 34 29 B2 22 50 4F |6.....(B$,4)."PO| 00000230: 4B 45 22 A7 36 39 00 4C 0A 18 00 8B C8 28 42 24 |KE".69.L.....(B$| 00000240: 2C 33 29 B2 22 53 59 53 22 A7 37 31 00 62 0A 19 |,3)."SYS".71.b..| 00000250: 00 8B C8 28 42 24 2C 33 29 B2 22 55 53 52 22 A7 |...(B$,3)."USR".| 00000260: 37 32 00 79 0A 1A 00 8B C8 28 42 24 2C 34 29 B2 |72.y.....(B$,4).| 00000270: 22 4F 50 45 4E 22 A7 37 33 00 91 0A 1B 00 8B C8 |"OPEN".73.......| 00000280: 28 42 24 2C 35 29 B2 22 43 4C 4F 53 45 22 A7 37 |(B$,5)."CLOSE".7| 00000290: 34 00 A7 0A 1C 00 8B C8 28 42 24 2C 33 29 B2 22 |4.......(B$,3)."| 000002A0: 44 49 4D 22 A7 37 35 00 BE 0A 1D 00 8B C8 28 42 |DIM".75.......(B| 000002B0: 24 2C 34 29 B2 22 52 45 53 54 22 A7 37 36 00 D4 |$,4)."REST".76..| 000002C0: 0A 1E 00 8B C8 28 42 24 2C 33 29 B2 22 43 4C 52 |.....(B$,3)."CLR| 000002D0: 22 A7 37 37 00 EA 0A 1F 00 8B C8 28 42 24 2C 33 |".77.......(B$,3| 000002E0: 29 B2 22 46 4F 52 22 A7 37 38 00 02 0B 20 00 8B |)."FOR".78... ..| 000002F0: C8 28 42 24 2C 35 29 B2 22 47 4F 53 55 42 22 A7 |.(B$,5)."GOSUB".| 00000300: 37 39 00 36 0B 21 00 8B C8 28 42 24 2C 34 29 B2 |79.6.!...(B$,4).| 00000310: 22 53 54 4F 50 22 A7 99 22 11 42 53 45 41 4B 20 |"STOP"..".BSEAK | 00000320: 49 4E 20 22 B5 28 BB 28 31 29 AC 35 30 30 30 AA |IN ".(.(1).5000.| 00000330: 31 29 3A 89 39 32 00 44 0B 22 00 8B 42 24 B2 22 |1):.92.D."..B$."| 00000340: 22 A7 39 32 00 70 0B 23 00 8B 42 24 B2 22 43 4F |".92.p.#..B$."CO| 00000350: 55 52 42 4F 49 53 22 A7 99 22 4F 48 2D 4F 48 21 |URBOIS".."OH-OH!| 00000360: 22 3A 99 3A A0 31 3A 58 58 B2 39 45 39 3A 89 31 |":.:.1:XX.9E9:.1| 00000370: 00 78 0B 24 00 89 38 30 00 9A 0B 25 00 99 22 42 |.x.$..80...%.."B| 00000380: 52 45 41 4B 20 49 4E 22 B5 28 BB 28 31 29 AC 35 |REAK IN".(.(1).5| 00000390: 30 30 30 AA 31 29 3A 89 39 32 00 C9 0B 26 00 99 |000.1):.92...&..| 000003A0: 22 50 52 45 53 53 20 50 4C 41 59 20 41 4E 44 20 |"PRESS PLAY AND | 000003B0: 52 45 43 4F 52 44 20 4F 4E 20 4E 45 41 52 45 53 |RECORD ON NEARES| 000003C0: 54 20 53 54 45 52 45 4F 22 00 D1 0B 27 00 89 39 |T STEREO"...'..9| 000003D0: 32 00 03 0C 28 00 99 22 93 22 3A 99 3A 99 22 44 |2...(..".":.:."D| 000003E0: 49 44 4E 27 54 20 59 4F 55 20 57 52 49 54 45 20 |IDN'T YOU WRITE | 000003F0: 49 54 20 44 4F 57 4E 20 53 4F 4D 45 57 48 45 52 |IT DOWN SOMEWHER| 00000400: 45 3F 22 00 34 0C 29 00 99 22 59 4F 55 20 4B 4E |E?".4.).."YOU KN| 00000410: 4F 57 20 48 4F 57 20 55 4E 52 45 4C 49 41 42 4C |OW HOW UNRELIABL| 00000420: 45 20 43 4F 4D 50 55 54 45 52 53 20 43 41 4E 20 |E COMPUTERS CAN | 00000430: 42 45 22 3B 00 3C 0C 2A 00 89 39 32 00 69 0C 2B |BE";.<.*..92.i.+| 00000440: 00 99 3A 99 22 52 55 4E 2C 20 52 55 4E 2C 20 52 |..:."RUN, RUN, R| 00000450: 55 4E 2C 20 44 4F 45 53 4E 27 54 20 41 4E 59 4F |UN, DOESN'T ANYO| 00000460: 4E 45 20 54 48 49 4E 4B 22 00 7C 0C 2C 00 99 22 |NE THINK".|.,.."| 00000470: 4F 46 20 4D 59 20 4C 45 47 53 3F 22 00 84 0C 2D |OF MY LEGS?"...-| 00000480: 00 89 39 32 00 AB 0C 2E 00 99 3A 99 22 59 4F 55 |..92......:."YOU| 00000490: 20 41 4E 44 20 59 4F 55 52 20 41 42 42 52 45 56 | AND YOUR ABBREV| 000004A0: 49 41 54 49 4F 4E 53 2E 2E 2E 22 00 D5 0C 2F 00 |IATIONS...".../.| 000004B0: 99 22 49 46 20 59 4F 55 20 4D 45 41 4E 20 27 50 |."IF YOU MEAN 'P| 000004C0: 52 49 4E 54 20 27 2C 20 54 48 45 4E 20 57 48 59 |RINT ', THEN WHY| 000004D0: 20 4E 4F 54 22 00 EF 0C 30 00 99 22 4A 55 53 54 | NOT"...0.."JUST| 000004E0: 20 54 59 50 45 20 27 50 52 49 4E 54 27 3F 22 00 | TYPE 'PRINT'?".| 000004F0: F7 0C 31 00 89 39 32 00 24 0D 32 00 99 3A 99 22 |..1..92.$.2..:."| 00000500: 50 52 49 4E 54 3F 20 20 44 4F 20 59 4F 55 20 54 |PRINT? DO YOU T| 00000510: 48 49 4E 4B 20 49 20 48 41 56 45 20 4E 4F 54 48 |HINK I HAVE NOTH| 00000520: 49 4E 47 22 00 4E 0D 33 00 99 22 42 45 54 54 45 |ING".N.3.."BETTE| 00000530: 52 20 54 4F 20 44 4F 20 54 48 41 4E 20 54 4F 20 |R TO DO THAN TO | 00000540: 43 41 54 45 52 20 54 4F 20 59 4F 55 52 22 00 71 |CATER TO YOUR".q| 00000550: 0D 34 00 99 22 45 56 45 52 59 20 57 48 49 4D 3F |.4.."EVERY WHIM?| 00000560: 20 4C 45 41 56 45 20 4D 45 20 41 4C 4F 4E 45 21 | LEAVE ME ALONE!| 00000570: 22 00 79 0D 35 00 89 39 32 00 AC 0D 36 00 99 3A |".y.5..92...6..:| 00000580: 99 22 49 46 20 49 20 54 48 4F 55 47 48 54 20 59 |."IF I THOUGHT Y| 00000590: 4F 55 20 48 41 44 20 41 4E 59 54 48 49 4E 47 20 |OU HAD ANYTHING | 000005A0: 57 4F 52 54 48 57 48 49 4C 45 22 3B 00 CA 0D 37 |WORTHWHILE";...7| 000005B0: 00 99 22 4F 4E 20 54 48 41 54 20 54 41 50 45 2C |.."ON THAT TAPE,| 000005C0: 20 49 20 57 4F 55 4C 44 2E 22 00 D2 0D 38 00 89 | I WOULD."...8..| 000005D0: 39 32 00 FC 0D 39 00 99 3A 99 22 49 27 4D 20 54 |92...9..:."I'M T| 000005E0: 49 52 45 44 20 4F 46 20 53 41 56 49 4E 47 20 45 |IRED OF SAVING E| 000005F0: 56 45 52 59 20 4C 49 54 54 4C 45 22 00 29 0E 3A |VERY LITTLE".).:| 00000600: 00 99 22 4D 49 43 4B 45 59 20 4D 4F 55 53 45 20 |.."MICKEY MOUSE | 00000610: 50 52 4F 47 52 41 4D 20 59 4F 55 20 53 48 4F 56 |PROGRAM YOU SHOV| 00000620: 45 20 41 54 20 4D 45 21 22 00 31 0E 3B 00 89 39 |E AT ME!".1.;..9| 00000630: 32 00 54 0E 3C 00 99 3A 99 22 47 4F 20 54 48 45 |2.T.<..:."GO THE| 00000640: 52 45 20 59 4F 55 52 53 45 4C 46 2C 20 42 55 44 |RE YOURSELF, BUD| 00000650: 44 59 21 22 00 70 0E 3D 00 99 22 53 45 45 20 48 |DY!".p.=.."SEE H| 00000660: 4F 57 20 59 4F 55 20 4C 49 4B 45 20 49 54 2E 22 |OW YOU LIKE IT."| 00000670: 00 78 0E 3E 00 89 39 32 00 9C 0E 3F 00 99 3A 99 |.x.>..92...?..:.| 00000680: 22 4E 4F 20 4E 45 45 44 20 54 4F 20 53 54 41 52 |"NO NEED TO STAR| 00000690: 54 20 54 48 45 20 54 41 50 45 2E 22 00 B6 0E 40 |T THE TAPE."...@| 000006A0: 00 99 22 49 27 4C 4C 20 56 4F 55 43 48 20 46 4F |.."I'LL VOUCH FO| 000006B0: 52 20 49 54 2E 22 00 BE 0E 41 00 89 39 32 00 EA |R IT."...A..92..| 000006C0: 0E 42 00 99 3A 99 22 42 4F 59 2C 20 41 4D 20 49 |.B..:."BOY, AM I| 000006D0: 20 47 4C 41 44 20 59 4F 55 20 47 4F 54 20 52 49 | GLAD YOU GOT RI| 000006E0: 44 20 4F 46 20 54 48 41 54 22 00 19 0F 43 00 99 |D OF THAT"...C..| 000006F0: 22 47 41 52 42 41 47 45 2E 20 57 48 59 20 44 4F |"GARBAGE. WHY DO| 00000700: 4E 27 54 20 59 4F 55 20 4C 45 54 20 4D 45 20 52 |N'T YOU LET ME R| 00000710: 45 53 54 20 4E 4F 57 3F 22 00 21 0F 44 00 89 39 |EST NOW?".!.D..9| 00000720: 32 00 44 0F 45 00 97 35 33 32 38 31 2C 30 3A 81 |2.D.E..53281,0:.| 00000730: 49 B2 31 A4 31 30 30 3A 82 3A 97 35 33 32 38 31 |I.1.100:.:.53281| 00000740: 2C 32 34 36 00 74 0F 46 00 99 22 4F 55 43 48 21 |,246.t.F.."OUCH!| 00000750: 21 21 21 21 20 59 4F 55 20 4C 4F 4F 4B 49 4E 47 |!!!! YOU LOOKING| 00000760: 20 46 4F 52 20 41 20 46 41 54 20 4C 49 50 3F 22 | FOR A FAT LIP?"| 00000770: 3A 89 39 32 00 9C 0F 47 00 99 22 53 59 53 21 21 |:.92...G.."SYS!!| 00000780: 3F 20 57 48 41 54 20 44 4F 45 53 20 53 59 53 20 |? WHAT DOES SYS | 00000790: 4D 45 41 4E 20 3F 22 20 3A 89 39 32 00 C9 0F 48 |MEAN ?" :.92...H| 000007A0: 00 99 22 54 48 41 54 27 53 20 4F 2E 4B 2E 20 45 |.."THAT'S O.K. E| 000007B0: 56 45 52 59 4F 4E 45 20 45 4C 53 45 20 55 53 45 |VERYONE ELSE USE| 000007C0: 53 20 4D 45 22 3A 89 39 32 00 EE 0F 49 00 99 22 |S ME":.92...I.."| 000007D0: 48 41 56 45 20 59 4F 55 20 47 4F 54 20 41 20 43 |HAVE YOU GOT A C| 000007E0: 4F 52 4B 53 43 52 45 57 3F 22 3A 89 39 32 00 30 |ORKSCREW?":.92.0| 000007F0: 10 4A 00 99 22 49 20 54 48 49 4E 4B 20 49 27 4C |.J.."I THINK I'L| 00000800: 4C 20 4A 55 53 54 20 4C 45 41 56 45 20 49 54 20 |L JUST LEAVE IT | 00000810: 4F 50 45 4E 2C 20 59 4F 55 27 4C 4C 20 4E 45 45 |OPEN, YOU'LL NEE| 00000820: 44 20 49 54 20 4C 41 54 45 52 2E 22 3A 89 39 32 |D IT LATER.":.92| 00000830: 00 63 10 4B 00 99 22 59 45 41 48 3F 20 20 57 45 |.c.K.."YEAH? WE| 00000840: 4C 4C 20 59 4F 55 27 52 45 20 4E 4F 54 20 53 4F |LL YOU'RE NOT SO| 00000850: 20 42 52 49 47 48 54 20 45 49 54 48 45 52 22 3A | BRIGHT EITHER":| 00000860: 89 39 32 00 8A 10 4C 00 99 22 49 20 46 4F 52 47 |.92...L.."I FORG| 00000870: 4F 54 20 48 4F 57 20 54 4F 20 44 4F 20 54 48 41 |OT HOW TO DO THA| 00000880: 54 20 4F 4E 45 22 3A 89 39 32 00 97 10 4D 00 99 |T ONE":.92...M..| 00000890: 22 93 22 3A 89 39 32 00 BA 10 4E 00 99 22 46 4F |".":.92...N.."FO| 000008A0: 52 20 57 49 54 48 4F 55 54 20 54 48 52 45 45 20 |R WITHOUT THREE | 000008B0: 45 52 52 4F 52 22 3A 89 39 32 00 E5 10 4F 00 99 |ERROR":.92...O..| 000008C0: 22 49 46 20 49 20 47 4F 53 55 42 20 49 20 4D 49 |"IF I GOSUB I MI| 000008D0: 47 48 54 20 4E 4F 54 20 52 45 54 55 52 4E 21 21 |GHT NOT RETURN!!| 000008E0: 22 3A 89 39 32 00 16 11 50 00 52 B2 B5 28 BB 28 |":.92...P.R..(.(| 000008F0: 31 29 AC 31 30 AA 31 29 3A 91 52 89 39 30 2C 38 |1).10.1):.R.90,8| 00000900: 32 2C 38 33 2C 38 34 2C 38 35 2C 38 36 2C 38 37 |2,83,84,85,86,87| 00000910: 2C 38 38 2C 38 39 00 3E 11 51 00 99 22 53 54 52 |,88,89.>.Q.."STR| 00000920: 49 4E 47 20 54 4F 4F 20 4D 45 41 4E 49 4E 47 4C |ING TOO MEANINGL| 00000930: 45 53 53 20 45 52 52 4F 52 22 3A 89 39 32 00 70 |ESS ERROR":.92.p| 00000940: 11 52 00 99 22 49 20 54 48 49 4E 4B 20 49 20 48 |.R.."I THINK I H| 00000950: 45 41 52 44 20 41 20 4D 45 4D 4F 52 59 20 43 48 |EARD A MEMORY CH| 00000960: 49 50 20 45 58 50 4C 4F 44 45 21 22 3A 89 39 32 |IP EXPLODE!":.92| 00000970: 00 9D 11 53 00 99 22 49 4C 4C 45 47 41 4C 20 4D |...S.."ILLEGAL M| 00000980: 4F 54 49 4F 4E 20 49 4E 20 42 41 43 4B 46 49 45 |OTION IN BACKFIE| 00000990: 4C 44 20 45 52 52 4F 52 22 3A 89 39 32 00 D1 11 |LD ERROR":.92...| 000009A0: 54 00 99 22 52 45 54 55 52 4E 20 57 49 54 48 4F |T.."RETURN WITHO| 000009B0: 55 54 20 4E 45 58 54 20 45 52 52 4F 52 20 49 4E |UT NEXT ERROR IN| 000009C0: 22 B5 28 BB 28 31 29 AC 35 30 30 30 29 3A 89 39 |".(.(1).5000):.9| 000009D0: 32 00 EF 11 55 00 99 22 3F 52 45 44 4F 20 46 52 |2...U.."?REDO FR| 000009E0: 4F 4D 20 48 41 4C 46 57 41 59 22 3A 89 39 32 00 |OM HALFWAY":.92.| 000009F0: 21 12 56 00 99 22 53 49 54 20 42 41 43 4B 20 41 |!.V.."SIT BACK A| 00000A00: 20 57 41 59 53 2C 20 59 4F 55 27 4C 4C 20 52 55 | WAYS, YOU'LL RU| 00000A10: 49 4E 20 59 4F 55 52 20 45 59 45 53 22 3A 89 39 |IN YOUR EYES":.9| 00000A20: 32 00 49 12 57 00 99 22 49 27 4D 20 57 52 49 54 |2.I.W.."I'M WRIT| 00000A30: 49 4E 47 20 4F 4E 20 59 4F 55 52 20 54 41 50 45 |ING ON YOUR TAPE| 00000A40: 20 21 21 21 22 3A 89 39 32 00 77 12 58 00 99 22 | !!!":.92.w.X.."| 00000A50: 54 4F 4F 20 4D 41 4E 59 20 46 49 4E 47 45 52 53 |TOO MANY FINGERS| 00000A60: 20 4F 4E 20 4B 45 59 42 4F 41 52 44 20 45 52 52 | ON KEYBOARD ERR| 00000A70: 4F 52 22 3A 89 39 32 00 9F 12 59 00 99 22 44 45 |OR":.92...Y.."DE| 00000A80: 56 49 43 45 20 4E 4F 54 20 50 52 45 53 45 4E 54 |VICE NOT PRESENT| 00000A90: 41 42 4C 45 20 45 52 52 4F 52 22 3A 89 39 32 00 |ABLE ERROR":.92.| 00000AA0: DB 12 5A 00 99 22 50 52 45 50 41 52 45 20 46 4F |..Z.."PREPARE FO| 00000AB0: 52 20 50 4F 57 45 52 20 48 49 54 22 3A 81 49 B2 |R POWER HIT":.I.| 00000AC0: 31 A4 31 30 30 30 3A 82 3A 97 35 33 32 36 35 2C |1.1000:.:.53265,| 00000AD0: 31 31 3A 97 35 33 32 38 30 2C 30 00 ED 12 5B 00 |11:.53280,0...[.| 00000AE0: 81 49 B2 31 A4 32 30 30 30 3A 82 3A 8A 00 06 13 |.I.1.2000:.:....| 00000AF0: 5C 00 99 3A 99 22 52 45 41 44 59 2E 22 3A 42 24 |\..:."READY.":B$| 00000B00: B2 22 22 3A 89 38 00 52 13 5D 00 83 22 31 30 20 |."":.8.R.].."10 | 00000B10: 44 49 4D 41 28 2D 35 29 3A 46 52 59 3D 31 54 4F |DIMA(-5):FRY=1TO| 00000B20: 31 30 3A 4E 45 58 54 57 45 45 4B 3A 50 4F 4B 45 |10:NEXTWEEK:POKE| 00000B30: 39 39 2C 4F 55 43 48 21 3A 57 41 49 54 46 4F 52 |99,OUCH!:WAITFOR| 00000B40: 49 54 3A 4F 50 45 4E 46 49 4C 45 4F 52 52 41 53 |IT:OPENFILEORRAS| 00000B50: 50 22 00 7F 13 5E 00 83 22 32 30 20 49 46 20 31 |P"...^.."20 IF 1| 00000B60: 20 48 45 4E 20 43 41 4E 20 4C 41 59 20 33 20 45 | HEN CAN LAY 3 E| 00000B70: 47 47 53 20 49 4E 20 4F 4E 45 20 44 41 59 22 00 |GGS IN ONE DAY".| 00000B80: AD 13 5F 00 83 22 33 30 20 48 4F 57 20 4C 4F 4E |.._.."30 HOW LON| 00000B90: 47 20 57 4F 55 4C 44 20 49 54 20 54 41 4B 45 20 |G WOULD IT TAKE | 00000BA0: 41 20 52 4F 4F 53 54 45 52 20 54 4F 22 00 CE 13 |A ROOSTER TO"...| 00000BB0: 60 00 83 22 34 30 20 4C 41 59 20 41 20 47 4F 4C |`.."40 LAY A GOL| 00000BC0: 44 45 4E 20 44 4F 4F 52 4B 4E 4F 42 3F 22 00 09 |DEN DOORKNOB?"..| 00000BD0: 14 61 00 83 22 34 31 2E 35 20 49 46 50 45 45 4B |.a.."41.5 IFPEEK| 00000BE0: 41 42 4F 4F 28 35 33 32 38 30 29 3D 45 47 47 20 |ABOO(53280)=EGG | 00000BF0: 54 48 45 4E 20 48 41 4C 54 20 41 4E 44 20 43 41 |THEN HALT AND CA| 00000C00: 54 43 48 20 46 49 52 45 22 00 28 14 62 00 83 22 |TCH FIRE".(.b.."| 00000C10: 35 30 20 45 4E 44 20 4F 46 20 54 48 45 20 42 45 |50 END OF THE BE| 00000C20: 47 49 4E 4E 49 4E 47 22 00 30 14 63 00 8C 3A 99 |GINNING".0.c..:.| 00000C30: 00 45 14 64 00 81 49 B2 31 A4 36 3A 87 41 24 3A |.E.d..I.1.6:.A$:| 00000C40: 99 41 24 3A 82 00 4D 14 65 00 89 39 32 00 5C 14 |.A$:..M.e..92.\.| 00000C50: B4 00 8F 22 14 14 14 14 14 14 14 14 00 6B 14 BE |...".........k..| 00000C60: 00 8F 22 14 14 14 14 14 14 14 14 00 94 14 C8 00 |..".............| 00000C70: 8F 22 14 14 14 14 14 14 14 14 20 20 20 20 48 55 |."........ HU| 00000C80: 4D 4F 52 42 41 53 49 43 20 56 4F 4F 52 20 43 42 |MORBASIC VOOR CB| 00000C90: 4D 20 36 34 00 BA 14 CD 00 8F 22 14 14 14 14 14 |M 64......".....| 00000CA0: 14 14 14 20 20 20 20 41 4C 4C 20 52 49 47 48 54 |... ALL RIGHT| 00000CB0: 53 20 52 45 53 45 52 56 45 44 00 DF 14 D2 00 8F |S RESERVED......| 00000CC0: 22 14 14 14 14 14 14 14 14 20 20 20 20 42 59 20 |"........ BY | 00000CD0: 27 50 41 55 4C 27 20 53 4F 46 54 57 41 52 45 00 |'PAUL' SOFTWARE.| 00000CE0: F9 14 E6 00 8F 22 14 14 14 14 14 14 14 14 20 20 |....."........ | 00000CF0: 20 20 54 49 4C 42 55 52 47 00 00 00 | TILBURG... |
......A..(.TI).(....53280,254:.53281,246 .V...."... **** COMMODORE 64 BASIC V2 ****"......:." 64K RAM SYSTEM 38911 BA SIC BYTES FREE"......XX.9E9........:."RE ADY.":.53265,27...... 1,0.E....1,B$:..R. ...B$."".8......H(B$,1)." ".B$.I(B$,C(B$ ).1):.10......E(H(B$,1))..0.B$."":.8.).. ..H(B$,2)."LI".40.@....H(B$,4)."LIST".93 .V....H(B$,3)."RUN".43.J....H(B$,1)."?". 46......H(B$,5)."PRINT".50......H(B$,4). "LOAD".L..(.(1).2.1):.L.54,38.D....H(B$, 4)."SAVE".57......H(B$,4)."GOTO".60..... .H(B$,2)."VE".63......H(B$,6)."VERIFY".6 3......H(B$,3)."NEW".66.6....H(B$,4)."PO KE".69.L....H(B$,3)."SYS".71.B....H(B$,3 )."USR".72.Y....H(B$,4)."OPEN".73......H (B$,5)."CLOSE".74......H(B$,3)."DIM".75. .....H(B$,4)."REST".76.T....H(B$,3)."CLR ".77......H(B$,3)."FOR".78... ..H(B$,5). "GOSUB".79.6.!..H(B$,4)."STOP"..".BSEAK IN ".(.(1).5000.1):.92.D."..B$."".92.P.# ..B$."COURBOIS".."OH-OH!":.: 1:XX.9E9:.1 .X.$..80...%.."BREAK IN".(.(1).5000.1):. 92.I.&.."PRESS PLAY AND RECORD ON NEARES T STEREO".Q.'..92...(..".":.:."DIDN'T YO U WRITE IT DOWN SOMEWHERE?".4.).."YOU KN OW HOW UNRELIABLE COMPUTERS CAN BE";.<.* ..92.I.+..:."RUN, RUN, RUN, DOESN'T ANYO NE THINK".|.,.."OF MY LEGS?"...-..92.... ..:."YOU AND YOUR ABBREVIATIONS...".U./. ."IF YOU MEAN 'PRINT ', THEN WHY NOT"... 0.."JUST TYPE 'PRINT'?"...1..92.$.2..:." PRINT? DO YOU THINK I HAVE NOTHING".N.3 .."BETTER TO DO THAN TO CATER TO YOUR".Q .4.."EVERY WHIM? LEAVE ME ALONE!".Y.5..9 2...6..:."IF I THOUGHT YOU HAD ANYTHING WORTHWHILE";.J.7.."ON THAT TAPE, I WOULD .".R.8..92...9..:."I'M TIRED OF SAVING E VERY LITTLE".).:.."MICKEY MOUSE PROGRAM YOU SHOVE AT ME!".1.;..92.T.<..:."GO THE RE YOURSELF, BUDDY!".P.=.."SEE HOW YOU L IKE IT.".X.>..92...?..:."NO NEED TO STAR T THE TAPE."...@.."I'LL VOUCH FOR IT.".. .A..92...B..:."BOY, AM I GLAD YOU GOT RI D OF THAT"...C.."GARBAGE. WHY DON'T YOU LET ME REST NOW?".!.D..92.D.E..53281,0:. I.1.100:.:.53281,246.T.F.."OUCH!!!!! YOU LOOKING FOR A FAT LIP?":.92...G.."SYS!! ? WHAT DOES SYS MEAN ?" :.92.I.H.."THAT' S O.K. EVERYONE ELSE USES ME":.92...I.." HAVE YOU GOT A CORKSCREW?":.92.0.J.."I T HINK I'LL JUST LEAVE IT OPEN, YOU'LL NEE D IT LATER.":.92.C.K.."YEAH? WELL YOU'R E NOT SO BRIGHT EITHER":.92...L.."I FORG OT HOW TO DO THAT ONE":.92...M..".":.92. ..N.."FOR WITHOUT THREE ERROR":.92...O.. "IF I GOSUB I MIGHT NOT RETURN!!":.92... P.R..(.(1).10.1):.R.90,82,83,84,85,86,87 ,88,89.>.Q.."STRING TOO MEANINGLESS ERRO R":.92.P.R.."I THINK I HEARD A MEMORY CH IP EXPLODE!":.92...S.."ILLEGAL MOTION IN BACKFIELD ERROR":.92.Q.T.."RETURN WITHO UT NEXT ERROR IN".(.(1).5000):.92...U.." ?REDO FROM HALFWAY":.92.!.V.."SIT BACK A WAYS, YOU'LL RUIN YOUR EYES":.92.I.W.." I'M WRITING ON YOUR TAPE !!!":.92.W.X.." TOO MANY FINGERS ON KEYBOARD ERROR":.92. ..Y.."DEVICE NOT PRESENTABLE ERROR":.92. ..Z.."PREPARE FOR POWER HIT":.I.1.1000:. :.53265,11:.53280,0...[..I.1.2000:.:.... \..:."READY.":B$."":.8.R.].."10 DIMA(-5) :FRY=1TO10:NEXTWEEK:POKE99,OUCH!:WAITFOR IT:OPENFILEORRASP"..^.."20 IF 1 HEN CAN LAY 3 EGGS IN ONE DAY"..._.."30 HOW LON G WOULD IT TAKE A ROOSTER TO".N.`.."40 L AY A GOLDEN DOORKNOB?"...A.."41.5 IFPEEK ABOO(53280)=EGG THEN HALT AND CATCH FIRE ".(.B.."50 END OF THE BEGINNING".0.C..:. .E.D..I.1.6:.A$:.A$:..M.E..92.\....".... .....K...."...........H.."........ HU MORBASIC VOOR CBM 64...M.."........ A LL RIGHTS RESERVED...R.."........ BY 'PAUL' SOFTWARE......"........ TILBUR G...
> CLICK IMAGE PREVIEW FOR FULL MODAL