irc

local arg = {...}
local login = {passTry = {0,1},users = {}}
local i = 0

if not (arg[1] == "host" or arg[1] == "join")
then print("error") end

function loginPass()
while (login.passTry[1] == login.passTry[2]) == false do
term.write("choose a password: ")
login.passTry[1] = read("*")
term.write("repeat the password: ")
login.passTry[2] = read("*")
end
login.pass = login.passTry[1]
login.passTry = {0,0}
end

if arg[1] == "host" then
term.write("channel name: ")
login.host = read()
loginPass()
i = 0
repeat
e,s,m = os.pullEvent("rednet_message")
if m == login.host then
rednet.send(s,login.host.." ok")
i = 1
end
until i == 1
end

if arg[1] == "join" then
term.write("channel name: ")
login.host = read()
term.write("channel password: ")
login.pass = read("*")
term.write("channel nickname: ")
login.user = read()
rednet.broadcast(login.host)
i = 0
repeat
e,s,m = os.pullEvent("rednet_message")
if m == (login.host.." ok") then
rednet.send(s,login.host.." "..login.pass.." "..login.user)
i = 1
end
until i == 1
end