Create losange.pas