Model Switcher.sc

SCRIPT_START
{
    NOP
    LVAR_INT sc_char sc_model sc_player
    GET_PLAYER_CHAR 0 sc_player  

    WHILE TRUE
        GET_CHAR_PLAYER_IS_TARGETING 0 sc_char
        IF sc_char > 0
            GET_CHAR_MODEL sc_char sc_model
            IF IS_KEY_PRESSED VK_RETURN
                CLEO_CALL change_model 0 (sc_player,sc_model)       
            ENDIF
        ENDIF
        IF IS_KEY_PRESSED VK_RSHIFT
        AND IS_KEY_PRESSED VK_RETURN
            CLEO_CALL change_model 0 (sc_player,0)     
        ENDIF
        WAIT 0
    ENDWHILE
}
{
    LVAR_INT sc_player,sc_model
    change_model:
    WHILE NOT IS_MODEL_AVAILABLE sc_model
        REQUEST_MODEL sc_model
    ENDWHILE
    LOAD_ALL_MODELS_NOW
    SET_PLAYER_MODEL 0 sc_model
    MARK_MODEL_AS_NO_LONGER_NEEDED sc_model
    CLEAR_CHAR_TASKS sc_player
    CLEO_RETURN 0
}
SCRIPT_END