MIDIOUTCAPS2A

構造体

サイズx64: 100 バイト / x86: 100 バイトパッキング1

サイズ=各フィールドのバイト数(x64/x86 で異なる場合は x64/x86 と併記)。x64/x86 列=フィールドのバイトオフセット(HSPで dupptr / lpoke / wpoke 等に使用)。

フィールド

フィールド	型	サイズ	x64	x86	説明
wMid	WORD	2	+0	+0	デバイス製造元(メーカー)ID。
wPid	WORD	2	+2	+2	デバイス製品ID。
vDriverVersion	DWORD	4	+4	+4	ドライバのバージョン(上位8bitがメジャー、下位8bitがマイナー)。
szPname	CHAR	32	+8	+8	デバイス製品名(ANSI、固定長配列)。
wTechnology	WORD	2	+40	+40	デバイスの種類(MOD_MIDIPORT/FMSYNTH/MAPPER等)。
wVoices	WORD	2	+42	+42	同時発音可能なボイス数。内蔵シンセの場合に有効。
wNotes	WORD	2	+44	+44	同時に発音可能なノート数。
wChannelMask	WORD	2	+46	+46	応答するMIDIチャンネルを示すビットマスク(各bitが1チャンネル)。
dwSupport	DWORD	4	+48	+48	サポートする機能を示すビットフラグ(MIDICAPS_*)。
ManufacturerGuid	GUID	16	+52	+52	製造元を一意に識別するGUID。
ProductGuid	GUID	16	+68	+68	製品を一意に識別するGUID。
NameGuid	GUID	16	+84	+84	製品名文字列リソースを識別するGUID。

各言語での定義

#include <windows.h>

// MIDIOUTCAPS2A  (x64 100 / x86 100 バイト)
#pragma pack(push, 1)
typedef struct MIDIOUTCAPS2A {
    WORD wMid;
    WORD wPid;
    DWORD vDriverVersion;
    CHAR szPname[32];
    WORD wTechnology;
    WORD wVoices;
    WORD wNotes;
    WORD wChannelMask;
    DWORD dwSupport;
    GUID ManufacturerGuid;
    GUID ProductGuid;
    GUID NameGuid;
} MIDIOUTCAPS2A;
#pragma pack(pop)

using System;
using System.Runtime.InteropServices;

[StructLayout(LayoutKind.Sequential, Pack = 1, CharSet = CharSet.Unicode)]
public struct MIDIOUTCAPS2A
{
    public ushort wMid;
    public ushort wPid;
    public uint vDriverVersion;
    [MarshalAs(UnmanagedType.ByValArray, SizeConst = 32)] public sbyte[] szPname;
    public ushort wTechnology;
    public ushort wVoices;
    public ushort wNotes;
    public ushort wChannelMask;
    public uint dwSupport;
    public Guid ManufacturerGuid;
    public Guid ProductGuid;
    public Guid NameGuid;
}

Imports System.Runtime.InteropServices

<StructLayout(LayoutKind.Sequential, Pack:=1, CharSet:=CharSet.Unicode)>
Public Structure MIDIOUTCAPS2A
    Public wMid As UShort
    Public wPid As UShort
    Public vDriverVersion As UInteger
    <MarshalAs(UnmanagedType.ByValArray, SizeConst:=32)> Public szPname() As SByte
    Public wTechnology As UShort
    Public wVoices As UShort
    Public wNotes As UShort
    Public wChannelMask As UShort
    Public dwSupport As UInteger
    Public ManufacturerGuid As Guid
    Public ProductGuid As Guid
    Public NameGuid As Guid
End Structure

import ctypes
from ctypes import wintypes

class MIDIOUTCAPS2A(ctypes.Structure):
    _pack_ = 1
    _fields_ = [
        ("wMid", ctypes.c_ushort),
        ("wPid", ctypes.c_ushort),
        ("vDriverVersion", wintypes.DWORD),
        ("szPname", ctypes.c_byte * 32),
        ("wTechnology", ctypes.c_ushort),
        ("wVoices", ctypes.c_ushort),
        ("wNotes", ctypes.c_ushort),
        ("wChannelMask", ctypes.c_ushort),
        ("dwSupport", wintypes.DWORD),
        ("ManufacturerGuid", GUID),
        ("ProductGuid", GUID),
        ("NameGuid", GUID),
    ]

#[repr(C, packed(1))]
pub struct MIDIOUTCAPS2A {
    pub wMid: u16,
    pub wPid: u16,
    pub vDriverVersion: u32,
    pub szPname: [i8; 32],
    pub wTechnology: u16,
    pub wVoices: u16,
    pub wNotes: u16,
    pub wChannelMask: u16,
    pub dwSupport: u32,
    pub ManufacturerGuid: GUID,
    pub ProductGuid: GUID,
    pub NameGuid: GUID,
}

import "golang.org/x/sys/windows"

