[CLEO] Auto Pay - Форум - Читерский Форум | Читы для игр SAMP,CS:GO,GTA5,PUBG,Minecraft,CoD,Warface,WoT | Магазин аккаунтов SAMP-RP,Advance-RP,Diamond-RP,логов samp,Steam,WoT,Warface,PUBG,GTA5

Страница 1 из 11
Модератор форума: [CM]Рафаэль, La_Mettrie, Logan™, PasqualeQQ 
Форум » Читы,баги,моды SAMP CRMP » CLEO скрипты » [CLEO] Auto Pay (Этот CLEO Скрипт облегчит вам передачу крупных сумм денег.)
[CLEO] Auto Pay
maxim241210Дата: Суббота, 15.10.2016, 10:19 | Сообщение # 1
Боец
Сообщений: 188
Статус: Offline

Привет всем думаю все сталкивались с тем что надо передать деньги и не хотите ошибиться, дать больше или меньше денег данный CLEO скрипт вам поможет.

Этот cleo скрипт работает через .ini файл сейчас мы рассмотрим две настройки.
Первая настройка money = 12345 // данная настройка отвечает за количество передаваемых денег.
Вторая настройка wait = 1000// это задержка передачи денег чтобы сервер не писал: "не флуди" указывать надо в мс. 1000мс = 1 секунда.


Теперь об работе скрипта.

Чтобы скрипт начал работать введём как чит-код: Apay.
После этого мы целимся на игрока и в чате появится сообщение которое говорит намNick_Name игрока
И говорит согласны ли вы если да то вводим как чит-код :"Yes" если нет то:"No"
Если согласились то скрипт начнёт передавать деньги.





Требование:
SampFuncs
Cleo


Скачать с DropBox
Автор: Я (maxim241210)

В данный момент этот cleo сделан под advance rp (передаёт максимум. по 2к) можно использовать на всех серверах в скором добавлю 10.000, 25.000, 50.000, 75.000, 100.000



ТОП Cleo для лидера и зама.
[CLEO] Fast invite v2.9 new http://cheat-master.ru/forum/129-624186-1

Мои cleo.
[CLEO] Random Number http://cheat-master.ru/forum/129-600299-1
[CLEO] Calculator http://cheat-master.ru/forum/129-600373-1
[CLEO] Fast Info http://cheat-master.ru/forum/129-607557-1
[CLEO] Auto Pay http://cheat-master.ru/forum/129-650125-1


Сообщение отредактировал maxim241210 - Суббота, 15.10.2016, 10:34
Последние товары с игрового магазина:
Найти еще что-нибудь в магазине:
ClopsterДата: Суббота, 15.10.2016, 11:38 | Сообщение # 2
Боец
Сообщений: 237
Статус: Offline
Можно было намного короче код сделать.
Я себе тож autopay сделал для бота одного, но полностью автоматизированный занимает всего 75 строк, а у тебя почти 400
И активацию не проще ли на команду сделать?
И ошибки грамматические в текстах исправь

Код

{$CLEO .cs}
0000: NOP
thread "AutoPay"

:AutoPay_14
wait 0
   SAMP.Available
else_jump @AutoPay_14
wait 8000
msg "{ff0000} CLEO {aeea00} [AutoPay] {76ff03} Загружен {4fc3f7} Автор: maxim241210{bdbdbd} v1.0" 16777215
jump @AutoPay_140

:AutoPay_140
wait 0
if
cheat "apay"
else_jump @AutoPay_140
msg "{03a9f4}Нацельтись на игрока{ffa726} оружием или кулаком{03a9f4} правой кнопкой мыши{ffa726} (ПКМ)" 16777215

:AutoPay_271
wait 0
if and
alloc 2@ 64
alloc 1@ 64
alloc 15@ 64
0AD2: 1@ = player $PLAYER_CHAR targeted_actor //IF and SET
2@ = SAMP.GetSAMPPlayerIDByActorHandle(1@)
15@ = SAMP.GetPlayerNickname(2@)
else_jump @AutoPay_271
wait 200
0AF0: 3@ = get_int_from_ini_file "cleo\apay.ini" section "GENERAL" key "money"
msg "{76ff03}Вы выбрали игрока {ffa726}%s [%i]{76ff03} И вы хотите передать {ffa726}%i вирт" 16777215 15@ 2@ 3@
msg "{03a9f4}Если вы согласны введите как чит-код: {76ff03}Yes {03a9f4}если нет то {ff0000}No" 16777215

:AutoPay_575
wait 0
if
cheat "Yes"
else_jump @AutoPay_637
msg "{76ff03}Вы согласились." 16777215
jump @AutoPay_693

:AutoPay_637
wait 0
cheat "No"
else_jump @AutoPay_575
msg "{ff0000}Вы отказались." 16777215
jump @AutoPay_140

:AutoPay_693
wait 0
if and
0AF0: 3@ = get_int_from_ini_file "cleo\apay.ini" section "GENERAL" key "money"
0AF0: 20@ = get_int_from_ini_file "cleo\apay.ini" section "GENERAL" key "wait"
else_jump @AutoPay_693
jump @AutoPay_786

:AutoPay_786
wait 0
if
  3@ == 0
else_jump @AutoPay_871
msg "{ff0000}Ты написал не допустимое число!" 16777215
jump @AutoPay_693
jump @AutoPay_985

:AutoPay_871
log "{76ff03}Передача денег началась."
msg "{76ff03} Передача денег началась. Надо передать:{ffa726} %i вирт" 16777215 3@

:AutoPay_985
wait 0

:AutoPay_989
  3@ > 1999
else_jump @AutoPay_1060
wait 20@
say "/pay %i 2000" 2@
3@ -= 2000
4@ += 2000
5@ += 2000
jump @AutoPay_989

:AutoPay_1060
jump @AutoPay_1067

:AutoPay_1067
wait 0

:AutoPay_1071
  3@ > 1499
else_jump @AutoPay_1142
wait 20@
say "/pay %i 1500" 2@
3@ -= 1500
4@ += 1500
5@ += 1500
jump @AutoPay_1071

:AutoPay_1142
jump @AutoPay_1149

:AutoPay_1149
wait 0

:AutoPay_1153
  3@ > 999
else_jump @AutoPay_1224
wait 20@
say "/pay %i 1000" 2@
3@ -= 1000
4@ += 1000
5@ += 1000
jump @AutoPay_1153

:AutoPay_1224
jump @AutoPay_1231

:AutoPay_1231
wait 0

:AutoPay_1235
  3@ > 499
else_jump @AutoPay_1305
wait 20@
say "/pay %i 500" 2@
3@ -= 500
4@ += 500
5@ += 500
jump @AutoPay_1235

:AutoPay_1305
jump @AutoPay_1312

:AutoPay_1312
wait 0

:AutoPay_1316
  3@ > 299
else_jump @AutoPay_1386
wait 20@
say "/pay %i 300" 2@
3@ -= 300
4@ += 300
5@ += 300
jump @AutoPay_1316

:AutoPay_1386
jump @AutoPay_1393

:AutoPay_1393
wait 0

:AutoPay_1397
  3@ > 199
else_jump @AutoPay_1467
wait 20@
say "/pay %i 200" 2@
3@ -= 200
4@ += 200
5@ += 200
jump @AutoPay_1397

:AutoPay_1467
jump @AutoPay_1474

:AutoPay_1474
wait 0

:AutoPay_1478
  3@ > 99
else_jump @AutoPay_1544
wait 20@
say "/pay %i 100" 2@
3@ -= 100
4@ += 100
5@ += 100
jump @AutoPay_1478

:AutoPay_1544
jump @AutoPay_1551

:AutoPay_1551
wait 0

