Sistema de Dado

por **Lendário** Sex 20 Nov 2009, 22:03

O que este script faz:
Rolls um número aleatório 1-5
dá o nome do jogador como uma mensagem para qualquer um no mapa atual.
Isto deve ir ao abrigo do sub i comandos que a sua chamada.
A razão que esta não está no script de banco de dados é que é para trabalhar scripts, como tenho certeza isso funciona

Código:: Case "/diceroll" Dim R R = Rand(1,5) Select Case R Case 1 Call MapMsg(GetPlayerMap(index),"player" & GetPlayerName(index) & "has rolled a 1",0) Exit Sub Case 2 Call MapMsg(GetPlayerMap(index),"player" & GetPlayerName(index) & "has rolled a 2",0) Exit Sub Case 3 Call MapMsg(GetPlayerMap(index),"player" & GetPlayerName(index) & "has rolled a 3",0) Exit Sub Case 4 Call MapMsg(GetPlayerMap(index),"player" & GetPlayerName(index) & "has rolled a 4",0) Exit Sub Case 5 Call MapMsg(GetPlayerMap(index),"player" & GetPlayerName(index) & "has rolled a 5",0) Exit Sub End Select

Somente isso.

Créditos : [God of Foxiness] Owen

por Rio Absolut Sáb 21 Nov 2009, 14:17

oQUE ISSU FAIS ?

por **Lendário** Sáb 21 Nov 2009, 16:02

Rolls um número aleatório 1-5
dá o nome do jogador como uma mensagem para qualquer um no mapa atual.
Apenas isso.
Na minha opinião isso é inútil Razz

por Karlos Sáb 21 Nov 2009, 18:34

não é não com ele podemos criar uma arma ou um item scriptado, ou até uma classe diferente.

Obs.: todo e qualquer script ou comando que encontramos se encaixa em alguma coisa, saibam que uma ideia leva a aoutra, eu estava buscando um script assim, + não me lembro + pra quem. XD confused

por pokoloko Ter 10 Ago 2010, 17:11

Muito bom isso serve para BOSS vom supor que Vom em 4 matar um BOSS e dropa um item bem ROX ae kada um tira o dado quem tirar u mnumero maior leva o item =D +1 cred pra mim ZUERA =D

por Karlos Ter 10 Ago 2010, 17:13

pode faer uma maquina caçaniqueis tbm ou jogos de sorte ou se preferir jogos de azar Very Happy

por pedrinho123540 Seg 13 Set 2010, 23:43

dá pra fazer tbm tipo, se rola o dado, dai dependendo da sua sorte vc vai pra um mapa bom ou ruim

por DragonicK Ter 14 Set 2010, 07:10

Vejo que select case não é necessário, só código a mais pra percorrer. Então ficando assim, com a mesma finalidade.

Código:: Case "/diceroll" Dim R R = Rand(1,5) Call MapMsg(GetPlayerMap(index), "O jogador " & GetPlayerName(index) & " obteve " & R & " pontos ao rodar os dados.", 0) Exit Sub

ou definitivamente assim :

Código:: Case "/diceroll" Call MapMsg(GetPlayerMap(index), "O jogador " & GetPlayerName(index) & " obteve " & Val(Rand(1,5)) & " pontos ao rodar os dados.", 0) Exit Sub

O jogador DragonicK obteve 5 pontos ao rodar os dados.

por Conteúdo patrocinado

Sistema de Dado

Sistema de Dado

Re: Sistema de Dado

Re: Sistema de Dado

Re: Sistema de Dado

Re: Sistema de Dado

Re: Sistema de Dado

Re: Sistema de Dado

Re: Sistema de Dado

Re: Sistema de Dado