-- converts marks into arrows local spectral = getf "x" -- getting the bounds of the spectrum local right = spectral.start local left = right + spectral.width local top, bottom if numdim() > 1 then spectral = getf "y" top = spectral.start bottom = top + spectral.width else top, bottom = paper() top = bottom * amp() bottom = - top end local M = { getmarks () } -- gets the marks mark() -- deletes the marks local n = table.getn( M ) -- number of vertical marks for i = 1,n do arrow( M[i], top, M[i], bottom, 0x2c0 ) end M = { getmarks "h" } -- repeating for horizontal marks mark "h" n = table.getn( M ) for i = 1,n do arrow( left, M[i], right, M[i], 0x2c0 ) end amp()