26-02-2009, 03:07 PM
in moddirectdraw
Public DD As DirectDraw7 ' DirectDraw7 Object
Public DD_Clip As DirectDrawClipper ' Clipper object
' primary surface
Public DDS_Primary As DirectDrawSurface7
Public DDSD_Primary As DDSURFACEDESC2
' back buffer
Public DDS_BackBuffer As DirectDrawSurface7
Public Const SurfaceTimerMax As Long = 200000
these can be private.
Public CurX As Integer
Public CurY As Integer
and
Public SOffsetX As Integer
Public SOffsetY As Integer
can all be byte
' Key constants
Private Const VK_UP As Long = &H26
Private Const VK_DOWN As Long = &H28
Private Const VK_LEFT As Long = &H25
Private Const VK_RIGHT As Long = &H27
Private Const VK_SHIFT As Long = &H10
Private Const VK_RETURN As Long = &HD
Private Const VK_CONTROL As Long = &H11
these can be bytes.
and mapping can be redone a bit to use bytes instead of longs for the tile X,Y.
just some thing i noticed that can be changed. and i see you must have gotten the stuff from Aydan on messenger. ^^.
Public DD As DirectDraw7 ' DirectDraw7 Object
Public DD_Clip As DirectDrawClipper ' Clipper object
' primary surface
Public DDS_Primary As DirectDrawSurface7
Public DDSD_Primary As DDSURFACEDESC2
' back buffer
Public DDS_BackBuffer As DirectDrawSurface7
Public Const SurfaceTimerMax As Long = 200000
these can be private.
Public CurX As Integer
Public CurY As Integer
and
Public SOffsetX As Integer
Public SOffsetY As Integer
can all be byte
' Key constants
Private Const VK_UP As Long = &H26
Private Const VK_DOWN As Long = &H28
Private Const VK_LEFT As Long = &H25
Private Const VK_RIGHT As Long = &H27
Private Const VK_SHIFT As Long = &H10
Private Const VK_RETURN As Long = &HD
Private Const VK_CONTROL As Long = &H11
these can be bytes.
and mapping can be redone a bit to use bytes instead of longs for the tile X,Y.
just some thing i noticed that can be changed. and i see you must have gotten the stuff from Aydan on messenger. ^^.