라켓에있는 픽셀의 색상을 결정하는 기능은 무엇입니까?

Question

그래서 어떤 점이있는 픽셀의 색을 결정하는 함수를 만들거나 만들려고합니다. 어떤 아이디어 일지/어떻게 Drracket에서 만들 수 있습니까? 포인트를 이동하는 픽셀의 색상을 찾은 다음 색상이 새로운 것으로 변경되면 색상을 변경하려고합니다.

Answer 1

bitmap-dc은 get-pixel 방법을 갖는다.

Answer 2

big-bang의 on-mouse에서 image-> color-list를 사용하고 list-ref를 사용하여 특정 지점을 얻을 수 있습니다.

(define img (circle 20 'solid 'red)) 
(define width (image-width img)) 
(define height (image-height img)) 
(define (color-indexes l) 
(if (empty? l) empty (cons (take l width) 
          ;r-rest not a function but it drops width items 
          ;from a list.You will have to make that 
          (color-indexes (r-rest l width))))) 
;put this where you want the color 
(list-ref (list-ref (image->color-list) (sub1 x)))(sub1 y)) 

Answer 3

당신이 2htdp/image를 사용하는 경우, 당신은 image->color-list을 사용해야합니다. 그러나이 목록은 x 및 y 좌표로 색상을 표시하지 않습니다. 이미지 너비를 고려하여 목록 내의 픽셀 위치를 계산해야합니다. 반환되는 색상 목록은 맨 위부터 맨 위까지 오른쪽에서부터 시작하여 다음 행을 아래에서 왼쪽에서 오른쪽으로 차례대로 행을 가로 질러 이동합니다. (x,y)에 대한 그 목록에서

(0부터 인덱스의) 위치가 x + width*y, 또는 :

(+ x (* width y)) 

맥락에서

:

;; get-pixel : Image Number Number -> Color 
(define (get-pixel img x y) 
    (list-ref (image->color-list img) 
      (+ x (* (image-width img) y))))