cmilanelo Posted April 13, 2010 Posted April 13, 2010 Hello!! I'm neddeng a little help! How can I gerate this file in with AutoIt: HETATM 1 N1 LIG 1 -15.807 -11.610 -4.342 1.00 0.00 N HETATM 2 N2 LIG 1 7.193 -11.610 -4.342 1.00 0.00 N HETATM 3 N3 LIG 1 -15.807 3.056 -4.342 1.00 0.00 N HETATM 4 N4 LIG 1 7.193 3.056 -4.342 1.00 0.00 N HETATM 5 N5 LIG 1 -15.807 -11.610 8.658 1.00 0.00 N HETATM 6 N6 LIG 1 7.193 -11.610 8.658 1.00 0.00 N HETATM 7 N7 LIG 1 -15.807 3.056 8.658 1.00 0.00 N HETATM 8 N8 LIG 1 7.193 3.056 8.658 1.00 0.00 N TER 9 LIG 1 CONECT 1 2 3 5 CONECT 2 1 4 6 CONECT 3 1 4 7 CONECT 4 2 3 8 CONECT 5 1 6 7 CONECT 6 2 5 8 CONECT 7 3 5 8 CONECT 8 4 6 7 END Very thanks for all!
Fire Posted April 13, 2010 Posted April 13, 2010 Hi. You can : $data="HETATM 1 N1 LIG 1 -15.807 -11.610 -4.342 1.00 0.00 N" & @CRLF & _ "HETATM 2 N2 LIG 1 7.193 -11.610 -4.342 1.00 0.00 N" & @CRLF & _ "HETATM 3 N3 LIG 1 -15.807 3.056 -4.342 1.00 0.00 N" & @CRLF & _ "HETATM 4 N4 LIG 1 7.193 3.056 -4.342 1.00 0.00 N"& @CRLF & _ "HETATM 5 N5 LIG 1 -15.807 -11.610 8.658 1.00 0.00 N"& @CRLF & _ "HETATM 6 N6 LIG 1 7.193 -11.610 8.658 1.00 0.00 N"& @CRLF & _ "HETATM 7 N7 LIG 1 -15.807 3.056 8.658 1.00 0.00 N"& @CRLF & _ "HETATM 8 N8 LIG 1 7.193 3.056 8.658 1.00 0.00 N"& @CRLF & _ "TER 9 LIG 1 "& @CRLF & _ "CONECT 1 2 3 5"& @CRLF & _ "CONECT 2 1 4 6"& @CRLF & _ "CONECT 3 1 4 7"& @CRLF & _ "CONECT 4 2 3 8"& @CRLF & _ "CONECT 5 1 6 7"& @CRLF & _ "CONECT 6 2 5 8"& @CRLF & _ "CONECT 7 3 5 8" & @CRLF & _ "CONECT 8 4 6 7"& @CRLF & _ "END" ;end $write=FileWrite(@ScriptDir&"\yourfile.txt",$data) Exit [size="5"] [/size]
cmilanelo Posted April 14, 2010 Author Posted April 14, 2010 Hi. You can : $data="HETATM 1 N1 LIG 1 -15.807 -11.610 -4.342 1.00 0.00 N" & @CRLF & _ "HETATM 2 N2 LIG 1 7.193 -11.610 -4.342 1.00 0.00 N" & @CRLF & _ "HETATM 3 N3 LIG 1 -15.807 3.056 -4.342 1.00 0.00 N" & @CRLF & _ "HETATM 4 N4 LIG 1 7.193 3.056 -4.342 1.00 0.00 N"& @CRLF & _ "HETATM 5 N5 LIG 1 -15.807 -11.610 8.658 1.00 0.00 N"& @CRLF & _ "HETATM 6 N6 LIG 1 7.193 -11.610 8.658 1.00 0.00 N"& @CRLF & _ "HETATM 7 N7 LIG 1 -15.807 3.056 8.658 1.00 0.00 N"& @CRLF & _ "HETATM 8 N8 LIG 1 7.193 3.056 8.658 1.00 0.00 N"& @CRLF & _ "TER 9 LIG 1 "& @CRLF & _ "CONECT 1 2 3 5"& @CRLF & _ "CONECT 2 1 4 6"& @CRLF & _ "CONECT 3 1 4 7"& @CRLF & _ "CONECT 4 2 3 8"& @CRLF & _ "CONECT 5 1 6 7"& @CRLF & _ "CONECT 6 2 5 8"& @CRLF & _ "CONECT 7 3 5 8" & @CRLF & _ "CONECT 8 4 6 7"& @CRLF & _ "END" ;end $write=FileWrite(@ScriptDir&"\yourfile.txt",$data) Exit Very Thank You man!! =D
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now