/**********************************************************************/
/* sancmss.mss                                                        */
/* San Mateo County Message Switch                                    */
/* 27-MAR-2006 - Removed the IN translation, as this is a CAD only    */
/*	feature.                                                      */
/* 10-FEB-2005 - Added copy/paste feature                             */
/* 26-SEP-2002 - Generic MSS usage                                    */
/* 28-JUN-2000 - Added FONTBIG & FONTSMALL functions. Fixed a problem */
/*	with the \ character.                                         */
/* 27-JUN-2000 - Setup for South San Francisco                        */
/**********************************************************************/


/**********************************************************************/
/* Turn off the menu bar and the alt key.
/**********************************************************************/
/* alt ( 0 )                    /* turn off the alt key */


/**********************************************************************/
/* Create the version script table.
/**********************************************************************/

table ( "VERSION" )
tablerow ( "assign $0 local version" )
tablerow ( "show $0 ' script Mar 27, 2006'" )


/**********************************************************************/
/* Create the initial script table.
/**********************************************************************/

table ( "INIT" )

/* This checks for another PCMSS running by telling it to get the focus 
/* for itself.  If we are not the first, just die.  If we are the first, 
/* set ourselves up as a server.  
/* */
tablerow ( "local dde client" )
tablerow ( "assign $0 exec 'local dde execute XFERFOCUS'" )
tablerow ( "if $0 == ''" )
tablerow ( "  local exit" )
tablerow ( "  return" )
tablerow ( "endif" )
tablerow ( "local dde server" )


tablerow ( "local video top 6 show x" )
tablerow ( "local video title San Mateo County Message Switch" )

tablerow ( "local video cursor redraw on" )	/* win95 patch */

tablerow ( "local video BLINK 0.5" )            /* SET BLINK SPEED */


/* these lines setup our default font */
tablerow ( "assign $13 'Courier New'" )
tablerow ( "exec 'local video win 1 font '$13" )

/* this line sets up the default height for the selected font */
tablerow ( "assign $12 '19'" )
tablerow ( "exec 'local video win 1 height ' $12" )


/* these lines are for tcp/ip use */
tablerow ( "local line connect switch 1 tcpfmt 1" )
tablerow ( "local line connect switch 2 kbd 1" )


/* these lines are for tcp/ip print */
tablerow ( "local line connect tcpfmt 3 zprt 2" )


/**********************************************************************/
/* Setup printer font/size.                                           */
/* The width is based upon the printer having a horz resolution of    */
/* 4900 dots.  width = int(4900/80)                                   */
/**********************************************************************/

tablerow ( "local zprt font 0 name Courier New" )
tablerow ( "local zprt font 0 weight normal" )
tablerow ( "local zprt font 0 width 61" )


/**********************************************************************/
/* The keyboard configuration section follows.                        */
/**********************************************************************/

/* Copy current window the cursor is in to the Windows clipboard - Control C */
tablerow ( "local key alter control lc local local script UCOPY1" )

/* Paste from Windows clipboard to current default window - Control V */
tablerow ( "local key alter control lv local local clip get buf" )

/* Past from Windows clipboard to message window - Alt V */
tablerow ( "local key alter alt lv local local clip get line" )

tablerow ( "local key alter bs backspc \\x20local script ULEFTWRAP" )
tablerow ( "local key alter shift enter xkey xmit" )
tablerow ( "local key alter control enter xkey xmit" )
tablerow ( "local key alter shift home lnhome" )
tablerow ( "local key alter shift end local local beep" )
tablerow ( "local key alter pgup local local script UTEXTHIGH" )
tablerow ( "local key alter shift pgup local lpage u" )
tablerow ( "local key alter pgdn local local script UTEXTLOW" )
tablerow ( "local key alter shift pgdn local lpage d" )
tablerow ( "local key alter left local local script UMOVELEFT" )
tablerow ( "local key alter shift left local local script UTEXTLOW" )
tablerow ( "local key alter right local local script UMOVERIGHT" )
tablerow ( "local key alter shift right local local script UTEXTHIGH" )
tablerow ( "local key alter up local local script UMOVEUP" )     /* */
tablerow ( "local key alter down local local script UMOVEDOWN" ) /* */

/* convert number pad to only numbers */
tablerow ( "local key alter pend prtchr 1")
tablerow ( "local key alter pdown prtchr 2" )
tablerow ( "local key alter ppgdn prtchr 3" )
tablerow ( "local key alter pleft prtchr 4" )
tablerow ( "local key alter pclr prtchr 5" )
tablerow ( "local key alter pright prtchr 6" )
tablerow ( "local key alter phome prtchr 7" )
tablerow ( "local key alter pup prtchr 8" )
tablerow ( "local key alter ppgup prtchr 9" )
tablerow ( "local key alter pins prtchr 0" )
tablerow ( "local key alter pdel prtchr ." )

/* tilde */
tablerow ( "local key alter tilde prtchr `" )
/*tablerow ( "local key alter control tilde prtchr `" )*/

/* back slash */
tablerow ( "local key alter backs prtchr \\B" )
tablerow ( "local key alter control backs prtchr \\B" )

/* pad '/' */
tablerow ( "local key alter pslash local lpage d" ) /* page forward */
tablerow ( "local key alter shift pslash local local beep" )
tablerow ( "local key alter control pslash local local beep" )

/* number lock */
tablerow ( "local key alter nl xkey NM" )
tablerow ( "local key alter shift nl local local beep" )
tablerow ( "local key alter control nl local local beep" )

/* pad '-' */
tablerow ( "local key alter pdash pghome" )/* first page */
tablerow ( "local key alter shift pdash local local beep" )
tablerow ( "local key alter alt pdash local local beep" )
tablerow ( "local key alter control pdash local local beep" )

/* pad '*' */
tablerow ( "local key alter pstar local lpage u" )/* page forward */
tablerow ( "local key alter shift pstar local local beep" )
tablerow ( "local key alter alt pstar local local beep" )
tablerow ( "local key alter control pstar local local beep" )

/* pad '+' */
tablerow ( "local key alter pplus prtchr +" )
tablerow ( "local key alter shift pplus local local script UTEXTLOW" )
tablerow ( "local key alter alt pplus local local beep" )
tablerow ( "local key alter control pplus local local script UTEXTLOW" )

/* pad 'Enter' */
tablerow ( "local key alter penter xmit" )
tablerow ( "local key alter shift penter xmit" )
tablerow ( "local key alter alt penter xmit" )
tablerow ( "local key alter control penter xmit" )

/* F1 */
tablerow ( "local key alter F1 local flip mi" )
tablerow ( "local key alter shift F1 xkey OP OFF" )
tablerow ( "local key alter alt F1 xkey MASK ALL" )
tablerow ( "local key alter control F1 xkey PCHELPS" )
tablerow ( "local key alter shift control F1 local local script UFONTBIG" )

/* F2 */
tablerow ( "local key alter F2 xkey SAVE" )
tablerow ( "local key alter shift F2 xkey DRIVER" )
tablerow ( "local key alter alt F2 local local beep" )
tablerow ( "local key alter control F2 xkey MAILR" )
tablerow ( "local key alter shift control F2 local local script UFONTSMALL" )

/* F3 */
tablerow ( "local key alter F3 xkey RECALL" )
tablerow ( "local key alter shift F3 xkey GUN" )
tablerow ( "local key alter alt F3 local local beep" ) /*  */
tablerow ( "local key alter control F3 noedit \\S" ) /* SOM */

/* F4 */
tablerow ( "local key alter F4 xkey NM" )
tablerow ( "local key alter shift F4 xkey REG-US" )
tablerow ( "local key alter alt F4 local local beep" )
tablerow ( "local key alter control F4 noedit \\E" ) /* EOM */

/* F5 */
tablerow ( "local key alter F5 local lpage d" ) /* PF page forward */
tablerow ( "local key alter shift F5 xkey ADMIN" )
tablerow ( "local key alter alt F5 local local beep" ) /*  */
tablerow ( "local key alter control F5 local local beep" ) /* */

/* F6 */
tablerow ( "local key alter F6 local lpage u" ) /* PB page backward */
tablerow ( "local key alter shift F6 xkey WANT1" )
tablerow ( "local key alter alt F6 local local beep" ) /* */
tablerow ( "local key alter control F6 local local beep" )    /* */

/* F7 */
tablerow ( "local key alter F7 pghome" ) 
tablerow ( "local key alter shift F7 xkey WANT2" )
tablerow ( "local key alter alt F7 local local beep" )
tablerow ( "local key alter control F7 xkey DRIVER" )

/* F8 */
tablerow ( "local key alter F8 local local PRINT" )
tablerow ( "local key alter shift F8 xkey DRV-US" )
tablerow ( "local key alter alt F8 local local beep" )
tablerow ( "local key alter control F8 xkey CR-HST" ) /* */

/* F9 */
tablerow ( "local key alter F9 local flip m" )
tablerow ( "local key alter shift F9 xkey VEH1" )
tablerow ( "local key alter alt F9 local local beep" )
tablerow ( "local key alter control F9 xkey GUN" )/* */

/* F10 */
tablerow ( "local key alter F10 xkey OP" )
tablerow ( "local key alter shift F10 xkey VEH2" )
tablerow ( "local key alter alt F10 local local beep" )
tablerow ( "local key alter control F10 xkey SNAC" )

/* F11 */
tablerow ( "local key alter F11 xkey ISN SOS" )
tablerow ( "local key alter shift F11 xkey NAMS" )
tablerow ( "local key alter alt F11 local local beep" )
tablerow ( "local key alter control F11 local local beep" )

/* F12 */
tablerow ( "local key alter F12 xkey ALLSYS" )
tablerow ( "local key alter shift F12 xkey SMCS" )
tablerow ( "local key alter alt F12 xkey CH" )
tablerow ( "local key alter control F12 xkey CNQ" )

tablerow ( "local key alter print local local beep" )
tablerow ( "local key alter scroll local local beep" )

tablerow ( "local script ULINES" )


/* this line calls the terminal specific script */
tablerow ( "local script file mssterm.mss" )



/**********************************************************************/
/* Create the local lines command script table.
/**********************************************************************/

table ( "LINES" )
tablerow ( "local init l" )

/***********************************/
/* create various script tables
/************************************/

table ( "INPUTXX" )
tablerow ( "debug display z \\zwn\\wdefINPUT\\zst\\zic\\zup" ) /* */

table ( "LEFTWRAP" )
tablerow ( "local key do uparrow" )
tablerow ( "local key do lnend" )

table ( "RIGHTWRAP" )
tablerow ( "local key do dnarrow" )
tablerow ( "local key do lnhome" )

table ( "TEXTLOW" )
tablerow ( "local text -" )

table ( "TEXTHIGH" )
tablerow ( "local text +" )

table ( "CLEARDEF" )
tablerow ( "flip 2" )
tablerow ( "local key do clrall" )

table ( "MOVERIGHT" )
tablerow ( "local key do rtarrow" )
tablerow ( "local key do slide" )

table ( "MOVELEFT" )
tablerow ( "local key do lfarrow" )
tablerow ( "local key do slide" )

table ( "MOVEUP" )
tablerow ( "local key do uparrow Aflip 4" )
tablerow ( "local key do slide" )

table ( "MOVEDOWN" )
tablerow ( "local key do dnarrow Aflip 3" )
tablerow ( "local key do slide" )


table ( "XFERFOCUS" )
tablerow ( "local spawn focus get" )
tablerow ( "local video show t" )


table ( "FONTBIG" )
tablerow ( "assign $12 plus $12 '1'" )
tablerow ( "if $12 > '60' assign $12 '60' endif" )
tablerow ( "exec 'local video win 1 height ' $12" )


table ( "FONTSMALL" )
tablerow ( "assign $12 plus $12 '-1'" )
tablerow ( "if $12 < '4' assign $12 '4' endif" )
tablerow ( "exec 'local video win 1 height ' $12" )


