A Lazarus (Free Pascal) implementation of the BitGrid simulator