home *** CD-ROM | disk | FTP | other *** search
/ io Programmo 23 / IOPROG_23.ISO / SOFT / RAYCAST.ZIP / SPRMOVE.CPP < prev    next >
Encoding:
C/C++ Source or Header  |  1995-10-17  |  7.0 KB  |  248 lines

  1. #include "ray.h"
  2. #include "globals.h"
  3. #include "bspmove.h"
  4. #include "blockbsp.h"
  5. #include "rayspr.h"
  6. #include "blockmap.h"
  7. #include "forever.h"
  8. #include "abs.h"
  9. #include "sign.h"
  10. #include "fixed.h"
  11. #include "error.h"
  12. #include "collisio.h"
  13. #include "message.h"
  14. #include "objcol.h"
  15.  
  16. #define MIN_DIS_FROM_WALL 1500
  17. #define MAX_LINE_DIS (128<<SHIFT)
  18.  
  19. void Do_Move_Correction(pvector2 input_source_vec, pvector2 delta_vec);
  20. void Do_Block_Correction(short block_x,
  21.    short block_y, pvector2 dest_vec, plinedef closest_line, MYFIXED & min_dis);
  22.  
  23.  
  24. short Move_Object_Dir(pobject source_obj, angle_type move_angle, long distance)
  25. {
  26. vector2 delta_vec;
  27. delta_vec.x=(rcos_table[move_angle]*distance)>>SHIFT;
  28. delta_vec.y=(rsin_table[move_angle]*distance)>>SHIFT;
  29. return Move_Object_Vec(source_obj, &delta_vec);
  30. }
  31.  
  32. short Move_Object_Vec(pobject source_obj, pvector2 delta_vec)
  33. {
  34. vector2 source_vec;
  35. source_vec.x=source_obj->x;
  36. source_vec.y=source_obj->y;
  37.  
  38. wall_collision_info wal_col;
  39. wal_col.move_obj=source_obj;
  40. wal_col.delta_vec=delta_vec;
  41. checkwalls(&wal_col);
  42. if (wal_col.found_collision) {
  43.   if (Send_Specific_Message(NULL, source_obj, WALL_COLLISION, (pdata)&wal_col))
  44.     return 0;
  45. }
  46.  
  47. obj_collision obj_col;
  48. obj_col.move_obj=source_obj;
  49. obj_col.delta_x=delta_vec->x;
  50. obj_col.delta_y=delta_vec->y;
  51. Check_Obj_Collision(&obj_col);
  52. if (obj_col.found_collision) {
  53.   if (Send_Specific_Message(obj_col.move_obj, obj_col.col_obj,
  54.      HIT_BY_OBJ, (pdata)&obj_col))
  55.      return 0;
  56.   if (Send_Specific_Message(obj_col.col_obj, obj_col.move_obj,
  57.      HIT_OBJ, (pdata)&obj_col))
  58.      return 0;
  59.  
  60. delta_vec->x=obj_col.delta_x;
  61. delta_vec->y=obj_col.delta_y;
  62.  
  63. source_obj->x+=delta_vec->x;
  64. source_obj->y+=delta_vec->y;
  65.  
  66. USHORT new_block_x, new_block_y;
  67. new_block_x=Block_X(source_obj->x);
  68. new_block_y=Block_Y(source_obj->y);
  69. if ( (new_block_x!=source_obj->block_x) || (new_block_y!=source_obj->block_y) ) {
  70.    OL_Delete_Node(source_obj->block_node,
  71.       *Get_Block_Obj_List(source_obj->block_x, source_obj->block_y));
  72.    OL_Push_Node(source_obj->block_node,
  73.       *Get_Block_Obj_List(new_block_x, new_block_y));
  74.    source_obj->block_x=new_block_x;
  75.    source_obj->block_y=new_block_y;
  76.    }
  77.  
  78. long starting_node_index;
  79.  
  80. // Get a starting index to do bsp seaching
  81. starting_node_index=Get_Closest_Node(source_obj->x, source_obj->y);
  82.  
  83. // Get the ssector
  84.  
  85. pssector new_ss=Get_Object_SSector(source_obj, starting_node_index);
  86.  
  87. // Have we changed sub sectors?
  88.  
  89. if (new_ss!=source_obj->cur_ss) {
  90.  
  91.   // Then move object from one sub sectors draw list to another's
  92.  
  93.   OL_Delete_Node(source_obj->ss_node, source_obj->cur_ss->objects);
  94.   source_obj->cur_ss->num_objects--;
  95.   OL_Push_Node(source_obj->ss_node,new_ss->objects);
  96.   new_ss->num_objects++;
  97.  
  98.   source_obj->cur_ss=new_ss;
  99.  
  100.   // Have we changed sectors?
  101.  
  102.   psector new_sec=Get_Sec_From_SSec(new_ss);
  103.   if (new_sec!=source_obj->cur_sec) {
  104.  
  105.      // Then update object's sector z value
  106.  
  107.      source_obj->type->Update_Z(source_obj, new_sec);
  108.  
  109.      source_obj->cur_sec=new_sec;
  110.  
  111.   }
  112.  
  113. }
  114.  
  115. return 0;
  116. }
  117.  
  118. void Do_Move_Correction(pvector2 input_source_vec, pvector2 delta_vec) {
  119.  
  120. vector2 source_vec, base_vec, old_vec;
  121. short cur_block_x, cur_block_y, dest_block_x, dest_block_y, next_block_x, next_block_y;
  122. long next_x_line, next_y_line, dist_major, dist_minor;
  123.  
  124. source_vec.x=input_source_vec->x;
  125. source_vec.y=input_source_vec->y;
  126. base_vec.x=source_vec.x;
  127. base_vec.y=source_vec.y;
  128. old_vec.x=base_vec.x;
  129. old_vec.y=base_vec.y;
  130.  
  131. FOREVER {
  132.  
  133.    Do_Block_Correction(cur_block_x, cur_block_y, NULL,NULL,dist_major);
  134.  
  135.    if ( (base_vec.x!=old_vec.x) || (base_vec.y!=old_vec.y) ) {
  136.       old_vec.x=base_vec.x;
  137.       old_vec.y=base_vec.y;
  138.       source_vec.x=base_vec.x;
  139.       source_vec.y=base_vec.y;
  140.       cur_block_x=Block_X(source_vec.x);
  141.       cur_block_y=Block_Y(source_vec.y);
  142.    }
  143.  
  144.    dest_block_x=Block_X(base_vec.x+delta_vec->x);
  145.    dest_block_y=Block_Y(base_vec.y+delta_vec->y);
  146.  
  147.    if ( (cur_block_x==dest_block_x) && (cur_block_y==dest_block_y) ) { 
  148.       break;
  149.    }
  150.  
  151.    if (delta_vec->x >= 0) {
  152.       next_block_x=cur_block_x+1;
  153.       next_x_line=Block_Right_Line(source_vec.x);
  154.    } else {
  155.       next_block_x=cur_block_x-1;
  156.       next_x_line=Block_Left_Line(source_vec.x);
  157.    }
  158.  
  159.    if (delta_vec->y >= 0) {
  160.       next_block_y=cur_block_y+1;
  161.       next_y_line=Block_Top_Line(source_vec.y);
  162.    } else {
  163.       next_block_y=cur_block_y-1;
  164.       next_y_line=Block_Bottom_Line(source_vec.y);
  165.    }
  166.  
  167.    if (ABS(delta_vec->x)>ABS(delta_vec->y)) {
  168.       
  169.       dist_minor=(next_y_line-source_vec.y)<<SHIFT;
  170.       dist_major=fixedmd((next_x_line-source_vec.x)<<SHIFT, 
  171.          delta_vec->y, delta_vec->x); 
  172.       
  173.       if (ABS(dist_major)<ABS(dist_minor)) {
  174.          source_vec.x=next_x_line;
  175.          source_vec.y+=(dist_major>>SHIFT);
  176.          cur_block_x=next_block_x;
  177.       } else {
  178.          source_vec.y=next_y_line;
  179.          source_vec.x+=fixedmd(dist_minor, delta_vec->x, delta_vec->y)>>SHIFT;
  180.          cur_block_y=next_block_y;
  181.       }
  182.  
  183.    } else {
  184.    
  185.       dist_minor=(next_x_line-source_vec.x)<<SHIFT;
  186.       dist_major=fixedmd((next_y_line-source_vec.y)<<SHIFT, 
  187.          delta_vec->x, delta_vec->y); 
  188.       
  189.       if (ABS(dist_major)<ABS(dist_minor)) {
  190.          source_vec.y=next_y_line;
  191.          source_vec.x+=(dist_major>>SHIFT);
  192.          cur_block_y=next_block_y;
  193.       } else {
  194.          source_vec.x=next_x_line;
  195.          source_vec.y+=fixedmd(dist_minor, delta_vec->y, delta_vec->x)>>SHIFT;
  196.          cur_block_x=next_block_x;
  197.       }
  198.  
  199.    }
  200.  
  201. }  
  202.  
  203. // make delta's from original position
  204. delta_vec->x=(source_vec.x+delta_vec->x)-input_source_vec->x;
  205. delta_vec->y=(source_vec.y+delta_vec->y)-input_source_vec->y;
  206. }
  207.  
  208. void Do_Block_Correction(short block_x,
  209.    short block_y, pvector2 dest_vec, plinedef closest_line, MYFIXED & min_dis)
  210. {
  211.    pline_list cur_line_list;
  212.    plinedef cur_line;
  213.    short cur_line_index;
  214.    long x1,x2,y1,y2, dest_dis, line_relation, line_dis;
  215.  
  216.    cur_line_list=Get_Block_Line_List(block_x, block_y);
  217.  
  218.       closest_line=NULL;
  219.  
  220.       for (cur_line_index=0; cur_line_index< cur_line_list->line_count; cur_line_index++) {
  221.  
  222.          cur_line=cur_line_list->lines[cur_line_index];
  223.          x1=Vector_List[cur_line->v[0]].x;
  224.          y1=Vector_List[cur_line->v[0]].y;
  225.          x2=Vector_List[cur_line->v[1]].x;
  226.          y2=Vector_List[cur_line->v[1]].y;
  227.          //line_dis=cur_line->distance;
  228.  
  229.          line_relation=fixeddiv( ((y1-y2)*(y1-dest_vec->y)-(x2-x1)*(x1-dest_vec->x)) << SHIFT,
  230.                 fixedmult(line_dis,line_dis));
  231.          if (line_relation<0 || line_relation>ONE)
  232.             dest_dis=MAX_LINE_DIS;
  233.          else {
  234.             dest_dis=fixeddiv(((x2-x1)*(dest_vec->y-y2)-(y1-y2)*(dest_vec->x-x2))<<SHIFT, line_dis);
  235.          }
  236.  
  237.          // have we found a closer intersecting line?
  238.          if (dest_dis<min_dis) {
  239.             closest_line=cur_line;
  240.             min_dis=dest_dis;
  241.             }
  242.  
  243.       } /* endfor */
  244.  
  245. }
  246.   
  247.