:AutoPay_1555
  3@ > 49
else_jump @AutoPay_1620
wait 20@
say "/pay %i 50" 2@
3@ -= 50
4@ += 50
5@ += 50
jump @AutoPay_1555

:AutoPay_1620
jump @AutoPay_1627

:AutoPay_1627
wait 0

:AutoPay_1631
  3@ > 44
else_jump @AutoPay_1696
wait 20@
say "/pay %i 45" 2@
3@ -= 45
4@ += 45
5@ += 45
jump @AutoPay_1631

:AutoPay_1696
jump @AutoPay_1703

:AutoPay_1703
wait 0

:AutoPay_1707
  3@ > 39
else_jump @AutoPay_1772
wait 20@
say "/pay %i 40" 2@
3@ -= 40
4@ += 40
5@ += 40
jump @AutoPay_1707

:AutoPay_1772
jump @AutoPay_1779

:AutoPay_1779
wait 0

:AutoPay_1783
  3@ > 34
else_jump @AutoPay_1848
wait 20@
say "/pay %i 35" 2@
3@ -= 35
4@ += 35
5@ += 35
jump @AutoPay_1783

:AutoPay_1848
jump @AutoPay_1855

:AutoPay_1855
wait 0

:AutoPay_1859
  3@ > 29
else_jump @AutoPay_1924
wait 20@
say "/pay %i 30" 2@
3@ -= 30
4@ += 30
5@ += 30
jump @AutoPay_1859

:AutoPay_1924
jump @AutoPay_1931

:AutoPay_1931
wait 0

:AutoPay_1935
  3@ > 19
else_jump @AutoPay_2000
wait 20@
say "/pay %i 20" 2@
3@ -= 20
4@ += 20
5@ += 20
jump @AutoPay_1935

:AutoPay_2000
jump @AutoPay_2007

:AutoPay_2007
wait 0

:AutoPay_2011
  3@ > 9
else_jump @AutoPay_2076
wait 20@
say "/pay %i 10" 2@
3@ -= 10
4@ += 10
5@ += 10
jump @AutoPay_2011

:AutoPay_2076
jump @AutoPay_2083

:AutoPay_2083
wait 0

:AutoPay_2087
  3@ > 4
else_jump @AutoPay_2151
wait 20@
say "/pay %i 5" 2@
3@ -= 5
4@ += 5
5@ += 5
jump @AutoPay_2087

:AutoPay_2151
jump @AutoPay_2158

:AutoPay_2158
wait 0

:AutoPay_2162
  3@ > 2
else_jump @AutoPay_2226
wait 20@
say "/pay %i 3" 2@
3@ -= 3
4@ += 3
5@ += 3
jump @AutoPay_2162

:AutoPay_2226
jump @AutoPay_2233

:AutoPay_2233
wait 0

:AutoPay_2237
  3@ > 1
else_jump @AutoPay_2301
wait 20@
say "/pay %i 2" 2@
3@ -= 2
4@ += 2
5@ += 2
jump @AutoPay_2237

:AutoPay_2301
jump @AutoPay_2308

:AutoPay_2308
wait 0

:AutoPay_2312
  3@ > 0
else_jump @AutoPay_2376
wait 20@
say "/pay %i 1" 2@
3@ -= 1
4@ += 1
5@ += 1
jump @AutoPay_2312

:AutoPay_2376
jump @AutoPay_2383

:AutoPay_2383
wait 1000
018C: play_sound 1052 at 0.0 0.0 0.0
log "{ff0000}Передача денег завершилась."
msg "{76ff03} Дополнительная информация: {ffa726}Передача завершина." 16777215
msg "{76FF03} Осталось передать: {ffa726}%i вирт{76FF03} Передано:{ffa726} %i вирт" 16777215 3@ 5@
msg "{bdbdbd} Задержка передачи денег: {ffa726}%iмс. {bdbdbd} Передано за игру:{ffa726} %i вирт" 16777215 20@ 4@
5@ = 0
free 1@
free 2@
free 15@
jump @AutoPay_140
hex    /// ~CLEO AUTO PAY~ ~BY MAXIM241210~?
7E 43 4C 45 4F 20 41 55 54 4F 20 50 41 59 7E 20
7E 42 59 20 4D 41 58 49 4D 32 34 31 32 31 30 7E
1A A1


