1

os.pullEvent = os.pullEventRaw

------[ Functions ]------

  function checkSettings()

      if fs.exists(".set") then

        file = fs.open( ".set", "r" )
        check1 = file.readLine()
        file.close()

      else

        check1 = "0"

        file = fs.open( ".set", "w" )
        file.write(check1)
        file.close()

      end

  end

  function log()

    file = fs.open( ".vers", "r" )
    vers = file.readAll()
    file.close()

    term.setBackgroundColor( colours.black )
    term.setTextColor( colours.lime )
    term.setCursorPos( 1, 1 )
    term.clear()
    write("KerseyOS: ")
    term.setTextColor( colours.red )
    print(vers)
    print()
    term.setTextColor( colours.blue )
    write("Enter Username: ")
    term.setTextColor( colours.lime )
    input1 = read()
    term.setTextColor( colours.blue )
    write("Enter Password: ")
    term.setTextColor( colours.lime )
    input2 = read("*")

      function login()

      if fs.exists("."..input1) then

        file = fs.open( "."..input1, "r" )
        password = file.readAll()
        file.close()

          if input2 == password then

            access = "granted"

          else

            term.setTextColor( colours.red )
            print("Access Denied!")
            sleep(2)
            access = "denied"

              if Rboot == "true" then

                os.reboot()

              end

          end

      else

        term.setTextColor( colours.red )
        print("Account does not exists!")
        sleep(2)

          if Rboot == "true" then

            os.reboot()

          end

      end

      end

  end

  function redS()

      if rs.getOutput(input1) then

        rs.setOutput( input1, false )

      else

        rs.setOutput( input1, true )

      end

  end

------[ Find Modem ]------

  function seekModem()

    c = 0

      for a, b in pairs(rs.getSides(b)) do

          if peripheral.getType(b) == "modem" then

            rednet.open(b)
            modem = "true"

              break

          elseif c == 5 then

            modem = "false"

              break

          end

        c = c + 1

      end

  end

--------[[ PROGRAM START ]]--------

account = "No Accounts"

  if fs.exists(".admin") then

    file = fs.open( ".admin", "r" )
    admin = file.readAll()
    file.close()

    log()
    Rboot = "true"
    login()
    Rboot = "false"
    account = input1

      if account == admin then

        admin = "true"

      else

        admin = "false"

      end

  end

