Universo Games
Ola , Convidado

[EEB] Usando ScriptedTile Logo1110

Você ainda não e cadastrado então cadastre-se e veja todas as atualizações no Mundo RPG!!!
Universo Games
Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.
Universo Games

Suporte e Desenvolvimento só no Universo Games
 
InícioInício  PortalPortal  EventosEventos  PublicaçõesPublicações  Últimas imagensÚltimas imagens  RegistarRegistar  EntrarEntrar  
Ola Convidado, Seja Bem vindo a equipe lhe deseja boa sorte no seu projeto!

 

 [EEB] Usando ScriptedTile

Ir para baixo 
AutorMensagem
Convidado
Convidado
Anonymous



[EEB] Usando ScriptedTile Empty
MensagemAssunto: [EEB] Usando ScriptedTile   [EEB] Usando ScriptedTile EmptyQui 18 Ago 2011, 23:24

Eaw Gente Esse é Meu Primeiro Tuto Neste Site Porem Eu Ja Postei Em Outros Smile
Então Vamos Ao Que Enteressa O Tutorial>>

Adicione Isso No Final Do Seu Main.txt

Código:
Sub BlockPlayer(index)
Dim PlayerDir
Dim Map
Dim X
Dim Y
PlayerDir = GetPlayerDir(index)
Map = GetPlayerMap(index)
X = GetPlayerX(index)
Y = GetPlayerY(index)
Select Case PlayerDir
    Case 0
        Call PlayerWarp(index, Map, X, Y + 1)
    Case 1
        Call PlayerWarp(index, Map, X, Y - 1)
    Case 2
        Call PlayerWarp(index, Map, X + 1, Y)
    Case 3
        Call PlayerWarp(index, Map, X - 1, Y)
End Select
End Sub

Proucure Por:
Código:
Sub ScriptedTile(index, Script)

Mude A Sub Toda Para:
Código:
Sub ScriptedTile(index, Script)
Select Case Script
    Case 0
        If GetPlayerAccess(index) < 1 Then
        Call BlockPlayer(index)
        Call PlayerMsg(index, "Você precisa ser VIP para acessar essa area.", 4)
        End If
     
    Case 1
    If GetPlayerGuild(index) <> trim("Warriors") Then
      Call BlockPlayer(index)
    End If 
   
    Case 2
    If GetPlayerGuild(index) <> trim("Max") Then
      Call BlockPlayer(index)
    End If
   
    Case 3
    If GetPlayerGuild(index) <> trim("nome da guild aqui") Then
      Call BlockPlayer(index)
    End If
   
    Case 4
    If GetPlayerGuild(index) <> trim("nome da guild aqui") Then
      Call BlockPlayer(index)   
    End If

    Case 5
    If GetPlayerGuild(index) <> trim("nome da guild aqui") Then
      Call BlockPlayer(index)
    End If

  Case 6
    If GetPlayerGuild(index) <> trim("nome da guild aqui") Then
      Call BlockPlayer(index)
    End If
   

  Case 7
    If GetPlayerGuild(index) <> trim("nome da guild aqui") Then
      Call BlockPlayer(index)
    End If
   
    Case 8
    If GetPlayerGuild(index) <> trim("nome da guild aqui") Then
      Call BlockPlayer(index)
    End If
   
    Case 9
    If GetPlayerGuild(index) <> trim("nome da guild aqui") Then
      Call BlockPlayer(index)
    End If
   
    Case 10
    If GetPlayerGuild(index) <> trim("nome da guild aqui") Then
      Call BlockPlayer(index)
    End If 
   
    Case 11
    If GetPlayerGuild(index) <> trim("nome da guild aqui") Then
      Call BlockPlayer(index)
    End If
   
    Case 12
    If GetPlayerGuild(index) <> trim("nome da guild aqui") Then
      Call BlockPlayer(index)
    End If   
   
    Case 13
    If GetPlayerGuild(index) <> trim("nome da guild aqui") Then
      Call BlockPlayer(index)
    End If 
   
    Case 14
    If GetPlayerGuild(index) <> trim("nome da guild aqui") Then
      Call BlockPlayer(index)
    End If 
   
    Case 15
    If GetPlayerGuild(index) <> trim("nome da guild aqui") Then
      Call BlockPlayer(index)
    End If
   
    Case 16
    If GetPlayerGuild(index) <> trim("nome da guild aqui") Then
      Call BlockPlayer(index)
    End If
   
    Case 17
    If GetPlayerGuild(index) <> trim("nome da guild aqui") Then
      Call BlockPlayer(index)
    End If
   
    Case 18
  If GetPlayerName(index) <> trim("Elysium Source") Then
      Call BlockPlayer(index)
    End If

    Case 19
  If GetPlayerName(index) <> trim("Ponhe o nome do jogador") Then
      Call BlockPlayer(index)
    End If
 
    Case 20
  If GetPlayerName(index) <> trim("Ponhe o nome do jogador") Then
      Call BlockPlayer(index)
    End If
   
    Case 21
    If GetPlayerLevel(index) < 50 Then
    Call BlockPlayer(index)
    Call PlayerMsg(index, "Você precisa estar level 50 ou mais para passar nesse portal", 4)
    End If
       
    Case 22
    If GetPlayerLevel(index) < 100 Then
    Call BlockPlayer(index)
    Call PlayerMsg(index, "Você precisa estar level 100 ou mais para passar nesse portal", 4)
    End If
       
    Case 23
    If GetPlayerLevel(index) < 150 Then
    Call BlockPlayer(index)
    Call PlayerMsg(index, "Você precisa estar level 150 ou mais para passar nesse portal", 4)
    End If
       
    Case 24
    If GetPlayerLevel(index) < 200 Then
    Call BlockPlayer(index)
    Call PlayerMsg(index, "Você precisa estar level 200 ou mais para passar nesse portal", 4)
    End If
       
    Case 25
    If GetPlayerLevel(index) < 250 Then
    Call BlockPlayer(index)
    Call PlayerMsg(index, "Você precisa estar level 250 ou mais para passar nesse portal", 4)
    End If
       
    Case 26
    If GetPlayerLevel(index) < 300 Then
    Call BlockPlayer(index)
    Call PlayerMsg(index, "Você precisa estar level 300 ou mais para passar nesse portal", 4)
    End If
       
    Case 27
    If GetPlayerLevel(index) < 400 Then
    Call BlockPlayer(index)
    Call PlayerMsg(index, "Você precisa estar level 400 ou mais para passar nesse portal", 4)
    End If
       
    Case 28
    If GetPlayerLevel(index) < 500 Then
    Call BlockPlayer(index)
    Call PlayerMsg(index, "Você precisa estar level 500 ou mais para passar nesse portal", 4)
    End If
       
    Case 29
    If GetPlayerLevel(index) < 600 Then
    Call BlockPlayer(index)
    Call PlayerMsg(index, "Você precisa estar level 600 ou mais para passar nesse portal", 4)
    End If
       
    Case 30
    If GetPlayerLevel(index) < 700 Then
    Call BlockPlayer(index)
    Call PlayerMsg(index, "Você precisa estar level 700 ou mais para passar nesse portal", 4)
    End If
       
    Case 31
    If GetPlayerLevel(index) < 300 Then
    Call PlayerMsg(index, "Se você é iniciante, vá ao mapa de baixo...Lá é o lugar ideal para você.", 5)
    Call PlayerWarp(index, 108, 9, 10)
    Else
    Call PlayerWarp(index, 108, 9, 10)
    End If
    End Select
    End Sub
   

Sub PlayerPrompt(index, Prompt, Value)
If Prompt = 6 Then
    Select Case Value
        Case 0
            Call GlobalMsg("Hi This is a Yes answer!", 3)
        Case 1
            Call GlobalMsg("This is case 1?", 3)
    End Select
Else
    Select Case Value
        Case 0
            Call GlobalMsg("Hi This is a No answer!", 4)
        Case 1
            Call GlobalMsg("This is no case 1?", 4)
    End Select
End If
End Sub

é só isso se gostou da credito Very Happy





Créditos: Pedro Augusto[Euu]
Bom Se Ja Postaram Mil Desculpas Não Pesquisei Mas De Qualquer Forma Obrigado Por Tudo Very Happy
Ir para o topo Ir para baixo
Lucas Roberto
Administrador
Administrador
Lucas Roberto


Mensagens : 711

[EEB] Usando ScriptedTile Empty
MensagemAssunto: Re: [EEB] Usando ScriptedTile   [EEB] Usando ScriptedTile EmptySáb 20 Ago 2011, 14:23

Obrigado pela contribuição...
+1
Ir para o topo Ir para baixo
https://universogamesmmo.forumeiros.com
Convidad
Convidado
Anonymous



[EEB] Usando ScriptedTile Empty
MensagemAssunto: Re: [EEB] Usando ScriptedTile   [EEB] Usando ScriptedTile EmptySáb 20 Ago 2011, 15:34

bom, sou iniciante nessas coisas de sistemas ainda, se pode dar uma explicadinha doq se trata ScriptedTile?
Ir para o topo Ir para baixo
Convidado
Convidado
Anonymous



[EEB] Usando ScriptedTile Empty
MensagemAssunto: Re: [EEB] Usando ScriptedTile   [EEB] Usando ScriptedTile EmptySáb 20 Ago 2011, 18:11

ScriptedTile, e tipo um tile que você define o que ele faz
Ir para o topo Ir para baixo
Conteúdo patrocinado





[EEB] Usando ScriptedTile Empty
MensagemAssunto: Re: [EEB] Usando ScriptedTile   [EEB] Usando ScriptedTile Empty

Ir para o topo Ir para baixo
 
[EEB] Usando ScriptedTile
Ir para o topo 
Página 1 de 1

Permissões neste sub-fórumNão podes responder a tópicos
Universo Games :: Criação de Jogos :: Elysium Diamond :: Tutoriais-
Ir para: