function PlotSolution2(sol,model,s)

    J=model.Usedveihcle(s);
global next_helpstatue;
global before_helpstatue;
    xmin=model.xmin;
    xmax=model.xmax;
    ymin=model.ymin;
    ymax=model.ymax;
    
    x=model.x;
    y=model.y;
    x0=model.x0;
    y0=model.y0;
    
    L=sol.L;
    % 
       
    Colors=hsv(J);
    
    for j=1:J-(next_helpstatue(s)+before_helpstatue(s))
    %%    
        if isempty(L{j})
            continue;
        end
        
        X=[x0(s) x(s,L{j}) x0(s)];
        Y=[y0(s) y(s,L{j}) y0(s)];
        
        Color=0.8*Colors(j,:);
        
        plot(X,Y,'-',...
            'Color',Color,...
            'LineWidth',1,...
            'MarkerSize',3,...
            'MarkerFaceColor','white');
        hold on;
        
    end
    
    for j=J-(before_helpstatue(s)+next_helpstatue(s))+1:J-next_helpstatue(s)
        
        if isempty(L{j})
            continue;
        end
        
         X=[x0(s-1) x(s,L{j}) x0(s)];
        Y=[y0(s-1) y(s,L{j}) y0(s)];   
     %   end
        
        Color=0.8*Colors(j,:);
        
        plot(X,Y,'--',...
            'Color',Color,...
            'LineWidth',1,...
            'MarkerSize',3,...
            'MarkerFaceColor','white');
        hold on;
        
    end
    
    for j=J-next_helpstatue(s)+1:J
        
        if isempty(L{j})
            continue;
        end
        
         X=[x0(s+1) x(s,L{j}) x0(s)];
        Y=[y0(s+1) y(s,L{j}) y0(s)];   
     %   end
        
        Color=0.8*Colors(j,:);
        
        plot(X,Y,'--',...
            'Color',Color,...
            'LineWidth',1,...
            'MarkerSize',3,...
            'MarkerFaceColor','white');
        hold on;
        
    end
    %%
         for k=1: model.I(s)
           if model.r(s,(k))==0
               p(k)='b';
           else
              p(k)='r'; 
           end
              
        plot(x(s,k),y(s,k),'o',...
            'LineWidth',1,...
            'MarkerSize',3,...
            'MarkerEdgeColor',p(k));
        hold on;
          
           
         end
     %%
    axis equal
    plot(x0(s),y0(s),'ks',...
        'LineWidth',1,...
        'MarkerSize',6,...
        'MarkerFaceColor','yellow');
    
   % hold off;
    
end