FE001 PUB SILL

FILE INFORMATION

FILENAME(S): FE001 PUB SILL

FILE TYPE(S): PRG

FILE SIZE: 1.5K

FIRST SEEN: 2025-11-30 01:07:59

APPEARS ON: 3 disk(s)

FILE HASH

958b5b385ae1f919869636586d43964affb5d81599881a405ed0fc1ebefeb288

FOUND ON DISKS (3 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
FREESOFT NR	FE001 PUB SILL	PRG	Treasure Chest - Wolfgang Rauprich	26	4	DOWNLOAD FILE
012A	FE001 PUB SILL	PRG	Treasure Chest - Wolfgang Rauprich	26	4	DOWNLOAD FILE
FREESOFT DISK NR	FE001 PUB SILL	PRG	Treasure Chest - Wolfgang Rauprich	26	4	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 25 08 0A 00 8F 20  2A 2A 2A 2A 2A 2A 2A 2A  |..%.... ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000020: 2A 2A 2A 2A 2A 00 49 08  14 00 8F 20 2A 20 20 20  |*****.I.... *   |
00000030: 20 20 20 20 50 55 42 20  53 49 4C 4C 49 4E 45 53  |    PUB SILLINES|
00000040: 53 20 20 20 20 20 20 20  2A 00 6D 08 1E 00 8F 20  |S       *.m.... |
00000050: 2A 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |*               |
00000060: 20 20 20 20 20 20 20 20  20 20 20 20 2A 00 91 08  |            *...|
00000070: 28 00 8F 20 2A 20 20 20  47 41 4D 45 20 43 4F 55  |(.. *   GAME COU|
00000080: 52 54 45 53 59 20 43 2E  43 4F 4F 4B 45 20 20 20  |RTESY C.COOKE   |
00000090: 2A 00 B5 08 32 00 8F 20  2A 20 50 52 4F 47 41 4D  |*...2.. * PROGAM|
000000A0: 20 42 59 20 44 2E 50 41  52 4B 49 4E 53 4F 4E 2C  | BY D.PARKINSON,|
000000B0: 32 36 54 48 2A 00 D9 08  3C 00 8F 20 2A 20 20 20  |26TH*...<.. *   |
000000C0: 20 20 20 20 20 46 45 42  2C 31 39 37 39 20 20 20  |     FEB,1979   |
000000D0: 20 20 20 20 20 20 20 20  2A 00 FD 08 46 00 8F 20  |        *...F.. |
000000E0: 2A 20 20 20 20 20 42 45  45 52 20 42 59 20 46 55  |*     BEER BY FU|
000000F0: 4C 4C 45 52 53 20 20 20  20 20 20 20 2A 00 21 09  |LLERS       *.!.|
00000100: 50 00 8F 20 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |P.. ************|
00000110: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000120: 2A 00 27 09 5A 00 8F 00  2D 09 64 00 8F 00 5D 09  |*.'.Z...-.d...].|
00000130: 6E 00 86 20 4E 24 28 35  29 2C 48 24 28 35 29 2C  |n.. N$(5),H$(5),|
00000140: 42 24 28 35 29 2C 43 24  28 35 29 2C 53 24 28 35  |B$(5),C$(5),S$(5|
00000150: 29 2C 49 24 28 35 29 2C  52 24 28 35 29 00 75 09  |),I$(5),R$(5).u.|
00000160: 78 00 81 20 58 B2 31 A4  35 3A 87 20 49 24 28 58  |x.. X.1.5:. I$(X|
00000170: 29 3A 82 20 58 00 A4 09  82 00 83 22 C6 49 52 53  |):. X......".IRS|
00000180: 54 22 2C 22 D3 45 43 4F  4E 44 22 2C 22 D4 48 49  |T",".ECOND",".HI|
00000190: 52 44 22 2C 22 C6 4F 55  52 54 48 22 2C 22 C6 49  |RD",".OURTH",".I|
000001A0: 46 54 48 22 00 C5 09 87  00 81 20 58 B2 31 A4 35  |FTH"...... X.1.5|
000001B0: 3A 8D 20 31 30 30 30 30  3A 52 24 28 58 29 B2 59  |:. 10000:R$(X).Y|
000001C0: 24 3A 82 20 58 00 DF 09  8C 00 97 20 35 39 34 36  |$:. X...... 5946|
000001D0: 38 2C 31 34 3A 99 22 93  C8 45 4C 4C 4F 2E 22 00  |8,14:."..ELLO.".|
000001E0: FC 09 96 00 99 3A 99 22  CE 41 4D 45 20 46 49 56  |.....:.".AME FIV|
000001F0: 45 20 50 45 4F 50 4C 45  2E 22 3A 99 00 2E 0A A0  |E PEOPLE.":.....|
00000200: 00 81 20 58 B2 31 20 A4  20 35 3A 99 22 1D 1D 1D  |.. X.1 . 5:."...|
00000210: 1D 1D 22 3B 49 24 28 58  29 3B 3A 85 22 20 20 2A  |..";I$(X);:."  *|
00000220: 9D 9D 9D 22 3B 4E 24 28  58 29 3A 82 20 58 00 66  |...";N$(X):. X.f|
00000230: 0A AA 00 99 22 93 D4 48  41 4E 4B 20 59 4F 55 2E  |...."..HANK YOU.|
00000240: 22 3A 99 3A 99 22 CE 41  4D 45 20 46 49 56 45 20  |":.:.".AME FIVE |
00000250: 50 41 52 54 53 20 4F 46  20 54 48 45 20 48 4F 55  |PARTS OF THE HOU|
00000260: 53 45 2E 22 3A 99 00 96  0A B4 00 81 20 58 B2 31  |SE.":....... X.1|
00000270: A4 35 3A 99 22 1D 1D 1D  1D 1D 22 3B 49 24 28 58  |.5:.".....";I$(X|
00000280: 29 3B 3A 85 22 20 20 2A  9D 9D 9D 22 3B 48 24 28  |);:."  *...";H$(|
00000290: 58 29 3A 82 20 58 00 CD  0A BE 00 99 22 93 D4 48  |X):. X......"..H|
000002A0: 41 4E 4B 20 59 4F 55 2E  22 3A 99 3A 99 22 CE 41  |ANK YOU.":.:.".A|
000002B0: 4D 45 20 46 49 56 45 20  50 41 52 54 53 20 4F 46  |ME FIVE PARTS OF|
000002C0: 20 54 48 45 20 42 4F 44  59 2E 22 3A 99 00 FD 0A  | THE BODY.":....|
000002D0: C8 00 81 20 58 B2 31 A4  35 3A 99 22 1D 1D 1D 1D  |... X.1.5:."....|
000002E0: 1D 22 3B 49 24 28 58 29  3B 3A 85 22 20 20 2A 9D  |.";I$(X);:."  *.|
000002F0: 9D 9D 22 3B 42 24 28 58  29 3A 82 20 58 00 37 0B  |..";B$(X):. X.7.|
00000300: D2 00 99 22 93 D4 48 41  4E 4B 20 59 4F 55 2E 22  |..."..HANK YOU."|
00000310: 3A 99 3A 99 22 CE 41 4D  45 20 46 49 56 45 20 41  |:.:.".AME FIVE A|
00000320: 52 54 49 43 4C 45 53 20  4F 46 20 43 4C 4F 54 48  |RTICLES OF CLOTH|
00000330: 49 4E 47 2E 22 3A 99 00  67 0B DC 00 81 20 58 B2  |ING.":..g.... X.|
00000340: 31 A4 35 3A 99 22 1D 1D  1D 1D 1D 22 3B 49 24 28  |1.5:.".....";I$(|
00000350: 58 29 3B 3A 85 22 20 20  2A 9D 9D 9D 22 3B 43 24  |X);:."  *...";C$|
00000360: 28 58 29 3A 82 20 58 00  9D 0B E6 00 99 22 93 D4  |(X):. X......"..|
00000370: 48 41 4E 4B 20 59 4F 55  2E 22 3A 99 3A 99 22 CE  |HANK YOU.":.:.".|
00000380: 41 4D 45 20 46 49 56 45  20 57 45 4C 4C 20 4B 4E  |AME FIVE WELL KN|
00000390: 4F 57 4E 20 53 4F 4E 47  53 2E 22 3A 99 00 CD 0B  |OWN SONGS.":....|
000003A0: F0 00 81 20 58 B2 31 A4  35 3A 99 22 1D 1D 1D 1D  |... X.1.5:."....|
000003B0: 1D 22 3B 49 24 28 58 29  3B 3A 85 22 20 20 2A 9D  |.";I$(X);:."  *.|
000003C0: 9D 9D 22 3B 53 24 28 58  29 3A 82 20 58 00 03 0C  |..";S$(X):. X...|
000003D0: FA 00 99 22 93 D4 48 41  4E 4B 20 59 4F 55 2E 22  |..."..HANK YOU."|
000003E0: 3A 99 22 11 C9 27 4C 4C  20 54 45 4C 4C 20 59 4F  |:."..'LL TELL YO|
000003F0: 55 20 57 48 41 54 27 53  20 47 4F 49 4E 47 20 4F  |U WHAT'S GOING O|
00000400: 4E 2E 22 00 11 0C 2C 01  81 20 58 B2 31 20 A4 20  |N."...,.. X.1 . |
00000410: 35 00 26 0C 36 01 81 20  59 B2 31 20 A4 20 32 30  |5.&.6.. Y.1 . 20|
00000420: 30 30 3A 82 20 59 00 66  0C 40 01 99 22 11 22 3B  |00:. Y.f.@..".";|
00000430: 4E 24 28 C5 28 CA 28 52  24 28 31 29 2C 58 2C 31  |N$(.(.(R$(1),X,1|
00000440: 29 29 29 3B 22 20 49 53  20 49 4E 20 54 48 45 20  |)));" IS IN THE |
00000450: 22 3B 48 24 28 C5 28 CA  28 52 24 28 32 29 2C 58  |";H$(.(.(R$(2),X|
00000460: 2C 31 29 29 29 3B 00 98  0C 4A 01 99 22 20 57 49  |,1)));...J.." WI|
00000470: 54 48 20 48 49 53 20 22  3B 42 24 28 C5 28 CA 28  |TH HIS ";B$(.(.(|
00000480: 52 24 28 33 29 2C 58 2C  31 29 29 29 3B 22 20 49  |R$(3),X,1)));" I|
00000490: 4E 20 48 49 53 20 22 3B  00 D9 0C 54 01 99 20 43  |N HIS ";...T.. C|
000004A0: 24 28 C5 28 CA 28 52 24  28 34 29 2C 58 2C 31 29  |$(.(.(R$(4),X,1)|
000004B0: 29 29 3B 22 2C 20 53 49  4E 47 49 4E 47 20 27 22  |));", SINGING '"|
000004C0: 3B 53 24 28 C5 28 CA 28  52 24 28 35 29 2C 58 2C  |;S$(.(.(R$(5),X,|
000004D0: 31 29 29 29 3B 22 27 2E  22 00 E1 0C 5E 01 82 20  |1)));"'."...^.. |
000004E0: 58 00 F6 0C 68 01 81 20  59 B2 31 20 A4 20 32 30  |X...h.. Y.1 . 20|
000004F0: 30 30 3A 82 20 59 00 2C  0D 72 01 99 22 11 CD 41  |00:. Y.,.r.."..A|
00000500: 4B 45 53 20 59 4F 55 20  54 48 49 4E 4B 2C 20 44  |KES YOU THINK, D|
00000510: 4F 45 53 4E 27 54 20 49  54 2E 22 3A 81 20 59 B2  |OESN'T IT.":. Y.|
00000520: 31 20 A4 20 35 30 30 30  3A 82 20 59 00 42 0D 7C  |1 . 5000:. Y.B.||
00000530: 01 99 22 93 22 3A 97 20  35 39 34 36 38 2C 31 32  |..".":. 59468,12|
00000540: 3A 80 00 61 0D 10 27 8F  20 52 41 4E 44 4F 4D 49  |:..a..'. RANDOMI|
00000550: 53 41 54 49 4F 4E 20 53  55 42 52 4F 55 54 49 4E  |SATION SUBROUTIN|
00000560: 45 00 81 0D 15 27 58 24  B2 22 31 32 33 34 35 22  |E....'X$."12345"|
00000570: 3A 59 24 B2 22 22 3A 5A  B2 BB 28 AB BB 28 30 29  |:Y$."":Z..(..(0)|
00000580: 29 00 99 0D 1A 27 96 20  A5 52 28 58 29 B2 B5 28  |)....'. .R(X)..(|
00000590: 31 AA 58 AC BB 28 31 29  29 00 AC 0D 24 27 81 20  |1.X..(1))...$'. |
000005A0: 59 B2 35 20 A4 20 31 20  A9 20 AB 31 00 DF 0D 2E  |Y.5 . 1 . .1....|
000005B0: 27 5A B2 A5 52 28 59 29  3A 59 24 B2 59 24 AA CA  |'Z..R(Y):Y$.Y$..|
000005C0: 28 58 24 2C 5A 2C 31 29  3A 58 24 B2 C8 28 58 24  |(X$,Z,1):X$..(X$|
000005D0: 2C 5A AB 31 29 AA CA 28  58 24 2C 5A AA 31 29 00  |,Z.1)..(X$,Z.1).|
000005E0: E7 0D 38 27 82 20 59 00  ED 0D 42 27 8E 00 00 00  |..8'. Y...B'....|

