Multimedia | Scripting and security

Dejavu: audio fingerprinting and recognition in Python

(6 votes, average: 3.17 out of 5)

Audio fingerprinting and recognition algorithm implemented in Python, see the explanation here: How it works Dejavu can memorize audio by […]

Pronunciar textos con distintas voces del sistema operativo

(No Ratings Yet)

$text = "
<LANG LANGID=""409"">I play</LANG>
<LANG LANGID=""407""><PITCH MIDDLE = '2'>Ich spiele</PITCH></LANG>
<LANG LANGID=""407"">Ich spiele</LANG>
<LANG LANGID=""407"">Yo juego</LANG>
" 
 
$speaker = New-Object -ComObject Sapi.SpVoice 
$speaker.Rate = 0
$speaker.Speak($text)

$text = "

<LANG LANGID=""407""><PITCH MIDDLE = '2'>Ich spiele</PITCH></LANG>

<LANG LANGID=""407"">Ich spiele</LANG>

<LANG LANGID=""407"">Yo juego</LANG>

$speaker = New-Object -ComObject Sapi.SpVoice

$speaker.Rate = 0

$speaker.Speak($text)

But what is the Fourier Transform? A visual introduction

(1 votes, average: 2.00 out of 5)

Icecast 2

(No Ratings Yet)

Icecast is a streaming media (audio/video) server which currently supports Ogg (Vorbis and Theora), Opus, WebM and MP3 streams. It […]

Livestreamer

(No Ratings Yet)

Livestreamer is a command-line utility that pipes video streams from various services into a video player, such as VLC. The main purpose of […]

Reproducir notas musicales con PowerShell

(No Ratings Yet)

#Genera tonos simples en el altavoz

#Función Beep 
#Beep(Frecuencia,Duración)
 
#Freq: la frecuencia del sonido, en hertz
#Duración: duración del sonido, en milisegundos

#Frecuencias notas 4ª octava
#Do4	261,625565 Hz
#Re4	293,664768 Hz
#Mi4	329,627557 Hz
#Fa4	349,228231 Hz
#Sol4	391,995436 Hz
#La4	440,000000 Hz
#Si4	493,883301 Hz

[System.Console]::Beep(261,500)
[System.Console]::Beep(293,500)
[System.Console]::Beep(329,500)
[System.Console]::Beep(349,500)
[System.Console]::Beep(391,500)
[System.Console]::Beep(440,500)
[System.Console]::Beep(493,500)

#Genera tonos simples en el altavoz

#Función Beep

#Beep(Frecuencia,Duración)

#Freq: la frecuencia del sonido, en hertz

#Duración: duración del sonido, en milisegundos

#Frecuencias notas 4ª octava

#Do4 261,625565 Hz

#Re4 293,664768 Hz

#Mi4 329,627557 Hz

#Fa4 349,228231 Hz

#Sol4 391,995436 Hz

#La4 440,000000 Hz

#Si4 493,883301 Hz

[System.Console]::Beep(261,500)

[System.Console]::Beep(293,500)

[System.Console]::Beep(329,500)

[System.Console]::Beep(349,500)

[System.Console]::Beep(391,500)

[System.Console]::Beep(440,500)

[System.Console]::Beep(493,500)

Activar y desactivar el audio desde PowerShell

(No Ratings Yet)

Utilizar el código https://gist.github.com/PrateekKumarSingh/35e9dc5cceabf7c35bb45f6ee59c0b52 que carga las funciones para activar y desactivar el audio

