Author Topic: Share/slots/hubs Bot  (Read 3765 times)

0 Members and 1 Guest are viewing this topic.

Offline ?[-?Genius?-]?

  • Double Ace
  • *
  • Posts: 118
  • Karma: +3/-1
Share/slots/hubs Bot
« on: 01 April, 2007, 22:40:15 »
Hi ppl

Its possible change this script for Redirect user if dont have minims share/slots/hub?

Script Cod

Code: [Select]
sBot= "[!???]??vdRip?"

kb = 1024
mb = 1024 ^ 2
gb = 1024 ^ 3

--=[ Configura??o ]=-

MinShare = 10240*mb -- in MBs
MinSlots = 3
MaxSlots = 5
--[ MaxHubs = 10 ]--

--=[ User inumes ao Bot ]=-

tImmune = {  ["[TvT]VeroN"] = 1, ["[CV]dream[er]"] = 1, ["[NT]mmmm@work"] = 1, ["[VIP]HELDER-TUGA"] = 1, ["[NT]saburu"] = 1, ["[VDF]NKS"] = 1, ["[NT]SpyFakes"] = 1, ["[SP]reg"] = 1, ["[SP]C???????-x"] = 1, ["[SP]Guitas"] = 1, ["[NT]monika"] = 1, ["[NT]maryjoint"] = 1, ["[SP]Cypress"] = 1, ["[NV]Bills"] = 1,  ["[SP]Red"] = 1, ["[SP]estrela_cadente"] = 1, ["[NT]SempreFiel"] = 1, ["[NT]Chucky"] = 1, ["[NT]Nitinha"] = 1, ["[NT]soniamartins"] = 1, ["[SP]user"] = 1, ["[SP]??ee?"] = 1, ["[SP]KillerIsDead"] = 1, ["[SP]Cyber_Cube?"] = 1, ["[SP]-?DiOsPiRo?-"] = 1, ["[SP]????????r??"] = 1, ["[SP]Nizi_Moon"] = 1, ["[NT]Algaman"] = 1, ["[SP]Nezinha"] = 1, ["[SP]__MARS__"] = 1,} --##  -Operators Immune List (["nick"] = 1) ##--

--=[ C?digo ]=-

DoShareUnits = function(intSize)
if intSize ~= 0 then
local tUnits = { "Bytes", "KB", "MB", "GB", "TB" }
intSize = tonumber(intSize);
local sUnits;
for index = 1, table.getn(tUnits) do
if(intSize < 1024) then sUnits = tUnits[index]; break; else intSize = intSize / 1024; end
end
return string.format("%0.1f %s",intSize, sUnits);
else
return "nothing"
end
end

ConnectToMeArrival = function(curUser,data)
if not curUser.bOperator then
if not tImmune[curUser.sName] then
if curUser.iShareSize < MinShare then
return curUser:SendPM(sBot, " - = [ Boas, tens pouca partilha. O minimo ? de [ "..DoShareUnits(MinShare).." ]. Abra o seu espirito de partilha, e d? mais algum contributo. At? l? ficar? impossibilitado de efectuar downloads. ] = -"),1
elseif curUser.iSlots < MinSlots then
return curUser:SendPM(sBot, " - = [ Boas, tens poucas slots abertas. O minimo ? de "..MinSlots.." slots. Abra 3 a 5 slots para puder efectuar downloads no Hub. ] = -"),1
elseif curUser.iSlots > MaxSlots then
return curUser:SendPM(sBot, " - = [ Boas, tens muitas slots abertas. O m?ximo ? de "..MaxSlots.." slots. Abra 3 a 5 slots para puder efectuar downloads no Hub. ] = -"),1
--[ elseif (curUser.iNormalHubs + curUser.iRegHubs) > MaxHubs then ]--
--[ return curUser:SendPM(sBot, " - = [ Boas, t?s ligado a demasiados Hubs. O limite maximo ? de "..MaxHubs..". PF desligue-se de alguns Hubs. Vai ser redirectado ... ] = -"),1 ]--
end
end
end
end

RevConnectToMeArrival = ConnectToMeArrival

PtokaX forum

Share/slots/hubs Bot
« on: 01 April, 2007, 22:40:15 »

Offline Cêñoßy†ê

  • Scripter
  • Triple Ace
  • ******
  • Posts: 190
  • Karma: +31/-3
Re: Share/slots/hubs Bot
« Reply #1 on: 01 April, 2007, 23:03:41 »
here you go  ;D

Code: [Select]
sBot= "[!???]??vdRip?"

kb = 1024
mb = 1024 ^ 2
gb = 1024 ^ 3

--=[ Configura??o ]=-

MinShare = 10240*mb -- in MBs
MinSlots = 3
MaxSlots = 5
check = { -- should script check profile (1/yes  0/no)
[-1] = 1, -- unregistered
[0] = 1, -- master
[1] = 1, -- operator
[2] = 1, -- vip
[3] = 1, -- reg
[4] = 1, -- moderator
[5] = 1, -- netfounder
[6] = 1, -- owner
}

--=[ User inumes ao Bot ]=-

tImmune = {  ["[TvT]VeroN"] = 1, ["[CV]dream[er]"] = 1, ["[NT]mmmm@work"] = 1, ["[VIP]HELDER-TUGA"] = 1, ["[NT]saburu"] = 1, ["[VDF]NKS"] = 1, ["[NT]SpyFakes"] = 1, ["[SP]reg"] = 1, ["[SP]C???????-x"] = 1, ["[SP]Guitas"] = 1, ["[NT]monika"] = 1, ["[NT]maryjoint"] = 1, ["[SP]Cypress"] = 1, ["[NV]Bills"] = 1,  ["[SP]Red"] = 1, ["[SP]estrela_cadente"] = 1, ["[NT]SempreFiel"] = 1, ["[NT]Chucky"] = 1, ["[NT]Nitinha"] = 1, ["[NT]soniamartins"] = 1, ["[SP]user"] = 1, ["[SP]??ee?"] = 1, ["[SP]KillerIsDead"] = 1, ["[SP]Cyber_Cube?"] = 1, ["[SP]-?DiOsPiRo?-"] = 1, ["[SP]????????r??"] = 1, ["[SP]Nizi_Moon"] = 1, ["[NT]Algaman"] = 1, ["[SP]Nezinha"] = 1, ["[SP]__MARS__"] = 1,} --##  -Operators Immune List (["nick"] = 1) ##--

--=[ C?digo ]=-

DoShareUnits = function(intSize)
if intSize ~= 0 then
local tUnits = { "Bytes", "KB", "MB", "GB", "TB" }
intSize = tonumber(intSize);
local sUnits;
for index = 1, table.getn(tUnits) do
if(intSize < 1024) then sUnits = tUnits[index]; break; else intSize = intSize / 1024; end
end
return string.format("%0.1f %s",intSize, sUnits);
else
return "nothing"
end
end

MyINFOArrival = function(curUser,data)
if check[curUser.iProfile] == 1 and not tImmune[curUser.sName] then
if MinShare > 0 and curUser.iShareSize < MinShare then
curUser:Redirect(frmHub:GetRedirectAddress()," - = [ Boas, tens pouca partilha. O minimo ? de [ "..DoShareUnits(MinShare).." ]. Abra o seu espirito de partilha, e d? mais algum contributo. At? l? ficar? impossibilitado de efectuar downloads. ] = -")
end
if MinSlots > 0 and curUser.iSlots < MinSlots then
curUser:Redirect(frmHub:GetRedirectAddress()," - = [ Boas, tens poucas slots abertas. O minimo ? de "..MinSlots.." slots. Abra 3 a 5 slots para puder efectuar downloads no Hub. ] = -")
end
if MaxSlots > 0 and curUser.iSlots > MaxSlots then
curUser:Redirect(frmHub:GetRedirectAddress()," - = [ Boas, tens muitas slots abertas. O m?ximo ? de "..MaxSlots.." slots. Abra 3 a 5 slots para puder efectuar downloads no Hub. ] = -")
end
end
end
« Last Edit: 04 April, 2007, 09:03:08 by C??o?y? »
***********************
Powered By Leviathan v5.2 ;)

Offline ?[-?Genius?-]?

  • Double Ace
  • *
  • Posts: 118
  • Karma: +3/-1
Re: Share/slots/hubs Bot
« Reply #2 on: 01 April, 2007, 23:17:32 »
Hi

Sory but script dont work- I think its my problem. Its possible send script for my in normal Cod?

Sory about this

Offline Cêñoßy†ê

  • Scripter
  • Triple Ace
  • ******
  • Posts: 190
  • Karma: +31/-3
Re: Share/slots/hubs Bot
« Reply #3 on: 01 April, 2007, 23:27:39 »
Hi

Sory but script dont work- I think its my problem. Its possible send script for my in normal Cod?

Sory about this
meaned that i should post it this way ??
did small changes to it allso
***********************
Powered By Leviathan v5.2 ;)

Offline ?[-?Genius?-]?

  • Double Ace
  • *
  • Posts: 118
  • Karma: +3/-1
Re: Share/slots/hubs Bot
« Reply #4 on: 01 April, 2007, 23:55:22 »
Hi Again

Sory Im noob in scripts :S

The script send this error

[22:48] Syntax ...+ [Extras]\Hub DvdRip Mar?o 2007\DvdRip\scripts\[DvdRip HUB] [Share].lua:51: '<eof>' expected near 'end'

Offline Cêñoßy†ê

  • Scripter
  • Triple Ace
  • ******
  • Posts: 190
  • Karma: +31/-3
Re: Share/slots/hubs Bot
« Reply #5 on: 02 April, 2007, 00:22:36 »
sorry.. my mistake.. .bug fixed  ;D
***********************
Powered By Leviathan v5.2 ;)

Offline ?[-?Genius?-]?

  • Double Ace
  • *
  • Posts: 118
  • Karma: +3/-1
Re: Share/slots/hubs Bot
« Reply #6 on: 04 April, 2007, 00:25:46 »
Hi

The script dont Work. E join in the hub whit 1 slot open and bot dont block my downs :S

Offline Cêñoßy†ê

  • Scripter
  • Triple Ace
  • ******
  • Posts: 190
  • Karma: +31/-3
Re: Share/slots/hubs Bot
« Reply #7 on: 04 April, 2007, 09:00:28 »
Hi

The script dont Work. E join in the hub whit 1 slot open and bot dont block my downs :S


post above updated with option to choose what profiles it checks and detection is now from myinfoarrival
***********************
Powered By Leviathan v5.2 ;)

Offline ?[-?Genius?-]?

  • Double Ace
  • *
  • Posts: 118
  • Karma: +3/-1
Re: Share/slots/hubs Bot
« Reply #8 on: 10 April, 2007, 01:09:28 »
Tankx C??o?y??

Script work 5 stars :)

Offline ExtreeM

  • Forum Ace
  • *****
  • Posts: 83
  • Karma: +33/-6
Re: Share/slots/hubs Bot
« Reply #9 on: 16 December, 2007, 23:11:23 »
is it possible to edit the script so that i can set each profile ( reg,user,vip,owner etc) to have max slots/hubs for each??

PtokaX forum

Re: Share/slots/hubs Bot
« Reply #9 on: 16 December, 2007, 23:11:23 »