********************************************************************
* Package  : TeXShell for CMS, version 2.0                         *
* Author   : Humberto Jose' Bortolossi                             *
*                                                                  *
* Bitnet   : hjbortol at brlncc.bitnet, hjbortol at brfuem.bitnet  *
* Internet : hjbortol at gauss.impa.br                             *
*                                                                  *
* Organizations : Instituto de Matematica Pura e Aplicada (IMPA)   *
*                 Fundacao Universidade Estadual de Maringa'       *
*                                                                  *
* Copyright : This program is freely distributable.                *
*             You can do changes but, please, keep my name.        *
*                                                                  *
* Description : This profile xedit is used to redefine  PF's  KEY  *
*               to 'LOGVIEW' environment.                          *
*                                                                  *
*                                               (C) Copyright 1992 *
********************************************************************
*
* SET DEFAULT FILE TYPE TO SCRIPT
*
         &IF &N = 0 &EXIT
         &IF &N = 1 &ARGS &1 SCRIPT
         &COMMAND STATE &1 &2
         &IF &RC = 0 &GOTO -LOAD
         & = &LOCATION OF &2 SCRIPT
         &IF & ^= 1 &GOTO -LOAD
         &ARGS &1 SCRIPT
-LOAD    LOAD &1 &2
         &IF &RC ^= 0 &EXIT &RC
&FN = &1
&FT = &2
COMMAND TRANSFER TERMINAL NBFILE SIZE SCREEN
&READ VARS &TERMINAL &NBFILE &SIZE &SCR1 &LIN
&IF &TERMINAL = TYPEWRITER &GOTO -NOPFKEYS
&L23 = &LIN - 1
&L24 = &LIN
SET PF1  COMMAND HELP CMS LOGVIEW
SET PF2
SET PF3  OUT &FN
SET PF4  ERROR &FN
SET PF5  WARNING &FN
SET PF6
SET PF7  BACKWARD
SET PF8  FORWARD
SET PF9  OUT &FN
SET PF10
SET PF11
SET PF12 CMS
SET TEXT ON
SET APL ON
RESER &L23 H ____________________________________________________________________________________________________________________________________________
RESER &L24 H F1 = Help F3 = Quit F4 = Next Error F5 = Next Warning F9 = File F12 = CMS shell
-NOPFKEYS
SET ARBCHAR ON $
SET AUTOSAVE 15
SET CASE MIXED IGNORE
SET CMDLINE TOP
SET CURLINE ON 3
SET TABLINE ON 3
SET MSGMODE ON LONG
SET FULLREAD ON
SET NULLS ON
SET NUMB ON
SET PREFIX ON LEFT
* T PREFIX NULLS
SET SCALE ON 3
SET SPAN ON BLANK
SET STAY  ON
SET COLOR ARROW REVVIDEO NOHI
SET COLOR STATAREA REVVIDEO NOHI
SET COLOR MSGLINE BLINK
SET SYN DSPF Q PF
SET SYN DOWN 1 UP
SET SYN UP 1 DOWN
SET VAR ON
SET WRAP ON
SET MSGMODE ON LONG
SET SPAN ON BLANK
SET STAY  ON
SET COLOR ARROW REVVIDEO NOHI
SET COLOR STATAREA REVVIDEO NOHI
SET COLOR MSGLINE BLINK
SET SYN DSPF Q PF
SET SYN DOWN 1 UP
SET SYN UP 1 DOWN
SET VAR ON
SET WRAP ON