24СʱÈÈÃŰæ¿éÅÅÐаñ    

²é¿´: 2164  |  »Ø¸´: 8
µ±Ç°Ö»ÏÔʾÂú×ãÖ¸¶¨Ìõ¼þµÄ»ØÌû£¬µã»÷ÕâÀï²é¿´±¾»°ÌâµÄËùÓлØÌû

nufang19a

½ð³æ (ÕýʽдÊÖ)


[½»Á÷] ¡¾ÇóÖú¡¿Ë®×ÜÈ¥²»µô£¬ÇëÖ¸µã£¨Òѽâ¾ö£¬Ð»Ð»¸÷λ°ïÖú£© ÒÑÓÐ2È˲ÎÓë

Éú³É½øÍ¨µÀÖк¬Ë®·Ö×ÓµÄpdbÎļþ£º

1. ͨ¹ývmdÏÈÕÒµ½Í¨µÀÖеÄË®·Ö×Ó£¬»ñÈ¡ËüÃǵıàºÅ

2. È»ºóÉú³ÉÕâЩˮ·Ö×ÓµÄpdbÎļþ£¨Àý×Ó£©£º

mol load pdb 1YMG.pdb

set model [atomselect top "water and (resid 411 or resid 415 or resid 455 or resid 426 or resid 407 or resid 426)"]

$model writepdb wat.pdb

exit

3. Éú³Éµ°°×µÄpdbÎļþ£º

mol load pdb 1YMG.pdb

set model [atomselect top protein]

$model writepdb 1ymg.pdb

exit

4. ºÏ²¢wat.pdb Óë1ymg.pdb

ÕâÒ»²½²»ÓÃд½Å±¾£¬Ö±½Ó°Ñwat.pdbµÄÄÚÈÝ£¨¼´È¥Í·È¥Î²£©¿½±´µ½1ymg.pdbµÄENDǰ¼´¿É¡£

5. over¡£



¹¹½¨ËľÛÌå(buildtetra.tcl):

mol load pdb 1ymg.pdb
set all [atomselect top all]
$all set segname A
$all writepdb AQP1-A.pdb
$all delete

set sel [atomselect top all]
$sel set segname B
$sel move {{-1.0 0.0 0.0 0.0} {0.0 -1.0 0.0 110.531} {0.0 0.0 1.0 0.0} {0.0 0.0 0.0 1.0}}
$sel writepdb AQP1-B.pdb
$sel delete

mol delete top
mol load pdb 1ymg.pdb
set sel [atomselect top all]
$sel set segname C
$sel move {{0.0 -1.0 0.0 55.2655} {1.0 0.0 0.0 55.2655} {0.0 0.0 1.0 0.0} {0.0 0.0 0.0 1.0}}
$sel writepdb AQP1-C.pdb
$sel delete

mol delete top
mol load pdb 1ymg.pdb
set sel [atomselect top all]
$sel set segname D
$sel move {{0.0 1.0 0.0 -55.2655} {-1.0 0.0 0.0 55.2655} {0.0 0.0 1.0 0.0} {0.0 0.0 0.0 1.0}}
$sel writepdb AQP1-D.pdb
$sel delete

cat AQP1-A.pdb AQP1-B.pdb AQP1-C.pdb AQP1-D.pdb > AQP1.pdb
È»ºó´ò¿ªAQP1.pdb,ËÑË÷END,°ÑÖмäµÄÈý¸öEND¼°ÏàÓ¦µÄÔÓÏîÈ¥µô£¬±£´æÎªAQP1-ALL.pdb¡£´Ëʱ¾ÍÉú³ÉÁËËľÛÌåpdbÎļþ¡£


½øÐÐpsfÉú³ÉǰµÄÎļþ×¼±¸(prepfiles.tcl)£º
mol load pdb AQP1-ALL.pdb
foreach S {A B C D} {
set seg [atomselect top "segname $S and chain A"]
$seg writepdb seg$S.pdb
$seg delete
}

foreach S {A B C D} {
set wat [atomselect top "segname $S and resname HOH and within 100 of chain A"]
$wat writepdb crystwat$S.pdb
$wat delete
}
exit

²úÉúpsfÎļþ£¨build.psf£©:
package require psfgen
topology ../top_all27_prot_lipid.rtf
pdbalias residues HIS HSE
pdbalias atom ILE CD1 CD
pdbalias atom HOH O OH2
pdbalias resid HOH TIP3
foreach S {A B C D} {
segment $S {
pdb seg$S.pdb
}
coordpdb seg$S.pdb $S
regenerate angles dihedrals
segment WC$S {
auto none
pdb crystwat$S.pdb
}
coordpdb crystwat$S.pdb WC$S
}
guesscoord
writepdb aqp1.pdb
writepdb aqp1.psf
exit

