RIGHT CLICK script
 

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

RIGHT CLICK script

Started by -PT-B2S, 07 April, 2005, 01:22:32

Previous topic - Next topic

0 Members and 1 Guest are viewing this topic.

-PT-B2S

i wanna know if there is any script of right click that i can put my own commands. i saw there is one to robocop and another to trivia, but i want one that i can configure. i've tried to edit the other ones i saw, but unsuccessfuly. It mus be in LUA 5 !!! thnks :)

Tw?sT?d-d?v

QuoteOriginally posted by -PT-B2S
i wanna know if there is any script of right click that i can put my own commands. i saw there is one to robocop and another to trivia, but i want one that i can configure. i've tried to edit the other ones i saw, but unsuccessfuly. It mus be in LUA 5 !!! thnks :)


What commands are you trying to  add??

-PT-B2S

What commands are you trying to  add??
[/QUOTE]

i wanna add ptokax commands and some few more commands, from other bots, like a trigger
i only want the complete script with just one exeple of command line. the rest i will do. thnks :)

jiten


-PT-B2S

i'm gonna try that one :) thmks :D

any more?

Tw?sT?d-d?v

inbuild commands are allready in robocop ,but here's my game commands

customCMDs = function(user) --// You can put your custome commands here
	user:SendData("$UserCommand 1 3 "..xMenu.."\\JUMBLE\\START ANAGRAMS$<%[mynick]> a.start|")
	user:SendData("$UserCommand 1 3 "..xMenu.."\\JUMBLE\\STOP ANAGRAMS$<%[mynick]> a.stop|")
	user:SendData("$UserCommand 1 3 "..xMenu.."\\JUMBLE\\DISPLAY PHRASE$<%[mynick]> a.phrase|")
	user:SendData("$UserCommand 1 3 "..xMenu.."\\JUMBLE\\ANAGRAMS SCORES$<%[mynick]> a.scores|")
        user:SendData("$UserCommand 1 3 "..xMenu.."\\TRIVIA GAME\\START GAME$<%[mynick]> !triviamain||") 
        user:SendData("$UserCommand 1 3 "..xMenu.."\\TRIVIA GAME\\STOP GAME$<%[mynick]> !trivstop||") 
        user:SendData("$UserCommand 1 3 "..xMenu.."\\TRIVIA GAME\\SKIP$<%[mynick]> !trivskip||") 
        user:SendData("$UserCommand 1 3 "..xMenu.."\\TRIVIA GAME\\GAME HINT$<%[mynick]> !trivhint||") 
        user:SendData("$UserCommand 1 3 "..xMenu.."\\TRIVIA GAME\\GAME HELP$<%[mynick]> !trivhelp||") 
        user:SendData("$UserCommand 1 3 "..xMenu.."\\TRIVIA GAME\\RESET SCORES$<%[mynick]> +trivscorereset||") 
        user:SendData("$UserCommand 1 3 "..xMenu.."\\TRIVIA GAME\\TOP 100 SCORES$<%[mynick]> !trivscore||") 
        user:SendData("$UserCommand 1 3 "..xMenu.."\\TRIVIA GAME\\TOP 10 PLAYER STATS$<%[mynick]> !trivstats||") 
        user:SendData("$UserCommand 1 3 "..xMenu.."\\TRIVIA GAME\\YOUR OWN SCORE$<%[mynick]> !trivmyscore||") 
	user:SendData("$UserCommand 1 3 "..yMenu.."\\HUB CONFIG$<%[mynick]> !hconfig|")
        user:SendData("$UserCommand 1 3 "..yMenu.."\\HUB STATS$<%[mynick]> !hstat|")
        user:SendData("$UserCommand 1 3 "..xMenu.."\\NUMBERS GAME\\START GAME$<%[mynick]> !numstart||") 
        user:SendData("$UserCommand 1 3 "..xMenu.."\\NUMBERS GAME\\STOP GAME$<%[mynick]> !numstop||") 
        user:SendData("$UserCommand 1 3 "..xMenu.."\\NUMBERS GAME\\GAME HELP$<%[mynick]> !numhelp||") 
        user:SendData("$UserCommand 1 3 "..xMenu.."\\NUMBERS GAME\\RESET SCORES$<%[mynick]> !numbersscorereset||") 
        user:SendData("$UserCommand 1 3 "..xMenu.."\\NUMBERS GAME\\TOP 100 SCORES$<%[mynick]> !numscore||") 
        user:SendData("$UserCommand 1 3 "..xMenu.."\\NUMBERS GAME\\TOP 10 PLAYER STATS$<%[mynick]> !numstats||") 
        user:SendData("$UserCommand 1 3 "..xMenu.."\\NUMBERS GAME\\YOUR OWN SCORE$<%[mynick]> !nummyscore||") 
        

end

-PT-B2S

i dont want a robocop right click. i want a right click to put my own commands :S does somebody knows one?

-PT-B2S


Dessamator

