56 lines
1.3 KiB
Lua
56 lines
1.3 KiB
Lua
|
-- SPDX-FileCopyrightText: 2017 Daniel Ratcliffe
|
||
|
|
--
|
||
|
|
-- SPDX-License-Identifier: LicenseRef-CCPL
|
||
|
|
|
||
|
|
local tArgs = { ... }
|
||
|
|
|
||
|
|
local function printUsage()
|
||
|
|
local programName = arg[0] or fs.getName(shell.getRunningProgram())
|
||
|
|
print("Usages:")
|
||
|
|
print(programName .. " play")
|
||
|
|
print(programName .. " play <drive>")
|
||
|
|
print(programName .. " stop")
|
||
|
|
end
|
||
|
|
|
||
|
|
if #tArgs > 2 then
|
||
|
|
printUsage()
|
||
|
|
return
|
||
|
|
end
|
||
|
|
|
||
|
|
local sCommand = tArgs[1]
|
||
|
|
if sCommand == "stop" then
|
||
|
|
-- Stop audio
|
||
|
|
disk.stopAudio()
|
||
|
|
|
||
|
|
elseif sCommand == "play" or sCommand == nil then
|
||
|
|
-- Play audio
|
||
|
|
local sName = tArgs[2]
|
||
|
|
if sName == nil then
|
||
|
|
-- No disc specified, pick one at random
|
||
|
|
local tNames = {}
|
||
|
|
for _, sName in ipairs(peripheral.getNames()) do
|
||
|
|
if disk.isPresent(sName) and disk.hasAudio(sName) then
|
||
|
|
table.insert(tNames, sName)
|
||
|
|
end
|
||
|
|
end
|
||
|
|
if #tNames == 0 then
|
||
|
|
print("No Music Discs in attached disk drives")
|
||
|
|
return
|
||
|
|
end
|
||
|
|
sName = tNames[math.random(1, #tNames)]
|
||
|
|
end
|
||
|
|
|
||
|
|
-- Play the disc
|
||
|
|
if disk.isPresent(sName) and disk.hasAudio(sName) then
|
||
|
|
print("Playing " .. disk.getAudioTitle(sName))
|
||
|
|
disk.playAudio(sName)
|
||
|
|
else
|
||
|
|
print("No Music Disc in disk drive: " .. sName)
|
||
|
|
return
|
||
|
|
end
|
||
|
|
|
||
|
|
else
|
||
|
|
printUsage()
|
||
|
|
|
||
|
|
end
|