#turtlegraphics — Public Fediverse posts

Ryan Burnside is enhancing his turtle graphics library written in Interlisp. In this screencast he demonstrates some new interactive drawing features.

https://www.youtube.com/watch?v=BYcsghgRsx8

https://github.com/RyanBurnside/TURT.LISP

#TurtleGraphics #interlisp #lisp

Ryan Burnside is enhancing his turtle graphics library written in Interlisp. In this screencast he demonstrates some new interactive drawing features.

https://www.youtube.com/watch?v=BYcsghgRsx8

https://github.com/RyanBurnside/TURT.LISP

#TurtleGraphics #interlisp #lisp

Ryan Burnside published the code of his turtle graphics library in Interlisp, which he used to make the generative art of this screenshot.

https://github.com/RyanBurnside/TURT.LISP

#TurtleGraphics #interlisp #lisp

Ryan Burnside published the code of his turtle graphics library in Interlisp, which he used to make the generative art of this screenshot.

https://github.com/RyanBurnside/TURT.LISP

#TurtleGraphics #interlisp #lisp

This screenshot demonstrates a turtle graphics library that Ryan Burnside wrote for Medley Common Lisp.

https://groups.google.com/g/lispcore/c/NIhVeqiHABQ/m/sGOnRCKbEwAJ

#TurtleGraphics #CommonLisp #interlisp #lisp

This screenshot demonstrates a turtle graphics library that Ryan Burnside wrote for Medley Common Lisp.

https://groups.google.com/g/lispcore/c/NIhVeqiHABQ/m/sGOnRCKbEwAJ

#TurtleGraphics #CommonLisp #interlisp #lisp

How do you #draw a #square?
Forward 50
Right 90
Forward 50
Right 90
Forward 50
Right 90
Forward 50
Right 90

#logo #turtlegraphics #basic #dos #nostalgia

How do you #draw a #square?
Forward 50
Right 90
Forward 50
Right 90
Forward 50
Right 90
Forward 50
Right 90

#logo #turtlegraphics #basic #dos #nostalgia

Just took a trip down memory lane, back to where it all began for me. On the RM Nimbus 186 PC circa 1989. Since they rolled MESS into the main MAME code stream you can also use it to emulate retro computers like the Nimbus. Picture below is a screenshot showing a quick recursive program that repeatedly draws an ever increasing square with a 10 degree rotation between each. RM logo was my first programming language! #retrocomputing #rmnimbus #turtlegraphics

Just took a trip down memory lane, back to where it all began for me. On the RM Nimbus 186 PC circa 1989. Since they rolled MESS into the main MAME code stream you can also use it to emulate retro computers like the Nimbus. Picture below is a screenshot showing a quick recursive program that repeatedly draws an ever increasing square with a 10 degree rotation between each. RM logo was my first programming language! #retrocomputing #rmnimbus #turtlegraphics

@leon_p_smith
Yes, I think programming can be a good way to learn mathematics (and more).

Seymour Papert wrote about this in Mindstorms (1980).

I was fortunate to learn Logo and turtle programming on a modest home computer in my early teens. I don't know which was cause and which was effect, but I still like geometry and programming today.

For those not familiar with Mindstorms, a good summary is at
https://medium.com/bits-and-behavior/mindstorms-what-did-papert-argue-and-what-does-it-mean-for-learning-and-education-c8324b58aca4

#mathematics #programming #Logo #TurtleGraphics #ITeachMath #MathematicsEducation #MathEd #MathsEd #SeymourPapert #Mindstorms

@leon_p_smith
Yes, I think programming can be a good way to learn mathematics (and more).

Seymour Papert wrote about this in Mindstorms (1980).

I was fortunate to learn Logo and turtle programming on a modest home computer in my early teens. I don't know which was cause and which was effect, but I still like geometry and programming today.

For those not familiar with Mindstorms, a good summary is at
https://medium.com/bits-and-behavior/mindstorms-what-did-papert-argue-and-what-does-it-mean-for-learning-and-education-c8324b58aca4

#mathematics #programming #Logo #TurtleGraphics #ITeachMath #MathematicsEducation #MathEd #MathsEd #SeymourPapert #Mindstorms

Some LibreLogo from a few years ago: a modified Pythagorean tree with rainbow colours.

#CreativeCoding #pattern #fractal #Logo #LibreLogo #LibreOffice #TurtleGraphics #geometry #CreativeCode #procedural #CreativeCodeArt #design #2D #GraphicDesign

Some LibreLogo from a few years ago: a modified Pythagorean tree with rainbow colours.

#CreativeCoding #pattern #fractal #Logo #LibreLogo #LibreOffice #TurtleGraphics #geometry #CreativeCode #procedural #CreativeCodeArt #design #2D #GraphicDesign

@scruss The PICTURE command can group objects, and also output SVG animations. Although I’ve made a screen recording here as animated SVGs aren’t accepted

TO CORNER :S
RIGHT 45 FORWARD :S RIGHT 45
END

