O GTA V possui uma funcionalidade nativa bem interessante, onde é possível trocar seus acessórios como óculos, chapéus e bonés sem precisar ir para casa ou uma loja. Baseado nessa funcionalidade, eu criei o Menu Interativo do GTA V no GTA SA, mas de um jeito simples e prático, assim como as outras coisas do jogo.
Com ele você poderá tirar e vestir de novo seus acessórios (chapéus, óculos, correntes e relógios) anteriormente comprados ou vestidos em casa. Com isso não precisará mais de ir a uma loja ou casa para colocar um simples acessório que faz toda diferença no gameplay.
É bastante simples, foi criado para uso pessoal, pois particularmente eu gosto de fazer missões entrando no personagem, como numa guerra de gangues, vestir uma bandana verde e
meter bala nos balla. Mas com o resultado, acabei caprichando mais e decidi compartilhar aqui, por ser uma ideia muito boa que com certeza melhoraria o gameplay das pessoas.
O mod é configurável por ini e inclui as funções e compartibilidades:
- Compatível com joystick e podendo mudar por .ini o botão e a tecla do teclado para ativar o mod.
- Caso estiver usando o teclado, o botão que ativa o mod pelo joystick não irá funcionar, assim não ficando com 2 comandos.
- Compatível com o mod de Usar bandanas e óculos ao mesmo tempo.
- Configurar por .ini a linguagem para PT-BR ou ENG-US.
- Configurar por .ini as coordenadas XY do menu.
- Compatível com cutscenes (no caso não se ativa e desativa ao estiver em uma).
- Não se ativa ao usar outros menus ou outra função que desabilite o controle do player
Pontos Ruins:
- O mod não detecta a tradução do jogo, tendo que mudar no arquivo ini.
- Problema na tradução para português, os acentos ficam estranhos mesmo não usando o vscode para a criação e edição do .fxt (mas acredito que o problema seja no meu computador).
- Lag spike ao mudar de acessório, mas é imperceptível se você não ficar repetitivamente colocando e tirando um acessório enquanto dirige.
Necessário CLEO+.
Download
Source code (+190 linhas)
Código: Selecionar tudo
SCRIPT_START
{
NOP
LVAR_INT scplayer menu accepted_item key currentTexture currentModel
LVAR_INT hat_model hat_texture lang anim
LVAR_INT glasses_model glasses_texture
LVAR_INT chains_model chains_texture
LVAR_INT watch_model watch_texture
LVAR_FLOAT x y
//language
CONST_INT ENG 0
CONST_INT PT 1
//body parts
CONST_INT GLASSES 15
CONST_INT HAT 16
CONST_INT CHAINS 13
CONST_INT WATCH 14
GET_PLAYER_CHAR 0 scplayer
WHILE TRUE
WAIT 0
IF IS_PLAYER_CONTROL_ON 0
AND NOT IS_ON_CUTSCENE
READ_INT_FROM_INI_FILE "cleo\Interaction Menu.ini" "Interaction Menu Controls" "KeyboardKey" key
IF NOT READ_INT_FROM_INI_FILE "cleo\Interaction Menu.ini" "Interaction Menu Controls" "KeyboardKey" key
WRITE_INT_TO_INI_FILE 77 "cleo\Interaction Menu.ini" "Interaction Menu Controls" "KeyboardKey" //m
ENDIF
IF IS_KEY_PRESSED key
AND NOT IS_PC_USING_JOYPAD
GOSUB DoThings
ELSE
READ_INT_FROM_INI_FILE "cleo\Interaction Menu.ini" "Interaction Menu Controls" "PadButton" key
IF NOT READ_INT_FROM_INI_FILE "cleo\Interaction Menu.ini" "Interaction Menu Controls" "PadButton" key
WRITE_INT_TO_INI_FILE 9 "cleo\Interaction Menu.ini" "Interaction Menu Controls" "PadButton" //DPADUP group stop following
ENDIF
IF IS_BUTTON_PRESSED PAD1 key
AND IS_PC_USING_JOYPAD
GOSUB DoThings
ENDIF
ENDIF
ENDIF
ENDWHILE
DoThings:
GOSUB CreateMenu
SET_PLAYER_CONTROL 0 FALSE
WHILE NOT IS_BUTTON_PRESSED PAD1 TRIANGLE
AND NOT IS_CHAR_DEAD scplayer
AND NOT IS_ON_CUTSCENE
WAIT 0
IF IS_BUTTON_PRESSED PAD1 CROSS
GET_MENU_ITEM_SELECTED menu accepted_item
SWITCH accepted_item
CASE 0
GET_CLOTHES_ITEM 0 HAT currentTexture currentModel
IF currentTexture = 0
AND currentModel = 0
IF NOT hat_texture = 0
AND NOT hat_Model = 0
GIVE_PLAYER_CLOTHES 0 hat_texture hat_model HAT
BUILD_PLAYER_MODEL 0
ENDIF
ELSE
hat_texture = currentTexture
hat_model = currentModel
GIVE_PLAYER_CLOTHES 0 0 0 HAT
BUILD_PLAYER_MODEL 0
ENDIF
BREAK
CASE 1
GET_CLOTHES_ITEM 0 GLASSES currentTexture currentModel
IF currentTexture = 0
AND currentModel = 0
IF NOT glasses_texture = 0
AND NOT glasses_Model = 0
GIVE_PLAYER_CLOTHES 0 glasses_texture glasses_model GLASSES
BUILD_PLAYER_MODEL 0
ENDIF
ELSE
glasses_texture = currentTexture
glasses_model = currentModel
GIVE_PLAYER_CLOTHES 0 0 0 GLASSES
BUILD_PLAYER_MODEL 0
ENDIF
BREAK
CASE 2
GET_CLOTHES_ITEM 0 CHAINS currentTexture currentModel
IF currentTexture = 0
AND currentModel = 0
IF NOT chains_texture = 0
AND NOT chains_Model = 0
GIVE_PLAYER_CLOTHES 0 chains_texture chains_model CHAINS
BUILD_PLAYER_MODEL 0
ENDIF
ELSE
chains_texture = currentTexture
chains_model = currentModel
GIVE_PLAYER_CLOTHES 0 0 0 CHAINS
BUILD_PLAYER_MODEL 0
ENDIF
BREAK
CASE 3
GET_CLOTHES_ITEM 0 WATCH currentTexture currentModel
IF currentTexture = 0
AND currentModel = 0
IF NOT watch_texture = 0
AND NOT watch_Model = 0
GIVE_PLAYER_CLOTHES 0 watch_texture watch_model WATCH
BUILD_PLAYER_MODEL 0
ENDIF
ELSE
watch_texture = currentTexture
watch_model = currentModel
GIVE_PLAYER_CLOTHES 0 0 0 WATCH
BUILD_PLAYER_MODEL 0
ENDIF
BREAK
ENDSWITCH
WHILE IS_BUTTON_PRESSED PAD1 CROSS
WAIT 0
ENDWHILE
ENDIF
ENDWHILE
CLEAR_CHAR_TASKS scplayer
SET_PLAYER_CONTROL 0 TRUE
DELETE_MENU menu
RETURN
CreateMenu:
CLEO_CALL Ini 0 (lang anim, x y)
IF lang = ENG
CREATE_MENU CTXM01 x y 150.0 1 TRUE TRUE TRUE menu
SET_MENU_COLUMN menu 0 DUMMY CTXM02 CTXM03 CTXM04 CTXM05 DUMMY DUMMY DUMMY DUMMY DUMMY DUMMY DUMMY DUMMY
ELSE
CREATE_MENU CTXM06 x y 150.0 1 TRUE TRUE TRUE menu
SET_MENU_COLUMN menu 0 DUMMY CTXM07 CTXM08 CTXM09 CTXM10 DUMMY DUMMY DUMMY DUMMY DUMMY DUMMY DUMMY DUMMY
ENDIF
RETURN
}
{
Ini:
LVAR_INT bool int
LVAR_TEXT_LABEL16 s
LVAR_FLOAT X Y
READ_STRING_FROM_INI_FILE "cleo\Interaction Menu.ini" "Interaction Menu" "Language" s
IF NOT READ_STRING_FROM_INI_FILE "cleo\Interaction Menu.ini" "Interaction Menu" "Language" s
s = LANG_ENG
WRITE_STRING_TO_INI_FILE $s "cleo\Interaction Menu.ini" "Interaction Menu" "Language"
ENDIF
READ_FLOAT_FROM_INI_FILE "cleo\Interaction Menu.ini" "Interaction Menu" "MenuX" X
IF NOT READ_FLOAT_FROM_INI_FILE "cleo\Interaction Menu.ini" "Interaction Menu" "MenuX" X
WRITE_FLOAT_TO_INI_FILE 90.0 "cleo\Interaction Menu.ini" "Interaction Menu" "MenuX"
ENDIF
READ_FLOAT_FROM_INI_FILE "cleo\Interaction Menu.ini" "Interaction Menu" "MenuY" Y
IF NOT READ_FLOAT_FROM_INI_FILE "cleo\Interaction Menu.ini" "Interaction Menu" "MenuY" Y
WRITE_FLOAT_TO_INI_FILE 180.0 "cleo\Interaction Menu.ini" "Interaction Menu" "MenuY"
ENDIF
IF s = LANG_PTBR
int = 1
ELSE
int = 0
ENDIF
CLEO_RETURN 0 int bool X Y
}
SCRIPT_END
