Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Posting-Version: version B 2.10.2 9/17/84; site ittvax.UUCP
Path: utzoo!watmath!clyde!burl!ulysses!allegra!bellcore!decvax!ittvax!long
From: long@ittvax.UUCP
Newsgroups: net.sources
Subject: Re: MON - added screendump (Part 2 of 2) [shar file ]
Message-ID: <1553@ittvax.UUCP>
Date: Thu, 20-Dec-84 21:44:45 EST
Article-I.D.: ittvax.1553
Posted: Thu Dec 20 21:44:45 1984
Date-Received: Sat, 22-Dec-84 01:53:51 EST
References: <220@unc.UUCP>
Organization: ITT-ATC, Stratford Ct.
Lines: 115


	Use '/bin/sh' on this file.

				H. Morrow Long
				ITT-ATC Systems Center, Shelton, CT
	
path = {allegra bunker dcdvaxb dcdwest ucbvax!decvax duke eosp1 ittral
	lbl-csam mit-eddie psuvax1 purdue qubix qumix research sii
	tmmnet twg uf-cgrl wxlvax yale}!ittvax!long

: --------------- cut here -----------------------------
: This is a shar archive.  Extract with sh, not csh.
: The rest of this file will extract:
: dumpit.c screendump
mkdir src
cd src
echo extracting - dumpit.c
sed 's/^X//' > dumpit.c << '/*EOF'
X#include 
X#include 
X
X/*
X#define	winch(win)	 (win->_y[win->_cury][win->_curx] & 0177)
X */
X
Xint dumpit(Outfile)
XFILE	*Outfile;
X{
Xint	x,y;
Xchar	buffer[82];
X
X	for (y = 0; y < LINES - 1; y++)
X		{
X		strncpy(buffer,curscr->_y[y],80);
X		buffer[80] = '\n';
X		buffer[81] = '\0';
X		fputs(buffer,Outfile);
X		}
X}
/*EOF
echo extracting - screendump
sed 's/^X//' > screendump << '/*EOF'
Xittvax       0.00 2.32 2.29 2.18        Thu Dec 20 20:35:33 1984      3 users   
X                                                                                
XProcs: r d p s sl  Mem: real  ract  virt  vact  free   Disks: Kbps tps msps     
X       2 0 0 0  6       1625   879  5124  1164  1101   hp0       0   0  0.0     
X                                                       hp1       0   0  0.0     
XCpu: ints  scall  csw                Char: in   out    hp2       0   0  0.0     
X       36    301   25                     228   299    hp3       0   0  0.0     
X                                                       --------------------     
XTime: user nice  sys idle                              Total:    0   0          
X        27   38   35    0                                                       
X                                                                                
XPaging: re  at pin pout  oprs  fr  def   sr                                     
X         0   0   0    0     0   0    0    0                                     
X                                                                                
X       nxf  xf  nzf  zf  nrf  rf  prf  swi swo                                  
X         0   1    7   3    0   0    0    0   0                                  
X                                                                                
XName   Ipkts  Ierrs  Opkts  Oerrs Collis Oqueue                                 
Xlo0        0      0      0      0      0      0                                 
X                                                                                
X                                                                                
X                                                                                
X                                                                                
Xittvax       0.00 2.30 2.28 2.18        Thu Dec 20 20:35:37 1984      3 users   
X                                                                                
XProcs: r d p s sl  Mem: real  ract  virt  vact  free   Disks: Kbps tps msps     
X       2 0 0 0  6       1627   881  5132  1172  1089   hp0       0   0  0.0     
X                                                       hp1       0   0  0.0     
XCpu: ints  scall  csw                Char: in   out    hp2       0   0  0.0     
X       30    276   22                     231   296    hp3       0   0  0.0     
X                                                       --------------------     
XTime: user nice  sys idle                              Total:    0   0          
X        23   41   36    0                                                       
X                                                                                
XPaging: re  at pin pout  oprs  fr  def   sr                                     
X         0   0   0    0     0   0    0    0                                     
X                                                                                
X       nxf  xf  nzf  zf  nrf  rf  prf  swi swo                                  
X         0   0    3   0    0   0    0    0   0                                  
X                                                                                
XName   Ipkts  Ierrs  Opkts  Oerrs Collis Oqueue                                 
Xlo0        0      0      0      0      0      0                                 
X                                                                                
X                                                                                
X                                                                                
X                                                                                
Xittvax       0.00 2.27 2.28 2.18        Thu Dec 20 20:35:42 1984      3 users   
X                                                                                
XProcs: r d p s sl  Mem: real  ract  virt  vact  free   Disks: Kbps tps msps     
X       2 0 0 0  5       1627   878  5132  1150  1084   hp0       0   0  0.0     
X                                                       hp1       0   0  0.0     
XCpu: ints  scall  csw                Char: in   out    hp2       0   0  0.0     
X       34    269   21                     226   310    hp3       0   0  0.0     
X                                                       --------------------     
XTime: user nice  sys idle                              Total:    0   0          
X        31   38   32    0                                                       
X                                                                                
XPaging: re  at pin pout  oprs  fr  def   sr                                     
X         0   0   0    0     0   0    0    0                                     
X                                                                                
X       nxf  xf  nzf  zf  nrf  rf  prf  swi swo                                  
X         0   0    0   0    0   0    0    0   0                                  
X                                                                                
XName   Ipkts  Ierrs  Opkts  Oerrs Collis Oqueue                                 
Xlo0        0      0      0      0      0      0                                 
X                                                                                
X                                                                                
X                                                                                
X                                                                                
/*EOF
cd ..
exit 0