HSPポータル
サイトマップ お問い合わせ


HSPTV!掲示板


未解決 解決 停止 削除要請

2021
0118
とっしーHSPでPCのカメラを使うにはどうすればいいんですか?11解決


とっしー

リンク

2021/1/18(Mon) 20:47:27|NO.92101

すいません。とっしーです。
PCのカメラを使って、
自分を映し出すには
どうしたらいいんでしょうか。
一応hspcvプログラインでできると思うんですが、
教えてくれる方々がいたらとても助かります。



この記事に返信する


法貴優雅

リンク

2021/1/19(Tue) 18:42:47|NO.92102

初めて利用する方は、HSP3掲示板の使い方をお読みください。
質問をする前に、FAQや過去の発言に同じものがないか調べてみましょう。
質問が解決したスレッドは他の利用者に活用してもらうため、削除しないようお願いします。

過去ログの検索方法
1.記事検索に調べたいキーワードを入力します、今回は「PC カメラ」。
2.ログ:過去ログから検索にチェックを入れます。
3.検索をクリックします。
4.しばらくすると、検索一覧が表示されますので、自分が知りたい内容を探します。
5.それでも見つからない場合は、掲示板で質問を行います。

と言う訳で、検索して出てきた

#include "hspcv.as" onexit *bye ; 終了時の飛び先 cvcapture ; キャプチャ開始準備 repeat ; loopまでを無限ループ cvgetcapture ; 1フレームキャプチャする cvgetimg 0 ; 画面に表示する await 20 ; 一定時間待つ loop ; ループ終了 *bye cvendcapture ; キャプチャ終了 end
でUSBカメラで写すことができるかと思います。
(私の環境では、動作確認できました。)
以上、よろしくお願いいたします。



とっしー

リンク

2021/1/19(Tue) 18:49:06|NO.92105

法貴優雅さん、ありがとうございます。でも
僕のカメラでは画面が真っ黒になってできません。
一応僕のPCはWindows10ですが、環境が違うんじゃないかと思います。



法貴優雅

リンク

2021/1/19(Tue) 19:45:11|NO.92106

過去ログを検索することをお勧めします。
かなり有益な情報がそろっています。

過去ログの検索方法
1.記事検索に調べたいキーワードを入力します、今回は「hspcv カメラ」。
2.ログ:過去ログから検索にチェックを入れます。
3.検索をクリックします。
4.しばらくすると、検索一覧が表示されますので、自分が知りたい内容を探します。
5.それでも見つからない場合は、掲示板で質問を行います。

と言う訳で、検索して出てきた
http://hsp.tv/play/pforum.php?mode=pastwch&num=31392
辺りの記事が参考になると思います。
っていうか10年以上前から変わっていないhspcvにも問題があるような気がしますが。

ちなみに私の環境もWindows10です。



沢渡

リンク

2021/1/19(Tue) 20:04:34|NO.92107

私の環境(ノートPC搭載のカメラ)ではhspcvだとエラーになって実行できませんでしたが、
リンク先のhsphscのBasicSampleなら上手くいきました。

それにしてもhspcv、「環境によってはカメラキャプチャするとブルースクリーンになる」とか
物騒なこと書いてありますね。
ベースとなっているOpenCVのバージョンが古いというのは別件で知っていましたが、
拙作のソフトでもhspcvを使っているので、そろそろアップデートして欲しいものですが。



とっしー

リンク

2021/1/23(Sat) 18:35:56|NO.92139

沢渡さん,法貴優雅さん、ありがとうございます。
ということは、やはりHSPCVが原因だと思います。
研究してみるので、終わり次第、また投稿します。



とっしー

リンク

2021/1/24(Sun) 11:58:02|NO.92144

>>研究が終わりました。
一応hspcv.asには問題がないようです。
アプリの影響では?



?

リンク

2021/1/25(Mon) 23:24:19|NO.92156

どうして似たようなスレが二つもあるのですか??



とっしー

リンク

2021/1/26(Tue) 19:27:35|NO.92160

ちょうど削除したいんですが、(PCのミーティングver.)
記事NO.が分かりません。



ウンチョコレートカカオ

リンク

2021/1/27(Wed) 16:17:54|NO.92164

HSPCVでできるけどクラッシュした思い出がある…。



とっしー

リンク

2021/2/17(Wed) 17:55:21|NO.92283

できました!!今まで協力してくださった皆さん、ありがとうございます。
手順を説明します。
1.https://hsp.moe/#hspdsc
のhspdsc.dllをダウンロードする。
2.そこから"libzbar.as","libzbar-0.dll","libiconv-2.dll","hspdsc.dll","hspdsc.as"
,"color2gray.dll","color2gray.as"を同じフォルダに入れる。
3.下のスプリクトを入力する。


<// hspカメラ表示スプリクト
#include "hspdsc.as"

#include "libzbar.as"
dsc_Init


size = dsc_GetDeviceListSize()
if size <= 0 : dialog "サイズ取得エラー" : end
sdim devlist, size
dsc_GetDeviceList devlist
if stat == 0 : dialog "デバイスが見つかりません" : end
dsc_GetDeviceList devlist
id=0

dsc_SetActiveSel 0

dsc_Open id, 0, 0, 0, 0
if stat < 0 : dialog "エラーが発生しました\nstat = " + stat, 1, "DEVICE-ERROR" : stop
gsel 0, 1

dsc_Play2



repeat

wait 12

sdim dibdata, dsc_GetImageMemSize(0)
sdim dibhead, dsc_GetImageMemSize(1)
dibsize = dsc_GetImageMemSize(0)

dsc_GetImageMem dibdata, dibsize, dibhead
x = lpeek(dibhead, 4)
y = lpeek(dibhead, 8)

GetBarCodeStart dibdata, x, y
n = stat
if n <= 0 : continue

repeat n
GetBarCodeData cnt, buf
iTyp = stat
if iTyp == 10 || iTyp == 14 {
GetBarCodeType iTyp
dialog ""+refstr+"\n"+buf
}
loop

BarCodeDestroy

loop
stop>



とっしーの父

リンク

2021/4/25(Sun) 09:32:08|NO.92660

ご質問に答えていただいた方々、ありがとうございました。
息子(小学生)がHSPに取り組んでいて、親の知らぬところで
質問をさせて頂いたようです。(父は素人です・・)
また困った際に相談させて頂きます。よろしくお願いします。



記事削除

記事NO.パスワード
(質問が解決したスレッドは他の利用者に活用してもらうため、削除しないようお願いします)

NO.92101への返信

マスコット

好きなマスコットを選んでください。

名前

e-mail
HOME
  1. 初めて利用する方は、HSP3掲示板の使い方をお読みください。
  2. 不要部分の多い長いスクリプトの投稿は ご遠慮ください。
  3. 書き込みは自動改行されません。適度に改行を入れてください。
  4. スクリプトは小文字の<pre>〜</pre>で囲むと見やすく表示できます。

削除用パスワード

解決したら質問者本人がここをチェックしてください。

エラー発生時、再送信すると二重送信になることがあります。
回答が得られたら、お礼書き込み時に[解決]チェックしてください。
SPAM防止のためURLから始まる文章は投稿できません。
SPAM防止のため英文字のみの本文を投稿することはできません。

ONION software Copyright 1997-2021(c) All rights reserved.