~говнокодер

Сообщение отредактировал Газопровод - Суббота, 15.10.2016, 11:42
Последние товары с игрового магазина:
Найти еще что-нибудь в магазине:
maxim241210Дата: Суббота, 15.10.2016, 12:02 | Сообщение # 3
Боец
Сообщений: 188
Статус: Offline
Цитата Газопровод ()
активацию не проще ли на команду сделать?

Я хотел и делал но тогда у меня не работает задержка + бывал краш
Да можно было сделать меньше но сделал так может в следующем update сделаю короче.


ТОП Cleo для лидера и зама.
[CLEO] Fast invite v2.9 new http://cheat-master.ru/forum/129-624186-1

Мои cleo.
[CLEO] Random Number http://cheat-master.ru/forum/129-600299-1
[CLEO] Calculator http://cheat-master.ru/forum/129-600373-1
[CLEO] Fast Info http://cheat-master.ru/forum/129-607557-1
[CLEO] Auto Pay http://cheat-master.ru/forum/129-650125-1
Последние товары с игрового магазина:
Найти еще что-нибудь в магазине:
DaneliteДата: Суббота, 15.10.2016, 16:34 | Сообщение # 4
Любитель
Сообщений: 38
Статус: Offline
maxim241210, Ахахахах, можно было сделать короче, и всё бы стабильно работало.... biggrin

Пишу клео на заказ,писать в лс!
Последние товары с игрового магазина:
Найти еще что-нибудь в магазине:
AlllssДата: Суббота, 15.10.2016, 18:56 | Сообщение # 5
Боец
Сообщений: 103
Статус: Offline
Зачем так сложно? Вот код со всеми проверками и т.д, вводишь кмд(ид игрока) и передаёт все бабки которые есть у тебя на руках. Конечно же можно сделать что бы передавало определённую сумму, только нужно немного переделать код

Код
0B34: samp register_client_command "money" to_label @cmd

while true
wait 0
    if
    0039:   3@ == 1
    then
        repeat
        wait 1100
        000E: 1@ -= 2000
        0AF9: samp say_msg "/pay %d 2000" 5@
        000A: 2@ += 1
        until 003B:   2@ == 0@  // (int)
        wait 1100
        0AF9: samp say_msg "/pay %d %d" 5@ 1@
        3@ = 0
        2@ = 0
    end
end

:cmd
0B35: samp 4@ = get_last_command_params
    if
    0AD4: 6@ = scan_string 4@ format "%d" 5@
    then
        if and
        0029:   5@ >= 0
        8019:   not 5@ > 1000
        then
        0B20: samp 6@ = actor_handle_by_samp_player_id 5@
            if and
            0B23:  samp is_player_connected 5@
            056D:   actor 6@ defined
            then
            00A0: store_actor $PLAYER_Actor position_to 10@ 11@ 12@
            00A0: store_actor 6@ position_to 7@ 8@ 9@
            050A: 13@ = distance_between_XYZ 10@ 11@ 12@ and_XYZ 7@ 8@ 9@           
                if
                8031: not  13@ >= 4.0
                then
                3@ = 1
                010B: 0@ = player $PLAYER_CHAR money
                    if
                    0029:   0@ >= 2000
                    then
                    0085: 1@ = 0@ // (int)
                    0016: 0@ /= 2000
                    else
                    0AF8: samp add_message_to_chat "Что бы запустить бота нужно минимум 2к" color -1
                    3@ = 0
                    end    
                else
                0AF8: samp add_message_to_chat "Слишком далеко!" color -1
                end
            else
            0AF8: samp add_message_to_chat "Игрок далеко или не подключен!" color -1
            end
        end
    else
    0AF8: samp add_message_to_chat "Используйте /money [player id]" color -1
    end
