Here is the listing of 'SKY', as published in MSXFAN 13 (Oktober, 1992)

1 SCREEN1,0:COLOR15,5,10:KEYOFF:DEFINTA-Z:SPRITE$(0)="<~~<":FORI=0TO7:VPOKEI+840,ASC(MID$("ff"+STRING$(4,0),I+1,1)):NEXT:FORI=1TO3:VPOKE8205+I,ASC(MID$("Dｪ･",I,1)):NEXT:DEFFNR(A)=RND(1)*A
2 WIDTH32:FORI=-1TO0:I=STRIG(0):NEXT:E$=CHR$(27)+"Y":PRINTE$"+*TRY STAGE";U+1:GOSUB6:CLS:X=127:Y=120:F=8:LOCATEU*2+4,16:PRINTSTRING$(24-U*4,"i"):PRINTE$"3 "STRING$(128,"p");CHR$(11)
3 S=STICK(0):G=G-(S=3)+(S=7):X=X+G:Y=Y-F:F=F+1*(F>-8):PUTSPRITE0,(X-3,Y-1),8:V=VPEEK(6144+X\8+(Y\8+1)*32):IFV=105THENLOCATEX\8,Y\8+1:PRINT" ":BEEP:LOCATEFNR(30)+1,FNR(12)+6:P=P+9+F:F=8:IFC<20THENPRINT"i":C=C+1ELSEPRINT"・ELSEIFV=133THEN5
4 PRINTE$"##SCORE";P*10:IFY>151ORX<4ORX>251THENPUTSPRITE0,(0,209):H=H-(P-H)*(P>H):PRINTE$"%#HIGH ";H*10:PRINTE$"++GAME OVER":GOSUB6:P=0:G=0:C=0:U=0:GOTO1ELSE3
5 G=0:C=0:PRINTE$"+)STAGE";U+1;"CLEAR!":IFU<4THENGOSUB6:U=U+1:CLS:GOTO2ELSEPRINTE$"-+ALL CLEAR!":GOSUB6:P=0:U=0:GOTO1
6 R=RND(-TIME):IFSTRIG(0)THENRETURNELSE6

Here is the listing of 'Mururoa', as released by Near Dark to the MRC Bounce Challenge in 2004.

10 ' BOUNCING SMILE --- PROGRAMMED BY IVOR BOSLOPER
20 '                         MUSIC BY JELLE JELSMA
30 '                    COPYRIGHTS BY NEAR DARK 1995
40 '
50 '   ALLRIGHT !!!! IT'S PUBLIC DOMAIN !!!!!!
60 '
70 BLOAD"mururoa.001",R
80 IFINP(&HC0)=255THEN90ELSE_MBKLOAD("mururoa.002")
90 IFPEEK(&HF9FF)=0THEN_MBMLOAD("mururoa.004")
100 IFPEEK(&HF9FF)=2THEN_MBMLOAD("mururoa.003")
110 DEFINTA-Z:SCREEN1
120 WIDTH32
130 SCREEN1,0:A$="<B･▼傳<":SPRITE$(1)=A$:ONSPRITEGOSUB240:SPRITEON
140 COLOR15,4,4:KEYOFF:DEFINTA-Z:SPRITE$(0)=A$:FORI=0TO7:VPOKEI+840,ASC(MID$("<<"+STRING$(4,0),I+1,1)):NEXTI:FORI=1TO3:VPOKE8205+I,ASC(MID$("Uｪ･",I,1)):NEXTI
150 FORI=-1TO0:I=STRIG(0):NEXTI:E$=CHR$(27)+"Y":PRINTE$"+*TRY STAGE";U+1:GOSUB190:CLS:_MBPLAY:X=127:Y=120:F=8:Z=127:B=120:L=8:LOCATEU*2+4,16:PRINTSTRING$(24-U*4,"i"):PRINTE$"3 "STRING$(128,"r");CHR$(11)
160 S=STICK(0):G=G-(S=3)+(S=7):X=X+GAND255:Y=Y-F:F=F+1*(F>-8):PUTSPRITE0,(X-3,Y-1),8:V=VPEEK(6144+X\8+(Y\8+1)*32):IFV=105THENLOCATEX\8,Y\8+1:PRINT" ":LOCATERND(1)*30+1,RND(1)*12+6:P=P+9+F:F=8:IFC<20THENPRINT"i":C=C+1ELSEPRINT"z"ELSEIFV=122THEN180
170 PRINTE$"##SCORE";P*10:IFY>151THENPUTSPRITE0,(0,209):H=H-(P-H)*(P>H):PRINTE$"%#HIGH ";H*10:PRINTE$"++GAME OVER":GOSUB190:P=0:G=0:C=0:GOTO140ELSE200
180 G=0:C=0:PRINTE$"+)STAGE";U+1;"CLEAR!":IFU<4THENGOSUB190:U=U+1:CLS:GOTO150ELSEPRINTE$"-+ALL CLEAR!":GOSUB190:P=0:U=0:GOTO140
190 R=RND(-TIME):IFSTRIG(0)THENRETURNELSE190
200 'REM player 2
210 'S=STICK(2):Q=Q-(S=3)+(S=7):Z=Z+QAND255:B=B-L:L=L+1*(L>-8):PUTSPRITE1,(Z-3,B-1),12:E=VPEEK(6144+Z\8+(B\8+1)*32):IFE=105THENLOCATEZ\8,B\8+1:PRINT" ":LOCATERND(1)*30+1,RND(1)*12+6:R=R+9+L:L=8:IFT<20THENPRINT"i":T=T+1ELSEPRINT"z"ELSEIFE=122THEN200
220 SPRITEON:IFB>151THENPUTSPRITE1,(0,209):J=J-(R-J)*(R>J):PRINTE$"++GAME OVER":GOSUB190:R=0:Q=0:T=0:D=0:GOTO140ELSE160
230 Q=0:T=0:PRINTE$"+)STAGE";D+1;"CLEAR!":IFD<4THENGOSUB190:D=D+1:CLS:GOTO150ELSEPRINTE$"-+ALL CLEAR!":GOSUB190:R=0:GOTO140
240 SPRITEOFF:SWAPX,Z:SWAPY,B:RETURN