#Adding definitions for accessing the Audio API
Add-Type -TypeDefinition @'
using System.Runtime.InteropServices;
[Guid("5CDF2C82-841E-4546-9722-0CF74078229A"), InterfaceType(ComInterfaceType.InterfaceIsIUnknown)]
interface IAudioEndpointVolume {
  // f(), g(), ... are unused COM method slots. Define these if you care
  int f(); int g(); int h(); int i();
  int SetMasterVolumeLevelScalar(float fLevel, System.Guid pguidEventContext);
  int j();
  int GetMasterVolumeLevelScalar(out float pfLevel);
  int k(); int l(); int m(); int n();
  int SetMute([MarshalAs(UnmanagedType.Bool)] bool bMute, System.Guid pguidEventContext);
  int GetMute(out bool pbMute);
}
[Guid("D666063F-1587-4E43-81F1-B948E807363F"), InterfaceType(ComInterfaceType.InterfaceIsIUnknown)]
interface IMMDevice {
  int Activate(ref System.Guid id, int clsCtx, int activationParams, out IAudioEndpointVolume aev);
}
[Guid("A95664D2-9614-4F35-A746-DE8DB63617E6"), InterfaceType(ComInterfaceType.InterfaceIsIUnknown)]
interface IMMDeviceEnumerator {
  int f(); // Unused
  int GetDefaultAudioEndpoint(int dataFlow, int role, out IMMDevice endpoint);
}
[ComImport, Guid("BCDE0395-E52F-467C-8E3D-C4579291692E")] class MMDeviceEnumeratorComObject { }
public class Audio {
  static IAudioEndpointVolume Vol() {
    var enumerator = new MMDeviceEnumeratorComObject() as IMMDeviceEnumerator;
    IMMDevice dev = null;
    Marshal.ThrowExceptionForHR(enumerator.GetDefaultAudioEndpoint(/*eRender*/ 0, /*eMultimedia*/ 1, out dev));
    IAudioEndpointVolume epv = null;
    var epvid = typeof(IAudioEndpointVolume).GUID;
    Marshal.ThrowExceptionForHR(dev.Activate(ref epvid, /*CLSCTX_ALL*/ 23, 0, out epv));
    return epv;
  }
  public static float Volume {
    get {float v = -1; Marshal.ThrowExceptionForHR(Vol().GetMasterVolumeLevelScalar(out v)); return v;}
    set {Marshal.ThrowExceptionForHR(Vol().SetMasterVolumeLevelScalar(value, System.Guid.Empty));}
  }
  public static bool Mute {
    get { bool mute; Marshal.ThrowExceptionForHR(Vol().GetMute(out mute)); return mute; }
    set { Marshal.ThrowExceptionForHR(Vol().SetMute(value, System.Guid.Empty)); }
  }
}
'@ -Verbose

#Desactivar audio
[Audio]::Mute = $true

#Activar audio
[Audio]::Mute = $false

#Adding definitions for accessing the Audio API

Add-Type -TypeDefinition @'

using System.Runtime.InteropServices;

[Guid("5CDF2C82-841E-4546-9722-0CF74078229A"), InterfaceType(ComInterfaceType.InterfaceIsIUnknown)]

interface IAudioEndpointVolume {

// f(), g(), ... are unused COM method slots. Define these if you care

int f(); int g(); int h(); int i();

int SetMasterVolumeLevelScalar(float fLevel, System.Guid pguidEventContext);

int j();

int GetMasterVolumeLevelScalar(out float pfLevel);

int k(); int l(); int m(); int n();

int SetMute([MarshalAs(UnmanagedType.Bool)] bool bMute, System.Guid pguidEventContext);

int GetMute(out bool pbMute);

}

[Guid("D666063F-1587-4E43-81F1-B948E807363F"), InterfaceType(ComInterfaceType.InterfaceIsIUnknown)]

interface IMMDevice {

int Activate(ref System.Guid id, int clsCtx, int activationParams, out IAudioEndpointVolume aev);

}

[Guid("A95664D2-9614-4F35-A746-DE8DB63617E6"), InterfaceType(ComInterfaceType.InterfaceIsIUnknown)]

interface IMMDeviceEnumerator {

int f(); // Unused

int GetDefaultAudioEndpoint(int dataFlow, int role, out IMMDevice endpoint);

}

[ComImport, Guid("BCDE0395-E52F-467C-8E3D-C4579291692E")] class MMDeviceEnumeratorComObject { }

