Ctrl-[ [ESCAPE] Ctrl-Numpad/ [VISUAL EXIT] if (WStat($)<0) { WinReserved($,5,BOTTOM) } else { WDel($) } Ctrl-Numpad+ [VISUAL EXIT] RCB(0,BB,BE,APPEND+RESET) Ctrl-Numpad- [VISUAL EXIT] RCB(0,BB,BE,APPEND) DelBlock(BB,BE) Ctrl-F1 [VISUAL EXIT] SPOS() if (S("|S",REVERSE+ADVANCE+NOERR)==0) {BOL} #100=CP if (S("|S",NOERR)==0) {EoL} #101=RF() RCB(#101,#100,CP) RPos() H(@#101) RE(#101) Ctrl-Tab [VISUAL EXIT] if (CL>1) {Num_Push(95,99) #99=CP #95=CRN while (CL>1){#96=CRN DoV("\CU\") #98=CL DoV("\NW\") if (CL==#98){#97=CRN GP(#99) IC(32,COUNT,#97-CN) Num_Pop(95,99)return}else{GL(#98) GC(#96,EXTRA)}}GP(#99)GC(#95,EXTRA)Num_Pop(95,99)} Ctrl-Bksp [VISUAL EXIT] if (CL>1) { if(CRN>1) { Num_Push(95,99) #99=CP #95=CRN while (CL>1){#96=CRN DoV("\CU\") #98=CL DoV("\PW\") if (CL==#98){#97=CRN GP(#99) DC(#97-CN) Num_Pop(95,99)return}else{GL(#98) GC(#96,EXTRA)}}GP(#99)GC(#95,EXTRA)Num_Pop(95,99) }} Ctrl-Y [ERASE LINE] Alt-Q [VISUAL EXIT] #100=CL #102=0 #101=CP OR(103) BoL repeat(ALL) {Dov("\NW\") if(CL==#100 && !At_Eol) {#103=CN NT(#103,NOCR) #102+=1} else {break}} OR(CLEAR) if(#102>0){if(#102==1){OR(103,APPEND) NT(#103,NOCR) NT(#103,NOCR) OR(CLEAR)} RS(103,"CfT(",INSERT) RS(103,")",APPEND) Call(103)} GP(#101) Ctrl-S [MENU]GS