Конференция VBStreets

**Doctor Nestor** » 09.04.2004 (Пт) 12:27

Предыстория:
Сижу пишу прогу на VB, ну классика:
...
for i=1 to ...
for j=1 to ...
...=...+array(i,j)
next
next
...
тормозит...
Подходит сишник, крутит пальцем у виска, говорит разве так делают. Цитирую:
"Когда ты так обращаешься к массиву идёт многократное копирование элементов массива из памяти в стек, а можно найти в памяти первый элемент и от него читать остальные прямо из памяти, выигрыш в 5 раз"

Народ, обращаюсь ко всем. Кто знает, как работать с указателями, поделитесь опытом или подкиньте ссылки. Вообще интересно услышать любые коментарии по теме.
Заранее благодарен.

**Cyrax** » 09.04.2004 (Пт) 12:37

тут где-то неподалеку топик про SAFEARRAY так ты туда загляни... правда там какие-то неприятности при работе под NT, но думаю ребята разберутся

**Doctor Nestor** » 09.04.2004 (Пт) 12:44

Cyrax
благодарю за ссылку, разбираюсь...

**alibek** » 09.04.2004 (Пт) 12:57

Doctor Nestor, а ты покрути пальцем у виска сишнику и скажи "где VB, а где C"

**alibek** » 09.04.2004 (Пт) 12:59

Кстати, где-то еще я видел рекомендации Microsoft относительно массивов. ЕМНИП, он размещаются в памяти согласно их измерениям (т.е. в твоем случае по столбцам), и если ты поменяешь местами i и j, то работать будет быстрее.

**Doctor Nestor** » 09.04.2004 (Пт) 13:21

индексы менял, может выигрыш и есть, но не заметил, опрос затраченного времени через Timer, показывает примерно одну величину (довольно сильно флуктуирующую

), Хоца выигрыш в 5 раз

.

**GSerg** » 10.04.2004 (Сб) 8:32

Ребята разобрались

Только ещё непонятнее стало...

Что касается копирования массива в стек - это это всё клевета и наговоры... (*ppSAFEARRAY)->pvData+offset, так сишнику и скажи

**Doctor Nestor** » 10.04.2004 (Сб) 8:41

Короче говоря, фильтруя всё пройденное через мозг и вылавливая нужное для оптимизации приложения (во закрутил, а

) вроде думаю, что вместо заполнения массива типа:
Arr(i)=..., может быстрее будет получить указатель на первый элемент
через VarPtr, а потом через PutMem его забивать?
Попробую...

**Fedorfx** » 10.04.2004 (Сб) 13:13

Если получишь выйгрыш времени, сообщи плиз.

**Doctor Nestor** » 10.04.2004 (Сб) 14:55

Проверил. Никакого выигрыша, ещё больше тормозит

Прилагается исходник, может кто подскажет, как всё-таки ускорить
либо заполнение массива, либо в цикле вызов элементов...

**GSerg** » 11.04.2004 (Вс) 6:13

Нет, не прилагается исходник!

**Doctor Nestor** » 12.04.2004 (Пн) 11:15

**Doctor Nestor** » 12.04.2004 (Пн) 11:16

Прилагается уже :oops:

**Doctor Nestor** » 12.04.2004 (Пн) 11:53

ТОРМОЗА, жуткие тормоза
и PutMem и CopyMemory медленее простого
arr(i)=...
кошмар, как оптимизировать?

Vi » 12.04.2004 (Пн) 12:44

Можно посоветовать добавить такой фрагмент, взяв функцию PutMem8

Код: Выделить всё: Private Declare Function PutMem8 Lib "msvbvm60" (ByVal ptrToQWORDDest As Long, ByVal NewValueLowDWORD As Long, ByVal NewValueHighDWORD As Long) As Long

Код: Выделить всё: T = Timer For i = 1 To 300000 Step 2 PutMem8 PointerVar, i + 3, i + 4 PointerVar = PointerVar + 8 Next T = Timer - T

**Doctor Nestor** » 12.04.2004 (Пн) 13:21

Vi
благодарю за совет, это действительно быстрее!!! (хоть и не намного)

**Ennor** » 12.04.2004 (Пн) 16:30

Ты бы прикинул, сколько у тебя там всего сложений... Ну и примерные размерности неплохо было бы. Да и прим. мощность тачки не помешает. А то еще выяснится, что при таких объемах лучшая оптимизация - написание библы на асме и передача в нее указателя на весь твой массив... Ты не представляешь, _сколько_ тактов CPU на VB занимает A+B - порядка 70!..

Конференция VBStreets

Как с указателями на область памяти работать?

Как с указателями на область памяти работать?

Кто сейчас на конференции