Home Up Contents Search

Solution A

House DesignFixed-size House

HOUSE1.LGO

to door
  home lt 90 fd 15 rt 90
  fd 50 rt 90 fd 30 rt 90 fd 50 home
end

to frame
  lt 90 fd 75 rt 90 square 150
end

to house
  init door frame windows roof
end

to init
  cs
end

to roof
  pu home fd 212 pd
  lt 130 fd 125
  pu home fd 212 pd
  rt 130 fd 125
end

to square :side
  repeat 4 [fd :side rt 90]
end

to windows
  pu fd 110 rt 90 fd 40 pd repeat 4 [square 15 rt 90]
  pu fd 70 pd repeat 4 [square 15 rt 90]
end

 
Next
Send mail to ljschwerin@hotmail.com with questions or comments about this web site.

Copyright © 1999-2002 Leon Schwerin
Last modified: 28 March 2000
1