..%.... *****************************.I.
... *       PUB SILLINESS       *.M.... 
*                           *...(.. *   
GAME COURTESY C.COOKE   *...2.. * PROGAM
 BY D.PARKINSON,26TH*.Y.<.. *        FEB
,1979           *...F.. *     BEER BY FU
LLERS       *.!.P.. ********************
*********.'.Z...-.D...].N.. N$(5),H$(5),
B$(5),C$(5),S$(5),I$(5),R$(5).U.X.. X.1.
5:. I$(X):. X......"FIRST","SECOND","THI
RD","FOURTH","FIFTH".E.... X.1.5:. 10000
:R$(X).Y$:. X...... 59468,14:.".HELLO.".
.....:."NAME FIVE PEOPLE.":.... .. X.1 .
 5:.".....";I$(X);:."  *...";N$(X):. X.F
....".THANK YOU.":.:."NAME FIVE PARTS OF
 THE HOUSE.":....... X.1.5:.".....";I$(X
);:."  *...";H$(X):. X.M....".THANK YOU.
":.:."NAME FIVE PARTS OF THE BODY.":....
H.. X.1.5:.".....";I$(X);:."  *...";B$(X
):. X.7.R..".THANK YOU.":.:."NAME FIVE A
RTICLES OF CLOTHING.":..G.... X.1.5:."..
...";I$(X);:."  *...";C$(X):. X......".T
HANK YOU.":.:."NAME FIVE WELL KNOWN SONG
S.":..M.... X.1.5:.".....";I$(X);:."  *.
..";S$(X):. X......".THANK YOU.":.".I'LL
 TELL YOU WHAT'S GOING ON."...,.. X.1 . 
5.&.6.. Y.1 . 2000:. Y.F.@..".";N$(E(J(R
$(1),X,1)));" IS IN THE ";H$(E(J(R$(2),X
,1)));...J.." WITH HIS ";B$(E(J(R$(3),X,
1)));" IN HIS ";.Y.T.. C$(E(J(R$(4),X,1)
));", SINGING '";S$(E(J(R$(5),X,1)));"'.
"...^.. X...H.. Y.1 . 2000:. Y.,.R..".MA
KES YOU THINK, DOESN'T IT.":. Y.1 . 5000
:. Y.B.|..".":. 59468,12:..A..'. RANDOMI
SATION SUBROUTINE....'X$."12345":Y$."":Z
..(..(0))....'. .R(X)..(1.X..(1))...$'. 
Y.5 . 1 . .1....'Z..R(Y):Y$.Y$.J(X$,Z,1)
:X$.H(X$,Z.1).J(X$,Z.1)...8'. Y...B'....

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL