Write SQL query to solve given problem: Among the comedy works of Shakespeare, what is the percentage of his works with a character named "antonio"?. Keep the solution inside sql tag ```sql [SQL-Query] ```
SELECT CAST(SUM(IIF(T4.CharName = 'antonio', 1, 0)) AS REAL) * 100 / COUNT(T1.id) FROM works AS T1 INNER JOIN chapters AS T2 ON T1.id = T2.work_id INNER JOIN paragraphs AS T3 ON T2.id = T3.chapter_id INNER JOIN characters AS T4 ON T3.character_id = T4.id WHERE T1.GenreType = 'Comedy'