Powershell Custom Commands Respektiv Shortcuts

$env:ScriptPath = '\\Server\Verzeichnis\WindowsPowershell\Scripts'
$Profile = '\\Server\Verzeichnis\WindowsPowershell\Profile.ps1'
Import-Module PSUserTools
Function tcm ([String]$volume="d:\data.tc",[String]$letter="x:")
{
$MountError = 0
If (Test-Path $letter)
{
"Drive $letter is already mounted."
$MountError = 1
} #EndIf
If (!(Test-Path $volume))
{
"File $volume not found."
$mountError = 1
} #EndIf
If ($MountError -eq 0)
{
C:\"Program Files"\TrueCrypt\TrueCrypt.exe /volume $volume /letter $letter
} #EndIf
} #EndFunction

Function tcdm ([String]$letter="x:") 
{
If (Test-Path $letter)
{
C:\"Program Files"\TrueCrypt\TrueCrypt.exe /volume /dismount /letter $letter
} #EndIf
Else
{
"Drive is not mounted."
Test-path $letter
} #EndElse
} #EndFunction
Function GoHome ([String]$HomeDir="\\Server\Verzeichnis") {Set-Location $HomeDir}
Function GoScripts ([String]$Path=$env:ScriptPath) {Set-Location $Path}
Function INC {Param([int32]$a=0,[int32]$b=0);$a+=$b;$a}
Function DEC {Param([int32]$a=0,[int32]$b=0);$a-=$b;$a}
$Konsole=(Get-Host).UI.RawUI
$Konsole.ForegroundColor="Green"
$Konsole.BackGroundColor="DarkBlue"
$Konsole.WindowTitle=" Wbemtest.exe, Functions:  Sudo / GoHome / GoScripts / TCm / TCdm / INC / DEC"
#$host.ui.rawui.ForegroundColor = "Green"
Set-Alias sudo Start-ProcessAsAdministrator
if(test-path $env:ScriptPath) {GoScripts} else {"Script path ($env:ScriptPath) not found ... gone home.";GoHome}