TutoRPG


Participe do fórum, é rápido e fácil

TutoRPG
TutoRPG
Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.
Últimos assuntos
» Evil Fantasy BETA
Sistema de Teletransportar todos de uma vez I_icon_minitimeTer Set 10, 2013 12:30 pm por lauk

» Sistema de Guild (do Eduardo)
Sistema de Teletransportar todos de uma vez I_icon_minitimeTer maio 14, 2013 8:54 pm por Khaws

» Sistema de Guild
Sistema de Teletransportar todos de uma vez I_icon_minitimeTer maio 14, 2013 6:48 pm por Khaws

» Teco Fabrica
Sistema de Teletransportar todos de uma vez I_icon_minitimeSáb Mar 23, 2013 8:18 am por ~FullzDied

» Apresentaçao
Sistema de Teletransportar todos de uma vez I_icon_minitimeSex Mar 01, 2013 6:58 pm por Sweeps

» Editando nick
Sistema de Teletransportar todos de uma vez I_icon_minitimeSex Mar 01, 2013 6:35 pm por Sweeps

» Sistema De Vila
Sistema de Teletransportar todos de uma vez I_icon_minitimeSex Fev 01, 2013 4:59 pm por ~FullzDied

» alguns tilesets
Sistema de Teletransportar todos de uma vez I_icon_minitimeSáb Dez 22, 2012 8:42 pm por Diegoslstuto

» Tilesets de natureza
Sistema de Teletransportar todos de uma vez I_icon_minitimeSáb Dez 22, 2012 8:40 pm por Diegoslstuto

» Olá, vim para trazer sistemas e muitas outras coisas
Sistema de Teletransportar todos de uma vez I_icon_minitimeQui Dez 13, 2012 3:09 pm por ~FullzDied

» [Recrutando] Bleach Online Dark Saga
Sistema de Teletransportar todos de uma vez I_icon_minitimeSáb Nov 10, 2012 8:23 pm por Hunter™

» Dragon Ball Fox
Sistema de Teletransportar todos de uma vez I_icon_minitimeDom Out 28, 2012 7:55 am por NeeTo

» Tutorial Mapper - Como avaliar um mapa
Sistema de Teletransportar todos de uma vez I_icon_minitimeSáb Out 13, 2012 12:45 pm por NeeTo

» Life RPG Maker 2.0
Sistema de Teletransportar todos de uma vez I_icon_minitimeQui Out 11, 2012 4:02 pm por SynysterGates

» Fórum decaido
Sistema de Teletransportar todos de uma vez I_icon_minitimeQui Out 11, 2012 2:16 pm por SynysterGates

» Dragon Ball Elite
Sistema de Teletransportar todos de uma vez I_icon_minitimeQua Out 10, 2012 3:07 pm por KingSora

» Auto Ataque por checkbox
Sistema de Teletransportar todos de uma vez I_icon_minitimeTer Out 09, 2012 7:35 pm por Warrior_Maker

» Pokémon Online - Xstrond Games BETA
Sistema de Teletransportar todos de uma vez I_icon_minitimeTer Out 02, 2012 10:29 pm por thales12

» Auto Correr Por CheckBox
Sistema de Teletransportar todos de uma vez I_icon_minitimeTer Out 02, 2012 10:03 pm por thales12

» Auto Loot para Eclipse Origins
Sistema de Teletransportar todos de uma vez I_icon_minitimeTer Out 02, 2012 10:02 pm por thales12

»  Ganhar Item em Certo Nivel
Sistema de Teletransportar todos de uma vez I_icon_minitimeTer Out 02, 2012 9:58 pm por thales12

» SK - Lógica de Programação - Aula 3
Sistema de Teletransportar todos de uma vez I_icon_minitimeQua Set 26, 2012 7:05 pm por SameKage

» Distrito Rpg Maker 2.0 no Ar !!
Sistema de Teletransportar todos de uma vez I_icon_minitimeDom Set 23, 2012 7:59 pm por SameKage

» Sistemas que preciso
Sistema de Teletransportar todos de uma vez I_icon_minitimeSex Set 21, 2012 7:28 pm por KingSora

» [ALL] Títulos nos NPC's 1.0
Sistema de Teletransportar todos de uma vez I_icon_minitimeSex Set 21, 2012 5:38 pm por lucas100vzs

» Vídeo Tutorial Mapper Caverna - MMORPG 2D
Sistema de Teletransportar todos de uma vez I_icon_minitimeQui Set 20, 2012 8:16 pm por KingSora

» Sistema de plantar e colher
Sistema de Teletransportar todos de uma vez I_icon_minitimeTer Set 18, 2012 10:00 pm por SameKage

» Perfect engine
Sistema de Teletransportar todos de uma vez I_icon_minitimeTer Set 18, 2012 9:59 pm por SameKage

» O Seu pirata chegou !
Sistema de Teletransportar todos de uma vez I_icon_minitimeDom Set 16, 2012 7:58 pm por SameKage

» Novidades para tutorpg o que acha?
Sistema de Teletransportar todos de uma vez I_icon_minitimeSáb Set 15, 2012 7:03 pm por Guilherme Azevedo

» [ZIG ZAG GAMES] Age of Dragons
Sistema de Teletransportar todos de uma vez I_icon_minitimeSáb Set 15, 2012 1:56 pm por Guilherme Azevedo

» Me ajudem Pliss
Sistema de Teletransportar todos de uma vez I_icon_minitimeSex Set 14, 2012 9:48 am por KingSora

» SK - HTML - Aula 1
Sistema de Teletransportar todos de uma vez I_icon_minitimeQui Set 13, 2012 12:35 pm por SameKage

