diff --git a/upptst/HDPrompt/HDPrompt.upp b/upptst/HDPrompt/HDPrompt.upp
new file mode 100644
index 000000000..5872304d3
--- /dev/null
+++ b/upptst/HDPrompt/HDPrompt.upp
@@ -0,0 +1,9 @@
+uses
+	CtrlLib;
+
+file
+	main.cpp;
+
+mainconfig
+	"" = "GUI";
+
diff --git a/upptst/HDPrompt/init b/upptst/HDPrompt/init
new file mode 100644
index 000000000..d453c5900
--- /dev/null
+++ b/upptst/HDPrompt/init
@@ -0,0 +1,4 @@
+#ifndef _HDPrompt_icpp_init_stub
+#define _HDPrompt_icpp_init_stub
+#include "CtrlLib/init"
+#endif
diff --git a/upptst/HDPrompt/main.cpp b/upptst/HDPrompt/main.cpp
new file mode 100644
index 000000000..3eff5ec75
--- /dev/null
+++ b/upptst/HDPrompt/main.cpp
@@ -0,0 +1,10 @@
+#include <CtrlLib/CtrlLib.h>
+
+using namespace Upp;
+
+GUI_APP_MAIN
+{
+	Ctrl::SetHiDPIEnabled();
+	PromptOK("This is a very long line in PromptOK, line1 line2 line3 line4 line5 line6 line7 "
+	         "line8 line9 line10 eol11 line12 line13");
+}