Показать сообщение отдельно
Старый 26.11.2011, 03:52   #10
Randomize
[object Object]
 
Аватар для Randomize
 
Регистрация: 01.08.2008
Адрес: В России
Сообщений: 4,358
Написано 2,472 полезных сообщений
(для 6,854 пользователей)
Ответ: Великая битва 4х языков программирования на простейшей задачке

Мой тест на BlitzMax:
SuperStrict
Framework brl
.basic
Import brl
.standardio

Local allocStart
:Int MilliSecs()
Local voxelData:Int[512128512]
Local allocStop:Int MilliSecs()
Local alloc:Int allocStop allocStart
Print "alloc: " alloc " ms"

Local counter:Int 0

Local fillStart
:Int MilliSecs()
For 
Local i:Int 0 Until 20
    
For Local x:Int 0 Until 512
        
For Local y:Int 0 Until 128
            
For Local z:Int 0 Until 512
                voxelData
[xyz] = counter
                counter 
counter 1
            Next
        Next
    Next
Next
Local fillStop
:Int MilliSecs()
Local fill:Int = (fillStop fillStart) / 20

Print "fill: " fill " ms"
Input("press any key"
Alloc: 178ms
Fill: 258ms

Машина для теста:
AMD Athlon 1.81GHz
1Gb RAM
Windows 7 x86
Вложения
Тип файла: 7z BlitzMax_mc_bench.7z (36.5 Кб, 482 просмотров)
__________________
Retry, Abort, Ignore? █
Intel Core i7-9700 4.70 Ghz; 64Gb; Nvidia RTX 3070
AMD Ryzen 7 3800X 4.3Ghz; 64Gb; Nvidia 1070Ti
AMD Ryzen 7 1700X 3.4Ghz; 8Gb; AMD RX 570
AMD Athlon II 2.6Ghz; 8Gb; Nvidia GTX 750 Ti
(Offline)
 
Ответить с цитированием
Эти 2 пользователя(ей) сказали Спасибо Randomize за это полезное сообщение:
ffinder (26.11.2011), pax (28.11.2011)