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

            writer = peripheral.wrap("left")
            if not writer.isPresent() then
                    print("Waiting for RFID card insertion...")
                    while not writer.isPresent() do
                            sleep(1)
                    end
            end

            if writer.isPresent() then
                    if writer.isCoded() then
                            print("This card has been written to already.")
                            error()
                    end
                    print("Please tell me your name.")
                    name = read()
                    print("\n")
                    print"Please tell my your label.")
                    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