define MyResidue [TYR]146:B.CE1 #2930 -7.655 -9.4470005 1.774    
center MyResidue                                                
select MyResidue                                                
spacefill                                                       
select MyResidue                                                
color green                                                     
select within(7, MyResidue)                                     
cpk 20                                                          
color cpk 
select within(1, MyResidue)
spacefill
select within(1, MyResidue)
color cpk
select MyResidue
spacefill                                                             
select MyResidue
color green