setf mxdq 0.75; use none bond angle hybrid torsion noel nonbon; echo off; mov i 1; mov k numatm; add k i; loopi end: i k; index j i; mov j.x ; mov j.y; mov j.z; end: ; echo; index j 1; inactive j; abuild 1; active j; abuild 99; cngdel 1000; #clone i; use none tether; gdock 0 10 100 1 100 0 20000; gdock 0 10 100 .1 1 0 20000; analyze 0 10000000; use none bond angle hybrid torsion nonbon noel;