home *** CD-ROM | disk | FTP | other *** search
/ 17 Bit Software 2: Collection B / 17Bit_Collection_B.iso / files / 1365.dms / in.adf / BOORANG / Boomerang.c < prev    next >
Encoding:
C/C++ Source or Header  |  1991-08-21  |  22.2 KB  |  715 lines
  1. /* 
  2.    Boomerang
  3.    by Kevin Dixon
  4.    Amiga version by Troy Tucker using Lattice C (V5.02)
  5.    Copyright © 1990 COMPUTE! Publications, Inc.
  6.    All Rights Reserved
  7. */ 
  8.  
  9. #define STILL  0
  10. #define UP     1
  11. #define DOWN   2
  12. #define LEFT   3
  13. #define RIGHT  4
  14. #define ESC    0x045
  15. #define RETURN 0x044
  16. #define SPACE  0x040
  17.  
  18. #define NUMSAMPLES 3
  19. #define JIF0 8
  20. #define PER0 400
  21. #define VOL0 48
  22. #define JIF1 1
  23. #define PER1 250   
  24. #define VOL1 64
  25. #define JIF2 8
  26. #define PER2 500
  27. #define VOL2 64
  28.  
  29. void openthelibs(),openthefiles(),initthebmaps(),openthescreen();
  30. void readthepic(),initialize(),gameloop(),setbitmap(),opensounds(),pause();
  31. void checkmen(),checkboomerangs(),placeobjects(),changemen(),moveboomerangs();
  32. void dotitle(),flipem(),readthesticks(),cleantheamiga(),getnewboard();
  33.  
  34. #include <stdio.h>
  35. #include <intuition/intuition.h>
  36. #include <exec/memory.h>
  37. #include <hardware/blit.h>
  38. #include <graphics/copper.h>
  39. #include <graphics/view.h>
  40. #include "boomsound.c"
  41.  
  42. short frame=0,direction[2],olddirection[2],px[2],py[2],ox[2],oy[2];
  43. short shapex[2],shapey[2],animate[2],startword,speed=2,bspeed=4,lives[2];
  44. short bx[2],by[2],obx[2],oby[2],bshapex[2],bshapey[2],bflag[2],bstate[2];
  45. short rpx1[2],rpy1[2],rpx2[2],rpy2[2],rpx3[2],rpy3[2],bdirection[2],obstate[2];
  46. short brpx1[2],brpy1[2],brpx2[2],brpy2[2],safethrow[2],deadshapex,deadshapey;
  47. short bulbx[2],bulby[2],bulbshapex[2],bulbshapey[2],dead[2],next=0,reset=0;
  48. char *cia,*filename,numplanes=4;
  49. short *joy[2];
  50. UWORD *copperlist;
  51.  
  52. FILE *IFFfile;
  53. struct Screen *scr;
  54. struct Window *wdw;
  55. struct ViewPort *vp;
  56. struct View *v;
  57. struct RastPort *rp;
  58. struct IntuitionBase *IntuitionBase;
  59. struct IntuiMessage *message;
  60. struct GfxBase *GfxBase;
  61. struct BitMap *Bmap[5] = {NULL,NULL,NULL,NULL,NULL};
  62. struct TextAttr StdFont =
  63. { "topaz.font",TOPAZ_EIGHTY,FS_NORMAL,FPF_ROMFONT };
  64. struct NewScreen my_screen =
  65. { 0,0,320,200,4,0,1,NULL,CUSTOMSCREEN|CUSTOMBITMAP,&StdFont,NULL,NULL,NULL};
  66. struct NewWindow my_window =
  67. { 0,0,320,200,-1,-1,RAWKEY,RMBTRAP|ACTIVATE|BORDERLESS|BACKDROP|NOCAREREFRESH,
  68.   NULL,NULL,NULL,NULL,NULL,0,0,0,0,CUSTOMSCREEN };
  69.  
  70. UWORD blackmap[16]={ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 };
  71. UWORD chip Blank_Data[6] = {0x0000,0x0000,0x0000,0x0000,0x0000,0x0000};
  72. UWORD colormap[16]=
  73. { 0x0002,0x0223,0x0c00,0x0f60,0x0070,0x0040,0x000f,0x0000,
  74.   0x0f8b,0x080b,0x0407,0x0830,0x0fe0,0x0dd9,0x0774,0x0332
  75. };
  76.  
  77. void main()
  78. {
  79.  openthelibs();
  80.  printf ("\n\n              Boomerang\n");
  81.  printf ("            by Kevin Dixon\n");
  82.  printf ("     Amiga version by Troy Tucker\n");
  83.  printf (" Copyright © 1990 COMPUTE! Pub., Inc.\n");
  84.  printf ("         All Rights Reserved\n\n");
  85.  waveform[0]=LoadSample("samples/footsteps.snd",&wavelength[0]);
  86.  waveform[1]=LoadSample("samples/spin.snd",&wavelength[1]);
  87.  waveform[2]=LoadSample("samples/boom.snd",&wavelength[2]);
  88.  initthebmaps();
  89.  openthescreen();
  90.  openthefiles();
  91.  Forbid();
  92.  initialize();
  93.  dotitle();
  94.  gameloop();
  95. }
  96.  
  97. void openthelibs()                     /* open the libraries */
  98. { 
  99.   IntuitionBase=(struct IntuitionBase *)OpenLibrary("intuition.library",0);
  100.   if (IntuitionBase == NULL) exit(FALSE);
  101.   GfxBase=(struct GfxBase *)OpenLibrary("graphics.library",0);
  102.   if (GfxBase == NULL)
  103.     { CloseLibrary("intuition.library");
  104.       exit(FALSE);
  105.     }
  106. }
  107.  
  108. void initthebmaps()                    /* allocate bmaps and clear them */
  109. {
  110.  register short i,j;
  111.  
  112.  for (j=0; j<5; j++)
  113.   {
  114.    if ((Bmap[j]=(struct BitMap *)AllocMem(sizeof(struct BitMap),MEMF_CHIP))==0)
  115.       cleantheamiga();
  116.    InitBitMap (Bmap[j],4,320,200);
  117.    for (i=0; i<4; i++)
  118.     { if ((Bmap[j]->Planes[i] = (PLANEPTR)AllocRaster(320,200)) == 0)
  119.          cleantheamiga();
  120.       BltClear(Bmap[j]->Planes[i],(320 / 8)*200,1);
  121.     }
  122.   }
  123.  my_screen.CustomBitMap = Bmap[0];
  124. } 
  125.  
  126. void openthescreen()               /* open window,screen,kill pointer,etc. */
  127. {
  128.  if ((scr=(struct Screen *)OpenScreen(&my_screen))==NULL)
  129.    { printf("Can't open the screen \n");
  130.      cleantheamiga();
  131.    }
  132.  my_window.Screen = scr;
  133.  if ((wdw=(struct Window *)OpenWindow(&my_window))==NULL)
  134.    { printf("Can't open the window \n");
  135.      cleantheamiga();
  136.    }
  137.  SetPointer(wdw,&Blank_Data[0],1,1,0,0);
  138.  vp=(struct ViewPort *)&scr->ViewPort;;
  139.  v=(struct View *)ViewAddress();
  140.  rp=&scr->RastPort;
  141.  copperlist = (UWORD *)v->LOFCprList->start;
  142.  startword=0;
  143.  while (*(copperlist+startword) != (UWORD)0x00e0) startword += 2;
  144. }
  145.  
  146. void openthefiles()                    /* open pics for reading */
  147. {
  148.  LoadRGB4(vp,&blackmap,16);
  149.  scr->BitMap = *Bmap[3];
  150.  filename="boomer1.pic";
  151.  readthepic();
  152.  scr->BitMap = *Bmap[4];
  153.  filename="boomer2.pic";
  154.  readthepic();
  155.  BltBitMap(Bmap[4],0,0,Bmap[2],0,0,320,200,0xC0,0xff,NULL);
  156. }
  157.  
  158. void readthepic()                      /* DPaintIII (320x200) pic reader  */
  159. {
  160.  char *newbyte[8], context_header[4], code, counter, goodbyte;
  161.  short Height, Plane, bytes_read, bytes_per_row=320>>3;
  162.  
  163.  IFFfile=fopen(filename,"r");                          
  164.  if (IFFfile==NULL)
  165.    { printf("Can't find the pictures! \n");
  166.      exit(FALSE);
  167.    }
  168.  for (counter=0; counter<80; counter++) /* skip to BODY */
  169.  fread(context_header,4,1,IFFfile);
  170.  fread(context_header,2,1,IFFfile);
  171.  fread(context_header,4,1,IFFfile);  
  172.  if (strcmp(context_header,"BODY")!=0)
  173.    { printf("Something's wrong with the pictures! \n");
  174.      cleantheamiga();
  175.    }
  176.  fread(context_header,4,1,IFFfile);
  177.  for (Plane=0; Plane<numplanes; Plane++)          /* read in the body */
  178.     newbyte[Plane]=(char *)(scr->RastPort.BitMap->Planes[Plane]); 
  179.  for (Height=0; Height<200; Height++)
  180.   { for (Plane=0; Plane<numplanes; Plane++)
  181.     { bytes_read=0;
  182.       do
  183.       { fread(&code,1,1,IFFfile);
  184.         if (code>=0) 
  185.         { code++;
  186.           fread(newbyte[Plane],(long)code,1,IFFfile);
  187.           newbyte[Plane] += code;
  188.           bytes_read += code;
  189.         }
  190.         else if (code != -127) 
  191.          { code = -code;
  192.            code++;
  193.            fread(&goodbyte,1,1,IFFfile);
  194.            for (counter=0; counter<code; counter++)
  195.            { *newbyte[Plane]=goodbyte;
  196.               newbyte[Plane]++;
  197.            }
  198.            bytes_read += code;
  199.          }
  200.       }
  201.       while ((bytes_read<bytes_per_row) && feof(IFFfile)==0);
  202.     }
  203.   }
  204.  fclose(IFFfile);
  205. }
  206.  
  207. void initialize()                      /* refreshes vars between rounds */
  208. {
  209.  register short i,x;
  210.  
  211.  if ((lives[0]==6)&&(lives[1]==6))     /* light up the lifebulbs */
  212.    {
  213.     x=215;
  214.     for (i=0;i<5;i++)
  215.        {
  216.         BltBitMap(Bmap[3],70,80,
  217.         Bmap[2],x,190,5,5,0xC0,0xff,NULL);
  218.         x=x+14;
  219.        }
  220.      x=46;
  221.      for (i=0;i<5;i++)
  222.        {
  223.         BltBitMap(Bmap[3],70,90,
  224.         Bmap[2],x,190,5,5,0xC0,0xff,NULL);
  225.         x=x+14;
  226.        }
  227.    }
  228.  px[0]=292,px[1]=14,py[0]=12,py[1]=164;  
  229.  ox[0]=292,ox[1]=14,oy[0]=12,oy[1]=164;  
  230.  rpx1[0]=rpx2[0]=rpx3[0]=rpy1[0]=rpy2[0]=rpy3[0]=px[0];
  231.  rpx1[1]=rpx2[1]=rpx3[1]=rpy1[1]=rpy2[1]=rpy3[1]=px[0];
  232.  bshapex[0]=15,bshapey[0]=79,bshapex[1]=35,bshapey[1]=89;
  233.  shapex[0]=15,shapey[0]=28,shapex[1]=15,shapey[1]=44;
  234.  deadshapex=0,dead[0]=0,dead[1]=0;
  235.  joy[1] = (short *)(0xdff00a);                     /* Joystick 1 (port 1) */
  236.  joy[0] = (short *)(0xdff00c);                     /* Joystick 0 (mouse)  */
  237.  cia = (char *)(0xbfe001);
  238.  animate[0]=0; animate[1]=0;
  239.  bflag[0]=bflag[1]=bstate[0]=bstate[1]=0;
  240.  safethrow[0]=safethrow[1]=0;
  241.  bdirection[0]=LEFT,bdirection[1]=RIGHT;
  242.  direction[0]=LEFT,direction[1]=RIGHT;
  243.  olddirection[0]=LEFT,olddirection[1]=RIGHT;
  244.  /* make the screen copies */
  245.  BltBitMap(Bmap[2],0,0,Bmap[0],0,0,320,200,0xC0,0xff,NULL);
  246.  BltBitMap(Bmap[2],0,0,Bmap[1],0,0,320,200,0xC0,0xff,NULL);
  247.  /* blit the men */
  248.  BltBitMap(Bmap[3],shapex[0]+112,shapey[0],Bmap[0],px[0],py[0],13,15,0x20,0xff,NULL);
  249.  BltBitMap(Bmap[3],shapex[0],shapey[0],Bmap[0],px[0],py[0],13,15,0xE0,0xff,NULL);
  250.  BltBitMap(Bmap[3],shapex[1]+112,shapey[1],Bmap[0],px[1],py[1],13,15,0x20,0xff,NULL);
  251.  BltBitMap(Bmap[3],shapex[1],shapey[1],Bmap[0],px[1],py[1],13,15,0xE0,0xff,NULL);
  252.  frame=0;
  253.  scr->BitMap = *Bmap[0];
  254.  setbitmap();
  255.  frame=1;
  256.  pause(255);
  257.  LoadRGB4(vp,&colormap,16);
  258. }
  259.  
  260. void dotitle()                         /* place select box then get input */
  261. {
  262.  register short i;
  263.  ULONG class;
  264.  USHORT code = 0;
  265.  BltBitMap(Bmap[3],14,127,Bmap[1-frame],98,78,124,38,0xC0,0xff,NULL);
  266.  lives[0]=lives[1]=6;
  267.  bulbx[0]=215,bulby[0]=190,bulbx[1]=102,bulby[1]=190;
  268.  bulbshapex[0]=59,bulbshapey[0]=80,bulbshapex[1]=59,bulbshapey[1]=90;
  269.  deadshapex=0,deadshapey=99,dead[0]=0,dead[1]=0;
  270.  *dmaconw=0x000F; for (i=0;i<4;i++) inuse[i]=0;
  271.  Permit();
  272.  
  273.  while (code != RETURN)
  274.     { Wait(1<<wdw->UserPort->mp_SigBit);
  275.       while (message = (struct IntuiMessage *)GetMsg(wdw->UserPort))
  276.         {
  277.          code = message->Code;
  278.          class = message->Class;
  279.          ReplyMsg(message);
  280.          if ((class==RAWKEY)&&(code==ESC)) cleantheamiga();
  281.          if ((class==RAWKEY)&&(code==SPACE))
  282.            { BltBitMap(Bmap[4],0,0,Bmap[2],0,0,320,200,0xC0,0xff,NULL);
  283.              getnewboard();
  284.              initialize();
  285.              BltBitMap(Bmap[3],14,127,Bmap[1-frame],
  286.              98,78,124,38,0xC0,0xff,NULL);
  287.            }
  288.         }
  289.     }
  290.  Forbid();
  291.  BltBitMap(Bmap[2],98,78,Bmap[1-frame],98,78,124,38,0xC0,0xff,NULL);
  292. }
  293.  
  294. void getnewboard()                     /* random board generator */
  295. {
  296.  register short i,j,wx,wy,wd,wl;
  297.  ULONG Seconds,Micros,seed;
  298.  CurrentTime(&Seconds, &Micros);
  299.  seed=Seconds + Micros;
  300.  srand(seed);
  301.  
  302.  for (i=0;i<20;i++)
  303.     {
  304.      wx=((rand() % 28)*10)+25;
  305.      wy=((rand() % 16)*10)+25;
  306.      wd=(rand() % 10);
  307.      if (wd>5) wd=1;
  308.      else wd=0;
  309.      wl=(rand() % 7)+2;
  310.      for (j=0; j<wl; j++)
  311.       {
  312.        if ((wx>280)||(wy>160)) break;
  313.        BltBitMap(Bmap[3],26,180,Bmap[2],wx,wy,11,11,0x20,0xff,NULL);
  314.        BltBitMap(Bmap[3],14,180,Bmap[2],wx,wy,11,11,0xE0,0xff,NULL);
  315.        if (wd==0) wx=wx+10;
  316.        else wy=wy+10;
  317.       } 
  318.     }
  319. }
  320.  
  321. void setbitmap()                       /* Tell copper to display Bmap */
  322. {
  323.  *(copperlist+startword+1)  = ((ULONG)(Bmap[frame]->Planes[0]) / 65536);
  324.  *(copperlist+startword+3)  = ((ULONG)(Bmap[frame]->Planes[0]) % 65536);
  325.  *(copperlist+startword+5)  = ((ULONG)(Bmap[frame]->Planes[1]) / 65536);
  326.  *(copperlist+startword+7)  = ((ULONG)(Bmap[frame]->Planes[1]) % 65536);
  327.  *(copperlist+startword+9)  = ((ULONG)(Bmap[frame]->Planes[2]) / 65536);
  328.  *(copperlist+startword+11) = ((ULONG)(Bmap[frame]->Planes[2]) % 65536);
  329.  *(copperlist+startword+13) = ((ULONG)(Bmap[frame]->Planes[3]) / 65536);
  330.  *(copperlist+startword+15) = ((ULONG)(Bmap[frame]->Planes[3]) % 65536);
  331. }
  332.  
  333. void gameloop()                        /* main game loop */
  334. {
  335.  for (;;)
  336.  {
  337.   UpdateSounds();
  338.   if ((dead[0]==0) && (dead[1]==0))
  339.     {
  340.      readthesticks();
  341.      checkmen();
  342.      changemen();
  343.      moveboomerangs();
  344.      checkboomerangs();
  345.     }
  346.   placeobjects();
  347.   if ((dead[0])||(dead[1])) pause(100);
  348.   if (reset==1)
  349.     { 
  350.       reset=0;
  351.       pause(255);
  352.       if ((lives[0]==0)||(lives[1]==0)) dotitle();
  353.       initialize();
  354.     }
  355.  }
  356. }
  357.  
  358. void readthesticks()                   /* update x & y for men */
  359. {
  360.  register short port,i;
  361.  for (i=0; i<2; i++)
  362.   {
  363.     port=2-i;
  364.     direction[i]=STILL;
  365.  
  366.     if ((!(*cia & 64 * port))&&(bflag[i]==0)&&(safethrow[i]==0))
  367.       { bflag[i]=1;
  368.         bstate[i]=1;
  369.         obstate[i]=0;
  370.       }
  371.  
  372.     if (*joy[i] & 512)               /* stick left   */
  373.       { direction[i]=LEFT;
  374.         bdirection[i]=LEFT;
  375.         px[i]=px[i]-speed;
  376.         rpx1[i]=px[i];   rpy1[i]=py[i]+1;
  377.         rpx2[i]=rpx1[i]; rpy2[i]=py[i]+7;
  378.         rpx3[i]=rpx1[i]; rpy3[i]=py[i]+13;
  379.         continue;
  380.       }
  381.     if (*joy[i] & 2)                 /* stick right  */
  382.       { direction[i]=RIGHT;
  383.         bdirection[i]=RIGHT;
  384.         px[i]=px[i]+speed;
  385.         rpx1[i]=px[i]+11; rpy1[i]=py[i]+1;
  386.         rpx2[i]=rpx1[i];  rpy2[i]=py[i]+7;
  387.         rpx3[i]=rpx1[i];  rpy3[i]=py[i]+13;
  388.         continue;
  389.       }
  390.     if ((*joy[i]>>1^*joy[i])&256)    /*  stick up    */
  391.       { direction[i]=UP;
  392.         bdirection[i]=UP;
  393.         py[i]=py[i]-speed;
  394.         rpx1[i]=px[i]+3;  rpy1[i]=py[i];
  395.         rpx2[i]=px[i]+6;  rpy2[i]=rpy1[i];
  396.         rpx3[i]=px[i]+9;  rpy3[i]=rpy1[i];
  397.         continue;
  398.       }
  399.     if ((*joy[i]>>1^*joy[i])&1)      /*  stick down  */
  400.       { direction[i]=DOWN;
  401.         bdirection[i]=DOWN;
  402.         py[i]=py[i]+speed;
  403.         rpx1[i]=px[i]+3;  rpy1[i]=py[i]+13;
  404.         rpx2[i]=px[i]+6;  rpy2[i]=rpy1[i];
  405.         rpx3[i]=px[i]+9;  rpy3[i]=rpy1[i];
  406.         continue;
  407.       }
  408.   }
  409. }
  410.  
  411. void checkmen()
  412. {
  413.  register short color1,color2,color3,i;
  414.  for (i=0;i<2;i++)
  415.     {
  416.      safethrow[i]=0;
  417.      if (px[i]<2)   px[i]=303;         /* man run into wall? */
  418.      else  if (px[i]>303) px[i]=2;
  419.      if (py[i]<2)   py[i]=174;
  420.      else  if (py[i]>174) py[i]=2;
  421.      color1 = ReadPixel(rp,rpx1[i],rpy1[i]);
  422.      color2 = ReadPixel(rp,rpx2[i],rpy2[i]);
  423.      color3 = ReadPixel(rp,rpx3[i],rpy3[i]);
  424.      if ((color1>1)||(color2>1)||(color3>1))
  425.        {
  426.          px[i]=ox[i];
  427.          py[i]=oy[i];
  428.          safethrow[i]=1;
  429.        }
  430.     }
  431. }  
  432.  
  433. void changemen()                       /* player shape changer */
  434. {
  435.  register short i;
  436.  for (i=0; i<2; i++)
  437.    {
  438.     if ((animate[i]==4)||(olddirection[i] != direction[i]))
  439.       {
  440.         switch(direction[i])
  441.           {
  442.             case (LEFT):  if (olddirection[i]==LEFT) shapex[i]=shapex[i]+14;
  443.                           else
  444.                             { shapex[i]=15;
  445.                               olddirection[i]=LEFT;
  446.                             }
  447.                           if (i==0) shapey[i]=28;
  448.                           else shapey[i]=60;
  449.                           if (shapex[i] > 57) shapex[i]=15;
  450.                           break;
  451.  
  452.             case (RIGHT): if (olddirection[i]==RIGHT) shapex[i]=shapex[i]+14;
  453.                           else
  454.                             { shapex[i]=15;
  455.                               olddirection[i]=RIGHT;
  456.                             }
  457.                           if (i==0) shapey[i]=12;
  458.                           else shapey[i]=44;
  459.                           if (shapex[i] > 57) shapex[i]=15;
  460.                           break;
  461.  
  462.             case (UP):    if (olddirection[i]==UP) shapex[i]=shapex[i]+14;
  463.                           else
  464.                             {  shapex[i]=85;
  465.                                olddirection[i]=UP;
  466.                             }
  467.                           if (i==0) shapey[i]=28;
  468.                           else shapey[i]=60;
  469.                           if (shapex[i] > 99) shapex[i]=85;
  470.                           break;
  471.  
  472.             case (DOWN):  if (olddirection[i]==DOWN) shapex[i]=shapex[i]+14;
  473.                           else
  474.                             { shapex[i]=85;
  475.                               olddirection[i]=DOWN;
  476.                             }
  477.                           if (i==0) shapey[i]=12;
  478.                           else shapey[i]=44;
  479.                           if (shapex[i] > 99) shapex[i]=85;
  480.                           break;
  481.           }
  482.       }
  483.     if (direction[i] != STILL) 
  484.       StartSound(waveform[0],wavelength[0],JIF0,PER0,VOL0,i+2);
  485.     if (animate[i]==4) animate[i]=0;
  486.     animate[i]++;
  487.    }
  488. }
  489.  
  490. void moveboomerangs()                  /* update x & y for boomerangs */
  491. {
  492.  register short i;
  493.  for (i=0;i<2;i++)
  494.     {
  495.      if ((bflag[i])&&(bstate[i]))
  496.       {
  497.        switch(bdirection[i])
  498.         {
  499.          case (LEFT):  if (obstate[i]==0)
  500.                          { bx[i]=px[i]-6; by[i]=py[i]+3; } 
  501.                        bx[i]=bx[i]-bspeed;
  502.                        brpx1[i]=bx[i]-1; brpy1[i]=by[i]+2;
  503.                        brpx2[i]=bx[i]-1; brpy2[i]=by[i]+6;
  504.                        break;
  505.  
  506.          case (RIGHT): if (obstate[i]==0)
  507.                          { bx[i]=px[i]+8; by[i]=py[i]+3; }
  508.                        bx[i]=bx[i]+bspeed;
  509.                        brpx1[i]=bx[i]+8; brpy1[i]=by[i]+2;
  510.                        brpx2[i]=bx[i]+8; brpy2[i]=by[i]+6;
  511.                        break;
  512.  
  513.          case (UP):    if (obstate[i]==0)
  514.                          { bx[i]=px[i]+3; by[i]=py[i]-5; }
  515.                        by[i]=by[i]-bspeed;
  516.                        brpx1[i]=bx[i]+2; brpy1[i]=by[i];
  517.                        brpx2[i]=bx[i]+6; brpy2[i]=by[i];
  518.                        break;
  519.  
  520.          case (DOWN):  if (obstate[i]==0)
  521.                          { bx[i]=px[i]+3; by[i]=py[i]+11; }
  522.                        by[i]=by[i]+bspeed;
  523.                        brpx1[i]=bx[i]+2; brpy1[i]=by[i]+7;
  524.                        brpx2[i]=bx[i]+6; brpy2[i]=by[i]+7;
  525.                        break;
  526.         }
  527.        if ((brpy1[i]<1)||(brpy2[i]<1))     brpy1[i]=brpy2[i]=179;
  528.        else if ((brpy1[i]>179)||(brpy2[i]>179)) brpy1[i]=brpy2[i]=1;
  529.        if ((brpx1[i]<1)||(brpx2[i]<1))     brpx1[i]=brpx2[i]=310;
  530.        else if ((brpx1[i]>310)||(brpx2[i]>310)) brpx1[i]=brpx2[i]=1;
  531.        if (animate[i]==4)
  532.          {  bshapex[i]=bshapex[i]+10;
  533.             if (bshapex[i] > 45) bshapex[i] = 15;
  534.          }
  535.       }
  536.     }
  537. }
  538.  
  539. void checkboomerangs()                 /* check boomerangs for collisions */
  540. {
  541.  register short i,color1,color2,color3,ch;
  542.  for (i=0;i<2;i++)
  543.   {                                    /* is boomerang out there? */
  544.    if (bflag[i])                     
  545.     {                                  /* did it hit the enemy?   */
  546.      if ((((bx[i]   > px[1-i]) && (bx[i]   < px[1-i]+12))  && /* hit enemy? */
  547.           ((by[i]   > py[1-i]) && (by[i]   < py[1-i]+12))) ||
  548.          (((bx[i]+8 > px[1-i]) && (bx[i]+8 < px[1-i]+12))  &&
  549.           ((by[i]+8 > py[1-i]) && (by[i]+8 < py[1-i]+12))))
  550.        {                              
  551.         *dmaconw=0x000F; for (ch=0;ch<4;ch++) inuse[ch]=0;
  552.         StartSound(waveform[2],wavelength[2],JIF2,PER2,VOL2,0);
  553.         lives[1-i]--;
  554.         dead[1-i]=1;
  555.         next=20;
  556.         if (lives[1-i] > 0) BltBitMap(Bmap[3],bulbshapex[1-i],bulbshapey[1-i],
  557.                             Bmap[2],bulbx[1-i],190,5,5,0xC0,0xff,NULL);
  558.         if (i==1) bulbx[0]=bulbx[0]+14;
  559.           else bulbx[1]=bulbx[1]-14;
  560.        }
  561.                                        /* pick up boomerang if out there */
  562.  
  563.      if (((rpx2[i]>=bx[i])&&(rpx2[i]<=bx[i]+8)) &&             
  564.             ((rpy2[i]>=by[i])&&(rpy2[i]<=by[i]+8)))
  565.           {
  566.            bflag[i]=0;
  567.            BltBitMap(Bmap[2],bx[i],by[i],Bmap[frame],
  568.            bx[i],by[i],9,9,0xC0,0xff,NULL);
  569.            BltBitMap(Bmap[2],obx[i],oby[i],Bmap[1-frame],
  570.            obx[i],oby[i],9,9,0xC0,0xff,NULL);
  571.           }
  572.      
  573.      if (bstate[i]==1)                 /* boomerang flying?   */
  574.        {
  575.         if (bx[i]<1) bx[i]=310;    
  576.         else if (bx[i]>310) bx[i]=1;
  577.         if (by[i]<1) by[i]=179;
  578.         else if (by[i]>179) by[i]=1;        /* boomerang hit a wall? */
  579.         if (obstate[i]==0)
  580.           { obx[i]=bx[i];
  581.             oby[i]=by[i];
  582.           }
  583.         color1 = ReadPixel(rp,brpx1[i],brpy1[i]);
  584.         color2 = ReadPixel(rp,brpx2[i],brpy2[i]);
  585.         color3 = ReadPixel(rp,bx[i]+4,by[i]+4); 
  586.         if ((color1>1)||(color2>1)||(color3>1)) 
  587.           { bstate[i]=0;
  588.             if (obstate[i]==0)
  589.               { bflag[i]=0;
  590.                 BltBitMap(Bmap[2],bx[i],by[i],Bmap[frame],
  591.                 bx[i],by[i],9,9,0xC0,0xff,NULL);
  592.                 BltBitMap(Bmap[2],obx[i],oby[i],Bmap[1-frame],
  593.                 obx[i],oby[i],9,9,0xC0,0xff,NULL);
  594.                 continue;
  595.               }
  596.              else
  597.               {
  598.                bx[i]=obx[i];
  599.                by[i]=oby[i];
  600.               }
  601.           }
  602.                                        /* boomerang hit thrower? */
  603.  
  604.         if ((((brpx1[i] > px[i]+3)&&(brpx1[i] < px[i]+8))  &&
  605.              ((brpy1[i] > py[i]+3)&&(brpy1[i] < py[i]+8))) ||
  606.             (((brpx2[i] > px[i]+3)&&(brpx2[i] < px[i]+8))  &&
  607.              ((brpy2[i] > py[i]+3)&&(brpy2[i] < py[i]+8))))
  608.           {      
  609.            bflag[i]=bstate[i]=0;
  610.            BltBitMap(Bmap[2],bx[i],by[i],Bmap[frame],
  611.            bx[i],by[i],9,9,0xC0,0xff,NULL);
  612.            BltBitMap(Bmap[2],obx[i],oby[i],Bmap[1-frame],
  613.            obx[i],oby[i],9,9,0xC0,0xff,NULL);
  614.           }
  615.         if ((animate[i]==4)&&(bstate[i]==1)) 
  616.           StartSound(waveform[1],wavelength[1],JIF1,PER1,VOL1,i);
  617.        }
  618.     }
  619.   } 
  620. }
  621.  
  622. void placeobjects()        /* Bust holes in background & place objects */
  623. {
  624.  register short i;
  625.  for (i=0;i<2;i++)
  626.   {
  627.    if (dead[i]==0)                     /* if man is safe */
  628.     {
  629.      BltBitMap(Bmap[3],shapex[i]+112,shapey[i],Bmap[frame],
  630.      px[i],py[i],13,15,0x20,0xff,NULL);
  631.      BltBitMap(Bmap[3],shapex[i],shapey[i],Bmap[frame],
  632.      px[i],py[i],13,15,0xE0,0xff,NULL);
  633.     }
  634.    else                                /* else kill him  */
  635.     {
  636.      if (deadshapex==0) deadshapex=15;
  637.      else deadshapex=deadshapex+next;
  638.      if (deadshapex>75)
  639.        { deadshapex=55;
  640.          next=-20;
  641.        }
  642.      if (deadshapex<15) reset=1;
  643.      else
  644.        {
  645.         BltBitMap(Bmap[3],deadshapex+112,deadshapey,Bmap[frame],
  646.         px[i]-2,py[i]-2,19,17,0x20,0xff,NULL);
  647.         BltBitMap(Bmap[3],deadshapex,deadshapey,Bmap[frame],
  648.         px[i]-2,py[i]-2,19,17,0xE0,0xff,NULL);
  649.        }
  650.     }
  651.    if (bflag[i])                       /* blit boomerang */
  652.      {
  653.       BltBitMap(Bmap[3],bshapex[i]+112,bshapey[i],Bmap[frame],
  654.       bx[i],by[i],9,9,0x20,0xff,NULL);
  655.       BltBitMap(Bmap[3],bshapex[i],bshapey[i],Bmap[frame],
  656.       bx[i],by[i],9,9,0xE0,0xff,NULL);
  657.      }
  658.   }
  659.  
  660.  flipem();
  661.                                        /* Repair background */
  662.  BltBitMap(Bmap[2],ox[0],oy[0],Bmap[frame],ox[0],oy[0],13,15,0xC0,0xff,NULL); 
  663.  BltBitMap(Bmap[2],ox[1],oy[1],Bmap[frame],ox[1],oy[1],13,15,0xC0,0xff,NULL);
  664.  if (bflag[0]) BltBitMap(Bmap[2],obx[0],oby[0],Bmap[frame],
  665.                obx[0],oby[0],9,9,0xC0,0xff,NULL);
  666.  if (bflag[1]) BltBitMap(Bmap[2],obx[1],oby[1],Bmap[frame],
  667.                obx[1],oby[1],9,9,0xC0,0xff,NULL);
  668.  if (dead[0])
  669.      BltBitMap(Bmap[2],px[0]-2,py[0]-2,Bmap[frame],
  670.      px[0]-2,py[0]-2,19,17,0xC0,0xff,NULL);
  671.  if (dead[1])
  672.      BltBitMap(Bmap[2],px[1]-2,py[1]-2,Bmap[frame],
  673.      px[1]-2,py[1]-2,19,17,0xC0,0xff,NULL);
  674.  ox[0]=px[0],oy[0]=py[0],ox[1]=px[1],oy[1]=py[1];
  675.  obx[0]=bx[0],oby[0]=by[0],obx[1]=bx[1],oby[1]=by[1];
  676.  obstate[0]=bstate[0],obstate[1]=bstate[1];
  677. }
  678.  
  679. void flipem()                          /* Double-buffer controller */
  680. {
  681.   while (VBeamPos() != 250);
  682.   setbitmap();
  683.   frame = (1 - frame);
  684.   scr->BitMap = *Bmap[frame];
  685. }
  686.  
  687. void pause(pcount)
  688. USHORT pcount;
  689. {
  690.  short i;
  691.  for (i=0;i<pcount;i++) WaitBOVP(vp);   
  692. }
  693.     
  694. void cleantheamiga()                   /* cleanup routine */
  695. {
  696.  register short i,j;
  697.  Permit();
  698.  ClearPointer(wdw);
  699.  KillSounds();
  700.  if (wdw != NULL) CloseWindow(wdw);
  701.  if (scr != NULL) CloseScreen(scr);
  702.  for (j=0; j<5; j++)
  703.    { if (Bmap[j] != NULL)
  704.        { for (i=0; i<4; i++)
  705.          { if (Bmap[j]->Planes[i] != 0)
  706.            FreeRaster(Bmap[j]->Planes[i],320,200);
  707.          }
  708.         FreeMem(Bmap[j], sizeof(struct BitMap));
  709.        }
  710.    }
  711.  CloseLibrary(IntuitionBase);
  712.  CloseLibrary(GfxBase);
  713.  exit(FALSE);
  714. }
  715.