Create codePin.pas