Update tpa.pas

nanananana
Merge pull request #236 from masterbb/patch-3

Quick, pull this before anyone notice this :p