20 июля 2013

Сильные пули снайперки

У снайперской винтовки пули стали сильнееВведите "SNBUL" для включения и отключения возможности. При её работе пули у снайперской винтовки становятся во много раз мощнее: за один выстрел можно уничтожить машину, за два - вертолёт.

// $PLAYER_ACTOR $PLAYER_GROUP $ONMISSION
{$CLEO}
0000:
while true //1
wait 0
    if //2
    player.Defined(0)
    then
        if and //3
        not actor.Dead($PLAYER_ACTOR)
        not actor.Driving($PLAYER_ACTOR)
        0ADC:   test_cheat "SNBUL"
        then
        018C: play_sound 1054 at 0.0 0.0 0.0
            repeat //4
            wait 0
                for 0@ = 0xC88740 to 0xC88874 step 0x2C //5
                    if //6
                    0@ > 0
                    then
                    0085: 1@ = 0@ // (int)
                    0085: 2@ = 0@ // (int)
                    1@ += 12
                    0A8D: 3@ = read_memory 1@ size 1 virtual_protect 0
                        if
                        3@ == 1
                        then
                        2@ += 40
                        0A8C: write_memory 2@ size 2 value 1250 virtual_protect 0
                        end
                    end //6
                end //5
            until 0ADC:   test_cheat "SNBUL" //4
        018C: play_sound 1054 at 0.0 0.0 0.0
        end //3
    end //2
end //1

Комментариев нет: