Página 1 de 2

[SA] Chupa-C* de Goianinha

Enviado: 23 Jul 2018, 23:11
por nadalao
ImagemImagemImagem

Ele aparece em 2 desses lugares aleatoriamente por noite E também durante o correspondente dia da semana, entre 00:00 e 05:00 da manhã:

-Angel Pine;
-Blueberry;
-Montgomery;
-Dillimore;
-Palomino Creek;

Não existe localização exata, tem que procurar na cidade mesmo, cada vez em um lugar diferente.

não é uma boa ideia encontrar ele..
pronto, aviso dado.

Skin feita por HybridTheory.

chupa cu.rar
Download v1.3
(191.62 KiB) Baixado 2574 vezes

Source Code:

Código: Selecionar tudo

SCRIPT_START
{

LVAR_INT scplayer chupa task_1 audio onMission lugar iHour iMin iDay
LVAR_FLOAT x y z angulo fVolume

GET_PLAYER_CHAR 0 scplayer

CONST_INT SFX_VOLUME_ADDRESS    0xB5FCCC
CONST_INT STATE_PLAY    1
GENERATE_RANDOM_INT_IN_RANGE 0 5 lugar

IF IS_AUSTRALIAN_GAME
    CREATE_CHAR PEDTYPE_SPECIAL SPECIAL09 0.0 0.0 0.0 chupa
ENDIF

main_loop:
WAIT 0

GET_CURRENT_DAY_OF_WEEK iDay
GET_TIME_OF_DAY iHour iMin
IF iHour >= 0
AND iHour <= 5
    READ_MEMORY 0x96ABA0 1 0 onMission
    IF onMission = FALSE
        IF NOT IS_CHAR_IN_ANY_CAR scplayer
            //angel pine - segunda
            IF iDay = 2
            OR lugar = 0
            OR lugar = 1
                IF LOCATE_CHAR_ANY_MEANS_2D scplayer -2139.4 -2403.1 150.0 150.0 FALSE
                    GENERATE_RANDOM_FLOAT_IN_RANGE -2214.9 -2064.0 x
                    GENERATE_RANDOM_FLOAT_IN_RANGE -2478.0 -2328.0 y
                    GOTO chupa0
                ENDIF
            ENDIF

            //blueberry - terça
            IF iDay = 3
            OR lugar = 1
            OR lugar = 2
                IF LOCATE_CHAR_ANY_MEANS_2D scplayer 256.6 -122.1 150.0 150.0 FALSE
                    GENERATE_RANDOM_FLOAT_IN_RANGE 181.9 331.0 x
                    GENERATE_RANDOM_FLOAT_IN_RANGE -197.0 -47.0 y
                    GOTO chupa0
                ENDIF
            ENDIF

            //montgomery - quarta
            IF iDay = 4
            OR lugar = 2
            OR lugar = 3
                IF LOCATE_CHAR_ANY_MEANS_2D scplayer 1283.0 266.6 150.0 150.0 FALSE
                    GENERATE_RANDOM_FLOAT_IN_RANGE 1208.9 1358.0 x
                    GENERATE_RANDOM_FLOAT_IN_RANGE 191.0 341.0 y
                ENDIF
            ENDIF

            //dillimore - quinta
            IF iDay = 5
            OR lugar = 3
            OR lugar = 4
                IF LOCATE_CHAR_ANY_MEANS_2D scplayer 711.1 -541.9 150.0 150.0 FALSE
                    GENERATE_RANDOM_FLOAT_IN_RANGE 636.9 786.0 x
                    GENERATE_RANDOM_FLOAT_IN_RANGE -616.0 -466.0 y
                    GOTO chupa0
                ENDIF
            ENDIF

            //palomino creek - sexta
            IF iDay = 6
            OR lugar = 4
            OR lugar = 0
                IF LOCATE_CHAR_ANY_MEANS_2D scplayer 2347.7 50.0 200.0 200.0 FALSE
                    GENERATE_RANDOM_FLOAT_IN_RANGE 2247.9 2447.0 x
                    GENERATE_RANDOM_FLOAT_IN_RANGE -50.0 150.0 y
                    GOTO chupa0
                ENDIF
            ENDIF

        ENDIF
    ENDIF
ENDIF

GOTO main_loop

chupa0:
WAIT 0
SET_CAR_DENSITY_MULTIPLIER 0.0
SET_PED_DENSITY_MULTIPLIER 0.0
IF LOCATE_CHAR_ANY_MEANS_2D scplayer x y 50.0 50.0 FALSE
    IF NOT DOES_CHAR_EXIST chupa
        LOAD_SPECIAL_CHARACTER 9 chupacu
        REQUEST_ANIMATION sex
        WHILE NOT HAS_SPECIAL_CHARACTER_LOADED 9
            WAIT 0
        ENDWHILE
        WHILE NOT HAS_ANIMATION_LOADED sex
            WAIT 0
        ENDWHILE

        GET_OFFSET_FROM_CHAR_IN_WORLD_COORDS scplayer 0.0 -9.9 0.0 x y z
        CREATE_CHAR PEDTYPE_GANG1 SPECIAL09 x y -100.0 chupa
        SET_ANIM_GROUP_FOR_CHAR chupa player
        SET_CHAR_PROOFS chupa 0 1 0 1 1
        SET_CHAR_SUFFERS_CRITICAL_HITS chupa FALSE
        SET_CHAR_HEALTH chupa 2000
        UNLOAD_SPECIAL_CHARACTER 9

        GET_OFFSET_FROM_CHAR_IN_WORLD_COORDS scplayer 0.0 1.0 0.0 x y z
        TASK_GO_STRAIGHT_TO_COORD chupa x y z 7 10000

        WHILE NOT LOCATE_CHAR_ANY_MEANS_CHAR_3D scplayer chupa 3.0 3.0 5.0 FALSE
            WAIT 0
            IF NOT LOCATE_CHAR_ANY_MEANS_CHAR_2D scplayer chupa 180.0 180.0 FALSE
            OR IS_CHAR_IN_ANY_CAR scplayer
            OR IS_CHAR_DEAD chupa
                IF DOES_CHAR_EXIST chupa
                    REMOVE_CHAR_ELEGANTLY chupa
                ENDIF
                SET_CAR_DENSITY_MULTIPLIER 1.0
                SET_PED_DENSITY_MULTIPLIER 1.0
                GENERATE_RANDOM_INT_IN_RANGE 0 5 lugar
                GOTO main_loop
            ENDIF
            GET_OFFSET_FROM_CHAR_IN_WORLD_COORDS scplayer 0.0 1.0 0.0 x y z
            TASK_GO_STRAIGHT_TO_COORD chupa x y z 7 10000
        ENDWHILE

        CLEAR_CHAR_TASKS_IMMEDIATELY chupa

        TASK_SAY scplayer 346
        SET_PLAYER_CONTROL 0 FALSE

        DO_FADE 500 FADE_OUT
        WAIT 2000

        GET_OFFSET_FROM_CHAR_IN_WORLD_COORDS scplayer 0.0 1.74 0.0 x y z
        SET_CHAR_COORDINATES chupa x y z

        GET_CHAR_HEADING scplayer angulo
        angulo += 180.0
        SET_CHAR_HEADING chupa angulo

        TASK_PLAY_ANIM_NON_INTERRUPTABLE chupa SEX_1_Cum_P sex 1.0 1 0 0 0 10600
        WAIT 600

        SET_PLAYER_CONTROL 0 TRUE
        OPEN_SEQUENCE_TASK task_1
        TASK_PLAY_ANIM -1 SEX_3_Fail_W sex 1.0 0 0 0 0 -1
        LOAD_AUDIO_STREAM "cleo\cleo_audio\chupa.mp3" audio
        READ_MEMORY SFX_VOLUME_ADDRESS 4 FALSE fVolume
        SET_AUDIO_STREAM_VOLUME audio fVolume
        SET_AUDIO_STREAM_STATE audio STATE_PLAY
        DO_FADE 500 FADE_IN
        TASK_DIE_NAMED_ANIM -1 SEX_3_Fail_W sex 1.0 -1
        CLOSE_SEQUENCE_TASK task_1
        PERFORM_SEQUENCE_TASK scplayer task_1
        CLEAR_SEQUENCE_TASK task_1
        
        WAIT 7500
        TASK_FLEE_CHAR chupa scplayer 100.0 10000

        WHILE LOCATE_CHAR_ANY_MEANS_2D scplayer x y 30.0 30.0 FALSE
            WAIT 0
        ENDWHILE

        MARK_CHAR_AS_NO_LONGER_NEEDED chupa
        SET_CAR_DENSITY_MULTIPLIER 1.0
        SET_PED_DENSITY_MULTIPLIER 1.0
        GENERATE_RANDOM_INT_IN_RANGE 0 5 lugar
    ENDIF
ENDIF

IF NOT LOCATE_CHAR_ANY_MEANS_2D scplayer x y 180.0 180.0 FALSE
    SET_CAR_DENSITY_MULTIPLIER 1.0
    SET_PED_DENSITY_MULTIPLIER 1.0
    GOTO main_loop
ENDIF

GOTO chupa0

}
SCRIPT_END

 

