mPlayer/mPlayer.lua at main · knijn/mPlayer · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
local modem = peripheral.find("modem")
local speaker = peripheral.find("speaker")
local dfpwm = require("cc.audio.dfpwm")
local version = 1.5
local args = {...}

local function update()
    local s = shell.getRunningProgram()
    handle = http.get("https://raw.githubusercontent.com/knijn/mPlayer/main/mPlayer.lua")
    if not handle then
        error("Could not download new version, Please update manually.",0)
    else
        data = handle.readAll()
        local f = fs.open(s, "w")
        handle.close()
        f.write(data)
        f.close()
        error("Please reopen mStream")
    end
end

local h = http.get("https://raw.githubusercontent.com/knijn/mPlayer/main/data.json")
local latestVersion = textutils.unserialiseJSON(h.readAll()).latestVersion

if latestVersion > version then update() end

local args = {...}
local decoder = dfpwm.make_decoder()
local selection = tonumber(args[1]) or 2048
local playing = false
local song
local channelName
local signalType
local manualSelect = false

modem.closeAll()

local function handleInput()
  while true do
    local event, key, is_down = os.pullEvent("key")
    if key == keys.up then
      modem.close(selection)
      selection = selection + 1
      modem.open(selection)
    elseif key == keys.down then
      modem.close(selection)
      selection = selection - 1
      modem.open(selection)
    elseif key == keys.slash then
      manualSelect = true
    end
  end
end

local function drawInfo()
  while true do
    local xSize, ySize = term.getSize()
    term.setTextColor(colors.white)
    term.setBackgroundColor(colors.black)
    term.clear()
    term.setCursorPos(1,1)
    term.setBackgroundColor(colors.cyan)
    term.clearLine()
    print("mPlayer " .. version)
    term.setBackgroundColor(colors.black)
    term.setCursorPos(1,4)
    if playing then
      if stationName then
        term.write(stationName)
      else
        term.write("PLAYING")
      end
      if title then
        term.setCursorPos(1,6)
        term.write(title)
      end
    else
      term.write("NO SIGNAL")
    end


    term.setCursorPos(1,ySize)
    if signalType and not manualSelect then
      term.write("Channel " .. selection .. "   Signal Type: " .. signalType)
    elseif manualSelect then
      term.write("/ ")
      channel = read()
      modem.close(selection)
      selection = tonumber(channel)
      modem.open(selection)
      manualSelect = false
    else
      term.write("Channel " .. selection)
    end
    sleep(0.2)
  end
end

local function play()
  while true do
    local msg
    local function modemfunc()
      modem.open(selection)
      event, side, ch, rch, msg, dist = os.pullEvent("modem_message")
      playing = true
    end
    local function wait()
      sleep(3)
      playing = false
      song = nil
      channelType = nil
      channelName = nil
    end
    parallel.waitForAny(modemfunc,wait)
    if msg then
      local buffer
      if type(msg) == "string" then
        buffer = decoder(msg)
        signalType = "Classic"
      else
        if msg.protocol == "PASC" then
          buffer = {}
          stationName = msg.station

          title = msg.metadata.title
          signalType = msg.protocol

          for i,o in pairs(msg.buffer[1]) do
            buffer[i] = msg.buffer[1][i] / 2 + msg.buffer[2][i] / 2
          end
          while not speaker.playAudio(buffer) do
            os.pullEvent("speaker_audio_empty")
          end
        end
      end
    end
    sleep(0)
  end
end

while true do
  parallel.waitForAny(play,handleInput,drawInfo)
end