set usageData to "ドック名" & tab & "項目名" & tab & "使用回数" & return
tell application "DragThing"
	set x to count every dock
	repeat with x from 1 to x
		if normal dock is dock kind of dock x then
			set dockName to name of dock x
			set layerX to count every layer of dock x
			repeat with layerX from 1 to layerX
				set slotx to count every slot of layer layerX of dock x
				repeat with slotx from 1 to slotx
					set theSlot to slot slotx of layer layerX of dock x
					if false is empty of theSlot then
						set usageData to usageData & dockName & tab & name of theSlot & tab & (usage of theSlot as string) & return
					end if
				end repeat
			end repeat
		end if
	end repeat
end tell
set the clipboard to usageData
beep