home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Simtel MSDOS 1992 June
/
SIMTEL_0692.cdr
/
msdos
/
editor
/
teco.arc
/
VERIFY.C
< prev
next >
Wrap
C/C++ Source or Header
|
1986-07-15
|
938b
|
45 lines
#include <ctype.h>
#include <stdio.h>
#include <string.h>
verify()
{
#include "teco.h"
int tmp; /* First scratch */
int wrk; /* Second scratch */
number=abs(number); /* Take magnitude */
tmp=bufptx; /* Save temporary */
wrk=number; /* Save counter */
while (1) { /* Position back */
if (!tmp) goto type; /* Scan back line */
if (toascii(buffer[--tmp]) == 13) {
if (! --wrk) {
if (toascii(buffer[tmp+1]) == 10){
tmp++;
}
goto type;
}
}
}
type: wrk=bufptx; /* Save context */
while (1) { /* Position front */
if (wrk > bufptr) { /* Type out stuff */
while (++tmp < wrk) {
echo(buffer[tmp]);
}
return; /* all done type */
}
if (toascii(buffer[++wrk]) == 13) {
if (toascii(buffer[tmp]) == 10) ++wrk;
if (! --number) {
while (tmp++ < wrk) {
echo(buffer[tmp]);
}
return;
}
}
}
}