the reason noone answers u, is because there must b at least 10 scripts that do that, if you search the forum, im sure ull find it!!
Ignorance is Bliss.

ConejoDelMal

well, i've been searching and trying to use some that i found, and i also couldnt adapt it to my needs... i think i'm searching more or less the same as him.. a right click script with commands according to the profile, and with no other options.. a really simple right click script.

So please, if you know one, point us to it.... i really cant find it  :(
Rede-DC Comunidade Portuguesa de DC

Cêñoßy†ê

#10
Something like this?
BotName = "MyBot"
xMenu = "MyBot_Rightclick" 

function NewUserConnected(user,data)
	user:SendData("\t\t"..BotName.." menu enabled, right click hub tab for commands.")
	 UserCmds(user)
	if user.bOperator then
	 OpCmds(user)
end
end

OpConnected = NewUserConnected

function UserCmds(user)             -- Commands for all users
user:SendData("$UserCommand 1 3 "..xMenu.."\\Sample$<%[mynick]> !command|")
end

function OpCmds(user)               -- Commands for all ops
user:SendData("$UserCommand 1 3 "..xMenu.."\\Sample2$<%[mynick]> !command||")

if (user.iProfile == 0) then        -- Commands for master
user:SendData("$UserCommand 1 3 "..xMenu.."\\Sample3$<%[mynick]> !command||")
end
end
Powered By Leviathan™ 2nd Generation v. 1.9

ConejoDelMal

it's exaclty something like this that isnt working for me.... cant understand why, but thx for the answer..
Rede-DC Comunidade Portuguesa de DC

ConejoDelMal

thx for the reply Mutor, but for now i got something really simple already, i will check it out better when i get more time  :))
Rede-DC Comunidade Portuguesa de DC

(NL)waarom

I think you mean something like this
---------------------------------------------------

--Fun-Menu rightclicker
Bot = "funklik"   -- your main bot here
SendComm = 1    -- Send user command [right click] "1"=yes "0"=no
fMenu = "-=( Fun-Menu )=-" -- funMenu Name

SetTo = {
 [0] = 1,   -- Masters
 [1] = 0,   -- Operators
 [2] = 0,   -- Vips
 [3] = 0,   -- Regs
 [4] = 1,   -- Moderator
 [5] = 1,   -- NetFounder
 [-1] = 0,  -- Users
}
--------------------------------------------------------------------------------------------------------------------

--$UserCommand 1 X  Where -> 1=Hub Menu 2=User Menu 3=Hub/User Menu
--
function NewUserConnected(user)
   if SendComm == 1 and SetTo[user.iProfile] == 1 then
 
            user:SendData("$UserCommand 1 3 "..fMenu.."\\simpsons\\ on$<%[mynick]> !simpsons on||")
            user:SendData("$UserCommand 1 3 "..fMenu.."\\simpsons off\\$<%[mynick]> !simpsons off||")
            user:SendData("$UserCommand 1 3 "..fMenu.."\\Kenny\\$<%[mynick]> !kenny %[nick]||")
            user:SendData("$UserCommand 1 3 "..fMenu.."\\unkenny\\$<%[mynick]> !unkenny %[nick]||")

            user:SendData("$UserCommand 1 3 "..fMenu.."\\KICK\\Kick user$<%[mynick]> !kick %[nick] %[line:Reason]||")
            user:SendData("$UserCommand 1 3 "..fMenu.."\\KICK\\Ban user$<%[mynick]> !ban %[nick] %[line:Reason]||")
            user:SendData("$UserCommand 1 3 "..fMenu.."\\Ban\\Nameban user$<%[mynick]> !nameban %[nick] %[line:Reason]||")
            user:SendData("$UserCommand 1 3 "..fMenu.."\\BAN\\Timeban User$<%[mynick]> !timeban %[nick] %[line:hr:mn] %[line:Reason]||")
            user:SendData("$UserCommand 1 3 "..fMenu.."\\Ban\\Kill user [nameban+ipban]$<%[mynick]> !kill %[nick] %[line:Reason]||")
            user:SendData("$UserCommand 1 3 "..fMenu.."\\KICK\\Warn user$<%[mynick]> !warn %[nick] %[line:Reason]||")
            user:SendData("$UserCommand 1 3 "..fMenu.."\\KICK\\Flood user$<%[mynick]> !flood %[nick] %[line:Nr] %[line:Reason]||")
            user:SendData("$UserCommand 1 3 "..fMenu.."\\KICK\\Drop user$<%[mynick]> !drop %[nick]||")
         
            user:SendData("$UserCommand 1 3 "..fMenu.."\\funny\\trow balloon$<%[mynick]> trows a water balloon to %[nick] gnegnegne ||")
         
           

   end
end


OpConnected = NewUserConnected

function Main()
   --frmHub:RegBot(Bot)
end

-----------------------------------------------------------------
Have fun

-PT-B2S

i will try this one. thnks :)

SMF spam blocked by CleanTalk