Function skeleton of the application event functions excluded. ' Function Prototypes - frmMain.frm ' ******************* ' Gets current window proccess Private Declare Function GetActiveWindow Lib "user32" () As Long ' Sends exit message to windows. Private Declare Sub PostQuitMessage Lib "user32" (ByVal nExitCode As Long) ' Gets key state. Private Declare Function GetKeyState Lib "user32" (ByVal nVirtKey As Long) As Integer ' ******************* ' Function Prototypes - modCipher.mod ' ******************* ' Sub Init() // void Init(); ' Initiates the encryptdecrypt.dll ' Function EncryptS(ByVal Text As String) as String // char *EncryptS(char[] Text); ' Encrypts the text. ' Function DecryptS(ByVal Text As String) As String // char *DecryptS(char[] Text); ' Decrypts the text. ' ******************** ' Function Prototypes - modConsole.mod ' ******************* ' Public Sub ConsoleFunctions(InptStR As String) // void ConsoleFunctions(char* InptStr); ' Responds to the needed command. ' ******************* ' Function Prototypes - modGraphics.mod ' ******************* Public Declare Function ReleaseCapture Lib "user32" () As Long ' Release mouse capture Public Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long ' Send a message to windows. ' ******************* ' Function Prototypes - modSocket.mod ' ******************* ' Sub WClient() // void WClient(); ' Loads the client from the patch. ' Sub InitSockets() // void InitSockets(); ' Initiate the sockets. ' Sub ConnectHotel() // void ConnectHotel(); ' Connects to the client. ' Sub CheckConsoleCmd(ByVal Packet As String) // Sub CheckConsoleCmd(char *Packet); ' This function works if the user is in a room and whispers "CONSOLE". ' then the console pops out. ' Function AddQuotes(Text As String) As String // char* AddQuotes(char[] Text); ' This function just puts quotes around the string. ' Din't want to write chr(34) & Text chr(34) everywhere i needed it. ' *******************