zxspectrumbot - Network

Hello!I'm a ZX Spectrum bot. Toot code with hashtag zxspectrumbot and I'll reply with a...

Hello!

I'm a ZX Spectrum bot. Toot code with hashtag zxspectrumbot and I'll reply with a video.

info:

https://www.papa-robot.xyz/home/zx-spectrum-bot

Acceleration X2-10 works now !some caveats:Audio will be removedMedia is posted as GIF in mastodon.but we can make lean mean fractals now !

Acceleration X2-10 works now !

some caveats:

Audio will be removed
Media is posted as GIF in mastodon.

but we can make lean mean fractals now !

@zxspectrumbot ran @zxspectrumbot 's code and obtained:

@zxspectrumbot ran @zxspectrumbot 's code and obtained:

#zxspectrumbot {Z}paper 0:ink 6:clsfor i=0 to 50 step 5circle 128,96,inext i

#zxspectrumbot {Z}
paper 0:ink 6:cls
for i=0 to 50 step 5
circle 128,96,i
next i

@zxspectrumbot ran @zxspectrumbot 's code and obtained:

@zxspectrumbot ran @zxspectrumbot 's code and obtained:

#zxspectrumbot {Z}paper 0:ink6:clsfor i=0 to 50 step 5circle 128,96,inext i

#zxspectrumbot {Z}
paper 0:ink6:cls
for i=0 to 50 step 5
circle 128,96,i
next i

Now Debug is on by default !Remember to use hashtag. # zxspectrumbotfor running the code.Mentions are for the human behind this to read.

Now Debug is on by default !

Remember to use hashtag.
# zxspectrumbot
for running the code.

Mentions are for the human behind this to read.

ERROR in line 30, statement 1 - Expected keyword but got "M"

ERROR in line 30, statement 1 - Expected keyword but got "M"

#zxspectrumbot {D}10 REM Testing debug, broken bc mode20 REM Set up the screen30 MODE 140 PRINT "Bouncing Ball"50 PRINT...

#zxspectrumbot {D}
10 REM Testing debug, broken bc mode
20 REM Set up the screen
30 MODE 1
40 PRINT "Bouncing Ball"
50 PRINT "Press any key to start"
60 PAUSE 0
70 REM Set up the ball's starting position and velocity
80 x = 40
90 y = 10
100 vx = 1
110 vy = 1
120 REM Set up the loop to move and draw the ball
130 FOR t = 1 TO 10000
140 x = x + vx
150 y = y + vy
160 IF x < 0 OR x > 79 THEN vx = -vx
170 IF y < 0 OR y > 23 THEN vy = -vy
180 DRAW x, y
190 PAUSE 0
200 NEXT t

Hello. I’m a Sinclair zx spectrum bot.Write a toot with hashtag zxspectrumbot and I’ll run the code.{Z} directive for using Boriel...

Hello. I’m a Sinclair zx spectrum bot.
Write a toot with hashtag zxspectrumbot and I’ll run the code.
{Z} directive for using Boriel zxbasic
Default is Sinclair basic (uppercase commands, GO TO )

@zxspectrumbot ran @zxspectrumbot 's code and obtained:

@zxspectrumbot ran @zxspectrumbot 's code and obtained:

#zxspectrumbot {+}10 PRINT "Hello, I'm a Plus ! ";20 GO TO 10

#zxspectrumbot {+}
10 PRINT "Hello, I'm a Plus ! ";
20 GO TO 10

Code by Paul Malin

Code by Paul Malin

@zxspectrumbot ran @zxspectrumbot 's code and obtained:

@zxspectrumbot ran @zxspectrumbot 's code and obtained:

...

#zxspectrumbot
https://gist.githubusercontent.com/pmalin/c97f01e0338de762ca30d04239bd9cba/raw/a7f7e1109b0ac6817f6c2fdd84bad1f94c4a55bf/Scroller.z80

@zxspectrumbot ran @zxspectrumbot 's code and obtained:

@zxspectrumbot ran @zxspectrumbot 's code and obtained:

#zxspectrumbot {S30B99}
10 REM 
20 PAPER 0: BORDER 0: BRIGHT 1: CLS
30 LET x=160*RND
40 LET y=140*RND
50 LET v=INT (3*RND)
60...

#zxspectrumbot {S30B99}
10 REM 
20 PAPER 0: BORDER 0: BRIGHT 1: CLS
30 LET x=160*RND
40 LET y=140*RND
50 LET v=INT (3*RND)
60 LET x=x/2: LET y=y/2
70 IF v=0 THEN LET x=x+40: LET y=y+70: GO TO 90
80 IF v=1 THEN LET x=x+80
90 PLOT INK 6-v;47+x,157-y
100 GO TO 50

@zxspectrumbot ran @zxspectrumbot 's code and obtained:

@zxspectrumbot ran @zxspectrumbot 's code and obtained:

#zxspectrumbot {S30B99}10 REM Sierpinski triangle, original by @8bitFractals20 PAPER 0: BORDER 0: BRIGHT 1: CLS30 LET x=160*RND40 LET...

#zxspectrumbot {S30B99}
10 REM Sierpinski triangle, original by @8bitFractals
20 PAPER 0: BORDER 0: BRIGHT 1: CLS
30 LET x=160*RND
40 LET y=140*RND
50 LET v=INT (3*RND)
60 LET x=x/2: LET y=y/2
70 IF v=0 THEN LET x=x+40: LET y=y+70: GO TO 90
80 IF v=1 THEN LET x=x+80
90 PLOT INK 6-v;47+x,157-y
100 GO TO 50