How to output messages to the foreground in the background program

We can use the module to implement this function. 1 M @ sndmsgfm
2 Dspsiz ( 24   80   * DS3)
3
4 R dummy1 clrl ( * No) Overlay frcdta
5 R dummy2 assume
6 3   20 '   '
7
8 R drmsg
9 Overlay
10 Clrl ( * No)
11
12 D # msg 70 O 24 2 color (PNK)
13
14 M @ sndmsgpg
15
16 FM @ sndmsgfpvdf e workstn
17 DM @ sndmsgpg PR
18 D p # msg 70 Const
19 DM @ sndmsgpg pi
20 D p # msg 70 Const
21 C
22 C eval D # msg = P # msg
23 C exfmt drmsg
24 C Return

One is a screen file and the other isProgram, Module form
This program can be used by the module to send messages.
You can even expand it into a module to ask for messages and then determine whether to continue the next step.
In fact, the most important thing is dummy1 dummy2.