Re: chupa cu

Enviado: 24 Jul 2018, 11:24
por Pierre
Eu mudaria o nome para chupa-cabra...

Re: chupa cu

Enviado: 24 Jul 2018, 11:36
por Kaz
Mas o nome é chupa cu mesmo cara.

Re: chupa cu

Enviado: 24 Jul 2018, 12:31
por Kaneki-ken
nadalao escreveu:
23 Jul 2018, 23:11
Imagem

Ele aparece em 2 desses lugares por dia, entre 00:00 e 05:00 da manhã:

-Angel Pine;
-Blueberry;
-Montgomery;
-Dillimore;
-Palomino Creek;

não vou passar a localização exata, se virem procurando!

não é uma boa ideia encontrar ele, você será chupado!
pronto, aviso dado.

Skin feita por HybridTheory.

chupa cu.rar

Source Code:

Código: Selecionar tudo

SCRIPT_START
{

LVAR_INT scplayer chupa task_1 audio onMission lugar iHour iMin
LVAR_FLOAT x y z angulo fVolume

GET_PLAYER_CHAR 0 scplayer

CONST_INT SFX_VOLUME_ADDRESS    0xB5FCCC
CONST_INT STATE_PLAY    1
GENERATE_RANDOM_INT_IN_RANGE 0 5 lugar

IF IS_AUSTRALIAN_GAME
    CREATE_CHAR PEDTYPE_SPECIAL SPECIAL09 0.0 0.0 0.0 chupa
ENDIF

main_loop:
WAIT 0

GET_TIME_OF_DAY iHour iMin
IF iHour >= 0
AND iHour <= 5
    READ_MEMORY 0x96ABA0 1 0 onMission
    IF onMission = FALSE
        IF NOT IS_CHAR_IN_ANY_CAR scplayer
            //angel pine
            IF lugar = 0
            OR lugar = 1
                IF LOCATE_CHAR_ANY_MEANS_2D scplayer -2124.6 -2247.5 50.0 50.0 FALSE
                    GOTO chupa0
                ENDIF
            ENDIF

            //blueberry
            IF lugar = 1
            OR lugar = 2
                IF LOCATE_CHAR_ANY_MEANS_2D scplayer 192.5 -167.7 50.0 50.0 FALSE
                    GOTO chupa0
                ENDIF
            ENDIF

            //montgomery
            IF lugar = 2
            OR lugar = 3
                IF LOCATE_CHAR_ANY_MEANS_2D scplayer 1436.0 364.3 50.0 50.0 FALSE
                    GOTO chupa0
                ENDIF
            ENDIF

            //dillimore
            IF lugar = 3
            OR lugar = 4
                IF LOCATE_CHAR_ANY_MEANS_2D scplayer 683.6 -480.8 50.0 50.0 FALSE
                    GOTO chupa0
                ENDIF
            ENDIF

            //palomino creek
            IF lugar = 4
            OR lugar = 0
                IF LOCATE_CHAR_ANY_MEANS_2D scplayer 2510.9 -8.5 50.0 50.0 FALSE
                    GOTO chupa0
                ENDIF
            ENDIF
        ENDIF
    ENDIF
ENDIF

GOTO main_loop

chupa0:
WAIT 0
IF NOT DOES_CHAR_EXIST chupa
    LOAD_SPECIAL_CHARACTER 9 chupacu
    REQUEST_ANIMATION sex
    REQUEST_ANIMATION SUNBATHE
    WHILE NOT HAS_SPECIAL_CHARACTER_LOADED 9
        OR NOT HAS_ANIMATION_LOADED sex
        OR NOT HAS_ANIMATION_LOADED SUNBATHE
        WAIT 0
    ENDWHILE

    GET_OFFSET_FROM_CHAR_IN_WORLD_COORDS scplayer 0.0 -9.9 0.0 x y z
    CREATE_CHAR PEDTYPE_GANG1 SPECIAL09 x y -100.0 chupa
    SET_ANIM_GROUP_FOR_CHAR chupa player
    SET_CHAR_PROOFS chupa 0 1 0 1 1
    SET_CHAR_SUFFERS_CRITICAL_HITS chupa FALSE
    SET_CHAR_HEALTH chupa 2000
    UNLOAD_SPECIAL_CHARACTER 9

    GET_OFFSET_FROM_CHAR_IN_WORLD_COORDS scplayer 0.0 1.0 0.0 x y z
    TASK_GO_STRAIGHT_TO_COORD chupa x y z 7 10000

    WHILE NOT LOCATE_CHAR_ANY_MEANS_CHAR_3D scplayer chupa 3.0 3.0 5.0 FALSE
        WAIT 0
        IF NOT LOCATE_CHAR_ANY_MEANS_CHAR_2D scplayer chupa 180.0 180.0 FALSE
        OR IS_CHAR_IN_ANY_CAR scplayer
        OR IS_CHAR_DEAD chupa
            IF DOES_CHAR_EXIST chupa
                REMOVE_CHAR_ELEGANTLY chupa
            ENDIF
            GENERATE_RANDOM_INT_IN_RANGE 0 5 lugar
            GOTO main_loop
        ENDIF
        GET_OFFSET_FROM_CHAR_IN_WORLD_COORDS scplayer 0.0 1.0 0.0 x y z
        TASK_GO_STRAIGHT_TO_COORD chupa x y z 7 10000
    ENDWHILE

    CLEAR_CHAR_TASKS_IMMEDIATELY chupa

    TASK_SAY scplayer 346
    SET_PLAYER_CONTROL 0 FALSE

    DO_FADE 500 FADE_OUT
    WAIT 2000

    GET_OFFSET_FROM_CHAR_IN_WORLD_COORDS scplayer 0.0 1.74 0.0 x y z
    SET_CHAR_COORDINATES chupa x y z

    GET_CHAR_HEADING scplayer angulo
    angulo += 180.0
    SET_CHAR_HEADING chupa angulo

    TASK_PLAY_ANIM chupa SEX_1_Cum_P sex 1.0 1 0 0 0 10600
    WAIT 600

    SET_PLAYER_CONTROL 0 TRUE
    OPEN_SEQUENCE_TASK task_1
    TASK_PLAY_ANIM -1 SEX_3_Fail_W sex 1.0 0 0 0 0 -1
    LOAD_AUDIO_STREAM "cleo\cleo_audio\chupa.mp3" audio
    READ_MEMORY SFX_VOLUME_ADDRESS 4 FALSE fVolume
    SET_AUDIO_STREAM_VOLUME audio fVolume
    SET_AUDIO_STREAM_STATE audio STATE_PLAY
    DO_FADE 500 FADE_IN
    TASK_DIE_NAMED_ANIM -1 SEX_3_Fail_W sex 1.0 -1
    CLOSE_SEQUENCE_TASK task_1
    PERFORM_SEQUENCE_TASK scplayer task_1
    CLEAR_SEQUENCE_TASK task_1
    
    WAIT 7500
    TASK_FLEE_CHAR chupa scplayer 100.0 10000

    WHILE LOCATE_CHAR_ANY_MEANS_2D scplayer x y 30.0 30.0 FALSE
        WAIT 0
    ENDWHILE

    MARK_CHAR_AS_NO_LONGER_NEEDED chupa
    GENERATE_RANDOM_INT_IN_RANGE 0 5 lugar
ENDIF

IF NOT LOCATE_CHAR_ANY_MEANS_2D scplayer x y 180.0 180.0 FALSE
    GOTO main_loop
ENDIF

GOTO chupa0

}
SCRIPT_END

 

