Skip to content

Instantly share code, notes, and snippets.

@nadalao

nadalao/HorrorMoviesMythsModv4.cs

Created August 7, 2018 15:02
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save nadalao/fa20ad424bea8f03e10a620db9d516f6 to your computer and use it in GitHub Desktop.
Save nadalao/fa20ad424bea8f03e10a620db9d516f6 to your computer and use it in GitHub Desktop.
Download ZIP
Horror Movies Myths Mod v4
Raw
HorrorMoviesMythsModv4.cs
SCRIPT_START
{
LVAR_INT scplayer jason leatherface vitima krueger samara michael scream dia
LVAR_INT iHour iMin audio carro iDay[2] onMission vida1 vida2 colete1 colete2 task_1 task_2 grupo ativador
CONST_INT SFX_VOLUME_ADDRESS 0xB5FCCC
LVAR_FLOAT x y z a b c fVolume distancia
GET_PLAYER_CHAR 0 scplayer
IF IS_AUSTRALIAN_GAME
CREATE_CHAR PEDTYPE_SPECIAL SPECIAL04 0.0 0.0 0.0 jason
CREATE_CHAR PEDTYPE_SPECIAL SPECIAL04 0.0 0.0 0.0 leatherface
CREATE_CHAR PEDTYPE_SPECIAL SPECIAL04 0.0 0.0 0.0 vitima
CREATE_CHAR PEDTYPE_SPECIAL SPECIAL04 0.0 0.0 0.0 krueger
CREATE_CHAR PEDTYPE_SPECIAL SPECIAL04 0.0 0.0 0.0 samara
CREATE_CHAR PEDTYPE_SPECIAL SPECIAL04 0.0 0.0 0.0 michael
CREATE_CHAR PEDTYPE_SPECIAL SPECIAL04 0.0 0.0 0.0 scream
ENDIF
main_loop:
WAIT 0
GET_CURRENT_DAY_OF_WEEK dia
READ_MEMORY 0x96ABA0 1 0 onMission
IF onMission = FALSE
GET_CURRENT_DAY_OF_WEEK iDay[0]
IF NOT iDay[0] = iDay[1]
GET_TIME_OF_DAY iHour iMin
IF iHour >= 0
AND iHour < 5
//leatherface
IF dia = 2
OR dia = 3
IF LOCATE_CHAR_ANY_MEANS_2D scplayer -393.0 -1149.0 200.0 200.0 FALSE
GOTO leatherface1
ENDIF
ENDIF
//freddy krueger
IF dia = 3
OR dia = 4
IF NOT ativador = 2
IF LOCATE_CHAR_ANY_MEANS_2D scplayer 218.0 1927.0 623.0 893.0 FALSE
IF DOES_CHAR_EXIST krueger
DELETE_CHAR krueger
ENDIF
GOSUB criar_freddy
WHILE GOSUB lugar_invalido_freddy
WAIT 0
IF NOT DOES_CHAR_EXIST krueger
GOSUB criar_freddy
ELSE
DELETE_CHAR krueger
ENDIF
ENDWHILE
ativador = 2
ENDIF
ELSE
IF LOCATE_CHAR_ANY_MEANS_2D scplayer x y 150.0 150.0 FALSE
IF DOES_CHAR_EXIST krueger
DELETE_CHAR krueger
ENDIF
GOTO freddy2
ELSE
GET_OFFSET_FROM_CHAR_IN_WORLD_COORDS krueger 0.0 0.0 0.0 x y z
GET_OFFSET_FROM_CHAR_IN_WORLD_COORDS scplayer 0.0 0.0 0.0 a b c
GET_DISTANCE_BETWEEN_COORDS_3D x y z a b c distancia
IF distancia > 500.0
IF DOES_CHAR_EXIST krueger
DELETE_CHAR krueger
ENDIF
GENERATE_RANDOM_FLOAT_IN_RANGE -405.2 841.2 x
GENERATE_RANDOM_FLOAT_IN_RANGE 1034.7 2820.8 y
timera = 0
ativador = 0
GOTO main_loop
ENDIF
ENDIF
ENDIF
ENDIF
//samara
IF dia = 4
OR dia = 5
IF LOCATE_CHAR_ANY_MEANS_2D scplayer 1271.0 295.0 50.0 50.0 FALSE
GOTO samara3
ENDIF
ENDIF
//michael myers
IF dia = 5
OR dia = 6
IF LOCATE_CHAR_ANY_MEANS_2D scplayer -2807.0 1116.0 150.0 150.0 FALSE
GOTO michael5
ENDIF
ENDIF
//jason
IF dia = 6
OR dia = 7
IF LOCATE_CHAR_ANY_MEANS_2D scplayer -1718.2 -2203.3 250.0 250.0 FALSE
GENERATE_RANDOM_FLOAT_IN_RANGE -1793.2 -1643.2 x
GENERATE_RANDOM_FLOAT_IN_RANGE -2278.3 -2128.3 y
LOAD_AUDIO_STREAM "cleo\som04.mp3" audio
READ_MEMORY SFX_VOLUME_ADDRESS 4 FALSE fVolume
SET_AUDIO_STREAM_STATE audio 1
SET_AUDIO_STREAM_LOOPED audio TRUE
SET_AUDIO_STREAM_VOLUME audio fVolume
FORCE_WEATHER_NOW 9
GOTO jason4
ENDIF
ENDIF
//scream
IF dia = 7
OR dia = 1
IF LOCATE_CHAR_ANY_MEANS_2D scplayer 1857.0 2771.0 150.0 150.0 FALSE
GOSUB criar_scream
WHILE GOSUB lugar_invalido_scream
WAIT 0
IF NOT DOES_CHAR_EXIST scream
GOSUB criar_scream
ELSE
DELETE_CHAR scream
ENDIF
ENDWHILE
GOTO scream6
ENDIF
ENDIF
ENDIF
ENDIF
ENDIF
GOTO main_loop
///////
leatherface1:
GOSUB carros
FORCE_WEATHER_NOW 9
LOAD_AUDIO_STREAM "cleo\som01.mp3" audio
SET_AUDIO_STREAM_STATE audio 1
SET_AUDIO_STREAM_LOOPED audio TRUE
READ_MEMORY SFX_VOLUME_ADDRESS 4 FALSE fVolume
SET_AUDIO_STREAM_VOLUME audio fVolume
LOAD_SPECIAL_CHARACTER 1 mod01
WHILE NOT HAS_SPECIAL_CHARACTER_LOADED 1
WAIT 0
ENDWHILE
REQUEST_MODEL CHNSAW
WHILE NOT HAS_MODEL_LOADED CHNSAW
WAIT 0
ENDWHILE
REQUEST_MODEL SWMOTR1
WHILE NOT HAS_MODEL_LOADED SWMOTR1
WAIT 0
ENDWHILE
CREATE_CHAR PEDTYPE_MISSION1 SPECIAL01 -387.5 -1145.2 69.2 leatherface
CREATE_CHAR PEDTYPE_CIVFEMALE SWMOTR1 -392.1 -1135.6 69.213966 vitima
UNLOAD_SPECIAL_CHARACTER 1
MARK_MODEL_AS_NO_LONGER_NEEDED SWMOTR1
SET_ANIM_GROUP_FOR_CHAR leatherface oldman
SET_CHAR_BLEEDING leatherface, TRUE
GIVE_WEAPON_TO_CHAR leatherface, WEAPONTYPE_CHAINSAW 999
MARK_MODEL_AS_NO_LONGER_NEEDED CHNSAW
SET_CHAR_ACCURACY leatherface, 200
SET_CHAR_PROOFS leatherface, 0, 1, 0, 1, 0
SET_CHAR_USES_UPPERBODY_DAMAGE_ANIMS_ONLY leatherface TRUE
SET_CHAR_SUFFERS_CRITICAL_HITS leatherface FALSE
SET_CHAR_HEALTH leatherface, 4000
SET_CHAR_HEALTH vitima 50
SET_CHAR_DROPS_WEAPONS_WHEN_DEAD leatherface FALSE
WHILE NOT LOCATE_CHAR_ANY_MEANS_3D scplayer -393.0 -1149.0 69.4 29.0 29.0 29.0 FALSE
WAIT 0
IF NOT LOCATE_CHAR_ANY_MEANS_3D scplayer -393.0 -1149.0 69.4 250.0 250.0 250.0 FALSE
GOTO release1
ENDIF
ENDWHILE
CREATE_GROUP 0 grupo
SET_GROUP_MEMBER grupo leatherface
TASK_KILL_CHAR_ON_FOOT leatherface vitima
WHILE NOT IS_CHAR_DEAD vitima
WAIT 0
ENDWHILE
MARK_CHAR_AS_NO_LONGER_NEEDED vitima
WAIT 1000
TASK_SAY scplayer 346
TASK_KILL_CHAR_ON_FOOT leatherface scplayer
WHILE LOCATE_CHAR_ANY_MEANS_CHAR_2D scplayer leatherface 200.0 200.0 FALSE
WAIT 0
GET_CHAR_HEALTH scplayer vida1
GET_CHAR_ARMOUR scplayer colete1
vida2 = vida1
colete2 = colete1
WHILE vida2 <= vida1
AND colete2 <= colete1
AND LOCATE_CHAR_ANY_MEANS_CHAR_2D scplayer leatherface 200.0 200.0 FALSE
WAIT 0
GET_CHAR_HEALTH scplayer vida1
GET_CHAR_ARMOUR scplayer colete1
IF IS_CHAR_DEAD leatherface
OR IS_CHAR_DEAD scplayer
REMOVE_CHAR_FROM_GROUP leatherface
MARK_CHAR_AS_NO_LONGER_NEEDED leatherface
GOTO release2
ENDIF
ENDWHILE
CLEO_CALL dano_leatherface 0 scplayer leatherface
ENDWHILE
REMOVE_CHAR_FROM_GROUP leatherface
GOTO release1
freddy2:
GOSUB carros
FORCE_WEATHER_NOW 9
WRITE_MEMORY 0x53BFBD 5 0x90 TRUE
LOAD_AUDIO_STREAM "cleo\som02.mp3" audio
SET_AUDIO_STREAM_STATE audio 1
SET_AUDIO_STREAM_LOOPED audio TRUE
READ_MEMORY SFX_VOLUME_ADDRESS 4 FALSE fVolume
SET_AUDIO_STREAM_VOLUME audio fVolume
LOAD_SPECIAL_CHARACTER 2 mod02
WHILE NOT HAS_SPECIAL_CHARACTER_LOADED 2
WAIT 0
ENDWHILE
REQUEST_MODEL MOLOTOV
WHILE NOT HAS_MODEL_LOADED MOLOTOV
WAIT 0
ENDWHILE
CREATE_CHAR PEDTYPE_MISSION1 SPECIAL02 x y -100.0 krueger
UNLOAD_SPECIAL_CHARACTER 2
GIVE_WEAPON_TO_CHAR krueger, WEAPONTYPE_MOLOTOV 999
MARK_MODEL_AS_NO_LONGER_NEEDED MOLOTOV
SET_CHAR_ACCURACY krueger, 40
SET_CHAR_USES_UPPERBODY_DAMAGE_ANIMS_ONLY krueger, TRUE
SET_CHAR_PROOFS krueger, 0, 1, 0, 1, 0
SET_CHAR_SUFFERS_CRITICAL_HITS krueger FALSE
SET_CHAR_HEALTH krueger, 20
SET_CHAR_DROPS_WEAPONS_WHEN_DEAD krueger FALSE
GET_CHAR_COORDINATES krueger x y z
WHILE NOT LOCATE_CHAR_ANY_MEANS_2D scplayer x y 100.0 100.0 FALSE
AND LOCATE_CHAR_ANY_MEANS_2D scplayer x y 200.0 200.0 FALSE
WAIT 0
ENDWHILE
CREATE_GROUP 0 grupo
SET_GROUP_MEMBER grupo krueger
TASK_KILL_CHAR_ON_FOOT krueger scplayer
SET_CAR_DENSITY_MULTIPLIER 0.0
SET_PED_DENSITY_MULTIPLIER 0.0
WHILE NOT IS_CHAR_DEAD krueger
WAIT 0
WHILE LOCATE_CHAR_ANY_MEANS_CHAR_3D scplayer krueger 70.0 70.0 70.0 FALSE
WAIT 0
IF IS_CHAR_DEAD scplayer
REMOVE_CHAR_FROM_GROUP krueger
MARK_CHAR_AS_NO_LONGER_NEEDED krueger
WRITE_MEMORY 0x53BFBD 4 0xFF0F4EE8 TRUE
WRITE_MEMORY 0x53BFC1 1 0xFF TRUE
GOTO release2
ENDIF
IF IS_CHAR_SITTING_IN_ANY_CAR scplayer
GET_CAR_CHAR_IS_USING scplayer carro
SET_RADIO_CHANNEL 12
WAIT 500
SET_CAR_ENGINE_BROKEN carro TRUE
WHILE IS_CHAR_SITTING_IN_ANY_CAR scplayer
WAIT 0
ENDWHILE
ENDIF
ENDWHILE
GET_OFFSET_FROM_CHAR_IN_WORLD_COORDS scplayer 0.0 20.0 0.0 x y z
SET_CHAR_COORDINATES krueger x y -100.0
TASK_SAY scplayer 346
ENDWHILE
WRITE_MEMORY 0x53BFBD 4 0xFF0F4EE8 TRUE
WRITE_MEMORY 0x53BFC1 1 0xFF TRUE
REMOVE_CHAR_FROM_GROUP krueger
MARK_CHAR_AS_NO_LONGER_NEEDED krueger
ativador = 0
GOTO release2
samara3:
FORCE_WEATHER_NOW 9
GOSUB carros
LOAD_AUDIO_STREAM "cleo\som03.mp3" audio
SET_AUDIO_STREAM_STATE audio 1
SET_AUDIO_STREAM_LOOPED audio TRUE
READ_MEMORY SFX_VOLUME_ADDRESS 4 FALSE fVolume
SET_AUDIO_STREAM_VOLUME audio fVolume
LOAD_SPECIAL_CHARACTER 3 mod03
WHILE NOT HAS_SPECIAL_CHARACTER_LOADED 3
WAIT 0
ENDWHILE
CREATE_CHAR PEDTYPE_MISSION1 SPECIAL03 1271.3 295.5 -100.0 samara
UNLOAD_SPECIAL_CHARACTER 3
SET_CHAR_ACCURACY samara, 200
SET_CHAR_SHOOT_RATE samara 200
SET_CHAR_USES_UPPERBODY_DAMAGE_ANIMS_ONLY samara, TRUE
SET_CHAR_PROOFS samara, 1, 1, 1, 1, 0
SET_CHAR_SUFFERS_CRITICAL_HITS samara FALSE
SET_CHAR_HEALTH samara, 1500
SET_CAR_DENSITY_MULTIPLIER 0.0
SET_PED_DENSITY_MULTIPLIER 0.0
WHILE NOT LOCATE_CHAR_ANY_MEANS_3D scplayer 1271.3 295.5 20.6 10.0 10.0 10.0 FALSE
WAIT 0
IF NOT LOCATE_CHAR_ANY_MEANS_3D scplayer 1271.3 295.5 20.6 200.0 200.0 200.0 FALSE
GOTO release2
ENDIF
ENDWHILE
WAIT 1500
TASK_SAY scplayer 346
CREATE_GROUP 0 grupo
SET_GROUP_MEMBER grupo samara
TASK_GO_TO_COORD_ANY_MEANS samara 1278.3 292.6 19.5 6 0
WAIT 3000
TASK_KILL_CHAR_ON_FOOT samara scplayer
WHILE LOCATE_CHAR_ANY_MEANS_CHAR_2D scplayer samara 80.0 80.0 FALSE
WAIT 0
GET_CHAR_HEALTH scplayer vida1
GET_CHAR_ARMOUR scplayer colete1
vida2 = vida1
colete2 = colete1
WHILE vida2 <= vida1
AND colete2 <= colete1
AND LOCATE_CHAR_ANY_MEANS_CHAR_2D scplayer samara 80.0 80.0 FALSE
WAIT 0
GET_CHAR_HEALTH scplayer vida1
GET_CHAR_ARMOUR scplayer colete1
IF IS_CHAR_DEAD samara
OR IS_CHAR_DEAD scplayer
REMOVE_CHAR_FROM_GROUP samara
MARK_CHAR_AS_NO_LONGER_NEEDED samara
GOTO release2
ENDIF
ENDWHILE
CLEO_CALL dano_samara 0 scplayer samara
ENDWHILE
REMOVE_CHAR_FROM_GROUP samara
SET_CAR_DENSITY_MULTIPLIER 1.0
SET_PED_DENSITY_MULTIPLIER 1.0
GOTO release1
jason4:
WAIT 0
IF LOCATE_CHAR_ANY_MEANS_2D scplayer x y 50.0 50.0 FALSE
IF NOT DOES_CHAR_EXIST jason
GOSUB carros
LOAD_SPECIAL_CHARACTER 4 mod04
WHILE NOT HAS_SPECIAL_CHARACTER_LOADED 4
WAIT 0
ENDWHILE
REQUEST_MODEL KNIFECUR
WHILE NOT HAS_MODEL_LOADED KNIFECUR
WAIT 0
ENDWHILE
REQUEST_ANIMATION knife
WHILE NOT HAS_ANIMATION_LOADED knife
WAIT 0
ENDWHILE
GET_OFFSET_FROM_CHAR_IN_WORLD_COORDS scplayer 0.0 -9.9 0.0 x y z
CREATE_CHAR PEDTYPE_MISSION1 SPECIAL04 x y -100.0 jason
SET_CHAR_HEALTH jason 2500
SET_CHAR_USES_UPPERBODY_DAMAGE_ANIMS_ONLY jason TRUE
SET_CHAR_DROPS_WEAPONS_WHEN_DEAD jason FALSE
SET_CHAR_SUFFERS_CRITICAL_HITS jason FALSE
SET_ANIM_GROUP_FOR_CHAR jason player
SET_CHAR_PROOFS jason 0 1 0 0 0
SET_CHAR_SHOOT_RATE jason 200
ADD_ARMOUR_TO_CHAR jason 500
UNLOAD_SPECIAL_CHARACTER 4
GIVE_WEAPON_TO_CHAR jason WEAPONTYPE_KNIFE 999
CREATE_GROUP 0 grupo
SET_GROUP_MEMBER grupo jason
TASK_KILL_CHAR_ON_FOOT jason scplayer
SET_CHAR_USES_UPPERBODY_DAMAGE_ANIMS_ONLY scplayer TRUE
WHILE NOT HAS_CHAR_BEEN_DAMAGED_BY_CHAR scplayer jason
WAIT 0
IF NOT LOCATE_CHAR_ANY_MEANS_CHAR_2D scplayer jason 150.0 150.0 FALSE
IF DOES_CHAR_EXIST jason
REMOVE_CHAR_FROM_GROUP jason
SET_CHAR_USES_UPPERBODY_DAMAGE_ANIMS_ONLY scplayer FALSE
GOTO release1
ENDIF
ENDIF
IF IS_CHAR_DEAD jason
OR IS_CHAR_DEAD scplayer
REMOVE_CHAR_FROM_GROUP jason
MARK_CHAR_AS_NO_LONGER_NEEDED jason
SET_CHAR_USES_UPPERBODY_DAMAGE_ANIMS_ONLY scplayer FALSE
GOTO release2
ENDIF
ENDWHILE
SET_PLAYER_CONTROL 0 FALSE
GET_OFFSET_FROM_CHAR_IN_WORLD_COORDS scplayer 0.0 0.0 0.0 x y z
TASK_GO_STRAIGHT_TO_COORD jason x y z 6 10000
WHILE NOT LOCATE_CHAR_ANY_MEANS_3D jason x y z 1.3 1.3 10.0 FALSE
WAIT 0
GET_OFFSET_FROM_CHAR_IN_WORLD_COORDS scplayer 0.0 0.0 0.0 x y z
ENDWHILE
REMOVE_CHAR_FROM_GROUP jason
OPEN_SEQUENCE_TASK task_1
TASK_TURN_CHAR_TO_FACE_CHAR -1 scplayer
GET_OFFSET_FROM_CHAR_IN_WORLD_COORDS jason 0.0 2.0 0.0 x y z
TASK_GO_STRAIGHT_TO_COORD -1 x y z 6 -1
TASK_TURN_CHAR_TO_FACE_CHAR -1 scplayer
CLOSE_SEQUENCE_TASK task_1
PERFORM_SEQUENCE_TASK jason task_1
CLEAR_SEQUENCE_TASK task_1
TASK_PLAY_ANIM_NON_INTERRUPTABLE jason KILL_Knife_Player knife 1.0 1 0 0 0 1600
WAIT 600
OPEN_SEQUENCE_TASK task_2
TASK_PLAY_ANIM_NON_INTERRUPTABLE -1 KILL_Knife_Ped_Damage knife 1.0 0 0 0 0 -1
TASK_DIE_NAMED_ANIM -1 KILL_Knife_Ped_Die knife 1.0 -1
CLOSE_SEQUENCE_TASK task_2
PERFORM_SEQUENCE_TASK scplayer task_2
CLEAR_SEQUENCE_TASK task_2
WHILE LOCATE_CHAR_ANY_MEANS_2D scplayer x y 30.0 30.0 FALSE
WAIT 0
ENDWHILE
SET_CHAR_USES_UPPERBODY_DAMAGE_ANIMS_ONLY scplayer FALSE
REMOVE_AUDIO_STREAM audio
IF DOES_CHAR_EXIST jason
REMOVE_CHAR_ELEGANTLY jason
ENDIF
SET_PLAYER_CONTROL 0 TRUE
SET_WEATHER_TO_APPROPRIATE_TYPE_NOW
SET_CHAR_ANIM_PLAYING_FLAG scplayer KILL_Knife_Ped_Die FALSE
ENDIF
ELSE
IF timera >= 9000
GENERATE_RANDOM_FLOAT_IN_RANGE -1793.2 -1643.2 x
GENERATE_RANDOM_FLOAT_IN_RANGE -2278.3 -2128.3 y
timera = 0
ENDIF
ENDIF
IF NOT LOCATE_CHAR_ANY_MEANS_2D scplayer -1718.2 -2203.3 300.0 300.0 FALSE
REMOVE_CHAR_FROM_GROUP jason
GOTO release1
ENDIF
GOTO jason4
michael5:
FORCE_WEATHER_NOW 9
LOAD_AUDIO_STREAM "cleo\som05.mp3" audio
SET_AUDIO_STREAM_STATE audio 1
SET_AUDIO_STREAM_LOOPED audio TRUE
READ_MEMORY SFX_VOLUME_ADDRESS 4 FALSE fVolume
SET_AUDIO_STREAM_VOLUME audio fVolume
LOAD_SPECIAL_CHARACTER 5 mod05
WHILE NOT HAS_SPECIAL_CHARACTER_LOADED 5
WAIT 0
ENDWHILE
REQUEST_MODEL KNIFECUR
WHILE NOT HAS_MODEL_LOADED KNIFECUR
WAIT 0
ENDWHILE
CREATE_CHAR PEDTYPE_MISSION1 SPECIAL05 -2794.1 1130.1 -100.0 michael
UNLOAD_SPECIAL_CHARACTER 5
GIVE_WEAPON_TO_CHAR michael, WEAPONTYPE_KNIFE 999
MARK_MODEL_AS_NO_LONGER_NEEDED KNIFECUR
SET_CHAR_ACCURACY michael, 200
SET_CHAR_USES_UPPERBODY_DAMAGE_ANIMS_ONLY michael, TRUE
SET_CHAR_PROOFS michael, 0, 1, 0, 1, 0
SET_CHAR_SUFFERS_CRITICAL_HITS michael FALSE
SET_CHAR_HEALTH michael, 4000
SET_CHAR_SHOOT_RATE michael 100
SET_CHAR_DROPS_WEAPONS_WHEN_DEAD michael FALSE
WHILE NOT LOCATE_CHAR_ANY_MEANS_3D scplayer -2807.9 1116.3 28.3 60.0 60.0 60.0 FALSE
WAIT 0
IF NOT LOCATE_CHAR_ANY_MEANS_3D scplayer -2807.9 1116.3 28.3 200.0 200.0 200.0 FALSE
GOTO release2
ENDIF
ENDWHILE
WAIT 1500
TASK_SAY scplayer 346
CREATE_GROUP 0 grupo
SET_GROUP_MEMBER grupo michael
TASK_KILL_CHAR_ON_FOOT michael scplayer
SET_CAR_DENSITY_MULTIPLIER 0.1
SET_PED_DENSITY_MULTIPLIER 0.1
WHILE LOCATE_CHAR_ANY_MEANS_CHAR_2D scplayer michael 200.0 200.0 FALSE
WAIT 0
GET_CHAR_HEALTH scplayer vida1
GET_CHAR_ARMOUR scplayer colete1
vida2 = vida1
colete2 = colete1
WHILE vida2 <= vida1
AND colete2 <= colete1
AND LOCATE_CHAR_ANY_MEANS_CHAR_2D scplayer michael 200.0 200.0 FALSE
WAIT 0
GET_CHAR_HEALTH scplayer vida1
GET_CHAR_ARMOUR scplayer colete1
IF IS_CHAR_DEAD michael
OR IS_CHAR_DEAD scplayer
REMOVE_CHAR_FROM_GROUP michael
MARK_CHAR_AS_NO_LONGER_NEEDED michael
GOTO release2
ENDIF
ENDWHILE
CLEO_CALL dano_michael 0 scplayer michael
ENDWHILE
REMOVE_CHAR_FROM_GROUP michael
SET_CAR_DENSITY_MULTIPLIER 1.0
SET_PED_DENSITY_MULTIPLIER 1.0
GOTO release1
scream6:
LOAD_AUDIO_STREAM "cleo\som06.mp3" audio
SET_AUDIO_STREAM_STATE audio 1
SET_AUDIO_STREAM_LOOPED audio TRUE
READ_MEMORY SFX_VOLUME_ADDRESS 4 FALSE fVolume
SET_AUDIO_STREAM_VOLUME audio fVolume
LOAD_SPECIAL_CHARACTER 6 mod06
WHILE NOT HAS_SPECIAL_CHARACTER_LOADED 6
WAIT 0
ENDWHILE
REQUEST_MODEL KNIFECUR
WHILE NOT HAS_MODEL_LOADED KNIFECUR
WAIT 0
ENDWHILE
CREATE_CHAR PEDTYPE_MISSION1 SPECIAL06 x y -100.0 scream
UNLOAD_SPECIAL_CHARACTER 6
GIVE_WEAPON_TO_CHAR scream, WEAPONTYPE_KNIFE 999
MARK_MODEL_AS_NO_LONGER_NEEDED KNIFECUR
SET_CHAR_ACCURACY scream, 200
SET_CHAR_USES_UPPERBODY_DAMAGE_ANIMS_ONLY scream, TRUE
SET_CHAR_PROOFS scream, 0, 1, 0, 0, 0
SET_CHAR_SUFFERS_CRITICAL_HITS scream FALSE
SET_CHAR_HEALTH scream, 2000
SET_CHAR_SHOOT_RATE scream 100
SET_CHAR_DROPS_WEAPONS_WHEN_DEAD scream FALSE
WHILE NOT LOCATE_CHAR_ANY_MEANS_3D scplayer x y 10.8 60.0 60.0 60.0 FALSE
WAIT 0
IF NOT LOCATE_CHAR_ANY_MEANS_3D scplayer x y 10.8 200.0 200.0 200.0 FALSE
GOTO release2
ENDIF
ENDWHILE
CREATE_GROUP 0 grupo
SET_GROUP_MEMBER grupo scream
TASK_KILL_CHAR_ON_FOOT scream scplayer
WHILE LOCATE_CHAR_ANY_MEANS_CHAR_2D scplayer scream 200.0 200.0 FALSE
WAIT 0
GET_CHAR_HEALTH scplayer vida1
GET_CHAR_ARMOUR scplayer colete1
vida2 = vida1
colete2 = colete1
WHILE vida2 <= vida1
AND colete2 <= colete1
AND LOCATE_CHAR_ANY_MEANS_CHAR_2D scplayer scream 200.0 200.0 FALSE
WAIT 0
GET_CHAR_HEALTH scplayer vida1
GET_CHAR_ARMOUR scplayer colete1
IF IS_CHAR_DEAD scream
OR IS_CHAR_DEAD scplayer
REMOVE_CHAR_FROM_GROUP scream
MARK_CHAR_AS_NO_LONGER_NEEDED scream
GOTO release2
ENDIF
ENDWHILE
CLEO_CALL dano_scream 0 scplayer scream
ENDWHILE
REMOVE_CHAR_FROM_GROUP scream
GOTO release1
////////////////////////////////////////
carros:
IF IS_CHAR_IN_ANY_CAR scplayer
GET_CAR_CHAR_IS_USING scplayer carro
ENDIF
IF IS_CHAR_SITTING_IN_CAR scplayer carro
SET_RADIO_CHANNEL 12
WAIT 1000
SET_CAR_ENGINE_ON carro FALSE
ENDIF
RETURN
criar_freddy:
WAIT 0
LOAD_SPECIAL_CHARACTER 2 mod02
WHILE NOT HAS_SPECIAL_CHARACTER_LOADED 2
WAIT 0
ENDWHILE
GENERATE_RANDOM_FLOAT_IN_RANGE -405.2 841.2 x
GENERATE_RANDOM_FLOAT_IN_RANGE 1034.7 2820.8 y
CREATE_CHAR PEDTYPE_MISSION1 SPECIAL02 x y -100.0 krueger
SET_CHAR_PROOFS krueger 1 1 1 1 1
SET_CHAR_DROWNS_IN_WATER krueger FALSE
SET_CHAR_HEALTH krueger 99999
TASK_WANDER_STANDARD krueger
SET_CHAR_VISIBLE krueger FALSE
timerb = 0
WHILE NOT timerb >= 2000
WAIT 0
ENDWHILE
timerb = 0
RETURN
lugar_invalido_freddy:
WAIT 0
IF DOES_CHAR_EXIST krueger
GET_CHAR_COORDINATES krueger x y z
IF x >= -96.3
AND x <= 449.6
AND y >= 1618.2
AND y <= 2155.2
DELETE_CHAR krueger
IS_PC_VERSION
RETURN
ENDIF
IF LOCATE_CHAR_ANY_MEANS_2D scplayer 176.5 1886.5 273.1 268.3 FALSE
DELETE_CHAR krueger
IS_PC_VERSION
RETURN
ENDIF
IF z <= 0.0
WAIT 3000
ENDIF
IF IS_CHAR_IN_WATER krueger
DELETE_CHAR krueger
IS_PC_VERSION
RETURN
ENDIF
IS_AUSTRALIAN_GAME
RETURN
ENDIF
IS_PC_VERSION
RETURN
criar_scream:
WAIT 0
LOAD_SPECIAL_CHARACTER 6 mod06
WHILE NOT HAS_SPECIAL_CHARACTER_LOADED 6
WAIT 0
ENDWHILE
GENERATE_RANDOM_FLOAT_IN_RANGE 1702.9 1884.1 x
GENERATE_RANDOM_FLOAT_IN_RANGE 2750.6 2864.0 y
CREATE_CHAR PEDTYPE_MISSION1 SPECIAL06 x y -100.0 scream
SET_CHAR_PROOFS scream 1 1 1 1 1
SET_CHAR_DROWNS_IN_WATER scream FALSE
SET_CHAR_HEALTH scream 99999
TASK_WANDER_STANDARD scream
SET_CHAR_VISIBLE scream FALSE
timerb = 0
WHILE NOT timerb >= 2000
WAIT 0
ENDWHILE
timerb = 0
RETURN
lugar_invalido_scream:
WAIT 0
IF DOES_CHAR_EXIST scream
GET_CHAR_COORDINATES scream x y z
IF x >= 1826.9
AND x <= 1893.6
AND y >= 2814.3
AND y <= 2882.4
DELETE_CHAR scream
IS_PC_VERSION
RETURN
ENDIF
IF z >= 13.0
DELETE_CHAR scream
IS_PC_VERSION
RETURN
ENDIF
IF z <= 0.5
WAIT 1000
ENDIF
IF IS_CHAR_IN_WATER scream
DELETE_CHAR scream
IS_PC_VERSION
RETURN
ENDIF
IS_AUSTRALIAN_GAME
RETURN
ENDIF
IS_PC_VERSION
RETURN
release1:
IF DOES_CHAR_EXIST leatherface
REMOVE_CHAR_ELEGANTLY leatherface
ENDIF
IF DOES_CHAR_EXIST krueger
REMOVE_CHAR_ELEGANTLY krueger
ENDIF
IF DOES_CHAR_EXIST vitima
REMOVE_CHAR_ELEGANTLY vitima
ENDIF
IF DOES_CHAR_EXIST samara
REMOVE_CHAR_ELEGANTLY samara
ENDIF
IF DOES_CHAR_EXIST jason
REMOVE_CHAR_ELEGANTLY jason
ENDIF
IF DOES_CHAR_EXIST michael
REMOVE_CHAR_ELEGANTLY michael
ENDIF
IF DOES_CHAR_EXIST scream
REMOVE_CHAR_ELEGANTLY scream
ENDIF
release2:
iDay[1] = iDay[0]
ativador = 0
GENERATE_RANDOM_FLOAT_IN_RANGE -1208.9 791.1 x
GENERATE_RANDOM_FLOAT_IN_RANGE 891.5 2891.5 y
REMOVE_GROUP grupo
SET_AUDIO_STREAM_STATE audio 0
REMOVE_AUDIO_STREAM audio
SET_WEATHER_TO_APPROPRIATE_TYPE_NOW
SET_CAR_DENSITY_MULTIPLIER 1.0
SET_PED_DENSITY_MULTIPLIER 1.0
GOTO main_loop
}
{
LVAR_INT scplayer leatherface
dano_leatherface:
IF HAS_CHAR_BEEN_DAMAGED_BY_CHAR scplayer leatherface
DAMAGE_CHAR scplayer 20 1
ENDIF
CLEO_RETURN 0
}
{
LVAR_INT scplayer samara
dano_samara:
IF HAS_CHAR_BEEN_DAMAGED_BY_CHAR scplayer samara
DAMAGE_CHAR scplayer 15 1
ENDIF
CLEO_RETURN 0
}
{
LVAR_INT scplayer michael
dano_michael:
IF HAS_CHAR_BEEN_DAMAGED_BY_CHAR scplayer michael
DAMAGE_CHAR scplayer 22 1
ENDIF
CLEO_RETURN 0
}
{
LVAR_INT scplayer scream
dano_scream:
IF HAS_CHAR_BEEN_DAMAGED_BY_CHAR scplayer scream
DAMAGE_CHAR scplayer 18 1
ENDIF
CLEO_RETURN 0
}
SCRIPT_END
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment