I don't think there is. The best way to make friends is via a hobby, then at least you share one common interest with someone. I race R/C touring cars and buggys at a club every week and i've met quite a few people. Getting a job helps too, I met my best mate through work.