checkSettings()

  function netCheck()

      if check1 == "1" then

        seekModem()

          if modem == "true" then

            network = "online"

          else

            network = "offline"

          end

      elseif check1 == "0" then

        network = "offline"

      end

  end

  while true do

      function start()

        netCheck()

        file = fs.open( ".vers", "r" )
        vers = file.readAll()
        file.close()

        term.setBackgroundColor( colours.black )
        term.setTextColor( colours.lime )
        term.setCursorPos( 1, 1 )
        term.clear()

        write("KerseyOS: ")
        term.setTextColor( colours.red )
        print(vers)
        term.setTextColor( colours.white )
        write("Network: ")

          if network == "online" then

            term.setTextColor( colours.lime )

          else

            term.setTextColor( colours.red )

          end

        write(network.."  ")
        term.setTextColor( colours.white )
        term.setCursorPos( 30, 1 )

          if admin == "true" then

            write("Admin: ")

          else

            write("User: ")

          end

        term.setTextColor( colours.lime )
        print(account)

      end

      function list1()

        term.setTextColor( colours.lime )
        term.setCursorPos( 4, 6 )
        write("Redstone ")
        term.setTextColor( colours.white )
        write("...... ")
        term.setTextColor( colours.red )
        print("1")

        term.setTextColor( colours.lime )
        term.setCursorPos( 4, 8 )
        write("Options ")
        term.setTextColor( colours.white )
        write("....... ")
        term.setTextColor( colours.red )
        print("2")

        term.setTextColor( colours.lime )
        term.setCursorPos( 4, 10 )
        write("Notes ")
        term.setTextColor( colours.white )
        write("......... ")
        term.setTextColor( colours.red )
        print("3")

        term.setTextColor( colours.lime )
        term.setCursorPos( 4, 12 )
        write("Games ")
        term.setTextColor( colours.white )
        write("......... ")
        term.setTextColor( colours.red )
        print("4")

        term.setTextColor( colours.lime )
        term.setCursorPos( 4, 14 )
        write("Power ")
        term.setTextColor( colours.white )
        write("......... ")
        term.setTextColor( colours.red )
        print("5")

      end

    start()

    term.setTextColor( colours.blue )
    term.setCursorPos( 1, 4 )
    print(" +-------------------+")
    print(" |                   |")
    print(" |                   |")
    print(" |                   |")
    print(" |                   |")
    print(" |                   |")
    print(" |                   |")
    print(" |                   |")
    print(" |                   |")
    print(" |                   |")
    print(" |                   |")
    print(" |                   |")
    print(" +-------------------+")
    list1()

    event, key = os.pullEvent("key")

      if key == keys.numPad1 or key == keys.one then

          while true do

            start()
            sleep(0.1)

            term.setTextColor( colours.blue )
            term.setCursorPos( 1, 4 )
            write("Enter Side: ")
            term.setTextColor( colours.lime )
            input1 = read()

              function temp0001()

                term.setTextColor( colours.lime )
                write("Pulse ")
                term.setTextColor( colours.white )
                write("... ")
                term.setTextColor( colours.red )
                print("1")
                term.setTextColor( colours.lime )
                write("Hold ")
                term.setTextColor( colours.white )
                write(".... ")
                term.setTextColor( colours.red )
                print("2")
                sleep(0.1)

                event, key = os.pullEvent("key")

                  if key == keys.numPad1 or key == keys.one then

                    redS()
                    sleep(3)
                    redS()

                  elseif key == keys.numPad2 or key == keys.two then

                    redS()

                  end

              end

              if input1 == "back" then

                temp0001()
                break

              elseif input1 == "front" then

                temp0001()
                break

              elseif input1 == "left" then

                temp0001()
                break

              elseif input1 == "right" then

                temp0001()
                break

              elseif input1 == "top" then

                temp0001()
                break

              elseif input1 == "bottom" then

                temp0001()
                break

              else

                term.setTextColor( colours.red )
                term.setCursorPos( 30, 4 )
                print("Please use")
                term.setCursorPos( 30, 5 )
                print("valid side!")
                sleep(1)

              end

          end

      elseif key == keys.numPad2 or key == keys.two then

          while true do

            start()

            term.setTextColor( colours.blue )
            term.setCursorPos( 1, 4 )
            print(" +-------------------+")
            print(" |                   |")
            print(" |                   |")
            print(" |                   |")
            print(" |                   |")
            print(" |                   |")
            print(" |                   |")
            print(" |                   |")
            print(" +-------------------+")

            term.setTextColor( colours.lime )
            term.setCursorPos( 4, 6 )
            write("Network ")
            term.setTextColor( colours.white )
            write("....... ")
            term.setTextColor( colours.red )
            print("1")

            term.setTextColor( colours.lime )
            term.setCursorPos( 4, 8 )
            write("Accounts ")
            term.setTextColor( colours.white )
            write("...... ")
            term.setTextColor( colours.red )
            print("2")

            term.setTextColor( colours.lime )
            term.setCursorPos( 4, 10 )
            write("Cancel ")
            term.setTextColor( colours.white )
            write("........ ")
            term.setTextColor( colours.red )
            print("3")

            event, key = os.pullEvent("key")

              if key == keys.numPad1 or key == keys.one then

                checkSettings()

                  if check1 == "0" then

                    file = fs.open( ".set", "w" )
                    file.writeLine("1")
                    file.close()
                    check1 = "1"

                  elseif check1 == "1" then

                    file = fs.open( ".set", "w" )
                    file.writeLine("0")
                    file.close()
                    check1 = "0"

                  end

                  break

              elseif key == keys.numPad2 or key == keys.two then

                start()

                term.setTextColor( colours.blue )
                term.setCursorPos( 1, 4 )
                print(" +-------------------+")
                print(" |                   |")
                print(" |                   |")
                print(" |                   |")
                print(" |                   |")
                print(" |                   |")
                print(" |                   |")
                print(" |                   |")
                print(" |                   |")
                print(" |                   |")
                print(" +-------------------+")

                term.setTextColor( colours.lime )
                term.setCursorPos( 4, 6 )
                write("Create ")
                term.setTextColor( colours.white )
                write("........ ")
                term.setTextColor( colours.red )
                print("1")

                term.setTextColor( colours.lime )
                term.setCursorPos( 4, 8 )
                write("Delete ")
                term.setTextColor( colours.white )
                write("........ ")
                term.setTextColor( colours.red )
                print("2")

                term.setTextColor( colours.lime )
                term.setCursorPos( 4, 10 )
                write("Edit ")
                term.setTextColor( colours.white )
                write(".......... ")
                term.setTextColor( colours.red )
                print("3")

                term.setTextColor( colours.lime )
                term.setCursorPos( 4, 12 )
                write("Cancel ")
                term.setTextColor( colours.white )
                write("........ ")
                term.setTextColor( colours.red )
                print("4")

                event, key = os.pullEvent("key")

                  if key == keys.numPad1 or key == keys.one then

                    sleep(0.1)
                    log()

                      if not fs.exists(".admin") then

                        file = fs.open( ".admin", "w" )
                        file.write(input1)
                        file.close()

                        file = fs.open( "."..input1, "w" )
                        file.write(input2)
                        file.close()
                        admin = "true"
                        account = input1

                      elseif fs.exists("."..input1) then

                        term.setTextColor( colours.red )
                        print("Account already exists!")
                        sleep(2)

                      else

                        file = fs.open( "."..input1, "w" )
                        file.write(input2)
                        file.close()

                      end

                  elseif key == keys.numPad2 or key == keys.two then

                    sleep(0.1)
                    log()
                    login()

                      if access == "denied" then

                      else

                          if fs.exists(".admin") then

                            file = fs.open( ".admin", "r" )
                            check = file.readAll()
                            file.close()

                              if input1 == check then

                                fs.delete(".admin")
                                admin = "false"

                              end

                          end

                        fs.delete("."..input1)

                          if input1 == account then

                            account = "not logged in"

                          end

                      end

                  elseif key == keys.numPad3 or key == keys.three then

                    sleep(0.1)
                    log()
                    login()

                      if access == "denied" then

                      else

                        file = fs.open( ".admin", "r" )
                        check = file.readAll()
                        file.close()

                          if input1 == check then

                            fs.delete(".admin")

                          end

                        fs.delete("."..input1)
                        log()
                        file = fs.open( "."..input1, "w" )
                        file.write(input2)
                        file.close()

                          if not fs.exists(".admin") then

                            file = fs.open( ".admin", "w" )
                            file.write(input1)
                            file.close()
                            account = input1
                            admin = "true"

                          end

                      end

                  elseif key == keys.numPad4 or key == keys.four then

                  end

              elseif key == keys.numPad3 or key == keys.three then

                  break

              end

          end

      elseif key == keys.numPad3 or key == keys.three then

          if fs.exists(account.."/") then

            list = fs.list(account.."/")
            pos = 7

              for _, noteList in pairs(list) do

                term.setCursorPos( 30, pos )
                term.setTextColor( colours.white )
                print(noteList)
                pos = pos + 1

              end

          end

        term.setTextColor( colours.blue )
        term.setCursorPos( 30, 4 )
        print("Enter Note Name: ")
        sleep(0.1)
        term.setTextColor( colours.lime )
        term.setCursorPos( 30, 5 )
        sleep(0.1)
        write("")
        inputN = read()

          if fs.exists(account.."/") then

            list = fs.list(account.."/")
            pos = 7

              for _, listNote in pairs(list) do

                term.setCursorPos( 30, pos )
                print("                              ")
                pos = pos + 1

              end

          end

          if fs.exists(account.."/".."."..inputN) then

            term.setTextColor( colours.blue )
            term.setCursorPos( 30, 6 )
            print("read/overwrite/delete? ")
            term.setTextColor( colours.lime )
            term.setCursorPos( 30, 7 )
            print("r/o/d")

            event, key = os.pullEvent("key")

              if inputN == "" then

              elseif key == keys.r then

                c = 1
                file = fs.open( account.."/".."."..inputN, "r" )

                  while true do

                    check = file.readLine()

                      if check == nil then

                        file.close()
                        p = p + 2

                        term.setCursorPos( 30, p )
                        term.setTextColor( colours.red )
                        print("press 'e' to exit")
                        sleep(1)

                          while true do

                            event, key = os.pullEvent("key")

                              if key == keys.e then

                                  break

                              end

                          end

                          break

                      else

                        p = c + 8
                        term.setCursorPos( 30, p )
                        term.setTextColor( colours.white )
                        print(check)
                        c = c + 1

                      end

                  end

              elseif key == keys.o then

                c = 1

                term.setCursorPos( 30, 7 )
                term.setTextColor( colours.red )
                write("type ")
                term.setTextColor( colours.lime )
                write("'exitF' ")
                term.setTextColor( colours.red )
                print("to finish")
                file = fs.open( account.."/".."."..inputN, "w" )

                  while true do

                    p = c + 8

                    term.setCursorPos( 30, p )
                    sleep(0.1)
                    write("")
                    term.setTextColor( colours.white )
                    input = read()

                      if input == "exitF" then

                        file.close()

                          break

                      else

                        file.writeLine(input)
                        c = c + 1

                      end

                  end

              elseif key == keys.d then

                fs.delete(account.."/".."."..inputN)

              end

          else

            term.setTextColor( colours.blue )
            term.setCursorPos( 30, 6 )
            write("type ")
            term.setTextColor( colours.lime )
            write("'exitF' ")
            term.setTextColor( colours.blue )
            print("to exit")

            c = 1
            file = fs.open( account.."/".."."..inputN, "w" )

              while true do

                p = c + 7
                term.setTextColor( colours.white )
                term.setCursorPos( 30, p )
                write("")
                input = read()

                  if input == "exitF" then

                    file.close()

                      break

                  else

                    file.writeLine(input)
                    c = c + 1

                  end

              end

          end

      elseif key == keys.numPad4 or key == keys.four then

          if fs.exists("games/") then

            list = fs.list("games/")
            pos = 7

              for _, game in pairs(list) do

                term.setTextColor( colours.white )
                term.setCursorPos( 30, pos )
                print(game)

              end

            term.setTextColor( colours.blue )
            term.setCursorPos( 30, 4 )
            write("Enter Game: ")
            sleep(0.1)
            term.setTextColor( colours.lime )
            Ginput = read()

              if fs.exists("games/"..Ginput) then

                sleep(0.1)
                shell.run("games/"..Ginput)

              else

                term.setTextColor( colours.red )
                term.setCursorPos( 30, 6 )
                print("Unable to find game")
                sleep(2)

              end

          end

      elseif key == keys.numPad5 or key == keys.five then

        term.setTextColor( colours.lime )
        term.setCursorPos( 30, 4 )
        write("Shutdown or Reboot: ")
        term.setTextColor( colours.red )
        term.setCursorPos( 30, 5 )
        print("s/r")

        event, key = os.pullEvent("key")

          if key == keys.s then

            os.shutdown()

          elseif key == keys.r then

            os.reboot()

          end

      elseif key == keys.numPad6 or key == keys.six then

          if admin == "true" then

            list = fs.list("/")
            c1 = 7

              for _, file in pairs(list) do
                term.setTextColor( colours.white )
                term.setCursorPos( 30, c1 )
                print(file)
                c1 = c1 + 1
              end

            term.setTextColor( colours.blue )
            term.setCursorPos( 30, 4 )
            print("Enter File Name: ")
            term.setTextColor( colours.lime )
            term.setCursorPos( 30, 5 )
            write("")
            sleep(0.1)
            input = read()
            term.setTextColor( colours.white )

              if fs.exists(input) then

                list = fs.list("/")
                c1 = 7

                  for _, file in pairs(list) do
                    term.setCursorPos( 30, c1 )
                    print("                          ")
                    c1 = c1 + 1
                  end

                  if not fs.isDir(input) then

                    file = fs.open( input, "r" )
                    c1 = 7

                      while true do

                        check = file.readLine()

                          if check == nil then

                            file.close()
                            event, key = os.pullEvent("key")

                              break

                          else

                            term.setCursorPos( 30, c1 )
                            print(check)
                            c1 = c1 + 1

                          end

                      end

                  elseif fs.isDir(input) then

                    c1 = 7
                    list = fs.list(input)

                      for _, file in pairs(list) do
                        term.setCursorPos( 30, c1 )
                        print(file)
                        c1 = c1 + 1
                      end

                    event, key = os.pullEvent("key")

                  end

              end

          end

      end

  end

--------[[ PROGRAM END ]]--------