C                                                           SOFT DRINK CAN      
NUORG      3.       3.                                      SET 3D ORIGIN       
ERASE1  0                                                   CLEAR STACK 1       
ERASE2  0                                                   CLEAR STACK 2       
CIRCL2  1  0.       0.        0.        1.5                 SET UP WHOLE CIRCLE 
YZROT2  1  0.       0.        90.                           ROTAT INTO X-Y PLANE
DUMP 2  1                                                                       
TNSFR1  1  1.       19.       2.        1.        1.        USE ONLY SEMICIRCLE 
DUMP 1  1                                                                       
CIRCL1  2  0.       5.        0.        1.5                 SET UP TOP CIRCLE   
YZROT1  2  5.       0.        90.                           ROTATE 90 DEGREES   
SETLN1  3  1.5      5.        0.                            SET UP SIDES        
EXPAR1  3  1.5      0.        0.                                                
EXPAR1  3  -1.5     0.        0.                                                
EXPAR1  3  -1.5     5.        0.                                                
SETCV1  4  -.5      5.        1.41                          SET UP THE          
EXPAR1  4  0.       5.        .7                            CAN PUNCTURES       
EXPAR1  4  .5       5.        1.41                                              
SETCV1  5  -.3      5.        -1.46                                             
EXPAR1  5  0.       5.        -1.                                               
EXPAR1  5  .3       5.        -1.46                                             
RDRAW1  0  0.       12.       15.       5.        0.        PLOT THE CAN        
NUORG      7.       3.                                      ADVANCE MORE PAPER  
XZROT1  0  0.       0.        75.                           ROTATE THE CAN      
RDRAW1  0  0.       12.       15.       5.        0.        PLOT AGAIN          
STOP