local Path = arg(1) local Name = arg(2) local Ext = arg(3) local Temp = Path ++ Name ++ "." ++ Ext local Parent = runfile.Subs\Sub_ParsePath(Temp, -1) local Size = runfile.Subs\Sub_SubDirs(Parent) local i, Victim local List = "Are you sure to delete the following files:\n" local mpDlgText local mpDlgCaption = "Sister Delete" local mpIcon = "QUESTION" if(arg(5) == "n") do Victim = Name ++ ".*" elseif(arg(5) == "e") do Victim = "*." ++ Ext elseif(arg(5) == "b") do Victim = Name ++ "." ++ Ext endif for(i = 0; i < Size; i = i + 1) v[i] = v[i] ++ "\" ++ Victim if(file.validpath(v[i]) == "0") do v[i] = "" else if(arg(4) == "1") List = List ++ "\n" ++ v[i] endif endfor if(arg(4) == "1") do mpDlgText = List if(miscplugin.messagebox(1, "&Yes", "&No") == "&No") quit endif Path = 0 for(i = 0; i < Size; i = i + 1) if(v[i] != "") do if(arg(4) == "2") do mpDlgText = "Delete " ++ v[i] ++ "?" if(miscplugin.messagebox(1, "&Yes", "&No") == "&No") jump NextFile endif file.delete(v[i]) Path = Path + 1 endif @NextFile endfor local mpIcon = "INFORMATION" mpDlgText = Path ++ " files are deleted" miscplugin.messagebox(1, "OK") vec.destroy(v) vec.unload miscplugin.unload