Прочее Arizona Casino Bot

[Liljk]

Arizona Casino Bot​

Добрый день, Я настолько обленился, что решил сделать бота для игры в казино на Arizona Rp.​

Описание:

• Бот за вас начинает играть с серверным ботом в казино - Оливией.
• Бот начинает с самой низкой ставки (20) и при каждом поражении увеличивает ставку в 2 раза до тех пор, пока не выиграет.
• При ничейном исходе, бот повторит последнюю ставку.
• После победы, бот начинает новую игру с самой маленькой ставки.
• Бот отказывает всем игрокам в ставке, в целях защиты от сбива бота текстом в чате "Вам уже предложили ставку"

Требования:

AHK и samp.udf​

Установка:

Закинуть бот и samp.udf в одну папку и запустить.​

Активация:

/ff​

Рекомендации от автора темы:

AHK абсолютно открытый, вы можете изменить цифры на какие вам угодно. Однако же, с минимальной начальной ставкой у вас больше шансов отыграться при поражении. Не исключены случаи постоянных поражений. Если поставить бота на ночь, то можно не плохо заработать фишек.​

!!! Бот не увеличивает вам шанс победы, он лишь играет за Вас с серверным ботом Оливией !!!

Спойлер: Исходник бота

#IfWinActive GTA:SA:MP
SendMode Input
#UseHook
#NoEnv
#SingleInstance, force
#Include samp.ahk
:?:/ff::
way = %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt ; Путь к ЧатЛогу
FileDelete, %way%  ; Удаляем ЧатЛог
sleep 1000
Goto, stavka20
stavka20:
FileRead, file, %way%
IfInString, file, Введите {48FC23}'/Yes'{FFFFFF}чтобы согласиться {FF0000}'/No' {FFFFFF}для отказа
{
Sleep 100
SendMessage, 0x50,, 0x4190419,, A
sendChatMessage("/no")
}
SendMessage, 0x50,, 0x4190419,, A
sendChatMessage("/dice 1001 20")
sleep 21000
Send, {ENTER}
FileRead, file, %way%
IfInString, file, [Инвентарь] {FFFFFF}Вам был добавлен предмет
{
Sleep 100
Send, {ENTER}
FileDelete, %way%  ; Удаляем ЧатЛог
Goto, stavka20
}
FileRead, file, %way%
IfInString, file, {FFFFFF}Игра закончилась в ничью!
{
Sleep 100
Send, {ENTER}
FileDelete, %way%
Goto, stavka20
}

stavka40:
FileRead, file, %way%
IfInString, file, Введите {48FC23}'/Yes'{FFFFFF}чтобы согласиться {FF0000}'/No' {FFFFFF}для отказа
{
Sleep 100
SendMessage, 0x50,, 0x4190419,, A
sendChatMessage("/no")
}
SendMessage, 0x50,, 0x4190419,, A
sendChatMessage("/dice 1001 40")
sleep 21000
Send, {ENTER}
FileRead, file, %way%
IfInString, file, [Инвентарь] {FFFFFF}Вам был добавлен предмет
{
Sleep 100
Send, {ENTER}
FileDelete, %way%  ; Удаляем ЧатЛог
Goto, stavka20
}
FileRead, file, %way%
IfInString, file, {FFFFFF}Игра закончилась в ничью!
{
Sleep 100
Send, {ENTER}
FileDelete, %way%
Goto, stavka40
}


stavka80:
FileRead, file, %way%
IfInString, file, Введите {48FC23}'/Yes'{FFFFFF}чтобы согласиться {FF0000}'/No' {FFFFFF}для отказа
{
Sleep 100
SendMessage, 0x50,, 0x4190419,, A
sendChatMessage("/no")
}
SendMessage, 0x50,, 0x4190419,, A
sendChatMessage("/dice 1001 80")
sleep 21000
Send, {ENTER}
FileRead, file, %way%
IfInString, file, [Инвентарь] {FFFFFF}Вам был добавлен предмет
{
Sleep 100
Send, {ENTER}
FileDelete, %way%  ; Удаляем ЧатЛог
Goto, stavka20
}
FileRead, file, %way%
IfInString, file, {FFFFFF}Игра закончилась в ничью!
{
Sleep 100
Send, {ENTER}
FileDelete, %way%
Goto, stavka80
}

stavka160:
FileRead, file, %way%
IfInString, file, Введите {48FC23}'/Yes'{FFFFFF}чтобы согласиться {FF0000}'/No' {FFFFFF}для отказа
{
Sleep 100
SendMessage, 0x50,, 0x4190419,, A
sendChatMessage("/no")
}
SendMessage, 0x50,, 0x4190419,, A
sendChatMessage("/dice 1001 160")
sleep 21000
Send, {ENTER}
FileRead, file, %way%
IfInString, file, [Инвентарь] {FFFFFF}Вам был добавлен предмет
{
Sleep 100
Send, {ENTER}
FileDelete, %way%  ; Удаляем ЧатЛог
Goto, stavka20
}
FileRead, file, %way%
IfInString, file, {FFFFFF}Игра закончилась в ничью!
{
Sleep 100
Send, {ENTER}
FileDelete, %way%
Goto, stavka160
}


stavka320:
FileRead, file, %way%
IfInString, file, Введите {48FC23}'/Yes'{FFFFFF}чтобы согласиться {FF0000}'/No' {FFFFFF}для отказа
{
Sleep 100
SendMessage, 0x50,, 0x4190419,, A
sendChatMessage("/no")
}
SendMessage, 0x50,, 0x4190419,, A
sendChatMessage("/dice 1001 320")
sleep 21000
Send, {ENTER}
FileRead, file, %way%
IfInString, file, [Инвентарь] {FFFFFF}Вам был добавлен предмет
{
Sleep 100
Send, {ENTER}
FileDelete, %way%  ; Удаляем ЧатЛог
Goto, stavka20
}
FileRead, file, %way%
IfInString, file, {FFFFFF}Игра закончилась в ничью!
{
Sleep 100
Send, {ENTER}
FileDelete, %way%
Goto, stavka320
}


stavka640:
FileRead, file, %way%
IfInString, file, Введите {48FC23}'/Yes'{FFFFFF}чтобы согласиться {FF0000}'/No' {FFFFFF}для отказа
{
Sleep 100
SendMessage, 0x50,, 0x4190419,, A
sendChatMessage("/no")
}
SendMessage, 0x50,, 0x4190419,, A
sendChatMessage("/dice 1001 640")
sleep 21000
Send, {ENTER}
FileRead, file, %way%
IfInString, file, [Инвентарь] {FFFFFF}Вам был добавлен предмет
{
Sleep 100
Send, {ENTER}
FileDelete, %way%  ; Удаляем ЧатЛог
Goto, stavka20
}
FileRead, file, %way%
IfInString, file, {FFFFFF}Игра закончилась в ничью!
{
Sleep 100
Send, {ENTER}
FileDelete, %way%
Goto, stavka640
}


stavka1280:
FileRead, file, %way%
IfInString, file, Введите {48FC23}'/Yes'{FFFFFF}чтобы согласиться {FF0000}'/No' {FFFFFF}для отказа
{
Sleep 100
SendMessage, 0x50,, 0x4190419,, A
sendChatMessage("/no")
}
SendMessage, 0x50,, 0x4190419,, A
sendChatMessage("/dice 1001 1280")
sleep 21000
Send, {ENTER}
FileRead, file, %way%
IfInString, file, [Инвентарь] {FFFFFF}Вам был добавлен предмет
{
Sleep 100
Send, {ENTER}
FileDelete, %way%  ; Удаляем ЧатЛог
Goto, stavka20
}
FileRead, file, %way%
IfInString, file, {FFFFFF}Игра закончилась в ничью!
{
Sleep 100
Send, {ENTER}
FileDelete, %way%
Goto, stavka1280
}


stavka2560:
FileRead, file, %way%
IfInString, file, Введите {48FC23}'/Yes'{FFFFFF}чтобы согласиться {FF0000}'/No' {FFFFFF}для отказа
{
Sleep 100
SendMessage, 0x50,, 0x4190419,, A
sendChatMessage("/no")
}
SendMessage, 0x50,, 0x4190419,, A
sendChatMessage("/dice 1001 2560")
sleep 21000
Send, {ENTER}
FileRead, file, %way%
IfInString, file, [Инвентарь] {FFFFFF}Вам был добавлен предмет
{
Sleep 100
Send, {ENTER}
FileDelete, %way%  ; Удаляем ЧатЛог
Goto, stavka20
}
FileRead, file, %way%
IfInString, file, {FFFFFF}Игра закончилась в ничью!
{
Sleep 100
Send, {ENTER}
FileDelete, %way%
Goto, stavka2560
}

