Banco e sistema de pagamento de contas

Para criar um banco eletronico, primeiro Entre em Scripting>Variables/Switches e clique em Edit Global Variables. Crie uma variável de nome "Banco" com valor 0, e, 3 switches, chamados: C__agua | C__luz | C__internet depois vá no mapa desejado e coloque o banco eletronico,
( resorce : title-set ou enviorements ) e crie um script action presed beside zone, e então clique em text, e cole o seguinte código:

Código:

LOCAL dep
LOCAL saq
LOCAL
:g1
MsgBox.Show("Transação:" & "\Q" & "Depositar" & "\Q" & "Sacar" & "\Q" & "Ver Saldo" & "\Q" & "Pagar Contas" & "\Q" & "Sair")
MsgBox.Hide
IF MsgBox.SelectedNumber = 0
    MsgBox.Show("quanto deseja depositar?\T")
    MsgBox.Hide
    SET dep = MsgBox.Input
    IF dep > Main.Money
        MsgBox.Show("Seu dinheiro é insuficiente para o deposito desejado")
        MsgBox.Hide
    ELSE
        SET banco = banco + dep
        SET Main.Money = Main.Money - dep
        MsgBox.Show("Transição concluida")
        MsgBox.Hide
    ENDIF
ELSEIF MsgBox.SelectedNumber = 1
    MsgBox.Show("quanto deseja sacar?\T")
    MsgBox.Hide
    SET saq = MsgBox.Input
    IF saq > banco
        MsgBox.Show("Seu dinheiro é insuficiente para o deposito desejado")
        MsgBox.Hide
    ELSE
        SET banco = banco - saq
        SET Main.Money = Main.Money + saq
        MsgBox.Show("Transição concluida")
        MsgBox.Hide
    ENDIF
ELSEIF MsgBox.SelectedNumber = 2
    MsgBox.Show("Você contem " & banco & " em sua conta" & "\Q" & "Retornar" & "\Q" & "Sair")
    MsgBox.Hide
    IF MsgBox.SelectedNumber = 0
        GOTO g1
    ENDIF
ELSEIF MsgBox.SelectedNumber = 3
    MsgBox.Show("Pagar Qual Conta?" & "\Q" & "Eletricidade ( 50$ )" & "\Q" & "Água ( 50$ )" & "\Q" & "Internet ( 50$ )" & "\Q" & "Retonar" & "\Q" & "Sair")
    MsgBox.Hide
    IF MsgBox.SelectedNumber = 0
        IF C__luz
            IF Main.Money >= 50
                SET C__luz = "off"
                MsgBox.Show("Você não tem mais esta conta")
                MsgBox.Hide
            ELSE
                :g20
                MsgBox.Show("Você não tem dinheiro suficiente para esta transição" & "\Q" & "Retornar" & "\Q" & "sair")
                MsgBox.Hide
                IF MsgBox.SelectedNumber = 0
                    GOTO g1
                ENDIF
            ENDIF
        ELSE
            MsgBox.Show("Você não Prescisa pagar esta conta ainda")
            MsgBox.Hide
        ENDIF
    ELSEIF MsgBox.SelectedNumber = 1
        IF C__agua
            IF Main.Money >= 50
                SET C__agua = "off"
                MsgBox.Show("Você não tem mais esta conta")
                MsgBox.Hide
            ELSE
                GOTO g20
            ENDIF
        ELSE
            MsgBox.Show("Você não Prescisa pagar esta conta ainda")
            MsgBox.Hide
        ENDIF
    ELSEIF MsgBox.SelectedNumber = 2
        IF C__internet
            IF Main.Money >= 50
                SET C__internet = "off"
                MsgBox.Show("Você não tem mais esta conta")
                MsgBox.Hide
            ELSE
                GOTO g20
            ENDIF
        ELSE
            MsgBox.Show("Você não Prescisa pagar esta conta ainda")
            MsgBox.Hide
        ENDIF
    ELSEIF MsgBox.SelectedNumber = 3
        GOTO g1
    ENDIF
ENDIF

depois, vá em hud e crie um timer com estas configurações:
initial delay:45 minutos
every interval:1 hora
e number of ticks: 0
depois va em trigger : every timer tick
clique em text e cole este código:

Código:

SET C__agua = "on"
SET C__luz = "on"
SET C__internet = "on"

e PRONTO!!

Se quiserem depois, eu poderia criar um tuto, mais completo, literal e não em códigos, q vai permitir que o personagem use um cartão de débitos, onde você tem que comprar-lo por 250, e se tiver 350R$ depositados, você ganha 1 real ou mais por minuto de jogo..
ou um tuto sobre como fazer um relógio totalmente funcional, e muito simples

Um relogio ia ser uma boa idei, ajuda bastante pra fazer alguns eventos em jogos de rumo livre

Parabens você é um ótimo programador, você ja tem seu futuro escrito, é isso ai meus parabens, eu vou usar isso em meu jogo sem duvida, e vou gostar se você fizer um tuto de cartão de débito, isso seria muito bom!!
se eu podesse dar +1 rep, eu daria pois você merece, Muito Obrigado
Atenciosamente
noeneto

Realemente muito bom esse script de banco e pagamento de contas
Só acho q vc deveria explicar como se faz usando "events"

+1 Rep!