SCRIPT AUTO INVITE HOUSE CASSINO FREE

[faelqqwweerr 0]

BOM DIA GALERA, ESTOU COM ESSE SCRIPT AUTO INVITE PARA CASSINOS HOUSE POREM NAO ADD OS PLAYERS AUTOMATICAMENTE QUEM MANJA DE SCRIPT DA UM HELP PARA NOS QUE PRECISAMOS ASSIM COMO EU TO AJUDANDO COM ESSA BASE.

DESDE JÁ AGRADEÇO

 

 

 

 

--[[
_______________________________________________________________________________________________________________________________________________________________
                                       Caso ocorra algum bug, me mandem mensagem pelo skype!
________________________________________________________________________________________________________________________________________________________________
                                                             _____________
                                                            |             |
                                                            |AUTO - INVITE|
                                                            | VERSIOR 0.1 |
                                                            |_____________|

             ____________________________________________________________________________________________________________  
           |  __________________________________________________________________________________________________________  |
           | |    _______        _____        _                  __         __________     ____    ____     ________    | |
           | |   |______/      /   __  \     | |                /  \       | |      | |    \   \  /   /    | ______/    | |
           | |   | |          |   |  |  |    | |               / /\ \      | |      | |     \   \/   /     | |          | |
           | |   | |_____     |   |  |  |    | |              / /  \ \     | |______| |      \_    _/      | |_____     | |
           | |         | |    |   |  |  |    | |             / /____\ \    | |     \ \         |  |              | |    | |
           | |    _____| |    |   `--´  |    | |_______     / /______\ \   | |      \ \        |  |        ______| |    | |
           | |    \______|     \_______/     |_________|   /_/        \_\  | |       \ \       |__|        \_______|    | |
           | |__________________________________________________________________________________________________________| |
           |______________________________________________________________________________________________________________|

                                                             _____________
                                                            |             |
                                                            |AUTO - INVITE|
                                                            | VERSIOR 0.1 |
                                                            |_____________|

_______________________________________________________________________________________________________________________________________________________________
                                       Caso ocorra algum bug, me mandem mensagem pelo skype!
________________________________________________________________________________________________________________________________________________________________

PARA ESSE AUTO INVITE PEGA PRESISAR DE UM PROGAMAR BY SOLARYS ......

--]]
--------------------------------------------
--[[ ------------ CONFIG -------------- ]]--
--------------------------------------------  
cashposx = Self.Position().x
cashposy = Self.Position().y
cashposz = Self.Position().z
Players = {}
Rolls = {}
cc = 3043
Balance = 0
Gambler_Name = ""
 money = Self.ItemCount(cc)
 cash = Self.ItemCount(cc)
 Players = {}
Rolls = {}
AntiSpamTimer = os.clock()
function AntiSpam(message, type)
if os.difftime(os.clock(), AntiSpamTimer) >= 1.3 then
Self.Speak(message, type)
AntiSpamTimer = os.clock()
end
end
function onSpeak(channel, msg)
  if msg == 'balance' then
    channel:SendOrangeMessage('DiceBot', Gambler_Name .. '\'s balance is ' .. Balance)
  end
  if msg == 'info' then
    channel:SendOrangeMessage('DiceBot', "Bet.min = " .. Bet.min)
    channel:SendOrangeMessage('DiceBot', "Bet.max = " .. Bet.max)
    channel:SendOrangeMessage('DiceBot', "Gambler_Name = " .. Gambler_Name)
    channel:SendOrangeMessage('DiceBot', "Balance = " .. Balance)
  end
end
function onClose(channel, msg)
  print("Leaving channel")
end
channel = Channel.New('SolarysBot log', onSpeak, onClose)
Module.New('Casino_Turn', function(Mod)
  Casino_Loaded = true
    if (Casino_Loaded) then
        Player_Detected = true
 
        for name, creature in Creature.iPlayers(2) do
 
            if (creature:Position().x == Self.Position().x and creature:Position().y  == Self.Position().y - 2 and creature:Position().z == Self.Position().z) then
                Player_Detected = true
                    if Gambler_Name ~= creature:Name() and not table.contains(Players, Gambler_Name) then
                    table.insert(Players, Gambler_Name)
                    for i = 1, #Players do
                    print(Players)
               end
               end
 
                Gambler_Name = creature:Name()
                if (creature:Position().y < Self.Position().y) then
                  cashposx = Self.Position().x
                  cashposy = Self.Position().y - 1
                  cashposz = Self.Position().z
                    if (Self.LookDirection() ~= NORTH) then
                        Self.Turn(NORTH)
                    end
                elseif (creature:Position().y > Self.Position().y) then
                                    cashposx = Self.Position().x
                                     cashposy = Self.Position().y - 1
                                     cashposz = Self.Position().z
                                        if (Self.LookDirection() ~= NORTH) then
 
 
                        Self.Turn(NORTH)
                        welcomemsg = ("Bem-Vindo \n[" .. Gambler_Name .. "]\nMin [100k]\nFale: [Info]")
                                     AntiSpam(welcomemsg, SPEAK_SAY)
 
                    end
 
 
                else
                    if (creature:Position().y < Self.Position().y) then
                        if (Self.LookDirection() ~= NORTH) then
                            Self.Turn(NORTH)
                        end
                    elseif (creature:Position().y > Self.Position().y) then
                        if (Self.LookDirection() ~= SOUTH) then
                            Self.Turn(SOUTH)
                        end
                    else
                        print('Casino: Error. Self character is the potential gambler.')
                    end
                end
                break
            end
        end
        if not (Player_Detected) then
                          Balance = 0
            if (Self.LookDirection() ~= SOUTH) then
              yellDelay = os.time()
                Self.Turn(SOUTH)
                Balance = 0
                   AntiSpam("$$ Visitantes $$:" .. #Players, SPEAK_SAY)
        Self.UseItemFromEquipment("head")
            end
        end
    end
    Mod:Delay(900)
end)
print("SCRIPT CRACKIADO BY SOLARYS SKYPE => SOLARYS")
local LastMessage = os.time() -- this only runs once, it sets the LastMessage variable to the time
local MessageDelay = 8 -- your bot will only respond to a message every x seconds
local AdvertisementTimer = 10
LastAdvertisement = os.time()

-- Advertising, messagedelay means if player sends 2 messages within 1 sec you will answer only 1, it will send each message every 2 second
-- it will not reply to player when it's ready to advertise within 30 secs, after it did it will start again
Module.New('Advertisement', function(Mod)
if (os.time()-LastAdvertisement)>AdvertisementTimer then
Self.Say("Fale\n$$ :[Invite or Play]: $$\nPara entra")
LastAdvertisement = os.time()
end
end)
-- localspeechs are local messages
LocalSpeechProxy.OnReceive("DanceStatus", function(proxy, mtype, speaker, level, text)
if (os.time()-LastMessage)>MessageDelay then
-- lower text are if player writes like "Hi" it will understand, doesnt matter its uppercase or lower
lowertext = string.lower(text)
wait(100)
if text == 'play' then
Self.UseItemFromMyPosition()
Self.Say('aleta sio')
wait(200)
Self.PrivateMessage(speaker, '$$ WellCome $$\n'..speaker..'\nMin [100k]\nPayout [1000%]')
wait(1500)
Self.PrivateMessage(speaker, 'Wellcome Pode joga traquilo por que niguem vai entra so quando voce say')
LastMessage = os.time()
wait(100)
elseif text == 'invite' then
Self.UseItemFromMyPosition()
Self.Say('aleta sio')
wait(200)
Self.PrivateMessage(speaker, '$$ WellCome $$\n'..speaker..'\nMin [100k]\nPayout [1000%]')
wait(3500)
Self.PrivateMessage(speaker, 'Wellcome Pode joga traquilo por que niguem vai entra so quando voce say')
elseif text == 'INVITE' then
LastMessage = os.time()
Self.UseItemFromMyPosition()
Self.Say('aleta sio')
wait(200)
Self.PrivateMessage(speaker, '$$ WellCome $$\n'..speaker..'\nMin [100k]\nPayout [1000%]')
wait(3500)
Self.PrivateMessage(speaker, 'Wellcome Pode joga traquilo por que niguem vai entra so quando voce say')
LastMessage = os.time()
elseif text == 'PLAY' then
LastMessage = os.time()
Self.UseItemFromMyPosition()
Self.Say('aleta sio')
wait(200)
Self.PrivateMessage(speaker, '$$ WellCome $$\n'..speaker..'\nMin [100k]\nPayout [1000%]')
wait(3500)
Self.PrivateMessage(speaker, 'Wellcome Pode joga traquilo por que niguem vai entra so quando voce say')
LastMessage = os.time()
-- speaker is only x player written down which says text and it will follow that order, other people can't except speaker with name
-- if it's only speaker, it means all players, if speaker == 'name' then only Name can
elseif speaker == 'Wasouf Master' and text == 'yell' then
end
end
end)