Suporte ao desenvolvimento de jogos!


    [EO] Comando PlaySound pelo server~EO

    Compartilhe

    DshFox
    Novato
    Novato

    Mensagens : 27
    Créditos : 35

    [EO] Comando PlaySound pelo server~EO

    Mensagem por DshFox em Sex Dez 03, 2010 2:28 pm

    Natal chegando,passei direto(1° vez na vida,nunca mais piso numa escola,vo raspa a cabeça(n°0) hj.To alegre ;D.Mais tarde posto um sistema vip de verdade

    Server~
    no ModServerTCP
    lá no final adicione
    Sub PlaySound(ByVal Index As Long, ByVal som As String)
    'DshFox
    'OhYehBeibi.Blogspot.com
    'OhYehBeibi.Webs.Com
    Dim Buffer As clsBuffer
    Set Buffer = New clsBuffer
    Buffer.WriteLong SPlaySound
    Buffer.WriteString som
    SendDataToMap GetPlayerMap(Index), Buffer.ToArray()

    Set Buffer = Nothing
    End Sub

    Procure por(no modEnumerations)
    STradeStatus
    em baixo,adicione
    SPlaySound

    Server acabado

    Client~
    Procure por
    HandleDataSub(STradeStatus) = GetAddress(AddressOf HandleTradeStatus)
    em baixo,adicione
    HandleDataSub(SPlaySound) = GetAddress(AddressOf HandlePlaySound)

    no final do ModHandleData,adicione a sub
    Private Sub HandlePlaySound(ByVal Index As Long, ByRef Data() As Byte, ByVal StartAddr As Long, ByVal ExtraVar As Long)
    'DshFox
    'OhYehBeibi.Blogspot.com
    'OhYehBeibi.Webs.Com
    Dim Buffer As clsBuffer
    Dim som As String
    Set Buffer = New clsBuffer
    Buffer.WriteBytes Data()

    som = Buffer.ReadString
    Set Buffer = Nothing

    Call PlaySound("" & som & "")

    End Sub

    procure por(ModEnumeration)
    stradeStatus
    em baixo,adicione
    SPlaySound

    Pronto.Agora tu pode botar vida chamando sons pelo server em algum script
    usando
    PlaySound NomeDoSom.Wav
    ps: O arquivo tem q ser WAV



    Testado e Aprovado
    avatar
    HugoFreitas
    Administrador
    Administrador

    Medalhas :
    Mensagens : 661
    Créditos : 175

    Re: [EO] Comando PlaySound pelo server~EO

    Mensagem por HugoFreitas em Sab Dez 04, 2010 1:32 pm

    Muito bom cara, +1 cred.


    _________________


    avatar
    habbo221
    Experiente
    Experiente

    Mensagens : 552
    Créditos : 114

    Re: [EO] Comando PlaySound pelo server~EO

    Mensagem por habbo221 em Ter Dez 21, 2010 8:25 pm

    Mto bom !


    _________________
    Você sabe que está no caminho certo quando perde o interesse de olhar para trás.

    Conteúdo patrocinado

    Re: [EO] Comando PlaySound pelo server~EO

    Mensagem por Conteúdo patrocinado


      Data/hora atual: Sab Abr 21, 2018 12:55 am