AutoThief v.2 - автоматический авто-угон - Форум Cheat-Master.ru
  • Страница 1 из 1
  • 1
Модератор форума: Admin_Bot, Admin_Bot2, Admin_Bot3, Admin_Bot4  
AutoThief v.2 - автоматический авто-угон
[CM]Lapochka Дата: Четверг, 04.02.2016, 21:06 | Сообщение # 1
Новичок
Сообщений: 8
Статус: Offline
Принцип действия​

1.После ввода команды клео начинает поиск машины определенного типа в зоне прорисовки.
2.При нахождении машины клео проверяет статус дверей машины и наличие водителя в этой машине.
3.1.Если двери открыты (есть или нет водителя) игрок садится в машину.
3.2.Если двери закрыты и нет водителя игрока тпшит под машину и начинается вскрытие кара.
4.Тпшится на место сдачи авто/включает двигатель и снимает лимит в зависимости от введенной команды.
Активация​

/cfind [type] [param] - начать поиск машины
клавиша 6 - выключить скрипт
[type] - вводим именно тип машины (не id). можно узнать набрав /dl, после type будет указан номер который нам нужен.
[param] - имеет 3 параметра. 0 (или не указан) - после вскрытия машины ничего не делать (не будет заводить двигатель и снимать ограничитель), 1 - после вскрытия заведет машину и снимет ограничитель, 2 - после вскрытия телепортирует автомобиль на место сдачи

Плюсы​

1.Не нужно заезжать в разные уголки карты для поиска кара. клео сам ищет авто указанного типа в зоне прорисовки.
2.Может воровать открытые машины с водителем которые находятся в движении.
3.Доставляет машину на место сдачи или включает двигатель и снимает лимит после кражи.

Обновление v.2​

1.Исправлена активация/деактивация скрипта
2.Исправлен баг со вскрытием машины (не работала если игрок находился в машине)
3.Подправлен телепорт
4.Добавлен новый параметр см. пункт 5
5.Переназначены параметры 0 - после вскрытия машину ничего не делать (не будет заводить двигатель и снимать ограничитель), 1 - после вскрытия заведет машины и снимет ограничитель, 2 - после вскрытия телепортирует автомобиль на место сдачи
Если скрипт будет работать, то в след обновлении добавлю более крутые плюхи.

Для работы требуется SAMPFUNCS 5.2.2​

Скачать ниже

Бот фермера ниже


