[LUA 5] Help With Profiles


29 December 2022 - PtokaX (20th anniversary edition) released...
11 April 2017 - PtokaX released...
8 April 2015 Anti child and anti pedo pr0n scripts are not allowed anymore on this board!
28 September 2015 - PtokaX for Windows 10 IoT released...
3 September 2015 - PtokaX released...
16 August 2015 - PtokaX released...
1 August 2015 - Crowdfunding for ADC protocol support in PtokaX ended. Clearly nobody want ADC support...
30 June 2015 - PtokaX released...
30 April 2015 Crowdfunding for ADC protocol support in PtokaX
26 April 2015 New support hub!
20 February 2015 - PtokaX released...
13 April 2014 - PtokaX released...
23 March 2014 - PtokaX testing version 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.


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)

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...


some help on this would be great, thanks

The Direct Connect Global Banlist get protected.


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
         if (bit == pro) then
         bit = indx
                  break 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]||")
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] ||")

:) w'hooo

thanks for the help anyway 8-)

The Direct Connect Global Banlist get protected.

SMF spam blocked by CleanTalk