stavka5120:
FileRead, file, %way%
IfInString, file, Введите {48FC23}'/Yes'{FFFFFF}чтобы согласиться {FF0000}'/No' {FFFFFF}для отказа
{
Sleep 100
SendMessage, 0x50,, 0x4190419,, A
sendChatMessage("/no")
}
SendMessage, 0x50,, 0x4190419,, A
sendChatMessage("/dice 1001 5120")
sleep 21000
Send, {ENTER}
FileRead, file, %way%
IfInString, file, [Инвентарь] {FFFFFF}Вам был добавлен предмет
{
Sleep 100
Send, {ENTER}
FileDelete, %way%  ; Удаляем ЧатЛог
Goto, stavka20
}
FileRead, file, %way%
IfInString, file, {FFFFFF}Игра закончилась в ничью!
{
Sleep 100
Send, {ENTER}
FileDelete, %way%
Goto, stavka5120
}


stavka10000:
FileRead, file, %way%
IfInString, file, Введите {48FC23}'/Yes'{FFFFFF}чтобы согласиться {FF0000}'/No' {FFFFFF}для отказа
{
Sleep 100
SendMessage, 0x50,, 0x4190419,, A
sendChatMessage("/no")
}
SendMessage, 0x50,, 0x4190419,, A
sendChatMessage("/dice 1001 10000")
sleep 21000
Send, {ENTER}
FileRead, file, %way%
IfInString, file, [Инвентарь] {FFFFFF}Вам был добавлен предмет
{
Sleep 100
Send, {ENTER}
FileDelete, %way%  ; Удаляем ЧатЛог
Goto, stavka20
}
FileRead, file, %way%
IfInString, file, {FFFFFF}Игра закончилась в ничью!
{
Sleep 100
Send, {ENTER}
FileDelete, %way%
Goto, stavka10000
}
return

 

[MAKOSKA]

и как успешно нафармил?

 

[Carrentine]

крутая пикча. перепиши на .lua или .cs, будет круто. добавь меню с настрами разных фунок, например задержку. imgui для lua и dxut для cleo. с cleo могу помочь, если надо.

 

[Liljk]

с cleo могу помочь, если надо.

Дай свои контакты в личку

и как успешно нафармил?

Поднимал 6к за первый тест с 200 фишек. Но после так повезло, что я проиграл все ставки :monkey:

 

[Mefri]

Блять это шедевр

 

[CRIO]

ждал долго, но с оливией это как-то ни чесно, она легко вас обыграет

 

[Rei]

Такс такс такс што тут у нас аахахха мартингейл наканецта

 

[Abrikos]

Увеличивает ставку в 2 раза, даже когда выигр
ываю, он продолжает
увеличивать и еще, как
изменить задержку?

 

[Liljk]

Увеличивает ставку в 2 раза, даже когда выигр
ываю, он продолжает
увеличивать и еще, как
изменить задержку?

Ошибка связана с тем что ахк не может прочитать конкретно Ваш чатлог.

Чтобы изменить задержку отредактируйте скрипт и везде где sleep 21000 замените на ваше число (1сек=1000)

 

[Abrikos]

Ошибка связана с тем что ахк не может прочитать конкретно Ваш чатлог.

Чтобы изменить задержку отредактируйте скрипт и везде где sleep 21000 замените на ваше число (1сек=1000)

А почему он не может читать мой чатлог и как это фиксануть?

 

[#HunterScripts]

А почему он не может читать мой чатлог и как это фиксануть?

другую битность надо ставить

 

[Abrikos]

другую битность надо ставить

Соре за тупой вопрос, а как это сделать?

 

[#HunterScripts]

Соре за тупой вопрос, а как это сделать?

смотри видосы

 

[Abrikos]

смотри видосы

Ок, спасибо