10 ! *********************************************************************
20 ! Example: QUESTION Dialog
30 !
40 ! This program provides a QUESTION dialog and displays
50 ! the user response (Yes or No) to the question.
60 !
70 ! **************************************************
80 !
90 DIM P$[20]
100 INTEGER Btn
110 P$="Do you want to exit?"
120 DIALOG "QUESTION",P$,Btn;SET ("TITLE":" Example: QUESTION Dialog")
130 IF Btn=0 THEN DISP "Yes"
140 IF Btn=1 THEN DISP "No"
150 END
