| Scripting Resources for DigitalMicrograph™ |
| Generate File Number | |
Function |
Script to generate a file number using a reverse date format NYYMMDD00 - where N is a microscope designation, YY=year, MM=month, DD=day, 00=00 - subsequent images are incremented 01, 02 etc. |
Version |
version:20030204, v1.1 |
Author |
D. R. G. Mitchell |
Acknowledgements |
- |
Comments |
It is essential that the PC date and time is set correctly. Note microscopestring (N) should be set to 1, 2, 3 . . . to signify different microscopes. In this way no two microscopes can produce images with the same file number. The string is placed in the clipboard and can be pasted into the 'File/Save As' dialog when saving the first image of the day. |
System Requirements |
Should be compatible with all recent versions of DigitalMicrograph. |
Known Issues |
Note this may need to be modified where the date format (set in Windows Date and Time preferences) is not set to Australian/UK format. |
Supported |
Yes |
Included Files |
Main script file. |
Source Code |
// Script to generate a file number using our reverse date format // NYYMMDD00 // It is essential that the PC date and time is set correctly // Note microscopestring (N) should be set to 1, 2, 3 . . . to signify different microscopes
// The string is placed in the clipboard and can be pasted into the 'File/Save As' dialog when
// Note this may need to be modified where the date format (set in Windows Date and Time preferences)
// version:20030204 // D. R. G. Mitchell, adminnospam@dmscripting.com (remove the nospam to make this email address work) // v1.1, Feb 2003
string todaysdate, microscopestring="1", temp
getdate(0,todaysdate)
number length=len(todaysdate) if(length<10) todaysdate="0"+todaysdate
string year = right(todaysdate,2) string month = mid(todaysdate,3,2) string day = left(todaysdate,2)
beep()
string fileno=microscopestring+year+month+day+"00" result("\n"+fileno+" has been copied to the clipboard"+"\n") clipboardsetasstring(fileno)
|