Hacker News new | ask | show | jobs
by elvis70 994 days ago
Not the GP but you can find it on the "HEBDOGICIEL, les listings" Website [1]. Deulignes section, page 15 [2] (Casse-briques by Laurent Auble). Published in issue 104, page 12 (second box) [3]:

    1 SPRITEON:IFK=2THENR=-2:B=2*SGN(X-Z-4):RETURNELSEIFK=0THENCOLOR4,0,0:SCREEN2,1:DEFINTA-Z:J=186:X=140:Y=80:VPOKE14336,128:VPOKE14344,248:LINE(80,40)-(183,61),7,BF:LINE(78,7)-(184,J),2,B:LINE(Y,8)-(183,10),1,BF:R=2:B=2:Z=X:ONSPRITEGOSUB1ELSEIFL>5THENRUN
    2 K=2:S=STICK(0):Z=Z+2*(S=3)*(Z<174)-2*(S=7)*(Z>80):PUTSPRITE1,(Z,161):Y=Y+R:X=X+B:PUTSPRITE0,(X,Y),11:P=POINT(X,Y):IFP=0THEN2ELSEIFP=7THENR=-R:A=(X\4)*4:LINE(A,Y)-(A+3,Y+1),0,B:GOTO2ELSEIFP=1THENR=2:GOTO2ELSEIFY>180THENL=L+1:Y=80:K=1:GOTO1ELSEB=-B:GOTO2
Direct link to the source code [4]

[1] http://www.hebdogiciel.free.fr/

[2] http://www.hebdogiciel.free.fr/2lignes_15.htm

[3] https://archive.org/details/hebdogiciel-french-104/page/n11/...

[4] http://www.hebdogiciel.free.fr/hd-roms/2lignes/2lignes_MSX_n...

2 comments

Great find, thanks!

It didn't seem like any of your links was to a playable version, so I had a Goog' and a paste and came up with [1]. Pretty impressive game for that amount of code, I'd say.

I've never written a line of code on an actual MSX machine (even though I was around in the 80s), it's kind of amazing the amount of emulation Magic Power we casually throw around, these days. Massive thanks to all the emulation authors and (of course) retro computer archivists.

Edit: typo, more compliments.

[1]: https://msxpen.com/codes/-NflxlFRyvOOYbih_5WK

I remember this one well because I had an MSX, and like everyone else back then I didn't have that many games to play with, so I used this code quite extensively :)
Ok, so no Whitespace. I wonder how the parser works that handles RETURNELSEIFK or ONSPRITEGOSUB1ELSEIFL.
The lines of BASIC code are tokenized according to the shortest words.