.sr docfile = &sysfnam. ;.sr docversion = 0 ;.im teigmlp1 ..if &e'&chap = 0 ..th ..do begin . ..ty Which chapter do you want to process? 1 - 10 . ..ty (Script with &CHAP n option to avoid this prompt.) . ..rv chap TERM ..do end ..if &e'&spacing = 0 ..th ..do begin . ..ty Single spaced (1) or double spaced (2)? . ..ty (Script with &spacing n option to avoid this prompt.) . ..rv spacing TERM ..do end ..if &spacing < 2 ..th ..sr spacing = 0 ..el ..if &spacing > 1 ..th ..sr spacing = &spacing - 1 .********************************************************************* .* Document proper begins. ..do end;..el ..if &chap = 2 ..th ..do begin ..do end;..el ..if &chap = 3 ..th ..do begin ..do end;..el ..if &chap = 4 ..th ..do begin ..do end;..el ..if &chap = 5 ..th ..do begin ..do end;..el ..if &chap = 6 ..th ..do begin ..do end;..el ..if &chap = 7 ..th ..do begin ..do end;..el ..if &chap = 8 ..th ..do begin ..do end;..el ..if &chap = 9 ..th ..do begin ..do end;..el ..if &chap = 10 ..th ..do begin ..do end