Помогите протестировать

[X-BOND]

Собираю информацию, как поведут себя
различные алгоритмы цикла на разных процах.
Тест качать здесь (12Kb)

Предупреждение!
Советую перед запуском сохранить все важные документы.
Длительность теста - около 1-2 мин.
На это время комп "зависает" намертво, это нормальное явление.
Также, не желательно трогать мышу и клаву.

Результаты выкладываете тут, или шлите мне на мыло.
Спасибо.

[Tarik]

PowerBASIC 7.xx Loop Test. v0.30
--------------------------------
TASK: None
COUNT: 600 000 000
> IF/GOTO - 718 ms
> DO/LOOP - 1063 ms
> WHILE/WEND - 1078 ms
> FOR/NEXT+1 - 719 ms
> FOR/NEXT-1 - 531 ms
> ASM-LOOP - 484 ms
--------------------------------
TASK: MACRO TEST [AS LONG] = SQR(SIN(RND) * 16)
COUNT: 30 000 000
> IF/GOTO - 6625 ms
> DO/LOOP - 6625 ms
> WHILE/WEND - 6625 ms
> FOR/NEXT+1 - 6625 ms
> FOR/NEXT-1 - 6625 ms
> ASM-LOOP - 6594 ms
--------------------------------
TASK: MACRO TEST [AS SINGLE] = SQR(SIN(RND) * 16)
COUNT: 30 000 000
> IF/GOTO - 6531 ms
> DO/LOOP - 6532 ms
> WHILE/WEND - 6531 ms
> FOR/NEXT+1 - 6531 ms
> FOR/NEXT-1 - 6485 ms
> ASM-LOOP - 6500 ms
--------------------------------
System Information:
{
ProcessorNameString: Intel(R) Celeron(R) CPU 1.70GHz
~MHz: 1700 MHz
OS: Windows_NT 5.1 2600
}

А зачем тебе, если не секрет? Просто так, или цель какая-то определённая?

[A.A.Z.]

PowerBASIC 7.xx Loop Test. v0.30
--------------------------------
TASK: None
COUNT: 600 000 000
> IF/GOTO - 672 ms
> DO/LOOP - 1000 ms
> WHILE/WEND - 985 ms
> FOR/NEXT+1 - 672 ms
> FOR/NEXT-1 - 500 ms
> ASM-LOOP - 437 ms
--------------------------------
TASK: MACRO TEST [AS LONG] = SQR(SIN(RND) * 16)
COUNT: 30 000 000
> IF/GOTO - 6141 ms
> DO/LOOP - 6140 ms
> WHILE/WEND - 6141 ms
> FOR/NEXT+1 - 6141 ms
> FOR/NEXT-1 - 6140 ms
> ASM-LOOP - 6141 ms
--------------------------------
TASK: MACRO TEST [AS SINGLE] = SQR(SIN(RND) * 16)
COUNT: 30 000 000
> IF/GOTO - 6047 ms
> DO/LOOP - 6047 ms
> WHILE/WEND - 6046 ms
> FOR/NEXT+1 - 6047 ms
> FOR/NEXT-1 - 6000 ms
> ASM-LOOP - 6000 ms
--------------------------------
System Information:
{
ProcessorNameString: Intel(R) Pentium(R) 4 CPU 1.80GHz
~MHz: 1817 MHz
OS: Windows_NT 5.1 2600
}

Я ему (процессу) еще на всякий случай ставил приоритет реального времени

[d3drm]

TASK: None
COUNT: 600 000 000
> IF/GOTO - 453 ms
> DO/LOOP - 656 ms
> WHILE/WEND - 641 ms
> FOR/NEXT+1 - 484 ms
> FOR/NEXT-1 - 360 ms
> ASM-LOOP - 359 ms
--------------------------------
TASK: MACRO TEST [AS LONG] = SQR(SIN(RND) * 16)
COUNT: 30 000 000
> IF/GOTO - 4656 ms
> DO/LOOP - 4657 ms
> WHILE/WEND - 4656 ms
> FOR/NEXT+1 - 4609 ms
> FOR/NEXT-1 - 4594 ms
> ASM-LOOP - 4641 ms
--------------------------------
TASK: MACRO TEST [AS SINGLE] = SQR(SIN(RND) * 16)
COUNT: 30 000 000
> IF/GOTO - 4484 ms
> DO/LOOP - 4469 ms
> WHILE/WEND - 4484 ms
> FOR/NEXT+1 - 4485 ms
> FOR/NEXT-1 - 4375 ms
> ASM-LOOP - 4328 ms
--------------------------------
System Information:
{
ProcessorNameString: Intel(R) Pentium(R) 4 CPU 2.80GHz
~MHz: 2809 MHz
OS: Windows_NT 5.1 2600
}

