Anonymous user
Bitmap/Bézier curves/Cubic: Difference between revisions
Added solution for MATLAB
(Added BBC BASIC) |
(Added solution for MATLAB) |
||
Line 423:
Graphics[{BSplineCurve[points], Green, Line[points], Red, Point[points]}]</lang>
[[File:MmaCubicBezier.png]]
=={{header|MATLAB}}==
Save this in the @Bitmap folder as bezierCurve.mat.
<lang MATLAB>
function bezierCurve(obj,pixel_0,pixel_1,pixel_2,pixel_3,color,varargin)
if( isempty(varargin) )
resolution = 20;
else
resolution = varargin{1};
end
%Calculate time axis
time = (0:1/resolution:1)';
timeMinus = 1-time;
%The formula for the curve is expanded for clarity, the lack of
%loops is because its calculation has been vectorized
curve = (timeMinus).^3*pixel_0; %First term of polynomial
curve = curve + (3.*time.*timeMinus.^2)*pixel_1; %second term of polynomial
curve = curve + (3.*timeMinus.*time.^2)*pixel_2; %third term of polynomial
curve = curve + time.^3*pixel_3; %Fourth term of polynomial
curve = round(curve); %round each of the points to the nearest integer
%connect each of the points in the curve with a line using the
%Bresenham Line algorithm
for i = (1:length(curve)-1)
obj.bresenhamLine(curve(i,:),curve(i+1,:),color);
end
assignin('caller',inputname(1),obj); %saves the changes to the object
end
</lang>
Sample usage:
This will generate the image example for the PHP solution.
<lang MATLAB>
>> img = Bitmap(200,200);
>> img.fill([255 255 255]);
>> img.bezierCurve([160 10],[10 40],[30 160],[150 110],[255 0 0],110);
>> disp(img)
</lang>
=={{header|OCaml}}==
| |||