Save Incremental Version

Here's a small code to save an Incremental version of your maya file, so basically, no need to go to Save-As-> type the Name Again, just Copy the code in a MEL Shelf button: and every-time you need make an Incremental save, hit that Button.

1. global proc incrementalSave()
2. {
3. string $f=`file -q -sn`; // get file name
4. string $ft[]=`file -q -typ`; // file type (mayaAscii, etc.)
5. 
   
6. if ($f!="")
7. {
8. 
   
9. // * extracting base filename (path/basename) and version number *
10. 
    
11. string $n[],$ext="";
12. 
    
13. if (tokenize($f,".",$n)) $ext=$n[size($n)-1];
14. if (size($n)>1) $f=substring($f,1, size($f)-size($ext)-1 );
15. if ($ext!="") $ext=("."+$ext);
16. 
    
17. int $x=0, $m=1, $v=0, $d=0, $w=1;
18. 
    
19. while($x==0)
20. {
21. string $e=substring($f,size($f),size($f)); // last character (as string)
22. 
    
23. if (gmatch($e,"[0-9]")) // last character was a number?
24. {
25. $v+=($m*(int)$e);
26. $m*=10;
27. $d++; // (count number of digits)
28. $f=substring($f,1,size($f)-1); // chop last character
29. }
30. else $x=1;
31. }
32. 
    
33. // * renaming current file (with incremented version number) *
34. 
    
35. $v++; // increment version number
36. string $vs=("000000000"+(string)$v);
37. 
    
38. if ($d<1) $d=2; if ($d>8) $d=8;
39. 
    
40. $vs=substring($vs,size($vs)-$d+1,size($vs));
41. 
    
42. $f=($f+$vs+$ext);
43. 
    
44. if (`confirmDialog -t "Save [+]" -m ("Save Scene As '"+$f+"' ?") -b "Ok" -b "Cancel" -cb "Cancel" -ds "Cancel"`!="Cancel")
45. {
46. file -rename $f;
47. 
    
48. if (`file -q -ex $f`)
49. {
50. if (`confirmDialog -t "File Already Exists" -m ("Overwrite already existing file '"+$f+"'?") -b "Yes" -b "No" -cb "No" -ds "No"`!="Yes")
51. $w=0;
52. }
53. 
    
54. if ($w)
55. {
56. //FileMenu_SaveItem;
57. warning("projMan: Saving File...");
58. evalEcho("file -save");
59. addRecentFile($f,$ft[0]); // add to the recent files list
60. }
61. }
62. }
63. else projectViewer SaveAs;
64. }
65. incrementalSave;