0x708b…0e2f

All memos sent from and to 0x708b…0e2f.

anglesX = '';anglesY = '';vectorsX = '';vectorsY = '';widths_all = '';scales_all = '';arrows_all = '';border = '';cols = {[''], ['']}; types = '';kk = '';col = '';tpp = '';PI = pi;type = types(kk);horiz_ang = anglesX(kk);verti_ang = anglesY(kk);xor_wrap = vectorsX(kk);yor_wrap = vectorsY(kk);widths = widths_all(kk); scales = scales_all(kk);arrows = arrows_all(kk);col_m2 = cols{col, 1};bg_wrap_col = cols{col, 1}; fg_col = cols{col, 2};[hor_sh,vert_sh] = meshgrid(-PI:PI/xor_wrap:PI,-PI:PI/yor_wrap:PI); if type == 1 x_mag = sind(vert_sh*horiz_ang); y_mag = cosd(hor_sh*verti_ang); elseif type == 2 x_mag = sind(vert_sh*horiz_ang) + cos(vert_sh*verti_ang); y_mag = cosd(hor_sh*verti_ang); elseif type == 3 x_mag = sind(vert_sh*horiz_ang); y_mag = tand(hor_sh*verti_ang); elseif type == 4 x_mag = cosd(vert_sh*horiz_ang); y_mag = tand(hor_sh*verti_ang); elseif type == 5 x_mag = sind(vert_sh*horiz_ang) + cos(vert_sh*verti_ang); y_mag = tand(hor_sh*verti_ang); elseif type == 6 x_mag = sind(vert_sh*horiz_ang); y_mag = sind(hor_sh*verti_ang); elseif type == 7 x_mag = cosd(vert_sh*horiz_ang); y_mag = cosd(hor_sh*verti_ang); end if border == 1 rel_col = fg_col; else rel_col = bg_wrap_col; rel_col = [1, 1, 1]; end border_col = bg_wrap_col;full_map = repmat(col_m2, [150, 1]);g = figure();g.Position = [100, 100, 1100, 1100];set(g, 'Color', border_col);set(g, 'InvertHardcopy', 'off') quiver(hor_sh, vert_sh, x_mag, y_mag, 'color', rel_col, 'linewidth', widths, 'AutoScaleFactor', scales, 'MaxHeadSize', arrows); hold on; if any(kk == 1) set(gca, 'color', border_col); else if border == 1 set(gca, 'color', border_col); else set(gca, 'color', border_col - min(border_col) / 2.5); end end xticklabels([]); yticklabels([]); set(gca,'XColor','none') set(gca,'YColor','none') axis 'auto_y'