SannyBuilder.com Forums

Да есть! Hot adrenalin effect. Есть мод такой, без глюков? Не знаете?

Скажите пожалуйста! Не знаете такую фразу специфичность RAGE форматов? Слышал что на gta 4
моды глобальные сделать не возможно, это так? И скриптинг там другой?

А не известно название анимации стрельбы?

Какой адрес памяти проверяет стреляет ли чел или нет? Не смог найти!

Как вычислить через память гангстеров? Я хочу 88% точность стрельбы сделать.

У меня вопрос: Я привык к меткам, а вы пишите в виде кода.А как научиться коды делать?
Что это за команды break, until false?

Загрузил, но глюк не исправился! Он убивает, атаковавшего, но повторно не реагирует и перестаёт идти.
Помогите!

//-------------MAIN---------------
0000: NOP
thread 'TEST'
wait 0
Model.Load(#BMYST)
Model.Load(#COLT45)
038B: load_requested_models

:TEST_28
wait 0
if
   Model.Available(#BMYST)
   Model.Available(#COLT45)
else_jump @TEST_28
if
00E1:   player 0 pressed_key 11
else_jump @TEST_28
wait 5000
04C4: store_coords_to $X1 $Y1 $Z1 from_actor $PLAYER_ACTOR with_offset 1.0 3.0 1.0
2@ = Actor.Create(CivMale, #BMYST, $X1, $Y1, $Z1)
01B2: give_actor 2@ weapon 22 ammo 744 // Load the weapon model before using this
Actor.WeaponAccuracy(2@) = 88
05DE: AS_actor 2@ walk_around_ped_path
jump @TEST_150

:TEST_150
wait 0
if
   Player.Defined($PLAYER_CHAR)
else_jump @TEST_150
0AB5: store_actor $PLAYER_ACTOR closest_vehicle_to 0@ closest_ped_to 1@
if
   not 1@ == -1
else_jump @TEST_150
jump @TEST_206

:TEST_206
wait 0
if
051A:   actor 2@ damaged_by_actor 1@
else_jump @TEST_206
05E2: AS_actor 2@ kill_actor 1@
jump @TEST_28

:TEST_254
wait 0
if
   Actor.Dead(2@)
else_jump @TEST_254
Model.Destroy(#BMYST)
Model.Destroy(#COLT45)
Actor.RemoveReferences(2@)
jump @TEST_28

Я сделал скрипт, тестирую.При нажатии на Y, должен появиться BMYST с оружием в руках.Он
идет как пешеход, я поставил опкод.Если его атаковал любой прохожий, то он должен его убить.
Так и происходит, но если он убивает, то стоит и больше не идёт.Так-же не реагирует на повреждения
повторно.Что неправильно?
//-------------MAIN---------------
0000: NOP
thread 'TEST'
wait 0
Model.Load(#BMYST)
038B: load_requested_models

:TEST_23
wait 0
if
   Model.Available(#BMYST)
else_jump @TEST_23
if
00E1:   player 0 pressed_key 11
else_jump @TEST_23
wait 5000
04C4: store_coords_to $X1 $Y1 $Z1 from_actor $PLAYER_ACTOR with_offset 1.0 3.0 1.0
2@ = Actor.Create(CivMale, #BMYST, $X1, $Y1, $Z1)
01B2: give_actor 2@ weapon 22 ammo 744 // Load the weapon model before using this
Actor.WeaponAccuracy(2@) = 88
05DE: AS_actor 2@ walk_around_ped_path
jump @TEST_140

:TEST_140
wait 0
if
   Player.Defined($PLAYER_CHAR)
else_jump @TEST_140
0AB5: store_actor $PLAYER_ACTOR closest_vehicle_to 0@ closest_ped_to 1@
if
   not 1@ == -1
else_jump @TEST_140
jump @TEST_196

:TEST_196
wait 0
if
051A:   actor 2@ damaged_by_actor 1@
else_jump @TEST_196
05E2: AS_actor 2@ kill_actor 1@
jump @TEST_23

:TEST_234
wait 0
if
   Actor.Dead(2@)
else_jump @TEST_234
Model.Destroy(#BMYST)
Actor.RemoveReferences(2@)
jump @TEST_23

А как чувака вычислить? Ещё есть глюк в скрипте, почему-то пассажир в инкассаторе при остановке
выходит.Как исправить?

Я просто скорее всего скопировал не правильно! Всё работает, но правда я иногда, когда приближаюсь к
инкассатору, то вижу всё как обычно и в друг появляются два wmysgrd.Вообще мне этот способ
кажется устаревшим.Есть опкоды надёжнее, новые, например 0A8C: write_memory 0@ size 4 value 0 virtual_protect 0. Видно, что через память вычисление.

Я всё делал как надо! Открыл SB выбрал Создать и поставил код:

{$CLEO}
wait 0
while true
    wait 0
    if
        not player.Defined($player_char)
    then
        continue
    end
    actor.StorePos($player_actor 1@ 2@ 3@)
    if
        0AE2: 0@ = random_vehicle_near_point 1@ 2@ 3@ in_radius 100.0 find_next 0 pass_wrecked 1 //IF and SET
    then
        repeat
            if
                0137:   car 0@ model == #SECURICA
            then
            0129: $WMYSGRD1 = create_actor_pedtype 4 model #WMYSGRD in_car 0@ driverseat
            01C8: $WMYSGRD2 = create_actor_pedtype 4 model #WMYSGRD in_car 0@ passenger_seat 0
            01B2: give_actor $WMYSGRD1 weapon 22 ammo 744 // Load the weapon model before using this
            01B2: give_actor $WMYSGRD2 weapon 22 ammo 744 // Load the weapon model before using this
            end
        until 8AE2: not 0@ = random_vehicle_near_point 1@ 2@ 3@ in_radius 100.0 find_next 1 pass_wrecked 1 //IF and SET
    end
end
Скомпилировал.Назвал wmysgrd.cs
Открыл cs файл и всё меняется:
//-------------MAIN---------------
wait 0

:NONAME_4
wait 0
if
   not Player.Defined($PLAYER_CHAR)
else_jump @NONAME_31
jump @NONAME_154

:NONAME_31
Actor.StorePos($PLAYER_ACTOR, 1@, 2@, 3@)
if
0AE2: 0@ = random_vehicle_near_point 1@ 2@ 3@ in_radius 100.0 find_next 0 pass_wrecked 1 //IF and SET
else_jump @NONAME_154

:NONAME_79
if
   Car.Model(0@) == #SECURICA
else_jump @NONAME_124
0129: $WMYSGRD1 = create_actor_pedtype 4 model #WMYSGRD in_car 0@ driverseat
01C8: $WMYSGRD2 = create_actor_pedtype 4 model #WMYSGRD in_car 0@ passenger_seat 0
01B2: give_actor $WMYSGRD1 weapon 22 ammo 744 // Load the weapon model before using this
01B2: give_actor $WMYSGRD2 weapon 22 ammo 744 // Load the weapon model before using this

:NONAME_124
8AE2:   not 0@ = random_vehicle_near_point 1@ 2@ 3@ in_radius 100.0 find_next 1 pass_wrecked 1 //IF and SET
else_jump @NONAME_79

:NONAME_154
jump @NONAME_4

Что за декомпилированный код?