\* ------------------------------------------------------------------
\* STN Express Script
\* Name:  hitstr01.sc
\* Function: Economical way to display structures
\* Authors:  Martin Petrzilka, CHEMINFO, CH-Wetzikon
\* Andreas Litscher, InfoLit Infobroker GmbH, CH-Bern
\* Date:  09.09.1997
\* ------------------------------------------------------------------

capture off <>

=> del his y;del exp y

=> fil hca
=> s liquid crystals/ct and petrzilka?/au \> _lnum1
=> s _lnum1 \> _lnum2
=> s _lnum1 and _lnum2(l)crystal properties \> _lnum3

capture on
=> d hitstr noh
=> d cost full
=> d his
capture off <>

=> fil stnguide
=>
\* ----------------------------------------------------------------