PtokaX forum

Archive => Archived 5.0 boards => Help with scripts => Topic started by: TRANCEMASTER on 18 November, 2005, 16:22:27

Title: Help with special rightclick
Post by: TRANCEMASTER on 18 November, 2005, 16:22:27
Hi Guys

I need the right to make some commands invisible for users

and only visible for ops or masters

I have the commands in one rightklickscript.

Here is the script:

function NewUserConnected(User)
   
User:SendData("$UserCommand 0 3 |")
User:SendData("$UserCommand 1 3  ??????????????????????????????$<%[mynick]>||")
User:SendData("$UserCommand 1 3                        T]-[E NEW$<%[mynick]>||")
User:SendData("$UserCommand 1 3                    ]-[ORROR ]-[UB$<%[mynick]>||")
User:SendData("$UserCommand 1 3  ??????????????????????????????$<%[mynick]>||")
User:SendData("$UserCommand 1 3    ?    ]-[orrorecke f?r ]-[orroruser\\??????????????????????????????$<%[mynick]>||")
User:SendData("$UserCommand 1 3    ?    ]-[orrorecke f?r ]-[orroruser\\?? G?stebuch\\?? Hineinschreiben$<%[mynick]> !addguestbook %[line:Dein Text hier rein]||")
User:SendData("$UserCommand 1 3    ?    ]-[orrorecke f?r ]-[orroruser\\?? G?stebuch\\?? Lesen$<%[mynick]> !showguestbook||")
User:SendData("$UserCommand 1 3    ?       Folterkammer der Admins\\??????????????????????????????????$<%[mynick]>||")
User:SendData("$UserCommand 1 3    ?       Folterkammer der Admins\\? Neustarten\\? Hub $<%[mynick]> !restart|")
User:SendData("$UserCommand 1 3    ?       Folterkammer der Admins\\? Neustarten\\? Scripte$<%[mynick]> !restartscripts|")
User:SendData("$UserCommand 1 3    ?       Folterkammer der Admins\\??????????????????????????????????$<%[mynick]>||")
User:SendData("$UserCommand 1 3    ?       Folterkammer der Admins\\? Passwort eines Users anzeigen$<%[mynick]> !getpass %[line:Nick]||")
User:SendData("$UserCommand 1 3    ?       Folterkammer der Admins\\??????????????????????????????????$<%[mynick]>||")
User:SendData("$UserCommand 1 3  ??????????????????????????????$<%[mynick]>||")
User:SendData("$UserCommand 1 3  ??????????????????????????????$<%[mynick]>||")
User:SendData("$UserCommand 1 3               RECHTSKLICKLABOR$<%[mynick]>||")
User:SendData("$UserCommand 1 3  ??????????????????????????????$<%[mynick]>||")

end
OpConnected = NewUserConnected



How can i write it that only admins or op?s can see this:

User:SendData("$UserCommand 1 3    ?       Folterkammer der Admins\\? Neustarten\\? Hub $<%[mynick]> !restart|")
User:SendData("$UserCommand 1 3    ?       Folterkammer der Admins\\? Neustarten\\? Scripte$<%[mynick]> !restartscripts|")

must i build in a function or any other code?
Title:
Post by: [NL]Tazzie on 18 November, 2005, 17:01:09
try adding this

-- Sets who can use release script
Allowed = {
Title:
Post by: ??????Hawk?????? on 18 November, 2005, 17:07:08
try this for a simple edit/......

function NewUserConnected(User)
rClick(User)
end
OpConnected = NewUserConnected

function rClick(User)
User:SendData("$UserCommand 0 3 |")
User:SendData("$UserCommand 1 3 ??????????????????????????????$<%[mynick]>||")
User:SendData("$UserCommand 1 3 T]-[E NEW$<%[mynick]>||")
User:SendData("$UserCommand 1 3 ]-[ORROR ]-[UB$<%[mynick]>||")
User:SendData("$UserCommand 1 3 ??????????????????????????????$<%[mynick]>||")
User:SendData("$UserCommand 1 3 ? ]-[orrorecke f?r ]-[orroruser\\??????????????????????????????$<%[mynick]>||")
User:SendData("$UserCommand 1 3 ? ]-[orrorecke f?r ]-[orroruser\\?? G?stebuch\\?? Hineinschreiben$<%[mynick]> !addguestbook %[line:Dein Text hier rein]||")
User:SendData("$UserCommand 1 3 ? ]-[orrorecke f?r ]-[orroruser\\?? G?stebuch\\?? Lesen$<%[mynick]> !showguestbook||")
User:SendData("$UserCommand 1 3 ? Folterkammer der Admins\\??????????????????????????????????$<%[mynick]>||")
User:SendData("$UserCommand 1 3 ? Folterkammer der Admins\\? Neustarten\\? Hub $<%[mynick]> !restart|")
User:SendData("$UserCommand 1 3 ? Folterkammer der Admins\\? Neustarten\\? Scripte$<%[mynick]> !restartscripts|")
User:SendData("$UserCommand 1 3 ? Folterkammer der Admins\\??????????????????????????????????$<%[mynick]>||")
User:SendData("$UserCommand 1 3 ? Folterkammer der Admins\\? Passwort eines Users anzeigen$<%[mynick]> !getpass %[line:Nick]||")
User:SendData("$UserCommand 1 3 ? Folterkammer der Admins\\??????????????????????????????????$<%[mynick]>||")
User:SendData("$UserCommand 1 3 ??????????????????????????????$<%[mynick]>||")
User:SendData("$UserCommand 1 3 ??????????????????????????????$<%[mynick]>||")
User:SendData("$UserCommand 1 3 RECHTSKLICKLABOR$<%[mynick]>||")
User:SendData("$UserCommand 1 3 ??????????????????????????????$<%[mynick]>||")
if User.bOperator then
User:SendData("$UserCommand 1 3 ? Folterkammer der Admins\\? Neustarten\\? Hub $<%[mynick]> !restart|")
User:SendData("$UserCommand 1 3 ? Folterkammer der Admins\\? Neustarten\\? Scripte$<%[mynick]> !restartscripts|")
end
end


??????Hawk??????
Title:
Post by: TRANCEMASTER on 18 November, 2005, 17:19:39
thx hawk

i have this error in the line >> if user.bOperator then

Error: attempt to index global `user' (a nil value)
Title:
Post by: ??????Hawk?????? on 18 November, 2005, 17:33:29
QuoteOriginally posted by TRANCEMASTER
thx hawk

i have this error in the line >> if user.bOperator then

Error: attempt to index global `user' (a nil value)

Yeh  you must have been Quick  ..  i edited it as soon as i posted it  :p

try again  ..  OR  just change the u on user  for a  Upper case U

if [COLOR=red]U[/COLOR]ser.bOperator then
Title:
Post by: TRANCEMASTER on 18 November, 2005, 17:45:02
yeaaaaaaaahhhhhhhhh

fine ... hawk ... thx very much

Tazzie .. what you have posted is for one profile of all commands but thx for answer :-)
Title:
Post by: ??????Hawk?????? on 18 November, 2005, 18:44:45
y/w   ;)