Mururoa disqualified - Evidence

Page 1/2
| 2

By snout

Ascended (15187)

snout's picture

28-11-2004, 17:46

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$="-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.

Login or register to post comments

By DarQ

Paragon (1038)

DarQ's picture

28-11-2004, 18:37

they are quite similar indeed Shocked!

By meits

Scribe (6572)

meits's picture

28-11-2004, 18:48

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

Darn, this feels silly...

By W76NearDark

Paladin (684)

W76NearDark's picture

30-11-2004, 01:50

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

By snout

Ascended (15187)

snout's picture

30-11-2004, 08:34

that's the spirit! Smile

By Henk

Expert (107)

Henk's picture

30-11-2004, 09:43

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

By IC

Hero (557)

IC's picture

30-11-2004, 11:45

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

1/ 5,0968880770644654620142359221422e+171
Wink

By evulopah

Paladin (669)

evulopah's picture

30-11-2004, 11:55

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

So it's only positive...

By wolf_

Ambassador_ (10135)

wolf_'s picture

30-11-2004, 11:58

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 Smile

By meits

Scribe (6572)

meits's picture

30-11-2004, 21:13

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

By Henk

Expert (107)

Henk's picture

30-11-2004, 22:01

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

Page 1/2
| 2