Archived

This topic is now archived and is closed to further replies.

Time for a joke ?

This topic is 6384 days old which is more than the 365 day threshold we allow for new replies. Please post a new topic.

If you intended to correct an error in the post then please contact us.

Recommended Posts

In old DOS days I liked doing programs like this:

program ViolentSystemReboot;
Uses Crt, Dos, Etc;

procedure PortCheck(Value:Integer);
var i:Integer;
begin
for i:=0 to 255 do
Port[Value] := Random(256);
end;

var j:Integer;
begin
for j:=0 to 65535 do
PortCheck[ j ];
end.

Share this post


Link to post
Share on other sites