Timedbot
 

News:

29 December 2022 - PtokaX 0.5.3.0 (20th anniversary edition) released...
11 April 2017 - PtokaX 0.5.2.2 released...
8 April 2015 Anti child and anti pedo pr0n scripts are not allowed anymore on this board!
28 September 2015 - PtokaX 0.5.2.1 for Windows 10 IoT released...
3 September 2015 - PtokaX 0.5.2.1 released...
16 August 2015 - PtokaX 0.5.2.0 released...
1 August 2015 - Crowdfunding for ADC protocol support in PtokaX ended. Clearly nobody want ADC support...
30 June 2015 - PtokaX 0.5.1.0 released...
30 April 2015 Crowdfunding for ADC protocol support in PtokaX
26 April 2015 New support hub!
20 February 2015 - PtokaX 0.5.0.3 released...
13 April 2014 - PtokaX 0.5.0.2 released...
23 March 2014 - PtokaX testing version 0.5.0.1 build 454 is available.
04 March 2014 - PtokaX.org sites were temporary down because of DDOS attacks and issues with hosting service provider.

Main Menu

Timedbot

Started by johny, 01 May, 2004, 19:03:32

Previous topic - Next topic

0 Members and 1 Guest are viewing this topic.

johny

hi ya all,

i got a question about this bot

---------------------------------------------------------------------------------------------------------------------------------------
---// Loggin by TiMeTrAVelleR  Fixed By Optimus //--------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------------------------------

BotName = "?timed bot?" --// Set here your bot name

kb = 1024
mb = kb*kb
gb = kb*kb*kb

function NewUserConnected(user)
   Message(user)
end

function OpConnected(user)
   Message(user)
end

--// Profile Counter
function ProfileCounter(profile)
   local table, count = GetUsersByProfile(profile), 0
   for i, User in table do
      if GetItemByName(User) then
         count = count + 1
      end
   end
   return count
end

function Message(user)
   if user.sMyInfoString then
      local disp = ""
      doGetProfile =  GetProfileName(user.iProfile) or "Not registerd"
      hubshare = format("%0.2f", frmHub:GetCurrentShareAmount()/(1024)/(1024)/(1024))
      local _,_,share = strfind(user.sMyInfoString, "^%$MyINFO %$ALL [^ ]+ [^$]*%$ $[^$]+[^$]%$[^$]*%$%s*(%d+)%$" )

      if share then
         minshare = format("%0.2f", tonumber(share)/gb).." GB"
      else
         minshare = "Corrupt"
      end

      border1 = "  ?::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::?"
      border2 = "  ?::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::?"
      disp = "\r\n\r\n"..border1.."\r\n"
      disp = disp.."   ?Welcome:         "..user.sName.."\r\n"
      disp = disp.."   ?To this fine place Called:      "..frmHub:GetHubName().."\r\n"
      disp = disp.."   ?Your IP:            "..user.sIP.."\r\n"
      disp = disp.."   ?Your Share:         "..minshare.."\r\n"
      disp = disp.."   ?Your Status in this Hub:      "..doGetProfile.."\r\n"
      disp = disp.."   ?Actual Share in the Hub:      "..hubshare.." GB\r\n"
      disp = disp.."   ?There are:          "..ProfileCounter("Owner").." [Owners] - "..ProfileCounter("Master").." [Masters] - "..ProfileCounter("Operator").." [Operators] - "..ProfileCounter("Vip").." [Vips] online\r\n"
      disp = disp.."   ?There are now:         "..frmHub:GetUsersCount().." of "..frmHub:GetMaxUsers().." users Online\r\n"
      disp = disp.."   ?Hub description is:      "..frmHub:GetHubDescr().."\r\n"
      disp = disp.."   ?Hub minshare is:                 6 GB\r\n"
      disp = disp.."   ?Redirect address is:      "..frmHub:GetRedirectAddress().."\r\n"
      disp = disp.."   ?Hub Powerd By:         RoboCop v7.0A made by Optimus?\r\n"..border2.."\r\n"


      user:SendData(BotName, disp)
   end
end

-------------------------------------------------------------------------------------------

my Question is as follows:
the last line       disp = disp.."   ?Hub Powerd By:         RoboCop v7.0A made by Optimus?\r\n"..border2.."\r\n

is it posible to change it in a way that it alway's shows the present robocop bot version????

plz someone help me out.

thanks in advance Johny ([fow]CCCL-NL)

    nErBoS

    Hi,

    Don?t believe that is possible because that have to be the script send the version and you don?t have acess to script code, so the only way is by hand.

    Best regards, nErBoS
    --## nErBoS Spot ##--

    SMF spam blocked by CleanTalk