1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
function[dstImg] = arrowedline(srcImg, x1, y1, x2, y2, R, G, B, varargin)
[lhs, rhs] = argn(0)
srcMat = mattolist(srcImg)
select rhs
case 8 then
out = arrowedline(srcMat, x1, y1, x2, y2, R, G, B)
case 9 then
out = arrowedline(srcMat, x1, y1, x2, y2, R, G, B,varargin(1))
case 10 then
out = arrowedline(srcMat, x1, y1, x2, y2, R, G, B, varargin(1),varargin(2))
case 11 then
out = arrowedline(srcMat, x1, y1, x2, y2, R, G, B, varargin(1),varargin(2), varargin(3))
case 12 then
out = arrowedline(srcMAt, x1, y1, x2, y2, R, G, B, varargin(1),varargin(2), varargin(3), varargin(4))
end
channels = size(out)
for i = 1:channels
dstImg(:,:,1) = out(1)
end
endfunction
|
