The hard part here is keeping click-drag selection working (without pressing and holding shift).
RMKMPFT5L67WIFWIO4GTC6XESX6UPKNL4GPNQLOBC5CXSUZABEHQC QZH3PQFUBL2ISJBJ4PBALVKUPKQ4QKGNKSFASEXWYB5J7ODL42KQC 3TCZ7ADHZ4YALUYII4QRSITV2VUKN645P7D7XTXD7ASFZTAP7THAC LXTTOB33N2HCUZFIUDRQGGBVHK2HODRG4NBLH6RXRQZDCHF27BSAC DHI6IJCNSTHGED67T6H5X6Y636C7PIDGIJD32HBEKLT5WIMRS5MAC 5FW7YOFTLKHRND6IOR4HG4X3C5BO2WV5KTEUW3PPKCRU5L5GXKXQC OTIBCAUJ3KDQJLVDN3A536DLZGNRYMGJLORZVR3WLCGXGO6UGO6AC HYEAFRZ2UEKDYTAE2GDQLHEJBPQASP2NDLMXB7F6MTVK2BKOXKEAC ZLJGZYQGQ2S4UFWTVF4PQDSGMP6A4IS4GDHCMBAAA5SK2N2NWR3QC 2INHXC3KRJVZTX2BQ63ZQLHIC5SWPUG4PQKCMLC7SQKN5R7LJZ6QC 2ENZW7TVCS47BWCA4AIEVGKGMT4Y2TSM5IJ7O5K2VSWNXIN3SG4QC endfunction test_select_text_repeatedly_using_mouse_and_shift()io.write('\ntest_select_text_repeatedly_using_mouse_and_shift')App.screen.init{width=50, height=60}Lines = load_array{'abc', 'def', 'xyz'}Line_width = App.screen.widthCursor1 = {line=1, pos=1}Screen_top1 = {line=1, pos=1}Screen_bottom1 = {}Selection1 = {}App.draw() -- populate line.y for each line in Lineslocal screen_left_margin = 25 -- pixels-- click on first locationApp.run_after_mousepress(screen_left_margin+8,Margin_top+5, '1')App.run_after_mouserelease(screen_left_margin+8,Margin_top+5, '1')-- hold down shift and click on a second locationApp.keypress('lshift')App.run_after_mousepress(screen_left_margin+20,Margin_top+5, '1')App.run_after_mouserelease(screen_left_margin+20,Margin_top+Line_height+5, '1')-- hold down shift and click at a third locationApp.keypress('lshift')App.run_after_mousepress(screen_left_margin+20,Margin_top+5, '1')App.run_after_mouserelease(screen_left_margin+8,Margin_top+Line_height+5, '1')App.keyrelease('lshift')-- selection is between first and third location. forget the second location, not the first.check_eq(Selection1.line, 1, 'F - test_select_text_repeatedly_using_mouse_and_shift/selection:line')check_eq(Selection1.pos, 2, 'F - test_select_text_repeatedly_using_mouse_and_shift/selection:pos')check_eq(Cursor1.line, 2, 'F - test_select_text_repeatedly_using_mouse_and_shift/cursor:line')check_eq(Cursor1.pos, 2, 'F - test_select_text_repeatedly_using_mouse_and_shift/cursor:pos')
if App.shift_down() thenSelection1 = {line=Cursor1.line, pos=Cursor1.pos}endCursor1 = {line=line_index, pos=Text.to_pos_on_line(line, x, y)}if not App.shift_down() thenSelection1 = {line=Cursor1.line, pos=Cursor1.pos}end
-- delicate dance between cursor, selection and old cursor-- manual tests:-- regular press+release: sets cursor, clears selection-- shift press+release:-- sets selection to old cursor if not set otherwise leaves it untouched-- sets cursor-- press and hold to start a selection: sets selection on press, cursor on release-- press and hold, then press shift: ignore shift-- i.e. mousereleased should never look at shift stateOld_cursor1 = Cursor1Old_selection1 = Selection1Mousepress_shift = App.shift_down()Selection1 = {line=line_index, pos=Text.to_pos_on_line(line, x, y)}
if Text.eq1(Cursor1, Selection1) and not App.shift_down() thenSelection1 = {}
if Mousepress_shift thenif Old_selection1.line == nil thenSelection1 = Old_cursor1elseSelection1 = Old_selection1end