# You can use this script if you load 1ob2.spt from this folder!
# Цель данного скрипта-изучить пространственную структуру РНК и обеспечивающие ее факторы.
load H:\Term3\CreditWorks\Credit11\pdb1ob2.ent
skript 10b2.spt
select all
wireframe off
select 1-77B
backbone 140
zoom 120
pause
define helix1 1-7B,66-72B
define helix2 50-53B,61-64B
define helix3 27-29B,41-43B    
echo helix1,helix2,helix3-helixes t-RNA 
define loop1 9-13B
define loop2 31-40B
define loop3 54-60B
echo loop1,loop2,loop3-loops between helixes
define knot G4,U69
echo knot-uncanonic complementary interaction
define lends 73-77B,G1
echo lends-5`-end and G1 of 3`-end (conservative thing)
define anticodon 35-37B
echo anticodon- anticodon t-RNA(there is AAG here,but for PHE-RNA it can be AAA too)
select helix1
wireframe 60
color red
pause
select helix2
wireframe 60
color blue
pause
select helix3
wireframe 60
color green
select knot
pause
wireframe 60
color yellow
select anticodon
pause
wireframe 90
select lends
pause
backbond 100
color white
pause
select protein
color brown
cartoons 350
pause
select all
wireframe off
backbone 140
restrict 1-77B
select 65B,49B
pause
wireframe 70
select 10-13B
pause
wireframe 70
select 21-26B
pause
wireframe 70
select 56-58B
pause
wireframe 70
select 21-24B
pause
wireframe 70
select 31-40B
pause
wireframe 70