feat(dmr): decode independent receiver slices

DMRDecoder.pas

@@ -97,6 +97,7 @@ type
     FWake: PRTLEvent;
     FThread: TDMRDecoderThread;
     FMbe: Pointer;
+    FBindingsLoaded: Boolean;
     FRing: array[0..DMR_RING_SIZE - 1] of Single;
     FReadPos, FWritePos: Integer;
     FDropped: QWord;
@@ -272,7 +273,8 @@ begin
   FStatusLock := TCriticalSection.Create;
   FWake := RTLEventCreate;
   FThread := TDMRDecoderThread.Create(Self);
-  if DMRLoad then FMbe := DMRMbeCreate(3);
+  FBindingsLoaded := DMRLoad;
+  if FBindingsLoaded then FMbe := DMRMbeCreate(3);
   ResetDSP;
   FThread.Start;
 end;
@@ -288,7 +290,11 @@ begin
   end;
   DMRMbeDestroy(FMbe);
   FMbe := nil;
-  DMRUnload;
+  if FBindingsLoaded then
+  begin
+    DMRUnload;
+    FBindingsLoaded := False;
+  end;
   RTLEventDestroy(FWake);
   FStatusLock.Free;
   FDSPLock.Free;