xx="Wer stirbt als ärster?"
encoded = ""
for i = 1, #xx do
local original_byte = (string.byte(xx, i) - 5*(i % 3)) % 256
encoded = encoded .. string.format("\\%03d", original_byte)
end
print(encoded)
eHg9IldlciBzdGlyYnQgYWxzIMOkcnN0ZXI/IgplbmNvZGVkID0gIiIKZm9yIGkgPSAxLCAjeHggZG8KICAgIGxvY2FsIG9yaWdpbmFsX2J5dGUgPSAoc3RyaW5nLmJ5dGUoeHgsIGkpIC0gNSooaSAlIDMpKSAlIDI1NgogICAgZW5jb2RlZCA9IGVuY29kZWQgLi4gc3RyaW5nLmZvcm1hdCgiXFwlMDNkIiwgb3JpZ2luYWxfYnl0ZSkKICAgIGVuZApwcmludChlbmNvZGVkKQ==