home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 13 / AACD13.ISO / AACD / Resources / System / BoingBag1 / Contributions / Workbench / RexxArpLib3p6 / src / sreq / reqtest.c < prev    next >
C/C++ Source or Header  |  1998-06-17  |  4KB  |  130 lines

  1. #include <stdio.h>
  2. #include <stdlib.h>
  3. #include <string.h>
  4. #include <functions.h>
  5. #include <simpreq.h>
  6.  
  7. struct IntuitionBase *IntuitionBase = NULL;
  8. struct GfxBase *GfxBase = NULL;
  9.  
  10. static struct SimpleRequester s;
  11. static struct ReqPens reqp;
  12. static char *prompts[SR_MAXPROMPTS];
  13.  
  14. void main(void)
  15. {
  16.     long result;
  17.     int i;
  18.     
  19.     if (!SReqOpenLibs()) 
  20.     {
  21.         printf("Couldn't open Graphics or Intuition\n");
  22.         exit(0);
  23.     }
  24.     
  25.     s.sr_Prompt = prompts;
  26.     for (i = 0; i < SR_MAXPROMPTS; i++)
  27.         s.sr_Prompt[i] = NULL;
  28.     
  29.     s.sr_x = 50;
  30.     s.sr_y = 50;
  31.     s.sr_Screen = NULL;
  32.     s.sr_PenList = NULL;
  33.     result = SimpleRequest(&s);
  34.     printf("result is %lx with the string: %s, error %d\n", result,
  35.     (s.sr_String ? s.sr_String : " "), s.sr_ErrorCode);
  36.     
  37.     s.sr_Prompt[0] = malloc(255);
  38.     strcpy(s.sr_Prompt[0], "This is a test");
  39.     s.sr_x = 150;
  40.     s.sr_y = 100;
  41.     s.sr_PenList = &reqp;
  42.     reqp.reqp_BlockPen  = 3;
  43.     reqp.reqp_DetailPen = 2;
  44.     reqp.reqp_BackPen   = 1;
  45.     reqp.reqp_PromptPen = 2;
  46.     reqp.reqp_BoxPen    = 2;
  47.     reqp.reqp_ShadowPen = 3;
  48.     reqp.reqp_OkayPen   = 0;
  49.     reqp.reqp_CancelPen = 2;
  50.     result = SimpleRequest(&s);
  51.     printf("result is %lx with the string: %s, error %d\n", result,
  52.     (s.sr_String ? s.sr_String : " "), s.sr_ErrorCode);
  53.     
  54.     s.sr_Prompt[1] = malloc(255);
  55.     s.sr_Prompt[2] = malloc(255);
  56.     strcpy(s.sr_Prompt[1], "This is another test");
  57.     strcpy(s.sr_Prompt[2], "This is another test, but this is a long one");
  58.     s.sr_x = 0;
  59.     s.sr_y = 0;
  60.     reqp.reqp_BackPen   = 1;
  61.     reqp.reqp_PromptPen = 2;
  62.     reqp.reqp_BoxPen    = 2;
  63.     reqp.reqp_ShadowPen = 3;
  64.     reqp.reqp_OkayPen   = 2;
  65.     reqp.reqp_CancelPen = 3;
  66.     result = SimpleRequest(&s);
  67.     printf("result is %lx with the string: %s, error %d\n", result,
  68.     (s.sr_String ? s.sr_String : " "), s.sr_ErrorCode);
  69.     
  70.     s.sr_Prompt[3] = malloc(255);
  71.     s.sr_Prompt[4] = malloc(255);
  72.     s.sr_Prompt[5] = malloc(255);
  73.     s.sr_Prompt[3][0] = '\0';
  74.     s.sr_Prompt[4][0] = '\0';
  75.     strcpy(s.sr_Prompt[5], "This is another test");
  76.     s.sr_x = 50;
  77.     s.sr_y = 50;
  78.     reqp.reqp_BackPen   = 2;
  79.     reqp.reqp_PromptPen = 1;
  80.     reqp.reqp_BoxPen    = 3;
  81.     reqp.reqp_ShadowPen = 0;
  82.     reqp.reqp_OkayPen   = 1;
  83.     reqp.reqp_CancelPen = 3;
  84.     result = SimpleRequest(&s);
  85.     printf("result is %lx with the string: %s, error %d\n", result,
  86.     (s.sr_String ? s.sr_String : " "), s.sr_ErrorCode);
  87.     
  88.     s.sr_String = malloc(255);
  89.     s.sr_String[0] = '\0';
  90.     result = SimpleRequest(&s);
  91.     printf("result is %lx with the string: %s, error %d\n", result,
  92.     (s.sr_String ? s.sr_String : " "), s.sr_ErrorCode);
  93.     
  94.     s.sr_Okay = malloc(255);
  95.     strcpy(s.sr_Okay, "Yup, do it");
  96.     strcpy(s.sr_String, "This is the default text");
  97.     result = SimpleRequest(&s);
  98.     printf("result is %lx with the string: %s, error %d\n", result,
  99.     (s.sr_String ? s.sr_String : " "), s.sr_ErrorCode);
  100.     
  101.     s.sr_Cancel = malloc(255);
  102.     strcpy(s.sr_Cancel, "No, don't\nyou dare, my friend");
  103.     result = SimpleRequest(&s);
  104.     printf("result is %lx with the string: %s, error %d\n", result,
  105.     (s.sr_String ? s.sr_String : " "), s.sr_ErrorCode);
  106.     
  107.     s.sr_Okay = NULL;
  108.     s.sr_x = 100;
  109.     s.sr_y = 50;
  110.     reqp.reqp_BackPen   = 1;
  111.     reqp.reqp_PromptPen = 2;
  112.     reqp.reqp_BoxPen    = 2;
  113.     reqp.reqp_ShadowPen = 3;
  114.     reqp.reqp_OkayPen   = 0;
  115.     reqp.reqp_CancelPen = 2;
  116.     result = SimpleRequest(&s);
  117.     printf("result is %lx with the string: %s, error %d\n", result,
  118.     (s.sr_String ? s.sr_String : " "), s.sr_ErrorCode);
  119.     
  120.     s.sr_x = 100;
  121.     s.sr_y = 200;
  122.     result = SimpleRequest(&s);
  123.     printf("result is %lx with the string: %s, error %d\n", result,
  124.     (s.sr_String ? s.sr_String : " "), s.sr_ErrorCode);
  125.     
  126.     SReqCloseLibs();
  127.     
  128.     exit(0);
  129. }
  130.