I came up with this<br><br>(define turn-off-red (lambda(traffic-light)<br>                   (overlay/xy (overlay/xy  LIGHT-FRAME 0 0 traffic-light) 0 (- OFFSET) (circle RADIUS &#39;solid &#39;white)) ))<br><br>(turn-off-red (overlay/xy (overlay/xy (overlay/xy LIGHT-FRAME 0 OFFSET GREEN )<br>
                          0 0 (circle RADIUS &#39;outline &#39;white))<br>              0 (- OFFSET) RED ))<br>(define traffic-light (overlay/xy (overlay/xy (overlay/xy LIGHT-FRAME 0 OFFSET GREEN )<br>                          0 0 (circle RADIUS &#39;outline &#39;white))<br>
              0 (- OFFSET) RED ))<br><br>traffic-light<br><br>(turn-off-red ALL-THREE-ON)<br><br>ALL-THREE-ON<br><br>I think i got this now.<br><br>Aditya<br><br><br>