Skip to content

Instantly share code, notes, and snippets.

@nadalao

nadalao/freddykrueger.cs

Created September 14, 2018 16:12
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/7829a5bd65b36a82fb034424aba16048 to your computer and use it in GitHub Desktop.
Save nadalao/7829a5bd65b36a82fb034424aba16048 to your computer and use it in GitHub Desktop.
Download ZIP
nadalao files v1
Raw
freddykrueger.cs
SCRIPT_START
{
LVAR_INT scplayer início carro krueger dia horas minutos grupo iDay[2] onMission ativador
LVAR_FLOAT x y z a b c distancia
GET_PLAYER_CHAR 0 scplayer
IF IS_AUSTRALIAN_GAME
CREATE_CHAR PEDTYPE_SPECIAL SPECIAL04 0.0 0.0 0.0 krueger
ENDIF
main_loop:
WAIT 0
GET_CURRENT_DAY_OF_WEEK dia
GET_CURRENT_DAY_OF_WEEK iDay[0]
GET_TIME_OF_DAY horas minutos
READ_MEMORY 0x96ABA0 1 0 onMission
IF horas >= 0
AND horas <= 5
AND NOT iDay[0] = iDay[1]
AND onMission = FALSE
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
GOTO main_loop
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
freddy2:
GOSUB carros
WRITE_MEMORY 0x53BFBD 5 0x90 TRUE //PARAR RELÓGIO
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, 3000
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 //VOLTAR RELÓGIO
WRITE_MEMORY 0x53BFC1 1 0xFF TRUE //VOLTAR RELÓGIO
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 //VOLTAR RELÓGIO
WRITE_MEMORY 0x53BFC1 1 0xFF TRUE //VOLTAR RELÓGIO
REMOVE_CHAR_FROM_GROUP krueger
MARK_CHAR_AS_NO_LONGER_NEEDED krueger
ativador = 0
GOTO release2
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
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
release1:
IF DOES_CHAR_EXIST krueger
REMOVE_CHAR_ELEGANTLY krueger
ENDIF
release2:
iDay[1] = iDay[0]
ativador = 0
REMOVE_GROUP grupo
RELEASE_WEATHER
SET_CAR_DENSITY_MULTIPLIER 1.0
SET_PED_DENSITY_MULTIPLIER 1.0
SET_WANTED_MULTIPLIER 1.0
GOTO main_loop
}
SCRIPT_END
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment