Source position: bd_addr.inc line 14
procedure BD_ADDR(
var bdaddr: _bd_addr;
a: cint;
b: cint;
c: cint;
d: cint;
e: cint;
f: cint
);