Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- --[[ Leiras ]]--
- --[[
- Balrol erkezo redstone gomb jel
- alapjan, felkapcsolva, illetve lekapcsolva
- hadja a jobb oldali kimenetet.
- Ha a szamitogep ala rakunk egy bloc-ot es
- egy gombot, akkor kilep a programbol.
- ]]
- --[[ Variables ]]--
- local jelIn = "left" --Jel bemenet
- local jelOut = "right" --Lampavezerlo kimenet
- local jelBreake = "bottom" --Program kikapcsolo bemenet
- local loop = true --program futasa
- local sw = 0 --lampa kapcsolasanak erteke, [0] vagy [1] lehet
- local lamp = false --lampa kezdeti allapota
- local sleepTime = 1 --gomb jel hosszhoz igazitva
- --[[ Functions ]]--
- function cls() --Kepernyo torlo functio
- term.setCursorPos(1,1)
- term.clear()
- end
- function main() --main program
- if rs.getInput(jelIn) then --gomb bemenet vizsgalat true/false
- sw = math.fmod( sw+1, 2 ) --gombnyomasra sw hez hozza ad 1 et, de 1 utan ujra 0 lesz
- sleep(sleepTime) --varakozas a jel megszunesere
- if sw == 1 then
- cls()
- print("On")
- lamp = true
- elseif sw == 0 then
- cls()
- print("off")
- lamp = false
- else
- cls()
- print("Programhiba, kapcsolasi ertek nem lehet mas mint 0, vagy 1.")
- end
- rs.setOutput(jelOut, lamp) --kimenet beallitasa
- end
- if rs.getInput(jelBreake) then --kikapcsolo gomb vizsgalat
- cls()
- rs.setOutput(jelOut, false)
- loop = false
- end
- end
- --[[ Main Program ]]--
- while loop do --addig megy a folyamat mig a loop = true
- main()
- sleep(.1) --0,1 mp-t var, program flood elkerulese miatt
- end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement