to zvijezda :d :kut ;cs zvijezda 100 30 ;cs zvijezda 100 45 repeat 5 [ fd :d rt 180-:kut fd :d rt 180 make "beta 360-(180-:kut)-(5-2)*180/5 rt :beta ] end Make "beta 117