//------------------ uniq.mac ------------------------------------- disabledraw; gofiletop; while(1){ selectline; $$line = gettext(seltopx,seltopy,selendx,selendy); if($$line == $$bline){ selectline; delete; } else movetolineno 1,lineno + 1; if(lineno == linecount2) break; $$bline = $$line; } enabledraw; endmacro;