If your code on pascal, don't use "CASE x oF"

it's got CE(Compilation error)