Procedure: main by erik wichern

Description of the procedure:
it turns right 15 then draws a square, repeat for 360 degrees

Source:

procedure main
right 15
go 100
right 90
go 100
right 90
go 100
right 90
go 100
right 90
right 15
go 100
right 90
go 100
right 90
go 100
right 90
go 100
right 90
right 15
go 100
right 90
go 100
right 90
go 100
right 90
go 100
right 90
right 15
go 100
right 90
go 100
right 90
go 100
right 90
go 100
right 90
right 15
go 100
right 90
go 100
right 90
go 100
right 90
go 100
right 90
right 15
go 100
right 90
go 100
right 90
go 100
right 90
go 100
right 90
right 15
go 100
right 90
go 100
right 90
go 100
right 90
go 100
right 90
right 15
go 100
right 90
go 100
right 90
go 100
right 90
go 100
right 90
right 15
go 100
right 90
go 100
right 90
go 100
right 90
go 100
right 90
right 15
go 100
right 90
go 100
right 90
go 100
right 90
go 100
right 90
right 15
go 100
right 90
go 100
right 90
go 100
right 90
go 100
right 90
right 15
go 100
right 90
go 100
right 90
go 100
right 90
go 100
right 90
right 15
go 100
right 90
go 100
right 90
go 100
right 90
go 100
right 90
right 15
go 100
right 90
go 100
right 90
go 100
right 90
go 100
right 90
right 15
go 100
right 90
go 100
right 90
go 100
right 90
go 100
right 90
right 15
go 100
right 90
go 100
right 90
go 100
right 90
go 100
right 90
right 15
go 100
right 90
go 100
right 90
go 100
right 90
go 100
right 90
right 15
go 100
right 90
go 100
right 90
go 100
right 90
go 100
right 90
right 15
go 100
right 90
go 100
right 90
go 100
right 90
go 100
right 90
right 15
go 100
right 90
go 100
right 90
go 100
right 90
go 100
right 90
right 15
go 100
right 90
go 100
right 90
go 100
right 90
go 100
right 90
right 15
go 100
right 90
go 100
right 90
go 100
right 90
go 100
right 90
right 15
go 100
right 90
go 100
right 90
go 100
right 90
go 100
right 90
right 15
go 100
right 90
go 100
right 90
go 100
right 90
go 100
right 90

end