[X-BOND]

А зачем тебе, если не секрет? Просто так, или цель какая-то определённая?

Цели определенной нет, просто интересно, почему на "загруженных" циклах практически нет разницы в скорости. Может надо "нагрузку" иначе сформулировать? Кстати, AMD-ные процы показывает явное преимущество.
Вот, например, результаты на моем стареньком Duron-e:

PowerBASIC 7.xx Loop Test. v0.30
--------------------------------
TASK: None
COUNT:600 000 000
> IF/GOTO - 1468 ms
> DO/LOOP - 1469 ms
> WHILE/WEND - 1469 ms
> FOR/NEXT+1 - 1484 ms
> FOR/NEXT-1 - 985 ms
> ASM-LOOP - 968 ms
--------------------------------
TASK: MACRO TEST [AS LONG] = SQR(SIN(RND) * 16)
COUNT:30 000 000
> IF/GOTO - 4860 ms
> DO/LOOP - 4828 ms
> WHILE/WEND - 4922 ms
> FOR/NEXT+1 - 5562 ms
> FOR/NEXT-1 - 4844 ms
> ASM-LOOP - 5500 ms
--------------------------------
TASK: MACRO TEST [AS SINGLE] = SQR(SIN(RND) * 16)
COUNT:30 000 000
> IF/GOTO - 4969 ms
> DO/LOOP - 4984 ms
> WHILE/WEND - 4906 ms
> FOR/NEXT+1 - 4828 ms
> FOR/NEXT-1 - 4938 ms
> ASM-LOOP - 4844 ms
--------------------------------
System Information:
{
ProcessorNameString: AMD Duron(tm) Processor
~MHz: 1230 MHz
OS: Windows_NT 5.1 2600
}

Я ему (процессу) еще на всякий случай ставил приоритет реального времени

Можно поинтересоваться, в целях повышения образованности, каким образом тебе удалось изменить приоритет?

[xolod]

PowerBASIC 7.xx Loop Test. v0.30
--------------------------------
TASK: None
COUNT: 600 000 000
> IF/GOTO - 120 ms
> DO/LOOP - 120 ms
> WHILE/WEND - 93 ms
> FOR/NEXT+1 - 103 ms
> FOR/NEXT-1 - 40 ms
> ASM-LOOP - 52 ms
--------------------------------
TASK: MACRO TEST [AS LONG] = SQR(SIN(RND) * 16)
COUNT: 30 000 000
> IF/GOTO - 1200 ms
> DO/LOOP - 1140 ms
> WHILE/WEND - 1540 ms
> FOR/NEXT+1 - 1100 ms
> FOR/NEXT-1 - 1200 ms
> ASM-LOOP - 1120 ms
--------------------------------
TASK: MACRO TEST [AS SINGLE] = SQR(SIN(RND) * 16)
COUNT: 30 000 000
> IF/GOTO - 965 ms
> DO/LOOP - 1010 ms
> WHILE/WEND - 1193 ms
> FOR/NEXT+1 - 1592 ms
> FOR/NEXT-1 - 1145 ms
> ASM-LOOP - 1200 ms
--------------------------------
System Information:
{
ProcessorNameString: Intel(R) Pentium(R) 4 Xeon(TM) CPU 3.84GHz x 2
~MHz: 3860 MHz
OS: Windows_NT 5.1 2600
}

[Шурик]

PowerBASIC 7.xx Loop Test. v0.30
--------------------------------
TASK: None
COUNT: 600 000 000
> IF/GOTO - 1000 ms
> DO/LOOP - 1000 ms
> WHILE/WEND - 1016 ms
> FOR/NEXT+1 - 1000 ms
> FOR/NEXT-1 - 672 ms
> ASM-LOOP - 671 ms
--------------------------------
TASK: MACRO TEST [AS LONG] = SQR(SIN(RND) * 16)
COUNT: 30 000 000
> IF/GOTO - 3360 ms
> DO/LOOP - 3297 ms
> WHILE/WEND - 3343 ms
> FOR/NEXT+1 - 3813 ms
> FOR/NEXT-1 - 3297 ms
> ASM-LOOP - 3812 ms
--------------------------------
TASK: MACRO TEST [AS SINGLE] = SQR(SIN(RND) * 16)
COUNT: 30 000 000
> IF/GOTO - 3391 ms
> DO/LOOP - 3328 ms
> WHILE/WEND - 3328 ms
> FOR/NEXT+1 - 3297 ms
> FOR/NEXT-1 - 3359 ms
> ASM-LOOP - 3297 ms
--------------------------------
System Information:
{
ProcessorNameString: AMD Duron(tm) p
~MHz: 1797 MHz
OS: Windows_NT 5.1 2600
}

[A.A.Z.]

Я ему (процессу) еще на всякий случай ставил приоритет реального времени

Можно поинтересоваться, в целях повышения образованности, каким образом тебе удалось изменить приоритет?

Так это,

[ZeroX]

PowerBASIC 7.xx Loop Test. v0.30
--------------------------------
TASK: None
COUNT: 600 000 000
> IF/GOTO - 711 ms
> DO/LOOP - 1052 ms
> WHILE/WEND - 1101 ms
> FOR/NEXT+1 - 701 ms
> FOR/NEXT-1 - 551 ms
> ASM-LOOP - 471 ms
--------------------------------
TASK: MACRO TEST [AS LONG] = SQR(SIN(RND) * 16)
COUNT: 30 000 000
> IF/GOTO - 6529 ms
> DO/LOOP - 6530 ms
> WHILE/WEND - 6519 ms
> FOR/NEXT+1 - 6530 ms
> FOR/NEXT-1 - 6529 ms
> ASM-LOOP - 6489 ms
--------------------------------
TASK: MACRO TEST [AS SINGLE] = SQR(SIN(RND) * 16)
COUNT: 30 000 000
> IF/GOTO - 6460 ms
> DO/LOOP - 6459 ms
> WHILE/WEND - 6449 ms
> FOR/NEXT+1 - 6449 ms
> FOR/NEXT-1 - 6410 ms
> ASM-LOOP - 6399 ms
--------------------------------
System Information:
{
ProcessorNameString: Intel(R) Celeron(R) CPU 1.70GHz
~MHz: 1716 MHz
OS: Windows_NT 5.1 2600
}

[hCORe]

Код: Выделить всё

PowerBASIC 7.xx Loop Test. v0.30
--------------------------------
TASK: None
COUNT: 600 000 000
> IF/GOTO    - 609 ms
> DO/LOOP    - 906 ms
> WHILE/WEND - 907 ms
> FOR/NEXT+1 - 609 ms
> FOR/NEXT-1 - 453 ms
> ASM-LOOP   - 406 ms
--------------------------------
TASK: MACRO TEST [AS LONG] = SQR(SIN(RND) * 16)
COUNT: 30 000 000
> IF/GOTO    - 5625 ms
> DO/LOOP    - 5625 ms
> WHILE/WEND - 5610 ms
> FOR/NEXT+1 - 5625 ms
> FOR/NEXT-1 - 5625 ms
> ASM-LOOP   - 5625 ms
--------------------------------
TASK: MACRO TEST [AS SINGLE] = SQR(SIN(RND) * 16)
COUNT: 30 000 000
> IF/GOTO    - 5531 ms
> DO/LOOP    - 5531 ms
> WHILE/WEND - 5516 ms
> FOR/NEXT+1 - 5531 ms
> FOR/NEXT-1 - 5484 ms
> ASM-LOOP   - 5500 ms
--------------------------------
System Information:
{
ProcessorNameString:               Intel(R) Pentium(R) 4 CPU 2.00GHz
~MHz:  2004 MHz
OS: Windows_NT 5.1 2600
}

[X-BOND]

Так это,

Да, я уже понял. Я просто забыл, что перед самым релизом добавил в начало MsgBox. Кстати, тест по умолчанию запускается в реальном времени.

2 xolod
Где такого монстра взял?

[xolod]

2 X-BOND
А как думаешь? Microsoft подарила, как гумуритарную помощь.
Купил ессено

[_Мика_]

2 X-BOND
А как думаешь? Microsoft подарила, как гумуритарную помощь.
Купил ессено

РУЛЕЗ!!


а у меня

