Dim txt As String="71 71"
Dim d As BigInteger:d.Initialize(29)
Dim n As BigInteger:n.Initialize(91)
Dim e As BigInteger:e.Initialize(5)
Dim asci As BigInteger:asci.Initialize(256)
Dim spl() As String= Regex.Split(" ",txt)
txt=""
For i=0 To spl.Length-1
Dim temp As BigInteger:temp.Initialize(spl(i))
LogColor(temp.ToString,Colors.Green)
temp.Pow(d)
LogColor(temp.ToString,Colors.LightGray)
temp.Mod(n)
LogColor(temp.ToString,Colors.Red)
Do While temp.ToString<>"0"
Dim ascii As Int=temp.Mod(asci)
temp.Divide(asci)
LogColor(temp.ToString,Colors.Red)
txt=txt&Chr(ascii)
Loop
Next
LogColor(txt,Colors.Blue)