Mururoa disqualified - Evidence

Página 1/2
| 2

Por snout

Ascended (15187)

Imagen del snout

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 sesión o register para postear comentarios

Por DarQ

Paragon (1038)

Imagen del DarQ

28-11-2004, 18:37

they are quite similar indeed Shocked!

Por Meits

Scribe (5544)

Imagen del Meits

28-11-2004, 18:48

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

Darn, this feels silly...

Por W76NearDark

Paladin (684)

Imagen del W76NearDark

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

Por snout

Ascended (15187)

Imagen del snout

30-11-2004, 08:34

that's the spirit! Smile

Por Henk

Expert (107)

Imagen del Henk

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

Por IC

Hero (557)

Imagen del IC

30-11-2004, 11:45

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

1/ 5,0968880770644654620142359221422e+171
Wink

Por evulopah

Hero (661)

Imagen del evulopah

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...

Por wolf_

Ambassador_ (9769)

Imagen del wolf_

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

Por Meits

Scribe (5544)

Imagen del Meits

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

Por Henk

Expert (107)

Imagen del Henk

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

Página 1/2
| 2