Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- --Reactor Info Panel V1.2a--
- local mon = peripheral.wrap("back")
- local modem = peripheral.wrap("bottom") -- Modem position --
- modem.open(65002) --Open channel 65002 so that we can listen on it --
- --text--
- mon.setCursorPos(1,1)
- mon.setTextColor(colors.white)
- mon.write("Containment status: Reactor 1:")
- mon.setCursorPos(1,2)
- mon.write("-------------------")
- mon.setCursorPos(21,2)
- mon.write("Reactor 2:")
- mon.setCursorPos(21,3)
- mon.write("Reactor 3:")
- mon.setCursorPos(21,4)
- mon.write("Reactor 4:")
- mon.setCursorPos(1,5)
- mon.write("_____________________________________________________________________________________")
- mon.setCursorPos(1,6)
- mon.setTextColor(colors.white)
- mon.write("Reactor 1 :")
- mon.setCursorPos(1,8)
- mon.write("Temp :")
- mon.setCursorPos(21,9)
- mon.write("EU Storage level : ____________________") --42,9--
- mon.setCursorPos(1,10)
- mon.write("_____________________________________________________________________________________")
- mon.setCursorPos(1,11)
- mon.setTextColor(colors.white)
- mon.write("Reactor 2 :")
- mon.setCursorPos(1,13)
- mon.write("Temp :")
- mon.setCursorPos(21,14)
- mon.write("EU Storage level : ____________________") --42,14--
- mon.setCursorPos(1,15)
- mon.write("_____________________________________________________________________________________")
- mon.setCursorPos(1,16)
- mon.setTextColor(colors.white)
- mon.write("Reactor 3 :")
- mon.setCursorPos(1,18)
- mon.write("Temp :")
- mon.setCursorPos(21,19)
- mon.write("EU Storage level : ____________________") -- 42,19--
- mon.setCursorPos(1,20)
- mon.write("_____________________________________________________________________________________")
- mon.setCursorPos(1,21)
- mon.setTextColor(colors.white)
- mon.write("Reactor 4 :")
- mon.setCursorPos(1,23)
- mon.write("Temp :")
- mon.setCursorPos(21,24)
- mon.write("EU Storage level : ____________________") --42,24--
- mon.setCursorPos(1,25)
- mon.write("_____________________________________________________________________________________")
- mon.setCursorPos(25,28)
- mon.setTextColor(colors.yellow)
- mon.write("REACTOR INFO PANEL V1.2a")
- mon.setCursorPos(31,1)
- mon.setTextColor(colors.red)
- mon.write("unknown")
- mon.setCursorPos(31,2)
- mon.setTextColor(colors.red)
- mon.write("unknown")
- mon.setCursorPos(31,3)
- mon.setTextColor(colors.red)
- mon.write("unknown")
- mon.setCursorPos(31,4)
- mon.setTextColor(colors.red)
- mon.write("unknown")
- mon.setCursorPos(39,1)
- mon.setTextColor(colors.white)
- mon.write("Reactor status: Reactor 1:")
- mon.setCursorPos(39,2)
- mon.write("---------------")
- mon.setCursorPos(55,2)
- mon.write("Reactor 2:")
- mon.setCursorPos(55,3)
- mon.write("Reactor 3:")
- mon.setCursorPos(55,4)
- mon.write("Reactor 4:")
- mon.setCursorPos(1,5)
- mon.setCursorPos(65,1)
- mon.setTextColor(colors.red)
- mon.write("unknown")
- mon.setCursorPos(65,2)
- mon.setTextColor(colors.red)
- mon.write("unknown")
- mon.setCursorPos(65,3)
- mon.setTextColor(colors.red)
- mon.write("unknown")
- mon.setCursorPos(65,4)
- mon.setTextColor(colors.red)
- mon.write("unknown")
- while true do
- local event, modemSide, senderChannel, replyChannel, message, senderDistance = os.pullEvent("modem_message")
- print("Last message :"..message)
- -- Doors status --
- if message=="1open" then
- mon.setCursorPos(31,1)
- mon.setTextColor(colors.yellow)
- mon.write("Open .")
- end
- if message=="1close" then
- mon.setCursorPos(31,1)
- mon.setTextColor(colors.green)
- mon.write("Close .")
- end
- if message=="2open" then
- mon.setCursorPos(31,2)
- mon.setTextColor(colors.yellow)
- mon.write("Open .")
- end
- if message=="2close" then
- mon.setCursorPos(31,2)
- mon.setTextColor(colors.green)
- mon.write("Close .")
- end
- if message=="3open" then
- mon.setCursorPos(31,3)
- mon.setTextColor(colors.yellow)
- mon.write("Open .")
- end
- if message=="3close" then
- mon.setCursorPos(31,3)
- mon.setTextColor(colors.green)
- mon.write("Close .")
- end
- if message=="4open" then
- mon.setCursorPos(31,4)
- mon.setTextColor(colors.yellow)
- mon.write("Open .")
- end
- if message=="4close" then
- mon.setCursorPos(31,4)
- mon.setTextColor(colors.green)
- mon.write("Close .")
- end
- --reactor status --
- --Reactor1--
- if message=="1on" then
- mon.setCursorPos(65,1)
- mon.setTextColor(colors.yellow)
- mon.write("ON .")
- end
- if message=="1off" then
- mon.setCursorPos(65,1)
- mon.setTextColor(colors.green)
- mon.write("OFF .")
- end
- --Reactor2--
- if message=="2on" then
- mon.setCursorPos(65,2)
- mon.setTextColor(colors.yellow)
- mon.write("ON .")
- end
- if message=="2off" then
- mon.setCursorPos(65,2)
- mon.setTextColor(colors.green)
- mon.write("OFF .")
- end
- --Reactor3--
- if message=="3on" then
- mon.setCursorPos(65,3)
- mon.setTextColor(colors.yellow)
- mon.write("ON .")
- end
- if message=="3off" then
- mon.setCursorPos(65,3)
- mon.setTextColor(colors.green)
- mon.write("OFF .")
- end
- --Reactor4--
- if message=="4on" then
- mon.setCursorPos(65,4)
- mon.setTextColor(colors.yellow)
- mon.write("ON .")
- end
- if message=="4off" then
- mon.setCursorPos(65,4)
- mon.setTextColor(colors.green)
- mon.write("OFF .")
- end
- --Temp status --
- --Reactor1--
- if message=="1cold" then
- mon.setCursorPos(1,7)
- mon.setTextColor(colors.black)
- mon.write("..............")
- mon.setCursorPos(8,8)
- mon.setTextColor(colors.lightBlue)
- mon.write("Cold .")
- end
- if message=="1norm" then
- mon.setCursorPos(1,7)
- mon.setTextColor(colors.black)
- mon.write("..............")
- mon.setCursorPos(8,8)
- mon.setTextColor(colors.lime)
- mon.write("Normal")
- end
- if message=="1hot" then
- sleep(1)
- modem.transmit(65001, 65002, "off1")
- sleep(1)
- modem.transmit(65001, 65002, "close1")
- mon.setCursorPos(1,7)
- mon.setTextColor(colors.orange)
- mon.write("Emergency stop")
- for i = 1,6 do
- mon.setCursorPos(8,8)
- mon.setTextColor(colors.yellow)
- mon.write("Over.H")
- sleep(1)
- mon.setCursorPos(8,8)
- mon.setTextColor(colors.red)
- mon.write("Over.H")
- end
- end
- --Reactor2--
- if message=="2cold" then
- mon.setCursorPos(1,12)
- mon.setTextColor(colors.black)
- mon.write("..............")
- mon.setCursorPos(8,13)
- mon.setTextColor(colors.lightBlue)
- mon.write("Cold .")
- end
- if message=="2norm" then
- mon.setCursorPos(1,12)
- mon.setTextColor(colors.black)
- mon.write("..............")
- mon.setCursorPos(8,13)
- mon.setTextColor(colors.lime)
- mon.write("Normal")
- end
- if message=="2hot" then
- sleep(1)
- modem.transmit(65001, 65002, "off2")
- sleep(1)
- modem.transmit(65001, 65002, "close2")
- mon.setCursorPos(1,12)
- mon.setTextColor(colors.orange)
- mon.write("Emergency stop")
- for i = 1,6 do
- mon.setCursorPos(8,13)
- mon.setTextColor(colors.yellow)
- mon.write("Over.H")
- sleep(1)
- mon.setCursorPos(8,13)
- mon.setTextColor(colors.red)
- mon.write("Over.H")
- end
- end
- --Reactor3--
- if message=="3cold" then
- mon.setCursorPos(1,17)
- mon.setTextColor(colors.black)
- mon.write("..............")
- mon.setCursorPos(8,18)
- mon.setTextColor(colors.lightBlue)
- mon.write("Cold .")
- end
- if message=="3norm" then
- mon.setCursorPos(1,17)
- mon.setTextColor(colors.black)
- mon.write("..............")
- mon.setCursorPos(8,18)
- mon.setTextColor(colors.lime)
- mon.write("Normal")
- end
- if message=="3hot" then
- sleep(1)
- modem.transmit(65001, 65002, "off3")
- sleep(1)
- modem.transmit(65001, 65002, "close3")
- mon.setCursorPos(1,17)
- mon.setTextColor(colors.orange)
- mon.write("Emergency stop")
- for i = 1,6 do
- mon.setCursorPos(8,18)
- mon.setTextColor(colors.yellow)
- mon.write("Over.H")
- sleep(1)
- mon.setCursorPos(8,18)
- mon.setTextColor(colors.red)
- mon.write("Over.H")
- end
- end
- --Reactor4--
- if message=="4cold" then
- mon.setCursorPos(1,22)
- mon.setTextColor(colors.black)
- mon.write("..............")
- mon.setCursorPos(8,23)
- mon.setTextColor(colors.lightBlue)
- mon.write("Cold .")
- end
- if message=="4norm" then
- mon.setCursorPos(1,22)
- mon.setTextColor(colors.black)
- mon.write("..............")
- mon.setCursorPos(8,23)
- mon.setTextColor(colors.lime)
- mon.write("Normal")
- end
- if message=="4hot" then
- sleep(1)
- modem.transmit(65001, 65002, "off4")
- sleep(1)
- modem.transmit(65001, 65002, "close4")
- mon.setCursorPos(1,22)
- mon.setTextColor(colors.orange)
- mon.write("Emergency stop")
- for i = 1,6 do
- mon.setCursorPos(8,23)
- mon.setTextColor(colors.yellow)
- mon.write("Over.H")
- sleep(1)
- mon.setCursorPos(8,23)
- mon.setTextColor(colors.red)
- mon.write("Over.H")
- end
- end
- --EU Storage --
- --Line 1--
- if message=="10EU1" then
- mon.setCursorPos(40,9)
- mon.setTextColor(colors.red)
- mon.write("##__________________")
- mon.setCursorPos(62,9)
- mon.write("10% ")
- end
- if message=="20EU1" then
- mon.setCursorPos(40,9)
- mon.setTextColor(colors.red)
- mon.write("####________________")
- mon.setCursorPos(62,9)
- mon.write("20% ")
- end
- if message=="30EU1" then
- mon.setCursorPos(40,9)
- mon.setTextColor(colors.red)
- mon.write("######______________")
- mon.setCursorPos(62,9)
- mon.write("30% ")
- end
- if message=="40EU1" then
- mon.setCursorPos(40,9)
- mon.setTextColor(colors.orange)
- mon.write("########____________")
- mon.setCursorPos(62,9)
- mon.write("40% ")
- end
- if message=="50EU1" then
- mon.setCursorPos(40,9)
- mon.setTextColor(colors.orange)
- mon.write("###########__________")
- mon.setCursorPos(62,9)
- mon.write("50% ")
- end
- if message=="60EU1" then
- mon.setCursorPos(40,9)
- mon.setTextColor(colors.orange)
- mon.write("############________")
- mon.setCursorPos(62,9)
- mon.write("60% ")
- end
- if message=="70EU1" then
- mon.setCursorPos(40,9)
- mon.setTextColor(colors.green)
- mon.write("##############______")
- mon.setCursorPos(62,9)
- mon.write("70% ")
- end
- if message=="80EU1" then
- mon.setCursorPos(40,9)
- mon.setTextColor(colors.green)
- mon.write("################____")
- mon.setCursorPos(62,9)
- mon.write("80% ")
- end
- if message=="90EU1" then
- mon.setCursorPos(40,9)
- mon.setTextColor(colors.green)
- mon.write("##################__")
- mon.setCursorPos(62,9)
- mon.write("90% ")
- end
- if message=="100EU1" then
- mon.setCursorPos(40,9)
- mon.setTextColor(colors.lime)
- mon.write("####################")
- mon.setCursorPos(62,9)
- mon.write("100%")
- end
- --Line 2--
- if message=="10EU2" then
- mon.setCursorPos(40,14)
- mon.setTextColor(colors.red)
- mon.write("##__________________")
- mon.setCursorPos(62,14)
- mon.write("10% ")
- end
- if message=="20EU2" then
- mon.setCursorPos(40,14)
- mon.setTextColor(colors.red)
- mon.write("####________________")
- mon.setCursorPos(62,14)
- mon.write("20% ")
- end
- if message=="30EU2" then
- mon.setCursorPos(40,14)
- mon.setTextColor(colors.red)
- mon.write("######______________")
- mon.setCursorPos(62,14)
- mon.write("30% ")
- end
- if message=="40EU2" then
- mon.setCursorPos(40,14)
- mon.setTextColor(colors.orange)
- mon.write("########____________")
- mon.setCursorPos(62,14)
- mon.write("40% ")
- end
- if message=="50EU2" then
- mon.setCursorPos(40,14)
- mon.setTextColor(colors.orange)
- mon.write("###########__________")
- mon.setCursorPos(62,14)
- mon.write("50% ")
- end
- if message=="60EU2" then
- mon.setCursorPos(40,14)
- mon.setTextColor(colors.orange)
- mon.write("############________")
- mon.setCursorPos(62,14)
- mon.write("60% ")
- end
- if message=="70EU2" then
- mon.setCursorPos(40,14)
- mon.setTextColor(colors.green)
- mon.write("##############______")
- mon.setCursorPos(62,14)
- mon.write("70% ")
- end
- if message=="80EU2" then
- mon.setCursorPos(40,14)
- mon.setTextColor(colors.green)
- mon.write("################____")
- mon.setCursorPos(62,14)
- mon.write("80% ")
- end
- if message=="90EU2" then
- mon.setCursorPos(40,14)
- mon.setTextColor(colors.green)
- mon.write("##################__")
- mon.setCursorPos(62,14)
- mon.write("90% ")
- end
- if message=="100EU2" then
- mon.setCursorPos(40,14)
- mon.setTextColor(colors.lime)
- mon.write("####################")
- mon.setCursorPos(62,14)
- mon.write("100%")
- end
- --Line 3 --
- if message=="10EU3" then
- mon.setCursorPos(40,19)
- mon.setTextColor(colors.red)
- mon.write("##__________________")
- mon.setCursorPos(62,19)
- mon.write("10% ")
- end
- if message=="20EU3" then
- mon.setCursorPos(40,19)
- mon.setTextColor(colors.red)
- mon.write("####________________")
- mon.setCursorPos(62,19)
- mon.write("20% ")
- end
- if message=="30EU3" then
- mon.setCursorPos(40,19)
- mon.setTextColor(colors.red)
- mon.write("######______________")
- mon.setCursorPos(62,19)
- mon.write("30% ")
- end
- if message=="40EU3" then
- mon.setCursorPos(40,19)
- mon.setTextColor(colors.orange)
- mon.write("########____________")
- mon.setCursorPos(62,19)
- mon.write("40% ")
- end
- if message=="50EU3" then
- mon.setCursorPos(40,19)
- mon.setTextColor(colors.orange)
- mon.write("###########__________")
- mon.setCursorPos(62,19)
- mon.write("50% ")
- end
- if message=="60EU3" then
- mon.setCursorPos(40,19)
- mon.setTextColor(colors.orange)
- mon.write("############________")
- mon.setCursorPos(62,19)
- mon.write("60% ")
- end
- if message=="70EU3" then
- mon.setCursorPos(40,19)
- mon.setTextColor(colors.green)
- mon.write("##############______")
- mon.setCursorPos(62,19)
- mon.write("70% ")
- end
- if message=="80EU3" then
- mon.setCursorPos(40,19)
- mon.setTextColor(colors.green)
- mon.write("################____")
- mon.setCursorPos(62,19)
- mon.write("80% ")
- end
- if message=="90EU3" then
- mon.setCursorPos(40,19)
- mon.setTextColor(colors.green)
- mon.write("##################__")
- mon.setCursorPos(62,19)
- mon.write("90% ")
- end
- if message=="100EU3" then
- mon.setCursorPos(40,19)
- mon.setTextColor(colors.lime)
- mon.write("####################")
- mon.setCursorPos(62,19)
- mon.write("100%")
- end
- --Line 4--
- if message=="10EU4" then
- mon.setCursorPos(40,24)
- mon.setTextColor(colors.red)
- mon.write("##__________________")
- mon.setCursorPos(62,24)
- mon.write("10% ")
- end
- if message=="20EU4" then
- mon.setCursorPos(40,24)
- mon.setTextColor(colors.red)
- mon.write("####________________")
- mon.setCursorPos(62,24)
- mon.write("20% ")
- end
- if message=="30EU4" then
- mon.setCursorPos(40,24)
- mon.setTextColor(colors.red)
- mon.write("######______________")
- mon.setCursorPos(62,24)
- mon.write("30% ")
- end
- if message=="40EU4" then
- mon.setCursorPos(40,24)
- mon.setTextColor(colors.orange)
- mon.write("########____________")
- mon.setCursorPos(62,24)
- mon.write("40% ")
- end
- if message=="50EU4" then
- mon.setCursorPos(40,24)
- mon.setTextColor(colors.orange)
- mon.write("###########__________")
- mon.setCursorPos(62,24)
- mon.write("50% ")
- end
- if message=="60EU4" then
- mon.setCursorPos(40,24)
- mon.setTextColor(colors.orange)
- mon.write("############________")
- mon.setCursorPos(62,24)
- mon.write("60% ")
- end
- if message=="70EU4" then
- mon.setCursorPos(40,24)
- mon.setTextColor(colors.green)
- mon.write("##############______")
- mon.setCursorPos(62,24)
- mon.write("70% ")
- end
- if message=="80EU4" then
- mon.setCursorPos(40,24)
- mon.setTextColor(colors.green)
- mon.write("################____")
- mon.setCursorPos(62,24)
- mon.write("80% ")
- end
- if message=="90EU4" then
- mon.setCursorPos(40,24)
- mon.setTextColor(colors.green)
- mon.write("##################__")
- mon.setCursorPos(62,24)
- mon.write("90% ")
- end
- if message=="100EU4" then
- mon.setCursorPos(40,24)
- mon.setTextColor(colors.lime)
- mon.write("####################")
- mon.setCursorPos(62,24)
- mon.write("100%")
- end
- end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement