Enumerate hard disks, exclude partitions

[Kevin]

try this

Code:

Copy      Help

_s.expandpath("$desktop$\diskpartinfo.txt")
str s cl=F"cmd.exe /C diskpart /s ''{_s}''"
RunConsole2 cl s
s.trim
int i t tt ttt tttt
str ss disklist partitionlist1 partitionlist2
ARRAY(str) a=s
for(i a.len-1 -1 -1)
,if a[i].len = 0
,,a.remove(i)
for i 0 a.len
,a[i].trim
,ss=a[i]
,;out ss
,if(findrx(ss "Disk(?=\s\d*\s+Online)" 0 0) >=0)
,,if ttt=0
,,,disklist+ ss
,,,ttt+1
,,else
,,,disklist+"[]"
,,,disklist+ ss
,,,ttt+1
,if ss="Disk 0 is now the selected disk."
,,t=find(ss "Disk 0 is now the selected disk." 0 1)
,if ss!="Disk 1 is now the selected disk."
,,if(findrx(ss "Partition(?=\s\d+)" t 0 0)>=0)
,,,if tt=0
,,,,partitionlist1+ ss
,,,,tt+1
,,,else
,,,,partitionlist1 + "[]"
,,,,partitionlist1 +ss
,,,,tt+1
,if ss="Disk 1 is now the selected disk."
,,t=0
,,t=find(ss "Disk 1 is now the selected disk." 0 1)
,,tttt=1
,if tttt=1
,,if(findrx(ss "Partition(?=\s\d+)" t 0 0)>=0)
,,,partitionlist2+ ss
,,,tttt+1
,if tttt >1
,,if(findrx(ss "Partition(?=\s\d+)" t 0 0)>=0)
,,,partitionlist2 + "[]"
,,,partitionlist2 +ss
,,,tttt+1
out disklist
int disknum= numlines(disklist)
out "You currently have %i hard drives" disknum
out partitionlist1
int part1num= numlines(partitionlist1)
out "The first hard drive has %i partitions" part1num
int part2num= numlines(partitionlist2)
out "The second hard drive has %i partitions" part2num
out partitionlist2

i uncommented some outs so we can see what its showing. sorry had to edit code it didn't paste it all