PowerBASIC 7.xx Loop Test. v0.30
--------------------------------
TASK: None
COUNT: 600 000 000
> IF/GOTO - 453 ms
> DO/LOOP - 609 ms
> WHILE/WEND - 610 ms
> FOR/NEXT+1 - 437 ms
> FOR/NEXT-1 - 344 ms
> ASM-LOOP - 344 ms
--------------------------------
TASK: MACRO TEST [AS LONG] = SQR(SIN(RND) * 16)
COUNT: 30 000 000
> IF/GOTO - 4578 ms
> DO/LOOP - 4437 ms
> WHILE/WEND - 4438 ms
> FOR/NEXT+1 - 4422 ms
> FOR/NEXT-1 - 4437 ms
> ASM-LOOP - 4406 ms
--------------------------------
TASK: MACRO TEST [AS SINGLE] = SQR(SIN(RND) * 16)
COUNT: 30 000 000
> IF/GOTO - 4297 ms
> DO/LOOP - 4328 ms
> WHILE/WEND - 4344 ms
> FOR/NEXT+1 - 4328 ms
> FOR/NEXT-1 - 4375 ms
> ASM-LOOP - 4281 ms
--------------------------------
System Information:
{
ProcessorNameString: Intel(R) Pentium(R) 4 CPU 3.00GHz
~MHz: 3014 MHz
OS: Windows_NT 5.1 2600
}

[Jenizix]

вот на моем стареньком durone

PowerBASIC 7.xx Loop Test. v0.30
--------------------------------
TASK: None
COUNT: 600 000 000
> IF/GOTO - 1813 ms
> DO/LOOP - 1823 ms
> WHILE/WEND - 1812 ms
> FOR/NEXT+1 - 1803 ms
> FOR/NEXT-1 - 1212 ms
> ASM-LOOP - 1201 ms
--------------------------------
TASK: MACRO TEST [AS LONG] = SQR(SIN(RND) * 16)
COUNT: 30 000 000
> IF/GOTO - 5969 ms
> DO/LOOP - 5948 ms
> WHILE/WEND - 6069 ms
> FOR/NEXT+1 - 6830 ms
> FOR/NEXT-1 - 5948 ms
> ASM-LOOP - 6770 ms
--------------------------------
TASK: MACRO TEST [AS SINGLE] = SQR(SIN(RND) * 16)
COUNT: 30 000 000
> IF/GOTO - 6099 ms
> DO/LOOP - 6119 ms
> WHILE/WEND - 6028 ms
> FOR/NEXT+1 - 5929 ms
> FOR/NEXT-1 - 6059 ms
> ASM-LOOP - 5948 ms
--------------------------------
System Information:
{
ProcessorNameString: AMD Duron(tm) processor
~MHz: 999 MHz
OS: Windows_NT 5.1 2600
}

[FaKk2]

PowerBASIC 7.xx Loop Test. v0.30
--------------------------------
TASK: None
COUNT: 600 000 000
> IF/GOTO - 844 ms
> DO/LOOP - 843 ms
> WHILE/WEND - 828 ms
> FOR/NEXT+1 - 844 ms
> FOR/NEXT-1 - 547 ms
> ASM-LOOP - 563 ms
--------------------------------
TASK: MACRO TEST [AS LONG] = SQR(SIN(RND) * 16)
COUNT: 30 000 000
> IF/GOTO - 2750 ms
> DO/LOOP - 2750 ms
> WHILE/WEND - 2796 ms
> FOR/NEXT+1 - 3188 ms
> FOR/NEXT-1 - 2750 ms
> ASM-LOOP - 3125 ms
--------------------------------
TASK: MACRO TEST [AS SINGLE] = SQR(SIN(RND) * 16)
COUNT: 30 000 000
> IF/GOTO - 2812 ms
> DO/LOOP - 2782 ms
> WHILE/WEND - 2781 ms
> FOR/NEXT+1 - 2750 ms
> FOR/NEXT-1 - 2797 ms
> ASM-LOOP - 2765 ms
--------------------------------
System Information:
{
ProcessorNameString: AMD Athlon(tm) XP 3000+
~MHz: 2171 MHz
OS: Windows_NT 5.1 2600
}

PS: A.A.Z., 52 процесса это не здорово, я бы сказал...

[A.A.Z.]

Я еще половину повырубал, обычно ~70
Винда просто уже черт знает сколько стоит, а чистить лень, да и некогда...

[_Мика_]

Ну как так можно....максимум должно быть 40! На чистой винде 16 процессов должно быть!!!

[FaKk2]

_Мика_
от 18-ти до 20-ти, сегодня проверил

[X-BOND]

Спасибо всем, кто помог в проведении теста!
Результаты смотрим тут. Критика и предложения приветствуются.