[CLEO]Разбор Cleo forma by Biboran - Форум Cheat-Master.ru
  • Страница 1 из 1
  • 1
Модератор форума: Admin_Bot, Admin_Bot2, Admin_Bot3, Admin_Bot4  
[CLEO]Разбор Cleo forma by Biboran
Coba_ka Дата: Суббота, 24.11.2012, 00:33 | Сообщение # 1
Новичок
Сообщений: 6
Статус: Offline
Code
0000: NOP
thread "BIBORAN" //Указываем имя потока
03BC: 0@ = create_sphere_at 458.27 -1496.68 31.07 radius 1.2 //Создает красный маркер в заданной точке
wait 0
03BC: 0@ = create_sphere_at -1698.79 952.27 24.89 radius 1.2 // Опять же создает маркер

:BIBORAN_67// Начинаем поток
wait 0 //Ждем 0 сек
if and //если
0AB0: key_pressed 17 //Нажата клавиша Ctrl
0AB0: key_pressed 73 //И клавиша i
else_jump @BIBORAN_1842 //Если не нажаты прыгаем на поток 1842
0AF9: samp say_msg "/CLIST" //Вводим в чат команду /Clist
Actor.LockInCurrentPosition($PLAYER_ACTOR) = True // Замораживаем
Actor.PutAt($PLAYER_ACTOR, 244.56, 1809.67, -40.0)//Начинаем тп с интервалом 1500 (с 1500 раза 4 что-бы подгрузился мир) потом можно 600
wait 1500
Actor.PutAt($PLAYER_ACTOR, 247.45, 1759.76, -40.0)
wait 1500
Actor.PutAt($PLAYER_ACTOR, 250.34, 1709.84, -40.0)
wait 1500
Actor.PutAt($PLAYER_ACTOR, 253.24, 1659.92, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 256.13, 1610.01, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 259.02, 1560.09, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 261.91, 1510.18, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 264.81, 1460.26, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 267.7, 1410.34, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 270.59, 1360.43, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 273.48, 1310.51, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 276.38, 1260.59, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 279.27, 1210.68, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 282.16, 1160.76, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 285.05, 1110.85, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 287.94, 1060.93, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 290.84, 1011.01, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 293.73, 961.1, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 296.62, 911.18, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 299.51, 861.26, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 302.41, 811.35, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 305.3, 761.43, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 308.19, 711.52, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 311.08, 661.6, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 313.98, 611.68, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 316.87, 561.77, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 319.76, 511.85, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 322.65, 461.93, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 325.55, 412.02, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 328.44, 362.1, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 331.33, 312.18, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 334.22, 262.27, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 337.12, 212.35, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 340.01, 162.44, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 342.9, 112.52, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 345.79, 62.6, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 348.68, 12.69, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 351.58, -37.23, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 354.47, -87.15, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 357.36, -137.06, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 360.25, -186.98, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 363.15, -236.89, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 366.04, -286.81, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 368.93, -336.73, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 371.82, -386.64, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 374.72, -436.56, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 374.72, -436.56, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 377.61, -486.48, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 380.5, -536.39, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 383.39, -586.31, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 386.29, -636.22, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 389.18, -686.14, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 392.07, -736.06, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 394.96, -785.97, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 397.85, -835.89, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 400.75, -885.81, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 403.64, -935.72, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 406.53, -985.64, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 409.42, -1035.55, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 412.32, -1085.47, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 415.21, -1135.39, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 418.1, -1185.3, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 420.99, -1235.22, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 423.89, -1285.14, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 426.78, -1335.05, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 429.67, -1384.97, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 432.56, -1434.88, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 435.46, -1484.8, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, 461.09, -1502.38, 31.05)
Actor.LockInCurrentPosition($PLAYER_ACTOR) = False //Разморозка
jump @BIBORAN_67 //Прыжок на поток 67

:BIBORAN_1842//Начинаем поток
wait 0 //Ждать 0 сек
if and //Если
0AB0: key_pressed 17 //Нажата клавиша CTRL
0AB0: key_pressed 80 //и Р
else_jump @BIBORAN_2217 //Если не нажаты прыгаем на поток 2217
0AF9: samp say_msg "/CLIST" //Снова команда
Actor.LockInCurrentPosition($PLAYER_ACTOR) = True //Заморозка игрока
Actor.PutAt($PLAYER_ACTOR, -1398.13, 533.13, -40.0)//И пошло ТП
wait 600
Actor.PutAt($PLAYER_ACTOR, -1426.76, 574.12, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, -1455.39, 615.11, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, -1484.02, 656.1, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, -1512.65, 697.09, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, -1541.28, 738.09, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, -1569.91, 779.08, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, -1598.54, 820.07, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, -1627.17, 861.06, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, -1655.79, 902.06, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, -1684.42, 943.05, -40.0)
wait 600
Actor.PutAt($PLAYER_ACTOR, -1696.5, 960.34, 56.06)
wait 400
Actor.PutAt($PLAYER_ACTOR, -1693.92, 947.95, 24.89)
Actor.LockInCurrentPosition($PLAYER_ACTOR) = False//Разморозка
jump @BIBORAN_67 //Скачем на поток 67

