collapseos/blk/128

: $G ACC @ selblk ;
: $[ BLK> @ acc@ - selblk ;
: $] BLK> @ acc@ + selblk ;
: $t PREVBLK @ selblk ;   
: $I mode! 'I' EMIT IBUF 1 buftype _i contents mode! SPC ;
: $F mode! 'F' EMIT FBUF 2 buftype _F setpos mode! SPC ;
: $Y Y ;
: $E _E contents ;
: $X acc@ _X contents ;
: $h -1 cmv ; : $l 1 cmv ; : $k -64 cmv ; : $j 64 cmv ;
: $H EDPOS @ 0x3c0 AND pos! ;
: $L EDPOS @ 0x3f OR pos! ;
: $g ACC @ 1 MAX 1- 64 * pos! ;
: $@ BLK> @ BLK@* @ EXECUTE 0 BLKDTY ! contents ;
VE: 'g' becomes 'G' and 'g' selects line 2020-07-04 21:40:12 +10:00			`: $G ACC @ selblk ;`
VE: add 'o' and 'O' 2020-06-07 21:25:02 +10:00			`: $[ BLK> @ acc@ - selblk ;`
			`: $] BLK> @ acc@ + selblk ;`
VE: add 't' This is the first commit I do entirely in VE. It's a habit I'm planning on taking as it helps a lot to find usability issues. 2020-06-12 08:12:01 +10:00			`: $t PREVBLK @ selblk ;`
ed: rename I to i Shadowing core "I" is too messy. As soon as ed is loaded in memory, nothing else that isn't "i-aware" can be loaded anymore. I guess that's why "contexts" exist in Starting Forth, but adding this concept just for allowing the shadowing of core words seems overkill to me. Renaming I to i in ed seems better. 2020-06-23 21:08:21 +10:00			`: $I mode! 'I' EMIT IBUF 1 buftype _i contents mode! SPC ;`
VE: Improve I and F buffer typing Previously, it would keep the old buffer displayed why typing over it. I had kept it thus because I didn't want to erase the buffer right away because the behavior is that when we type nothing, we keep the buffer as-is and repeat the action. Now, the behavior of I and F is much better. It keeps the buffer displayed until the first non-return keystroke and then erases it. Also, fixed PSP leak in _type and fixed PSP overuse in successful _F (they balanced out). 2020-06-09 11:23:23 +10:00			`: $F mode! 'F' EMIT FBUF 2 buftype _F setpos mode! SPC ;`
ed and VE: add command Y 2020-06-11 07:27:14 +10:00			`: $Y Y ;`
VE: supress ed's output on E and X Most of the time, this output would be hidden by the next screen update, except when editing the last line. 2020-06-28 21:04:08 +10:00			`: $E _E contents ;`
			`: $X acc@ _X contents ;`
VE: add 'o' and 'O' 2020-06-07 21:25:02 +10:00			`: $h -1 cmv ; : $l 1 cmv ; : $k -64 cmv ; : $j 64 cmv ;`
VE: make ACC reset after each non-digit keystrokes It simplifies things. Also, removed ';' which became useless. 2020-06-11 06:54:36 +10:00			`: $H EDPOS @ 0x3c0 AND pos! ;`
			`: $L EDPOS @ 0x3f OR pos! ;`
VE: 'g' becomes 'G' and 'g' selects line 2020-07-04 21:40:12 +10:00			`: $g ACC @ 1 MAX 1- 64 * pos! ;`
VE: add @ command 2020-06-29 10:19:42 +10:00			`: $@ BLK> @ BLK@* @ EXECUTE 0 BLKDTY ! contents ;`