nadalao files v1

bigfoot.cs

SCRIPT_START
{

LVAR_INT scplayer início curWeather bigfoot lugar horas minutos vida1 vida2 colete1 colete2 grupo marca tempo dia[2]
LVAR_FLOAT x[3] y[3] z[3]

GET_PLAYER_CHAR 0 scplayer

IF IS_AUSTRALIAN_GAME
    CREATE_CHAR PEDTYPE_SPECIAL SPECIAL04 0.0 0.0 0.0 bigfoot
ENDIF


main_loop:

    WAIT 0

    GET_CURRENT_DAY_OF_WEEK dia[0]
    GET_TIME_OF_DAY horas minutos
    READ_MEMORY 0xC81320 2 0 curWeather

    IF horas >= 0
    AND horas <= 5
    AND NOT dia[0] = dia[1]

        SWITCH lugar
            CASE 0
                GENERATE_RANDOM_FLOAT_IN_RANGE -800.0 -1050.5 x[0]
                GENERATE_RANDOM_FLOAT_IN_RANGE -2166.7 -2416.7 y[0]
                IF LOCATE_CHAR_ANY_MEANS_3D scplayer -924.5 -2291.7 51.0 250.0 250.0 250.0 TRUE
                    GOTO bigfoot0
                ENDIF
                BREAK
            CASE 1
                GENERATE_RANDOM_FLOAT_IN_RANGE -317.9 -617.9 x[0]
                GENERATE_RANDOM_FLOAT_IN_RANGE -2330.2 -2630.2 y[0]
                IF LOCATE_CHAR_ANY_MEANS_3D scplayer -467.9 -2480.2 114.9 250.0 250.0 250.0 TRUE
                    GOTO bigfoot0
                ENDIF
                BREAK
            CASE 2
                GENERATE_RANDOM_FLOAT_IN_RANGE -535.9 -735.9 x[0]
                GENERATE_RANDOM_FLOAT_IN_RANGE -1861.8 -2061.8 y[0]
                IF LOCATE_CHAR_ANY_MEANS_3D scplayer -635.9 -1961.8 37.0 200.0 200.0 200.0 TRUE
                    GOTO bigfoot0
                ENDIF
                BREAK
        ENDSWITCH

    ELSE // dia

        IF curWeather = 8
        OR curWeather = 9
        OR curWeather = 13

            SWITCH lugar
                CASE 0
                    GENERATE_RANDOM_FLOAT_IN_RANGE -800.0 -1050.5 x[0]
                    GENERATE_RANDOM_FLOAT_IN_RANGE -2166.7 -2416.7 y[0]
                    IF LOCATE_CHAR_ANY_MEANS_3D scplayer -924.5 -2291.7 51.0 250.0 250.0 250.0 TRUE
                        GOTO bigfoot0
                    ENDIF
                    BREAK

                CASE 1
                    GENERATE_RANDOM_FLOAT_IN_RANGE -317.9 -617.9 x[0]
                    GENERATE_RANDOM_FLOAT_IN_RANGE -2330.2 -2630.2 y[0]
                    IF LOCATE_CHAR_ANY_MEANS_3D scplayer -467.9 -2480.2 114.9 250.0 250.0 250.0 TRUE
                        GOTO bigfoot0
                    ENDIF
                    BREAK

                CASE 2
                    GENERATE_RANDOM_FLOAT_IN_RANGE -535.9 -735.9 x[0]
                    GENERATE_RANDOM_FLOAT_IN_RANGE -1861.8 -2061.8 y[0]
                    IF LOCATE_CHAR_ANY_MEANS_3D scplayer -635.9 -1961.8 37.0 200.0 200.0 200.0 TRUE
                        GOTO bigfoot0
                    ENDIF
                    BREAK
            ENDSWITCH
        ENDIF
    ENDIF
            
GOTO main_loop

bigfoot0:
    LOAD_SPECIAL_CHARACTER 7 bigfooo
    WHILE NOT HAS_SPECIAL_CHARACTER_LOADED 7
        WAIT 0
    ENDWHILE
    CREATE_CHAR PEDTYPE_MISSION1 SPECIAL07 x[0] y[0] -100.0 bigfoot
    UNLOAD_SPECIAL_CHARACTER 7

    SET_ANIM_GROUP_FOR_CHAR bigfoot oldman
    SET_CHAR_USES_UPPERBODY_DAMAGE_ANIMS_ONLY bigfoot, TRUE
    SET_CHAR_PROOFS bigfoot 0 0 0 0 1
    SET_CHAR_SUFFERS_CRITICAL_HITS bigfoot FALSE
    SET_CHAR_HEALTH bigfoot 4000
    SET_CHAR_DROWNS_IN_WATER bigfoot TRUE
    SET_CHAR_SHOOT_RATE bigfoot 60
    SET_CHAR_ACCURACY bigfoot 100
    CREATE_GROUP 0 grupo
    TASK_WANDER_STANDARD bigfoot

    WHILE NOT LOCATE_CHAR_ANY_MEANS_CHAR_3D scplayer bigfoot 90.0 90.0 90.0 FALSE
        WAIT 0  
        IF IS_CHAR_IN_WATER bigfoot
            GOTO release2
        ENDIF        
        IF NOT LOCATE_CHAR_ANY_MEANS_CHAR_3D scplayer bigfoot 300.0 300.0 300.0 FALSE
            GOTO release2
        ENDIF
        IF IS_CHAR_DEAD bigfoot
        OR IS_CHAR_DEAD scplayer        
            GOTO release
        ENDIF
    ENDWHILE

    SET_ANIM_GROUP_FOR_CHAR bigfoot player
    TASK_SMART_FLEE_CHAR bigfoot scplayer 500.0 100000

    WHILE NOT IS_CHAR_DEAD scplayer
        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 bigfoot 200.0 200.0 FALSE
        AND NOT IS_CHAR_DEAD scplayer
            WAIT 0
            GET_CHAR_HEALTH scplayer vida1
            GET_CHAR_ARMOUR scplayer colete1
            IF IS_CHAR_DEAD bigfoot
            OR IS_CHAR_DEAD scplayer
                REMOVE_CHAR_FROM_GROUP bigfoot
                MARK_CHAR_AS_NO_LONGER_NEEDED bigfoot
            ENDIF
            SWITCH lugar
                CASE 0
                    IF NOT LOCATE_CHAR_ANY_MEANS_3D bigfoot -924.5 -2291.7 51.0 250.0 250.0 250.0 FALSE
                        GOTO release
                    ENDIF
                    BREAK
                CASE 1
                    IF NOT LOCATE_CHAR_ANY_MEANS_3D bigfoot -467.9 -2480.2 114.9 250.0 250.0 250.0 FALSE
                        GOTO release
                    ENDIF
                    BREAK
                CASE 2
                    IF NOT LOCATE_CHAR_ANY_MEANS_3D bigfoot -635.9 -1961.8 37.0 200.0 200.0 200.0 FALSE
                        GOTO release
                    ENDIF
                    BREAK
            ENDSWITCH
            IF IS_CHAR_DEAD bigfoot
            OR IS_CHAR_DEAD scplayer 
            OR IS_CHAR_IN_WATER bigfoot
                GOTO release
            ENDIF
            IF HAS_CHAR_BEEN_DAMAGED_BY_CHAR bigfoot scplayer
                CLEAR_CHAR_LAST_DAMAGE_ENTITY scplayer
                TASK_KILL_CHAR_ON_FOOT bigfoot scplayer
            ENDIF        
        ENDWHILE
    CLEO_CALL dano_bigfoot 0 scplayer bigfoot
    ENDWHILE


/////////////////////////////////////

release:
    dia[1] = dia[0] 
release2:
    GENERATE_RANDOM_INT_IN_RANGE 0 3 lugar
    IF DOES_CHAR_EXIST bigfoot
        REMOVE_CHAR_FROM_GROUP bigfoot
        REMOVE_GROUP grupo
        MARK_CHAR_AS_NO_LONGER_NEEDED bigfoot
        REMOVE_CHAR_ELEGANTLY bigfoot
    ENDIF
GOTO main_loop
}

{
LVAR_INT scplayer bigfoot
dano_bigfoot:
    IF HAS_CHAR_BEEN_DAMAGED_BY_CHAR scplayer bigfoot
        DAMAGE_CHAR scplayer 35 1
    ENDIF
CLEO_RETURN 0
}
SCRIPT_END