b3ta.com board
You are not logged in. Login or Signup
Home » Messageboard » XXX » Message 11026894 (Thread)

#
RESET PENUP COLOR [255 0 255]
TO BALL PENDOWN MAKE 'R 0 REPEAT 61 [ CIRCLE :R MAKE 'R :R + 0.5 ] PENUP END
TO SHAFT PENDOWN MAKE 'X 0 REPEAT 41 [ FORWARD 200 LEFT 180 FORWARD 200 RIGHT 90 FORWARD 1 RIGHT 90 ] PENUP END
TO PUBE FORWARD 20 PENDOWN FORWARD 40 PENUP RIGHT 180 FORWARD 60 END
TO PUBES LEFT 30 PUBE LEFT 150 PUBE LEFT 150 PUBE LEFT 210 END
RIGHT 180 FORWARD 100 RIGHT 90 FORWARD 30 BALL
RIGHT 180 FORWARD 60 BALL
LEFT 180 FORWARD 10 RIGHT 90 SHAFT
RIGHT 90 FORWARD 21 LEFT 90 FORWARD 220 BALL
LEFT 180 FORWARD 220 RIGHT 90 FORWARD 30 COLOR [0 0 0] PENWIDTH 5 PUBES RIGHT 180 FORWARD 60 PUBES
(Honourable Member is upstanding, Wed 6 Nov 2013, 21:08, archived)