Config(PG_AUTO_IND,"Auto-Indent-Mode",0) Config(W_LF_MARG,"Left Margin",11) Config(W_RT_MARG,"Right Margin",75) Key_Add('F10',' [VISUAL EXIT] DOV("\RT\") DOV("\RT\") Line(0) #99=BN OR(103) Date(NOCR+NOMSG) OR(CLEAR) BS(33) BY(OK) RI(103) BOF R("-",".",ALL+BEGIN) RCB(103,3,6) DB(3,6) RCB(103,0,3,APPEND) RCB(103,5,7,APPEND) BS(#99) RI(103) DOV("\RT\") DL(0) IT("--------") DOV("\RT\")',OK) Key_Add('F11',' [VISUAL EXIT] DOV("\RT\") Line(0) OI() Time(NOCR+NOMSG) OI(CLEAR) IT(" ")',OK) Key_Add('F12',' [VISUAL EXIT] DOV("\RT\") Line(0) OI() Time(NOCR+NOMSG) OI(CLEAR) C(-3) IT(" ",OVERWRITE)',OK) End_Of_File //Screen_Init() Message(" F10 erzeugt: 23.08.95 -------- F11 erzeugt: 12:56:22 F12 erzeugt: 12:56 jeweils am Zeilenanfang Taste druecken ... ") #99=GK("") Key_Purge()