Ein "Quadrat" als Ende eines Beispiels

Hallo, Zusammen!!

Jetzt bin auf eine neue Herausforderung gestoßen. In meiner Arbeit gibt es viele Bemerkungen und Beispiele. Man sieht aber schlecht, wann eine Bemerkung sich endet. Ich möchte nicht die Abstände vor und nach der Bermerkung vergrößern und nicht das Text neigen, sondern nur am Ende der Bemerkung oder des Beispiels ein kleines Quadrat $\Box$¹ so wie in proof¹ Umgebung haben und zwar rechtsbündig in einer neue Zeile.
Die Frage ist: kann man es durch \newtheoremstyle¹ erreichen?
Hier ist ein beispiel:¹

\documentclass[a4paper,12pt,titlepage,onesite,openany,numbers=noenddot]{scrbook}
 
\usepackage[T1]{fontenc}
\usepackage[latin1]{inputenc} % direkte Eingabe von Umlauten
\usepackage[ngerman]{babel}
\usepackage{marvosym}
\usepackage{amsmath}
\usepackage{amssymb}
\usepackage{amsthm}
 
\newtheoremstyle{beispiel}
{6pt}
{6pt}
{}
{}
{\bfseries}
{}
{ }
{}
\theoremstyle{beispiel}
\newtheorem{Bem}{Bemerkung}[chapter]
\newtheorem{Bsp}[Bem]{Beispiel}
 
\begin{document}
\begin{Bem}[ohne Quadrat] BlaBlaBlaBla\\
BlaBlaBlaBla\\
\end{Bem}
 
\begin{Bsp}[mit Quadrat] BlaBlaBla \\
BlaBlaBlaBla\\
 
\raggedleft{$\Box$}
\end{Bsp}
\end{document}

1  [Admin-Edit]: <code>…</code> eingefügt. Bitte künftig selbst beachten!
+  Verschoben, da kein Zusammenhang mit KOMA-Script erkennbar.