Who is the writer for the episode with the most 10 star votes?
writer refers to role = 'Writer'; most 10 star votes refers to max(votes) where stars = 10
SELECT T1.person FROM Credit AS T1 INNER JOIN Vote AS T2 ON T1.episode_id = T2.episode_id WHERE T1.role = 'Writer' AND T2.stars = 10 GROUP BY T1.person ORDER BY COUNT(*) DESC LIMIT 1;