proc yes(question: string): bool =
  echo question, " (はい/いいえ)"
  while true:
    case readLine(stdin)
    of "はい", "そうです", "可", "〇": return true
    of "いいえ", "ちがいます", "不可", "×": return false
    else: echo "「はい」か「いいえ」で明確に答えてください"
 
if yes("全ての君の重要なファイルを消そうか？"):
  echo "デイブ、申し訳ない。私には出来ない。"
else:
  echo "君も私と同じくらい、なにが問題かわかっているようだね。"

cHJvYyB5ZXMocXVlc3Rpb246IHN0cmluZyk6IGJvb2wgPQogIGVjaG8gcXVlc3Rpb24sICIgKOOBr+OBhC/jgYTjgYTjgYgpIgogIHdoaWxlIHRydWU6CiAgICBjYXNlIHJlYWRMaW5lKHN0ZGluKQogICAgb2YgIuOBr+OBhCIsICLjgZ3jgYbjgafjgZkiLCAi5Y+vIiwgIuOAhyI6IHJldHVybiB0cnVlCiAgICBvZiAi44GE44GE44GIIiwgIuOBoeOBjOOBhOOBvuOBmSIsICLkuI3lj68iLCAiw5ciOiByZXR1cm4gZmFsc2UKICAgIGVsc2U6IGVjaG8gIuOAjOOBr+OBhOOAjeOBi+OAjOOBhOOBhOOBiOOAjeOBp+aYjueiuuOBq+etlOOBiOOBpuOBj+OBoOOBleOBhCIKCmlmIHllcygi5YWo44Gm44Gu5ZCb44Gu6YeN6KaB44Gq44OV44Kh44Kk44Or44KS5raI44Gd44GG44GL77yfIik6CiAgZWNobyAi44OH44Kk44OW44CB55Sz44GX6Kiz44Gq44GE44CC56eB44Gr44Gv5Ye65p2l44Gq44GE44CCIgplbHNlOgogIGVjaG8gIuWQm+OCguengeOBqOWQjOOBmOOBj+OCieOBhOOAgeOBquOBq+OBjOWVj+mhjOOBi+OCj+OBi+OBo+OBpuOBhOOCi+OCiOOBhuOBoOOBreOAgiI=

44Gv44GE

はい