Downdetector with PowerShell

using assembly System.Windows.Forms
using namespace System.Windows.Forms
 
function screenshot($path)
{
    Start-Process chrome "http://downdetector.com/status/level3/map/"
    Start-Sleep -Seconds 5
	$b=New-Object System.Drawing.Bitmap([System.Windows.Forms.Screen]::PrimaryScreen.Bounds.Width, [System.Windows.Forms.Screen]::PrimaryScreen.Bounds.Height)
	$g=[System.Drawing.Graphics]::FromImage($b)
	$g.CopyFromScreen((New-Object System.Drawing.Point(0,0)), (New-Object System.Drawing.Point(0,0)), $b.Size)
	$g.Dispose()
	$b.Save($path,'Bmp')
}

$form = [Form] @{
Text = 'Mi formulario'
BackgroundImageLayout = "None"
}
#Creación de los botones
$button = [Button] @{
 Text = 'Level3'
 Dock = 'Top'
}

#Acciones de los botones
$button.add_Click{

screenshot(".\test.bmp")

#Creación del formulario
$Image=[system.drawing.image]::FromFile(".\test.bmp")

$form2 = [Form] @{
Text = 'Mi formulario'
BackgroundImage = $Image
Width = $Image.Width
Height = $Image.Height
BackgroundImageLayout = "None"
}
$form2.ShowDialog()
}

#Añadir botones al formulario
$form.Controls.Add($button)
$form.ShowDialog()

using assembly System.Windows.Forms

using namespace System.Windows.Forms

function screenshot($path)

{

Start-Process chrome "http://downdetector.com/status/level3/map/"

Start-Sleep -Seconds 5

$b=New-Object System.Drawing.Bitmap([System.Windows.Forms.Screen]::PrimaryScreen.Bounds.Width, [System.Windows.Forms.Screen]::PrimaryScreen.Bounds.Height)

$g=[System.Drawing.Graphics]::FromImage($b)

$g.CopyFromScreen((New-Object System.Drawing.Point(0,0)), (New-Object System.Drawing.Point(0,0)), $b.Size)

$g.Dispose()

$b.Save($path,'Bmp')

}

$form = [Form] @{

Text = 'Mi formulario'

BackgroundImageLayout = "None"

}

#Creación de los botones

$button = [Button] @{

Text = 'Level3'

Dock = 'Top'

}

#Acciones de los botones

$button.add_Click{

screenshot(".\test.bmp")

#Creación del formulario

$Image=[system.drawing.image]::FromFile(".\test.bmp")

$form2 = [Form] @{

Text = 'Mi formulario'

BackgroundImage = $Image

Width = $Image.Width

Height = $Image.Height

BackgroundImageLayout = "None"

}

$form2.ShowDialog()

}

#Añadir botones al formulario

$form.Controls.Add($button)

$form.ShowDialog()

Enviar mensajes SMS a varios teléfonos en Android con ADB (explicación paso a paso) desde PowerShell

Crear un fichero con números de teléfono Enviar mensaje SMS para cada uno de los números del fichero (paso a paso)

#Entrar en la carpeta ADB
cd C:\adb

#Listar los dispositivos conectados
.\adb.exe devices

#Probar que el dispositivo funciona listando los procesos
.\adb shell ps

#Escribir un mensajes sin enviar
.\adb.exe shell am start -a android.intent.action.SENDTO -d sms:123456789 --es sms_body "Hi" --ez exit_on_sent true

#Escribir un mensajes y enviarlo
.\adb.exe shell am start -a android.intent.action.SENDTO -d sms:123456789 --es sms_body "Hi" --ez exit_on_sent true
#Pulsar en el botón de enviar que se encuentra en la posición 1000,1000
Start-Sleep -Seconds 5
.\adb shell input tap 1000 1000

#Escribir un mensaje y enviarlo a cada uno de los números que están en el fichero numeros.txt
gc .\numeros.txt | % {
$_
.\adb.exe shell am start -a android.intent.action.SENDTO -d sms:$_ --es sms_body "Hi" --ez exit_on_sent true
#Pulsar en el botón de enviar que se encuentra en la posición 1000,1000
Start-Sleep -Seconds 5
.\adb shell input tap 1000 1000
}

#Entrar en la carpeta ADB

cd C:\adb

#Listar los dispositivos conectados

.\adb.exe devices

#Probar que el dispositivo funciona listando los procesos

.\adb shell ps

#Escribir un mensajes sin enviar

.\adb.exe shell am start -a android.intent.action.SENDTO -d sms:123456789 --es sms_body "Hi" --ez exit_on_sent true

#Escribir un mensajes y enviarlo

