num = msgbox("学校は楽しいですか。",4,"質問")
if (num = 6) then
  msgbox("よかったですね。(#^.^#)")
else
  msgbox("残念ですね(-.-)")
end if