%s+(%S+)%s+(.*)") return arg,arg2 end function DataArrival(user, data) if(strsub(data, 1, 4) == "$To:") then data=strsub(data,1,strlen(data)-1) s,e,whoTo = strfind(data,"$To:%s+(%S+)") if (whoTo == botname) then s,e,whoTo,from,cmd = strfind(data,"$To:%s+(%S+)%s+From:%s+(%S+)%s+$%b<>%s+(%S+)") if (cmd=="!help") then user:SendPM(botname,"-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-") user:SendPM(botname," This is the Request_Board!") user:SendPM(botname,"-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-") user:SendPM(botname," Type !help To View This Help Menu.") user:SendPM(botname," Type !request To Request A File.") user:SendPM(botname," Type !view To View The Posted Requests/Updates.") user:SendPM(botname,"-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-") user:SendPM(botname," Please Be As Specific As You Can.") user:SendPM(botname,"-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-") end if (cmd=="!request") then SendToAll("***New Request Added***") arg= GetArgs(data) local handle=openfile("request.dat","a") write(handle,"("..user.sName..") requested :"..arg.."§") user:SendPM(botname,"Request entry saved ....") closefile(handle) end if (cmd=="!view") then handle2=openfile("request.dat","r") if (handle2==nil) then else line = read(handle2,"*a") line=strsub(line,1,strlen(line)-1) linearray=tokenize(line,"§") for i=1,linearray.n do user:SendPM(botname,linearray[i]) end closefile(handle2) end end end end end?>