public class Audio {

static IAudioEndpointVolume Vol() {

var enumerator = new MMDeviceEnumeratorComObject() as IMMDeviceEnumerator;

IMMDevice dev = null;

Marshal.ThrowExceptionForHR(enumerator.GetDefaultAudioEndpoint(/*eRender*/ 0, /*eMultimedia*/ 1, out dev));

IAudioEndpointVolume epv = null;

var epvid = typeof(IAudioEndpointVolume).GUID;

Marshal.ThrowExceptionForHR(dev.Activate(ref epvid, /*CLSCTX_ALL*/ 23, 0, out epv));

return epv;

}

public static float Volume {

get {float v = -1; Marshal.ThrowExceptionForHR(Vol().GetMasterVolumeLevelScalar(out v)); return v;}

set {Marshal.ThrowExceptionForHR(Vol().SetMasterVolumeLevelScalar(value, System.Guid.Empty));}

}

public static bool Mute {

get { bool mute; Marshal.ThrowExceptionForHR(Vol().GetMute(out mute)); return mute; }

set { Marshal.ThrowExceptionForHR(Vol().SetMute(value, System.Guid.Empty)); }

}

'@ -Verbose

#Desactivar audio

[Audio]::Mute = $true

#Activar audio

[Audio]::Mute = $false

Convertir una lista de ficheros MP4 a MP3 con FFmpeg

(No Ratings Yet)

ls *.mp4 | %{
$_.FullName
#Descargar FFmpeg https://ffmpeg.org/download.html
E:\programas\ffmpeg\bin\ffmpeg.exe -i $_.FullName -acodec libmp3lame -ab 128k $_.FullName.replace(".mp4",".mp3")
}

ls *.mp4 | %{

$_.FullName

#Descargar FFmpeg https://ffmpeg.org/download.html

E:\programas\ffmpeg\bin\ffmpeg.exe -i $_.FullName -acodec libmp3lame -ab 128k $_.FullName.replace(".mp4",".mp3")

}

Descargar vídeos de Youtube

(No Ratings Yet)

#Leer fichero con vídeos para descargar
(Get-Content e:\descargar.txt) | %{
$_
#Utilizar el programa youtube-dl
#Descargar el programa youtube-dl desde https://github.com/rg3/youtube-dl/releases
e:\youtube-dl.exe $_
}

#Leer fichero con vídeos para descargar

(Get-Content e:\descargar.txt) | %{

#Utilizar el programa youtube-dl

#Descargar el programa youtube-dl desde https://github.com/rg3/youtube-dl/releases

e:\youtube-dl.exe $_

}

Leer artículos de la Wikipedia mediante la voz del Sistema Operativo con PowerShell

(No Ratings Yet)

Add-Type -AssemblyName System.Speech
$synthesizer = New-Object -TypeName System.Speech.Synthesis.SpeechSynthesizer
$synthesizer.SelectVoice("Microsoft Zira Desktop")
$synthesizer.Rate=0

$json=Invoke-WebRequest -Uri 'https://en.wikipedia.org/w/api.php?action=parse&format=json&prop=text&page=PowerShell' | ConvertFrom-JSON
 
$json.parse.text.'*' -replace "<.*?>" | %{
$synthesizer.Speak($_)
}

Add-Type -AssemblyName System.Speech

$synthesizer = New-Object -TypeName System.Speech.Synthesis.SpeechSynthesizer

$synthesizer.SelectVoice("Microsoft Zira Desktop")

$synthesizer.Rate=0

$json=Invoke-WebRequest -Uri 'https://en.wikipedia.org/w/api.php?action=parse&format=json&prop=text&page=PowerShell' | ConvertFrom-JSON

$json.parse.text.'*' -replace "<.*?>" | %{

$synthesizer.Speak($_)

}

Ver las voces disponibles en el sistema operativo

(No Ratings Yet)

Add-Type -AssemblyName System.Speech
$voz = New-Object System.Speech.Synthesis.SpeechSynthesizer
$voz.GetInstalledVoices() | Select-Object -ExpandProperty VoiceInfo | Select-Object -Property Culture, Name

Add-Type -AssemblyName System.Speech

$voz = New-Object System.Speech.Synthesis.SpeechSynthesizer

$voz.GetInstalledVoices() | Select-Object -ExpandProperty VoiceInfo | Select-Object -Property Culture, Name

Grabar audio desde la línea de comandos descargando desde Internet SoX

(No Ratings Yet)

#Descargar SoX
Start-BitsTransfer "https://downloads.sourceforge.net/project/sox/sox/14.4.2/sox-14.4.2-win32.zip"
#Descomprimir
Expand-Archive .\sox-14.4.2-win32.zip
#Acceder sox.exe
cd .\sox-14.4.2-win32\sox-14.4.2
#Ejecutar sox.exe
.\sox.exe -t waveaudio −d audio.wav

#Descargar SoX

Start-BitsTransfer "https://downloads.sourceforge.net/project/sox/sox/14.4.2/sox-14.4.2-win32.zip"

#Descomprimir

Expand-Archive .\sox-14.4.2-win32.zip

#Acceder sox.exe

cd .\sox-14.4.2-win32\sox-14.4.2

#Ejecutar sox.exe

.\sox.exe -t waveaudio −d audio.wav

Grabar audio desde la línea de comandos con Sound eXchange (SoX)

(No Ratings Yet)

.\sox.exe -t waveaudio −d audio.wav

1	.\sox.exe -t waveaudio −d audio.wav

Analizar frecuencias de audio con SDRSharp (reconocer la palabra hola)

(No Ratings Yet)

Emitir sonidos graves con PowerShell

(No Ratings Yet)

#Beep function
#Generates simple tones on the speaker

#Beep(Freq,Duration)
#Beep(Frecuencia,Duración)

#Freq: The frequency of the sound, in hertz
#Duration: The duration of the sound, in milliseconds

#Frecuencias en la zona "grave" del espectro (10Hz - 256Hz)
#[System.Console]::Beep(10,100) NO FUNCIONA 1OHz, EMPIEZA EN 37Hz
[System.Console]::Beep(37,100)
[System.Console]::Beep(125,100)
[System.Console]::Beep(250,100)
[System.Console]::Beep(255,100)

#Beep function

#Generates simple tones on the speaker

#Beep(Freq,Duration)

#Beep(Frecuencia,Duración)

#Freq: The frequency of the sound, in hertz

#Duration: The duration of the sound, in milliseconds

#Frecuencias en la zona "grave" del espectro (10Hz - 256Hz)

#[System.Console]::Beep(10,100) NO FUNCIONA 1OHz, EMPIEZA EN 37Hz

[System.Console]::Beep(37,100)

[System.Console]::Beep(125,100)

[System.Console]::Beep(250,100)

[System.Console]::Beep(255,100)

Emitir sonidos agudos con PowerShell

(No Ratings Yet)

#Beep function
#Generates simple tones on the speaker

#Beep(Freq,Duration)
#Beep(Frecuencia,Duración)

#Freq: The frequency of the sound, in hertz
#Duration: The duration of the sound, in milliseconds

#Frecuencias en la zona "aguda" del espectro (2000Hz - 16000hz).
[System.Console]::Beep(2000,100)
[System.Console]::Beep(2000,100)
[System.Console]::Beep(4000,100)
[System.Console]::Beep(16000,100)

#Beep function

#Generates simple tones on the speaker

#Beep(Freq,Duration)

#Beep(Frecuencia,Duración)

#Freq: The frequency of the sound, in hertz

#Duration: The duration of the sound, in milliseconds

#Frecuencias en la zona "aguda" del espectro (2000Hz - 16000hz).

[System.Console]::Beep(2000,100)

[System.Console]::Beep(4000,100)

[System.Console]::Beep(16000,100)

Emitir sonidos medios con PowerShell

(1 votes, average: 5.00 out of 5)

#Beep function
#Generates simple tones on the speaker

#Beep(Freq,Duration)
#Beep(Frecuencia,Duración)

#Freq: The frequency of the sound, in hertz
#Duration: The duration of the sound, in milliseconds

#Frecuencias en la zona "media" del espectro (256Hz - 2000Hz)
[System.Console]::Beep(256,100)
[System.Console]::Beep(500,100)
[System.Console]::Beep(1000,100)
[System.Console]::Beep(1999,100)

#Beep function

#Generates simple tones on the speaker

#Beep(Freq,Duration)

#Beep(Frecuencia,Duración)

#Freq: The frequency of the sound, in hertz

#Duration: The duration of the sound, in milliseconds

#Frecuencias en la zona "media" del espectro (256Hz - 2000Hz)

[System.Console]::Beep(256,100)

[System.Console]::Beep(500,100)

[System.Console]::Beep(1000,100)

[System.Console]::Beep(1999,100)

Enviar un mail mediante el reconocimiento de voz del sistema operativo con PowerShell

(No Ratings Yet)

[void][reflection.assembly]::loadwithpartialname(‘system.speech’)
$rec = New-Object ‘System.Speech.Recognition.SpeechRecognitionEngine’
$rec.LoadGrammar((New-Object ‘System.Speech.Recognition.DictationGrammar’))
$rec.SetInputToDefaultAudioDevice()
 
do
{
if($rec.Recognize().Text -match "mail")
{
"Enviar correo"
Send-MailMessage -to "mail2@example.com" -from “mail@example.com” -subject "Correo prueba" -SmtpServer localhost
}
}while(1)

[void][reflection.assembly]::loadwithpartialname(‘system.speech’)

$rec = New-Object ‘System.Speech.Recognition.SpeechRecognitionEngine’

$rec.LoadGrammar((New-Object ‘System.Speech.Recognition.DictationGrammar’))

$rec.SetInputToDefaultAudioDevice()

{

if($rec.Recognize().Text -match "mail")

{

"Enviar correo"

Send-MailMessage -to "mail2@example.com" -from “mail@example.com” -subject "Correo prueba" -SmtpServer localhost

}

}while(1)

Detectar un mensaje enviado en código Morse mediante sonidos utilizando la tarjeta de sonido y el programa SDRSharp

(No Ratings Yet)

Script para enviar código Morse en PowerShell

#Morse code
#A|. –
#B|– . . .
#C|– . – .
#Ch|– – – –
#D|– . .
#E|.
#F|. . – .
#G|– – .
#H|. . . .
#I|. .
#J|. – – –
#K|– . –
#L|. – . .
#M|– –
#N|– .
#Ñ|– – . – –
#O|– – –
#P|. – – .
#Q|– – . –
#R|. – .
#S|. . .
#T|–
#U|. . –
#V|. . . –
#W|. – –
#X|– . . –
#Y|– . – –
#Z|– – . .

Get-Content .\textomorse.txt | %{
$letter=$_.split("|")[0]
$morse=$_.split("|")[1]
$values=$morse.split(" ")
Write-Host $letter,$morse
foreach($sound in $values)
{
if($sound -eq ".")
{
#2000 Hz
[console]::beep(2000,500)
}
elseif($sound -eq "–")
{
[console]::beep(2000,800)
}
Start-Sleep -Seconds 1
}
}

#Morse code

#A|. –

#B|– . . .

#C|– . – .

#Ch|– – – –

#D|– . .

#E|.

#F|. . – .

#G|– – .

#H|. . . .

#I|. .

#J|. – – –

#K|– . –

#L|. – . .

#M|– –

#N|– .

#Ñ|– – . – –

#O|– – –

#P|. – – .

#Q|– – . –

#R|. – .

#S|. . .

#T|–

#U|. . –

#V|. . . –

#W|. – –

#X|– . . –

#Y|– . – –

#Z|– – . .

Get-Content .\textomorse.txt | %{

$letter=$_.split("|")[0]

$morse=$_.split("|")[1]

$values=$morse.split(" ")

Write-Host $letter,$morse

foreach($sound in $values)

{

if($sound -eq ".")

{

#2000 Hz

[console]::beep(2000,500)

}

elseif($sound -eq "–")

{

[console]::beep(2000,800)

}

Start-Sleep -Seconds 1

}

El texto enviado en código morse es El texto recibido en la […]

Detectar una frecuencia de sonido emitida desde un dispositivo utilizando la tarjeta de sonido y el programa SDRSharp

(No Ratings Yet)

Emitir la frecuencua de sonido a 1000 Hz desde PowerShell en un equipo:

[System.Console]::Beep(1000,1000)

1	[System.Console]::Beep(1000,1000)

Detectada la frecuencia de sonido en […]

Older Posts