solvating¹ý³Ì£º
ÏȼÓÔØÉÏÒ»²½²úÉúµÄpsf pdbÎļþ£¬È»ºó
set sel [atomselect top all]
measure minmax $sel
solvate -t 3 -minmax {ÉÏÒ»²½µÃµ½µÄÖµ} -o solaqp1
È»ºóдmake_solv.tcl½Å±¾£º
set sol_infile solaqp1.pdb
set aqp1_inbase aqp1
set outbase aqp1_solv_raw
package require psfgen
resetpsf
readpsf solaqp1.psf
coordpdb solaqp1.pdb
readpsf ${aqp1_inbase}.psf
coordpdb ${aqp1_inbase}.pdb
writepdb ${outbase}.pdb
writepsf ${outbase}.psf
exit


¹À²âËùÐèĤ³ß´ç£º
ÏȰÑÎÒ¼ÓË®²¢ÔËÐйýmake_solv.tclËù²úÉúµÄpsf pdb¼ÓÔØ£¬È»ºóÔÙ
set all [atomselect top all]
measure $all minmax
[][]
È»ºóx2-x1  y2-y1

½«µ°°×µÄÖØÐĺÍË®ºÐ×ÓµÄÖØÐÄÖØºÏ£º
mol load psf aqp1_solv_raw.psf pdb aqp1_solv_raw.pdb
set all [atomselect top all]
$all moveby [vecinvert [measure center $all]]
display resetview
È»ºó¹À²âɾ³ýË®µÄÖµ£º
½«Ä¤µÄpsf pdb¼ÓÔØ£¬È»ºó
set sel [atomselect top lipid]
measure minmax $sel
Ñ¡Ôñz2 µÄÕûÊýÖµ:25
È»ºó£º
set solv [atomselect top "segname SOLV"]
$solv set beta 1
set seltext "segname SOLV and same residue as ((z < -25) or (z > 25))"
set sel [atomselect top $seltext]
$sel set beta 0

set badwater [atomselect top "name OH2 and beta > 0"]
set seglist [$badwater get segid]
set reslist [$badwater get resid]

mol delete all
package require psfgen
resetpsf
topology ../top_all27_prot_lipid.rtf
readpsf aqp1_solv_raw.psf
coorpdb aqp1_solv_raw.pdb
foreach segid $seglist resid $reslist {
delatom $segid $resid
}
writepdb aqp1_solv.pdb
writepsf aqp1_solv.psf

³öÏÖµÄÎÊÌ⣺
Ñ¡ÔñÐèҪȥµôµÄË®·Ö×Ó£¬¸ù±¾È¥²»µô¡£ÎÒÒ²ÖªµÀÒ»²¿·ÖÔ­Òò£ºÒòΪÎÒÔÚmake_solv.tcl½Å±¾ÖаÑsegment SOLVÄÇÒ»¶Î¸øÉ¾³ýÁË£¬Ó¦¸Ã»¹ÓÐÆäËûµÄÔ­Òò¡£ÎÒÏÖÔÚ°ÑÓÐË®ºÐ×ÓµÄpdb¼°make_solv.tclËù²úÉúµÄpdb´«ÉÏÀ´£¬´ó¼Ò°ïæ·ÖÎöһϡ£ÏÈллÁË
http://u.115.com/?ct=index&a ... d=1&cid=2023017
Õâ¸öÁ´½ÓµÄÓû§Ãû£ºtonme ÃÜÂ룺002725

[ Last edited by nufang19a on 2011-2-28 at 11:47 ]
»Ø¸´´ËÂ¥

» ²ÂÄãϲ»¶

» ±¾Ö÷ÌâÏà¹ØÉ̼ÒÍÆ¼ö: (ÎÒÒ²ÒªÔÚÕâÀïÍÆ¹ã)

» ±¾Ö÷ÌâÏà¹Ø¼ÛÖµÌùÍÆ¼ö£¬¶ÔÄúͬÑùÓаïÖú:

ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

nufang19a

½ð³æ (ÕýʽдÊÖ)


ȷʵÊÇSOLVµÄÎÊÌ⣬ˮ·Ö×ÓÓжà¸ösegname¡£Òò´Ë
ÎÒ°Ñ£º
set solv [atomselect top "segname SOLV"]
¸Ä³ÉÁË£º
set solv [atomselect top "segname SOLV or segname WT1"]
Ë®·Ö×ÓÈ¥µôÁË£¬ÏÂͼ£º£¨ÕâÑùÓ¦¸Ã²»¶Ô£¬ËµÃ÷ÎÒµÄË®·Ö×ÓÇøÓòÑ¡ÔñÓ¦¸ÃÓÐÎÊÌâ £©


[ Last edited by nufang19a on 2011-2-27 at 16:21 ]
5Â¥2011-02-27 15:35:56
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
²é¿´È«²¿ 9 ¸ö»Ø´ð

