Goto 10: Retro Computing & Gaming

Goto 10: Retro Computing & Gaming

Share this post

Goto 10: Retro Computing & Gaming
Goto 10: Retro Computing & Gaming
Drawing a Spiral in BASIC
Copy link
Facebook
Email
Notes
More

Drawing a Spiral in BASIC

Paul Lefebvre's avatar
Paul Lefebvre
Dec 02, 2022
∙ Paid
5

Share this post

Goto 10: Retro Computing & Gaming
Goto 10: Retro Computing & Gaming
Drawing a Spiral in BASIC
Copy link
Facebook
Email
Notes
More
5
Share

A while ago I came across this short snippet of BASIC code, originally written for QuickBASIC 4.5:

CLS
RANDOMIZE (TIMER)
x = 320
y = 240
r = 100
c = 1
SCREEN 12
PSET (x, y - r), 0
FOR a = 0 TO 72 STEP .01
    LINE -(x + r * SIN(a), y - r * COS(a)), c
    r = r - .01
    c = RND(1) * 15
NEXT

This uses simple geometry to draw a circle, but slowly reduces the radius so …

This post is for paid subscribers

Already a paid subscriber? Sign in
© 2025 Paul Lefebvre
Privacy ∙ Terms ∙ Collection notice
Start writingGet the app
Substack is the home for great culture

Share

Copy link
Facebook
Email
Notes
More