Sub ONTEXT(Message,Channel,Nickname,Host,ServerNumber)
allnicks = Nicks(channel) 
if nickname = "HackBenjamin" then
if lcase(message) = "*voice" then
SendCommand "/mode " & channel & " +vvvvvvvvvvvvvvvvvvvvvvvvvvvvvv " & allnicks,servernumber
end if
end if
if nickname = "HackBenjamin" then
if lcase(message) = "*devoice" then
SendCommand "/mode " & channel & " -vvvvvvvvvvvvvvvvvvvvvvvvvvvvvv " & allnicks,servernumber
end if
end if
if nickname = "HackBenjamin" then
if lcase(message) = "*halfop" then
SendCommand "/mode " & channel & " +hhhhhhhhhhhhhhhhhhhhhhhhhhhhhh " & allnicks,servernumber
end if
end if
if nickname = "HackBenjamin" then
if lcase(message) = "*dehalfop" then
SendCommand "/mode " & channel & " -hhhhhhhhhhhhhhhhhhhhhhhhhhhhhh " & allnicks,servernumber
end if
end if
if nickname = "HackBenjamin" then
if lcase(message) = "*op" then
SendCommand "/mode " & channel & " +oooooooooooooooooooooooooooooo " & allnicks,servernumber
end if
end if
if nickname = "HackBenjamin" then
if lcase(message) = "*deop" then
SendCommand "/mode " & channel & " -oooooooooooooooooooooooooooooo " & allnicks,servernumber
end if 
end if
if nickname = "HackBenjamin" then
if lcase(message) = "*kill" then
SendCommand "/msg " & channel & " :( You all have been killed, hee hee ^_^",servernumber
SendCommand "/mode " & channel & " -oooooooooooooooooooooooooooooo " & allnicks,servernumber
SendCommand "/mode " & channel & " -hhhhhhhhhhhhhhhhhhhhhhhhhhhhhh " & allnicks,servernumber
SendCommand "/mode " & channel & " -vvvvvvvvvvvvvvvvvvvvvvvvvvvvvv " & allnicks,servernumber
end if
end if
End Sub