Advertisement
C_Volume2 Encryption #73645

Triple S Encryption

This is Triple S - the Super Simple Sipher(I know, it's Cipher, not Sipher). You can say it's GCA's distant little cousin. I have greatly miniturized the code. I hope you like it!

AI

สรุปโดย AI: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.

ซอร์สโค้ด
original-source
Public Function EncDec(text As String, pass As String)
For i = 1 To Len(text)
 If Len(pass) < Len(text) Then pass = pass & pass
 ASCII = Asc(Mid$(pass, i, 1)) Xor Len(text)
 PassChar = ASCII Xor 100
 password = password & PassChar
Next i
For i = 1 To Len(text)
 ASCII = Asc(Mid$(text, i, 1))
 x = ASCII Xor Mid(password, i, 1)
 Char = Chr(x)
 Final = Final & Char
Next i
End Function
ความคิดเห็นดั้งเดิม (3)
กู้คืนจาก Wayback Machine