Mouse.new

SUB new ( Picture AS Picture [ , X AS Integer , Y AS Integer ] )