Add-Type -AssemblyName System.Windows.Forms
$str = ""
$openfiledialog = [System.Windows.Forms.OpenFileDialog]::new()
$openfiledialog.Filter = "All Files|*.*"
if ($openfiledialog.ShowDialog() -eq [System.Windows.Forms.DialogResult]::OK)
{
	[string]$InFile = $openfiledialog.FileName		
    [string]$Alg = Read-Host -Prompt "Expecting hash algorithm... Algorithms may be GR3411, GR3411_2012_256 and GR3411_2012_512"
    $hash_hex = & 'C:\Program Files (x86)\Crypto Pro\CSP\cpverify.exe' -mk "$InFile" -alg $Alg
    for ($i = 0; $i -le $hash_hex.Length -1; $i +=2 ) {
        $hex = $hash_hex.Substring($i,2)
        $num = [int]::Parse($hex, [System.Globalization.NumberStyles]::HexNumber)
        $ch = [System.Text.Encoding]::ASCII.GetString($num)
        $str+=$ch
    }
    Set-Content -Value ([byte[]][char[]]$str) -Path ($InFile + ".hsh") -Encoding Byte
    Write-Host "Done!" -ForegroundColor Green
} else
{
	Write-Host "Aborting!" -ForegroundColor DarkRed		
}