/* This script will copy the contents of the window where the cursor is placed */
/* to the Windows clipboard. */
table ( "COPY1" )
tablerow ( "input current" )
tablerow ( "local clip send buf" )


/**********************************************************************/
/* Create a table for the help function key display.
/**********************************************************************/

table ( "fnhelp" )
tablerow ( "ctrl  |  STX  |  ETX  |CLR WIN|FUL SCN|IHQ MSK|CLR EOL|\x80" )
tablerow ( "shift | HELP  |DISP 3 |HLD ALL|IS ALL | LINES |LAST 12|\x80" )
tablerow ( "plain |DISP 1 |DISP 2 | HOLD  |SELECT |PG DISP|PG RCL |\x80" )
tablerow ( "key   +---F1--+---F2--+---F3--+---F4--+---F5--+---F6--+\x80" )
tablerow ( "\x80" )
tablerow ( "ctrl  |   -   |   -   |   -   |   -   |   -   |   -   |\x80" )
tablerow ( "shift |CLR RCL|PRM INF|PG BACK|FRST PG| PRINT | ALI 1 |\x80" )
tablerow ( "plain |CLR CMD|INC HST|PG FORW|NXT MSG| INPUT | ALI 2 |\x80" )
tablerow ( "key   +---F7--+---F8--+---F9--+--F10--+--F11--+--F12--+\x80" )
tablerow ( "\x80" )
tablerow ( "      +-------+-------+-------+-------+-------+\x80" )
tablerow ( "shift |   -   |   -   |   -   |   -   |   -   |\x80" )
tablerow ( "plain |INC MSK|PG MON1|PG MON2| SAVE  | UNSAVE|\x80" )
tablerow ( "key   +PRT SCN+NUM LCK+---/---+-- * --+-- - --+\x80" )
tablerow ( "\x80" )
tablerow ( "      Use shift up/down arrows to move between windows\x80" )
tablerow ( "      Use Keypad Enter, Keypad +, or ESC Key to Transmit\x80" )


/**********************************************************************/
/* Define various symbol names.
/**********************************************************************/


