TankContactExplosion

{$CLEO}
0000:

//-----------TankContactExplosion-----------//

REPEAT
    wait 250
UNTIL 0256:   player $PLAYER_CHAR defined

0AC6: 31@ = label @TankContactExplosion offset

IF 0AA9:    is_game_version_original
THEN
    0085: 0@ = 31@
    0A8D: 0@ = read_memory 0@ size 4 virtual_protect 0
    0085: 1@ = 31@
    1@ += 4
    0A8D: 1@ = read_memory 1@ size 4 virtual_protect 0
ELSE
    0085: 0@ = 31@
    0@ += 8
    0A8D: 0@ = read_memory 0@ size 4 virtual_protect 0
    0085: 1@ = 31@
    1@ += 0x0C
    0A8D: 1@ = read_memory 1@ size 4 virtual_protect 0
END

0A8C: write_memory 0@ size 4 value 1@ virtual_protect 0
0A93: end_custom_thread

:TankContactExplosion
HEX
    CA 80 6A 00 41 60 6D 00 EA 88 6A 00 71 68 6D 00 41 75 74 68 6F 72 3A 20 48 6F 6C 6C 79 77 6F 6F 64 20 4A 61 63 6B
END