View Single Post
 01-12-2013, 06:13 PM PM User | #1 KashSmith100001 New to the CF scene   Join Date: Dec 2012 Posts: 7 Thanks: 0 Thanked 0 Times in 0 Posts Ceasar Cipher Cracker, having problems I am trying to write a program in Just Basic to crack a ceasar cipher, by doing a shift of 1 letter, then 2 letters, and on to 26 letters, and output to a text file. The idea is to try every possible cipher, so you can crack any ceasar cipher. I've got it to the point where it should do the 1st shift, the problem is if you input "b", it shows "a", but if you input "bbb", it still only shows "a", I need it to show "aaa", if you know what I mean, please help if you can, I'm pulling my hair out over here! (and thanks!) Code: ```dim alpha\$(26) dim alpha1\$(26) 'for a one character shift alpha\$(1) = "a" alpha\$(2) = "b" alpha\$(3) = "c" alpha\$(4) = "d" alpha\$(5) = "e" alpha\$(6) = "f" alpha\$(7) = "g" alpha\$(8) = "h" alpha\$(9) = "i" alpha\$(10) = "j" alpha\$(11) = "k" alpha\$(12) = "l" alpha\$(13) = "m" alpha\$(14) = "n" alpha\$(15) = "o" alpha\$(16) = "p" alpha\$(17) = "q" alpha\$(18) = "r" alpha\$(19) = "s" alpha\$(20) = "t" alpha\$(21) = "u" alpha\$(22) = "v" alpha\$(23) = "w" alpha\$(24) = "x" alpha\$(25) = "y" alpha\$(26) = "z" alpha1\$(1) = "b" alpha1\$(2) = "c" alpha1\$(3) = "d" alpha1\$(4) = "e" alpha1\$(5) = "f" alpha1\$(6) = "g" alpha1\$(7) = "h" alpha1\$(8) = "i" alpha1\$(9) = "j" alpha1\$(10) = "k" alpha1\$(11) = "l" alpha1\$(12) = "m" alpha1\$(13) = "n" alpha1\$(14) = "o" alpha1\$(15) = "p" alpha1\$(16) = "q" alpha1\$(17) = "r" alpha1\$(18) = "s" alpha1\$(19) = "t" alpha1\$(20) = "u" alpha1\$(21) = "v" alpha1\$(22) = "w" alpha1\$(23) = "x" alpha1\$(24) = "y" alpha1\$(25) = "z" alpha1\$(26) = "a" input "Encrypted message:" ; encmsg\$ for count = 1 to LEN(encmsg\$) cc\$ = MID\$(encmsg\$, count, 1) if cc\$ = alpha1\$(count) then newmsg1\$ = newmsg1\$ + alpha\$(count) end if next count print newmsg1\$```