Text only | Text with Images

PtokaX forum

Archive => Archived 4.0 boards => Request for Lua 4 scripts => Topic started by: blackwings on 13 August, 2004, 15:46:20

Title: REG and VIP can only...
Post by: blackwings on 13 August, 2004, 15:46:20
Could someone make a script so that only VIP's and regged users can download from Ops??

I mean, everyone should be able to dl from each other, but only VIP's and regged users can download from Ops.
Title:
Post by: plop on 13 August, 2004, 20:33:30
QuoteOriginally posted by blackwings
Could someone make a script so that only VIP's and regged users can download from Ops??

I mean, everyone should be able to dl from each other, but only VIP's and regged users can download from Ops.
search a bit, it's allready posted here on the board in several versions.
ok maby you need 2 change some of the userlevel checks in the script.

just a question: are OP's holly or something that only regged/vip's may download from them???

plop
Title:
Post by: imby on 13 August, 2004, 23:39:54
ops are Gods and should not be burdened by peasants downloading off them!
Title:
Post by: Herodes on 14 August, 2004, 01:33:32
QuoteOriginally posted by imby
ops are Gods and should not be burdened by peasants downloading off them!
lol :D
Title:
Post by: blackwings on 14 August, 2004, 01:50:36
QuoteOriginally posted by plop
search a bit, it's allready posted here on the board in several versions.
ok maby you need 2 change some of the userlevel checks in the script.

just a question: are OP's holly or something that only regged/vip's may download from them???

plop

I have searched, saw a thread made by chilla and there was a interesting script there, but it didn't work :(

I tested this script, but it doesn't always work. Noticed that if a OP first try to dl from the unregged user, and when the unregged user try to dl from that OP, he can dl:S I dunno if it's the script or if it's because that it me testing with two clients, so it sees both om my clients as the same user.

Code Select
function Main()
frmHub:EnableFullData(1)
end

function DataArrival(curUser, data)
if (strsub(data, 1, 15) == "$RevConnectToMe" and curUser.iProfile == -1) then
local _,_,towho = strfind(data, "$RevConnectToMe%s+%S+%s+(%S+)|")
if GetItemByName(towho) and GetItemByName(towho).bOperator then
curUser:SendData("*** You must get registered to be able to download from an OP")
return 1
end
elseif (strsub(data, 1, 12) == "$ConnectToMe" and curUser.iProfile == -1) then
local _,_,towho = strfind(data, "$ConnectToMe%s+(%S+)%s+.*|")
if GetItemByName(towho) and GetItemByName(towho).bOperator then
curUser:SendData("*** You must get registered to be able to download from an OP")
return 1
end
end
end
Title:
Post by: blackwings on 14 August, 2004, 11:26:13
Can someone just confirm if the code I posted is ok and add so that unregged user can't download from VIP's either?
Title: Profiles for allowed Download and see Share ..
Post by: [G-T-E]Gate? on 14 August, 2004, 11:44:17
Jo blackwings
 I got this script made for me by [NL]Pur,
It gives u the possibility to set the profiles that can download from. Normal users cant download or see share from Master ,Operator ,VIP  and Reg .
 
To allow the normal users to see and download frpom mentioned profiles place a 0 for yes and 1 for no ,,,  Master , OPs VIP Reg can see and download from eachother..

Good Luck  It Works to 100%
Enjoy And credits to [NL]Pur
Regards G8

function Main()
    frmHub:EnableFullData(1)

    Levels = {
        Master = "1",
        Operator = "1",
        VIP = "1",
        Reg = "1",
        Default = "0"
    }

end

function DataArrival(curUser, data)


    if (strsub(data, 1, 15) == "$RevConnectToMe" and curUser.iProfile == -1) then
        local _,_,towho = strfind(data, "$RevConnectToMe%s+%S+%s+(%S+)|")

        if isEnabled(GetProfileName(GetItemByName(towho).iProfile))=="1" then
            curUser:SendData("*** You must get registered to be able to download from Me so contact a person with [G-T-E] Tag to get Registered")    
        end

        return 1

    elseif (strsub(data, 1, 12) == "$ConnectToMe" and curUser.iProfile == -1) then
        local _,_,towho = strfind(data, "$ConnectToMe%s+(%S+)%s+.*|")
       
        if isEnabled(GetProfileName(GetItemByName(towho).iProfile))=="1" then
            curUser:SendData("*** You must get registered to be able to download from Me so contact a person with [G-T-E] Tag to get Registered")    
        end

        return 1
    end

end


function isEnabled(profile)
    ret = "0"
    if profile then
        for i, v in Levels do        
            if ( i == profile ) then
                ret = v
            end
        end
    end
    return ret
end
Title:
Post by: blackwings on 01 September, 2004, 18:33:45
Hmm, I didn't want to make so that unregged users get 100% blocked.

Here is how I wanted it to work =
Master = Can dl from everyone
Operators = Can dl from everyone
VIP = Can dl from everyone
REG = Can dl from everyone
Non-REG/Normal user = Can only dl from REG

This is the settings I use in the script [G-T-E]Gate? posted, to make the script do what I wanted, but it didn't work in the way I wanted =

Code Select
   Levels = {
        Master = "1",
        Operator = "1",
        VIP = "1",
        Reg = "0",
        Default = "0"
    }
Text only | Text with Images