Select Code to Download

use Tk;
use Tk;
...
    
    return( $RW, $FW, $CW);
}

sub addFloatingCanvas
{
...
    
    
}

sub addFloatingCanvas
{
...
    
    
}