VERSION 1.0 CLASS
BEGIN
  MultiUse = -1  'True
  Persistable = 0  'NotPersistable
  DataBindingBehavior = 0  'vbNone
  DataSourceBehavior  = 0  'vbNone
  MTSTransactionMode  = 0  'NotAnMTSObject
END
Attribute VB_Name = "clsMovableData"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = False
Attribute VB_Exposed = False
'Map Editing
Public AttackTime As Integer

Public MapEdit As Boolean, EditMode As Byte
Public CurTile As Integer, TopY As Long
Public NewAtt As Integer, CurAtt As Integer

Public cx As Long, cy As Long, CMap As Long 'Your Location
Public CWalkCode As Byte
Public CXO As Long, CYO As Long, CDir As Long, CWalkStep As Long
Public CAttack As Long, CWalk As Long

Public NewAccount As Boolean
Public User As String, Pass As String

Public frmWait_Loaded As Boolean
Public frmMain_Loaded As Boolean, frmMain_Showing As Boolean
Public frmLogin_Loaded As Boolean
Public frmAccount_Loaded As Boolean
Public frmNewCharacter_Loaded As Boolean
Public frmNewPass_Loaded As Boolean
Public frmMonster_Loaded As Boolean
Public frmObject_Loaded As Boolean
Public frmMagic_Loaded As Boolean
Public frmList_Loaded As Boolean
Public frmMapProperties_Loaded As Boolean
Public frmGuilds_Loaded As Boolean
Public frmGuild_Loaded As Boolean
Public frmNPC_Loaded As Boolean
Public frmMacros_Loaded As Boolean
Public frmOptions_Loaded As Boolean
Public frmNewGuild_Loaded As Boolean
Public frmBan_Loaded As Boolean
Public frmHall_Loaded As Boolean

Public blnEnd As Boolean, blnPlaying As Boolean

Public keyUp As Boolean, keyDown As Boolean
Public keyLeft As Boolean, keyRight As Boolean
Public keyCtrl As Boolean, keyShift As Boolean
Public keyAlt As Boolean

'Misc Variables
Public MapCacheFile As String
Public AttackTimer As Long
Public MapTimer As Long
Public blnNight As Boolean
Public ChatString As String
Public ServerIP As String
Public ServerPort As Long
Public CurInvObj As Long
Public CurObj As Long
Public Freeze As Boolean
Public Dead As Boolean
Public NextTransition As Long
Public SecondCounter As Long, FrameCounter As Long, FrameTimer As Long, FrameRate As Long
Public HoldTime As Long
Public CurFrame As Long
Public TempVar1 As Long, TempVar2 As Long, TempVar3 As Long, TempVar4 As Long, TempVar5 As Long, TempVar6 As Long, TempVar7 As Long, TempVar8 As Long, TempVar9 As Long
Public ChatScrollBack As Long
Public RequestedMap As Boolean
Public Paletted As Boolean
Public LastProjectile As Long
Public ComputerID As String
Public SentPacketCount As Integer