name ( "Owner"  	"San Mateo County Public Safety Communications" )
name ( "Dongle/0"	"a4 f4 9b b7 be f0 85 f6 b8 b8 96 f5 a6 f2 a5 e7
		 d7 b5 80 85 9f 88 92 c3 0c 58 3b 5e 2f 44 79 7c
		 68 05 68 1f 6d 05 62 0f 5f a9 46 ac 5c c4 2d c6" )
name ( "Dongle/1"	"a5eb7d36" ) 



/* name ( "Page/Filename"       "g:\\msspage.tmp" ) /* page file on RAM disk */

name ( "Zprt/Page/Length"       60 )            /* printer page length */
name ( "Zprt/Page/Width"        80 )            /* printer page width */
name ( "Zprt/Page/Wrap"         "FALSE" )       /* printer page wrap flag */
/* name ( "Zprt/Page/Doc"       "TRUE" )        /* each page sent separately */

/* name ( "Help/Key/1"
/*        "DF1 = help   shift F1 = function key help   Keypad + = send" ) /* */
name ( "Help/Key/2"             "Tufnhelp" )
/* name ( "Help/Field/1"        "Dtest field 1" ) /* */
name ( "Help/Field/2"           "XHELP2" )
/* name ( "Help/Xaction/1"      "Dtest xaction 1" ) /* */
name ( "Help/Xaction/2"         "XHELP" )

name ( "Local/Inithelp"         "FALSE" )

name ( "Cmd/ROUTE"              "local route TO" )
name ( "Cmd/AC"                 "local route ACM" )
name ( "Cmd/XFERFOCUS"          "local script UXFERFOCUS" )

/* name ( "Ztrn/Debug"          20 )            /* test test test */

/* name ( "Mwvid/Black"         "  0   0   0" ) /* */
/* name ( "Mwvid/Blue"          "  0   0 255" ) /* */
/* name ( "Mwvid/Green"         "  0 255   0" ) /* */
/* name ( "Mwvid/Red"           "255   0   0" ) /* */
/* name ( "Mwvid/Cyan"          "  0 255 255" ) /* */
/* name ( "Mwvid/Magenta"       "255   0 255" ) /* */
/* name ( "Mwvid/Yellow"        "255 255   0" ) /* */
/* name ( "Mwvid/White"         "255 255 255" ) /* */

/**********************************************************************/
/* The first and only screen is both the main working screen
/* and the monitor screen
/**********************************************************************/

    screen ( 0 )
	color ( 7  3 )                  /* Default Colors */
	driver  ( 1 )                   /* MS Windows driver */

/* predefine default text windows */
	    map (  8  8 "df1" )
	    map (  9  9 "df2" )
	    map ( 10 10 "df3" )
	    map ( 11 11 "df4" )
	    map ( 35 35 "df5" )
	    map ( 36 36 "df6" )
	    map ( 37 37 "df7" )
	    map ( 38 38 "df8" )
	    map ( 39 39 "df9" )
	    map ( 40 40 "df10" )
/* default text goes to this window initially */
	    map (  9  7 )

/* define background window */
	window  ( 0 )                   /* background window */
/*          box ( 0    11   0     3  80 )
/*              coord ( 1  -2     0  49 100 )
/*              coord ( 4   1     0   1   2 )
/* */
	    box ( 0    23   0     2  80 )
		coord ( 1  -2     0   1   1 )
                coord ( 4   1     0   1   1 )
	    color   (  17  17 )

/* define place holder windows */
	window  ( 24 )                  /* working screen area */
/*      window  ( 25 24 )               /* full working screen */
/*          hide ( )                    /* start off invisible */
	window  ( 26 24 )               /* split working screen */
/*          box ( 0    11   0     3  80 )
/*              coord ( 1  -1     0  49 100 )
/*              coord ( 4   0     0   1   2 )
/*          color   (  17  17 ) /* */
/*      window  ( 27 26 )               /* dispatch/default area */
/*      window  ( 32 27 )               /* dispatch area */
/*      window  ( 30 32 )               /* waiting/recalled area */
	window  ( 34 26 )               /* monitor/default area */
	window  ( 35 34 )               /* lower default area */
	window  ( 36 )                  /* lower default area paging */

/* define text type windows */
/*      window  ( 1 26 )                /* status window */
/*          box ( 0    11  61     2  17 )
/*              coord ( 1  -1     0  49 100 )
/*              coord ( 2   1     0   3   8 )
/*              coord ( 4  -3     0   1   8 )
/*          map ( 1 1 "sta" )
/*          flipdisp ( 26 )             /* turn on split screen*/
/*          color   (   6   6 ) /* */
	window  ( 2 )                   /* define group window */
	    map ( 2 0 "grp" )

/*        window  ( 3 26 )                /* first command window */
/*            box ( 0    11   0     1  60 )
/*                coord ( 1  -1     0  49 100 )
/*                coord ( 4   0     0   3   8 )
/*            max (       1 200 )
/*            map ( 3 3 "cm1" )
/*            flipreq ( 26 )              /* turn on split screen */
/*            flipto ( 1   3 )            /* the matching command window */
/*            flipto ( 2   8 )            /* the matching default window */
/*            flipto ( 3   4 )            /* the skip down function */
/*            flipto ( 4  -2 )            /* the skip up function */
/*            flipto ( 5 -32 )            /* skip to opposite default window */
/*            flipto ( 6   3 )            /* go to top cmd window */
/*            flipto ( 7   4 )            /* go to bottom cmd window */
/*            flipto ( 8  10 )            /* go to full screen */
/*            flipto ( 10 37 )            /* go to monitor display */
/*            color   (  19   1 )         /*  */

	window  ( 4 35 )                /* second command window */
	    box ( 0     0   0     2  60 )
/*              coord ( 1  -1     0  49 100 ) /* */
                coord ( 4   1     0   1   1 )
	    max (       2 200 )
	    map ( 4 2 "cm2" )           /* command msgs go here initially */
	    map ( 4 4 )
	    flipreq ( 26 )              /* turn on split screen */
	    flipreq ( 35 )              /* turn on default area */
	    flipto ( 1   4 )            /* the matching command window */
	    flipto ( 2   9 )            /* the matching default window */
	    flipto ( 3   9 )            /* the skip down function */
	    flipto ( 4   9 )            /* the skip up function */
	    flipto ( 5   9 )            /* skip to opposite default window */
	    flipto ( 6   4 )            /* go to top cmd window */
	    flipto ( 7   4 )            /* go to bottom cmd window */
	    flipto ( 8   9 )            /* go to full screen */
	    color   (  23   1 )


/*        window  ( 8 27 )                /* first default window */
/*            box ( 0     0   0    11  80 )
/*                coord ( 3  -1     0  49 100 )
/*                coord ( 4   0     0   1   2 )
/*            map ( 8 8 )
/*            flipreq ( 26 )              /* turn on split screen */
/*            fliptext ( 1 1 )            /* restrict allowed text windows */
/*            flipto ( 1   3 )            /* the matching command window */
/*            flipto ( 2   8 )            /* the matching default window */
/*            flipto ( 3  -1 )            /* the skip down function */
/*            flipto ( 4 -92 )            /* the skip up function */
/*            flipto ( 5 -92 )            /* skip to opposite default window */
/*            flipto ( 6   3 )            /* go to top cmd window */
/*            flipto ( 7   4 )            /* go to bottom cmd window */
/*            flipto ( 8  10 )            /* go to full screen */
/*            flipto ( 9   4 )            /* for use by skip to opposite */
/*            flipto ( 10 37 )            /* go to monitor display */
/*            page ( 31 )
/*            textnum ( 45 )
/*            hide ( )                    /* start off invisible */
/* */
	window  ( 9 35 )                /* second default window */
	    box ( 0     2   0    22  80 )
		coord ( 3  -3     0   1   1 )
                coord ( 4   1     0   1   1 )
	    map ( 9 9 )
	    flipreq ( 26 )              /* turn on split screen */
	    flipreq ( 35 )              /* turn on default area */
	    fliptext ( 2 10 )           /* restrict allowed text windows */
	    flipto ( 1   4 )            /* the matching command window */
	    flipto ( 2   9 )            /* the matching default window */
	    flipto ( 3   4 )            /* the skip down function */
	    flipto ( 4   4 )            /* the skip up function */
	    flipto ( 5   4 )            /* skip to opposite default window */
	    flipto ( 6   4 )            /* go to top cmd window */
	    flipto ( 7   4 )            /* go to bottom cmd window */
	    flipto ( 8   9 )            /* go to full screen */
	    page ( 21 1 1 )
	    textnum ( 41 )

/*        window  ( 10 25 8 )             /* third default window */
/*            box ( 0     0   0    24  80 )
/*                coord ( 3  -2     1   1   1 )
/*                coord ( 4   0     0   1   2 )
/*            map ( 8 )
/*            flipreq ( 25 )              /* turn on full screen */
/*            flipreq ( 10 )              /* this full screen */
/*            fliptext ( 1 1 )            /* restrict allowed text windows */
/*            flipto ( 1   0 )            /* no matching command window */
/*            flipto ( 2  10 )            /* the matching default window */
/*            flipto ( 3   3 )            /* the skip down function */
/*            flipto ( 4   3 )            /* the skip up function */
/*            flipto ( 5 -92 )            /* skip to opposite default window */
/*            flipto ( 6  10 )            /* go to top full screen window */
/*            flipto ( 7  11 )            /* go to bottom full screen window */
/*            flipto ( 8   3 )            /* go to split screen */
/*            flipto ( 9   4 )            /* for use by skip to opposite */
/*            flipto ( 10 37 )            /* go to monitor display */
/*            page ( 21 )
/*            textnum ( 41 )
/*            hide ( )                    /* start off invisible */
/* */
/*      window  ( 11 25 9 )             /* fourth default window */
/*          box ( 0     0   0    24  80 )
/*              coord ( 3  -1     1   1   1 )
/*              coord ( 4   0     0   1   2 )
/*          map ( 9 )
/*          flipreq ( 25 )              /* turn on full screen */
/*          flipreq ( 11 )              /* this full screen */
/*          fliptext ( 2  10 )           /* restrict allowed text windows */
/*          flipto ( 1   0 )            /* no matching command window */
/*          flipto ( 2  11 )            /* the matching default window */
/*          flipto ( 3   4 )            /* the skip down function */
/*          flipto ( 4   4 )            /* the skip up function */
/*          flipto ( 5   4 )            /* skip to opposite default window */
/*          flipto ( 6   4 )            /* go to top full screen window */
/*          flipto ( 7  11 )            /* go to bottom full screen window */
/*          flipto ( 8   4 )            /* go to split screen */
/*          page ( 21 )
/*          textnum ( 41 )
/*          hide ( )                    /* start off invisible */
/* */
	window  ( 12 )                  /* error window */
	    box ( 0    24   9     1  70 )
		coord ( 1  -1     0   1   1 )
                coord ( 4 -12     0   96  100 )
	    map ( 12 "err" )            /* error msgs go here initially */
	    color   (  23   7 )
	window  ( 13 )                  /* message waiting window */
	    box ( 0    24   0     1   8 )
		coord ( 1  -1     0   1   1 )
	    map ( 13 "msg" )            /* msg waiting goes here */
	    color   (   1   116  )

/* define paging windows */
/*      window  ( 31 26 )               /* paging for top default window */
/*          box ( 0    12  79     1   1 )
/*              coord ( 1   0     0  49 100 )
/*              coord ( 2  -1     0   1   2 )
/*          map ( 48 "tpg" ) /* */
	window  ( 21 36 )               /* paging for bottom default window */
	    box ( 0    24  79     1   1 )
		coord ( 1  -1     0   1   1 )
		coord ( 2  -1     0   1   1 )
	    flipreq ( 21 )              /* turn us on */
	window  ( 22 )                  /* more pages window */
	    map ( 22 22 "pag" )
	window  ( 23 )                  /* no more pages window */
	    map ( 23 23 "npg" )

	window  ( 28 )                  /* help window */
	    box ( 0     4  11    16  58 )
		coord ( 1   1     0   1   6 )
		coord ( 2   1     0   1  12 )
		coord ( 3  -1     0   2   3 )
		coord ( 4  -1     0   5   6 )
	    map ( 28 28 "hlp" )         /* help messages go here */
	    hide ( )                    /* start off invisible */
	    page ( 29 )
	    color   (  19   1 )
	window  ( 29 28 )               /* help window border */
	    box ( 0     3  10     1  60 )
		coord ( 1   0     0   1   6 )
		coord ( 2   0     0   1  12 )
		coord ( 4   0     0   5   6 )
	    box ( 1     4  10    17   1 )
		coord ( 1   1     0   1   6 )
		coord ( 2   0     0   1  12 )
		coord ( 3  -1     0   2   3 )
	    box ( 2     3  69    18   1 )
		coord ( 1   0     0   1   6 )
		coord ( 2  -1     0  11  12 )
		coord ( 3   0     0   2   3 )
	    box ( 3    20  10     1  60 )
		coord ( 1  -1     0   5   6 )
		coord ( 2   0     0   1  12 )
		coord ( 4   0     0   5   6 )

	window  ( 33 )                  /* define remote proc call window */
	    map ( 24 24 "rpc" )

/* define text number windows */
	window  ( 46 )                  /* text number for bottom default win */
	    box ( 0    24  77     1   2 )
		coord ( 1  -1     0   1   1 )
		coord ( 2  -3     0   1   1 )
	    map ( 41 41 "tn1" )
/*      window  ( 5 26 )                /* text number for top default win */
/*          box ( 0    11  78     1   2 )
/*              coord ( 1  -1     0  49 100 )
/*              coord ( 2  -2     0   1   2 )
/*          map ( 45 45 "tn5" )
/* */


/* define insert mode indicator window */

	window  ( 45 )
	    box ( 0    24  74     1   3 )
		coord ( 1  -1     0   1   1 )
		coord ( 2  -6     0   1   1 )

	    map ( 49 "ins" )