простое изменение

SpinQuatts

Известный
Автор темы
52
2
Мне нужен этот редуктор для работы с обрезом, а не с пустынным орлом, и чтобы он уменьшал урон, только когда меня останавливают

CLEO:
{$CLEO .cs}

THREAD 'WEAPONDAT'


WHILE TRUE
    WAIT 0

    // ACTIVATION STUFF HERE
    IF
        KEY_DOWN 113 // F2 KEY
    THEN
        0B12: 0@ = 0@ XOR 1 // SWITCHES VAR 0@ BETWEEN 1 AND 0 OR TRUE/FALSE
        IF
            0@ == TRUE // CHECKS IF VAR 0@ IS TRUE
        THEN
            //IF VAR 0@ IS TRUE THIS MESSAGE IS PRINTED AND THE WEAPON.DAT IS CHANGED ACCORDINGLY
            0AD1: "~y~DMG REDUCER ~g~ON" 500
            0AB1: @WEAPON_DAT 4 | -> Change Weapon 24 DAT 0x22 VALUE_TO 70 SIZE_OF_DAT 4 // WEAPON 24 = DEAGLE, DAT 0x22 is "Damage", VALUE is the damage, SIZE relates to the 0x22 they can change depending on the DAT.
        ELSE                             
            0AD1: "~y~DMG REDUCER ~r~OFF" 500 // ALTERNATIVELY IF VAR 0@ IS FALSE THE WEAPON.DAT IS CHANGED TO DEFAULT.
            0AB1: @WEAPON_DAT 4 | -> Change Weapon 24 DAT 0x22 VALUE_TO 140 SIZE_OF_DAT 4 // SWITCHES BACK TO DEFAULT SETTINGS, DEAGLE DAMAGE VALUE OF 140 RETRIEVED FROM WEAPON.DAT IN GTASA
        END
        WAIT 500
    END
    
END

:WEAPON_DAT
0@ += 0x24 //+0x0 - no skill +0x19 - 50% skill +0x24 - 100% skill
0@ *= 0x70 // BLOCK SIZE
0@ += 0xC8AAB8 // BASE
005A: 0@ += 1@  // (int)
0A8C: write_memory 0@ size 3@ value 2@ virtual_protect 0
0AB2: ret 0
 

every

Новичок
5
0
CLEO:
 {$CLEO .cs}

//-------------MAIN---------------
0000: NOP

:NONAME_2
wait 0
if
   Player.Defined($PLAYER_CHAR)
else_jump @NONAME_2
if
key_down 113
else_jump @NONAME_2
4@ = 27
4@ += 36
4@ *= 112
4@ += 13150904
4@ += 34
0A8D: 24@ = read_memory 4@ size 2 virtual_protect 0
0A8C: write_memory 4@ size 2 value 7 virtual_protect 0
3@ = 25
3@ += 36
3@ *= 112
3@ += 13150904
3@ += 34
0A8D: 23@ = read_memory 3@ size 2 virtual_protect 0
0A8C: write_memory 3@ size 2 value 5 virtual_protect 0
print "REDUCER ON" 1000

:NONAME_183
wait 0
if
key_down 114
else_jump @NONAME_183
wait 0
if
key_down 114
0A8C: write_memory 4@ size 2 value 24@ virtual_protect 0
0A8C: write_memory 3@ size 2 value 23@ virtual_protect 0
print "REDUCER OFF" 1000

:NONAME_257
wait 0
if
key_down 114
else_jump @NONAME_257
jump @NONAME_2
 
Последнее редактирование модератором:

SpinQuatts

Известный
Автор темы
52
2
CLEO:
 {$CLEO .cs}

//-------------MAIN---------------
0000: NOP

:NONAME_2
wait 0
if
   Player.Defined($PLAYER_CHAR)
else_jump @NONAME_2
if
key_down 113
else_jump @NONAME_2
4@ = 27
4@ += 36
4@ *= 112
4@ += 13150904
4@ += 34
0A8D: 24@ = read_memory 4@ size 2 virtual_protect 0
0A8C: write_memory 4@ size 2 value 7 virtual_protect 0
3@ = 25
3@ += 36
3@ *= 112
3@ += 13150904
3@ += 34
0A8D: 23@ = read_memory 3@ size 2 virtual_protect 0
0A8C: write_memory 3@ size 2 value 5 virtual_protect 0
print "REDUCER ON" 1000

:NONAME_183
wait 0
if
key_down 114
else_jump @NONAME_183
wait 0
if
key_down 114
0A8C: write_memory 4@ size 2 value 24@ virtual_protect 0
0A8C: write_memory 3@ size 2 value 23@ virtual_protect 0
print "REDUCER OFF" 1000

:NONAME_257
wait 0
if
key_down 114
else_jump @NONAME_257
jump @NONAME_2
это декомпилированный код. Не могли бы вы прислать исходный код?