Caso um carro bater em alta velocidade, a força do impacto fará o carro explodir.
A força necessária para explodir é configurável no arquivo .ini. Nota: o mod não se ativa em missões.
SourceAbrir
Código: Selecionar tudo
SCRIPT_START
{
LVAR_INT scplayer hCar p i onMission
LVAR_FLOAT m_fLastDamageIntensity fCustomValue
//////////////////////////////////////////////////
IF NOT READ_FLOAT_FROM_INI_FILE "cleo\Carros explodindo em batidas fortes demais.ini" "confg" "fCustomValue" fCustomValue
PRINT_FORMATTED_NOW "~r~Erro ao ler o arquivo .ini" 3000
fCustomValue = 1600.0
ENDIF
IF IS_AUSTRALIAN_GAME
CREATE_CAR 0 0.0 0.0 0.0 (hCar)
ENDIF
GET_PLAYER_CHAR 0 (scplayer)
//////////////////////////////////////////////////
WHILE TRUE
WAIT 0
READ_MEMORY 0x96ABA0 1 0 (onMission)
READ_MEMORY 0x00B74494 4 0 (p)
p += 0x04
READ_MEMORY p 4 0 (p)
i = 0
WHILE i <= 0x6D00
READ_MEMORY p 1 0 (hCar)
p++
IF hCar >= 0x00
AND hCar < 0x80
hCar += i
IF CLEO_CALL GetCarCollisionIntensity 0 (hCar) (m_fLastDamageIntensity)
IF m_fLastDamageIntensity >= fCustomValue
IF onMission = FALSE
EXPLODE_CAR (hCar)
ENDIF
ENDIF
ENDIF
ENDIF
i += 0x100
ENDWHILE
ENDWHILE
}
SCRIPT_END
{
LVAR_INT car
LVAR_INT i
LVAR_FLOAT intensity
GetCarCollisionIntensity:
GET_VEHICLE_POINTER car (i)
i += 0xD8
READ_MEMORY i 4 FALSE (intensity)
intensity > 0.0
CLEO_RETURN 0 (intensity)
}
DOWNLOAD