You are not logged in.
Скрипт камеры от первого лица:
// This file was decompiled using sascm.ini published by Seemann (http://sannybuilder.com/files/SASCM.rar) on 13.10.2007
{$VERSION 3.1.0027}
{$CLEO .cs}
//-------------MAIN---------------
thread 'CAM'
1@ = 0
2@ = 0
0000: NOP
3@ = 0.0
4@ = 0.0
5@ = 0.0
:CAM_57
wait 0
6@ = 0.0
7@ = -0.1
8@ = 0.69
if
Actor.Driving($PLAYER_ACTOR)
else_jump @CAM_398
if
1@ == 1
else_jump @CAM_132
jump @CAM_268
:CAM_132
if and
0AB0: key_pressed 67
0AB0: key_pressed 17
Actor.Driving($PLAYER_ACTOR)
else_jump @CAM_57
jump @CAM_163
:CAM_163
1@ = 1
0059: 6@ += 3@ // (float)
0059: 7@ += 4@ // (float)
0059: 8@ += 5@ // (float)
067C: put_camera_on_actor $PLAYER_ACTOR with_offset 6@ 7@ 8@ rotation 0.0 90.0 0.0 0.0 2
2@ = 0
if
0AB0: key_pressed 17
0AB0: key_pressed 88
else_jump @CAM_57
wait 500
jump @CAM_57
:CAM_268
if and
80E1: not player 0 pressed_key 5
80E1: not player 0 pressed_key 7
else_jump @CAM_323
if
2@ == 1
else_jump @CAM_438
2@ = 0
jump @CAM_163
:CAM_323
if
84C8: not actor $PLAYER_ACTOR driving_flying_vehicle
else_jump @CAM_57
Camera.Restore
09AD: set_vehicle_camera_mode 0
2@ = 1
jump @CAM_57
:CAM_359
if
0AB0: key_pressed 17
0AB0: key_pressed 88
else_jump @CAM_57
Camera.Restore_WithJumpCut
09AD: set_vehicle_camera_mode 2
1@ = 0
jump @CAM_57
:CAM_398
if
1@ == 1
else_jump @CAM_57
Camera.Restore
09AD: set_vehicle_camera_mode 2
Camera.SetBehindPlayer
1@ = 0
jump @CAM_57
:CAM_438
wait 0
jump @CAM_449
:CAM_449
if and
0AB0: key_pressed 17
0AB0: key_pressed 103
Actor.Driving($PLAYER_ACTOR)
else_jump @CAM_490
5@ += 0.1
jump @CAM_163
:CAM_490
if and
0AB0: key_pressed 17
0AB0: key_pressed 105
Actor.Driving($PLAYER_ACTOR)
else_jump @CAM_531
5@ -= 0.1
jump @CAM_163
:CAM_531
if and
0AB0: key_pressed 17
0AB0: key_pressed 104
Actor.Driving($PLAYER_ACTOR)
else_jump @CAM_572
4@ += 0.1
jump @CAM_163
:CAM_572
if and
0AB0: key_pressed 17
0AB0: key_pressed 98
Actor.Driving($PLAYER_ACTOR)
else_jump @CAM_613
4@ -= 0.1
jump @CAM_163
:CAM_613
if and
0AB0: key_pressed 17
0AB0: key_pressed 100
Actor.Driving($PLAYER_ACTOR)
else_jump @CAM_654
3@ -= 0.1
jump @CAM_163
:CAM_654
if and
0AB0: key_pressed 17
0AB0: key_pressed 102
Actor.Driving($PLAYER_ACTOR)
else_jump @CAM_695
3@ += 0.1
jump @CAM_163
:CAM_695
if and
0AB0: key_pressed 17
0AB0: key_pressed 101
Actor.Driving($PLAYER_ACTOR)
else_jump @CAM_359
03C0: 9@ = actor $PLAYER_ACTOR car
0730: car 9@ damage_component 4 // versionA
0730: car 9@ damage_component 4 // versionA
0730: car 9@ damage_component 4 // versionA
0730: car 9@ damage_component 4 // versionA
0730: car 9@ damage_component 4 // versionA
0730: car 9@ damage_component 4 // versionA
0730: car 9@ damage_component 4 // versionA
0730: car 9@ damage_component 4 // versionA
0730: car 9@ damage_component 4 // versionA
0730: car 9@ damage_component 4 // versionA
jump @CAM_163
end_threadЯ хочу сделать так, чтобы в машине можно было крутить башкой, тоесть вращать эту камеру. Нашел в справке опкод:
0936: set_camera 0.0 90.0 0.0 position_to 0.0 2 0.0 time 90.0 drop_mode 0.0
Но ведь он только кидает камеру в заданные координаты, а как к игроку прицепить камеру, которую можно вращать?
не надо материться
Блин есть чит чтобы народ нападал на игрока. Кстати как дать всем педам миниганы при нажатии на 4?
Пожалуста напиши готовый скрипт, извиняюсь за наглость, ну ниче не выходит у меня!
Дак я подумал, но из игры вылетать стало. Че трудно подсказать что-ли?
Я где-то видел один скрипт с таким описанием: Можно делать фотографии, будто из камеры, но не имея при себе фотоаппарата. Я сначала на него махнул рукой, а вот теперь найти не могу. Народ кто знает напишите его плиз!
Напишите скрипт, когда жмем 1, то у всех педов в руках миниганы
Добавил, но игра стала вылетать. Скажи в какое место именно это нужно вставить?
Сделайте так, чтобы военных было намного больше, ходили они и внутри. И еще - как сделать, чтобы когда они увидели меня, то сразу мочили?
Где можно прочитать список скинов у педов? Ну скин копа я уже знаю: #LAPD1
Народ я уже спрашивал насчет трупов, ну когда убиваешь, он так и будет валяться долго. Труп остается актером, и если сех на улице перебить, то народу больше не станет, так мне объяснил Seemann. А что если использовать этот скрипт в SAMP? Ведь там нет педов, и когда игрока убьешь, бот будет валяться долго. Ну вот поэтому прошу вас, уважаемых профессионалов, написать такой скрипт, чтобы когда убиваешь, труп не исчезал, а валялся минут 8, за исключением если подъедут медики и не вылечат.
-Dimon-, сделай чтобы когда жмем левую кнопку мыши, скорость полета постепенно увеличивалась, а когда жмем правую - уменьшалась. Резкий тормоз на правый Ctrl.
Спасибо, а что насчет этого?
Хочу чуть изменить видок, чтоб летал он как Нео из матрицы, но я уже сам попробую, вот только не нашел я в помощи SB других анимаций парашюта, напишите или скажите, где я их могу найти.
Блин еще вопрос: Как сделать, чтобы когда нажмем левую кнопку мыши - он ускоряется, а когда правую - замедляется? Я пытался, но не вышло.
И еще: вот когда он до земли дотрагивается - он не хочет лететь. Как это исправить?
[img align=с]http://s39.radikal.ru/i086/0808/ea/c66d46573a19.jpg[/img]
Вот это да!!! ПРикольнуло нитро из задницы XD. Подскажите как его убрать.
Хочу чуть изменить видок, чтоб летал он как Нео из матрицы, но я уже сам попробую, вот только не нашел я в помощи SB других анимаций парашюта, напишите или скажите, где я их могу найти.
Блин еще вопрос: Как сделать, чтобы когда нажмем левую кнопку мыши - он ускоряется, а когда правую - замедляется? Я пытался, но не вышло.
СПАСИБО!
Блин помогите, прошу!
ыы. А че дальше я и не знаю
Учусь потихой)
Вот так?
0AB6: store_target_marker_coords_to 0@ 1@ 2@
Наверно все-таки так:
0AB6: Car.DriveTo 0@ 1@ 2@
Я говорю про красный такой маркер, его ставят на карту как пометку. Я думаю ты говоришь о другом.
Как сделать полный скрипт? Ведь он не может состоять только из 2х строк! Дело в том, что я не знаю, что писать ниже и выше. Ну в начале будет:
// This file was decompiled using sascm.ini published by Seemann (http://sannybuilder.com/files/SASCM.rar) on 13.10.2007
{$VERSION 3.1.0027}
{$CLEO .cs}
//-------------MAIN---------------
0000: NOPИзвиняюсь за то что я такой тупой)
Вместо X,Y,Z поставь координаты
кАКИЕ координаты? Я хочу чтоб к маркеру ехало, или чет я не догоняю =/
Вот по идее так:
Car.DriveTo(0@, 1@, 2@) Car.SetDriverBehaviour(0@,FollowRoad)
Но я таких строчек не нашел в автопилоте.
Проблема решена.
У меня просьба, простите за наглость: Ставим маркер на карте, и тачка едет к этому маркеру! Вот скрипт автопилота есть, может он пригодится, ну чтобы не писать с нуля:
{$VERSION 3.1.0027}
{$CLEO .cs}
//-------------MAIN---------------
0000: NOP
:NONAME_2
wait 0
if
Player.Defined($PLAYER_CHAR)
jf @NONAME_2
if and
Actor.Driving($PLAYER_ACTOR)
84A7: not actor $PLAYER_ACTOR driving_boat
84C8: not actor $PLAYER_ACTOR driving_flying_vehicle
89AE: not actor $PLAYER_ACTOR driving_train
not Actor.DrivingVehicleType($PLAYER_ACTOR, #BMX)
not Actor.DrivingVehicleType($PLAYER_ACTOR, #BIKE)
jf @NONAME_2
if
not Actor.DrivingVehicleType($PLAYER_ACTOR, #MTBIKE)
jf @NONAME_2
0@ = 304482
&0(0@,1i) == 16711680
jf @NONAME_2
03C0: $STRAT = actor $PLAYER_ACTOR car
0423: set_car $STRAT improved_handling_to 2.5 // (float)
$X_POS2 = 0.0
$Y_POS2 = 0.0
$Z_POS2 = 0.0
$OFFSET = 0.0
Car.SetDriverBehaviour($STRAT, FollowRoad)
Car.SetMaxSpeed($STRAT, 50.0)
00AE: set_car $STRAT traffic_behaviour_to 2
:NONAME_201
wait 0
if
Player.Defined($PLAYER_CHAR)
jf @NONAME_1341
if
Actor.InCar($PLAYER_ACTOR, $STRAT)
jf @NONAME_1341
0@ = 304482
not &0(0@,1i) == 255
jf @NONAME_1301
if
00E1: player 0 pressed_key 15
jf @NONAME_301
0622: AS_actor $PLAYER_ACTOR bail_car $STRAT
jump @NONAME_1341
:NONAME_301
0@ = 304534
not &0(0@,1i) == 16711680
jf @NONAME_895
0@ = 304545
not &0(0@,1i) == 16711680
jf @NONAME_489
0@ = 304543
not &0(0@,1i) == 16711680
jf @NONAME_692
0@ = 304536
not &0(0@,1i) == 255
jf @NONAME_1098
if
0100: actor $PLAYER_ACTOR in_sphere $X_POS2 $Y_POS2 $Z_POS2 radius 5.0 5.0 5.0 sphere 0 in_car
jf @NONAME_482
0687: clear_actor $PLAYER_ACTOR task
Car.SetDriverBehaviour($STRAT, FollowRoad)
Marker.Disable($CHEKP)
:NONAME_482
jump @NONAME_201
:NONAME_489
Car.StorePos($STRAT, $X_POS, $Y_POS, $Z_POS)
02C1: store_to $X_POS $Y_POS $Z_POS car_path_coords_closest_to $X_POS $Y_POS $Z_POS
$OFFSET += 35.0
0407: store_coords_to $X_POS2 $Y_POS2 $Z_POS2 from_car $STRAT with_offset 0.0 $OFFSET 0.0
02C1: store_to $X_POS2 $Y_POS2 $Z_POS2 car_path_coords_closest_to $X_POS2 $Y_POS2 $Z_POS2
if and
0044: $X_POS2 == $X_POS // (float)
0044: $Y_POS2 == $Y_POS // (float)
0044: $Z_POS2 == $Z_POS // (float)
jf @NONAME_622
jump @NONAME_201
:NONAME_622
Marker.Disable($CHEKP)
018A: $CHEKP = create_checkpoint_at $X_POS2 $Y_POS2 $Z_POS2
Marker.SetIconSize($CHEKP, 3)
05D1: AS_actor $PLAYER_ACTOR drive_car -1 to $X_POS2 $Y_POS2 $Z_POS2 speed 50.0 3 model #NULL 2
$OFFSET = 0.0
jump @NONAME_201
:NONAME_692
Car.StorePos($STRAT, $X_POS, $Y_POS, $Z_POS)
02C1: store_to $X_POS $Y_POS $Z_POS car_path_coords_closest_to $X_POS $Y_POS $Z_POS
$OFFSET -= 25.0
0407: store_coords_to $X_POS2 $Y_POS2 $Z_POS2 from_car $STRAT with_offset 0.0 $OFFSET 0.0
02C1: store_to $X_POS2 $Y_POS2 $Z_POS2 car_path_coords_closest_to $X_POS2 $Y_POS2 $Z_POS2
if and
0044: $X_POS2 == $X_POS // (float)
0044: $Y_POS2 == $Y_POS // (float)
0044: $Z_POS2 == $Z_POS // (float)
jf @NONAME_825
jump @NONAME_201
:NONAME_825
Marker.Disable($CHEKP)
018A: $CHEKP = create_checkpoint_at $X_POS2 $Y_POS2 $Z_POS2
Marker.SetIconSize($CHEKP, 3)
05D1: AS_actor $PLAYER_ACTOR drive_car -1 to $X_POS2 $Y_POS2 $Z_POS2 speed 50.0 3 model #NULL 2
$OFFSET = 0.0
jump @NONAME_201
:NONAME_895
Car.StorePos($STRAT, $X_POS, $Y_POS, $Z_POS)
02C1: store_to $X_POS $Y_POS $Z_POS car_path_coords_closest_to $X_POS $Y_POS $Z_POS
$OFFSET -= 25.0
0407: store_coords_to $X_POS2 $Y_POS2 $Z_POS2 from_car $STRAT with_offset $OFFSET 10.0 0.0
02C1: store_to $X_POS2 $Y_POS2 $Z_POS2 car_path_coords_closest_to $X_POS2 $Y_POS2 $Z_POS2
if and
0044: $X_POS2 == $X_POS // (float)
0044: $Y_POS2 == $Y_POS // (float)
0044: $Z_POS2 == $Z_POS // (float)
jf @NONAME_1028
jump @NONAME_201
:NONAME_1028
Marker.Disable($CHEKP)
018A: $CHEKP = create_checkpoint_at $X_POS2 $Y_POS2 $Z_POS2
Marker.SetIconSize($CHEKP, 3)
05D1: AS_actor $PLAYER_ACTOR drive_car -1 to $X_POS2 $Y_POS2 $Z_POS2 speed 50.0 3 model #NULL 2
$OFFSET = 0.0
jump @NONAME_201
:NONAME_1098
Car.StorePos($STRAT, $X_POS, $Y_POS, $Z_POS)
02C1: store_to $X_POS $Y_POS $Z_POS car_path_coords_closest_to $X_POS $Y_POS $Z_POS
$OFFSET += 25.0
0407: store_coords_to $X_POS2 $Y_POS2 $Z_POS2 from_car $STRAT with_offset $OFFSET 10.0 0.0
02C1: store_to $X_POS2 $Y_POS2 $Z_POS2 car_path_coords_closest_to $X_POS2 $Y_POS2 $Z_POS2
if and
0044: $X_POS2 == $X_POS // (float)
0044: $Y_POS2 == $Y_POS // (float)
0044: $Z_POS2 == $Z_POS // (float)
jf @NONAME_1231
jump @NONAME_201
:NONAME_1231
Marker.Disable($CHEKP)
018A: $CHEKP = create_checkpoint_at $X_POS2 $Y_POS2 $Z_POS2
Marker.SetIconSize($CHEKP, 3)
05D1: AS_actor $PLAYER_ACTOR drive_car -1 to $X_POS2 $Y_POS2 $Z_POS2 speed 50.0 3 model #NULL 2
$OFFSET = 0.0
jump @NONAME_201
:NONAME_1301
0687: clear_actor $PLAYER_ACTOR task
Car.SetDriverBehaviour($STRAT, Nowhere)
0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 0.0 0.0 0.0
036A: put_actor $PLAYER_ACTOR in_car $STRAT
:NONAME_1341
0423: set_car $STRAT improved_handling_to 1.0 // (float)
Car.RemoveReferences($STRAT)
Marker.Disable($CHEKP)
jump @NONAME_2
Нашел прикольный спидометр, но никак не врублю как сделать, чтобы он работал на любом транспорте? Я удалял строчки:
84C8: not actor $PLAYER_ACTOR driving_flying_vehicle 84A7: not actor $PLAYER_ACTOR driving_boat
Но всеравно нифига. Кому интересно, текстурку к нему выложу, а пока вот скрипт:
// This file was decompiled using sascm.ini published by Seemann (http://sannybuilder.com/files/SASCM.rar) on 13.10.2007
{$VERSION 3.1.0027}
{$CLEO .cs}
//-------------MAIN---------------
0000: NOP
0A95: enable_thread_saving
:NONAME_4
wait 0
if and
Actor.Driving($PLAYER_ACTOR)
$ACTIVE_INTERIOR == 0
84C8: not actor $PLAYER_ACTOR driving_flying_vehicle
84A7: not actor $PLAYER_ACTOR driving_boat
else_jump @NONAME_4
0811: 1@ = actor $PLAYER_ACTOR car // versionC
0390: load_txd_dictionary "SPEED"
038F: load_texture "STRELK" as 15 // Load dictionary with 0390 first
038F: load_texture "CIF" as 16 // Load dictionary with 0390 first
038F: load_texture "CIFN" as 17 // Load dictionary with 0390 first
038F: load_texture "STRELKN" as 18 // Load dictionary with 0390 first
038F: load_texture "GLASSC" as 19 // Load dictionary with 0390 first
wait 2500
jump @NONAME_126
:NONAME_126
wait 0
if and
Actor.Driving($PLAYER_ACTOR)
$ACTIVE_INTERIOR == 0
else_jump @NONAME_582
00BF: 12@ = current_time_hours, 13@ = current_time_minutes
if and
12@ >= 6
20 > 12@
else_jump @NONAME_354
02E3: 2@ = car 1@ speed
2@ *= 4.0
03F0: enable_text_draw 0
03E3: set_texture_to_be_drawn_antialiased 1
038D: draw_texture 16 position 550.0 360.0 size 191.25 170.0 RGBA 255 255 255 255
03E3: set_texture_to_be_drawn_antialiased 1
074B: draw_texture 15 position 550.0 360.0 scale 191.25 170.0 angle 2@ color_RGBA 255 255 255 255
if
03C9: car 1@ damaged
else_jump @NONAME_126
03E3: set_texture_to_be_drawn_antialiased 1
038D: draw_texture 19 position 550.0 360.0 size 191.25 170.0 RGBA 255 255 255 255
jump @NONAME_126
:NONAME_354
wait 0
if and
Actor.Driving($PLAYER_ACTOR)
$ACTIVE_INTERIOR == 0
else_jump @NONAME_582
00BF: 12@ = current_time_hours, 13@ = current_time_minutes
if or
12@ >= 20
6 > 12@
else_jump @NONAME_126
02E3: 2@ = car 1@ speed
2@ *= 4.0
03F0: enable_text_draw 1
03E3: set_texture_to_be_drawn_antialiased 1
038D: draw_texture 17 position 550.0 360.0 size 191.25 170.0 RGBA 255 255 255 255
03E3: set_texture_to_be_drawn_antialiased 1
074B: draw_texture 18 position 550.0 360.0 scale 191.25 170.0 angle 2@ color_RGBA 255 255 255 255
if
03C9: car 1@ damaged
else_jump @NONAME_354
03E3: set_texture_to_be_drawn_antialiased 1
038D: draw_texture 19 position 550.0 360.0 size 191.25 170.0 RGBA 255 255 255 255
jump @NONAME_354
:NONAME_582
wait 0
03F0: enable_text_draw 0
0391: release_txd_dictionary
jump @NONAME_4
Можете на моем скрипте переделать так, чтобы работало и когда чел не в тачке?
// This file was decompiled using sascm.ini published by Seemann (http://sannybuilder.com/files/SASCM.rar) on 13.10.2007
{$VERSION 3.1.0027}
{$CLEO .cs}
//-------------MAIN---------------
thread 'CAM'
1@ = 0
2@ = 0
0000: NOP
3@ = 0.0
4@ = 0.0
5@ = 0.0
:CAM_57
wait 0
6@ = 0.0
7@ = -0.1
8@ = 0.69
if
Actor.Driving($PLAYER_ACTOR)
else_jump @CAM_398
if
1@ == 1
else_jump @CAM_132
jump @CAM_268
:CAM_132
if and
0AB0: key_pressed 67
0AB0: key_pressed 17
Actor.Driving($PLAYER_ACTOR)
else_jump @CAM_57
jump @CAM_163
:CAM_163
1@ = 1
0059: 6@ += 3@ // (float)
0059: 7@ += 4@ // (float)
0059: 8@ += 5@ // (float)
067C: put_camera_on_actor $PLAYER_ACTOR with_offset 6@ 7@ 8@ rotation 0.0 90.0 0.0 0.0 2
2@ = 0
if
0AB0: key_pressed 17
0AB0: key_pressed 88
else_jump @CAM_57
wait 500
jump @CAM_57
:CAM_268
if and
80E1: not player 0 pressed_key 5
80E1: not player 0 pressed_key 7
else_jump @CAM_323
if
2@ == 1
else_jump @CAM_438
2@ = 0
jump @CAM_163
:CAM_323
if
84C8: not actor $PLAYER_ACTOR driving_flying_vehicle
else_jump @CAM_57
Camera.Restore
09AD: set_vehicle_camera_mode 0
2@ = 1
jump @CAM_57
:CAM_359
if
0AB0: key_pressed 17
0AB0: key_pressed 88
else_jump @CAM_57
Camera.Restore_WithJumpCut
09AD: set_vehicle_camera_mode 2
1@ = 0
jump @CAM_57
:CAM_398
if
1@ == 1
else_jump @CAM_57
Camera.Restore
09AD: set_vehicle_camera_mode 2
Camera.SetBehindPlayer
1@ = 0
jump @CAM_57
:CAM_438
wait 0
jump @CAM_449
:CAM_449
if and
0AB0: key_pressed 17
0AB0: key_pressed 103
Actor.Driving($PLAYER_ACTOR)
else_jump @CAM_490
5@ += 0.1
jump @CAM_163
:CAM_490
if and
0AB0: key_pressed 17
0AB0: key_pressed 105
Actor.Driving($PLAYER_ACTOR)
else_jump @CAM_531
5@ -= 0.1
jump @CAM_163
:CAM_531
if and
0AB0: key_pressed 17
0AB0: key_pressed 104
Actor.Driving($PLAYER_ACTOR)
else_jump @CAM_572
4@ += 0.1
jump @CAM_163
:CAM_572
if and
0AB0: key_pressed 17
0AB0: key_pressed 98
Actor.Driving($PLAYER_ACTOR)
else_jump @CAM_613
4@ -= 0.1
jump @CAM_163
:CAM_613
if and
0AB0: key_pressed 17
0AB0: key_pressed 100
Actor.Driving($PLAYER_ACTOR)
else_jump @CAM_654
3@ -= 0.1
jump @CAM_163
:CAM_654
if and
0AB0: key_pressed 17
0AB0: key_pressed 102
Actor.Driving($PLAYER_ACTOR)
else_jump @CAM_695
3@ += 0.1
jump @CAM_163
:CAM_695
if and
0AB0: key_pressed 17
0AB0: key_pressed 101
Actor.Driving($PLAYER_ACTOR)
else_jump @CAM_359
03C0: 9@ = actor $PLAYER_ACTOR car
0730: car 9@ damage_component 4 // versionA
0730: car 9@ damage_component 4 // versionA
0730: car 9@ damage_component 4 // versionA
0730: car 9@ damage_component 4 // versionA
0730: car 9@ damage_component 4 // versionA
0730: car 9@ damage_component 4 // versionA
0730: car 9@ damage_component 4 // versionA
0730: car 9@ damage_component 4 // versionA
0730: car 9@ damage_component 4 // versionA
0730: car 9@ damage_component 4 // versionA
jump @CAM_163
end_thread
Хорошо, напиши скрипт, который дает эмку Томми Версетти
Компилироовать 3 скрипта? Или какой из них?
А в программе же есть переключение между GTA.
Ну допустим клео не поставить, а куда же тогда сувать скомпилированные скрипты?