diff --git a/.gitattributes b/.gitattributes index 8e0b41110f..d063f9dbf1 100644 --- a/.gitattributes +++ b/.gitattributes @@ -7321,6 +7321,8 @@ packages/ptc/src/win32/base/win32windowd.inc svneol=native#text/plain packages/ptc/src/win32/base/windows.ico -text packages/ptc/src/win32/directx/p_ddraw.pp svneol=native#text/plain packages/ptc/src/win32/directx/p_dinput.pp svneol=native#text/plain +packages/ptc/src/win32/directx/t_ddraw.h2paschk svneol=native#text/plain +packages/ptc/src/win32/directx/t_dinput.h2paschk svneol=native#text/plain packages/ptc/src/win32/directx/win32directxcheck.inc svneol=native#text/plain packages/ptc/src/win32/directx/win32directxconsoled.inc svneol=native#text/plain packages/ptc/src/win32/directx/win32directxconsolei.inc svneol=native#text/plain diff --git a/packages/ptc/src/win32/directx/t_ddraw.h2paschk b/packages/ptc/src/win32/directx/t_ddraw.h2paschk new file mode 100644 index 0000000000..614d39d8e1 --- /dev/null +++ b/packages/ptc/src/win32/directx/t_ddraw.h2paschk @@ -0,0 +1,497 @@ +@Pascal uses p_ddraw; +@Pascal begin + +@C #include +@C #include +@C #include +@C #include +@C int _tmain(int argc, _TCHAR* argv[]) +@C { + +@record TDDARGB,DDARGB +.blue +.green +.red +.alpha + +@record TDDRGBA,DDRGBA +.red +.green +.blue +.alpha + +@record TDDCOLORKEY,DDCOLORKEY +.dwColorSpaceLowValue +.dwColorSpaceHighValue + +@record TDDBLTFX,DDBLTFX +.dwSize +.dwDDFX +.dwROP +.dwDDROP +.dwRotationAngle +.dwZBufferOpCode +.dwZBufferLow +.dwZBufferHigh +.dwZBufferBaseDest +.dwZDestConstBitDepth +.dwZDestConst +.lpDDSZBufferDest +.dwZSrcConstBitDepth +.dwZSrcConst +.lpDDSZBufferSrc +.dwAlphaEdgeBlendBitDepth +.dwAlphaEdgeBlend +.dwReserved +.dwAlphaDestConstBitDepth +.dwAlphaDestConst +.lpDDSAlphaDest +.dwAlphaSrcConstBitDepth +.dwAlphaSrcConst +.lpDDSAlphaSrc +.dwFillColor +.dwFillDepth +.dwFillPixel +.lpDDSPattern +.ddckDestColorkey +.ddckSrcColorkey + +@record TDDSCAPS,DDSCAPS +.dwCaps + +@record TDDOSCAPS,DDOSCAPS +.dwCaps + +@record TDDSCAPSEX,DDSCAPSEX +.dwCaps2 +.dwCaps3 +.dwCaps4 +.dwVolumeDepth + +@record TDDSCAPS2,DDSCAPS2 +.dwCaps +.dwCaps2 +.dwCaps3 +.dwCaps4 +.dwVolumeDepth + +@record TDDCAPS_DX1,DDCAPS_DX1 +.dwSize +.dwCaps +.dwCaps2 +.dwCKeyCaps +.dwFXCaps +.dwFXAlphaCaps +.dwPalCaps +.dwSVCaps +.dwAlphaBltConstBitDepths +.dwAlphaBltPixelBitDepths +.dwAlphaBltSurfaceBitDepths +.dwAlphaOverlayConstBitDepths +.dwAlphaOverlayPixelBitDepths +.dwAlphaOverlaySurfaceBitDepths +.dwZBufferBitDepths +.dwVidMemTotal +.dwVidMemFree +.dwMaxVisibleOverlays +.dwCurrVisibleOverlays +.dwNumFourCCCodes +.dwAlignBoundarySrc +.dwAlignSizeSrc +.dwAlignBoundaryDest +.dwAlignSizeDest +.dwAlignStrideAlign +.dwRops +.ddsCaps +.dwMinOverlayStretch +.dwMaxOverlayStretch +.dwMinLiveVideoStretch +.dwMaxLiveVideoStretch +.dwMinHwCodecStretch +.dwMaxHwCodecStretch +.dwReserved1 +.dwReserved2 +.dwReserved3 + +@record TDDCAPS_DX3,DDCAPS_DX3 +.dwSize +.dwCaps +.dwCaps2 +.dwCKeyCaps +.dwFXCaps +.dwFXAlphaCaps +.dwPalCaps +.dwSVCaps +.dwAlphaBltConstBitDepths +.dwAlphaBltPixelBitDepths +.dwAlphaBltSurfaceBitDepths +.dwAlphaOverlayConstBitDepths +.dwAlphaOverlayPixelBitDepths +.dwAlphaOverlaySurfaceBitDepths +.dwZBufferBitDepths +.dwVidMemTotal +.dwVidMemFree +.dwMaxVisibleOverlays +.dwCurrVisibleOverlays +.dwNumFourCCCodes +.dwAlignBoundarySrc +.dwAlignSizeSrc +.dwAlignBoundaryDest +.dwAlignSizeDest +.dwAlignStrideAlign +.dwRops +.ddsCaps +.dwMinOverlayStretch +.dwMaxOverlayStretch +.dwMinLiveVideoStretch +.dwMaxLiveVideoStretch +.dwMinHwCodecStretch +.dwMaxHwCodecStretch +.dwReserved1 +.dwReserved2 +.dwReserved3 +.dwSVBCaps +.dwSVBCKeyCaps +.dwSVBFXCaps +.dwSVBRops +.dwVSBCaps +.dwVSBCKeyCaps +.dwVSBFXCaps +.dwVSBRops +.dwSSBCaps +.dwSSBCKeyCaps +.dwSSBFXCaps +.dwSSBRops +.dwReserved4 +.dwReserved5 +.dwReserved6 + +@record TDDCAPS_DX5,DDCAPS_DX5 +.dwSize +.dwCaps +.dwCaps2 +.dwCKeyCaps +.dwFXCaps +.dwFXAlphaCaps +.dwPalCaps +.dwSVCaps +.dwAlphaBltConstBitDepths +.dwAlphaBltPixelBitDepths +.dwAlphaBltSurfaceBitDepths +.dwAlphaOverlayConstBitDepths +.dwAlphaOverlayPixelBitDepths +.dwAlphaOverlaySurfaceBitDepths +.dwZBufferBitDepths +.dwVidMemTotal +.dwVidMemFree +.dwMaxVisibleOverlays +.dwCurrVisibleOverlays +.dwNumFourCCCodes +.dwAlignBoundarySrc +.dwAlignSizeSrc +.dwAlignBoundaryDest +.dwAlignSizeDest +.dwAlignStrideAlign +.dwRops +.ddsCaps +.dwMinOverlayStretch +.dwMaxOverlayStretch +.dwMinLiveVideoStretch +.dwMaxLiveVideoStretch +.dwMinHwCodecStretch +.dwMaxHwCodecStretch +.dwReserved1 +.dwReserved2 +.dwReserved3 +.dwSVBCaps +.dwSVBCKeyCaps +.dwSVBFXCaps +.dwSVBRops +.dwVSBCaps +.dwVSBCKeyCaps +.dwVSBFXCaps +.dwVSBRops +.dwSSBCaps +.dwSSBCKeyCaps +.dwSSBFXCaps +.dwSSBRops +.dwMaxVideoPorts +.dwCurrVideoPorts +.dwSVBCaps2 +.dwNLVBCaps +.dwNLVBCaps2 +.dwNLVBCKeyCaps +.dwNLVBFXCaps +.dwNLVBRops + +@record TDDCAPS_DX6,DDCAPS_DX6 +.dwSize +.dwCaps +.dwCaps2 +.dwCKeyCaps +.dwFXCaps +.dwFXAlphaCaps +.dwPalCaps +.dwSVCaps +.dwAlphaBltConstBitDepths +.dwAlphaBltPixelBitDepths +.dwAlphaBltSurfaceBitDepths +.dwAlphaOverlayConstBitDepths +.dwAlphaOverlayPixelBitDepths +.dwAlphaOverlaySurfaceBitDepths +.dwZBufferBitDepths +.dwVidMemTotal +.dwVidMemFree +.dwMaxVisibleOverlays +.dwCurrVisibleOverlays +.dwNumFourCCCodes +.dwAlignBoundarySrc +.dwAlignSizeSrc +.dwAlignBoundaryDest +.dwAlignSizeDest +.dwAlignStrideAlign +.dwRops +.ddsOldCaps +.dwMinOverlayStretch +.dwMaxOverlayStretch +.dwMinLiveVideoStretch +.dwMaxLiveVideoStretch +.dwMinHwCodecStretch +.dwMaxHwCodecStretch +.dwReserved1 +.dwReserved2 +.dwReserved3 +.dwSVBCaps +.dwSVBCKeyCaps +.dwSVBFXCaps +.dwSVBRops +.dwVSBCaps +.dwVSBCKeyCaps +.dwVSBFXCaps +.dwVSBRops +.dwSSBCaps +.dwSSBCKeyCaps +.dwSSBFXCaps +.dwSSBRops +.dwMaxVideoPorts +.dwCurrVideoPorts +.dwSVBCaps2 +.dwNLVBCaps +.dwNLVBCaps2 +.dwNLVBCKeyCaps +.dwNLVBFXCaps +.dwNLVBRops +.ddsCaps + +@record TDDCAPS_DX7,DDCAPS_DX7 +.dwSize +.dwCaps +.dwCaps2 +.dwCKeyCaps +.dwFXCaps +.dwFXAlphaCaps +.dwPalCaps +.dwSVCaps +.dwAlphaBltConstBitDepths +.dwAlphaBltPixelBitDepths +.dwAlphaBltSurfaceBitDepths +.dwAlphaOverlayConstBitDepths +.dwAlphaOverlayPixelBitDepths +.dwAlphaOverlaySurfaceBitDepths +.dwZBufferBitDepths +.dwVidMemTotal +.dwVidMemFree +.dwMaxVisibleOverlays +.dwCurrVisibleOverlays +.dwNumFourCCCodes +.dwAlignBoundarySrc +.dwAlignSizeSrc +.dwAlignBoundaryDest +.dwAlignSizeDest +.dwAlignStrideAlign +.dwRops +.ddsOldCaps +.dwMinOverlayStretch +.dwMaxOverlayStretch +.dwMinLiveVideoStretch +.dwMaxLiveVideoStretch +.dwMinHwCodecStretch +.dwMaxHwCodecStretch +.dwReserved1 +.dwReserved2 +.dwReserved3 +.dwSVBCaps +.dwSVBCKeyCaps +.dwSVBFXCaps +.dwSVBRops +.dwVSBCaps +.dwVSBCKeyCaps +.dwVSBFXCaps +.dwVSBRops +.dwSSBCaps +.dwSSBCKeyCaps +.dwSSBFXCaps +.dwSSBRops +.dwMaxVideoPorts +.dwCurrVideoPorts +.dwSVBCaps2 +.dwNLVBCaps +.dwNLVBCaps2 +.dwNLVBCKeyCaps +.dwNLVBFXCaps +.dwNLVBRops +.ddsCaps + +@record TDDPIXELFORMAT,DDPIXELFORMAT +.dwSize +.dwFlags +.dwFourCC +.dwRGBBitCount +.dwYUVBitCount +.dwZBufferBitDepth +.dwAlphaBitDepth +.dwLuminanceBitCount +.dwBumpBitCount +.dwPrivateFormatBitCount +.dwRBitMask +.dwYBitMask +.dwStencilBitDepth +.dwLuminanceBitMask +.dwBumpDuBitMask +.dwOperations +.dwGBitMask +.dwUBitMask +.dwZBitMask +.dwBumpDvBitMask +.MultiSampleCaps +.MultiSampleCaps.wFlipMSTypes +.MultiSampleCaps.wBltMSTypes +.dwBBitMask +.dwVBitMask +.dwStencilBitMask +.dwBumpLuminanceBitMask +.dwRGBAlphaBitMask +.dwYUVAlphaBitMask +.dwLuminanceAlphaBitMask +.dwRGBZBitMask +.dwYUVZBitMask + +@record TDDOVERLAYFX,DDOVERLAYFX +.dwSize +.dwAlphaEdgeBlendBitDepth +.dwAlphaEdgeBlend +.dwReserved +.dwAlphaDestConstBitDepth +.dwAlphaDestConst +.lpDDSAlphaDest +.dwAlphaSrcConstBitDepth +.dwAlphaSrcConst +.lpDDSAlphaSrc +.dckDestColorkey +.dckSrcColorkey +.dwDDFX +.dwFlags + +@record TDDBLTBATCH,DDBLTBATCH +.lprDest +.lpDDSSrc +.lprSrc +.dwFlags +.lpDDBltFx + +@record TDDGAMMARAMP,DDGAMMARAMP +.red +.green +.blue + +@record TDDDEVICEIDENTIFIER,DDDEVICEIDENTIFIER +.szDriver +.szDescription +.liDriverVersion +.dwVendorId +.dwDeviceId +.dwSubSysId +.dwRevision +.guidDeviceIdentifier + +@record TDDDEVICEIDENTIFIER2,DDDEVICEIDENTIFIER2 +.szDriver +.szDescription +.liDriverVersion +.dwVendorId +.dwDeviceId +.dwSubSysId +.dwRevision +.guidDeviceIdentifier +.dwWHQLLevel + +@record TDDSURFACEDESC,DDSURFACEDESC +.dwSize +.dwFlags +.dwHeight +.dwWidth +.lPitch +.dwLinearSize +.dwBackBufferCount +.dwMipMapCount +.dwZBufferBitDepth +.dwRefreshRate +.dwAlphaBitDepth +.dwReserved +.lpSurface +.ddckCKDestOverlay +.ddckCKDestBlt +.ddckCKSrcOverlay +.ddckCKSrcBlt +.ddpfPixelFormat +.ddsCaps + +@record TDDSURFACEDESC2,DDSURFACEDESC2 +.dwSize +.dwFlags +.dwHeight +.dwWidth +.lPitch +.dwLinearSize +.dwBackBufferCount +.dwDepth +.dwMipMapCount +.dwRefreshRate +.dwSrcVBHandle +.dwAlphaBitDepth +.dwReserved +.lpSurface +.dwEmptyFaceColor +.ddckCKDestOverlay +.ddckCKDestBlt +.ddckCKSrcOverlay +.ddckCKSrcBlt +.dwFVF +.ddpfPixelFormat +.ddsCaps +.dwTextureStage + +@record TDDOPTSURFACEDESC,DDOPTSURFACEDESC +.dwSize +.dwFlags +.ddSCaps +.ddOSCaps +.guid +.dwCompressionRatio + +@record TDDCOLORCONTROL,DDCOLORCONTROL +.dwSize +.dwFlags +.lBrightness +.lContrast +.lHue +.lSaturation +.lSharpness +.lGamma +.lColorEnable +.dwReserved1 + +@C return 0; +@C } + +@Pascal end. diff --git a/packages/ptc/src/win32/directx/t_dinput.h2paschk b/packages/ptc/src/win32/directx/t_dinput.h2paschk new file mode 100644 index 0000000000..7048a93faa --- /dev/null +++ b/packages/ptc/src/win32/directx/t_dinput.h2paschk @@ -0,0 +1,475 @@ +@Pascal uses p_dinput; +@Pascal begin + +@C #include +@C #include +@C #include +@C #include +@C int _tmain(int argc, _TCHAR* argv[]) +@C { + +@record TDICONSTANTFORCE,DICONSTANTFORCE +.lMagnitude + +@record TDIRAMPFORCE,DIRAMPFORCE +.lStart +.lEnd + +@record TDIPERIODIC,DIPERIODIC +.dwMagnitude +.lOffset +.dwPhase +.dwPeriod + +@record TDICONDITION,DICONDITION +.lOffset +.lPositiveCoefficient +.lNegativeCoefficient +.dwPositiveSaturation +.dwNegativeSaturation +.lDeadBand + +@record TDICUSTOMFORCE,DICUSTOMFORCE +.cChannels +.dwSamplePeriod +.cSamples +.rglForceData + +@record TDIENVELOPE,DIENVELOPE +.dwSize +.dwAttackLevel +.dwAttackTime +.dwFadeLevel +.dwFadeTime + +@record TDIEFFECT_DX5,DIEFFECT_DX5 +.dwSize +.dwFlags +.dwDuration +.dwSamplePeriod +.dwGain +.dwTriggerButton +.dwTriggerRepeatInterval +.cAxes +.rgdwAxes +.rglDirection +.lpEnvelope +.cbTypeSpecificParams +.lpvTypeSpecificParams + +@record TDIEFFECT,DIEFFECT +.dwSize +.dwFlags +.dwDuration +.dwSamplePeriod +.dwGain +.dwTriggerButton +.dwTriggerRepeatInterval +.cAxes +.rgdwAxes +.rglDirection +.lpEnvelope +.cbTypeSpecificParams +.lpvTypeSpecificParams +.dwStartDelay + +@record TDIFILEEFFECT,DIFILEEFFECT +.dwSize +.GuidEffect +.lpDiEffect +.szFriendlyName + +@record TDIEFFESCAPE,DIEFFESCAPE +.dwSize +.dwCommand +.lpvInBuffer +.cbInBuffer +.lpvOutBuffer +.cbOutBuffer + +@record TDIDEVCAPS_DX3,DIDEVCAPS_DX3 +.dwSize +.dwFlags +.dwDevType +.dwAxes +.dwButtons +.dwPOVs + +@record TDIDEVCAPS,DIDEVCAPS +.dwSize +.dwFlags +.dwDevType +.dwAxes +.dwButtons +.dwPOVs +.dwFFSamplePeriod +.dwFFMinTimeResolution +.dwFirmwareRevision +.dwHardwareRevision +.dwFFDriverVersion + +@record TDIOBJECTDATAFORMAT,DIOBJECTDATAFORMAT +.pguid +.dwOfs +.dwType +.dwFlags + +@record TDIDATAFORMAT,DIDATAFORMAT +.dwSize +.dwObjSize +.dwFlags +.dwDataSize +.dwNumObjs +.rgodf + +@record TDIACTIONA,DIACTIONA +.uAppData +.dwSemantic +.dwFlags +.lptszActionName +.guidInstance +.dwObjID +.dwHow +.uResIdString + +@record TDIACTIONW,DIACTIONW +.uAppData +.dwSemantic +.dwFlags +.lptszActionName +.guidInstance +.dwObjID +.dwHow +.uResIdString + +@record TDIACTIONFORMATA,DIACTIONFORMATA +.dwSize +.dwActionSize +.dwDataSize +.dwNumActions +.rgoAction +.guidActionMap +.dwGenre +.dwBufferSize +.lAxisMin +.lAxisMax +.hInstString +.ftTimeStamp +.dwCRC +.tszActionMap + +@record TDIACTIONFORMATW,DIACTIONFORMATW +.dwSize +.dwActionSize +.dwDataSize +.dwNumActions +.rgoAction +.guidActionMap +.dwGenre +.dwBufferSize +.lAxisMin +.lAxisMax +.hInstString +.ftTimeStamp +.dwCRC +.tszActionMap + +@record TDICOLORSET,DICOLORSET +.dwSize +.cTextFore +.cTextHighlight +.cCalloutLine +.cCalloutHighlight +.cBorder +.cControlFill +.cHighlightFill +.cAreaFill + +@record TDICONFIGUREDEVICESPARAMSA,DICONFIGUREDEVICESPARAMSA +.dwSize +.dwcUsers +.lptszUserNames +.dwcFormats +.lprgFormats +.hwnd +.dics +.lpUnkDDSTarget + +@record TDICONFIGUREDEVICESPARAMSW,DICONFIGUREDEVICESPARAMSW +.dwSize +.dwcUsers +.lptszUserNames +.dwcFormats +.lprgFormats +.hwnd +.dics +.lpUnkDDSTarget + +@record TDIDEVICEIMAGEINFOA,DIDEVICEIMAGEINFOA +.tszImagePath +.dwFlags +.dwViewID +.rcOverlay +.dwObjID +.dwcValidPts +.rgptCalloutLine +.rcCalloutRect +.dwTextAlign + +@record TDIDEVICEIMAGEINFOW,DIDEVICEIMAGEINFOW +.tszImagePath +.dwFlags +.dwViewID +.rcOverlay +.dwObjID +.dwcValidPts +.rgptCalloutLine +.rcCalloutRect +.dwTextAlign + +@record TDIDEVICEIMAGEINFOHEADERA,DIDEVICEIMAGEINFOHEADERA +.dwSize +.dwSizeImageInfo +.dwcViews +.dwcButtons +.dwcAxes +.dwcPOVs +.dwBufferSize +.dwBufferUsed +.lprgImageInfoArray + +@record TDIDEVICEIMAGEINFOHEADERW,DIDEVICEIMAGEINFOHEADERW +.dwSize +.dwSizeImageInfo +.dwcViews +.dwcButtons +.dwcAxes +.dwcPOVs +.dwBufferSize +.dwBufferUsed +.lprgImageInfoArray + +@record TDIDEVICEOBJECTINSTANCE_DX3A,DIDEVICEOBJECTINSTANCE_DX3A +.dwSize +.guidType +.dwOfs +.dwType +.dwFlags +.tszName + +@record TDIDEVICEOBJECTINSTANCE_DX3W,DIDEVICEOBJECTINSTANCE_DX3W +.dwSize +.guidType +.dwOfs +.dwType +.dwFlags +.tszName + +@record TDIDEVICEOBJECTINSTANCEA,DIDEVICEOBJECTINSTANCEA +.dwSize +.guidType +.dwOfs +.dwType +.dwFlags +.tszName +.dwFFMaxForce +.dwFFForceResolution +.wCollectionNumber +.wDesignatorIndex +.wUsagePage +.wUsage +.dwDimension +.wExponent +.wReportId + +@record TDIDEVICEOBJECTINSTANCEW,DIDEVICEOBJECTINSTANCEW +.dwSize +.guidType +.dwOfs +.dwType +.dwFlags +.tszName +.dwFFMaxForce +.dwFFForceResolution +.wCollectionNumber +.wDesignatorIndex +.wUsagePage +.wUsage +.dwDimension +.wExponent +.wReportId + +@record TDIPROPHEADER,DIPROPHEADER +.dwSize +.dwHeaderSize +.dwObj +.dwHow + +@record TDIPROPDWORD,DIPROPDWORD +.diph +.dwData + +@record TDIPROPPOINTER,DIPROPPOINTER +.diph +.uData + +@record TDIPROPRANGE,DIPROPRANGE +.diph +.lMin +.lMax + +@record TDIPROPCAL,DIPROPCAL +.diph +.lMin +.lCenter +.lMax + +@record TDIPROPCALPOV,DIPROPCALPOV +.diph +.lMin +.lMax + +@record TDIPROPGUIDANDPATH,DIPROPGUIDANDPATH +.diph +.guidClass +.wszPath + +@record TDIPROPSTRING,DIPROPSTRING +.diph +.wsz + +@record TCPOINT,CPOINT +.lP +.dwLog + +@record TDIPROPCPOINTS,DIPROPCPOINTS +.diph +.dwCPointsNum +.cp + +@record TDIDEVICEOBJECTDATA_DX3,DIDEVICEOBJECTDATA_DX3 +.dwOfs +.dwData +.dwTimeStamp +.dwSequence + +@record TDIDEVICEOBJECTDATA,DIDEVICEOBJECTDATA +.dwOfs +.dwData +.dwTimeStamp +.dwSequence +.uAppData + +@record TDIDEVICEINSTANCE_DX3A,DIDEVICEINSTANCE_DX3A +.dwSize +.guidInstance +.guidProduct +.dwDevType +.tszInstanceName +.tszProductName + +@record TDIDEVICEINSTANCE_DX3W,DIDEVICEINSTANCE_DX3W +.dwSize +.guidInstance +.guidProduct +.dwDevType +.tszInstanceName +.tszProductName + +@record TDIDEVICEINSTANCEA,DIDEVICEINSTANCEA +.dwSize +.guidInstance +.guidProduct +.dwDevType +.tszInstanceName +.tszProductName +.guidFFDriver +.wUsagePage +.wUsage + +@record TDIDEVICEINSTANCEW,DIDEVICEINSTANCEW +.dwSize +.guidInstance +.guidProduct +.dwDevType +.tszInstanceName +.tszProductName +.guidFFDriver +.wUsagePage +.wUsage + +@record TDIEFFECTINFOA,DIEFFECTINFOA +.dwSize +.guid +.dwEffType +.dwStaticParams +.dwDynamicParams +.tszName + +@record TDIEFFECTINFOW,DIEFFECTINFOW +.dwSize +.guid +.dwEffType +.dwStaticParams +.dwDynamicParams +.tszName + +@record TDIMOUSESTATE,DIMOUSESTATE +.lX +.lY +.lZ +.rgbButtons + +@record TDIMOUSESTATE2,DIMOUSESTATE2 +.lX +.lY +.lZ +.rgbButtons + +@record TDIJOYSTATE,DIJOYSTATE +.lX +.lY +.lZ +.lRx +.lRy +.lRz +.rglSlider +.rgdwPOV +.rgbButtons + +@record TDIJOYSTATE2,DIJOYSTATE2 +.lX +.lY +.lZ +.lRx +.lRy +.lRz +.rglSlider +.rgdwPOV +.rgbButtons +.lVX +.lVY +.lVZ +.lVRx +.lVRy +.lVRz +.rglVSlider +.lAX +.lAY +.lAZ +.lARx +.lARy +.lARz +.rglASlider +.lFX +.lFY +.lFZ +.lFRx +.lFRy +.lFRz +.rglFSlider + +@C return 0; +@C } + +@Pascal end.