Home > src > BN_pol_rec > visualization > drowEnemy.m

drowEnemy

PURPOSE ^

Drows rectancle around x and y in direction v

SYNOPSIS ^

function [a] = drowEnemy(x,y, realData)

DESCRIPTION ^

 Drows rectancle around x and y in direction v

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

SOURCE CODE ^

0001 
0002 function [a] = drowEnemy(x,y, realData)
0003 % Drows rectancle around x and y in direction v
0004 
0005 if realData 
0006     line_width = 2.5;
0007 else
0008     line_width = 1;
0009 end;
0010 
0011 a = 10;
0012 b = 6;
0013 c = 6;
0014 r = 1;
0015 
0016 text(x,(y-(b/2)-2.5),'|','LineWidth',line_width*10, 'Color','r'), hold on  
0017            
0018 X1 = [x-a/2; x+a/2];
0019 Y1 = [y+b/2; y+b/2];
0020 plot(X1,Y1 ,'red', 'LineWidth',line_width,...
0021                 'MarkerEdgeColor','r',...
0022                 'MarkerFaceColor','r',...
0023                 'MarkerSize',5)    
0024 
0025 X2 = [x+a/2; x+a/2];
0026 Y2 = [y-b/2; y+b/2];
0027 plot(X2,Y2, 'red', 'LineWidth',line_width,...
0028                 'MarkerEdgeColor','r',...
0029                 'MarkerFaceColor','r',...
0030                 'MarkerSize',5)      
0031 
0032 X3 = [x-a/2; x-a/2];
0033 Y3 = [y+b/2; y-b/2];
0034 plot(X3,Y3, 'red', 'LineWidth',line_width,...
0035                 'MarkerEdgeColor','r',...
0036                 'MarkerFaceColor','r',...
0037                 'MarkerSize',5)    
0038 
0039 X4 = [x-a/2; x+a/2];
0040 Y4 = [y-b/2; y-b/2];
0041 plot(X4,Y4, 'red', 'LineWidth',line_width,...
0042                 'MarkerEdgeColor','r',...
0043                 'MarkerFaceColor','r',...
0044                 'MarkerSize',5)    
0045 
0046 alfa1 = [(pi/2):0.001:(3*pi/2)];
0047 xr1 = r.*cos(alfa1) + (x-(c/2)).*ones(size(alfa1));
0048 yr1 = r.*sin(alfa1) + y.*ones(size(alfa1));
0049 plot(xr1',yr1', 'red')
0050 
0051 alfa2 = [(-pi/2):0.001:(pi/2)];
0052 xr2 = r.*cos(alfa2) + (x+(c/2)).*ones(size(alfa2));
0053 yr2 = r.*sin(alfa2) + y.*ones(size(alfa2));
0054 plot(xr2',yr2', 'red')
0055 
0056 X6 = [x-(c/2); x+(c/2)];
0057 Y6 = [y-1; y-1];
0058 plot(X6,Y6, 'red')
0059 
0060 X7 = [x-(c/2); x+(c/2)];
0061 Y7 = [y+1; y+1];
0062 plot(X7,Y7, 'red')
0063 
0064 
0065

Generated on Wed 16-Mar-2005 09:17:47 by m2html © 2003