/*お節介*/
#uselib "kernel32.dll"
#func global GetWindowsDirectoryA "GetWindowsDirectoryA" sptr,sptr
#func global GetVolumePathNameA "GetVolumePathNameA" sptr,sptr,sptr
#func global GetVolumeInformationA "GetVolumeInformationA" sptr,sptr,sptr,sptr,sptr,sptr,sptr,sptr
#func global GetVolumeNameForVolumeMountPointA "GetVolumeNameForVolumeMountPointA" sptr,sptr,sptr
sdim buf,512,3
GetWindowsDirectoryA varptr(buf(0)),512
mes stat
mes buf(0)
GetVolumePathNameA varptr(buf(0)),varptr(buf(1)),varptr(buf(2))
mes stat
mes buf(1)
mes buf(2)
GetVolumeInformationA varptr(buf(1)),0,0,varptr(val),0,0,0,0
mes stat
mes strf("%x",val)
GetVolumeNameForVolumeMountPointA varptr(buf(1)),varptr(buf(0)),512
mes stat
mes buf(0)
;UUID取得なら下記だけでいいと思う
sdim ss,512
GetVolumeNameForVolumeMountPointA "C:\\",varptr(ss),512
mes stat
mes ss