PDA

Просмотр полной версии : нужна программа...


sTe[A]LeR
27.11.2009, 16:07
нужна программа, которая снизит производительность компьютера : загрузит проц пустыми вычислениями или заставит тормозить видюху...
Кто что подскажет ?

Lilo
27.11.2009, 16:25
касперский

[Abbath]
27.11.2009, 16:27
касперский
хахахахха =) прав 100%

DJ4J
27.11.2009, 16:35
запусти пассворд рековерси с приоритетом реального времени
у меня зависает комп

\\ChaOs//
27.11.2009, 16:55
@echo off
:s
start 123
goto:s


скопируй это в блокнот и сохрани как 123.bat, потом запусти.

sTe[A]LeR
27.11.2009, 17:08
@echo off
:s
start 123
goto:s


скопируй это в блокнот и сохрани как 123.bat, потом запусти.
эт немного не то . . . мне не нужно запускать что -либо стопитцот раз, тем более все это сделать нужно так, чтоб было без палева,

Lilo
27.11.2009, 17:12
касперский отличное решение

LiteMentaL
27.11.2009, 17:20
касперский однозначно... но вот мне не помагает... слишком мощная машина :(

-Unlocked-
27.11.2009, 17:23
Лайтментал крут. Понел, лило, у него 2 ядра, ему на каждое ядро надо по касперскому.

morty10
27.11.2009, 17:27
поставь два касперского :Р

PvgValo
27.11.2009, 17:28
-Unlocked-, ну и пусть у него два ядра, зато у Лило три ноги :)

ErrorNeo
27.11.2009, 18:44
Грузилка v1.0

описание:
Программа совершенно ничего не делает.
Но не делает она это в 4 потока с критическим системным приоритетом, таким образом способна отправить в полную кому совершенно любую, не важно скольки-ядерную систему.
Более мощный процессор, в данном случае, лишь позволяет программе ничего не делать с большей эффективностью, чем медленный.

код программы:
program Program1;

uses
Classes;

const
threads=4; //количество потоков, в которое работает программа.
//Должно превышать количество ядер для того,
//чтобы была возможность полностью загрузить их все.

type
TMyThread = class(TThread)
public
constructor Create; overload;
protected
procedure Execute; override;
end;

constructor TMyThread.Create;
begin
Create(true);
FreeOnTerminate := True;
Priority := tpLower;
// priority:=tpTimeCritical;
Resume;
end;

//thread
procedure TMyThread.Execute;
begin
while true do;
end;

//body
var
i:integer;
MyThread : array of TMyThread;
begin
setlength(MyThread,threads);
for i:=0 to threads-1 do MyThread[ i]:=TMyThread.Create;
repeat until false;
end.
{example written by E.N.}демо версия:
http://slil.ru/28262330
(в ней приоритет у потоков, создаваемых программой выставлен как низкий)

для того, чтобы версия стала злой - достаточно заменить в коде строку
Priority := tpLower; на
priority := tpTimeCritical;
Язык программы - Delphi.
Злая версия отправляет систему в такой коматоз, что невозможно вызвать даже Диспетчер Задач, или же просто нажать конпку Пуск. Хотя мышка по-прежнему периодически дергается...

так же возможно выставление и других приоритетов, по желанию.
tpIdle = &HFFFFFFF1 -15 Lowest thread priority
tpLowest = &HFFFFFFFE -2 Indicates 2 points below normal priority for the priority class.
tpBellowNormal = &HFFFFFFFF -1 Indicates 1 point below normal priority for the priority class.
tpNormal = &H0 0 Indicates normal priority for the priority class.
tpAboveNormal = &H1 1 Indicates 1 point above normal priority for the priority class.
tpHighest = &H2 2 Indicates 2 points above normal priority for the priority class.
tpTimeCritical = &HF 15 Indicates a base-priority level of 15.

sTe[A]LeR
27.11.2009, 19:17
Огромное спасибо ErrorNeo за помощь !!!

PHOEN_i_X
27.11.2009, 19:52
Ну как уже предлагали ав ) а лучше 3, чтобы конфликтовали )

winlogon.exe
27.11.2009, 20:56
касперский, доктор веб, фаер, и еще не мало программулин стоит и не сколько не лагает пк))