As you can see the listings are strikingly similar, which is the reason why Mururoa has been disqualified for the MRC Bounce Challenge.

they are quite similar indeed

I try to reach the coder to find out about this...

Darn, this feels silly...

Well, there is no harm done and there was no harm ment to be done so I can have a great laugh about it

that's the spirit!

But on the other hand it isnt compleetly impossible to make the same code without even knowing it
But then again, what are the odds

according to my calculations considering using ascii codes from 32 till 90:

1/ 5,0968880770644654620142359221422e+171

Well, thanks to this 'incident' the name Near Dark appears twice as much than usual....

So it's only positive...

94 ascii codes that make sense.. (32 (space)..126 (~))

each char in your basic-source can be one out of 94.. which makes something like 94^sourcelength .. (e.g. HUUUUUUUUUUUUGE)

That's the amount of listings that's possible -in theory- .. if you create a listing exactly like another then the chance is 1/thathugeamountshowedabove.

naturally, not just all combinations are valid.. so 94^sourcelength is prolly overkill.. but let's asume an average of say 20 valid characters .. 20^sourcelength is also quite some number

Quote:

Well, thanks to this 'incident' the name Near Dark appears twice as much than usual.... So it's only positive...

Speaking of which, weren't you gonna come over here to laugh in my face about this whole story? I'm home now, but I feel like leaving... A shame you didn't call me EvUlGrAnDpA

Anyone care to create a program that generates random MSX stuff? We could end up with Half-Life 2 for the MSX

Quote:

Anyone care to create a program that generates random MSX stuff? We could end up with Half-Life 2 for the MSX

eh eh eh!!! i tought like 15 years ago that!

if we aims to create a 32k ROM randomly, well, like a big counter, starting all in 0000000 and start counting untill get all FFFFFFFF over the 32kb!.... and we needs like 1 min. minimun to check if the result is usefull... so ... letme calculate.....

time needed = (2^8)^32768 !!!!!!!!!

HOOOOWAAAAAAA!!!!

ofcourse, in all those numbers there's 40000 apps that delete or format your (hard-)disk first

Excuse me for dropping in so late on the discussion, but the problem with software that creates random code is that the software doesn't know if it is coding most efficiently. You would have to check yourself, but if you suspect the code could be cleaner but can't do it yourself, you'll just have to wait until the program poops out a similar app.
You could end up with Half-Life 2, as well as Windoze 98 for MSX...

I'm afraid nobody might be watching thread anymore, but I still want to set some things straight. Coming back from a holiday, I found an email of Jelle (he found my email adress after all) about a submission of a program I allegedly had written. He sent it in without concerning me. That's too bad, because I could have told him it's not mine. One of the following mails told me the submission had been disqualified.

A long (!) time ago I made some variations of the original sky program: a two player version, a bit smoother and I got it running under KUN basic. I showed/shared it with Meits, that's probably where the confusion started.

It makes me happy to see people are still remembering the good old MSX days. :-D