:BIBORAN_2217//Новый поток
wait 0 //Ждем 0 сек
if //если
00EC: actor $PLAYER_ACTOR 0 near_point 458.27 -1496.68 radius 1.2 1.2 //Игрок находиться в заданной точке (на нашем маркере)
else_jump @BIBORAN_2900 //Если не находиться то скачем на 2900
Actor.LockInCurrentPosition($PLAYER_ACTOR) = True//Заморозка
Actor.PutAt($PLAYER_ACTOR, 493.01, -1445.32, -79.1)//Телепорт
wait 1000
Actor.PutAt($PLAYER_ACTOR, 539.79, -1427.37, -79.1)
wait 1000
Actor.PutAt($PLAYER_ACTOR, 586.56, -1409.43, -79.1)
wait 1000
Actor.PutAt($PLAYER_ACTOR, 633.34, -1391.48, -79.1)
wait 1000
Actor.PutAt($PLAYER_ACTOR, 680.11, -1373.53, -79.1)
wait 1000
Actor.PutAt($PLAYER_ACTOR, 726.89, -1355.58, -79.1)
wait 1000
Actor.PutAt($PLAYER_ACTOR, 773.66, -1337.64, -79.1)
wait 1000
Actor.PutAt($PLAYER_ACTOR, 820.44, -1319.69, -79.1)
wait 1000
Actor.PutAt($PLAYER_ACTOR, 867.21, -1301.74, -79.1)
wait 1000
Actor.PutAt($PLAYER_ACTOR, 913.99, -1283.79, -79.1)
wait 1000
Actor.PutAt($PLAYER_ACTOR, 960.76, -1265.85, -79.1)
wait 1000
Actor.PutAt($PLAYER_ACTOR, 1007.54, -1247.9, -79.1)
wait 1000
Actor.PutAt($PLAYER_ACTOR, 1054.31, -1229.95, -79.1)
wait 1000
Actor.PutAt($PLAYER_ACTOR, 1101.09, -1212.0, -79.1)
wait 1000
Actor.PutAt($PLAYER_ACTOR, 1147.86, -1194.06, -79.1)
wait 1000
Actor.PutAt($PLAYER_ACTOR, 1194.64, -1176.11, -79.1)
wait 1000
Actor.PutAt($PLAYER_ACTOR, 1241.41, -1158.16, -79.1)
wait 1000
Actor.PutAt($PLAYER_ACTOR, 1288.19, -1140.21, -79.1)
wait 1000
Actor.PutAt($PLAYER_ACTOR, 1334.96, -1122.27, -79.1)
wait 1000
Actor.PutAt($PLAYER_ACTOR, 1381.74, -1104.32, -79.1)
wait 1000
Actor.PutAt($PLAYER_ACTOR, 1428.51, -1086.37, -79.1)
wait 1000
Actor.PutAt($PLAYER_ACTOR, 1475.29, -1068.42, -79.1)
wait 1000
Actor.PutAt($PLAYER_ACTOR, 1522.06, -1050.48, -79.1)
wait 1000
Actor.PutAt($PLAYER_ACTOR, 1585.82, -1026.01, 23.91)
wait 300
Actor.PutAt($PLAYER_ACTOR, 1639.92, -998.45, 24.07)
Actor.LockInCurrentPosition($PLAYER_ACTOR) = False//Разморозка
jump @BIBORAN_67 //Скачем на 67

:BIBORAN_2900//Новый поток, тут у нас Coordmaster, по нему уже есть отдельный разбор
wait 0
if
00EC: actor $PLAYER_ACTOR 0 near_point -1698.79 952.27 radius 1.2 1.2
else_jump @BIBORAN_3274

:BIBORAN_2942
Actor.StorePos($PLAYER_ACTOR, 0@, 1@, 2@)
3@ = 1640.16
4@ = -998.26
12@ = 24.07
0509: 11@ = distance_between_XY 3@ 4@ and_XY 0@ 1@
if
not 11@ >= 80.0
else_jump @BIBORAN_3045
Actor.PutAt($PLAYER_ACTOR, 3@, 4@, 12@)
jump @BIBORAN_3195

:BIBORAN_3045
0063: 3@ -= 0@ // (float)
0063: 4@ -= 1@ // (float)
0604: get_Z_angle_for_point 3@ 4@ store_to 6@
Actor.Angle($PLAYER_ACTOR) = 6@
Actor.LockInCurrentPosition($PLAYER_ACTOR) = True
if
Actor.Driving($PLAYER_ACTOR)
else_jump @BIBORAN_3126
03C0: 30@ = actor $PLAYER_ACTOR car
Car.Angle(30@) = 6@
Car.LockInCurrentPosition(30@) = True

