如何使用幀計數器使球拍圖像閃爍？

Question

下面的過程是在一個模擬飛行器的雷達模擬器中，它顯示的物體以橢圓形的形式鎖定在您的飛機上，我們需要讓橢圓閃爍（週期性出現並重新出現）。使用框架計數器，或者不使用框架計數器如何編寫腳本？

(define rwr-tracking 
    (let ([p (new dc-path%)]) 
    (send p ellipse 0 0 400 400) 
    p) 
) 

Answer 1

下面是一個例子，讓你開始：

#lang racket 
(define (redraw-radar) 
    (sleep 0.5) ; 0.5 seconds 
    (displayln "Drawing") 
    (flush-output) 
    (redraw-radar)) 

(thread redraw-radar) 

一個新的線程創建重繪。 線程等待，重繪和循環。