Suporte ao desenvolvimento de jogos!


    [GL]Titulos 0.1.0

    Compartilhe
    avatar
    Dooolly
    Moderador Global
    Moderador Global

    Medalhas :
    Mensagens : 1225
    Créditos : 138

    Ficha do personagem
    Nível: 1
    Vida:
    30/30  (30/30)
    Energia:
    0/0  (0/0)

    Re: [GL]Titulos 0.1.0

    Mensagem por Dooolly em Sab Mar 07, 2015 3:05 pm

    kawanzii escreveu:Legal, tudo tão bem feito '-'
    só faltou uma coisa
    Suspense:
    Megusta
    + Suspense:
    Fuckthashit
    Climax:
    Trollface
    Pausa Dramatica:
    Desfecho:
    Um botão para retirar o titulo que tá usando ou ficar sem titulo Derpina

    ps: nem testei o sistema, mas pela parte programada não vi nada parecido

    é porque eu não fiz isso Razz
    Deixei isso para quem estiver usando, até porque tenho preguiça de ensinar como trabalhar com forms...

    Mas eu botei o codigo abaixo de como adicionar o titulo, então é só por o valor = 0
    avatar
    joaopaulo98
    Experiente
    Experiente

    Mensagens : 622
    Créditos : 42

    Re: [GL]Titulos 0.1.0

    Mensagem por joaopaulo98 em Qui Jul 02, 2015 6:02 pm

    erro patch  not found " Open filename For Binary As #F " criei o caminho do arquivo C:\arquivos de jogo\Eclipse Origins  v2.0.0.0\client\data files\titulos   ' mais não  ta indo aparece esse erro.

    Código:
    Call MkDir(tDir & tName)

    esse erro tmb " runtime error 75 
    path/file acess erro


    _________________
    Dancinha:
    Código:
    http://ultracurioso.tk  - Um Mundo de Curiosidades , Ta esperando oque mate a sua , acesse não perca tempo.
    http://ligadosthemes.tk - já pensou em criar um site de filmes ou etc acesse e encontre scripts feitos para
    facilitar sua vida.
    http://linkfree.ml - encurte seus links e ainda ganhe dinheiro com isso , fácil e pratico.
    https://aprendendonline.ml  - nunca é perca de tempo aprender online.
    avatar
    Dooolly
    Moderador Global
    Moderador Global

    Medalhas :
    Mensagens : 1225
    Créditos : 138

    Ficha do personagem
    Nível: 1
    Vida:
    30/30  (30/30)
    Energia:
    0/0  (0/0)

    Re: [GL]Titulos 0.1.0

    Mensagem por Dooolly em Qui Jul 02, 2015 9:36 pm

    @joaopaulo98 escreveu:erro patch  not found " Open filename For Binary As #F " criei o caminho do arquivo C:\arquivos de jogo\Eclipse Origins  v2.0.0.0\client\data files\titulos   ' mais não  ta indo aparece esse erro.

    Código:
    Call MkDir(tDir & tName)

    esse erro tmb " runtime error 75 
    path/file acess erro

    man cê não seguiu o tutorial direito, leia atentamente tudo e refaça, vc fez no cliente oque era para ser feito no server o.O
    avatar
    Spooky
    Membro Ativo
    Membro Ativo

    Mensagens : 262
    Créditos : 23

    Re: [GL]Titulos 0.1.0

    Mensagem por Spooky em Sab Ago 15, 2015 10:52 pm

    Aqui tá dando Variable not Defined Ao clicar no Command Button
    Na Sub:
    Código:

    Private Sub Command1_Click()

    Marcando o Buffer =  
    De
    Código:
    Set Buffer = New clsBuffer

    Còdigo Completo da Sub.

    Código:
    Private Sub Command1_Click()
    picCharacter.Visible = False
               picInventory.Visible = False
               picSpells.Visible = False
               picOptions.Visible = False
               picParty.Visible = False
               ' picQuestLog.Visible = False
               picTitulo.Visible = True
               ' send packet
                   Set Buffer = New clsBuffer
                   Buffer.WriteLong CTitulos
                   SendData Buffer.ToArray()
                   Set Buffer = Nothing
                   ' show the window
               PlaySound Sound_ButtonClick
    End Sub

    Resolvi, deixei assim o


    Código:
    Private Sub Command1_Click()
    picCharacter.Visible = False
               picInventory.Visible = False
               picSpells.Visible = False
               picOptions.Visible = False
               picParty.Visible = False
               ' picQuestLog.Visible = False
               picTitulo.Visible = True
               ' send packet
                   Dim Buffer As clsBuffer
                   Dim i As Long
                   Set Buffer = New clsBuffer
                   Buffer.WriteLong CTitulos
                   SendData Buffer.ToArray()
                   Set Buffer = Nothing
                   ' show the window
               PlaySound Sound_ButtonClick
    End Sub

    Como faço para dar o título para uma pessoa? o.O


    _________________
    Sign

    Sign¹:

    Sign²:
    avatar
    Profane ~
    Administrador
    Administrador

    Mensagens : 672
    Créditos : 115

    Re: [GL]Titulos 0.1.0

    Mensagem por Profane ~ em Dom Ago 16, 2015 4:23 am

    @Spooky escreveu:Aqui tá dando Variable not Defined Ao clicar no Command Button
    Na Sub:
    Código:

    Private Sub Command1_Click()

    Marcando o Buffer =  
    De
    Código:
    Set Buffer = New clsBuffer

    Còdigo Completo da Sub.

    Código:
    Private Sub Command1_Click()
    picCharacter.Visible = False
               picInventory.Visible = False
               picSpells.Visible = False
               picOptions.Visible = False
               picParty.Visible = False
               ' picQuestLog.Visible = False
               picTitulo.Visible = True
               ' send packet
                   Set Buffer = New clsBuffer
                   Buffer.WriteLong CTitulos
                   SendData Buffer.ToArray()
                   Set Buffer = Nothing
                   ' show the window
               PlaySound Sound_ButtonClick
    End Sub

    Resolvi, deixei assim o


    Código:
    Private Sub Command1_Click()
    picCharacter.Visible = False
               picInventory.Visible = False
               picSpells.Visible = False
               picOptions.Visible = False
               picParty.Visible = False
               ' picQuestLog.Visible = False
               picTitulo.Visible = True
               ' send packet
                   Dim Buffer As clsBuffer
                   Dim i As Long
                   Set Buffer = New clsBuffer
                   Buffer.WriteLong CTitulos
                   SendData Buffer.ToArray()
                   Set Buffer = Nothing
                   ' show the window
               PlaySound Sound_ButtonClick
    End Sub

    Como faço para dar o título para uma pessoa? o.O

    Eu li rapidamente, mas pelo que eu entendi :

    Código:
    AddPlayerTitulo index, 1 'Onde tem o numero 1 você muda para o numero do titulo.

    Ele fornece isso a cima. Você pode adicionar isso a criação de algum item, ou Level Up, ou morte oO ou ao atacar um monstro? Terminar uma quest? ;c você que sabe ;x Ele deixou a se complementar isso já que é bem pessoal como se adquire. 

    Pode fazer via server um Btt e um Scrl, para adicionar o Numero do Titulo ao alvo, e o botão chamando o Set para o alvo. Dando o titulo via Server Side.
    avatar
    Spooky
    Membro Ativo
    Membro Ativo

    Mensagens : 262
    Créditos : 23

    Re: [GL]Titulos 0.1.0

    Mensagem por Spooky em Dom Ago 16, 2015 11:40 am

    @Profane ~ escreveu:
    @Spooky escreveu:Aqui tá dando Variable not Defined Ao clicar no Command Button
    Na Sub:
    Código:

    Private Sub Command1_Click()

    Marcando o Buffer =  
    De
    Código:
    Set Buffer = New clsBuffer

    Còdigo Completo da Sub.

    Código:
    Private Sub Command1_Click()
    picCharacter.Visible = False
               picInventory.Visible = False
               picSpells.Visible = False
               picOptions.Visible = False
               picParty.Visible = False
               ' picQuestLog.Visible = False
               picTitulo.Visible = True
               ' send packet
                   Set Buffer = New clsBuffer
                   Buffer.WriteLong CTitulos
                   SendData Buffer.ToArray()
                   Set Buffer = Nothing
                   ' show the window
               PlaySound Sound_ButtonClick
    End Sub

    Resolvi, deixei assim o


    Código:
    Private Sub Command1_Click()
    picCharacter.Visible = False
               picInventory.Visible = False
               picSpells.Visible = False
               picOptions.Visible = False
               picParty.Visible = False
               ' picQuestLog.Visible = False
               picTitulo.Visible = True
               ' send packet
                   Dim Buffer As clsBuffer
                   Dim i As Long
                   Set Buffer = New clsBuffer
                   Buffer.WriteLong CTitulos
                   SendData Buffer.ToArray()
                   Set Buffer = Nothing
                   ' show the window
               PlaySound Sound_ButtonClick
    End Sub

    Como faço para dar o título para uma pessoa? o.O

    Eu li rapidamente, mas pelo que eu entendi :

    Código:
    AddPlayerTitulo index, 1 'Onde tem o numero 1 você muda para o numero do titulo.

    Ele fornece isso a cima. Você pode adicionar isso a criação de algum item, ou Level Up, ou morte oO ou ao atacar um monstro? Terminar uma quest? ;c você que sabe ;x Ele deixou a se complementar isso já que é bem pessoal como se adquire. 

    Pode fazer via server um Btt e um Scrl, para adicionar o Numero do Titulo ao alvo, e o botão chamando o Set para o alvo. Dando o titulo via Server Side.

    Tendi, eu tava tentando fazer isso utilizando o lvwinfo, mas dava erro no codigo dele, na parte do index, variable not defined
    Eta, q porra ´´é Btt? aspkapskapskasa


    _________________
    Sign

    Sign¹:

    Sign²:
    avatar
    Profane ~
    Administrador
    Administrador

    Mensagens : 672
    Créditos : 115

    Re: [GL]Titulos 0.1.0

    Mensagem por Profane ~ em Dom Ago 16, 2015 1:36 pm

    Btt é um Button xD 

    é uma sigla de definição usual.

    Como :

    Scrl = Scroll
    lbl = Label..

    E por ai vai xD

    Creio que para usar o Lvw terá de ligar o "btt" index, a uma Sub com Set.

    Att


    _________________
    "If you don't belong here, just build a place where you do."
    avatar
    GalaxyHells
    Ocasional
    Ocasional

    Mensagens : 167
    Créditos : 4

    Ficha do personagem
    Nível: 1
    Vida:
    30/30  (30/30)
    Energia:
    0/0  (0/0)

    Re: [GL]Titulos 0.1.0

    Mensagem por GalaxyHells em Dom Ago 16, 2015 9:07 pm

    @Spooky escreveu:Uma Dica, ao usar um item conseguir rank e spell (tipo usa o item na categoria de Spell da cmbtype
    e ganha a spell e título. :)
    +2 Very Happy
    concordo! ñ li as outras msg entam n sei se vc ja add mais seria uma ótima ideia Very Happy
    avatar
    joaopaulo98
    Experiente
    Experiente

    Mensagens : 622
    Créditos : 42

    Re: [GL]Titulos 0.1.0

    Mensagem por joaopaulo98 em Qua Dez 28, 2016 10:27 pm

    me desculpe resucitar o post mais eu estou com uns erros ao fazer oque pede na parte do  server


    Código:
    Call MkDir(tDir & tName)


    esse erro tmb " runtime error 75 
    path/file acess erro

    depois

    runtime error 76
    path not found
    Código:
    Open filename For Binary As #F
        Put #F, , Titulo(TituloNum)

    depois

    runtime error 76
    path not found

    Código:
    Open filename For Binary As #F



    abaixo
    runtime error 52
    bad file name or number

    Código:
    Get #F, , Titulo(i)

    bom eu refiz 3x vezes para ver se o erro era meu pondo em algum código errado mais creio que não é


    _________________
    Dancinha:
    Código:
    http://ultracurioso.tk  - Um Mundo de Curiosidades , Ta esperando oque mate a sua , acesse não perca tempo.
    http://ligadosthemes.tk - já pensou em criar um site de filmes ou etc acesse e encontre scripts feitos para
    facilitar sua vida.
    http://linkfree.ml - encurte seus links e ainda ganhe dinheiro com isso , fácil e pratico.
    https://aprendendonline.ml  - nunca é perca de tempo aprender online.

    Conteúdo patrocinado

    Re: [GL]Titulos 0.1.0

    Mensagem por Conteúdo patrocinado


      Data/hora atual: Qui Abr 26, 2018 10:41 am