Попробовал улучшить немного со скоростью,так,по мелочи поменял,но вроде эффект есть.Вот можешь проверить таким вот тестом.Алгоритм аппроксимации(так вроде?) линии содрал прямо с вики,там используется битовая арифметика,я пока не очень понимаю,зачем там сдвиги на 12 позиций и прочее,надеюсь потом пойму.
PureBasic |
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
| SCREEN 12
FOR i=5 TO 639 STEP 20
FOR j=1 TO 479
PRESET (i,j),3
NEXT j
NEXT i
FOR i=5 TO 479 STEP 20
FOR j=1 TO 639
PRESET (j,i),3
NEXT j
NEXT i
LET k=1
FOR i=20 TO 420 STEP 10
FOR j=20 TO 420 STEP 10
LINE (i,j)-(j,i+k),14
LET k=k+1
NEXT j
LET k=0
NEXT i |
|