Input routine

[SMcNeill]

@SMcNeill this is a great share! ExtendedInput! <3

Could you add cursor movement with Home, End, CTRL+arrows, and previous input history recall if supplied (up/down arrow), and insert mode? LOL!

You rock!

Doesn't it do all those already?  Home goes to the start of your input.  End to the end.  Arrows keys left/right into the middle of the input.

Code: (Select All)

                Case 18176 'Home
                    CP = 0
                Case 20224 'End
                    CP = Len(in$)
                Case 21248 'Delete
                    oldin$ = in$
                    in$ = Left$(in$, CP) + Mid$(in$, CP + 2)
                Case 19200 'Left
                    CP = CP - 1
                    If CP < 0 Then CP = 0
                Case 19712 'Right
                    CP = CP + 1
                    If CP > Len(in$) Then CP = Len(in$)

CP is Cursor Position, so 0 is to the left of the text, LEN(in$) is the right of the text, and any value between those numbers is inside the input text. 

There's no Insert mode (overwrite), but you're free to expand and alter what's here as you wish for your own personal needs.