Blue Falling Bottle

Run Settings
LanguagePlaintext
reset cleartext color[0 0 255] make "pw 1 setxy 0 0 setheading 135 repeat 600[ make "npw mod 100 :pw penwidth :npw fw 1 make "pw :pw+1 print :pw ]
Editor Settings
Theme
Key bindings
Full width
Lines