cat $1|awk '{print substr($0,2,1) substr($0,4)}'|
awk '{
line=$0;
first_time1=0;
first_time=0;
do
{
if (match(line, /^100/) != 0)
{
cat $1|awk '{print substr($0,2,1) substr($0,4)}'|
awk '{
line=$0;
first_time1=0;
first_time=0;
do
{
if (match(line, /^100/) != 0)
{
cat $1|awk '{print substr($0,2,1) substr($0,4)}'|
awk '{
line=$0;
first_time1=0;
first_time=0;
do
{
if (match(line, /^100/) != 0)
{
cat $1|awk '{print substr($0,2,1) substr($0,4)}'|
awk '{
line=$0;
first_time1=0;
first_time=0;
do
{
if (match(line, /^100/) != 0)
{
if (first_time != 0)
{
printf ("*500\n"
printf ("%s\n",line);
}
else
{
first_time=1;
printf ("%s\n",line);
}
}
else
{
if( first_time1 != 0 )
{
printf ("%s\n",line);
}
first_time1 = 1;
}
}
while (getline line !=0)
printf("*500\n"
}'> $2