by Gilbert Abellar (2 Submissions)
Category: Encryption
Difficulty: Advanced
Date Added: Wed 3rd February 2021
Rating: (3 Votes)
This program converts Alpha-Numeric characters into Morse Code, it also plays Morse sound. Very usefull for decrypting or encrypting strings, especially passwords.
API DeclarationsOption Explicit
Global Const conSwNormal As Long = 1
Public Enum EffectConstant
TString = 0
End Enum
Public I As Long
Public J As Long
Public X As Long
Public Y As Long
Public Z As Long
Public ClassMod As MainFunction
Public Can As Boolean
Public Extras As Boolean
Public Cancelling As Boolean
Public Num() As String
Public Char() As String
Public Num1(48 To 57) As String
Public Char1(65 To 90) As String
Public Const NumCont As String = "_ _ _ _ _|._ _ _ _|.._ _ _|..._ _|...._|.....|_....|_ _...|_ _ _..|_ _ _ _."
Public Const CharCont As String = "._|_...|_._.|_..|.|.._.|_ _.|....|..|._ _ _|_._|._..|_ _|_.|_ _ _|._ _.|_ _._|._.|...|_|.._|..._|._ _|_.._|_._ _|_ _.."
Public Declare Sub Sleep Lib "kernel32" (ByVal lpMilliSeconds As Long)
Public Declare Sub Beep Lib "kernel32" (ByVal dwFrequency As Long, ByVal dwLength As Long)