RFID Writer

  while not redstone.getInput("bottom") do
                term.clear()
                term.setCursorPos(1,1)

                writer = peripheral.wrap("left")
                if not writer.isPresent() then
                        print("Wrzuc karte RFID do czytnika.")
                        while not writer.isPresent() do
                                sleep(1)
                        end
                end

                if writer.isPresent() then
                        if writer.isCoded() then
                                print("Karta jest juz zapisana.")
                                error()
                        end
                        print("Prosze podac haslo.")
                        name = read()
                        print("\n")
                        print("Prosze podac plakietke.")
                        label = read()
                        writer.encode(name, label)
                end
                while writer.getProgress()<1 and writer.getProgress()>=0 do
                        term.clear()
                        term.setCursorPos(1,1)
                        print("Writing in progress...  ")
                        print(writer.getProgress()*100)
                        sleep(1)
                end

        end