hspcv
Path : sample\hspcv
cvmatch.hsp
#include "hspcv.as" cvload "bgsamp.jpg",0 cvload "bgparts.jpg",1 cvgetimg 0,1 cvmatch x,y,CV_TM_SQDIFF,1,0 color 255,0,0 cvgetinfo sx, 1, CVOBJ_INFO_SIZEX cvgetinfo sy, 1, CVOBJ_INFO_SIZEY boxf x,y,x+sx,y+1 boxf x,y+sy,x+sx,y+sy+1 boxf x,y,x+1,y+sy
sample\hspcv\cvmatch.hsp - 2007/07/31
facedetect.hsp
title "Face Detect ("+num+")" repeat num cvgetface x,y,sx,sy if stat : break title "( "+x+" , "+y+" ) ( "+sx+" x "+sy+" )" boxf x,y,x+sx,y+1 boxf x,y+sy,x+sx,y+sy+1 boxf x,y,x+1,y+sy boxf x+sx,y,x+sx+1,y+sy loop stop
sample\hspcv\facedetect.hsp - 2007/07/31
loadsave.hsp
#include "hspcv.as" 画像ファイルをロード & JPEG形式でセーブをするスクリプト screen 0,320,100 cls 1 quality=95 objsize 320,24 button "画像ファイルロード",*fload button "JPEG画像セーブ",*fsave button "終了",*owari objsize 80,24 input quality pos 88,76:mes "JPEG画像品質(0-100)" stop *fload
sample\hspcv\loadsave.hsp - 2007/07/31
makeavi.hsp
title "OK" stop
sample\hspcv\makeavi.hsp - 2007/07/31
putimg.hsp
#include "hspcv.as" sname="savetest.jpg" 保存するファイル名 randomize screen 0,640,480 cls 4 repeat 500 hsvcolor rnd(191),128,255 pos rnd(640),rnd(480) mes "★" loop cvbuffer 0,640,480 空のCVバッファを作成 cvputimg 0 HSPの画面をバッファに転送 cvsave sname,0 CVバッファの内容を保存 dialog
sample\hspcv\putimg.hsp - 2007/07/31