Initial commit: ROW Client source code

Game client codebase including:
- CharacterActionControl: Character and creature management
- GlobalScript: Network, items, skills, quests, utilities
- RYLClient: Main client application with GUI and event handlers
- Engine: 3D rendering engine (RYLGL)
- MemoryManager: Custom memory allocation
- Library: Third-party dependencies (DirectX, boost, etc.)
- Tools: Development utilities

🤖 Generated with [Claude Code](https://claude.com/claude-code)

Co-Authored-By: Claude <noreply@anthropic.com>

Library/dxx8/samples/Multimedia/VBSamples/DirectPlay/SimpleVoice/modDplay.bas

@@ -0,0 +1,56 @@
+Attribute VB_Name = "modDplay"
+Option Explicit
+'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
+'
+'  Copyright (C) 1999-2001 Microsoft Corporation.  All Rights Reserved.
+'
+'  File:       modDPlay.bas
+'
+'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
+
+'Constants
+Public Const AppGuid = "{F5230441-9B71-88DA-998C-00207547A14C}"
+
+'Types
+Public Type PlayerInfo
+    lPlayerID As Long
+    fSilent As Boolean
+End Type
+
+'DirectX Variables
+Public dvServer As DirectPlayVoiceServer8
+Public dvClient As DirectPlayVoiceClient8
+Public dx As DirectX8
+Public dpp As DirectPlay8Peer
+Public glMyID As Long
+'Our connection form and message pump
+Public DPlayEventsForm As DPlayConnect
+
+'Misc Vars
+Public fAmHost As Boolean
+
+' Get the DirectPlay objects
+Public Sub InitDPlay()
+    Set dx = New DirectX8
+    Set dpp = dx.DirectPlayPeerCreate
+End Sub
+' Shut down the DPlay objects
+Public Sub Cleanup()
+    
+    On Error Resume Next
+    'Turn off our error handling
+    If Not (dpp Is Nothing) Then dpp.UnRegisterMessageHandler
+    If Not (dvClient Is Nothing) Then dvClient.UnRegisterMessageHandler
+    If Not (dvServer Is Nothing) Then dvServer.UnRegisterMessageHandler
+    dvClient.Disconnect DVFLAGS_SYNC
+    If fAmHost Then dvServer.StopSession 0
+    'Destroy the objects
+    Set dvClient = Nothing
+    Set dvServer = Nothing
+    
+    If Not dpp Is Nothing Then dpp.Close
+    DPlayEventsForm.GoUnload
+    'Destroy the objects
+    Set dpp = Nothing
+    Set dx = Nothing
+End Sub