{$CLEO .cs}
0000:
0661: NOP "Made by Opcode.eXe"
0661: NOP "www.youtube.com/OpcodeXe"
0661: NOP "www.ugbase.eu"

WHILE TRUE
    WAIT 0
    IF
    0AB0: 121
    THEN
        REPEAT
            WAIT 0
        UNTIL 8AB0: 121
        IF
        0@ == TRUE
        THEN
            0@ = FALSE
        ELSE
            0@ = TRUE
        END
        PRINTF "~r~Triggerfinger:~w~ state: %d" 1000 0@
    END
    IF
    0@ == TRUE
    THEN
        IF and
        not Actor.Dead($PLAYER_ACTOR)
        0AB0: 2
        THEN
            0A8D: 1@ = read_memory 0xB6F3B8 size 4 virtual_protect 0
            1@ += 0x79C
            0A8D: 2@ = read_memory 1@ size 4 virtual_protect 0
            IF
            2@ > 0
            THEN
                8@ = 0xB73458
                8@ += 34 // FIRE_BULLET
                0A8C: write_memory 8@ size 4 value 255 virtual_protect 0
                WAIT 100
                0A8D: 1@ = read_memory 0xB6F3B8 size 4 virtual_protect 0
                1@ += 0x79C
                0A8C: write_memory 1@ size 4 value 0 virtual_protect 0
            END
        
        END
        
        
        
        
    END
END

{$CLEO}
thread "Погода"   

:0
wait 0
if Samp.Available()
jf @0

0B34: samp register_client_command "setweather" to_label @1

while true
wait 0
    
end

:1
0B35: samp 0@ = get_last_command_params
if 0AD4: 1@ = scan_string 0@ format "%d" 2@
then
    if and
    2@ > 0
    2@ < 22
    then
        //Model.Available(2@)
        //038B: load_requested_models
        01b6: set_weather 2@
        else
        chatmsg "Ид погоды от 1 до 22" 0xFFF4B800
    end
    else
    chatmsg " Введите /setweather [Ид погоды]" 0xFFF4B800
end
Samp.CmdRet()