PS1F: interactive oragami    
     

 

// represent yourself as a dbnlet

// reminds me of oragami bird
// note to myself: remember to reverse
// order of each line sequence to connect
antialias 100
forever
{
   paper (<mouse 2>-90)
   Pen 50
   Line  <mouse 1> (<mouse 2>+15) (<mouse 1>+35) <mouse 2>
   Pen 70
   Line  <mouse 2> (<mouse 1>+35) (<mouse 2>+15) <mouse 1> 
   Pen 75
   Line <mouse 1> <mouse 1> (<mouse 1>+35) <mouse 2>
   Pen 30
   Line  <mouse 2> (<mouse 1>+35) <mouse 1> <mouse 1>  
   Pen 90
   Line  <mouse 1 >(<mouse 2>+15) (<mouse 1>+35) (<mouse 1>+35)
   Pen 30
   Line (<mouse 1>+35) (<mouse 1>+35) (<mouse 2>+15) <mouse 1>
   Pen 50
   Line <mouse 1> <mouse 1> (<mouse 1>+35) <mouse 2>
   Pen 40
   Line  <mouse 2> (<mouse 1>+35) <mouse 1> <mouse 1>
}