【玩具】ANU Matlab Toy-Robot Movement Simulation

给朋友做的，当是放松了。。。本人真心不会matlab，下面的代码不代表个人水平，纯属堆砌。

这个程序模拟了一些机器人在一个方形空间中的移动轨迹。

clc;

clear all;

close all;



%--------------------Input parameters------------------

%R=input('Number of Robots: ');

%L=input('Length of the Room (m): ');

%N=input('Number of Steps: ');

%S=input('Maximum Size of each Step (cm):');

%typeN=input('Type of the North Wall (Reflecting(0)/Absorbing(1)): ');

%typeS=input('Type of the South Wall (Reflecting(0)/Absorbing(1)): ');

%typeW=input('Type of the West Wall (Reflecting(0)/Absorbing(1)): ');

%typeE=input('Type of the East Wall (Reflecting(0)/Absorbing(1)): ');



%-----------random----------------

%R = round(unifrnd(3,10,1,1));

%L = round(unifrnd(1,10,1,1));

%N = round(unifrnd(10,100,1,1));

%S = round(unifrnd(10,100,1,1));



%---------pre_assignment------------------

R = 8;

L = 1;

N = 10;

S = 50;

typeN = 0;

typeS = 0;

typeW = 0;

typeE = 0;





%B=zeros(N+1,3);

B=[];

B(1,:)=[0 0 0];

save result B;

M=N;

for i=1:R

    N = M;

    t = 1;

    position=[0 0 0];

while N>0

    B(M-N+1,:)=position;

    save result B;

    step = rand(1,1)*S;

    d = floor(rand(1,1)*4);

    [nextposition,N] = newposition(d,step,position,L,typeN,typeS,typeW,typeE,N);

    position=nextposition;

    N=N-1;

    t=t+1;

   %disp(position);

end

 B(t,:)=position;

 disp(B);

 plot3(B(:,1),B(:,2),B(:,3),'*-','color',[mod(floor((i-1)/4),2),mod(floor((i-1)/2),2),mod((i-1),2)]);

 hold on;

 title('Position of the Robots');

 text(0,0,0,'Origin');

 text(0,50*L,0,'North');

 text(0,-50*L,0,'South');

 text(50*L,0,0,'West');

 text(-50*L,0,0,'East');

 axis([-50*L 50*L -50*L 50*L 0 M]);

 grid on

end

function [ nextposition ,N] = newposition( d,step,position,L,typeN,typeS,typeW,typeE,N )

    %disp(position);

    if d==0

        nextposition = position + [0 step 1];

            if nextposition(2)>50*L

                if typeN==0

                    new=100*L-nextposition(2);

                    nextposition(2)=new;

                else 

                    nextposition(2)=50*L;

                    N=0;

                end

            end

            

    elseif d==1

        nextposition = position + [0 -step 1];

         if nextposition(2)<-50*L

             if typeS==0

                new=-100*L-nextposition(2);

                nextposition(2)=new;

             else

                nextposition(2)=- 50*L;

                N=0;

             end

        end 

    elseif d==2

        nextposition = position + [step 0 1];

        if nextposition(1)>50*L

            if typeE==0

                new=100*L-nextposition(1);

                nextposition(1)=new;  

            else

                nextposition(1)=50*L;

                N=0;

            end

        end

    else

        nextposition = position + [-step 0 1];

         if nextposition(1)<-50*L

             if typeW==0

                new=-100*L-nextposition(1);

                nextposition(1)=new;

             else

                 nextposition(1)=-50*L;

                 N=0;

             end

         end

    end

end