// // CONT-HLP.VDM - Context sensitive help Christian Ziemski 06.07.1999 // // // Calls the VEDIT Help for the word/command at cursor position. // // // For easy usage assign it to Ctrl-F1: // // Key_Add("Ctrl-F1","[VISUAL EXIT] SPOS() if(S('|S',REVERSE+ADVANCE+NOERR)==0){BOL} #103=CP if(S('|S',NOERR)==0){EoL} #104=RF() RCB(#104,#103,CP) RPos() H(@#104) RE(#104)",OK) // // Save_Pos() // remember original position if(Search("|S",REVERSE+ADVANCE+NOERR)==0){ // search previous separator Begin_Of_Line // if none: from line begin } // #103=Cur_Pos // remember begin of word if(Search("|S",NOERR)==0){ // search next separator EoL // if none: up to line end } // #104=Reg_Free() // Reg_Copy_Block(#104,#103,Cur_Pos) // get word to search for in help Restore_Pos() // restore cursor position Help(@#104) // call help Reg_Empty(#104) // empty used register