Реализации алгоритмов/Алгоритм Брезенхэма: различия между версиями

== Рисование линий ==

=== Реализация на Verilog ===

`define IDLE 0

`define LINEY 1

endmodule

 

=== Реализация на C++ ===

void drawLine(int x1, int y1, int x2, int y2) {

const int deltaX = abs(x2 - x1);

 

}

 

=== Реализация на Java ===

// Этот код "рисует" все 9 видов отрезков. Наклонные (из начала в конец и из конца в начало каждый), вертикальный и горизонтальный - тоже из начала в конец и из конца в начало, и точку.

private int sign (int x) {

}

}

 

=== Реализация на Python3 ===

""" Имплементация алгоритма на языке Python(перевод с Java)

setPixel(x,y) - функция закрашивает пиксель, с координатами x и y"""

t += 1

setPixel(x, y)

 

=== Реализация на Object Pascal ===

 

Procedure Swap(var x,y:Integer);

var t:Integer;

end;

end;

примечание<ref>переменная DX взята не удачно при написании фрагмента на [[Ассемблерная вставка|асм’е]] среда плохо переварит</ref>

 

=== Реализация на PascalABC ===

 

procedure drawLine(x1, y1, x2, y2: integer);

var

end;

end;

 

== Рисование окружностей ==

=== Для C++ ===

 

void drawCircle(int x0, int y0, int radius) {

int x = 0;

}

}

 

=== Для Delphi 7 ===

 

Edit1: TEdit;

Edit2: TEdit;

end;

 

 

=== Для TurboPascal ===

 

procedure BrezenCircle(x0, y0, r: integer);

var

end;

end;

 

=== Для Python ===

 

 

def draw_circle(x, y, r):

delta = delta + (2 * (x - y))

y -= 1

 

 

=== Модифицированный пример из книги Г.Шилдта «Си для профессиональных программистов» {{sfn|Шилдт|1989}} ===

/* Вспомогательная функция, печатает точки, определяющие окружность */

void plot_circle(int x, int y, int x_center, int y_center, int color_code)

if(x==y) plot_circle(x,y,x_center,y_center,color_code);

}

 

== Реализация для Turbo Assembler ==

.model tiny

.stack 100h

int 21h

end start

 

 

== Visual Basic ==

<ref>[http://encyclopedia.kids.net.au/page/br/Bresenham%27s_line_algorithm_Visual_basic_code Encyclopedia > Bresenham’s line algorithm Visual basic code] Bresenham’s line algorithm for Microsoft Visual Basic 6.0. Implementation by Robert Lee <rlee0001@maine.rr.com> July, 2002 Public Domain</ref>

Private Sub BresLine(InitialX As Long, InitialY As Long, FinalX As Long, FinalY As Long)

 

End Sub

 

 

== C++ для 3D-растра ==

public domain as well.

</ref>

void Bresenham3D(int x1, int y1, int z1, const int x2, const int y2, const int z2, WorldMap *output, int symbol){

}

 

== Примечания ==

{{примечания}}