|
ｿｽ@ｿｽｿｽｿｽｿｽｿｽﾊ抵ｿｽｿｽｿｽ
|
ｿｽgｿｽbｿｽvｿｽyｿｽ[ｿｽWｿｽｿｽ
ｿｽeｿｽｿｽｿｽｿｽﾌ過具ｿｽｿｽｿｽｿｽO
ｿｽEC/C++
ｿｽEDelphi
ｿｽEVisual BasicｿｽｿｽｿｽSｿｽｿｽ
ｿｽ@(VB2-VB6ｿｽｿｽ.NETｿｽｿｽｿｽp)
ｿｽEVisual Basic(VB2-VB6)
ｿｽEVisual Basic .NET
ｿｽEVisual C++
ｿｽﾖ連ｿｽTｿｽCｿｽg
ｿｽEpapy's softwarelibrary
Fusa 2009/11/29(ｿｽｿｽ) 13:54:19
ｿｽｿｽｿｽｿｽﾉゑｿｽｿｽﾍ。
ｿｽｿｽｿｽﾊを調節ゑｿｽｿｽｿｽｿｽｿｽｿｽﾆ思ｿｽｿｽ
ｿｽｿｽｿｽﾗてみゑｿｽｿｽﾌでゑｿｽｿｽｿｽ
Vivasoft - Delphi
http://www.terra.dti.ne.jp/‾vivas/delphi/index.html#TMixer
ｿｽｿｽｿｽｿｽｿｽｿｽﾌプｿｽｿｽｿｽOｿｽｿｽｿｽｿｽｿｽｿｽWindowsXPｿｽﾅなゑｿｽ
ｿｽｿｽｿｽﾊ抵ｿｽｿｽﾟゑｿｽｿｽﾅゑｿｽｿｽAｿｽ‾ｿｽｿｽｿｽ[ｿｽgON/OFFｿｽｿｽﾅゑｿｽｿｽ驍ｱｿｽﾆゑｿｽｿｽかｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽ
WindowsVistaｿｽﾅは難ｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽB
ｿｽﾜゑｿｽｿｽAｿｽgｿｽｿｽｿｽｿｽｿｽ閧ｪｿｽｿｽｿｽﾈゑｿｽしｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB
ｿｽfｿｽoｿｽCｿｽXｿｽｿｽｿｽﾆの会ｿｽｿｽﾊの抵ｿｽｿｽﾟは必ｿｽvｿｽﾈゑｿｽｿｽﾌゑｿｽ
WindowsXPｿｽﾅゑｿｽAWindowsVistaｿｽﾅゑｿｽ
ｿｽPｿｽﾉ、ｿｽｿｽｿｽﾊの上下ｿｽﾆミｿｽｿｽｿｽ[ｿｽgｿｽｿｽON/OFFｿｽｿｽsｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ
ｿｽｿｽｿｽｿｽｿｽmｿｽﾌ包ｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽｿｽAｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽB
ｿｽｿｽしｿｽｿｽｿｽｿｽｿｽ閧｢ｿｽｿｽｿｽﾜゑｿｽｿｽB
monaa 2009/11/29(ｿｽｿｽ) 16:28:03
ｿｽｿｽｿｽｿｽｿｽRｿｽｿｽｿｽ|ｿｽ[ｿｽlｿｽｿｽｿｽgｿｽﾉバｿｽOｿｽｿｽｿｽｿｽｿｽｿｽじゑｿｽﾈゑｿｽｿｽﾅゑｿｽｿｽｿｽｿｽﾋ？
ｿｽﾆ鯉ｿｽｿｽﾄなゑｿｽｿｽRｿｽｿｽｿｽ|ｿｽ[ｿｽlｿｽｿｽｿｽgｿｽﾌ指ｿｽEｿｽｿｽｿｽｿｽﾄみゑｿｽB
http://hp.vector.co.jp/authors/VA016117/winsdk.html
ｿｽ‾ｿｽLｿｽTｿｽ[ｿｽ@ｿｽｿｽｿｽﾌ１ｿｽiｿｽｿｽｿｽﾊの抵ｿｽｿｽﾟ）
ｿｽ‾ｿｽLｿｽTｿｽ[ｿｽ@ｿｽｿｽｿｽﾌ２ｿｽiｿｽ‾ｿｽｿｽｿｽ[ｿｽgｿｽj
Vistaｿｽﾈ降ｿｽﾌ抵ｿｽｿｽｿｽ
http://data.blogdns.net/blog/2007/12/core-audio-api.html
Fusa 2009/11/29(ｿｽｿｽ) 16:57:18
ｿｽﾈゑｿｽﾙど、ｿｽoｿｽOｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽ
Vistaｿｽﾅは鯉ｿｽｿｽｿｽｿｽﾉなゑｿｽｿｽｿｽｿｽﾌで難ｿｽｿｽｿｽｿｽﾈゑｿｽｿｽﾆ。
ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽRｿｽﾈゑｿｽﾅゑｿｽｿｽﾋ。
ｿｽｿｽｿｽﾗてみまゑｿｽｿｽB
ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽﾇゑｿｽﾂゑｿｽｿｽﾄゑｿｽｿｽﾈゑｿｽｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽBｿｽｿｽｿｽ閧ｪｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽEｿｽｿｽｿｽﾌソｿｽｿｽ 2009/11/29(ｿｽｿｽ) 20:19:46
ｿｽtｿｽqｿｽFｿｽuXPｿｽﾈゑｿｽmixerAPIｿｽﾅボｿｽｿｽｿｽｿｽｿｽ[ｿｽｿｽｿｽﾌ抵ｿｽｿｽｿｽｿｽﾅゑｿｽｿｽ驍ｯｿｽﾇね、VISTAｿｽﾍダｿｽｿｽｿｽｿｽｿｽﾆ思ｿｽｿｽｿｽｿｽv
ｿｽ^ｿｽﾕ：ｿｽuｿｽﾓ〜ｿｽｿｽAｿｽｿｽｿｽｿｽｿｽﾈの？ｿｽv
ｿｽtｿｽqｿｽFｿｽuｿｽｿｽｿｽｿｽｿｽAVISTAｿｽｿｽCOMｿｽﾅゑｿｽｿｽﾝゑｿｽｿｽｿｽｿｽAｿｽｿｽｿｽｿｽﾈカｿｽｿｽｿｽWｿｽﾈのゑｿｽｿｽﾈ？ ｿｽｿｽｿｽｿｽｿｽﾄなゑｿｽｿｽｿｽｿｽ邇趣ｿｽｿｽｿｽﾈゑｿｽｿｽｿｽｿｽﾇ」
...........
var
Form1: TForm1;
implementation
{$R *.DFM}
uses
ActiveX, MMDevAPI;
var
AudioEndpointVolume: IAudioEndpointVolume = nil;
procedure TForm1.FormCreate(Sender: TObject);
var
mmDeviceEnumerator: IMMDeviceEnumerator;
mmDevice: IMMDevice;
begin
CoCreateInstance(CLASS_IMMDeviceEnumerator, nil, CLSCTX_INPROC_SERVER, IID_IMMDeviceEnumerator, mmDeviceEnumerator);
if mmDeviceEnumerator = nil then exit;
mmDeviceEnumerator.GetDefaultAudioEndpoint(ERender, EConsole, mmDevice);
mmDevice.Activate(IID_IAudioEndpointVolume, CLSCTX_INPROC_SERVER, nil, AudioEndpointVolume);
end;
procedure TForm1.Button1Click(Sender: TObject);
var
Volume: Single;
begin
if AudioEndpointVolume = nil then exit;
Volume := 0.3;
AudioEndpointVolume.SetMasterVolumeLevelScalar(Volume, nil);
end;
end.
-----------------------------------------------------------------
unit MMDevAPI;
interface
uses
Windows, ActiveX, ComObj;
const
CLASS_IMMDeviceEnumerator : TGUID = '{BCDE0395-E52F-467C-8E3D-C4579291692E}';
IID_IMMDeviceEnumerator : TGUID = '{A95664D2-9614-4F35-A746-DE8DB63617E6}';
IID_IMMDevice : TGUID = '{D666063F-1587-4E43-81F1-B948E807363F}';
IID_IMMDeviceCollection : TGUID = '{0BD7A1BE-7A1A-44DB-8397-CC5392387B5E}';
IID_IAudioEndpointVolume : TGUID = '{5CDF2C82-841E-4546-9722-0CF74078229A}';
IID_IAudioMeterInformation : TGUID = '{C02216F6-8C67-4B5B-9D00-D008E73E0064}';
IID_IAudioEndpointVolumeCallback : TGUID = '{657804FA-D6AD-4496-8A60-352752AF4F89}';
DEVICE_STATE_ACTIVE = $00000001;
DEVICE_STATE_UNPLUGGED = $00000002;
DEVICE_STATE_NOTPRESENT = $00000004;
DEVICE_STATEMASK_ALL = $00000007;
type
EDataFlow = TOleEnum;
const
ERender = $00000000;
ECapture = $00000001;
EAll = $00000002;
EDataFlow_enum_count = $00000003;
type
ERole = TOleEnum;
const
EConsole = $00000000;
EMultimedia = $00000001;
ECommunications = $00000002;
ERole_enum_count = $00000003;
type
IAudioEndpointVolumeCallback = interface(IUnknown)
['{657804FA-D6AD-4496-8A60-352752AF4F89}']
end;
IAudioEndpointVolume = interface(IUnknown)
['{5CDF2C82-841E-4546-9722-0CF74078229A}']
function RegisterControlChangeNotify(AudioEndPtVol: IAudioEndpointVolumeCallback): Integer; stdcall;
function UnregisterControlChangeNotify(AudioEndPtVol: IAudioEndpointVolumeCallback): Integer; stdcall;
function GetChannelCount(out PInteger): Integer; stdcall;
function SetMasterVolumeLevel(fLevelDB: single; pguidEventContext: PGUID): Integer; stdcall;
function SetMasterVolumeLevelScalar(fLevelDB: single; pguidEventContext: PGUID): Integer; stdcall;
function GetMasterVolumeLevel(out fLevelDB: single): Integer; stdcall;
function GetMasterVolumeLevelScaler(out fLevelDB: single): Integer; stdcall;
function SetChannelVolumeLevel(nChannel: Integer; fLevelDB: Double; pguidEventContext: PGUID): Integer; stdcall;
function SetChannelVolumeLevelScalar(nChannel: Integer; fLevelDB: Double; pguidEventContext: PGUID): Integer; stdcall;
function GetChannelVolumeLevel(nChannel: Integer; out fLevelDB: Double): Integer; stdcall;
function GetChannelVolumeLevelScalar(nChannel: Integer; out fLevel: Double): Integer; stdcall;
function SetMute(bMute: Boolean; pguidEventContext: PGUID): Integer; stdcall;
function GetMute(out bMute: Boolean): Integer; stdcall;
function GetVolumeStepInfo(pnStep: Integer; out pnStepCount: Integer): Integer; stdcall;
function VolumeStepUp(pguidEventContext: PGUID): Integer; stdcall;
function VolumeStepDown(pguidEventContext: PGUID): Integer; stdcall;
function QueryHardwareSupport(out pdwHardwareSupportMask): Integer; stdcall;
function GetVolumeRange(out pflVolumeMindB: Double; out pflVolumeMaxdB: Double; out pflVolumeIncrementdB: Double): Integer; stdcall;
end;
IAudioMeterInformation = interface(IUnknown)
['{C02216F6-8C67-4B5B-9D00-D008E73E0064}']
end;
IPropertyStore = interface(IUnknown)
end;
type
IMMDevice = interface(IUnknown)
['{D666063F-1587-4E43-81F1-B948E807363F}']
function Activate(const refId: TGUID;
dwClsCtx: DWORD;
pActivationParams: PInteger;
out pEndpointVolume: IAudioEndpointVolume): Hresult; stdcall;
function OpenPropertyStore(stgmAccess: DWORD; out ppProperties: IPropertyStore): Hresult; stdcall;
function GetId(out ppstrId: PLPWSTR): Hresult; stdcall;
function GetState(out State: Integer): Hresult; stdcall;
end;
IMMDeviceCollection = interface(IUnknown)
['{0BD7A1BE-7A1A-44DB-8397-CC5392387B5E}']
end;
IMMNotificationClient = interface(IUnknown)
['{7991EEC9-7E89-4D85-8390-6C703CEC60C0}']
end;
IMMDeviceEnumerator = interface(IUnknown)
['{A95664D2-9614-4F35-A746-DE8DB63617E6}']
function EnumAudioEndpoints(dataFlow: EDataFlow; deviceState: SYSUINT; DevCollection: IMMDeviceCollection): Hresult; stdcall;
function GetDefaultAudioEndpoint(EDF: SYSUINT; ER: SYSUINT; out Dev: IMMDevice ): Hresult; stdcall;
function GetDevice(pwstrId: pointer; out Dev: IMMDevice): HResult; stdcall;
function RegisterEndpointNotificationCallback(pClient: IMMNotificationClient): Hresult; stdcall;
end;
implementation
end.
ｿｽ^ｿｽﾕ：ｿｽuｿｽｿｽｿｽcｿｽｿｽｿｽｿｽｿｽﾈの…ｿｽv
ｿｽtｿｽqｿｽFｿｽuｿｽｿｽH ｿｽ}ｿｽRｿｽgｿｽH ｿｽiｿｽｿｽｿｽｿｽｿｽEｿｽｿｽｿｽﾌソｿｽｿｽｿｽｿｽｿｽﾄカｿｽｿｽｿｽWｿｽﾋ、ｿｽﾇゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾌ？ｿｽv
ｿｽ^ｿｽﾕ：ｿｽuｿｽAｿｽ^ｿｽVｿｽAｿｽｿｽｿｽｿｽｿｽｿｽﾇゑｿｽｿｽじｿｽｿｽﾈゑｿｽｿｽﾄ…ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽが趣ｿｽｿｽじゃうｿｽｿｽｿｽｿｽcｿｽiｿｽｿｽｿｽﾆゑｿｽｿｽｿｽｿｽﾈゑｿｽｿｽﾆ…ｿｽv
ｿｽtｿｽqｿｽFｿｽuｿｽｿｽｿｽｿｽｿｽH ｿｽﾋ然ｿｽiｿｽjｿｽｿｽｿｽｿｽｿｽoｿｽｿｽｿｽﾌ？ ｿｽ}ｿｽRｿｽgｿｽAｿｽﾇゑｿｽｿｽｿｽｿｽｿｽｿｽRｿｽgｿｽHｿｽv
ｿｽ^ｿｽﾕ：ｿｽuｿｽAｿｽ^ｿｽVｿｽAｿｽｿｽｿｽｿｽﾝゑｿｽｿｽﾌ、ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾍ台風ｿｽｿｽｿｽﾟづゑｿｽｿｽｿｽｿｽCｿｽﾅサｿｽ[ｿｽtｿｽBｿｽｿｽｿｽｿｽｿｽｿｽﾂゑｿｽｿｽcｿｽｿｽｿｽｿｽﾅ…ｿｽv
ｿｽtｿｽqｿｽFｿｽuｿｽ}ｿｽRｿｽgｿｽAｿｽ苺暦ｿｽﾈんか暦ｿｽｿｽﾄなゑｿｽｿｽｿｽAｿｽｿｽｿｽｿｽﾉマｿｽTｿｽｿｽｿｽｿｽｿｽｿｽﾍサｿｽ[ｿｽtｿｽBｿｽｿｽｿｽﾈんか…ｿｽv
ｿｽ^ｿｽﾕ：ｿｽuｿｽnｿｽｿｽｿｽRｿｽｿｽｿｽｿｽAｿｽAｿｽ^ｿｽVｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽﾌは、ｿｽRｿｽbｿｽ`ｿｽｿｽｿｽｿｽﾈゑｿｽｿｽﾄアｿｽbｿｽ`ｿｽﾌコｿｽgｿｽv
ｿｽtｿｽqｿｽFｿｽuｿｽAｿｽbｿｽ`ｿｽｿｽｿｽﾄ、ｿｽhｿｽbｿｽ`ｿｽH ｿｽcｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽAｿｽｿｽｿｽｿｽｿｽｿｽﾄ厄ｿｽｿｽﾈゑｿｽﾅゑｿｽｿｽｿｽHｿｽv
ｿｽ^ｿｽﾕ：ｿｽuｿｽﾅゑｿｽｿｽｿｽﾅアｿｽ^ｿｽVｿｽﾍアｿｽbｿｽ`ｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽﾌ、ｿｽAｿｽ^ｿｽVｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾈゑｿｽｿｽﾈゑｿｽｿｽﾄ、ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾍ搾ｿｽｿｽｿｽlｿｽﾚゑｿｽｿｽｿｽｿｽcｿｽv
ｿｽtｿｽqｿｽFｿｽuｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄ…ｿｽAｿｽbｿｽ`ｿｽｿｽｿｽﾄ、ｿｽﾈ前ｿｽﾉアｿｽ^ｿｽVｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ4ｿｽNｿｽｿｽﾌコｿｽgｿｽHｿｽv
ｿｽ^ｿｽﾕ：ｿｽuｿｽｿｽｿｽｿｽｿｽAｿｽAｿｽ^ｿｽVｿｽAｿｽｿｽｿｽｿｽｿｽﾍ包ｿｽｿｽｿｽｿｽｿｽﾈゑｿｽｿｽcｿｽｿｽｿｽﾇ、ｿｽｿｽｿｽﾌ厄ｿｽｿｽﾅハｿｽbｿｽLｿｽｿｽｿｽCｿｽtｿｽｿｽｿｽｿｽｿｽﾌ、ｿｽｿｽｿｽｿｽｿｽﾍアｿｽbｿｽ`ｿｽﾆは別の宇ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄコｿｽgｿｽcｿｽAｿｽRｿｽbｿｽ`ｿｽﾌ趣ｿｽｿｽﾔゑｿｽ4ｿｽNｿｽｿｽｿｽ轤｢ｿｽxｿｽｿｽﾄゑｿｽﾌ」
ｿｽtｿｽqｿｽFｿｽuｿｽｿｽｿｽcｿｽｿｽｿｽｿｽｿｽｿｽﾄ…ｿｽｿｽｿｽsｿｽFｿｽｿｽｿｽH ｿｽcｿｽﾅゑｿｽAｿｽﾇゑｿｽｿｽｿｽｿｽﾄ茨ｿｽlｿｽﾚゑｿｽｿｽｿｽｿｽH ｿｽAｿｽbｿｽ`ｿｽﾉはビｿｽ[ｿｽ`ｿｽ{ｿｽ[ｿｽCｿｽYｿｽﾌ難ｿｽlｿｽｿｽｿｽ齒擾ｿｽﾉ具ｿｽｿｽｿｽﾍゑｿｽｿｽﾈのに」
ｿｽ^ｿｽﾕ：ｿｽuｿｽｿｽｿｽｿｽﾈ人ｿｽｿｽｿｽｿｽｿｽﾍ具ｿｽｿｽﾈゑｿｽｿｽｿｽｿｽｿｽｿｽAｿｽcｿｽ竄ｵｿｽｿｽｿｽ紛ゑｿｽすｿｽｿｽｿｽﾟにゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾍサｿｽ[ｿｽtｿｽBｿｽｿｽｿｽｿｽﾜゑｿｽｿｽnｿｽﾟゑｿｽｿｽﾝゑｿｽｿｽｿｽｿｽv
ｿｽtｿｽqｿｽFｿｽuｿｽｿｽｿｽｿｽAｿｽｿｽｿｽｿｽｿｽH ｿｽｿｽｿｽｿｽｿｽﾇ、ｿｽ}ｿｽRｿｽgｿｽｿｽｿｽzｿｽｿｽｿｽgｿｽﾉ行ｿｽｿｽｿｽｿｽｿｽﾌなゑｿｽAｿｽiｿｽｿｽｿｽﾅ撰ｿｽｿｽｿｽｿｽｿｽﾄ止ｿｽﾟゑｿｽｿｽｿｽｿｽﾈゑｿｽｿｽｿｽｿｽｿｽｿｽﾌ？ｿｽv
ｿｽ^ｿｽﾕ：ｿｽuｿｽｿｽｿｽ黷ｪｿｽ_ｿｽｿｽｿｽcｿｽAｿｽAｿｽ^ｿｽVｿｽﾌ体はアｿｽbｿｽ`ｿｽﾉ行ｿｽｿｽｿｽﾄゑｿｽｿｽﾈゑｿｽｿｽAｿｽｿｽｿｽｿｽｿｽｿｽAｿｽ^ｿｽVｿｽﾉ気ｿｽtｿｽｿｽｿｽﾄゑｿｽｿｽｿｽﾈゑｿｽｿｽcｿｽAｿｽnｿｽｿｽｿｽRｿｽｿｽｿｽｿｽAｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽAｿｽﾅゑｿｽﾇゑｿｽｿｽｿｽｿｽｿｽｿｽ轤｢ｿｽｿｽｿｽﾌ？ｿｽv
ｿｽtｿｽqｿｽFｿｽuｿｽｿｽｿｽ`ｿｽｿｽAｿｽｿｽｿｽｿｽｿｽﾈの…ｿｽAｿｽAｿｽbｿｽ`ｿｽﾌ茨ｿｽlｿｽﾚゑｿｽｿｽｿｽｿｽﾌマｿｽTｿｽｿｽｿｽｿｽｿｽが趣ｿｽｿｽﾊゑｿｽｿｽｿｽｿｽｿｽｿｽﾈゑｿｽｿｽH ｿｽcｿｽｿｽｿｽ痰滂ｿｽAｿｽｿｽｿｽﾌ前ｿｽﾉコｿｽbｿｽ`ｿｽﾉ連ｿｽｿｽﾄゑｿｽｿｽｿｽｿｽﾎ…ｿｽv
ｿｽ^ｿｽﾕ：ｿｽuｿｽｿｽｿｽH ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽRｿｽbｿｽ`ｿｽﾉ？ ｿｽnｿｽｿｽｿｽRｿｽｿｽｿｽｿｽAｿｽｿｽｿｽｿｽﾈコｿｽgｿｽoｿｽｿｽｿｽｿｽHｿｽv
ｿｽtｿｽqｿｽFｿｽuｿｽAｿｽ^ｿｽVｿｽｿｽｿｽｿｽｿｽﾅは撰ｿｽﾎに厄ｿｽｿｽｿｽｿｽAｿｽﾅゑｿｽAｿｽ}ｿｽRｿｽgｿｽﾌ力ゑｿｽﾘゑｿｽｿｽﾎ、ｿｽｿｽｿｽ驍｢ｿｽﾍ…ｿｽv
Fusa 2009/12/02(ｿｽｿｽ) 10:23:52
ｿｽEｿｽEｿｽEｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽeｿｽｿｽｿｽｿｽｿｽﾋ・ｿｽEｿｽE
ｿｽﾚ細、ｿｽｿｽｿｽﾗてゑｿｽｿｽ轤ｨｿｽﾔ趣ｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽB
