PtokaX forum

Archive => Archived 5.0 boards => Help with scripts => Topic started by: C?????V on 22 March, 2005, 03:15:14

Title: convert a script
Post by: C?????V on 22 March, 2005, 03:15:14
Could you help me to convert this script?tkx  :(



Bot = "?((?InFo??))?"   --//Inserisci il nome del Bot

minuti = 60   --//Minuti di intervallo tra un messaggio e un altro
time = minuti * 60000

function Main()
   frmHub:RegBot(Bot)
   SetTimer(time)
   StartTimer()
end

function Readtextfile(user, file)
      local filecontents = ""
   local handle = openfile(file, "r")
   if (handle ~= nil) then
      local line = read(handle)
      while line do
           filecontents = filecontents..line.."\r\n"
      line = read(handle)
      end
      closefile(handle)
            SendPmToAll(Bot, filecontents)
   end
end

function ReadtextfileConnect(user, file)
      local filecontents = ""
   local handle = openfile(file, "r")
   if (handle ~= nil) then
      local line = read(handle)
      while line do
           filecontents = filecontents..line.."\r\n"
      line = read(handle)
      end
      closefile(handle)
            user:SendPM(Bot, filecontents)
   end
end

function Msg(user)
   local msg = "Sara/Brigida.txt"   --// Crea la cartella "Messaggio" e dentro ci metti un file TxT e lo chiami "Testo"
   Readtextfile(user, msg)
end

function OnTimer()
   Msg(user)
end
   
Title:
Post by: jiten on 22 March, 2005, 09:55:18
Check this (http://board.univ-angers.fr/thread.php?threadid=423&boardid=11&sid=6720ec7e7b152997efb8781b089e6709).

Best regards,

jiten