wally8962

ľ³æ (ÖøÃûдÊÖ)

¡ï ¡ï ¡ï ¡ï ¡ï
Сľ³æ(½ð±Ò+0.5):¸ø¸öºì°ü£¬Ð»Ð»»ØÌû½»Á÷
zh1987hs(½ð±Ò+4): лл£¡ 2011-02-26 22:47:39
"cat AQP1-A.pdb AQP1-B.pdb AQP1-C.pdb AQP1-D.pdb > AQP1.pdb
È»ºó´ò¿ªAQP1.pdb,ËÑË÷END,°ÑÖмäµÄÈý¸öEND¼°ÏàÓ¦µÄÔÓÏîÈ¥µô£¬±£´æÎªAQP1-ALL.pdb¡£´Ëʱ¾ÍÉú³ÉÁËËľÛÌåpdbÎļþ¡£"

Õâ¸ö²½ÖèÊǶàÓàµÄ£¬ºóÃæ¸ù±¾Óò»µ½Õâ¸öËľÛÌ壬ֱ½ÓÓÃÇ°ÃæµÄµ¥Ìå¾ÍÐÐÁË¡£

ÄãÏëÈ¥µô¿×µÀÖеÄË®·Ö×Ó£¿ÄǾ§ÌåÖеÄË®·Ö×Ó¿ÉÒÔÒ»¸ö¶¼²»Óá£

ºóÃæ¿×µÀÖеÄË®·Ö×ӺܿÉÄÜÊÇÄãsolvateʱ¼Ó½øÈ¥µÄ¡£¿ÉÒÔÓÃ-bµ÷ÕûË®·Ö×Ӿ൰°×µÄ¾àÀëÀ´¿ØÖƼÓÈëµÄË®·Ö×Ó¡£

¸ü¼òµ¥µÄ£¬ÔÚvmdÖУ¬°´Êý×Ö¼ü¡°6¡±£¬Êó±ê±ä³ÉÍÏ߮ģʽ£¬Ö±½Ó°ÑË®·Ö×ÓÍϳöÀ´£¬ÔÙ±£´æpdb

[ Last edited by wally8962 on 2011-2-26 at 18:36 ]
2Â¥2011-02-26 18:35:41
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

nufang19a

½ð³æ (ÕýʽдÊÖ)


ΪÁËÉîÈëѧϰVMD NAMD£¬ÎÒÏÖÔÚÊÇÕÒÁËһƪÎÄÕ£¬·ÂÕÕ±ðÈ˵ÄÎÄÕÂ×öµÄ¡£¹ØÓÚÉÏÃæµÄÎÊÌâ¸Ð¾õÎÒû˵Çå³þ£¬ÎÒÏÖÔÚÊÇÏë°´Õս̳̰ÑbadwaterÈ¥µô£¬È»ºó¼Óµ½Ä¤ÖУ¬¿Ébadwater¾ÍÊÇÈ¥²»µô

[ Last edited by nufang19a on 2011-2-27 at 00:00 ]
3Â¥2011-02-26 22:51:05
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

nufang19a

½ð³æ (ÕýʽдÊÖ)


ÄѵÀ¸úNAMD tutorial×îºóÃæµÄÕâÒ»¶ÎÓйأº
### Solvate the molecule in a water box with enough padding (15 A).
### One could alternatively align the molecule such that the vector
### from the center of mass to the farthest atom is aligned with an axis,
### and then use no padding
package require solvate
solvate ${molname}.psf ${molname}.pdb -t 15 -o del_water
resetpsf
package require psfgen
mol new del_water.psf
mol addfile del_water.pdb
readpsf del_water.psf
coordpdb del_water.pdb

### Determine which water molecules need to be deleted and use a for loop
### to delete them
set wat [atomselect top "same residue as {water and ((x-$x1)*(x-$x1) +
(y-$y1)*(y-$y1) + (z-$z1)*(z-$z1))<($max*$max)}"]
set del [atomselect top "water and not same residue as {water and
((x-$x1)*(x-$x1) + (y-$y1)*(y-$y1) + (z-$z1)*(z-$z1))<($max*$max)}"]

set seg [$del get segid]
set res [$del get resid]
set name [$del get name]
for {set i 0} {$i < [llength $seg]} {incr i} {
delatom [lindex $seg $i] [lindex $res $i] [lindex $name $i]
}
writepsf ${molname}_ws.psf
writepdb ${molname}_ws.pdb
mol delete top
mol new ${molname}_ws.psf
mol addfile ${molname}_ws.pdb
puts "CENTER OF MASS OF SPHERE IS: [measure center [atomselect top all] weight mass]"
puts "RADIUS OF SPHERE IS: $max"
mol delete top
4Â¥2011-02-27 00:24:45
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[»ù½ðÉêÇë] ºÅÍâºÅÍâ +5 GZUZM 2026-08-24 5/250 2026-08-24 18:34 by 40862026
[»ù½ðÉêÇë] ÄÜ·ñÍ˳ö²ÎÓëµÄÃæÉÏÏîÄ¿½â³ýÏÞÏî +20 koalala 2026-08-24 22/1100 2026-08-24 18:01 by Nano-Firefly
[»ù½ðÉêÇë] ûÓÐÈκÎÏûÏ¢-ÊDz»ÊǾÍÁ¹ÁË +6 ͼÀ²Í¼À² 2026-08-24 6/300 2026-08-24 17:44 by ССºì·«
[»ù½ðÉêÇë] Èç¹û´Ë¿ÌÄãÕýÔÚΪ¹ú»ù¸Ðµ½½¹ÂÇ£¬²»·ÁÀ´ÌýÌýÕâÊס¶»ù½ðÖ®Íâ¡· +5 scalable 2026-08-24 5/250 2026-08-24 17:03 by spiderzhuzhi
[»ù½ðÉêÇë] 2026¹ú×ÔÈ»º¯ÆÀ·Ñµ½ÕË +17 ÑòÑü°å 2026-08-21 19/950 2026-08-24 16:52 by iaeyuan
[»ù½ðÉêÇë] ½¨Òé»ù½ð·¢²¼Ìáǰ¸ø³öÃ÷È·µÄʱ¼äµã +13 kulium 2026-08-21 16/800 2026-08-24 16:27 by superceng
[»ù½ðÉêÇë] ÎÒÃæÉÏÍêµ°ÁË +8 ÇÒÌý»¢Ð¥ 2026-08-20 9/450 2026-08-24 13:52 by zzuzxg
[»ù½ðÉêÇë] ·Å°ñǰµÄ²»µ­¶¨ 20+4 snowwithsea 2026-08-19 17/850 2026-08-24 10:20 by echo8914667
[»ù½ðÉêÇë] ¿ÆÑй¶ùÌ«ÄÑÁË +18 ÎÒ4´ó°×²Ë 2026-08-20 19/950 2026-08-24 09:47 by ¿­¶÷¹ãÊ¢´ß»¯·ÖÎ
[»ù½ðÉêÇë] Ã÷ÌìÓ¦¸Ã¿É²éÁË£¡£¿ +4 chengyan1220 2026-08-23 4/200 2026-08-24 08:47 by gloomy6159
[»ù½ðÉêÇë] 2026ÄêµÄ¹ú¼ÒÉç¿Æ»ù½ðÏîĿͨѶÆÀÉóµÄйæÔòÓëж¯Ïò¡¢ÐÂÌôÕ½ +4 process2012 2026-08-23 5/250 2026-08-23 19:58 by jurkat.1640
[»ù½ðÉêÇë] ½ñÌì·Å°ñÂ𣿠+15 ²¼²¼ºÍÒ»¶þ 2026-08-19 16/800 2026-08-23 09:55 by ÕÅ´ºÉú
[»ù½ðÉêÇë] Ö»ÓÐÿÄêÕâÖÖʱºòÀ´¹ä¹äСľ³æ +24 yaoyewhu2008 2026-08-20 26/1300 2026-08-22 17:43 by kammury
[»ù½ðÉêÇë] ½ñÌì»ù½ð»á³ö½á¹ûÂð£¿20260819 +16 kkkl_v 2026-08-19 17/850 2026-08-22 16:12 by °¢²¼Abu
[»ù½ðÉêÇë] ʱ¼ä´Á½ñÌ죬20ºÅ±äÁË +5 archvillain 2026-08-20 5/250 2026-08-22 06:12 by hui_daxiao
[»ù½ðÉêÇë] ʱ¼ä´ÁÓÖ±äÁË +13 wuchongjun 2026-08-20 19/950 2026-08-21 17:21 by ×Ïɼ´¼
[»ù½ðÉêÇë] Ó¦¸ÃÊÇÏÂÖÜÈý26ÈÕ¹«²¼Á˰ɣ¿ +4 ¹þ¹þ¸ò£¿ 2026-08-21 4/200 2026-08-21 10:58 by Vivilian
[»ù½ðÉêÇë] »ù½ð°¡»ù½ð +4 longfie172 2026-08-20 4/200 2026-08-21 08:58 by mark mao
[»ù½ðÉêÇë] ÖØÒªÏûÏ¢£¬ÖÐÎçϵͳÔÚά»¤ +11 yuleib84 2026-08-18 12/600 2026-08-20 11:09 by xskun
[»ù½ðÉêÇë] Ã÷Ìì·Å°ñ£¿ +5 Shxjjxjkx 2026-08-18 5/250 2026-08-18 18:14 by -´ó´ó´ó´ó´ó-
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û