delphi demo。
uses
DCPconst in '..\dcpcrypt2-2010\DCPconst.pas',
DCPsha256 in '..\dcpcrypt2-2010\Hashes\DCPsha256.pas',
DCPbase64 in '..\dcpcrypt2-2010\DCPbase64.pas',
DCPcrypt2 in '..\dcpcrypt2-2010\DCPcrypt2.pas',
https://rosettacode.org/wiki/Bitcoin/address_validation#Delphi