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 17983 days, 19 hours, 16 minutes ago.