// Tastenbelegung für VI.BAT (C) C.Z. 08.08.1994 // zum zwischenzeitlichen Kopieren nach UNIX 07.10.2003 // // Ausserdem: Check auf DOS-CR/LFs, da seit Verwendung von SSH 17.02.2005 // binär übertragen wird. // // für VI.CMD Key_Add("Shft-F5",' [VISUAL EXIT] #102=CP Out_Reg(102) Name_Write(NOMSG+NOCR+EXTRA) Out_Reg(CLEAR) Reg_Set(103, SYN_NAME) FileClose() VM(NOMSG) Sys("VI.CMD -put",DOS+MAX+OK+DELETE+SUPPRESS) File_Open(@102) if(Reg_Size(103)>0){Syntax_Load(@103) Config(PG_E_SYNTAX,1)} GP(#102)',OK) Key_Add("Shft-F6",' [VISUAL EXIT] Call_File(Reg_Free, "VI-FILECHK2.VDM") ',OK) RS(111,'if((BN==1) && Is_Altered_File){FS(NOMSG) BS(BF) IT("modified") FSA("C:\tmp\vi-mod.flg",OK+NOMSG+SUPPRESS) BQ(MAINBUF)}') Config(F_E_F_MACRO,1) // Format-Check Update //Search("|H0D|H0A", BEGIN+NOERR) //if (! Error_Match) if (Config(F_F_TYPE) != 1) { #106=Dialog_Input_1(106,"`Format check`, `This file is not formatted with UNIX LF!`, `Should it be converted to UNIX-format?`, `[Yes]`,`[No]`", APP+CENTER,0,0) if (#106 == 1) { BoF if (Replace("|013|010","|010",ALL+NOERR)) { Config(F_F_TYPE,1,LOCAL) //Change to UNIX } } } // eventuelle Doubletten auch öffnen if (#103==1) { Call_File(Reg_Free, "VI-FILECHK2.VDM") }