hspdsc

(HSP3) sample [Omake].hsp
/ （おまけ）DirectShow を直接 HSP で取扱ってみるサンプル DirectShow経由でメディアファイルを開きます。 MCIを使ったほうが断然早いような気が…。 でも、対応したデコーダとスプリッタがあれば、FLVだろうとMP4だろうと 取扱えるので便利かもしれない。
sample\hspdsc\(HSP3) sample [Omake].hsp - 2011/09/16

(HSP3) sample1 [BasicSample].hsp
title "DirectShow キャプチャデバイス表示 サンプル(１つのみ) " cls 4 dsc_Init 初期化を必ずする！ バッファのサイズ取得し sdim で 確保 sdim devlist, dsc_GetDeviceListSize() dsc_GetDeviceList devlist 利用可能なデバイス一覧取得 if stat = 0 : dialog "デバイスが見つかりません" : end objsize 300, 20 combox id, 100, devlist
sample\hspdsc\(HSP3) sample1 [BasicSample].hsp - 2011/09/16

(HSP3) sample2 [AllCapture].hsp
title "DirectShow キャプチャデバイス表示 サンプル(デバイスをすべて開く) " cls 4 dsc_Init 初期化を必ずする！ デバイスリスト用の変数を初期化 sdim devname, dsc_GetDeviceListSize() デバイスリストを変数に格納 dsc_GetDeviceList devname, 0 devnum = stat if devnum == 0 || devnum == -2 : dialog "デバイスが見つかりません" : end
sample\hspdsc\(HSP3) sample2 [AllCapture].hsp - 2011/09/16

(HSP3) sample3 [VideoMixing].hsp
title "DirectShow キャプチャデバイス表示 ビデオミキシング" cls 4 dsc_Init 初期化 デバイスリスト用の変数を初期化 sdim devname, dsc_GetDeviceListSize() デバイスリストを変数に格納 dsc_GetDeviceList devname, 0 if stat == 0 || stat == -2 : dialog "デバイスが見つかりません" : end objsize 300, 20 combox id, 100,
sample\hspdsc\(HSP3) sample3 [VideoMixing].hsp - 2011/09/16

(HSP3) sample4 [MonoCapture].hsp
title "DirectShow キャプチャデバイス表示(モノクロキャプチャ)" cls 4 dsc_Init 初期化 デバイスリスト用の変数を初期化 sdim devname, dsc_GetDeviceListSize() デバイスリストを変数に格納 dsc_GetDeviceList devname, 0 if stat == 0 || stat == -2 : dialog "デバイスが見つかりません" : end objsize 300, 20 combox id, 100,
sample\hspdsc\(HSP3) sample4 [MonoCapture].hsp - 2011/09/16

(HSP3) sample5 [AVISave].hsp
title "DirectShow キャプチャデバイス表示(AVIファイルで保存)" cls 4 dsc_Init 初期化 デバイスリスト用の変数を初期化 sdim devlist, dsc_GetDeviceListSize() デバイスリストを変数に格納 dsc_GetDeviceList devlist, 0 if stat == 0 || stat == -2 : dialog "デバイスが見つかりません" : end ビデオコーデックの一覧取得 size =
sample\hspdsc\(HSP3) sample5 [AVISave].hsp - 2011/09/16

(HSP3) sample6 [DeviceCapacity].hsp
title "キャプチャデバイスの能力を表示" cls 4 dsc_Init 初期化 デバイスリスト用の変数を初期化 sdim devlist, dsc_GetDeviceListSize() デバイスリストを変数に格納 dsc_GetDeviceList devlist, 0 if stat == 0 || stat == -2 : dialog "デバイスが見つかりません" : end objsize 300, 20 combox did, 100, devlist objsize
sample\hspdsc\(HSP3) sample6 [DeviceCapacity].hsp - 2011/09/17

(HSP3) sample7 [LogCheck].hsp
title "ログの表示" dsc_Init エラー発生時、通知するウィンドウハンドルを指定 dsc_SetErrorCallbackHwnd hwnd, 0x8765 oncmd gosub *e ,0x8765 sdim log, 4096*10 dsc_SetLogLevel 2 全ログ出力 dsc_SetLogBuffer log, 4096*10 何か実行する sdim devlist, 4096 dsc_GetDeviceList devlist, 0 ログ表示 mesbox
sample\hspdsc\(HSP3) sample7 [LogCheck].hsp - 2011/12/29