-
-
Notifications
You must be signed in to change notification settings - Fork 452
/
Copy pathwrite-rot13.ps1
executable file
·40 lines (36 loc) · 1005 Bytes
/
write-rot13.ps1
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
<#
.SYNOPSIS
Writes text encoded or decoded with ROT13
.DESCRIPTION
This PowerShell script writes text encoded or decoded with ROT13.
.PARAMETER text
Specifies the text to write
.EXAMPLE
PS> ./write-rot13 "Hello World"
.LINK
https://github.com/fleschutz/PowerShell
.NOTES
Author: Markus Fleschutz | License: CC0
#>
param([string]$text = "")
function ROT13 { param([string]$text)
$text.ToCharArray() | ForEach-Object {
if ((([int] $_ -ge 97) -and ([int] $_ -le 109)) -or (([int] $_ -ge 65) -and ([int] $_ -le 77))) {
$Result += [char] ([int] $_ + 13);
} elseif ((([int] $_ -ge 110) -and ([int] $_ -le 122)) -or (([int] $_ -ge 78) -and ([int] $_ -le 90))) {
$Result += [char] ([int] $_ - 13);
} else {
$Result += $_
}
}
return $Result
}
try {
if ($text -eq "" ) { $text = read-host "Enter text to write" }
$Result = ROT13 $text
write-output $Result
exit 0 # success
} catch {
"⚠️ Error in line $($_.InvocationInfo.ScriptLineNumber): $($Error[0])"
exit 1
}