home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 417.lha / MigaMind / main.c < prev    next >
Encoding:
C/C++ Source or Header  |  1990-09-10  |  7.3 KB  |  289 lines
  1. /****************************************************************************
  2.  
  3.                 Main Object of:
  4.                 -= Miga Mind =-
  5.                                 1-5-90
  6.                                  Ekke
  7. ****************************************************************************/
  8.  
  9. #include <exec/types.h>
  10. #include <intuition/intuition.h>
  11. #include <graphics/gfxbase.h>
  12. #include <graphics/gfxmacros.h>
  13. #include <stdio.h>
  14. #include <proto/all.h>
  15. #include "Gads.h"
  16. #include "MM_Proto.h"
  17.  
  18. #define VERSION     "MigaMind v1.0\nEkke Verheul\n"
  19. #define DATE         "dd 1-5-'90\n"
  20. #define IDCMP_FLAG     MOUSEBUTTONS
  21. #define WB_OUTFILE     "CON:10/10/200/40/ MigaMind "
  22. #define XPOS         (Window->LeftEdge)
  23. #define YPOS        (Window->TopEdge)
  24. #define M_WIDTH        (Window->WScreen->Width - Window->Width)
  25. #define M_HEIGHT    (Window->WScreen->Height - Window->Height)
  26. #define SMX        (Window->WScreen->MouseX)
  27. #define SMY        (Window->WScreen->MouseY)
  28.  
  29. struct  NewWindow     NewWindow =    
  30.     { 271,20,98,153,-1,-1,IDCMP_FLAG,        
  31.     SMART_REFRESH|BORDERLESS|RMBTRAP|ACTIVATE|REPORTMOUSE,
  32.     NULL,NULL,NULL,NULL,NULL,-1,-1,-1,-1,WBENCHSCREEN };
  33.  
  34. struct GfxBase         *GfxBase     = NULL;
  35. struct IntuitionBase     *IntuitionBase     = NULL;
  36. struct Window        *Window        = NULL;
  37.  
  38. int CXBRK(void) {  return(0); }
  39.  
  40. /* only this: */
  41. BYTE Value[46] ;
  42.  
  43.  
  44. /*::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
  45. :::::::::::: void MAIN() :::::::::::::::::::::::::::::::::::::::::::::::::::
  46. ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::*/
  47. void main(int argc,char **argv)
  48. {
  49. BOOL     buzy = 2;
  50. struct     IntuiMessage *message ;
  51. USHORT     code,x,y;
  52. ULONG     class;
  53. int     fromwb = 0;
  54. int     lastsys = -1,turn,i;
  55. int     sel[2] = { -1,-1 };
  56. int     colors,positions,ready;
  57. BYTE     MMCode[4];
  58.  
  59. /* WORKBENCH ? */
  60.     if (argc == 0) fromwb = 1;
  61.  
  62. /* VERSION */
  63.     if ((argc > 1) && (*argv[1] == '?')) Nop("?",fromwb);
  64.  
  65. /* LIBRARIES:  */ 
  66.     if ((IntuitionBase = (struct IntuitionBase *) OpenLibrary
  67.                 ("intuition.library",0 )) == 0 )      
  68.                 Nop("intuition.library not found.",fromwb);
  69.     if ((GfxBase = (struct GfxBase *)OpenLibrary
  70.                 ("graphics.library",0)) == NULL)
  71.                 Nop("graphics.library not found.",fromwb);
  72. /* WINDOW */
  73.     if ((Window = OpenWindow (&NewWindow)) == NULL )
  74.                 Nop("Can't open Window.\n",fromwb);
  75.     
  76. /* LETS GET TO WORK */
  77.     while(buzy)
  78.     {   if (buzy == 2)    /* start (again) */
  79.         {   LayOut(Window->RPort);
  80.         for (i=0; i<46; i++)
  81.         {    if (i<6) Value[i] = i;
  82.             else Value[i] = -1;
  83.         }
  84.         GetCode(MMCode);
  85.         turn = 1;
  86.         buzy = 1;
  87.         ready = 0;
  88.         }
  89.         else if (buzy == 3) /* show hidden code */
  90.         {   if (CheckValue(turn))
  91.         {   colors = WrightColor(turn,MMCode);
  92.             positions = WrightPosition(turn,MMCode);
  93.             PaintWright(Window->RPort,turn,colors,positions);
  94.             if (positions == 4 || ++turn > 10) 
  95.             {    ready = 1;
  96.             DrawSysGad(Window->RPort,1,0,1);
  97.             ShowAnswer(Window->RPort,MMCode);
  98.             DisplayBeep(Window->WScreen);
  99.             }
  100.         }
  101.         buzy = 1;
  102.         }
  103.  
  104.         Wait (1<<Window->UserPort->mp_SigBit);
  105.             while (message= (struct IntuiMessage *)GetMsg(Window->UserPort)) 
  106.             {    class = message->Class  ;
  107.         code  =    message->Code   ;
  108.                 x     = message->MouseX ;
  109.                 y     = message->MouseY ;
  110.             ReplyMsg((struct Message *)message);
  111.  
  112.                 switch(class)
  113.                 {   case MOUSEBUTTONS:
  114.                     {   if (code == SELECTDOWN)
  115.             {   if (y < 136 && ready == 0) 
  116.                 {    HandleSD(Window->RPort,x,y,turn,sel);
  117.                 }
  118.                 else lastsys = HandleSysD(Window->RPort,x,y,ready);
  119.             }
  120.                         else if (code == SELECTUP)
  121.             {   buzy = HandleSysU(Window->RPort,x,y,lastsys,ready);
  122.                 lastsys = -1;
  123.             }
  124.                         else if (code == MENUDOWN)
  125.                 {   if ((x = SMX) > M_WIDTH) x = M_WIDTH;
  126.                 if ((y = SMY) > M_HEIGHT) y = M_HEIGHT;
  127.                 x -= XPOS;
  128.                 y -= YPOS;
  129.                 MoveWindow(Window,x,y);
  130.             }
  131.     }   }    }   }
  132.     Nop(NULL,fromwb);
  133. }/* end of main() */
  134.             /******************************************************
  135. *******************/    /* close-all & err-mess */
  136. void Nop(char *err,int fromwb)
  137. {
  138. FILE *outfile;
  139.  
  140.     if (Window) CloseWindow (Window);
  141.     if (err && *err)
  142.     {   if (fromwb) 
  143.         {    outfile = fopen(WB_OUTFILE,"r+");
  144.         }
  145.         else
  146.         {    outfile = fopen("*","r+");
  147.         }
  148.         if (NULL != outfile) 
  149.         {    if (*err == '?')
  150.             {   fprintf(outfile, VERSION );
  151.                 fprintf(outfile, DATE    );
  152.             }
  153.             else
  154.             {   fprintf(outfile,"%s\n",err);
  155.             }
  156.             if (fromwb) Delay(300);
  157.             fclose(outfile);
  158.         }
  159.     }
  160.     if (GfxBase)        CloseLibrary((struct Library *)GfxBase);
  161.     if (IntuitionBase)    CloseLibrary((struct Library *)IntuitionBase);
  162.     XCEXIT(0);
  163. }
  164.  
  165. /********************************* SELECT-DOWN ****************************/
  166. int HandleSD(struct RastPort *rp,WORD x,WORD y,int turn,int *sel)
  167. { 
  168. int t,id;
  169.  
  170.     t = GetGadTurn(y);
  171.     if (turn != -1) id = GetGadID(t,x);
  172.     if (t == -1 || id == -1) return(0);
  173.  
  174.     if (t < turn) 
  175.     {   if (sel[0] != -1)
  176.         {    DrawGad(rp,sel[0],sel[1],Value[GadNr(sel[0],sel[1])],0);
  177.         }
  178.         DrawGad(rp,t,id,Value[GadNr(t,id)],1);
  179.         sel[0] = t;
  180.         sel[1] = id;
  181.     }
  182.     else if (t == turn && sel[0] != -1)
  183.     {   DrawGad(rp,sel[0],sel[1],Value[GadNr(sel[0],sel[1])],0);
  184.         DrawGad(rp,t,id,Value[GadNr(sel[0],sel[1])],0);
  185.         Value[GadNr(t,id)] = Value[GadNr(sel[0],sel[1])];
  186.         sel[0] = -1;
  187.     }
  188.     return(0); 
  189. }
  190.  
  191. /********************************* SYSTEM-DOWN *****************************/
  192. int HandleSysD(struct RastPort *rp,WORD x,WORD y,int w)
  193. { 
  194. int id;
  195.  
  196.     id = GetSysID(x,y);
  197.     if (id != -1) DrawSysGad(rp,id,1,w);
  198.     return(id); 
  199. }
  200.  
  201. /********************************* SYSTEM-UP *******************************/
  202. int HandleSysU(struct RastPort *rp,WORD x,WORD y,int lastid,int w)
  203. {
  204.     if (lastid != -1) DrawSysGad(rp,lastid,0,w);
  205.     if (lastid == GetSysID(x,y)) 
  206.     {   switch(lastid)
  207.         {    case QUIT:
  208.         {    return(0);
  209.         }
  210.         case SHOW:
  211.         {   if (w) return(2);
  212.             else return(3);
  213. }    }   }    }
  214. /******************************** RANDOM ***********************************/
  215. void GetCode(BYTE *r)
  216. {
  217. unsigned int clock[2];
  218. int i,j,same;
  219.  
  220.     timer(clock);
  221.     srand(clock[0]*clock[1]);
  222.     for (i=0; i<4; i++)
  223.     {   same = 1;
  224.         while (same)
  225.         {    r[i] = rand() % 6;
  226.         same = 0;
  227.         for (j=0; j<i; j++)
  228.             {   if (r[i] == r[j])
  229.             {    same = 1;
  230.     }   }    }   }
  231. }
  232. /***************************************************************************/
  233. int CheckValue(int turn)
  234. {
  235. int i;
  236.     for (i=0; i<4; i++) if (Value[GadNr(turn,i)] == -1) return(0);
  237.     return(1);
  238. }
  239. /***************************************************************************/
  240. int IsIn(BYTE a,BYTE *b)
  241. {
  242. int i;
  243.     for (i=0; i<4; i++) if(b[i] == a) return(1);
  244.     return(0);
  245. }
  246. /***************************************************************************/
  247. int WrightColor(int turn,BYTE *c)
  248. {
  249. int i,j,tot = 0,used;
  250.  
  251.     for (i=0; i<4; i++) 
  252.     {   /* for the @%! who used the same char twice... */
  253.         used = 0;
  254.         for (j=0; j<i; j++) 
  255.         {   if (Value[GadNr(turn,i)] == Value[GadNr(turn,j)]) 
  256.             {   used = 1;
  257.         }    }
  258.         if (!used)
  259.         {    if (IsIn(Value[GadNr(turn,i)],c))
  260.             {   tot++;
  261.     }   }    }   
  262.     return(tot);
  263.  
  264. }
  265. /***************************************************************************/
  266. int WrightPosition(int turn,BYTE *c)
  267. {
  268. int i,tot = 0;
  269.     for (i=0; i<4; i++) if (c[i] == Value[GadNr(turn,i)]) tot++;
  270.     return(tot);
  271. }
  272. /***************************************************************************/
  273. void ShowAnswer(struct RastPort *rp,BYTE *a)
  274. {
  275. int i;
  276.  
  277.     SetAPen(rp,0);
  278.     RectFill(rp,6,4,91,12);
  279.     for (i=1; i<5; i++) DrawGad(rp,0,i,a[i-1],1);
  280. }
  281.  
  282.  
  283.  
  284.  
  285.  
  286.  
  287.  
  288.  
  289.