/*
** 'RequestUser' example
*/
Options Results

Address XTRUDER

RequestUser TITLE '"Hey, dude"' PROMPT '"Do you think Xtruder is great ?"' RESPONSE '"_Bloody hell, YEAH|_I''m not sure|_Nah, it sucks"'

IF RESULT = 1 THEN
  RequestUser TITLE '"Me thinks..."' PROMPT '"I couldn''t agree more"'
ELSE IF RESULT = 2 THEN
  RequestUser TITLE '"Me thinks..."' PROMPT '"Well, let me convince you some more then"'
ELSE
  RequestUser TITLE '"Me thinks..."' PROMPT '"You strongly need a mental examination"'

RequestString TITLE '"Xtruder string request"' PROMPT '"Please enter your favourite virus killer"' MAXBUFLEN 130 RESPONSE '"_I''m finished, Mom|I _won''t tell"'

IF RC = 0 THEN
  RequestUser PROMPT '"You entered: 'RESULT'"' RESPONSE '"Did I really ?"'
ELSE
  RequestUser PROMPT '"You canceled the requester..."'

RequestNumber TITLE '"Xtruder number request"' MIN 200 MAX 800 NUMBER 666 SHOWDEFAULT PROMPT '"Please enter a number"' RESPONSE '"Continue|Cancel"'

IF RC = 0 THEN
  RequestUser PROMPT '"You entered: 'RESULT'"' RESPONSE '"Yup!"'
ELSE
  RequestUser PROMPT '"You canceled the requester..."'