08/11/06 11:41:15 KQG4S5qW0
>>410
>Ifb PEEKCOLOR(500,600) = $ff00ff then //位置と色の指定
orで複数条件を指定する方法
Ifb PEEKCOLOR(500,600) = $ff00ff or _
PEEKCOLOR(500,600) = $ffff00 or _
PEEKCOLOR(500,600) = $00ffff then //位置と色の指定
Resultに判定結果を返す関数を使う方法。関数は自作する。
Ifb IsEndColor(500, 600) then
Function IsEndColor(x, y)
Result = true
Slect PEEKCOLOR(x, y)
case $ff00ff
case $ffff00
case $00ffff
default
Result = false
Selend
FEnd