Biboran
Дата: Четверг, 18.10.2012, 18:43 | Сообщение # 1
Боец
Сообщений: 100
Статус: Offline
Вообщем начал баловаться с CLeo, и за вечер сделал вот такую штуку: Как только продали форму, не успели появиться нажимает ctrl+i, и мы начинаем телепортироваться в магазин одежды по маленьким расстояниям (телепорт на сам пикап, то есть вы появитесь в магазине) Это первый мой скрипт, в нем многое не удалось, но работа продолжается, есть много планов... Новое видео: Активация: LVA (ctrl+i) SFA (ctrl+p) Ссылка на скрипт:http://rghost.ru/41269746 Обновление 19.10.12 -При активации выскакивает окно смены клиста. -Возле магазина в ЛС добавлен маркер, когда на него становишься телепортирует к междугородным автобусам за столб (основное место продажи) -Все впихнул в 1 cleo файл Обновление 20.10.12 -Полностью переписано тп по маркеру. -Вас ТП на пикап одежды, дает 3 секунды что-бы купить скин, тп в женскую кабину, потом тп на пикап выхода. Обновление 01.11.12 -При тп сразу на пикап больше не кикает. -Сделан маркер в СФ (тп к автобусам)сделано на кордмастере . Отдельное спасибо danya777_kirov, за то что научил совмещать скрипты) Исходник:
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_38 wait 0 if and 0AB0: key_pressed 17 0AB0: key_pressed 73 else_jump @BIBORAN_1913 0AF9: samp say_msg "/CLIST" Actor.LockInCurrentPosition($PLAYER_ACTOR) = True Actor.PutAt($PLAYER_ACTOR, 244.56, 1809.67, -40.0) wait 600 Actor.PutAt($PLAYER_ACTOR, 247.45, 1759.76, -40.0) wait 600 Actor.PutAt($PLAYER_ACTOR, 250.34, 1709.84, -40.0) wait 600 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, 438.52, -1537.67, 29.61) wait 2000 Actor.PutAt($PLAYER_ACTOR, 461.57, -1500.73, 31.05) wait 400 Actor.PutAt($PLAYER_ACTOR, 206.15, -3.8, 1001.21) wait 3000 Actor.PutAt($PLAYER_ACTOR, 205.91, -12.45, 1001.22) wait 3000 Actor.PutAt($PLAYER_ACTOR, 227.08, -8.12, 1002.217) Actor.LockInCurrentPosition($PLAYER_ACTOR) = False jump @BIBORAN_38 :BIBORAN_1913 wait 0 if and 0AB0: key_pressed 17 0AB0: key_pressed 80 else_jump @BIBORAN_2363 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 2000 Actor.PutAt($PLAYER_ACTOR, -1694.56, 951.78, 24.89) wait 400 Actor.PutAt($PLAYER_ACTOR, 206.15, -3.8, 1001.21) wait 3000 Actor.PutAt($PLAYER_ACTOR, 205.91, -12.45, 1001.22) wait 3000 Actor.PutAt($PLAYER_ACTOR, 227.08, -8.12, 1002.217) Actor.LockInCurrentPosition($PLAYER_ACTOR) = False jump @BIBORAN_38 :BIBORAN_2363 wait 0 if 00EC: actor $PLAYER_ACTOR 0 near_point 458.27 -1496.68 radius 1.2 1.2 else_jump @COORDMASTER_66 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_38 :COORDMASTER_66 wait 0 if 00EC: actor $PLAYER_ACTOR 0 near_point -1698.79 952.27 radius 1.2 1.2 else_jump @COORDMASTER_421 :COORDMASTER_89 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 @COORDMASTER_192 Actor.PutAt($PLAYER_ACTOR, 3@, 4@, 12@) jump @COORDMASTER_342 :COORDMASTER_192 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 @COORDMASTER_273 03C0: 30@ = actor $PLAYER_ACTOR car Car.Angle(30@) = 6@ Car.LockInCurrentPosition(30@) = True :COORDMASTER_273 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 @COORDMASTER_89 :COORDMASTER_342 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 @COORDMASTER_421 Car.LockInCurrentPosition(30@) = False :COORDMASTER_421 jump @BIBORAN_38
Школьника АК_47 нужно срочно повесить!
Сообщение отредактировал Biboran - Четверг, 01.11.2012, 02:16