Jump to content




ComputerCraft Control System with Touchpad

Started by maxirocker, Apr 26 2014 04:27 PM

  • You cannot reply to this topic
7 replies to this topic

#1 maxirocker

  • Members
  • 4 posts

Posted 26 April 2014 - 04:27 PM

Hey Forum,

I've a question about a CC Program by me to Control my Nuclear Reaktor's with CC. I will turn out a rs Output with a Touchpad. But when i click on my monitor, it doesn't work.

Im sorry for my bad english, i hope you understand me!

Here The Code:

-- Anfang Einstellungen --

monitor = peripheral.wrap("top")
monitor.setTextScale(1)
monitor.setTextColor(colors.lime)

monitor.clear()

-- Ende Einstellungen --

-- Anfang Layout --

monitor.setCursorPos(1,2)
  monitor.write("==================================================")
monitor.setCursorPos(1,10)
  monitor.write("--------------------------------------------------")
monitor.setCursorPos(1,18)
  monitor.write("==================================================")
monitor.setCursorPos(26,3)
  monitor.write("-")
monitor.setCursorPos(1,4)
  monitor.write("--------------------------------------------------")
monitor.setCursorPos(26,5)
  monitor.write("-")
monitor.setCursorPos(26,6)
  monitor.write("-")
monitor.setCursorPos(26,7)
  monitor.write("-")
monitor.setCursorPos(26,8)
  monitor.write("-")
monitor.setCursorPos(26,9)
  monitor.write("-")
monitor.setCursorPos(26,11)
  monitor.write("-")
monitor.setCursorPos(26,12)
  monitor.write("-")
monitor.setCursorPos(26,13)
  monitor.write("-")
monitor.setCursorPos(26,14)
  monitor.write("-")
monitor.setCursorPos(26,15)
  monitor.write("-")
monitor.setCursorPos(1,16)
  monitor.write("--------------------------------------------------")
monitor.setCursorPos(26,17)
  monitor.write("-")

-- Ende Layout --

-- Anfang Inhalt --

monitor.setCursorPos(9,3)
  monitor.write("Reaktor 1")
monitor.setCursorPos(35,3)
  monitor.write("Reaktor 2")
monitor.setCursorPos(9,17)
  monitor.write("Reaktor 3")
monitor.setCursorPos(35,17)
  monitor.write("Reaktor 4")

-- Ende Inhalt --

-- Anfang Buttons --

monitor.setBackgroundColor(colors.orange)
monitor.setTextColor(colors.black)

monitor.setCursorPos(8,7)
  monitor.write(" ON / OFF ")
monitor.setCursorPos(34,7)
  monitor.write(" ON / OFF ")
monitor.setCursorPos(8,13)
  monitor.write(" ON / OFF ")
monitor.setCursorPos(34,13)
  monitor.write(" ON / OFF ")

monitor.setBackgroundColor(colors.black)
monitor.setTextColor(colors.lime)
monitor.setCursorPos(1,1)

-- Ende Buttons --

-- Anfang der Click Funktion --

mouseWidth = 0
mouseHeight = 0

  function checkClickPosition()
    if mouseWidth > 8 and mouseWidth < 18 and mouseHeight == 7 then
	  rs.setBundledOutput("back", colors.red)
	  sleep(1)
	  rs.setBundledOutput("back", colors.black)
	
    elseif mouseWidth > 34 and mouseWidth < 44 and mouseHeight == 7 then
	  rs.setBundledOutput("back", colors.blue)
	  sleep(1)
	  rs.setBundledOutput("back", colors.black)
	
    elseif mouseWidth > 8 and mouseWidth < 18 and mouseHeight == 13 then
	  rs.setBundledOutput("back", colors.green)
	  sleep(1)
	  rs.setBundledOutput("back",colors.black)
	
    elseif mouseWidth > 34 and mouseWidth < 44 and mouseHeight == 13 then
	  rs.setBundledOutput("back", colors.yellow)
	  sleep(1)
	  rs.setBundledOutput("back",colors.black)
	
    end
  end

-- Ende der Click Funktion --

-- Anfang der Click Einstellungen --

repeat

  event,p1,p2,p3 = os.pullEvent()

  if event == "monitor_touch" then

    mouseWidth = p2
    mouseHeight = p3
    checkClickPosition()
  end

until event == "char" and p1 == ("x")

-- Ende der Click Einstellungen --


w,h=monitor.getSize()

print(w)
print(h)

You can ignore my personal notices.

Thanks for help

#2 YoYoYonnY

  • Members
  • 49 posts

Posted 26 April 2014 - 08:00 PM

Please re-install project red. If you replace rs.setBundledOutput with rs.setOutput it works fine.
BTW I have no idea if project red works together with ComputerCraft ( project red ~= redpower ).
-- Anfang Einstellungen --

monitor = peripheral.wrap("top")
monitor.setTextScale(1)
monitor.setTextColor(colors.lime)

monitor.clear()

-- Ende Einstellungen --

-- Anfang Layout --

monitor.setCursorPos(1,2)
  monitor.write("==================================================")
monitor.setCursorPos(1,10)
  monitor.write("--------------------------------------------------")
