10 ! *********************************************************************
20 ! Example: STRING Dialog
30 !
40 ! This program creates a STRING dialog. If you move
50 ! the mouse cursor or tab into the text field below
60 ! the prompt, you can input text into the dialog that
70 ! is returned through the S$ string.
80 !
90 ! ***********************************************
100 !
110 DIM P$[25],S$[50]
120 INTEGER Btn
130 P$="Please enter your name"
140 DIALOG "STRING",P$,Btn;SET ("TITLE":" Example: STRING Dialog"),RETURN ("VALUE":S$)
150 SELECT Btn
160 CASE 0
170 DISP "Name entered:",S$
180 CASE 1
190 DISP "Input canceled"
200 END SELECT
210 END