home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Misc / GRAVITON.LHA / graviton / Graviton.c < prev    next >
Encoding:
C/C++ Source or Header  |  1996-05-26  |  3.0 KB  |  169 lines
  1. /***************************/
  2. /*  Potential Distribution */
  3. /*                         */
  4. /*   Mandelbrot for z²+c   */
  5. /*   (C) 1996 by MaCheFi   */
  6. /*    szczerba@us.edu.pl   */
  7. /*     zfjmgr@us.edu.pl    */
  8. /***************************/
  9.  
  10. #include <intuition/intuition.h>
  11. #include <proto/exec.h>
  12. #include <proto/graphics.h>
  13. #include <proto/intuition.h>
  14.  
  15. #include <functions.h>
  16. #include <graphics/modeid.h>
  17. #include <stdio.h>
  18. #include <stdlib.h>
  19. #include <time.h>
  20. #include <m68881.h> /* watch out! */
  21.  
  22. #define WIDTH 512
  23. #define HEIGHT 512
  24. #define DEPTH 8
  25. #define COLORS 256
  26. #define N_MAX 1000    /* max. number of points */
  27.  
  28. int N,X,Y,x[N_MAX],y[N_MAX],m[N_MAX];
  29. float BRIGHT=1.0;
  30.  
  31. struct IntuitionBase *IntuitionBase;
  32. struct GfxBase *GfxBase;
  33. struct Screen *scr;
  34.  
  35. ULONG modeid=DEFAULT_MONITOR_ID | HIRESLACE_KEY;
  36.  
  37. void stupid(void)
  38. {
  39.     if (scr) CloseScreen(scr);
  40.     if (GfxBase) CloseLibrary((struct Library *)GfxBase);
  41.     if (IntuitionBase) CloseLibrary((struct Library *)IntuitionBase);
  42.     exit(0);
  43. }
  44.  
  45. void OpenAllLibraries(void)
  46. {
  47.     IntuitionBase=(struct IntuitionBase *)OpenLibrary("intuition.library",37);
  48.     if (!IntuitionBase)
  49.     {
  50.         printf("You need intuition.library v.37+!!!\n");
  51.         stupid();
  52.     }
  53.     GfxBase=(struct GfxBase *)OpenLibrary("graphics.library",37);
  54.     if (!GfxBase)
  55.     {
  56.         printf("You need graphics.library v.37+!!!\n");
  57.         stupid();
  58.     }
  59. }
  60.  
  61. void gimmecolors(void)
  62. {
  63.     ULONG i;
  64.     for(i=0;i<COLORS;i++)
  65.     {
  66.         SetRGB32(&scr->ViewPort, i, (ULONG)(((float)i/0xff)*0xffffffff), (ULONG)(((float)i/0xff)*0xffffffff), (ULONG)(((float)i/0xff)*0xffffffff));
  67.     }
  68. }
  69.  
  70. float RND(void)
  71. {
  72.     return (float)(rand()/(float)RAND_MAX);
  73. }
  74.  
  75. void randomize(void)
  76. {
  77.     int counter;
  78.     for(counter=0;counter<N;counter++)
  79.     {
  80.         x[counter]=(int)(RND()*WIDTH);
  81.         y[counter]=(int)(RND()*HEIGHT);
  82.         m[counter]=(int)(RND()*360+1);
  83.     }
  84. }
  85.  
  86. int to_color(float c)
  87. {
  88.     if( (BRIGHT*c) > (COLORS-1) )
  89.         return COLORS-1;
  90.     else
  91.         return (int)(BRIGHT*c);
  92. }
  93.  
  94. float v(int index)
  95. {
  96.     float r;
  97.     r=(float) (sqrt( (double)( (x[index]-X)*(x[index]-X)+0.00001+(y[index]-Y)*(y[index]-Y))));
  98.     return((float)(m[index]/r));
  99.  
  100. } /* v() */
  101.  
  102. void main(int argc,char *argv[])
  103. {
  104.     int i;
  105.     float tempv;
  106.     long int t;
  107.     UWORD SEED;
  108.  
  109.     if(argc!=4)
  110.     {
  111.         printf("Arguments: N BRIGHTNESS SEED\n");
  112.         exit(0);
  113.     }
  114.  
  115.     N      = atol(argv[1]);
  116.     BRIGHT = atof(argv[2]);
  117.     SEED   = atoi(argv[3]);
  118.  
  119.     if(SEED==-1)
  120.     {
  121.         time(&t);
  122.         srand((UWORD)t);
  123.     }
  124.     else srand(SEED);
  125.  
  126.     randomize();
  127.     OpenAllLibraries();
  128.  
  129.     if(!(scr=OpenScreenTags(0,
  130.         SA_Width, WIDTH,
  131.         SA_Height, HEIGHT,
  132.         SA_Depth, DEPTH,
  133.         SA_Type, PUBLICSCREEN,
  134.         SA_DisplayID, modeid,
  135.         TAG_DONE))) stupid();
  136.  
  137.     gimmecolors();
  138.  
  139.     SetRast(&scr->RastPort,0);
  140.  
  141.     for(Y=0;Y<HEIGHT;Y++)
  142.     {
  143.         if(scr->MouseX<2 && scr->MouseY<2)
  144.         {
  145.             stupid();
  146.             break;
  147.         }
  148.  
  149.         for(X=0;X<WIDTH;X++)
  150.         {
  151.             tempv=0.0;
  152.             for(i=0;i<N;i++)
  153.                 tempv+=v(i);
  154.             SetAPen(&scr->RastPort,to_color(tempv));
  155.             WritePixel(&scr->RastPort,X,Y);
  156.         }
  157.     }
  158.     for(;;)
  159.     {
  160.         if(scr->MouseX<2 && scr->MouseY<2)
  161.         {
  162.             stupid();
  163.             break;
  164.         }
  165.         Delay(50);
  166.         printf("Where is the top left screen corner...?\n");
  167.     }
  168. }
  169.