# IEX (IRM https://setkeyboard.digit-bs.osdcloud.ch/)
# This scripts changes the keyboard language in this user session (defaultuser0) and 
# helps in the OOBE phase to type the password during Autopilot registration

$Global:Transcript = "$((Get-Date).ToString('yyyy-MM-dd-HHmmss'))-Set-KeyboardLanguage.log"
Start-Transcript -Path (Join-Path "$env:ProgramData\Microsoft\IntuneManagementExtension\Logs\OSD\" $Global:Transcript) -ErrorAction Ignore

$LanguageList = Get-WinUserLanguageList

$LanguageList.Add("de-CH")
Set-WinUserLanguageList $LanguageList -Force

Start-Sleep -Seconds 5

$LanguageList = Get-WinUserLanguageList
$LanguageList.Remove(($LanguageList | Where-Object LanguageTag -like 'de-DE'))
Set-WinUserLanguageList $LanguageList -Force

$LanguageList = Get-WinUserLanguageList

Stop-Transcript