.\adb.exe shell am start -a android.intent.action.SENDTO -d sms:123456789 --es sms_body "Hi" --ez exit_on_sent true

#Pulsar en el botón de enviar que se encuentra en la posición 1000,1000

Start-Sleep -Seconds 5

.\adb shell input tap 1000 1000

#Escribir un mensaje y enviarlo a cada uno de los números que están en el fichero numeros.txt

gc .\numeros.txt | % {

.\adb.exe shell am start -a android.intent.action.SENDTO -d sms:$_ --es sms_body "Hi" --ez exit_on_sent true

#Pulsar en el botón de enviar que se encuentra en la posición 1000,1000

Start-Sleep -Seconds 5

.\adb shell input tap 1000 1000

}

Enviar un mensaje SMS en Android con ADB (pulsando en la posición del botón enviar)

#Escribir un mensajes y enviarlo
.\adb.exe shell am start -a android.intent.action.SENDTO -d sms:123456789 --es sms_body "Hi" --ez exit_on_sent true
#Pulsar en el botón de enviar que se encuentra en la posición 1000,1000
Start-Sleep -Seconds 5
.\adb shell input tap 1000 1000

#Escribir un mensajes y enviarlo

.\adb.exe shell am start -a android.intent.action.SENDTO -d sms:123456789 --es sms_body "Hi" --ez exit_on_sent true

#Pulsar en el botón de enviar que se encuentra en la posición 1000,1000

Start-Sleep -Seconds 5

.\adb shell input tap 1000 1000

Automatizar SDRSharp con PowerShell (parte 5)

Abrir, ocultar el menú, poner en funcionamiento SDRSharp y recorrer el rango de frecuencias desde 400~470 MHz haciendo una captura de pantalla por cada frecuencia

#Abrir SDRSharp
Start-Process E:\sdrsharp-x86\SDRSharp.exe

Start-Sleep -Seconds 5

#Funciones necesarias para hacer clic
$MouseEventSig=@'
[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]
public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);
'@
$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name "MouseEventWinApi" -passThru

#Función para capturar la pantalla
function screenshot($path)
{
	$b=New-Object System.Drawing.Bitmap([System.Windows.Forms.Screen]::PrimaryScreen.Bounds.Width, [System.Windows.Forms.Screen]::PrimaryScreen.Bounds.Height)
	$g=[System.Drawing.Graphics]::FromImage($b)
	$g.CopyFromScreen((New-Object System.Drawing.Point(0,0)), (New-Object System.Drawing.Point(0,0)), $b.Size)
	$g.Dispose()
	$b.Save($path,'Bmp')
}

#Hacer clic en el botón del menú para ocultarlo
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(23,54)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Hacer clic en Start para poner en funcionamiento SDRSharp
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(60,54)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Mover el cursor hasta la posición de los MHz y hacer clic
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(382,54)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Escribir en la posición de los MHz el valor 400
[System.Windows.Forms.SendKeys]::SendWait("400")

Start-Sleep -Seconds 5

#Hacer 70 clics en la posición de la unidad en los MHz
1..70 | % {
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(422,46)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)
Start-Sleep -Seconds 5

#Ruta de la captura de pantalla
screenshot "e:\frecuencias\$_.bmp"
}

#Abrir SDRSharp

Start-Process E:\sdrsharp-x86\SDRSharp.exe

Start-Sleep -Seconds 5

#Funciones necesarias para hacer clic

$MouseEventSig=@'

[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]

public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);

$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name "MouseEventWinApi" -passThru

#Función para capturar la pantalla

function screenshot($path)

{

$b=New-Object System.Drawing.Bitmap([System.Windows.Forms.Screen]::PrimaryScreen.Bounds.Width, [System.Windows.Forms.Screen]::PrimaryScreen.Bounds.Height)

$g=[System.Drawing.Graphics]::FromImage($b)

$g.CopyFromScreen((New-Object System.Drawing.Point(0,0)), (New-Object System.Drawing.Point(0,0)), $b.Size)

$g.Dispose()

$b.Save($path,'Bmp')

}

#Hacer clic en el botón del menú para ocultarlo

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(23,54)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Hacer clic en Start para poner en funcionamiento SDRSharp

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(60,54)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Mover el cursor hasta la posición de los MHz y hacer clic

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(382,54)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Escribir en la posición de los MHz el valor 400

[System.Windows.Forms.SendKeys]::SendWait("400")

Start-Sleep -Seconds 5

#Hacer 70 clics en la posición de la unidad en los MHz

1..70 | % {

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(422,46)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Ruta de la captura de pantalla

screenshot "e:\frecuencias\$_.bmp"

}

Automatizar SDRSharp con PowerShell (parte 4)