TO ONESIDE :S :DIAG :LEVEL
IF :LEVEL = 0 [ STOP ]
ONESIDE :S :DIAG :LEVEL - 1
RIGHT 45 FORWARD :DIAG RIGHT 45
ONESIDE :S :DIAG :LEVEL - 1
LEFT 90 FORWARD :S LEFT 90
ONESIDE :S :DIAG :LEVEL - 1
RIGHT 45 FORWARD :DIAG RIGHT 45
ONESIDE :S :DIAG :LEVEL - 1
SLEEP 20
END

TO SIERP :S :LEVEL
:DIAG = :S / 1.414
REPEAT 4 [ ONESIDE :S :DIAG :LEVEL CORNER :DIAG ]
END

CLEARSCREEN
HIDETURTLE
PENUP HOME RIGHT 90 BACK 100 LEFT 90 BACK 100 PENDOWN
; PICTURE "≈" [
; SIERP 10 2
; ]

PICTURE “Sierpinski004.svg” [

repeat 1 [
SIERP 10 4
SLEEP 2000 ]

#animation #SVG #loop #2d #CreativeCoding #pattern #Sierpinski #fractal #Logo #TurtleGraphics #geometry #CreativeCode #procedural #CreativeCodeArt #design #GraphicDesign

@scruss The PICTURE command can group objects, and also output SVG animations. Although I’ve made a screen recording here as animated SVGs aren’t accepted

TO CORNER :S
RIGHT 45 FORWARD :S RIGHT 45
END

TO ONESIDE :S :DIAG :LEVEL
IF :LEVEL = 0 [ STOP ]
ONESIDE :S :DIAG :LEVEL - 1
RIGHT 45 FORWARD :DIAG RIGHT 45
ONESIDE :S :DIAG :LEVEL - 1
LEFT 90 FORWARD :S LEFT 90
ONESIDE :S :DIAG :LEVEL - 1
RIGHT 45 FORWARD :DIAG RIGHT 45
ONESIDE :S :DIAG :LEVEL - 1
SLEEP 20
END

TO SIERP :S :LEVEL
:DIAG = :S / 1.414
REPEAT 4 [ ONESIDE :S :DIAG :LEVEL CORNER :DIAG ]
END

CLEARSCREEN
HIDETURTLE
PENUP HOME RIGHT 90 BACK 100 LEFT 90 BACK 100 PENDOWN
; PICTURE "≈" [
; SIERP 10 2
; ]

PICTURE “Sierpinski004.svg” [

repeat 1 [
SIERP 10 4
SLEEP 2000 ]

#animation #SVG #loop #2d #CreativeCoding #pattern #Sierpinski #fractal #Logo #TurtleGraphics #geometry #CreativeCode #procedural #CreativeCodeArt #design #GraphicDesign

@scruss Nice, this version has a few changes to fill the shapes with PENDOWN and PENUP to avoid draw extraneous lines.

TO hx :size
REPEAT 6 [
tri :size FORWARD :size LEFT 60 CLOSE FILL
]
END

TO PT :size
FORWARD :size
RIGHT 150
FORWARD :size
LEFT 30
END

TO superhex :size
REPEAT 6 [
FILLCOLOR "gray" FILLTRANSPARENCY 50 hx :size PU PT :size FORWARD :size LEFT 60 PD
]
END

TO tri :size
REPEAT 3 [
PT :size
]
END

HOME CLEARSCREEN HIDETURTLE
superhex 50

#CreativeCoding #pattern #Sierpinski #fractal #Logo #TurtleGraphics #geometry #CreativeCode #procedural #CreativeCodeArt #design #tiling #GraphicDesign

@scruss Nice, this version has a few changes to fill the shapes with PENDOWN and PENUP to avoid draw extraneous lines.

TO hx :size
REPEAT 6 [
tri :size FORWARD :size LEFT 60 CLOSE FILL
]
END

TO PT :size
FORWARD :size
RIGHT 150
FORWARD :size
LEFT 30
END

TO superhex :size
REPEAT 6 [
FILLCOLOR "gray" FILLTRANSPARENCY 50 hx :size PU PT :size FORWARD :size LEFT 60 PD
]
END

TO tri :size
REPEAT 3 [
PT :size
]
END

HOME CLEARSCREEN HIDETURTLE
superhex 50

#CreativeCoding #pattern #Sierpinski #fractal #Logo #TurtleGraphics #geometry #CreativeCode #procedural #CreativeCodeArt #design #tiling #GraphicDesign

@scruss Thanks. Here’s the Sierpinski program adapted to run LibreOffice using the built-in LibreLogo environment https://help.libreoffice.org/latest/en-US/text/swriter/librelogo/LibreLogo.html

One of LibreLogo’s advantages is that the output is vector graphics that can be edited (but rasterised here for convenience).

TO CORNER :S
RIGHT 45 FORWARD :S RIGHT 45
END

TO ONESIDE :S :DIAG :LEVEL
IF :LEVEL = 0 [ STOP ]
ONESIDE :S :DIAG :LEVEL - 1
RIGHT 45 FORWARD :DIAG RIGHT 45
ONESIDE :S :DIAG :LEVEL - 1
LEFT 90 FORWARD :S LEFT 90
ONESIDE :S :DIAG :LEVEL - 1
RIGHT 45 FORWARD :DIAG RIGHT 45
ONESIDE :S :DIAG :LEVEL - 1
END

TO SIERP :S :LEVEL
:DIAG = :S / 1.414
REPEAT 4 [ ONESIDE :S :DIAG :LEVEL CORNER :DIAG ]
END

CS
HT
PU HOME RT 90 BK 100 LT 90 BK 100 PD
SIERP 10 4
FILL

#CreativeCoding #pattern #Sierpinski #fractal #Logo #TurtleGraphics #LibreOffice #LibreLogo #geometry #CreativeCode #procedural #CreativeCodeArt

@scruss Thanks. Here’s the Sierpinski program adapted to run LibreOffice using the built-in LibreLogo environment https://help.libreoffice.org/latest/en-US/text/swriter/librelogo/LibreLogo.html

One of LibreLogo’s advantages is that the output is vector graphics that can be edited (but rasterised here for convenience).

TO CORNER :S
RIGHT 45 FORWARD :S RIGHT 45
END

TO ONESIDE :S :DIAG :LEVEL
IF :LEVEL = 0 [ STOP ]
ONESIDE :S :DIAG :LEVEL - 1
RIGHT 45 FORWARD :DIAG RIGHT 45
ONESIDE :S :DIAG :LEVEL - 1
LEFT 90 FORWARD :S LEFT 90
ONESIDE :S :DIAG :LEVEL - 1
RIGHT 45 FORWARD :DIAG RIGHT 45
ONESIDE :S :DIAG :LEVEL - 1
END

TO SIERP :S :LEVEL
:DIAG = :S / 1.414
REPEAT 4 [ ONESIDE :S :DIAG :LEVEL CORNER :DIAG ]
END

CS
HT
PU HOME RT 90 BK 100 LT 90 BK 100 PD
SIERP 10 4
FILL

#CreativeCoding #pattern #Sierpinski #fractal #Logo #TurtleGraphics #LibreOffice #LibreLogo #geometry #CreativeCode #procedural #CreativeCodeArt

#genuary #genuary6 #ludus #turtlegraphics: Make a landscape using only primitive shapes. Only lines! Purple hazy mountains.
https://web.ludus.dev/?code=let+gap+%3D+3%0Alet+bars+%3D+300%0Alet+bar_height+%3D+50%0A%0Afn+terrain%21+%7B%0A++%28len%2C+0%29+-%3E+%3Aok%0A++%28len%2C+iter%29+-%3E+%7B%0A++++fd%21+%28len%29%0A++++bk%21+%28len%29%0A++++rt%21+%280.25%29%0A++++pu%21+%28%29%0A++++fd%21+%28gap%29%0A++++pd%21+%28%29%0A++++lt%21+%280.25%29%0A++++let+alter+%3D+random+%280.95%2C+1.05%29%0A++++terrain%21+%28mult+%28alter%2C+len%29%2C+dec+%28iter%29%29%0A++%7D%0A%7D%0A%0Abackground%21+%28%28200%2C+180%2C+200%2C+255%29%29%0Abox+color+%3D+%28195%2C+160%2C+195%2C+255%29%0A%0Afn+fade_out+%28%28r%2C+g%2C+b%2C+a%29%29+-%3E+%28%0A++sub+%28r%2C+5%29%0A++sub+%28g%2C+20%29%0A++sub+%28b%2C+5%29%0A++a%0A%29%0A%0Afn+fade_in+%28%28r%2C+g%2C+b%2C+a%29%29+-%3E+%28%0A++add+%28r%2C+5%29%0A++g%0A++add+%28b%2C+5%29%0A++a%0A%29%0A%0Arepeat+20+%7B%0A++pd%21+%28%29%0A++pencolor%21+%28update%21+%28color%2C+fade_out%29%29%0A++terrain%21+%2850%2C+bars%29%0A++pu%21+%28%29%0A++lt%21+%280.25%29%0A++fd%21+%28inc+%28mult+%28gap%2C+bars%29%29%29%0A++lt%21+%280.25%29%0A++fd%21+%28mult+%28bar_height%2C+0.75%29%29%0A++rt%21+%280.5%29%0A%7D

Oh, hell. I broke the thread. Here's my #genuary5 in #ludus: https://assemblag.es/@scr/113777620426716764 #turtlegraphics

Well, it happened. Finally got my first e-mail about a project i put on the web 21 years ago.

https://drj11.github.io/curlylogo/

An SVG Logo programming language (it was very difficult to get this working in the right combination of OSes and browsers 21 years ago).

#CurlyLogo #Logo #TurtleGraphics

Hoje implementei e documentei mais comandos na ‘jupyturtle’, o módulo para fazer desenhos com uma tartaruga no Jupyter Notebook. #juoyter #turtlegraphics

(A documentação fica melhor num notebook ao vivo do que no GitHub)

https://github.com/ramalho/jupyturtle/blob/main/notebooks/command-ref.ipynb

Learning how to use Visual Studio Code on #Linux to teach #Python #TurtleGraphics to middle schoolers.