Combate is a project mainly written in Pascal, it's free.

Projeto final de introdução à lógica de programação UFBA