Abrir, ocultar el menú, poner en funcionamiento SDRSharp y recorrer el rango de frecuencias desde 400~470 MHz

#Abrir SDRSharp
Start-Process E:\sdrsharp-x86\SDRSharp.exe

Start-Sleep -Seconds 5

#Funciones necesarias para hacer clic
$MouseEventSig=@'
[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]
public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);
'@
$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name "MouseEventWinApi" -passThru

#Hacer clic en el botón del menú para ocultarlo
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(23,54)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Hacer clic en Start para poner en funcionamiento SDRSharp
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(60,54)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Mover el cursor hasta la posición de los MHz y hacer clic
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(382,54)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Escribir en la posición de los MHz el valor 400
[System.Windows.Forms.SendKeys]::SendWait("400")

Start-Sleep -Seconds 5

#Hacer 70 clics en la posición de la unidad en los MHz
1..70 | % {
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(422,46)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)
Start-Sleep -Seconds 5
}

#Abrir SDRSharp

Start-Process E:\sdrsharp-x86\SDRSharp.exe

Start-Sleep -Seconds 5

#Funciones necesarias para hacer clic

$MouseEventSig=@'

[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]

public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);

$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name "MouseEventWinApi" -passThru

#Hacer clic en el botón del menú para ocultarlo

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(23,54)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Hacer clic en Start para poner en funcionamiento SDRSharp

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(60,54)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Mover el cursor hasta la posición de los MHz y hacer clic

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(382,54)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Escribir en la posición de los MHz el valor 400

[System.Windows.Forms.SendKeys]::SendWait("400")

Start-Sleep -Seconds 5

#Hacer 70 clics en la posición de la unidad en los MHz

1..70 | % {

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(422,46)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

}

Esperar hasta que un proceso finalice en PowerShell

Start-Process notepad
while (Get-Process -Name notepad -ErrorAction SilentlyContinue)
{Start-Sleep -Seconds 1}

Start-Process notepad

while (Get-Process -Name notepad -ErrorAction SilentlyContinue)

{Start-Sleep -Seconds 1}

Automatizar SDRSharp con PowerShell (parte 3)

Abrir, ocultar el menú y poner en funcionamiento SDRSharp en la frecuencia 400 MHz

#Abrir SDRSharp
Start-Process E:\sdrsharp-x86\SDRSharp.exe

Start-Sleep -Seconds 5

#Funciones necesarias para hacer clic
$MouseEventSig=@'
[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]
public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);
'@
$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name "MouseEventWinApi" -passThru

#Hacer clic en el botón del menú para ocultarlo
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(23,54)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Hacer clic en Start para poner en funcionamiento SDRSharp
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(60,54)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Mover el cursor hasta la posición de los MHz y hacer clic
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(382,54)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Escribir en la posición de los MHz el valor 400
[System.Windows.Forms.SendKeys]::SendWait("400")

#Abrir SDRSharp

Start-Process E:\sdrsharp-x86\SDRSharp.exe

Start-Sleep -Seconds 5

#Funciones necesarias para hacer clic

$MouseEventSig=@'

[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]

public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);

$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name "MouseEventWinApi" -passThru

#Hacer clic en el botón del menú para ocultarlo

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(23,54)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Hacer clic en Start para poner en funcionamiento SDRSharp

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(60,54)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Mover el cursor hasta la posición de los MHz y hacer clic

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(382,54)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Escribir en la posición de los MHz el valor 400

[System.Windows.Forms.SendKeys]::SendWait("400")

Pulsar en el primer resultado de la búsqueda en Baidu

#Para la resolución de pantalla 1366 x 768

$MouseEventSig=@’
[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]
public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);
‘@

$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name 'MouseEventWinApi' -passThru

Start-Process Chrome 'http://www.baidu.com/'

Start-Sleep -Seconds 5

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(384,302)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

[System.Windows.Forms.SendKeys]::SendWait('PowerShell')
[System.Windows.Forms.SendKeys]::SendWait('{ENTER}')

Start-Sleep -Seconds 5

#Pulsar en el primer resultado de la búsqueda
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(198,212)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

#Para la resolución de pantalla 1366 x 768

$MouseEventSig=@’

[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]

public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);

‘@

$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name 'MouseEventWinApi' -passThru

Start-Process Chrome 'http://www.baidu.com/'

Start-Sleep -Seconds 5

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(384,302)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

[System.Windows.Forms.SendKeys]::SendWait('PowerShell')

[System.Windows.Forms.SendKeys]::SendWait('{ENTER}')

Start-Sleep -Seconds 5

#Pulsar en el primer resultado de la búsqueda

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(198,212)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)