SannyBuilder.com Forums

PriMan

From: Moscow - city of happy

Registered: 02-05-2008

Posts: 32

Ускорение

Нащёл скрипт который прибавляет скорость когда сидишь в самолёте.
{$CLEO .cs}

$DRIVEBYMODE = 0
$PLAYER_ACTOR = Actor.EmulateFromPlayer($PLAYER_CHAR)

:NONAME_15
wait 0
if
   Player.Defined($PLAYER_CHAR)
else_jump @NONAME_15
if
04C8:   actor $PLAYER_ACTOR driving_flying_vehicle
else_jump @NONAME_15
03C0: 0@ = actor $PLAYER_ACTOR car
if
0AB0:   key_pressed 35
else_jump @NONAME_15
jump @NONAME_81

:NONAME_81
Car.SetSpeedInstantly(0@, 100.0)
wait 100
if
0AB0:   key_pressed 36
else_jump @NONAME_81
jump @NONAME_15

Вопрос заключаеться в том, как сделать ускорение на автомобилях?

3Doomer

From: КаZан

Registered: 14-05-2008

Posts: 659

Website

Re: Ускорение

Ускоряет любой транспорт

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26

{$CLEO .cs}   $DRIVEBYMODE = 0 $PLAYER_ACTOR = Actor.EmulateFromPlayer($PLAYER_CHAR)   :NONAME_15 wait 0 if    Player.Defined($PLAYER_CHAR) else_jump @NONAME_15 if 00DF:   actor $PLAYER_ACTOR driving else_jump @NONAME_15 03C0: 0@ = actor $PLAYER_ACTOR car if 0AB0:   key_pressed 35 else_jump @NONAME_15 jump @NONAME_81   :NONAME_81 Car.SetSpeedInstantly(0@, 100.0) wait 100 if 0AB0:   key_pressed 36 else_jump @NONAME_81 jump @NONAME_15

---

GIMS developer

Noob

Registered: 28-06-2008

Posts: 44

Re: Ускорение

Это не ускорение, это тачка летит как сумашедшая

flashTrash

From: Н.Новгород

Registered: 21-02-2007

Posts: 260

Website

Re: Ускорение

Noob
Поставь скорость поменьше.

1	Car.SetSpeedInstantly(0@, 20.0)

Noob

Registered: 28-06-2008

Posts: 44

Re: Ускорение

Самый лучший вариант, ускорение на букву Я:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27

// 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   :FLYINGBIKES wait 40 if Player.Defined($PLAYER_CHAR) jf @FLYINGBIKES if Actor.Driving($PLAYER_ACTOR) jf @FLYINGBIKES if and 0AB0:   key_pressed 90 jf @FLYINGBIKES 03C0: $mycar = actor $PLAYER_ACTOR car 02E3: $myspeed = car $mycar speed $myspeed *= 1.3 $myspeed += 1.0 Car.SetSpeedInstantly($mycar, $myspeed) Car.RemoveReferences($mycar) wait 40 jump @FLYINGBIKES

Centrino Duo

Registered: 08-05-2008

Posts: 99

Re: Ускорение

Какой затягивающий скрипт та все норм работает,тока тот который от думера ваше ппц..ну скорость поменьше поставил усе гуд

flashTrash

From: Н.Новгород

Registered: 21-02-2007

Posts: 260

Website

Re: Ускорение

Глобальные переменные использовать ненужно.

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23

{$CLEO .cs}   0000:   while true wait 50 if   Player.Defined($PLAYER_CHAR) then     if and     Actor.Driving($PLAYER_ACTOR)     0AB0:   key_pressed 90     then         03C0: 0@ = actor $PLAYER_ACTOR car         02E3: 1@ = car 0@ speed         1@ *= 1.3         1@ += 1.0         Car.SetSpeedInstantly(0@, 1@)         Car.RemoveReferences(0@)         wait 50     end end end

Чтобы не путаться с переменными можно использовать константы

1 2 3

const  Player_Car = 0@ end

Player_Car при компиляции будет заменяться на 0@

Last edited by flashTrash (17-07-2008 17:46)