Save_Icon(Resize_Image(Bitmap.FromFile(PictureBox_Regedit.Tag), "Regedit.ico")

Private Sub Save_Icon(ByVal Source As Bitmap, ByVal Filename As String)
 
    Try
        If Not Directory.Exists(AppDir) Then Directory.CreateDirectory(AppDir)
        If Not Directory.Exists(AppIcons) Then Directory.CreateDirectory(AppIcons)
        Source.MakeTransparent()
        Source.Save(Path.Combine(AppIcons, Filename), ImageFormat.Icon)
    Catch ex As Exception
        Throw New Exception(ex.Message)
    End Try
 
End Sub
 
Private Function Resize_Image(ByVal img As Image, ByVal Width As Int32, ByVal Height As Int32) As Bitmap
    Dim Bitmap_Source As New Bitmap(img)
    Dim Bitmap_Dest As New Bitmap(CInt(24), CInt(24))
    Dim Graphic As Graphics = Graphics.FromImage(Bitmap_Dest)
    Graphic.DrawImage(Bitmap_Source, 0, 0, Bitmap_Dest.Width + 1, Bitmap_Dest.Height + 1)
    Return Bitmap_Dest
End Function

 [+] Syntax:

 REG2BAT [Registry File] [Output File]

:: Converted with REG2BAT By Elektro H@cker
 
REM Windows Registry Editor Version 5.00
 
REG ADD "HKEY_CURRENT_USER\Test" /V "Test Binary" /T "REG_BINARY" /D "1234567890" /F
REG ADD "HKEY_CURRENT_USER\Test" /V "Test Dword Dec" /T "REG_DWORD" /D "0x00bc614e" /F
REG ADD "HKEY_CURRENT_USER\Test" /V "Test Dword hex" /T "REG_DWORD" /D "0x12345678" /F
REG ADD "HKEY_CURRENT_USER\Test" /V "Test Expand SZ" /T "REG_EXPAND_SZ" /D "%%Temp%%\Hello" /F
REG ADD "HKEY_CURRENT_USER\Test" /V "Test Multi SZ" /T "REG_MULTI_SZ" /D "Hello\0world!\0" /F
REG ADD "HKEY_CURRENT_USER\Test" /V "Test Qword Dec" /T "REG_QWORD" /D "0x00000000000010e1" /F
REG ADD "HKEY_CURRENT_USER\Test" /V "Test Qword Hex" /T "REG_QWORD" /D "0x1234567891234567" /F
REG ADD "HKEY_CURRENT_USER\Test" /V "Test String" /T "REG_SZ" /D "By Elektro H@cker" /F

Public wavefile As New NAudio.Wave.WaveFileReader("C:\Archivo.wav")

        namespace NAudioDemo.AudioPlaybackDemo
 
        this.fileWaveStream = plugin.CreateWaveStream(fileName);
        var waveChannel =  new SampleChannel(this.fileWaveStream, true);
        this.setVolumeDelegate = (vol) => waveChannel.Volume = vol;
        waveChannel.PreVolumeMeter += OnPreVolumeMeter;
 
        var postVolumeMeter = new MeteringSampleProvider(waveChannel);
        postVolumeMeter.StreamVolume += OnPostVolumeMeter;