Est-il possible de traduire ou de convertir un script VBS en BAT ?

J'ai un script visual basic que j'ai trouvé il y a des années, j'aimerais savoir s'il peut être entièrement ou au moins grossièrement traduit en format batch. Le but est de convertir le script au format batch, afin que je puisse utiliser BAT en EXE pour convertir le fichier batch résultant en un binaire exécutable. Le script cache ou affiche les fichiers cachés, voici le contenu du script :

Hidden = "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Hidden"
SSHidden = "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ShowSuperHidden"
Set Command1 = WScript.CreateObject("WScript.Shell")
Set command2 = CreateObject("Wscript.Shell")
Check = Command1.RegRead(Hidden)
If Check = 2 Then
Command1.RegWrite Hidden, 1, "REG_DWORD"
Command1.RegWrite SSHidden, 1, "REG_DWORD"
Else
Command1.RegWrite Hidden, 2, "REG_DWORD"
Command1.RegWrite SSHidden, 0, "REG_DWORD"
End If
Command1.SendKeys "{F5}"
WScript.sleep 1000

Je ne suis pas un programmeur professionnel, mais j'ai déjà vu VBS traduit en batch, mais je ne connais pas tous les tenants et aboutissants de cette traduction. Je pourrais faire deux scripts batch, un pour cacher, un pour montrer, mais le scripts VBS fait les deux. J'aimerais conserver cette singularité. Merci d'avance.