» Forum Decaindo
Sistema de Teletransportar todos de uma vez I_icon_minitimeTer Set 11, 2012 1:52 pm por Tayllor

» Meus 3 mapas
Sistema de Teletransportar todos de uma vez I_icon_minitimeTer Set 11, 2012 11:26 am por KingSora

» [Apresentação] Okumura-Rin~
Sistema de Teletransportar todos de uma vez I_icon_minitimeSeg Set 10, 2012 5:43 pm por Warrior_Maker

» 3 primeiras sprites
Sistema de Teletransportar todos de uma vez I_icon_minitimeSex Set 07, 2012 6:19 pm por KingSora

» [EEB] Comando para Salvar Seu Game
Sistema de Teletransportar todos de uma vez I_icon_minitimeSex Set 07, 2012 5:06 pm por SynysterGates

» [Off] Olha Suas PM Tayllor
Sistema de Teletransportar todos de uma vez I_icon_minitimeSex Set 07, 2012 4:49 pm por Tayllor

» Fabrica da JCG Corp: Technology in designer [Fechada
Sistema de Teletransportar todos de uma vez I_icon_minitimeQui Set 06, 2012 6:15 pm por KingSora

Quem está conectado?
1 usuário online :: 0 registrados, 0 invisíveis e 1 visitante

Nenhum

[ Ver toda a lista ]


O recorde de usuários online foi de 13 em Sex Mar 04, 2022 3:18 am
Parceiros
Templo RPG Maker - Onde a magia maker permanece viva! Sistema de Teletransportar todos de uma vez 4vAJr

Sistema de Teletransportar todos de uma vez

2 participantes

Ir para baixo

Sistema de Teletransportar todos de uma vez Empty Sistema de Teletransportar todos de uma vez

Mensagem por Tayllor Sex Ago 24, 2012 12:00 pm

Server Side

- Crie uma command button no control da frmServer.

deixe-a normal.

- Der 2 cliques na command button ponha:
Código:
scrlMM.Max = MAX_MAPS
    scrlMX.Max = MAX_MAPX
    scrlMY.Max = MAX_MAPY
    picWarpAll.Visible = True

- Crie uma picturebox na parte control do server ponha o nome de picWarpAll e va na visible de suas properties e ponho false.

- Crie uma label dentro da picturebox com o nome lblMM e o caption Map: 1

- Abaixo da label que acabamos de construir, faça uma HScrollbar com o nome scrlMM
Der 2 cliques e ponha
Código:
lblMM.caption = "Map: " & scrlMM.Value


- Abaixo crie uma label com o nome lblMX e a caption X: 0

- De baixo da label lblMX faça outra HScrollbar com o nome scrlMX. der dois cliques na mesma e ponha:
Código:
    lblMX.caption = "X: " & scrlMX.Value

- Abaixo do que acabamos de construir faça outra label dessa vez com o nome lblMY e o caption Y: 0

- Abaixo acrescente a HScrollbar ponhaa o nome scrlMY e der dois cliques na mesma e ponha:
Código:
    lblMY.caption = "Y: " & scrlMY.Value

- Ainda ta picturebox crie embaixo da ultima HScrollbar um command button com qualquer nome e caption der dois cliques no mesmo e adicione:
Código:
    Dim Index As Long
    Dim MapNum As Long
    Dim MapX As Long
    Dim MapY As Long

    MapNum = Int(scrlMM.Value)
    MapX = Int(scrlMX.Value)
    MapY = Int(scrlMY.Value)

    For Index = 1 To MAX_PLAYERS
        If IsPlaying(Index) Then
            If GetPlayerAccess(Index) = 0 Then
                Call PlayerWarp(Index, MapNum, MapX, MapY)
            End If
        End If
    Next Index

    Call GlobalMsg(O servidor teletransporta todos para map " & MapNum & ".", YELLOW)

    picWarpAll.Visible = False

- Abaixo crie outra command button com qualquer nome e com a Caption Cancelar der dois cliques na mesma e adicione:
Código:
    Dim Index As Long
    Dim MapNum As Long
    Dim MapX As Long
    Dim MapY As Long

    MapNum = Int(scrlMM.Value)
    MapX = Int(scrlMX.Value)
    MapY = Int(scrlMY.Value)

    For Index = 1 To MAX_PLAYERS
        If IsPlaying(Index) Then
            If GetPlayerAccess(Index) = 0 Then
                Call PlayerWarp(Index, MapNum, MapX, MapY)
            End If
        End If
    Next Index

    Call GlobalMsg("O servidor teletransporta todos para map " & MapNum & ".", YELLOW)

    picWarpAll.Visible = False

É isso erros ou duvidas postem aqui.

Créditos
Tayllor

O Sistema agora sera unico da TUTORPG,para postar em outrolocal por favor pedir permissão.


Última edição por Tayllor em Dom Ago 26, 2012 5:58 pm, editado 1 vez(es)
Tayllor
Tayllor
Admin
Admin

Mensagens : 114
Cash : 5024
Créditos : 9
Data de inscrição : 24/08/2012

https://tutorpg.forumeiro.com

Ir para o topo Ir para baixo

Sistema de Teletransportar todos de uma vez Empty Re: Sistema de Teletransportar todos de uma vez

Mensagem por Warrior_Maker Sáb Ago 25, 2012 6:11 pm

vlw ai!Quer um rep?Toma ai so pq ta postando bastante!

Warrior_Maker
Admin
Admin

Mensagens : 128
Cash : 5070
Créditos : 26
Data de inscrição : 24/08/2012
Idade : 24
Localização : Cuiaba-MT

https://tutorpg.forumeiro.com

Ir para o topo Ir para baixo

Ir para o topo

- Tópicos semelhantes

 
Permissões neste sub-fórum
Não podes responder a tópicos