Витаминыч, Эм... Ок.

Вопрос освещения ещё остаётся в силе.

Вот тут генерируется массив байтов по шуму Перлина. Как эти байты превратить в изображение?
У меня в LibGDX Pixmap создается с параментрами (byte[] byte, int offset, int len), разные числа пробывал, все равно

Почаны, вопросец по рендреру графона: почему вершины не в одной плоскости вращаются, а по синусоиде?

Открыть спойлер

Закрыть спойлер

[копировать] [скачать]

1. var
2.   w:     array [1..4] of T3DPoint;
3.   v:     array [1..4] of TPoint;
4.   teta, phi: double;
5.  
6. procedure ViewTransformation;
7. var
8.   i: integer;
9. begin
10.   for i := 1 to 4 do
11.   begin
12.     v[i].x := Round(w[i].x*(-sin(teta))+w[i].y*cos(teta))+Form1.ClientWidth div 2;
13.     v[i].y := Round(w[i].x*(-cos(phi)*cos(teta))-w[i].y*(cos(phi)*sin(teta))+
14.       w[i].z*(sin(phi)))+Form1.ClientHeight div 2;
15.   end;
16. end;
17.  
18. procedure DrawTetrahedron;
19. begin
20.   Line(v[1], v[2]);
21.   Line(v[1], v[3]);
22.   Line(v[1], v[4]);
23.   Line(v[2], v[3]);
24.   Line(v[2], v[4]);
25.   Line(v[3], v[4]);
26. end;
27.  
28. procedure RepaintForm;
29. begin
30.   ViewTransformation;
31.   buf.Canvas.Brush.Color := clWhite;
32.   buf.Canvas.FillRect(0, 0, buf.Width, buf.Height);
33.   DrawTetrahedron;
34. end;
35.  
36. procedure TForm1.FormCreate(Sender: TObject);
37. begin
38.   w[1].x := -50;
39.   w[1].y := -50;
40.   w[1].z := -50;
41.  
42.   w[2].x := 0;
43.   w[2].y := 50;
44.   w[2].z := 0;
45.  
46.   w[3].x := 50;
47.   w[3].y := -50;
48.   w[3].z := -50;
49.  
50.   w[4].x := 0;
51.   w[4].y := -50;
52.   w[4].z := 50;
53.  
54.   phi := 45;
55.   teta := 45;
56.   buf := TBitmap.Create;
57.   buf.Width := Form1.ClientWidth;
58.   buf.Height := Form1.ClientHeight;
59.   blink_buf.Width := Form1.ClientWidth;
60.   blink_buf.Height := Form1.ClientHeight;
61.   buf.Canvas.Pen.Color := clBlack;
62.   buf.Width := 400;
63.   buf.Height := 400;
64.  
65.   RepaintForm;
66.   FormPaint(Sender);
67. end;
68.  
69. procedure TForm1.FormKeyDown(Sender: TObject; var Key: word; Shift: TShiftState);
70. begin
71.   case Key of
72.     37:
73.     begin
74.       teta := teta-0.0175;
75.       RepaintForm;
76.       FormPaint(Sender);
77.     end;
78.     38:
79.     begin
80.       phi := phi-0.0175;
81.       RepaintForm;
82.       FormPaint(Sender);
83.     end;
84.     39:
85.     begin
86.       teta := teta+0.0175;
87.       RepaintForm;
88.       FormPaint(Sender);
89.     end;
90.     40:
91.     begin
92.       phi := phi+0.0175;
93.       RepaintForm;
94.       FormPaint(Sender);
95.     end;
96.   end;
97. end;
98.  
99. procedure TForm1.FormPaint(Sender: TObject);
100. begin
101.   Form1.Canvas.Draw(0, 0, buf);
102. end;

Пояснения: стрелками поворот на 30 градусов, значение захардкоржено в радианах (сам на калькуляторе считал), ViewTransformation - превращение видовых координат в плоские (3D в 2D).
Давно код писал, забыл, что к чему там, но есть предположение, что это из-за центра координат. В примере для куба все норм, ибо центр совмещен, здесь вроде так, но чет странно.. или так и должно быть? Кто шарит, объясните, как координаты считать

хай ребятки вот и началась учёба, 11 класс все так вот хочу стать программистом(ну тип поступить) так вот желание программировать долгое время со мной, но вот компьютера нет, а телефончик недавно сделал. И хочу спросить вашего совета так как до поступления хочу изучить язык и кодить чтобы легче было, от вас я прошу помощи в этом деле. попробую java чтоли

NorMan, На 4pda скачай AIDE и в гугле набери "java под андроид уроки". И дальше думаю разберёшься.

NorMan, на телефон сразу ставь AIDE и учи Java (основы), для Android читай документацию. Полно так же учебников, видео.

И не слушай тех, кто будет советовать бейсики, RFO и тому подобное. Впустую потраченное время будет, если захочешь что-то попробовать из этого. Java и только Java.

Параллельно почитай учебники по алгоритмам (в общем плане и конкретно в Java).

Полезный сайт для старта: http://developer.alexanderklimov.ru/android/

в самой AIDE для новичков есть интерактивные туториалы, правда, на английском, но там понятно интуитивно
английский тоже учи, если не в ладах с ним. По себе сужу - сейчас то он как раз очень нужен, а я ни бе, ни ме (в 2009 думал, что оно мне не надо будет )

Витаминыч, 1. довно хотел спросить что такое документация, а то пугает неизвестность, а английский я с 1 сентября каждый день учу с птичкой доулинго легко и понятно

Витаминыч, за сайтик плюсик(пока поставить не могу)

NorMan, по-русски говоря документация - справочник по всем методам (командам, если сильно упростить).

Death, я программировании 0, java что тяжкловато, есть что нибудь легче для изучения чтобы постепенно прийти к java а она сейчас это нереально. я загибаюсь.