unit tunn; {$L tunneli.obj} interface procedure tun;far; implementation procedure tun;external; end.