type MIDIOUTCAPS2A struct {
	wMid uint16
	wPid uint16
	vDriverVersion uint32
	szPname [32]int8
	wTechnology uint16
	wVoices uint16
	wNotes uint16
	wChannelMask uint16
	dwSupport uint32
	ManufacturerGuid windows.GUID
	ProductGuid windows.GUID
	NameGuid windows.GUID
}

type
  MIDIOUTCAPS2A = packed record
    wMid: Word;
    wPid: Word;
    vDriverVersion: DWORD;
    szPname: array[0..31] of Shortint;
    wTechnology: Word;
    wVoices: Word;
    wNotes: Word;
    wChannelMask: Word;
    dwSupport: DWORD;
    ManufacturerGuid: TGUID;
    ProductGuid: TGUID;
    NameGuid: TGUID;
  end;

const MIDIOUTCAPS2A = extern struct {
    wMid: u16,
    wPid: u16,
    vDriverVersion: u32,
    szPname: [32]i8,
    wTechnology: u16,
    wVoices: u16,
    wNotes: u16,
    wChannelMask: u16,
    dwSupport: u32,
    ManufacturerGuid: GUID,
    ProductGuid: GUID,
    NameGuid: GUID,
};

type
  MIDIOUTCAPS2A {.packed.} = object
    wMid: uint16
    wPid: uint16
    vDriverVersion: uint32
    szPname: array[32, int8]
    wTechnology: uint16
    wVoices: uint16
    wNotes: uint16
    wChannelMask: uint16
    dwSupport: uint32
    ManufacturerGuid: GUID
    ProductGuid: GUID
    NameGuid: GUID

align(1)
struct MIDIOUTCAPS2A
{
    ushort wMid;
    ushort wPid;
    uint vDriverVersion;
    byte[32] szPname;
    ushort wTechnology;
    ushort wVoices;
    ushort wNotes;
    ushort wChannelMask;
    uint dwSupport;
    GUID ManufacturerGuid;
    GUID ProductGuid;
    GUID NameGuid;
}

HSP用定義

HSP3.7/3.8 は構造体機能が無いため4byte整数配列(dim)+peek/poke で操作(32/64bitでサイズ・位置が異なる場合はタブで分割)。IronHSP は NSTRUCT(#defstruct/stdim/->)で32/64bit共通。

; HSP3.7/3.8 は構造体機能が無いため、4byte整数の配列変数で操作します。(x64 レイアウト)
; MIDIOUTCAPS2A サイズ: 100 バイト(x64)
dim st, 25    ; 4byte整数×25(構造体サイズ 100 / 4 切り上げ)
; wMid : WORD (+0, 2byte)  wpoke st,0,値  /  値 = wpeek(st,0)
; wPid : WORD (+2, 2byte)  wpoke st,2,値  /  値 = wpeek(st,2)
; vDriverVersion : DWORD (+4, 4byte)  st.1 = 値  /  値 = st.1   (lpoke/lpeek も可)
; szPname : CHAR (+8, 32byte)  varptr(st)+8 を基点に操作(32byte:入れ子/配列)
; wTechnology : WORD (+40, 2byte)  wpoke st,40,値  /  値 = wpeek(st,40)
; wVoices : WORD (+42, 2byte)  wpoke st,42,値  /  値 = wpeek(st,42)
; wNotes : WORD (+44, 2byte)  wpoke st,44,値  /  値 = wpeek(st,44)
; wChannelMask : WORD (+46, 2byte)  wpoke st,46,値  /  値 = wpeek(st,46)
; dwSupport : DWORD (+48, 4byte)  st.12 = 値  /  値 = st.12   (lpoke/lpeek も可)
; ManufacturerGuid : GUID (+52, 16byte)  varptr(st)+52 を基点に操作(16byte:入れ子/配列)
; ProductGuid : GUID (+68, 16byte)  varptr(st)+68 を基点に操作(16byte:入れ子/配列)
; NameGuid : GUID (+84, 16byte)  varptr(st)+84 を基点に操作(16byte:入れ子/配列)
; ※4byte境界の整数は添字 st.N(N=オフセット/4)で読み書き可。それ以外は peek/poke 系を使用。

; IronHSP は NSTRUCT(構造体)をサポート。32bit/64bit どちらでも同じコードで動作します。
; ※GUID・入れ子構造体はデフォルト型でないため、依存する #defstruct を先に定義(下記に同梱)。
#defstruct global GUID, pack=1
    #field int Data1
    #field short Data2
    #field short Data3
    #field byte Data4 8
#endstruct

#defstruct global MIDIOUTCAPS2A, pack=1
    #field short wMid
    #field short wPid
    #field int vDriverVersion
    #field byte szPname 32
    #field short wTechnology
    #field short wVoices
    #field short wNotes
    #field short wChannelMask
    #field int dwSupport
    #field GUID ManufacturerGuid
    #field GUID ProductGuid
    #field GUID NameGuid
#endstruct

stdim st, MIDIOUTCAPS2A        ; NSTRUCT 変数を確保
st->wMid = 100
mes "wMid=" + st->wMid

MIDIOUTCAPS2A

フィールド

各言語での定義

HSP用 定義

HSP用定義