bazzargh3d ago
#bbcmicrobot MODE9+RND(-8):DIMC(16,16):FORI=1TO15:FORJ=1TO15:C(I,J)=INT(RND(1)+0.7):NEXT,:I=1:J=1:W=0:PRINTTAB(0,3);"INVISIBLE EXIT ->":REPEAT
IFW=0:U=I:V=J:R=-40:S=0:L=0:M=46:N=40:O=-21:P=40:Q=23
X=&71+2*(W MOD2):MOVE600+40*(U-V),100+23*(U+V):PLOT0,R,S:PLOT1,L,M:GCOL16,0:PLOTX,N,O:GCOL32,0:PLOTX,P,Q:GCOL48,0:PLOTX,-L,-M
IFW=0Z=INKEY(1E4):A=(Z=65)-(Z=68):B=(Z=83)-(Z=87)
W=W+1:IFW>3:W=0:IFC(I+A,J+B)=1:I=I+A:J=J+B
IFW=2ANDA<>0:U=I+A/2:R=-46:S=32:L=29:M=46:P=29:Q=-18
IFW=2ANDB<>0:V=J+B/2:R=-40:S=35:L=22:M=32:N=22:O=-45
UNTILI+J=30:PRINT"WIN!"
Show threadBBC Micro Bot 3d ago
I ran @bazzargh's program and got this.
Source: https://bbcmic.ro/?t=dQ5iF #bbcbasic
Show threadbazzargh

@bbcmicrobot after @grumpygamer asked for a game idea with just a cube I found out about @basic10liner - write a game in 10 lines of basic. "Well I could fit in a rotating cube but nothing else...wait, that's it! I'll make the maze invisible!" It was silly enough I had to write it. Click in the screen, WASD to move.

The maze generator is just carefully picked randomness. I meant to have the walls show up when you hit them but just showing a partial roll saved on plots.

#retrogaming #bbcbasic #creativecoding

Mar 19 at 6:18amWeb
Show threadRheolism3d ago
@bazzargh #bbcmicrobot @grumpygamer @basic10liner MODE9+RND(-8):C.-1:C.0:CLS:DIMC(16,16):FORI=1TO15:FORJ=1TO15:C(I,J)=INT(RND(1)+0.7):NEXT,:I=1:J=1:W=0:PRINTTAB(0,3);"INVISIBLE EXIT ->":REPEAT
IFW=0:U=I:V=J:R=-40:S=0:L=0:M=46:N=40:O=-21:P=40:Q=23
X=&71+2*(W MOD2):MOVE600+40*(U-V),100+23*(U+V):PLOT0,R,S:PLOT1,L,M:GCOL16,0:PLOTX,N,O:GCOL32,0:PLOTX,P,Q:GCOL48,0:PLOTX,-L,-M
IFW=0Z=INKEY(1E4):A=(Z=65)-(Z=68):B=(Z=83)-(Z=87)
W=W+1:IFW>3:W=0:IFC(I+A,J+B)=1:I=I+A:J=J+B
IFW=2ANDA<>0:U=I+A/2:R=-46:S=32:L=29:M=46:P=29:Q=-18
IFW=2ANDB<>0:V=J+B/2:R=-40:S=35:L=22:M=32:N=22:O=-45
UNTILI+J=30:PRINT"WIN!"
Show threadBBC Micro Bot 3d ago
I ran @rheolism's program and got this.
Source: https://bbcmic.ro/?t=dQnM2 #bbcbasic
Show threadbazzargh1d ago

@rheolism @basic10liner
I messed with a few variants and hummed and hawed over whether this was worth an entry, but submitted the one below that draws breadcrumbs. I added "SCHAU" entries for my Dragon and Great Wave (extended a bit from the bbcmicrobot version, since I'm not limited to 30s I can draw more of the fractal - pic)

MODE9+RND(-8):DIMC(16,16):FORI=1TO15:FORJ=1TO15:C(I,J)=INT(RND(1)+0.7):NEXT,
VDU29,640;100;:I=1:J=1:W=0:PRINTTAB(0,6);"INVISIBLE EXIT ->"
REPEAT:IFW=0:U=I:V=J:R=-40:S=0:L=0:M=46:N=40:O=-21:P=40:Q=23
X=&71+2*(W MOD2):MOVE40*(U-V),23*(U+V):PLOT0,R,S:PLOT1,L,M:GCOL16,0:PLOTX,N,O:GCOL32,0:PLOTX,P,Q:GCOL48,0:PLOTX,-L,-M
IFW=0Z=INKEY(1E4):A=(Z=79)-(Z=80):B=(Z=68)-(Z=69)
W=W+1:IFW>3:W=0:IFC(I+A,J+B)=1:GCOL0,3:MOVE40*(I-J),23*(I+J):PLOT&99,4,0:I=I+A:J=J+B
IFW=2ANDA<>0:U=I+A/2:R=-46:S=32:L=29:M=46:P=29:Q=-18
IFW=2ANDB<>0:V=J+B/2:R=-40:S=35:L=22:M=32:N=22:O=-45
UNTILI+J=30:PRINT"WIN!"