Write current PS command history (commands only) to desktop

<# Write current PS command history (commands only) to desktop #> foreach ($i in Get-History){Add-Content ([Environment]::GetFolderPath("Desktop") + "\" +  [string](Get-Date -format "yyyy-MM-dd_HH-mm-ss") + ".ps1.txt") $i.CommandLine}