not sure what you're expecting from a modal dialog, but it's normal for you to still be able to move/close/minimize the main application window (with whatever is inside). but in any case, it's difficult to make a non-built-in box truly modal directly in TK or any other language.
the hardest line to type correctly is: stty erase ^H