[madmasles]

скрипт проверял есть ли требуемый язык в системе »

Наверное, можно так попробовать:

Код:

$aDrives = DriveGetDrive("ALL")

For $i = 1 To $aDrives[0]
    If DriveStatus($aDrives[$i]) <> "READY" Then
        ContinueLoop
    EndIf
    If FileExists($aDrives[$i] & '\WINDOWS\explorer.exe') Then
        MsgBox(0, StringUpper($aDrives[$i]), StringLeft(FileGetVersion($aDrives[$i] & '\WINDOWS\explorer.exe', 'DefaultLangCodepage'), 4))
        ;0419 русский
        ;0409 английский
        ; и т.д.
    EndIf
Next