Compartilhe
Robson Oliveira S.
Mensagens Nível 1
Mensagens Nível 1
Mensagens : 41
Reputação : 8
Desde : 16/03/2018
Ver perfil do usuário
em Sex 16 Mar 2018, 01:08
Mod pedir dinheiro a peds a apertar uma tecla, eles podem reagir de 3 maneiras diferentes

Download link - https://drive.google.com/open?id=1vR9CME9c6WFHOgOQlxxwJNbg4BZ5pyvi
HybridTheory
Scripter CLEO - Básico
Scripter CLEO - Básico
Título : Boludo
Mensagens : 198
Reputação : 40
Desde : 29/01/2018
Idade : 17
Localização : Buenos Aires - Argentina
Ver perfil do usuário
em Sex 16 Mar 2018, 01:20
Você poderia ter usado Switch
http://brmodstudio.forumeiros.com/t6041-15-mais-sobre-condicoes

Muda nada no funcionamento, mas o código fica mais "elegante" assim.

______________________________


Robson Oliveira S.
Mensagens Nível 1
Mensagens Nível 1
Mensagens : 41
Reputação : 8
Desde : 16/03/2018
Ver perfil do usuário
em Sex 16 Mar 2018, 01:26
@HybridTheory escreveu:Você poderia ter usado Switch
http://brmodstudio.forumeiros.com/t6041-15-mais-sobre-condicoes

Muda nada no funcionamento, mas o código fica mais "elegante" assim.

A primeira versão usei Switch, mas não funcionou.
Salgado_Doce
Mensagens Nível 1
Mensagens Nível 1
Título : Titulo
Mensagens : 40
Reputação : 0
Desde : 05/03/2018
Idade : 12
Localização : Algum lugar no mundo
Ver perfil do usuário
em Sex 16 Mar 2018, 11:26
Poderia colocar pro char dar uma quantia aleatória de dinheiro :]  Vai que o CJ da sorte? :)
Codigo:

Código:

SCRIPT_START
{
LVAR_INT scplayer char i dinheiro

GET_PLAYER_CHAR 0 scplayer

main_loop:
WAIT 0

IF IS_KEY_PRESSED VK_KEY_K
AND GET_CHAR_PLAYER_IS_TARGETING 0 char

   GENERATE_RANDOM_INT_IN_RANGE 1 4 i

   SWITCH i

   CASE 1
       TASK_SAY scplayer 300
       PRINT_STRING_NOW "Voce: me da dinheiro?" 2000
       TASK_PAUSE char 1000
       wait 2000
       TASK_LOOK_AT_CHAR char scplayer -1
       PRINT_STRING_NOW "Va trabalhar!" 2000
       FREEZE_CHAR_POSITION char 0
   BREAK

   CASE 2  
       TASK_SAY scplayer 300
       PRINT_STRING_NOW "Voce: me da dinheiro?" 2000
       TASK_PAUSE char -1
       wait 2000
       TASK_LOOK_AT_CHAR char scplayer 1000
       PRINT_STRING_NOW "OK!" 2000
       GENERATE_RANDOM_INT_IN_RANGE 2 100 dinheiro
       ADD_SCORE 0 dinheiro
       PRINT_STRING_NOW "Voce: obrigado!" 2000
       FREEZE_CHAR_POSITION char 0
   BREAK

   CASE 3
       TASK_SAY scplayer 300
       PRINT_STRING_NOW "Voce: me da dinheiro?" 2000
       TASK_PAUSE char 1000
       wait 2000
       TASK_LOOK_AT_CHAR char scplayer -1
       PRINT_STRING_NOW "Eu nao tenho" 2000
       FREEZE_CHAR_POSITION char 0
   BREAK

   ENDSWITCH

ENDIF

WHILE IS_KEY_PRESSED VK_KEY_K
   WAIT 0
ENDWHILE

GOTO main_loop
}
SCRIPT_END
Eu usei Switch e deu certo somuchwin


Última edição por Salgado_Doce em Sex 16 Mar 2018, 12:09, editado 2 vez(es)

______________________________
To sem criatividade megusta
Um Geek
Scripter CLEO - Intermediário
Scripter CLEO - Intermediário
Título : Carinha que mora logo ali
Mensagens : 761
Reputação : 160
Desde : 07/03/2017
Localização : BH - MG
Link : https://gta-geek.blogspot.com.br/
Ver perfil do usuáriohttps://gta-geek.blogspot.com.br/
em Sex 16 Mar 2018, 11:43
Sei que esta começando e esta indo muito bem, mas seria interessante um que os mendigos pedissem ao CJ :)

______________________________

.::
Os mods que crio serão colocados no meu workshop link
Robson Oliveira S.
Mensagens Nível 1
Mensagens Nível 1
Mensagens : 41
Reputação : 8
Desde : 16/03/2018
Ver perfil do usuário
em Sex 16 Mar 2018, 12:01
@Salgado_Doce escreveu:Poderia colocar pro char dar uma quantia aleatória de dinheiro :]  Vai que o CJ da sorte? :)
Codigo:

Código:
SCRIPT_START
{
LVAR_INT scplayer char i dinheiro

GET_PLAYER_CHAR 0 scplayer

main_loop:
WAIT 0

IF IS_KEY_PRESSED VK_KEY_K
AND GET_CHAR_PLAYER_IS_TARGETING 0 char

    GENERATE_RANDOM_INT_IN_RANGE 1 4 i

    IF i = 1
        TASK_SAY scplayer 300
        PRINT_STRING_NOW "Voce: me da dinheiro?" 2000
        TASK_PAUSE char 1000
        wait 2000
        TASK_LOOK_AT_CHAR char scplayer -1
        PRINT_STRING_NOW "Va trabalhar!" 2000
        FREEZE_CHAR_POSITION char 0
    ENDIF

    IF i = 2  
        TASK_SAY scplayer 300
        PRINT_STRING_NOW "Voce: me da dinheiro?" 2000
        TASK_PAUSE char -1
        wait 2000
        TASK_LOOK_AT_CHAR char scplayer 1000
        PRINT_STRING_NOW "OK!" 2000
        GENERATE_RANDOM_INT_IN_RANGE 2 100 dinheiro
        ADD_SCORE 0 dinheiro
        PRINT_STRING_NOW "Voce: obrigado!" 2000
        FREEZE_CHAR_POSITION char 0
    ENDIF

    if i = 3
        TASK_SAY scplayer 300
        PRINT_STRING_NOW "Voce: me da dinheiro?" 2000
        TASK_PAUSE char 1000
        wait 2000
        TASK_LOOK_AT_CHAR char scplayer -1
        PRINT_STRING_NOW "Eu nao tenho" 2000
        FREEZE_CHAR_POSITION char 0
    ENDIF
ENDIF

GOTO main_loop
}
SCRIPT_END

É nem tinha pensado nisso...
Robson Oliveira S.
Mensagens Nível 1
Mensagens Nível 1
Mensagens : 41
Reputação : 8
Desde : 16/03/2018
Ver perfil do usuário
em Sex 16 Mar 2018, 12:12
@Um Geek escreveu:Sei que esta começando e esta indo muito bem, mas seria interessante um que os mendigos pedissem ao CJ :)

É, mas ficaria mais complicado :v:
Mas vou tentar
Conteúdo patrocinado
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum