Mod Cleo Tapete de Pregos

Mod de tapete de pregos para GTA SA. Com esse mod você poderá criar um tapete de pregos capaz de furar os pneus dos veículos.

Esse mod requer Cleo 4

Download Mod Tapete de Pregos

Para instalar esse mod basta colocar o arquivo na pasta cleo na raiz do gta sa.
Para usar o mod entre em um carro e pressione T.

Código do mod (Source):

{$CLEO .cs}

thread "tapete"



:INIT

if

056D:   actor $PLAYER_ACTOR defined

jf @INIT

wait 5000



CONST

MODELO_TAPETE = 2899

CARRO_JOG = 1@

XCAR = 2@

YCAR = 3@

ZCAR = 4@

TAPETE = 5@

TAPETECAR = 6@

DIST_TAPETE = 7@

END





:INI

00A0: store_actor $PLAYER_ACTOR position_to $X $Y $Z



if and

0AB0:   key_pressed 84 //T

00DF:   actor $PLAYER_ACTOR driving

then

    wait 0

    jump @Tapete_pregos

    wait 500

end



wait 10

gosub @Atualiza_tapete



wait 0

jump @INI

0A93: end_custom_thread











:Tapete_pregos

if

00DF:   actor $PLAYER_ACTOR driving

then

    03C0: CARRO_JOG = actor $PLAYER_ACTOR car

    0407: store_coords_to XCAR YCAR ZCAR from_car CARRO_JOG with_offset -0.337 1.566 -0.6

    :criar_tapete

    0247: load_model MODELO_TAPETE

    if

    0248:   model MODELO_TAPETE available

    then

        0107: TAPETE = create_object MODELO_TAPETE at XCAR YCAR ZCAR

    else

        wait 0

        jump @criar_tapete

    end

    0249: release_model MODELO_TAPETE

    0ACA: show_text_box "Tapete criado"

end



wait 0

jump @INI



:Atualiza_tapete

if

03CA:   object TAPETE exists

then

    073E: get_car_in_sphere XCAR YCAR ZCAR radius 4.0 model -1 handle_as TAPETECAR

  

    if

    056E:   car TAPETECAR defined

    then

        wait 10

        04FE: deflate_tire 0 on_car TAPETECAR

        wait 10

        04FE: deflate_tire 1 on_car TAPETECAR

        wait 10

        04FE: deflate_tire 2 on_car TAPETECAR

        wait 10

        04FE: deflate_tire 3 on_car TAPETECAR

        01C3: remove_references_to_car TAPETECAR

    end

  

    0509: DIST_TAPETE = distance_between_XY $X $Y and_XY XCAR YCAR

    if

    0021:   DIST_TAPETE > 100.0

    then

        0108: destroy_object TAPETE

        01C4: remove_references_to_object TAPETE

  

    end

end

wait 0

0051: return