:BIBORAN_3126
04C4: store_coords_to 8@ 9@ 10@ from_actor $PLAYER_ACTOR with_offset 0.0 50.0 1000.0
10@ = -80.0
Actor.PutAt($PLAYER_ACTOR, 8@, 9@, 10@)
wait 1000
0AB0: key_pressed 53
else_jump @BIBORAN_2942

:BIBORAN_3195
wait 200
Actor.StorePos($PLAYER_ACTOR, 0@, 1@, 2@)
02CE: 13@ = ground_z_at 0@ 1@ 24.07
Actor.PutAt($PLAYER_ACTOR, 0@, 1@, 13@)
Actor.LockInCurrentPosition($PLAYER_ACTOR) = False
if
056E: car 30@ defined
else_jump @BIBORAN_3274
Car.LockInCurrentPosition(30@) = False

:BIBORAN_3274
jump @BIBORAN_67


Сообщение отредактировал Coba_ka - Суббота, 24.11.2012, 00:33
[CM]Рафаэль Дата: Воскресенье, 25.11.2012, 15:31 | Сообщение # 2
Cheat-Master
Сообщений: 3080
Статус: Offline



Мой Shop
Официальный гарант

Контактные данные:
VK: vk.com/ali_benua
Skype: lvinyipen
Telegram: @AliBenua
ICQ: 552-090-283
Kulibiaka Дата: Воскресенье, 25.11.2012, 18:16 | Сообщение # 3
I love DotA
Статус: Offline


Продам группу в ВК 140k подписок!


[+] Skype: x.spacecrow.x
[+] ВКонтакте: id131508988
Хмель Дата: Воскресенье, 25.11.2012, 18:17 | Сообщение # 4
Боец
Сообщений: 282
Статус: Offline
Описание, не не слышал?
RAKSHA1337 Дата: Воскресенье, 25.11.2012, 21:42 | Сообщение # 5
Советник
Сообщений: 784
Статус: Offline
Quote (xemyjib94)
Описание, не не слышал?

Интерестно, какое описание ты хотел видеть?
Как у Cool_Story_Bro=)?
Дак вот тут всё описание находится в самом коде, после двух слешей.


В казино рандом. Но рандом в программах - это генератор псевдослучайных чисел, который написан ручками человека. А значит есть формула! Есть алгоритм! Есть тактика!
Кто не согласен - ставьте минус, после того как докажете обратное. https://habrahabr.ru/post/196442/
Scheitan Дата: Понедельник, 26.11.2012, 00:33 | Сообщение # 6
Новичок
Сообщений: 18
Статус: Offline
Тут и без описания все ясно, тут любой нуб поймет что к чему.
NRG-500 Дата: Понедельник, 26.11.2012, 14:08 | Сообщение # 7
Боец
Сообщений: 96
Статус: Offline
Scheitan, Поверь нубы найдутся в любой теме xDD
CM_TiRaN Дата: Понедельник, 26.11.2012, 14:13 | Сообщение # 8
Авторитет
Сообщений: 1087
Статус: Offline
NRG-500, обычное ТП по координате, что тут разбирать.
Ты разобрал бы нормальной Coord Master, то тогда мб кому нибудь и пригодилось бы.


NRG-500 Дата: Понедельник, 26.11.2012, 15:06 | Сообщение # 9
Боец
Сообщений: 96
Статус: Offline
CM_TiRaN, Я Coord Master разберал не знаешь не говори да ! Когда я говорил про нубов я не имел ввиду себя
RAKSHA1337 Дата: Понедельник, 26.11.2012, 17:27 | Сообщение # 10
Советник
Сообщений: 784
Статус: Offline
NRG-500, biggrin Да, ты не нуб, но читать правильно досих пор не научился.
Если правильно прочитать
Quote (CM_TiRaN)
Ты разобрал бы нормальной Coord Master, то тогда мб кому нибудь и пригодилось бы.
, то это он написал автору данной темы.


В казино рандом. Но рандом в программах - это генератор псевдослучайных чисел, который написан ручками человека. А значит есть формула! Есть алгоритм! Есть тактика!
Кто не согласен - ставьте минус, после того как докажете обратное. https://habrahabr.ru/post/196442/
Scheitan Дата: Понедельник, 26.11.2012, 17:57 | Сообщение # 11
Новичок
Сообщений: 18
Статус: Offline
Coordmaster уже разобрал давно Melomancool
[CM]Kirill57rus Дата: Суббота, 01.12.2012, 16:22 | Сообщение # 12
Боец
Сообщений: 279
Статус: Offline
Кто бы научил меня делать скрипты) Ато я нуб непойму ниодного урока. А по теме, мне кажется он просто открыл скрипт и сюда его кинул.
Scheitan Дата: Суббота, 01.12.2012, 20:27 | Сообщение # 13
Новичок
Сообщений: 18
Статус: Offline
Справа после // описание функции
  • Страница 1 из 1
  • 1
Поиск:
Статистика Форума