(define mouse-x
  (lambda (l r i t) 
    (make-rsce-ugen "MouseX" 0 (list l r i t) #f 1 nil-id)))

(define mouse-y
  (lambda (l r i t) 
    (make-rsce-ugen "MouseY" 0 (list l r i t) #f 1 nil-id)))