by Themba Kriger (4 Submissions)
Category: Encryption
Compatability: Visual Basic 3.0
Difficulty: Intermediate
Date Added: Wed 3rd February 2021
Rating: 
(4 Votes)
'this is probably the crappest encryption going here
'i wrote this cause i saw it on descovery channel
'its an encryption that has been used for ages even used
'in wars
'its supposed to use passwords and encode whole
'sentences but i didn't feel like doing that
'i will soon, mabey this weekend
'anyway what this does it gets the ascii code of the
'uppercase letter in text1 and adds the ascii code of
'the uppercase letter in text2 it then subtracts 64 from
'it and converts this to a new character to test draw a
'table similar to this one:
'A|B|C|D|E|F|G|H|I|J ETC. UNTIL Z.
'B|C|D|E|F|G|H|I|J|K
'C|D|E|F|G|H|I|J|K|L
'D
'E
'ETC. UNTIL Z
'YOU GET THE PICTURE
'Now take the word you want to encode say norm and choose
'password say dog . what you do now is go to the 1st
'letter of the password on the top row and the 1st letter
'of the text in the vertical row and move down/across until
'they meet. this is the encoded character. you keep doing
'this until the text is encoded. if the password is at the
'end start at the beginning again.
'to decode do the same as the encryption but now you do
'the password in the vertical side and the text on the
'horizontal side
'tada
'Themba Kriger : [email protected] send me any
'modifications plz! thanx
Inputs
the password and the text to encrypt decrypt
Assumes
'this is probably the crappest encryption going here
'i wrote this cause i saw it on descovery channel
'its an encryption that has been used for ages even used
'in wars
'its supposed to use passwords and encode whole
'sentences but i didn't feel like doing that
'i will soon, mabey this weekend
'anyway what this does it gets the ascii code of the
'uppercase letter in text1 and adds the ascii code of
'the uppercase letter in text2 it then subtracts 64 from
'it and converts this to a new character to test draw a
'table similar to this one:
'A|B|C|D|E|F|G|H|I|J ETC. UNTIL Z.
'B|C|D|E|F|G|H|I|J|K
'C|D|E|F|G|H|I|J|K|L
'D
'E
'ETC. UNTIL Z
'YOU GET THE PICTURE
'Now take the word you want to encode say norm and choose
'password say dog . what you do now is go to the 1st
'letter of the password on the top row and the 1st letter
'of the text in the vertical row and move down/across until
'they meet. this is the encoded character. you keep doing
'this until the text is encoded. if the password is at the
'end start at the beginning again.
'to decode do the same as the encryption but now you do
'the password in the vertical side and the text on the
'horizontal side
'tada
'Themba Kriger : [email protected] send me any
'modifications plz! thanx
Code Returns
the encoded decoded text
Side Effects
may cause neasea
VBcoders