Сообщение отредактировал [CM]Lapochka - Пятница, 05.02.2016, 17:20
[CM]Lapochka Дата: Пятница, 05.02.2016, 19:28 | Сообщение # 2
Новичок
Сообщений: 8
Статус: Offline
Цитата Проверьте на стиллер,если норм то +-сик [/quote

Стиллера нету


Добавлено (05.02.2016, 15:32)
---------------------------------------------
UP


vk.com/nextside

Сообщение отредактировал [CM]Lapochka - Пятница, 05.02.2016, 19:28
[CM]Kotopec Дата: Пятница, 05.02.2016, 19:46 | Сообщение # 3
Боец
Сообщений: 220
Статус: Offline
Код, лично я стиллера не вижу
Цитата
{$CLEO}
0000:
wait 2000

repeat
wait 0
until SAMP.Available()

0AF8: samp add_message_to_chat "AutoThef by Elist" color 34555
0B34: samp register_client_command "cfind" to_label @status

:activate
wait 0
SAMP.IsCommandTyped(5@)
if
0ADC: test_cheat "6"
then
end
if and
0039: 11@ == 1
0AD4: 9@ = scan_string 5@ format "%d" 10@
jf @activate
0006: 11@ = 0
jump @command

:command
wait 0
0AD4: 9@ = scan_string 5@ format "%d %d" 10@ 15@
if or
0039: 15@ == 0
0039: 15@ == 1
0039: 15@ == 2
jf @error2
0ACD: show_text_highpriority "Cheat ON" time 2000
0006: 11@ = 0
jump @find

:error2
wait 0
chatmsg "{FE2E2E}Íåâåðíûé ïàðàìåòð! Ïàðàìåòð äîëæåí áûòü îò 0 äî 2." color 0xFFFFFF
0006: 15@ = 0
jump @activate

:find
wait 0
Actor.StorePos($PLAYER_ACTOR, 0@, 1@, 2@)
0AE2: 3@ = random_vehicle_near_point 0@ 1@ 2@ in_radius 150.0 find_next 1 pass_wrecked 1
if
0019: 3@ > 0
jf @deactivate
0441: 4@ = car 3@ model
jump @check

:check
wait 0
046C: 31@ = car 3@ driver
09B3: get_car 3@ door_status 12@
if
003B: 4@ == 10@
jf @find
if
056D: actor 31@ defined
jf @check2
if
0039: 12@ == 0
jf @find
jump @check2

:check3
wait 0
chatmsg "{FE2E2E}Ìàøèíà íàéäåíà. Âçëàìûâàþ..." color 0xFFFFFF
0407: store_coords_to 6@ 7@ 8@ from_car 3@ with_offset 0.0 0.0 -2.7
Actor.LockInCurrentPosition($PLAYER_ACTOR) = True
Actor.PutAt($PLAYER_ACTOR, 6@, 7@, 8@)
9@ = Car.Angle(3@)
02F6: 4@ = sine 9@ // (float)
02F7: 5@ = cosine 9@ // (float)
0013: 4@ *= 10.0
0013: 5@ *= 10.0
005B: 6@ += 4@ // (float)
0063: 7@ -= 5@ // (float)
000B: 8@ += 5.7
0930: lock_camera_position 1
0936: set_camera 0@ 1@ 2@ position_to 6@ 7@ 8@ time 2000 smooth_transition 1
jump @hack

:check2
wait 0
if
Actor.Driving($PLAYER_ACTOR)
jf @check3
0633: AS_actor $PLAYER_ACTOR exit_car
jump @check2

:hack
wait 0
09B3: get_car 3@ door_status 12@
if
8039: 12@ == 0
jf @seat
SAMP.SetGameKeyState(16, 255)
if
0ADC: test_cheat "6"
jf @hack
0930: lock_camera_position 0
Camera.Restore_WithJumpCut()
04C4: store_coords_to 0@ 1@ 2@ from_actor $PLAYER_ACTOR with_offset -1.9 0.0 1.7
Actor.PutAt($PLAYER_ACTOR, 0@, 1@, 2@)
Actor.LockInCurrentPosition($PLAYER_ACTOR) = False
0ACD: show_text_highpriority "Cheat OFF" time 2000
jump @deactivate2

:seat
wait 0
0930: lock_camera_position 0
Camera.Restore_WithJumpCut()
0407: store_coords_to 6@ 7@ 8@ from_car 3@ with_offset -1.9 0.0 1.7
Actor.PutAt($PLAYER_ACTOR, 6@, 7@, 8@)
Actor.LockInCurrentPosition($PLAYER_ACTOR) = False
0B2C: samp 13@ = get_vehicle_id_by_car_handle 3@
0B30: samp send_enter_vehicle 13@ as_passenger 0
072A: put_actor $PLAYER_ACTOR into_car 3@ driverseat
if
0039: 15@ == 2
jf @engine
0006: 15@ = 0
wait 1500
jump @marker

:marker
wait 0
if
8039: 14@ == 32
jf @error
0085: 15@ = 14@ // (int)
0012: 15@ *= 160
000A: 15@ += 0xC7DD58
0085: 16@ = 15@ // (int)
000A: 16@ += 48
0A8D: 17@ = read_memory 16@ size 4 virtual_protect 0
0085: 18@ = 15@ // (int)
000A: 18@ += 52
0A8D: 19@ = read_memory 18@ size 4 virtual_protect 0
0085: 20@ = 15@ // (int)
000A: 20@ += 56
0A8D: 21@ = read_memory 20@ size 4 virtual_protect 0
0085: 22@ = 15@ // (int)
000A: 22@ += 80
0A8D: 23@ = read_memory 22@ size 4 virtual_protect 0
000A: 14@ += 1
if
0039: 23@ == 65538
jf @marker
chatmsg "{FE2E2E}Òåëåïîðòàöèÿ íà ìåòêó" color 0xFFFFFF
0006: 23@ = 0
0006: 14@ = 0
jump @tp

:tp
wait 1200
if
00DB: actor $PLAYER_ACTOR in_car 3@
jf @activate
Car.StorePos(3@, 24@, 25@, 26@)
Car.LockInCurrentPosition(3@) = True
0509: 27@ = distance_between_XY 17@ 19@ and_XY 24@ 25@
0087: 28@ = 17@ // (float)
0087: 29@ = 19@ // (float)
0063: 28@ -= 24@ // (float)
0063: 29@ -= 25@ // (float)
0073: 28@ /= 27@ // (float)
0073: 29@ /= 27@ // (float)
0013: 28@ *= 50.0
0013: 29@ *= 50.0
005B: 24@ += 28@ // (float)
005B: 25@ += 29@ // (float)
0007: 26@ = -50.0
Car.PutAt(3@, 24@, 25@, 26@)
if
0ADC: test_cheat "6"
then
Car.StorePos(3@, 24@, 25@, 26@)
02CE: 26@ = ground_z_at 24@ 25@ 1000.0
Car.PutAt(3@, 24@, 25@, 26@)
Car.LockInCurrentPosition(3@) = False
0ACD: show_text_highpriority "Cheat OFF" time 2000
jump @deactivate2
end
if
0023: 100.0 > 27@
jf @tp
wait 1200
Car.PutAt(3@, 17@, 19@, 21@)
Car.LockInCurrentPosition(3@) = False
jump @activate

:error
wait 500
if
00DB: actor $PLAYER_ACTOR in_car 3@
jf @activate
chatmsg "{FE2E2E}Ìåòêà íå íàéäåíà!" color 0xFFFFFF
chatmsg "{FE2E2E}Òåëåïîðòèðóéòåñü âðó÷íóþ" color 0xFFFFFF
0006: 14@ = 0
jump @engine

:engine
wait 1500
if and
8ABE: vehicle 3@ engine_on
0039: 15@ == 1
jf @activate
say "/en"
0006: 15@ = 0
jump @limit

:limit
wait 1100
say "/slimit"
jump @activate

:deactivate
wait 0
if
0ADC: test_cheat "6"
jf @find
0ACD: show_text_highpriority "Cheat OFF" time 2000
jump @deactivate2

:deactivate2
wait 0
0006: 11@ = 0
if
0ADC: test_cheat "6"
jf @activate
jump @deactivate2

:status
wait 0
0B12: 11@ = 0 XOR 1
0B43: samp cmd_ret


Скупаю и продаю аккаунты в социальной сети • VK •

Сообщение отредактировал [CM]Kotopec - Пятница, 05.02.2016, 19:46
[CM]Lapochka Дата: Пятница, 05.02.2016, 19:56 | Сообщение # 4
Новичок
Сообщений: 8
Статус: Offline
Цитата [CM]Kotopec ()
Код, лично я стиллера не вижу

потому-что его и нету )


vk.com/nextside
Bandera2015 Дата: Четверг, 03.03.2016, 00:22 | Сообщение # 5
Новичок
Сообщений: 20
Статус: Offline
У меня не скачивается((
Прикрепления: 9771573.png (100.0 Kb)
[CM]AIex Дата: Четверг, 03.03.2016, 00:57 | Сообщение # 6
Бывалый
Сообщений: 307
Статус: Offline
Антивирус блокирует лолс)

Купоны на лайки!: http://cheat-master.ru/forum/188-564603-1
Cheat-master.ru - не блокирует в вк: http://cheat-master.ru/forum/2-571650-1

[CM]1337GlobalElite Дата: Четверг, 03.03.2016, 13:28 | Сообщение # 7
Боец
Сообщений: 64
Статус: Offline
Видео можно?
[CM]Kapustta Дата: Пятница, 04.03.2016, 16:12 | Сообщение # 8
Боец
Сообщений: 76
Статус: Offline
Попробую если все норм + )

Цель: Продавец
ucozmark Дата: Суббота, 20.08.2016, 04:00 | Сообщение # 9
Сообщений: 1396
Статус: Offline


Phantom-X Reborn. Скоро.
  • Страница 1 из 1
  • 1
Поиск:
Статистика Форума