[LUA 5] Help With Profiles
 

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

[LUA 5] Help With Profiles

Started by ruler, 06 March, 2005, 19:36:46

Previous topic - Next topic

0 Members and 1 Guest are viewing this topic.

ruler

howdy
not sure how i am going to explain this so i will start like this...
i know that these lines ...

name = GetProfileName(GetItemByName(user.sName).iProfile)
SendToAll(name)

will send the users profile to main chat, ect Master, Reg, Operator, VIP
But how can i get it to show the binary list of allowed bits instead of the profile name ect...

10000010010101000000000000000000

some help on this would be great, thanks

The Direct Connect Global Banlist get protected.

ruler

thanks Mutor but after a hours of head scratching i managed to find another way and with a much shorter script...

function GetBitDat(user,data)
if user.iProfile ~= -1 then
bit = GetProfileName(GetItemByName(user.sName).iProfile)
   num,pro,indx = nil,nil
      for line in io.lines("../Profiles.dat") do
      s,e,num,pro,indx=string.find(line,"(.+)%|(.+)%|(%d+)")
         if (bit == pro) then
         bit = indx
                  break end
      end
end
end

the resulting variable ' bit ' should contain the 32 bit string of the users profile in the Profile.dat so that i can now single out each bit in the string ect...

if string.sub(bit, 2,2) == "1" then
user:SendData("$UserCommand 1 3 InBuilt\\Drop User$<%[mynick]> !drop %[nick]||")
end
if string.sub(bit, 4,4) == "1" then
user:SendData("$UserCommand 1 2 InBuilt\\Ban User$<%[mynick]> !ban %[nick] %[line:Enter Reason]||")
user:SendData("$UserCommand 1 2 InBuilt\\UnBan User$<%[mynick]> !unban %[nick] ||")
end

:) w'hooo

thanks for the help anyway 8-)

The Direct Connect Global Banlist get protected.

SMF spam blocked by CleanTalk