Procedure: main by Chester Dought

Description of the procedure:
A very nice star

Source:

procedure main
repeat 80,star
end

procedure star
go loop
rt 90
go loop/2
lt 30
end