0B43: samp cmd_ret


Сообщение отредактировал Alllss - Суббота, 15.10.2016, 19:00
Последние товары с игрового магазина:
Найти еще что-нибудь в магазине:
Форум » Читы,баги,моды SAMP CRMP » CLEO скрипты » [CLEO] Auto Pay (Этот CLEO Скрипт облегчит вам передачу крупных сумм денег.)
Страница 1 из 11
Поиск:
Статистика Форума
Последнии темы Читаемые темы Лучшие пользователи Новые пользователи
▇▇Скупка/Продажа ARP-300&... [Kolmark]

Продаю вирты Samp-Rp Revo... [Larryanna]

[DRP] Сбегаем от копов [easyrak228]

Игра - Оцени аватар преды... [Fernando_Stivenson]

VIP кидок, wieless [Bychek]

Ищу Бота автобусника лучш... [stark186]

DRP ~ ARP ~ SRP ~ ARIZONA... [pashka337]

[Arizona RolePlay] AHK Au... [Luhoviak]

[Продажа] Рулетка PUBG с ... [NagiBuchka]

Продам репорт бота для CS... [sl3mmy]

[1]>Общение читеров [CM] [9991]

[2]>S0beit - pr9n project for samp 0.3.7 [9481]

[3]>RakBot - Качай аккаунты не напрягаясь! [9440]

[4]>Часто задаваемые вопросы... [8194]

[5]>Вопросы и ответы [6433]

[6]>[0.3.7][RUS] Sobeit modified by MishaN [6228]

[7]>[FREE] AntiAFK_R 3.4.6 by Ruskadance [0.3z-R2] [6220]

[8]>Продажа вирт 1кк АРП~350р ДРП~350р.СРП~150р. [6147]

[9]>Бесконечное слово [4693]

[10]>[Samp-Rp.Ru]Обновлен список Админов [4143]

[11]>[CLEO] Вопрос - Ответ [4115]

[12]>Курилка [3238]

[1]>АК_47 [28124]

[2]>GеNius [6707]

[3]>romka619 [5379]

[4]>[CM]Russel [4987]

[5]>[CM]AGRESSOR [4654]

[6]>Сэс [4429]

[7]>Snake_Firm [4300]

[8]>Artem_Buero [4129]

[9]>[CM]Durman [3263]

[10]>sky_Woker [2998]

[11]>iMaddy [2871]

[12]>Sa1nteD [2659]

[13]>Logan™ [2585]

[14]>Ch0c0Cube [2452]

[15]>[CM]Рафаэль [2295]

SevaWebb [17.11.2017|23:53]

artya26 [17.11.2017|23:51]

ExaMantanaAdmin [17.11.2017|23:50]

No_Twerkkk [17.11.2017|23:44]

aanal [17.11.2017|23:39]

YaremasPodliva [17.11.2017|23:23]

ramis228 [17.11.2017|23:20]

wlad1164 [17.11.2017|23:00]

DrDIXON97 [17.11.2017|22:53]

levchiiik [17.11.2017|22:42]

levchiik [17.11.2017|22:31]

Likvidator777 [17.11.2017|22:27]

DannyAr99 [17.11.2017|22:10]

vladhi059 [17.11.2017|22:09]

Kostya_Bezruk228 [17.11.2017|22:05]


CM Team © 2009-2017 Администрация не несёт ответственности за размещённые материалы. Условия пользования
Все материалы предоставлены в ознакомительных целях и администрация предлагает удалить их после ознакомления.

Положение о защите персональных данных на сайте, Пользовательское соглашение, Договор оказания услуг.