HSP - Hot Soup Processor [7]
■ このスレッドは過去ログ倉庫に格納されています
0802DtHSPpOH ◆kxrJVlZ8OE
04/07/30 16:26ID:I51/ZfETx=316:y=555
mes "対象のウィンドウをクリックしてください"
repeat
wait 1:stick a:if a&256:break
loop
ginfo:pm=prmx,prmy:dllproc "WindowFromPoint",pm,2,1:mes "hWnd:"+dllret
pm=dllret:dllproc "GetDC",pm,1,1:mes "hdc:"+dllret:hdc=dllret:mref bm,67
repeat
ginfo:x=prmx:y=prmy
color 255,255,255:boxf:color 0,0,0:pos 0,0
repeat 100,1
pget x+cnt, y
if (bval < 150): break
dist++
loop
if dist==0{
repeat 100,1
pget x-cnt, y
if (bval < 150): break
dist--
loop
}
mes "長さ"+dist:pm=hdc,0,0,100,18,bm.4,0,0,0xCC0020
dllproc "BitBlt",pm,9,5:wait 5:dist=0:loop
これで(x,y)を基準としたゲージの長さが分かるはずなんだけどなぁ・・・常に「長さ100」って出る。
1pget 色を拾って
2もしその色の青の輝度が150以下ならloop抜ける。(ゲージは青っぽい色でゲージがない所は黒っぽい色だから)
3右側じゃなければ左側を探す。
4表示
これ間違ってますか?
■ このスレッドは過去ログ倉庫に格納されています