Que nego ousado kk :fts:

Re: chupa cu

Enviado: 24 Jul 2018, 12:32
por DelHaven
KKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKK G E N I A L 

Re: chupa cu

Enviado: 24 Jul 2018, 12:38
por Jean_005
nadalao escreveu:
23 Jul 2018, 23:11
não é uma boa ideia encontrar ele, você será chupado!
:5!!:

Re: Chupa CU

Enviado: 24 Jul 2018, 14:28
por nadalao
Atualizei o script, acho que agora não vai precisar de atualizações futuras.

(tive que atualizar de novo saporra :peepo4:)

Re: Chupa CU

Enviado: 24 Jul 2018, 18:25
por FilipeS
Kkkkkkkkkkkkk incrível, saio correndo sem olhar pra trás..

Re: Chupa CU

Enviado: 24 Jul 2018, 21:25
por EduzumakiRtD
:5!!:

Re: Chupa CU

Enviado: 24 Jul 2018, 22:36
por Jean_005
Crash.
Imagem

Re: Chupa CU

Enviado: 25 Jul 2018, 01:24
por set2523
melhor ideia que já vi

Re: Chupa CU

Enviado: 25 Jul 2018, 09:55
por nadalao
Jean_005 escreveu:
24 Jul 2018, 22:36
Crash.
Imagem

Obrigado pelo feedback!
Corrigi o problema e aproveitei pra adicionar uma funçãozinha, agora deve funcionar de boas.

Re: Chupa CU

Enviado: 25 Jul 2018, 12:01
por Jean_005
nadalao escreveu:
25 Jul 2018, 09:55
Jean_005 escreveu:
24 Jul 2018, 22:36
Crash.
Imagem

Obrigado pelo feedback!
Corrigi o problema e aproveitei pra adicionar uma funçãozinha, agora deve funcionar de boas. 
De nada. =)
 

Re: Chupa CU

Enviado: 25 Jul 2018, 23:31
por THSOUZZA
Inacreditável kkkkkkkkkkkkkkkkkkkkkkkkkk
Vou ser obrigado a instalar essa maravilha!

Re: Chupa CU

Enviado: 15 Set 2018, 09:37
por Junior_Djjr
kkkkkkkkkkkkkkk recebi um aviso do Google sinalizando esta página como conteúdo sexual.