decrypt.frink

View or download decrypt.frink in plain text format


// Attempt to decrypt something that wasn't encrypted in the first place...
// just a bad configuration of a web server.

a="""LIEXL TSPECO
ITMF BWVSQY
QGTII EDAMPZ
SYDTO ZUDDAH
OBBZB QLKHFK"""

micah = """sggkh://xibkglyrm.lit/e0s494o1
xldzyfmtz, wfwv!"""

norm="Djx, ymfy nx htwwjhy"
norm2="Yes, that is correct."

ab="""
���������� ������  ...�
���� ������� �������, ���������� ��������� �����������������, �
�� ��������� ������������� �� ���������� �� ������. ��������, �
�� ����� �����
� ������,�� ����� ��������� �� ��������� �
�����, ������ ������ �� ��� � ����������� ����������, �
���� �����
��� ����� ���������."""

a = """#
(P1)
#
(MNDMUNEMRSE-N-STA-UNARE)  (AESM)
#
 
#
TFRNENP?NSENPBSERCBBNSENPRSEINC
#
PRSE NMRSE OPREHLDULDNCBE(TFXLC TCXL NCBE)
#
AL-PRPPIT XLYPPIY NCBE MEKSEINCDRCBRNSEPRSE
#
WLD RCCBRNSE NT SSNENTXSE-CRSLE-CLTRSE WLD NCBE
#
ALWCP NCBETSMELRSERLSEURGLSNEASNWLDNCBE
#
(NOPFSE NLSRE NCBE) NTEGDDMNSENCURERCBRNE
#
(TENE TFRNE NCBRTSENCBE INC)
#
(FLRSE PQSE ONDE 71 NCBE)
#
(CDNSE PQSE ONSDE 74 NCBE)
#
(PRTSE PRSE ONREDE 75 NCBE)
#
(TF NBCMSPSOLEMRDELUSE TOTE WLDN WLDNCBE)
#
(194 WLD'S NCBE)(TRFXL)
#
 
#
-----------------------------------------------------
#
 
#
Transcription Ricky McCormick note B
#
29 March 2011
#
 
#
ALPNTE GLSE - SE RTE
#
VLSE MTSE-CTSE-WSE-FRTSE
#
PURTRSEONDRSEWLD NCBE
#
NWLDLRCMSP NEWLD STS MEXL
#
DULMT 6 TUNSE NCBEXE
#
 
#
(MUNSAISTEN MU NARSE)
#
KLSE-LRSTE-TRSE-TRSE-MKSEN-MRSE
#
(SAESNSE SE N MRSE)
#
 
#
NMNRCBRNSEPTE2PTEWSRCBKNSE
#
26 MLSE 74 SPRKSE 29KCNOB,OLE 175 RTRSE
#
35 GLE CLGSE UUNUTKEBKRSE PSESHLE
#
651 MTCSE HTLSE NCUTC TRQ NMRE
#
99.84.52 UNEPLSEUCRSEAOLTSENSKSENRSE
#
NSREONSE PUTSEWLD NCBE (3 XORL)
#
 
#
DNMSE NRSE 1N2 NTRLERC BANSENTSECRSNE
#
LSPNSENGSPSEMKSERBSGNCBENUXLR
#
MH CRE NMRE NCBE  1/2 MUNDDLSE
#
 
#
D-W-M-4 MPL XDRLX"""

clairseach = "y02 w34908w 2343 708 qg085 w3je9jt j3wwqt3w 9j w3d435 d0e3'"
fullRotate[clairseach]

a = "Vagrerfgrq va urycvat bhg gur Pelcgb & Cevinpl Ivyyntr? Svyy bhg guvf sbez:"
fullRotate[a]

// Calculate frequency histogram of string
histogram[str] :=
{
   freq = []
   for i = 0 to 255
      freq@i = 0

   for c = char[str]
      freq@c = freq@c + 1

   return freq
}


// Perform a full rotation on the string.
fullRotate[str] :=
{
   str = uc[str]
   for i=0 to 255
   {
      print["\n$i\t"]
      for c = char[str]
      {
         if (c > 32)
         {
            cc = c+i
            while cc > char["Z"]
               cc = cc - 26
         } else
            cc = c
         print[char[cc]]
      }
   }
}

// Perform a full rotation on the string.
fullRotateReverse[str] :=
{
   for i=0 to 26
   {
      println["\n$i"]
      for c = char[str]
      {
         if (c > 32)
         {
            cc = char["Z"] - c+i
            while cc > char["Z"]
               cc = cc - 26
            while cc < char["A"]
               cc = cc + 26
         } else
            cc = c
         print[char[cc]]
      }
   }
}

//println[fullRotate[norm]]
//println[fullRotate[norm2]]
//println[fullRotate["You should try drinking.  Everything eventually looks like a code."]]
//println[fullRotate["Rjqq itsj. dtz ufs xjj fqq ymj xjhwjy yrjjyx."]]
//println[fullRotate["Rjqq itsj. dtz ufs xjj fqq ymj xjhwjy yrjjyx."]]
//println[fullRotate["And safe from the prying eyes of the baffled Germans.  Or so they would have us believe."]]
//println[fullRotate["Axqfi nmqfx?"]]
//println[fullRotate["Ny nx ajwd qfyj. N xmtzqi ypws ns ytt."]]

/*i = 0
for x = histogram[a]
{
   println["$i\t$x"]
   i = i + 1
}*/


View or download decrypt.frink in plain text format


This is a program written in the programming language Frink.
For more information, view the Frink Documentation or see More Sample Frink Programs.

Alan Eliasen was born 17590 days, 6 hours, 58 minutes ago.