🚀 go-pugleaf

Richard Elbert Davis wrote:
> 
> Hey,
> I know of a college who reversed ASCII values for an encryption
> program. DOES ANYONE KNOW THE CODE TO DO THIS.

Well, depending on what you mean by "reverse", sure.  But why on earth would you 
want to do that if you want encryption?  It's pathetically easy to break.

program this_is_lousy_encryption;

var
  fi, fo : file of byte;
  b : byte;

begin
  assign (fi,'source.dat');
  assign (fo,'dest.dat');
  while not eof(fi) do
    begin
      read (fi,b);
      b := 255-b;
      write (fo,b);
    end;
  close (fi);
  close (fo);
end.

(Yes, I'm intentionally demoing this in about the slowest way possible.)

> -Jarrod

-- 
Scott Earnest                      | _,-""-_,-""-_,-""-_,-""-_,-""-_,-" |
setech@ix.netcom.com (primary)     | We now return you to our regularly |
sinykal@cyberspace.org (alternate) | scheduled chaos and mayhem. . . .  |