monitor.setCursorPos(1,18)
  monitor.write("==================================================")
monitor.setCursorPos(26,3)
  monitor.write("-")
monitor.setCursorPos(1,4)
  monitor.write("--------------------------------------------------")
monitor.setCursorPos(26,5)
  monitor.write("-")
monitor.setCursorPos(26,6)
  monitor.write("-")
monitor.setCursorPos(26,7)
  monitor.write("-")
monitor.setCursorPos(26,8)
  monitor.write("-")
monitor.setCursorPos(26,9)
  monitor.write("-")
monitor.setCursorPos(26,11)
  monitor.write("-")
monitor.setCursorPos(26,12)
  monitor.write("-")
monitor.setCursorPos(26,13)
  monitor.write("-")
monitor.setCursorPos(26,14)
  monitor.write("-")
monitor.setCursorPos(26,15)
  monitor.write("-")
monitor.setCursorPos(1,16)
  monitor.write("--------------------------------------------------")
monitor.setCursorPos(26,17)
  monitor.write("-")

-- Ende Layout --

-- Anfang Inhalt --

monitor.setCursorPos(9,3)
  monitor.write("Reaktor 1")
monitor.setCursorPos(35,3)
  monitor.write("Reaktor 2")
monitor.setCursorPos(9,17)
  monitor.write("Reaktor 3")
monitor.setCursorPos(35,17)
  monitor.write("Reaktor 4")

-- Ende Inhalt --

-- Anfang Buttons --

monitor.setBackgroundColor(colors.orange)
monitor.setTextColor(colors.black)

monitor.setCursorPos(8,7)
  monitor.write(" ON / OFF ")
monitor.setCursorPos(34,7)
  monitor.write(" ON / OFF ")
monitor.setCursorPos(8,13)
  monitor.write(" ON / OFF ")
monitor.setCursorPos(34,13)
  monitor.write(" ON / OFF ")

monitor.setBackgroundColor(colors.black)
monitor.setTextColor(colors.lime)
monitor.setCursorPos(1,1)

-- Ende Buttons --

-- Anfang der Click Funktion --

mouseWidth = 0
mouseHeight = 0

  function checkClickPosition()
    if mouseWidth > 8 and mouseWidth < 18 and mouseHeight == 7 then
          rs.setOutput("back", true)
          sleep(1)
          rs.setOutput("back", false)
        
    elseif mouseWidth > 34 and mouseWidth < 44 and mouseHeight == 7 then
          rs.setOutput("back", true)
          sleep(1)
          rs.setOutput("back", false)
        
    elseif mouseWidth > 8 and mouseWidth < 18 and mouseHeight == 13 then
          rs.setOutput("back", true)
          sleep(1)
          rs.setOutput("back",false)
        
    elseif mouseWidth > 34 and mouseWidth < 44 and mouseHeight == 13 then
          rs.setOutput("back", true)
          sleep(1)
          rs.setOutput("back",false)
        
    end
  end

-- Ende der Click Funktion --

-- Anfang der Click Einstellungen --

repeat

  event,p1,p2,p3 = os.pullEvent()

  if event == "monitor_touch" then

    mouseWidth = p2
    mouseHeight = p3
    checkClickPosition()
  end

until event == "char" and p1 == ("x")

-- Ende der Click Einstellungen --


w,h=monitor.getSize()

print(w)
print(h)

#3 Bomb Bloke

    Hobbyist Coder

  • Moderators
  • 7,099 posts
  • LocationTasmania (AU)

Posted 26 April 2014 - 09:38 PM

View Postmaxirocker, on 26 April 2014 - 04:27 PM, said:

But when i click on my monitor, it doesn't work.

You forgot to explain what DOES happen.

What sort of cables are you using, and which version of ComputerCraft?

#4 maxirocker

  • Members
  • 4 posts

Posted 27 April 2014 - 09:27 AM

I'm sorry.

I use the Computercraft for Minecraft 1.6.4 (FTB Monster) [Edit by Bubba: CC 1.58]. At the back from the computer are Bundled Cable.
When i click on my monitor, it doesn't give a Redstone Output - Why?.

I'm sorry for my bad english.

Edited by Bubba, 27 April 2014 - 03:35 PM.

#5 maxirocker

  • Members
  • 4 posts

Posted 01 May 2014 - 05:54 PM

My question ist up-to-date!

#6 OczkoSX

  • Members
  • 29 posts

Posted 01 May 2014 - 07:45 PM

ComputerCraft doesn't like ProjectRed's bundled cables, only red alloy wire :<

#7 Bomb Bloke

    Hobbyist Coder

  • Moderators
  • 7,099 posts
  • LocationTasmania (AU)

Posted 02 May 2014 - 01:02 AM

If it's ComputerCraft 1.58, then RedNet cable from MineFactory Reloaded should work.

#8 maxirocker

  • Members
  • 4 posts

Posted 06 May 2014 - 06:29 PM

Okay, thank you everybody very much for quick help :)
Back to Ask a Pro


1 user(s) are reading this topic

0 members, 1 guests, 0 anonymous users



  1. ComputerCraft | Programmable Computers for Minecraft
  2. → ComputerCraft
  3. → Ask a Pro