CC Questbot

p=peripheral.wrap("front")
c=peripheral.wrap("top")
s=peripheral.wrap("bottom")
--ejector="right"
--extract(direction,id,outputDirection,amount)
while true do
    event, arg1, arg2, arg3, arg4 = os.pullEvent()
    if event=="player" then
    player=arg1
    c.say("Stacey: Hallo "..player.." kannst du mir einen Netherstern geben? Ich gebe dir dafür was tolles :D. Schreibe: bin bereit Stacey   in den Chat wenn ich einen spawnen soll :D")
    end

    if event=="chat" then
    player=arg1
    message=arg2
    if message=="bin bereit Stacey" then
    c.say("Stacey: Der Wither ist dort!")
    rs.setOutput("back",true)
    sleep(1)
    rs.setOutput("back",false)
    end
    end

    if event=="isort_item" then
    id=arg1
    if id==399 then
    c.say("Stacey: Danke! hier deine Belohnung :)")
    s.sort(5)
    rs.setOutput("right",true)
    sleep(1)
    rs.setOutput("right",false)
    end
    end

end