Skip to content

Instantly share code, notes, and snippets.

View jimmckeeth's full-sized avatar

Jim McKeeth jimmckeeth

View GitHub Profile
@jimmckeeth
jimmckeeth / SimpleRot47.pas
Last active August 15, 2023 04:14
Implements the Rot47 text obfuscation and de-obfuscation routine for Delphi 10.4 Sydney (Similar to Rot13)
uses Math;
function ROT47(UnRot: string): string;
// More information https://en.wikipedia.org/wiki/ROT13#Variants
begin
Result := UnRot;
for var I := 1 to Length(Result) do
begin
var o := ord(Result[i]);
case o of
@jimmckeeth
jimmckeeth / keybase.md
Last active January 17, 2019 04:36
Keybase proof

Keybase proof

I hereby claim:

  • I am jimmckeeth on github.
  • I am jimmckeeth (https://keybase.io/jimmckeeth) on keybase.
  • I have a public key ASBt3FFVworfFAq38crbjISewR-SE7eWTQsS_sCkpMCMrwo

To claim this, I am signing this object:

@jimmckeeth
jimmckeeth / MerryChristmas.pas
Last active January 5, 2018 05:52
Merry Christmas from Embarcadero Technologies
// +-----------------------------------------------------------------+
// | Created with Petra Plugin For Sketch from www.applyingcode.com |
// | by Jim McKeeth, Embarcadero Technologies |
// | [email protected] |
// +-----------------------------------------------------------------+
// | Merry Christmas, Happy Holidays, and have a great 2018 |
// +-----------------------------------------------------------------+
unit MerryChristmas;