Skip to content

Instantly share code, notes, and snippets.

@nadalao

nadalao/Slenderman v1.1

Last active August 28, 2018 17:08
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/ea8f3e74f9f7422991908a5be8d56a67 to your computer and use it in GitHub Desktop.
Save nadalao/ea8f3e74f9f7422991908a5be8d56a67 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
Slenderman v1.1
MISSION_START
{
LVAR_INT scplayer slenderman distância1 distância4 chiado chiado2 papel_coletado dano musica1 musica3 musica5 musica7 derrota jumpscare jumpscare2
LVAR_INT papel[9] criar_papel[22] obj_papel[22] ativador[22] musica[5]
LVAR_FLOAT x[4] y[4] z[4] distância2 distância3 distância5 distância6 fVolume volume2
CONST_INT SFX_VOLUME_ADDRESS 0xB5FCCC
CONST_INT STATE_STOP 0
CONST_INT STATE_PLAY 1
GET_PLAYER_CHAR 0 scplayer
IF IS_AUSTRALIAN_GAME
CREATE_RANDOM_CHAR 0.0 0.0 0.0 slenderman
ENDIF
CLEO_CALL Hide 0
main_loop:
WAIT 0
IF NOT DOES_CHAR_EXIST slenderman
GOSUB local_papeis
LOAD_SPECIAL_CHARACTER 7 slender
WHILE NOT HAS_SPECIAL_CHARACTER_LOADED 7
WAIT 0
ENDWHILE
GET_OFFSET_FROM_CHAR_IN_WORLD_COORDS scplayer 0.0 6.0 0.0 x[0] y[0] z[0]
CREATE_CHAR PEDTYPE_MISSION1 SPECIAL07 x[0] y[0] -100.0 slenderman
SET_CHAR_PROOFS slenderman 1 1 1 1 1
SET_CHAR_HEALTH slenderman 99999
SET_ANIM_GROUP_FOR_CHAR slenderman player
WRITE_MEMORY 0x53BFBD 5 0x90 TRUE //PARAR TEMPO
FORCE_WEATHER_NOW 9
ENDIF
IF DOES_CHAR_EXIST slenderman
TASK_TURN_CHAR_TO_FACE_CHAR slenderman scplayer
TASK_LOOK_AT_CHAR slenderman scplayer -1
IF ativador[0] = 0
WHILE CLEO_CALL visao_slenderman 0 scplayer slenderman
WAIT 0
IF NOT distância4 = 2
GOSUB area
ELSE
GOSUB distância1
ENDIF
ENDWHILE
ativador[0] = 1
ENDIF
IF ativador[0] = 1
IF CLEO_CALL visao_slenderman 0 scplayer slenderman
SET_CHAR_VISIBLE slenderman TRUE
IF distância6 < 24.0
AND jumpscare2 = 0
LOAD_AUDIO_STREAM "cleo\musica\jumpscare.mp3" jumpscare
READ_MEMORY 0xB5FCCC 4 FALSE fVolume
fVolume *= 2.0
SET_AUDIO_STREAM_STATE jumpscare 1
jumpscare2 = 1
ENDIF
IF timera > dano
DO_FADE 10000 FADE_OUT
DAMAGE_CHAR scplayer 1 0
IF chiado2 = 0
LOAD_AUDIO_STREAM "cleo\musica\chiado.mp3" chiado
SET_AUDIO_STREAM_STATE chiado 1
READ_MEMORY 0xB5FCCC 4 FALSE fVolume
SET_AUDIO_STREAM_VOLUME chiado 0.0
SET_AUDIO_STREAM_LOOPED chiado 1
chiado2 = 1
ENDIF
volume2 += 0.04
SET_AUDIO_STREAM_VOLUME chiado volume2
IF volume2 > fVolume
volume2 = fVolume
ENDIF
timera = 0
ENDIF
ELSE
DO_FADE 600 FADE_IN
timerb = 0
volume2 -= 0.05
IF volume2 <= 0.0
volume2 = 0.0
ENDIF
SET_AUDIO_STREAM_VOLUME chiado volume2
IF timera > 3000
SET_CHAR_VISIBLE slenderman FALSE
ativador[0] = 0
timera = 0
IF NOT distância4 = 2
GOSUB area
ELSE
GOSUB distância1
ENDIF
distância4 += 1
IF distância4 > 2
distância4 = 0
ENDIF
jumpscare2 = 0
GOTO main_loop
ENDIF
ENDIF
ENDIF
SWITCH papel_coletado
CASE 0
distância2 = 86.0
distância3 = -86.0
dano = 180
BREAK
CASE 1 //musica 1
distância2 = 78.0
distância3 = -78.0
dano = 160
IF musica[0] = 0
READ_MEMORY SFX_VOLUME_ADDRESS 4 FALSE fVolume
fVolume /= 2.0
fVolume *= 3.0
LOAD_AUDIO_STREAM "cleo\musica\pagina1.mp3" musica1
WHILE NOT HAS_MISSION_AUDIO_LOADED musica1
WAIT 0
ENDWHILE
SET_AUDIO_STREAM_STATE musica1 1
SET_AUDIO_STREAM_LOOPED musica1 TRUE
SET_AUDIO_STREAM_VOLUME musica1 fVolume
musica[0] = 1
ENDIF
BREAK
CASE 2
distância2 = 70.0
distância3 = -70.0
dano = 140
BREAK
CASE 3 //musica 2
distância2 = 62.0
distância3 = -62.0
dano = 120
SET_AUDIO_STREAM_STATE musica1 STATE_STOP
REMOVE_AUDIO_STREAM musica1
IF musica[1] = 0
READ_MEMORY SFX_VOLUME_ADDRESS 4 FALSE fVolume
fVolume /= 2.0
fVolume *= 3.0
LOAD_AUDIO_STREAM "cleo\musica\pagina3.mp3" musica3
WHILE NOT HAS_MISSION_AUDIO_LOADED musica3
WAIT 0
ENDWHILE
SET_AUDIO_STREAM_STATE musica3 STATE_PLAY
SET_AUDIO_STREAM_LOOPED musica3 TRUE
SET_AUDIO_STREAM_VOLUME musica3 fVolume
musica[1] = 1
ENDIF
BREAK
CASE 4
distância2 = 44.0
distância3 = -44.0
dano = 100
BREAK
CASE 5 //transormação e musica 5
distância2 = 34.0
distância3 = -34.0
dano = 80
SET_AUDIO_STREAM_STATE musica3 STATE_STOP
REMOVE_AUDIO_STREAM musica3
IF musica[2] = 0
READ_MEMORY SFX_VOLUME_ADDRESS 4 FALSE fVolume
fVolume /= 2.0
fVolume *= 3.0
LOAD_AUDIO_STREAM "cleo\musica\pagina5.mp3" musica5
WHILE NOT HAS_MISSION_AUDIO_LOADED musica5
WAIT 0
ENDWHILE
SET_AUDIO_STREAM_STATE musica5 1
SET_AUDIO_STREAM_LOOPED musica5 TRUE
SET_AUDIO_STREAM_VOLUME musica5 fVolume
UNLOAD_SPECIAL_CHARACTER 7
DELETE_CHAR slenderman
LOAD_SPECIAL_CHARACTER 7 stenta
WHILE NOT HAS_SPECIAL_CHARACTER_LOADED 7
WAIT 0
ENDWHILE
CREATE_CHAR PEDTYPE_MISSION1 SPECIAL07 x[0] y[0] -100.0 slenderman
SET_ANIM_GROUP_FOR_CHAR slenderman player
musica[2] = 1
ENDIF
BREAK
CASE 6
distância2 = 26.0
distância3 = -26.0
dano = 60
BREAK
CASE 7 //musica 7
distância2 = 18.0
distância3 = -18.0
dano = 40
SET_AUDIO_STREAM_STATE musica5 STATE_STOP
REMOVE_AUDIO_STREAM musica5
IF musica[3] = 0
READ_MEMORY SFX_VOLUME_ADDRESS 4 FALSE fVolume
fVolume /= 2.0
fVolume *= 3.0
LOAD_AUDIO_STREAM "cleo\musica\pagina7.mp3" musica7
WHILE NOT HAS_MISSION_AUDIO_LOADED musica7
WAIT 0
ENDWHILE
SET_AUDIO_STREAM_STATE musica7 1
SET_AUDIO_STREAM_LOOPED musica7 TRUE
SET_AUDIO_STREAM_VOLUME musica7 fVolume
musica[3] = 1
ENDIF
BREAK
CASE 8 //fim
DO_FADE 600 FADE_IN
SET_PLAYER_CONTROL 0 FALSE
SET_CHAR_VISIBLE slenderman TRUE
GET_OFFSET_FROM_CHAR_IN_WORLD_COORDS slenderman 0.0 5.0 0.7 x[0] y[0] z[0]
SET_FIXED_CAMERA_POSITION x[0] y[0] z[0] 0.0 0.0 0.0
POINT_CAMERA_AT_CHAR slenderman 15 2
WAIT 5500
UNLOAD_SPECIAL_CHARACTER 7
REMOVE_CHAR_ELEGANTLY slenderman
WAIT 4000
SET_AUDIO_STREAM_STATE musica7 STATE_STOP
REMOVE_AUDIO_STREAM musica7
SET_PLAYER_CONTROL 0 TRUE
RESTORE_CAMERA
SET_AUDIO_STREAM_STATE chiado 0
REMOVE_AUDIO_STREAM chiado
WRITE_MEMORY 0x53BFBD 4 0xFF0F4EE8 TRUE //voltar tempo
WRITE_MEMORY 0x53BFC1 1 0xFF TRUE //voltar tempo
CLEO_CALL WriteGlobalVar 0 (409, 0)() //desativa
CLEO_CALL Show 0 //mostrar
STREAM_CUSTOM_SCRIPT "slenderman.cs"
TERMINATE_THIS_SCRIPT
BREAK
ENDSWITCH
GET_CHAR_COORDINATES scplayer x[3] y[3] z[3]
GET_CHAR_COORDINATES slenderman x[2] y[2] z[2]
GET_DISTANCE_BETWEEN_COORDS_2D -1597.4 -2132.9 x[3] y[3] distância5
GET_DISTANCE_BETWEEN_COORDS_2D x[2] y[2] x[3] y[3] distância6
IF IS_CHAR_IN_ANY_CAR scplayer //punição
OR distância5 > 560.0
OR IS_PLAYER_USING_JETPACK 0
DAMAGE_CHAR scplayer 1 0
ENDIF
IF IS_PLAYER_TARGETTING_CHAR 0 slenderman
DAMAGE_CHAR scplayer 3 0
TASK_SAY scplayer 346
ENDIF
IF NOT IS_CHAR_HEALTH_GREATER scplayer 5 //release
OR distância6 < 10.0
OR timerb > 7000
SET_CHAR_HEALTH scplayer 5
DO_FADE 600 FADE_IN
GET_OFFSET_FROM_CHAR_IN_WORLD_COORDS slenderman 0.0 5.0 1.0 x[0] y[0] z[0]
SET_FIXED_CAMERA_POSITION x[0] y[0] z[0] 0.0 0.0 0.0
POINT_CAMERA_AT_CHAR slenderman 15 2
SWITCH papel_coletado //parar música
CASE 1
SET_AUDIO_STREAM_STATE musica1 0
REMOVE_AUDIO_STREAM musica1
BREAK
CASE 2
SET_AUDIO_STREAM_STATE musica1 0
REMOVE_AUDIO_STREAM musica1
BREAK
CASE 3
SET_AUDIO_STREAM_STATE musica3 0
REMOVE_AUDIO_STREAM musica3
BREAK
CASE 4
SET_AUDIO_STREAM_STATE musica3 0
REMOVE_AUDIO_STREAM musica3
BREAK
CASE 5
SET_AUDIO_STREAM_STATE musica5 0
REMOVE_AUDIO_STREAM musica5
BREAK
CASE 6
SET_AUDIO_STREAM_STATE musica5 0
REMOVE_AUDIO_STREAM musica5
BREAK
CASE 7
SET_AUDIO_STREAM_STATE musica7 0
REMOVE_AUDIO_STREAM musica7
BREAK
ENDSWITCH
SET_AUDIO_STREAM_STATE chiado 0
REMOVE_AUDIO_STREAM chiado
SET_AUDIO_STREAM_STATE jumpscare 0
REMOVE_AUDIO_STREAM jumpscare
LOAD_AUDIO_STREAM "cleo\musica\derrota.mp3" derrota
WHILE NOT HAS_MISSION_AUDIO_LOADED derrota
WAIT 0
ENDWHILE
SET_AUDIO_STREAM_STATE derrota 1
READ_MEMORY SFX_VOLUME_ADDRESS 4 FALSE fVolume
fVolume /= 2.0
fVolume *= 3.0
SET_AUDIO_STREAM_VOLUME derrota fVolume
SET_CHAR_VISIBLE slenderman TRUE
SET_PLAYER_CONTROL 0 FALSE
WAIT 10500
SET_PLAYER_CONTROL 0 TRUE
TASK_DIE scplayer
WHILE IS_CHAR_DEAD scplayer
WAIT 0
ENDWHILE
CLEO_CALL Show 0 //mostrar
WRITE_MEMORY 0x53BFBD 4 0xFF0F4EE8 TRUE //voltar tempo
WRITE_MEMORY 0x53BFC1 1 0xFF TRUE //voltar tempo
SET_WEATHER_TO_APPROPRIATE_TYPE_NOW
RESTORE_CAMERA_JUMPCUT
CLEO_CALL WriteGlobalVar 0 (409, 0)() //desativa
STREAM_CUSTOM_SCRIPT "slenderman.cs"
TERMINATE_THIS_SCRIPT
ENDIF
GOSUB locais
ENDIF
GOTO main_loop
locais:
IF papel[1] = 1
OR papel[2] = 1
OR papel[3] = 1
OR papel[4] = 1
OR papel[5] = 1
OR papel[6] = 1
OR papel[7] = 1
OR papel[8] = 1
IF ativador[1] = 0
IF criar_papel[1] = 0
CREATE_OBJECT 668 -1637.199219 -2232.711133 31.476563 obj_papel[1]
SET_OBJECT_HEADING obj_papel[1] 90.0
criar_papel[1] = 1
ENDIF
IF LOCATE_CHAR_ANY_MEANS_3D scplayer -1637.199219 -2232.911133 31.476563 0.8 0.8 0.8 criar_papel[1] //casa
IF IS_BUTTON_PRESSED 0 6
papel_coletado += 1
ativador[1] = 1
DELETE_OBJECT obj_papel[1]
PRINT_FORMATTED_NOW "%i/8" 4000 papel_coletado
WHILE IS_BUTTON_PRESSED 0 6
WAIT 0
ENDWHILE
ENDIF
ENDIF
ENDIF
ENDIF
IF papel[1] = 2
OR papel[2] = 2
OR papel[3] = 2
OR papel[4] = 2
OR papel[5] = 2
OR papel[6] = 2
OR papel[7] = 2
OR papel[8] = 2
IF ativador[2] = 0
IF criar_papel[2] = 0
CREATE_OBJECT 668 -1641.050049 -2361.807129 47.364426 obj_papel[2]
SET_OBJECT_HEADING obj_papel[2] 95.0
criar_papel[2] = 1
ENDIF
IF LOCATE_CHAR_ANY_MEANS_3D scplayer -1641.050049 -2361.807129 47.364426 0.8 0.8 0.8 criar_papel[2] //pedra
IF IS_BUTTON_PRESSED 0 6
papel_coletado += 1
ativador[2] = 1
DELETE_OBJECT obj_papel[2]
PRINT_FORMATTED_NOW "%i/8" 3000 papel_coletado
WHILE IS_BUTTON_PRESSED 0 6
WAIT 0
ENDWHILE
ENDIF
ENDIF
ENDIF
ENDIF
IF papel[1] = 3
OR papel[2] = 3
OR papel[3] = 3
OR papel[4] = 3
OR papel[5] = 3
OR papel[6] = 3
OR papel[7] = 3
OR papel[8] = 3
IF ativador[3] = 0
IF criar_papel[3] = 0
CREATE_OBJECT 668 -1498.773071 -2360.540283 14.232948 obj_papel[3]
SET_OBJECT_HEADING obj_papel[3] 105.0
criar_papel[3] = 1
ENDIF
IF LOCATE_CHAR_ANY_MEANS_3D scplayer -1498.773071 -2360.540283 14.232948 0.8 0.8 0.8 criar_papel[3] //arvore perto do rio
IF IS_BUTTON_PRESSED 0 6
papel_coletado += 1
ativador[3] = 1
DELETE_OBJECT obj_papel[3]
PRINT_FORMATTED_NOW "%i/8" 3000 papel_coletado
WHILE IS_BUTTON_PRESSED 0 6
WAIT 0
ENDWHILE
ENDIF
ENDIF
ENDIF
ENDIF
IF papel[1] = 4
OR papel[2] = 4
OR papel[3] = 4
OR papel[4] = 4
OR papel[5] = 4
OR papel[6] = 4
OR papel[7] = 4
OR papel[8] = 4
IF ativador[4] = 0
IF criar_papel[4] = 0
CREATE_OBJECT 668 -1306.584229 -2394.813721 23.457331 obj_papel[4]
criar_papel[4] = 1
ENDIF
IF LOCATE_CHAR_ANY_MEANS_3D scplayer -1306.584229 -2394.813721 24.057331 0.8 0.8 0.8 criar_papel[4] //caminhonete
IF IS_BUTTON_PRESSED 0 6
papel_coletado += 1
ativador[4] = 1
DELETE_OBJECT obj_papel[4]
PRINT_FORMATTED_NOW "%i/8" 3000 papel_coletado
WHILE IS_BUTTON_PRESSED 0 6
WAIT 0
ENDWHILE
ENDIF
ENDIF
ENDIF
ENDIF
IF papel[1] = 5
OR papel[2] = 5
OR papel[3] = 5
OR papel[4] = 5
OR papel[5] = 5
OR papel[6] = 5
OR papel[7] = 5
OR papel[8] = 5
IF ativador[5] = 0
IF criar_papel[5] = 0
CREATE_OBJECT 668 -1287.950806 -2508.654541 17.645844 obj_papel[5]
SET_OBJECT_HEADING obj_papel[5] 245.0
criar_papel[5] = 1
ENDIF
IF LOCATE_CHAR_ANY_MEANS_3D scplayer -1287.950806 -2508.654541 17.645844 0.8 0.8 0.8 criar_papel[5] //arvore perto da caminhonete
IF IS_BUTTON_PRESSED 0 6
papel_coletado += 1
ativador[5] = 1
DELETE_OBJECT obj_papel[5]
PRINT_FORMATTED_NOW "%i/8" 3000 papel_coletado
WHILE IS_BUTTON_PRESSED 0 6
WAIT 0
ENDWHILE
ENDIF
ENDIF
ENDIF
ENDIF
IF papel[1] = 6
OR papel[2] = 6
OR papel[3] = 6
OR papel[4] = 6
OR papel[5] = 6
OR papel[6] = 6
OR papel[7] = 6
OR papel[8] = 6
IF ativador[6] = 0
IF criar_papel[6] = 0
CREATE_OBJECT 668 -1589.963013 -2570.901855 29.687757 obj_papel[6]
SET_OBJECT_HEADING obj_papel[6] 245.0
criar_papel[6] = 1
ENDIF
IF LOCATE_CHAR_ANY_MEANS_3D scplayer -1589.963013 -2570.901855 29.687757 0.8 0.8 0.8 criar_papel[6] //buraco perto da rua
IF IS_BUTTON_PRESSED 0 6
papel_coletado += 1
ativador[6] = 1
DELETE_OBJECT obj_papel[6]
PRINT_FORMATTED_NOW "%i/8" 3000 papel_coletado
WHILE IS_BUTTON_PRESSED 0 6
WAIT 0
ENDWHILE
ENDIF
ENDIF
ENDIF
ENDIF
IF papel[1] = 7
OR papel[2] = 7
OR papel[3] = 7
OR papel[4] = 7
OR papel[5] = 7
OR papel[6] = 7
OR papel[7] = 7
OR papel[8] = 7
IF ativador[7] = 0
IF criar_papel[7] = 0
CREATE_OBJECT 668 -1694.337891 -2491.581787 21.075245 obj_papel[7]
SET_OBJECT_HEADING obj_papel[7] 270.0
criar_papel[7] = 1
ENDIF
IF LOCATE_CHAR_ANY_MEANS_3D scplayer -1694.337891 -2491.581787 21.075245 0.8 0.8 0.8 criar_papel[7] //pedra escura
IF IS_BUTTON_PRESSED 0 6
papel_coletado += 1
ativador[7] = 1
DELETE_OBJECT obj_papel[7]
PRINT_FORMATTED_NOW "%i/8" 3000 papel_coletado
WHILE IS_BUTTON_PRESSED 0 6
WAIT 0
ENDWHILE
ENDIF
ENDIF
ENDIF
ENDIF
IF papel[1] = 8
OR papel[2] = 8
OR papel[3] = 8
OR papel[4] = 8
OR papel[5] = 8
OR papel[6] = 8
OR papel[7] = 8
OR papel[8] = 8
IF ativador[8] = 0
IF criar_papel[8] = 0
CREATE_OBJECT 668 -1855.450073 -2309.685059 46.472782 obj_papel[8]
criar_papel[8] = 1
ENDIF
IF LOCATE_CHAR_ANY_MEANS_3D scplayer -1855.450073 -2309.685059 46.472782 0.8 0.8 0.8 criar_papel[8] //pedra encruzilhada
IF IS_BUTTON_PRESSED 0 6
papel_coletado += 1
ativador[8] = 1
DELETE_OBJECT obj_papel[8]
PRINT_FORMATTED_NOW "%i/8" 3000 papel_coletado
WHILE IS_BUTTON_PRESSED 0 6
WAIT 0
ENDWHILE
ENDIF
ENDIF
ENDIF
ENDIF
IF papel[1] = 9
OR papel[2] = 9
OR papel[3] = 9
OR papel[4] = 9
OR papel[5] = 9
OR papel[6] = 9
OR papel[7] = 9
OR papel[8] = 9
IF ativador[9] = 0
IF criar_papel[9] = 0
CREATE_OBJECT 668 -1944.346069 -2132.077637 75.172089 obj_papel[9]
SET_OBJECT_HEADING obj_papel[9] 135.0
criar_papel[9] = 1
ENDIF
IF LOCATE_CHAR_ANY_MEANS_3D scplayer -1944.346069 -2132.077637 75.172089 0.8 0.8 0.8 criar_papel[9] //arvore no morro
IF IS_BUTTON_PRESSED 0 6
papel_coletado += 1
ativador[9] = 1
DELETE_OBJECT obj_papel[9]
PRINT_FORMATTED_NOW "%i/8" 3000 papel_coletado
WHILE IS_BUTTON_PRESSED 0 6
WAIT 0
ENDWHILE
ENDIF
ENDIF
ENDIF
ENDIF
IF papel[1] = 10
OR papel[2] = 10
OR papel[3] = 10
OR papel[4] = 10
OR papel[5] = 10
OR papel[6] = 10
OR papel[7] = 10
OR papel[8] = 10
IF ativador[1]0 = 0
IF criar_papel[10] = 0
CREATE_OBJECT 668 -2013.824829 -2005.977295 81.307114 obj_papel[10]
SET_OBJECT_HEADING obj_papel[10] 280.0
criar_papel[10] = 1
ENDIF
IF LOCATE_CHAR_ANY_MEANS_3D scplayer -2013.824829 -2005.977295 81.307114 0.8 0.8 0.8 criar_papel[10] //arvore quina do morro
IF IS_BUTTON_PRESSED 0 6
papel_coletado += 1
ativador[1]0 = 1
DELETE_OBJECT obj_papel[10]
PRINT_FORMATTED_NOW "%i/8" 3000 papel_coletado
WHILE IS_BUTTON_PRESSED 0 6
WAIT 0
ENDWHILE
ENDIF
ENDIF
ENDIF
ENDIF
IF papel[1] = 11
OR papel[2] = 11
OR papel[3] = 11
OR papel[4] = 11
OR papel[5] = 11
OR papel[6] = 11
OR papel[7] = 11
OR papel[8] = 11
IF ativador[11] = 0
IF criar_papel[11] = 0
CREATE_OBJECT 668 -1913.329102 -1892.702271 86.221092 obj_papel[11]
SET_OBJECT_HEADING obj_papel[11] 135.0
criar_papel[11] = 1
ENDIF
IF LOCATE_CHAR_ANY_MEANS_3D scplayer -1913.329102 -1892.702271 86.221092 0.8 0.8 0.8 criar_papel[11] //arvore curupira
IF IS_BUTTON_PRESSED 0 6
papel_coletado += 1
ativador[11] = 1
DELETE_OBJECT obj_papel[11]
PRINT_FORMATTED_NOW "%i/8" 3000 papel_coletado
WHILE IS_BUTTON_PRESSED 0 6
WAIT 0
ENDWHILE
ENDIF
ENDIF
ENDIF
ENDIF
IF papel[1] = 12
OR papel[2] = 12
OR papel[3] = 12
OR papel[4] = 12
OR papel[5] = 12
OR papel[6] = 12
OR papel[7] = 12
OR papel[8] = 12
IF ativador[12] = 0
IF criar_papel[12] = 0
CREATE_OBJECT 668 -1746.543457 -1881.785400 94.441559 obj_papel[12]
SET_OBJECT_HEADING obj_papel[12] 45.0
criar_papel[12] = 1
ENDIF
IF LOCATE_CHAR_ANY_MEANS_3D scplayer -1746.543457 -1881.785400 94.441559 0.8 0.8 0.8 criar_papel[12] //arvore curupira2
IF IS_BUTTON_PRESSED 0 6
papel_coletado += 1
ativador[12] = 1
DELETE_OBJECT obj_papel[12]
PRINT_FORMATTED_NOW "%i/8" 3000 papel_coletado
WHILE IS_BUTTON_PRESSED 0 6
WAIT 0
ENDWHILE
ENDIF
ENDIF
ENDIF
ENDIF
IF papel[1] = 13
OR papel[2] = 13
OR papel[3] = 13
OR papel[4] = 13
OR papel[5] = 13
OR papel[6] = 13
OR papel[7] = 13
OR papel[8] = 13
IF ativador[13] = 0
IF criar_papel[13] = 0
CREATE_OBJECT 668 -1587.271729 -1872.188354 84.214355 obj_papel[13]
criar_papel[13] = 1
ENDIF
IF LOCATE_CHAR_ANY_MEANS_3D scplayer -1587.271729 -1872.188354 84.214355 0.8 0.8 0.8 criar_papel[13] //top norte
IF IS_BUTTON_PRESSED 0 6
papel_coletado += 1
ativador[13] = 1
DELETE_OBJECT obj_papel[13]
PRINT_FORMATTED_NOW "%i/8" 3000 papel_coletado
WHILE IS_BUTTON_PRESSED 0 6
WAIT 0
ENDWHILE
ENDIF
ENDIF
ENDIF
ENDIF
IF papel[1] = 14
OR papel[2] = 14
OR papel[3] = 14
OR papel[4] = 14
OR papel[5] = 14
OR papel[6] = 14
OR papel[7] = 14
OR papel[8] = 14
IF ativador[14] = 0
IF criar_papel[14] = 0
CREATE_OBJECT 668 -1731.529541 -1967.052490 95.914307 obj_papel[14]
SET_OBJECT_HEADING obj_papel[14] 29.631767
criar_papel[14] = 1
ENDIF
IF LOCATE_CHAR_ANY_MEANS_3D scplayer -1731.529541 -1967.052490 95.914307 0.8 0.8 0.8 criar_papel[14] //arvore curupira3
IF IS_BUTTON_PRESSED 0 6
papel_coletado += 1
ativador[14] = 1
DELETE_OBJECT obj_papel[14]
PRINT_FORMATTED_NOW "%i/8" 3000 papel_coletado
WHILE IS_BUTTON_PRESSED 0 6
WAIT 0
ENDWHILE
ENDIF
ENDIF
ENDIF
ENDIF
IF papel[1] = 15
OR papel[2] = 15
OR papel[3] = 15
OR papel[4] = 15
OR papel[5] = 15
OR papel[6] = 15
OR papel[7] = 15
OR papel[8] = 15
IF ativador[15] = 0
IF criar_papel[15] = 0
CREATE_OBJECT 668 -1479.341309 -1879.672974 54.098309 obj_papel[15]
SET_OBJECT_HEADING obj_papel[15] 276.215775
criar_papel[15] = 1
ENDIF
IF LOCATE_CHAR_ANY_MEANS_3D scplayer -1479.341309 -1879.672974 54.098309 0.8 0.8 0.8 criar_papel[1]5 //arvore descida
IF IS_BUTTON_PRESSED 0 6
papel_coletado += 1
ativador[15] = 1
DELETE_OBJECT obj_papel[15]
PRINT_FORMATTED_NOW "%i/8" 3000 papel_coletado
WHILE IS_BUTTON_PRESSED 0 6
WAIT 0
ENDWHILE
ENDIF
ENDIF
ENDIF
ENDIF
IF papel[1] = 16
OR papel[2] = 16
OR papel[3] = 16
OR papel[4] = 16
OR papel[5] = 16
OR papel[6] = 16
OR papel[7] = 16
OR papel[8] = 16
IF ativador[16] = 0
IF criar_papel[16] = 0
CREATE_OBJECT 668 -1373.574585 -1924.999146 21.338133 obj_papel[16]
SET_OBJECT_HEADING obj_papel[16] 339.580215
criar_papel[16] = 1
ENDIF
IF LOCATE_CHAR_ANY_MEANS_3D scplayer -1373.574585 -1924.999146 21.338133 0.8 0.8 0.8 criar_papel[1]6 //arvore do beco
IF IS_BUTTON_PRESSED 0 6
papel_coletado += 1
ativador[16] = 1
DELETE_OBJECT obj_papel[16]
PRINT_FORMATTED_NOW "%i/8" 3000 papel_coletado
WHILE IS_BUTTON_PRESSED 0 6
WAIT 0
ENDWHILE
ENDIF
ENDIF
ENDIF
ENDIF
IF papel[1] = 17
OR papel[2] = 17
OR papel[3] = 17
OR papel[4] = 17
OR papel[5] = 17
OR papel[6] = 17
OR papel[7] = 17
OR papel[8] = 17
IF ativador[17] = 0
IF criar_papel[17] = 0
CREATE_OBJECT 668 -1574.460571 -2085.994873 40.926888 obj_papel[17]
SET_OBJECT_HEADING obj_papel[17] 87.779175
criar_papel[17] = 1
ENDIF
IF LOCATE_CHAR_ANY_MEANS_3D scplayer -1574.460571 -2085.994873 40.926888 0.8 0.8 0.8 criar_papel[1]7 //arvore fácil
IF IS_BUTTON_PRESSED 0 6
papel_coletado += 1
ativador[17] = 1
DELETE_OBJECT obj_papel[17]
PRINT_FORMATTED_NOW "%i/8" 3000 papel_coletado
WHILE IS_BUTTON_PRESSED 0 6
WAIT 0
ENDWHILE
ENDIF
ENDIF
ENDIF
ENDIF
IF papel[1] = 18
OR papel[2] = 18
OR papel[3] = 18
OR papel[4] = 18
OR papel[5] = 18
OR papel[6] = 18
OR papel[7] = 18
OR papel[8] = 18
IF ativador[18] = 0
IF criar_papel[18] = 0
CREATE_OBJECT 668 -1413.542603 -2192.406006 20.958435 obj_papel[18]
SET_OBJECT_HEADING obj_papel[18] 85.505402
criar_papel[18] = 1
ENDIF
IF LOCATE_CHAR_ANY_MEANS_3D scplayer -1413.542603 -2192.406006 20.958435 0.8 0.8 0.8 criar_papel[18] //arvore assovio
IF IS_BUTTON_PRESSED 0 6
papel_coletado += 1
ativador[18] = 1
DELETE_OBJECT obj_papel[18]
PRINT_FORMATTED_NOW "%i/8" 3000 papel_coletado
WHILE IS_BUTTON_PRESSED 0 6
WAIT 0
ENDWHILE
ENDIF
ENDIF
ENDIF
ENDIF
IF papel[1] = 19
OR papel[2] = 19
OR papel[3] = 19
OR papel[4] = 19
OR papel[5] = 19
OR papel[6] = 19
OR papel[7] = 19
OR papel[8] = 19
IF ativador[19] = 0
IF criar_papel[19] = 0
CREATE_OBJECT 668 -1354.819702 -2104.976807 30.559092 obj_papel[19]
SET_OBJECT_HEADING obj_papel[19] 331.313660
criar_papel[19] = 1
ENDIF
IF LOCATE_CHAR_ANY_MEANS_3D scplayer -1354.819702 -2104.976807 30.559092 0.8 0.8 0.8 criar_papel[19] //arvore lança chamas
IF IS_BUTTON_PRESSED 0 6
papel_coletado += 1
ativador[19] = 1
DELETE_OBJECT obj_papel[19]
PRINT_FORMATTED_NOW "%i/8" 3000 papel_coletado
WHILE IS_BUTTON_PRESSED 0 6
WAIT 0
ENDWHILE
ENDIF
ENDIF
ENDIF
ENDIF
IF papel[1] = 20
OR papel[2] = 20
OR papel[3] = 20
OR papel[4] = 20
OR papel[5] = 20
OR papel[6] = 20
OR papel[7] = 20
OR papel[8] = 20
IF ativador[20] = 0
IF criar_papel[20] = 0
CREATE_OBJECT 668 -1225.616089 -2160.739258 26.526878 obj_papel[20]
SET_OBJECT_HEADING obj_papel[20] 14.816589
criar_papel[20] = 1
ENDIF
IF LOCATE_CHAR_ANY_MEANS_3D scplayer -1225.616089 -2160.739258 26.526878 0.8 0.8 0.8 criar_papel[20] //arvore pedra mato
IF IS_BUTTON_PRESSED 0 6
papel_coletado += 1
ativador[20] = 1
DELETE_OBJECT obj_papel[20]
PRINT_FORMATTED_NOW "%i/8" 3000 papel_coletado
WHILE IS_BUTTON_PRESSED 0 6
WAIT 0
ENDWHILE
ENDIF
ENDIF
ENDIF
ENDIF
IF papel[1] = 21
OR papel[2] = 21
OR papel[3] = 21
OR papel[4] = 21
OR papel[5] = 21
OR papel[6] = 21
OR papel[7] = 21
OR papel[8] = 21
IF ativador[21] = 0
IF criar_papel[21] = 0
CREATE_OBJECT 668 -1826.554443 -2170.395996 78.494446 obj_papel[21]
SET_OBJECT_HEADING obj_papel[21] 315.941338
criar_papel[21] = 1
ENDIF
IF LOCATE_CHAR_ANY_MEANS_3D scplayer -1826.554443 -2170.395996 78.494446 0.8 0.8 0.8 criar_papel[21] //centro
IF IS_BUTTON_PRESSED 0 6
papel_coletado += 1
ativador[21] = 1
DELETE_OBJECT obj_papel[21]
PRINT_FORMATTED_NOW "%i/8" 3000 papel_coletado
WHILE IS_BUTTON_PRESSED 0 6
WAIT 0
ENDWHILE
ENDIF
ENDIF
ENDIF
ENDIF
RETURN
local_papeis:
WAIT 0
IF papel[1] = papel[2]
OR papel[1] = papel[3]
OR papel[1] = papel[4]
OR papel[1] = papel[5]
OR papel[1] = papel[6]
OR papel[1] = papel[7]
OR papel[1] = papel[8]
GENERATE_RANDOM_INT_IN_RANGE 1 22 papel[1]
GENERATE_RANDOM_INT_IN_RANGE 1 22 papel[2]
GENERATE_RANDOM_INT_IN_RANGE 1 22 papel[3]
GENERATE_RANDOM_INT_IN_RANGE 1 22 papel[4]
GENERATE_RANDOM_INT_IN_RANGE 1 22 papel[5]
GENERATE_RANDOM_INT_IN_RANGE 1 22 papel[6]
GENERATE_RANDOM_INT_IN_RANGE 1 22 papel[7]
GENERATE_RANDOM_INT_IN_RANGE 1 22 papel[8]
GOTO local_papeis
ENDIF
IF papel[2] = papel[1]
OR papel[2] = papel[3]
OR papel[2] = papel[4]
OR papel[2] = papel[5]
OR papel[2] = papel[6]
OR papel[2] = papel[7]
OR papel[2] = papel[8]
GENERATE_RANDOM_INT_IN_RANGE 1 22 papel[2]
GOTO local_papeis
ENDIF
IF papel[3] = papel[1]
OR papel[3] = papel[2]
OR papel[3] = papel[4]
OR papel[3] = papel[5]
OR papel[3] = papel[6]
OR papel[3] = papel[7]
OR papel[3] = papel[8]
GENERATE_RANDOM_INT_IN_RANGE 1 22 papel[3]
GOTO local_papeis
ENDIF
IF papel[4] = papel[1]
OR papel[4] = papel[2]
OR papel[4] = papel[3]
OR papel[4] = papel[5]
OR papel[4] = papel[6]
OR papel[4] = papel[7]
OR papel[4] = papel[8]
GENERATE_RANDOM_INT_IN_RANGE 1 22 papel[4]
GOTO local_papeis
ENDIF
IF papel[5] = papel[1]
OR papel[5] = papel[2]
OR papel[5] = papel[3]
OR papel[5] = papel[4]
OR papel[5] = papel[6]
OR papel[5] = papel[7]
OR papel[5] = papel[8]
GENERATE_RANDOM_INT_IN_RANGE 1 22 papel[5]
GOTO local_papeis
ENDIF
IF papel[6] = papel[1]
OR papel[6] = papel[2]
OR papel[6] = papel[3]
OR papel[6] = papel[4]
OR papel[6] = papel[5]
OR papel[6] = papel[7]
OR papel[6] = papel[8]
GENERATE_RANDOM_INT_IN_RANGE 1 22 papel[6]
GOTO local_papeis
ENDIF
IF papel[7] = papel[1]
OR papel[7] = papel[2]
OR papel[7] = papel[3]
OR papel[7] = papel[4]
OR papel[7] = papel[5]
OR papel[7] = papel[6]
OR papel[7] = papel[8]
GENERATE_RANDOM_INT_IN_RANGE 1 22 papel[7]
GOTO local_papeis
ENDIF
IF papel[8] = papel[1]
OR papel[8] = papel[2]
OR papel[8] = papel[3]
OR papel[8] = papel[4]
OR papel[8] = papel[5]
OR papel[8] = papel[6]
OR papel[8] = papel[7]
GENERATE_RANDOM_INT_IN_RANGE 1 22 papel[8]
GOTO local_papeis
ENDIF
REQUEST_MODEL 668
WHILE NOT HAS_MODEL_LOADED 668
WAIT 0
ENDWHILE
RETURN
area:
GET_OFFSET_FROM_CHAR_IN_WORLD_COORDS scplayer 0.0 0.0 0.0 x[0] y[0] z[0]
x[0] -= 50.0
y[0] -= 50.0
x[1] = x[0]
y[1] = y[0]
x[1] += 100.0
y[1] += 100.0
GENERATE_RANDOM_FLOAT_IN_RANGE x[0] x[1] x[2]
GENERATE_RANDOM_FLOAT_IN_RANGE y[0] y[1] y[2]
SET_CHAR_COORDINATES slenderman x[2] y[2] -100.0
RETURN
distância1:
GENERATE_RANDOM_INT_IN_RANGE 0 8 distância1
SWITCH distância1
CASE 0
GET_OFFSET_FROM_CHAR_IN_WORLD_COORDS scplayer distância3 0.0 0.0 x[0] y[0] z[0]
BREAK
CASE 1
GET_OFFSET_FROM_CHAR_IN_WORLD_COORDS scplayer distância3 distância3 0.0 x[0] y[0] z[0]
BREAK
CASE 2
GET_OFFSET_FROM_CHAR_IN_WORLD_COORDS scplayer 0.0 distância3 0.0 x[0] y[0] z[0]
BREAK
CASE 3
GET_OFFSET_FROM_CHAR_IN_WORLD_COORDS scplayer distância2 distância3 0.0 x[0] y[0] z[0]
BREAK
CASE 4
GET_OFFSET_FROM_CHAR_IN_WORLD_COORDS scplayer distância3 distância2 0.0 x[0] y[0] z[0]
BREAK
CASE 5
GET_OFFSET_FROM_CHAR_IN_WORLD_COORDS scplayer 0.0 distância2 0.0 x[0] y[0] z[0]
BREAK
CASE 6
GET_OFFSET_FROM_CHAR_IN_WORLD_COORDS scplayer distância2 0.0 0.0 x[0] y[0] z[0]
BREAK
CASE 7
GET_OFFSET_FROM_CHAR_IN_WORLD_COORDS scplayer distância2 distância2 0.0 x[0] y[0] z[0]
BREAK
ENDSWITCH
SET_CHAR_COORDINATES slenderman x[0] y[0] -100.0
RETURN
}
{
LVAR_INT scplayer slenderman
LVAR_FLOAT x[2] y[2] z[2] distância
visao_slenderman:
GET_CHAR_COORDINATES slenderman x[0] y[0] z[0]
GET_CHAR_COORDINATES scplayer x[1] y[1] z[1]
GET_DISTANCE_BETWEEN_COORDS_2D x[0] y[0] x[1] y[1] distância
IF z[0] <= 1.0
OR distância < 17.0
IS_PC_VERSION
ELSE
IF IS_CHAR_ON_SCREEN slenderman
AND HAS_CHAR_SPOTTED_CHAR slenderman scplayer
IS_PC_VERSION
ELSE
IS_AUSTRALIAN_GAME
ENDIF
ENDIF
CLEO_RETURN 0
}
{
LVAR_INT var value // In
LVAR_INT p i
WriteGlobalVar:
READ_MEMORY 0x00468D5E 4 0 (p)
i = var * 4
p += i
WRITE_MEMORY p 4 (value) 0
CLEO_RETURN 0
}
{
Hide:
WRITE_MEMORY 0x00BAA400 4 0 FALSE
WRITE_MEMORY 0x0058F607 5 0x90 TRUE
WRITE_MEMORY 0x0058F944 5 0x90 TRUE
WRITE_MEMORY 0x0058FA25 5 0x90 TRUE
CLEO_RETURN 0
}
{
Show:
WRITE_MEMORY 0x00BAA400 4 1 FALSE
WRITE_MEMORY 0x0058F607 1 0xE8 TRUE
WRITE_MEMORY 0x0058F608 4 0x0018B0F4 TRUE
WRITE_MEMORY 0x0058F944 1 0xE8 TRUE
WRITE_MEMORY 0x0058F945 4 0xFFFFDE87 TRUE
WRITE_MEMORY 0x0058FA25 1 0xE8 TRUE
WRITE_MEMORY 0x0058FA26 4 0xFFFF9986 TRUE
CLEO_RETURN 0
}
MISSION_END
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment