restrict:c
define stem1 901-907,965-971
echo acceptor stem is defined as stem1
define stem2 910-913,921-924
echo D-stem is defined as stem2
define stem3 926-930,938-942
echo anticodon stem is defined as stem3
define stem4 948-952,960-964
echo T-stem is defined as stem4
define stems stem1,stem2,stem3,stem4
echo stems is name of joint of stem1, stem2, stem3 and stem4 
echo  
define loop1 914-920
echo D-loop is defined as loop1
define loop2 931-937
echo anticodon loop is defined as loop2
define loop3 943-947
echo V-loop is defined as loop3
define loop4 953-959
echo T-loop is defined as loop4
define loops loop1, loop2, loop3, loop4
echo loops is name of joint of loop1, loop2, loop3, loop4
echo   
define knot1 925, 943
echo non-canonical pair G25-A43 is defined as knot1
define knot2 917, 954
echo non-canonical pair G17-U54 is defined as knot2
define knots knot1, knot2
echo knots is name of joint of knot1 and knot2
define lend5 901 
define lend3 973-975
echo lends is name of joint of lend5', lend3' 
define anticodon 933-935
echo tRNA anticodon is defined as anticodon
echo 
echo press any key to view tRNA stems and anticodon in colour
pause
select:c
wireframe 35
color grey
select stem1
color [204,255,204]
select stem2
color [153,204,255]
select stem3
color [204,153,255]
select stem4
color [204,255,255]
fontsize 3
color label white
select g903.c3*
label acceptor stem 
select g951.o4* 
label T-stem
select c911.c5
label D-stem
select u927.o4*
label anticodon stem
select a934.o4*
label anticodon 
select anticodon
color red
wireframe 50
restrict:c
echo here are tRNA stems and anticodon CAC (painted red)
echo 
echo press any key to view non-canonical pairs
pause
select knots
wireframe 100 
colour blue
select g925.o6
label G25-A43
select g917.o4*
label G17-U54
restrict:c