home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 241.lha / CardORama_v1.0 / Sources / initrequesters.c < prev    next >
Encoding:
C/C++ Source or Header  |  1989-05-04  |  3.8 KB  |  117 lines
  1. /*                            initrequesters.c                          */
  2. /*                                                                      */
  3. /* This one is used by main() to initialize all the requesters needed.  */
  4.  
  5.  
  6.  
  7. struct Requester peekreq;
  8. SHORT peekpair[2][10] = {
  9.    {0, 0,  191, 0,  191, 73,  0, 73,  0, 0},
  10.    {2, 2,  189, 2,  189, 71,  2, 71,  2, 2}
  11.    };
  12. struct Border peekborder[] = {
  13.    {0, 0, 17, 4, JAM2, 5, &peekpair[0][0], &peekborder[1]},
  14.    {0, 0, 18, 4, JAM2, 5, &peekpair[1][0], NULL}
  15.    };
  16. struct IntuiText peektext[] = {
  17.    {17, 4, JAM2, 8, 10,  NULL, "WARNING!", &peektext[1]},
  18.    {16, 4, JAM2, 80, 10, NULL, "When you peek", &peektext[2]},
  19.    {16, 4, JAM2, 8, 20,  NULL, "you loose 25 % of your", &peektext[3]},
  20.    {16, 4, JAM2, 8, 30,  NULL, "score... Are you sure?", NULL}
  21.    };
  22.  
  23.  
  24. struct Requester quitreq;
  25. struct IntuiText quittext[] = {
  26.    {17, 4, JAM2, 8, 10,  NULL, "     QUIT GAME?!?     ", &quittext[1]},
  27.    {16, 4, JAM2, 8, 20,  NULL, "Think it over: Are you", &quittext[2]},
  28.    {16, 4, JAM2, 8, 30,  NULL, "really sure about it? ", NULL},
  29.    };
  30.  
  31.  
  32.  
  33. struct Requester thankreq;
  34. struct IntuiText thanktext[] = {
  35.    {16, 4, JAM2, 8, 13,  NULL, "Thanks to everyone who", &thanktext[1]},
  36.    {16, 4, JAM2, 8, 23,  NULL, "gives its contribution", &thanktext[2]},
  37.    {16, 4, JAM2, 8, 33,  NULL, "to the Amiga PD world,", &thanktext[3]},
  38.    {16, 4, JAM2, 8, 43,  NULL, "expecially to         ", &thanktext[4]},
  39.    {16, 4, JAM2, 8, 53,  NULL, "Mr. Fred Fish         ", NULL}
  40.    };
  41.  
  42. struct Requester aboutreq;
  43. struct IntuiText abouttext[] = {
  44.    {17, 4, JAM2, 8,  6,  NULL, "   Cards'O'Rama 1.0   ", &abouttext[1]},
  45.    {18, 4, JAM2, 8, 16,  NULL, "          by          ", &abouttext[2]},
  46.    {16, 4, JAM2, 8, 26,  NULL, "Werther Pirani        ", &abouttext[3]},
  47.    {16, 4, JAM2, 8, 36,  NULL, "Via Mario Torresi, 74 ", &abouttext[4]},
  48.    {16, 4, JAM2, 8, 46,  NULL, "60128 Ancona          ", &abouttext[5]},
  49.    {16, 4, JAM2, 8, 56,  NULL, "ITALY                 ", NULL}
  50.    };
  51.  
  52. struct Requester exitreq;
  53. struct IntuiText exittext[] = {
  54.    {17, 4, JAM2, 8, 10,  NULL, " EXIT TO WORKBENCH?!? ", &exittext[1]},
  55.    {16, 4, JAM2, 8, 20,  NULL, "                      ", &exittext[2]},
  56.    {16, 4, JAM2, 8, 30,  NULL, "Are you sure about it?", NULL},
  57.    };
  58.  
  59. initrequesters()
  60.    {
  61.    extern struct Gadget yeahgadget;
  62.    extern struct Gadget clickgadget;
  63.  
  64.    InitRequester(&peekreq);
  65.    peekreq.LeftEdge = 64;
  66.    peekreq.TopEdge = 63;
  67.    peekreq.Width = 192;
  68.    peekreq.Height = 74;
  69.    peekreq.ReqGadget = &yeahgadget;
  70.    peekreq.ReqText = &peektext[0];
  71.    peekreq.BackFill = 4;
  72.    peekreq.ReqBorder = &peekborder[0];
  73.  
  74.    InitRequester(&quitreq);
  75.    quitreq.LeftEdge = 64;
  76.    quitreq.TopEdge = 63;
  77.    quitreq.Width = 192;
  78.    quitreq.Height = 74;
  79.    quitreq.ReqGadget = &yeahgadget;       /* Same gadgets */
  80.    quitreq.ReqText = &quittext[0];
  81.    quitreq.BackFill = 4;
  82.    quitreq.ReqBorder = &peekborder[0];    /* Same border */
  83.  
  84.    InitRequester(&thankreq);
  85.    thankreq.LeftEdge = 64;
  86.    thankreq.TopEdge = 63;
  87.    thankreq.Width = 192;
  88.    thankreq.Height = 74;
  89.    thankreq.ReqGadget = &clickgadget;
  90.    thankreq.ReqText = &thanktext[0];
  91.    thankreq.BackFill = 4;
  92.    thankreq.ReqBorder = &peekborder[0];    /* Same border */
  93.  
  94.    InitRequester(&aboutreq);
  95.    aboutreq.LeftEdge = 64;
  96.    aboutreq.TopEdge = 63;
  97.    aboutreq.Width = 192;
  98.    aboutreq.Height = 74;
  99.    aboutreq.ReqGadget = &clickgadget;
  100.    aboutreq.ReqText = &abouttext[0];
  101.    aboutreq.BackFill = 4;
  102.    aboutreq.ReqBorder = &peekborder[0];    /* Same border */
  103.  
  104.    InitRequester(&exitreq);
  105.    exitreq.LeftEdge = 64;
  106.    exitreq.TopEdge = 63;
  107.    exitreq.Width = 192;
  108.    exitreq.Height = 74;
  109.    exitreq.ReqGadget = &yeahgadget;
  110.    exitreq.ReqText = &exittext[0];
  111.    exitreq.BackFill = 4;
  112.    exitreq.ReqBorder = &peekborder[0];     /* Same border */
  113.  
  114.    return(0);
  115.    }
  116.  
  117.