GS-Zone

Duda/Aporte Crear Wav para caminata en montura.. Ir al Indice

Moderadores: Moderadores de Argentum, Especialistas de Argentum, Especialistas de Programación

6

Nota » 21 Dic 2011 13:57

Buenas, eso mismo, estoy intentando implementar a mi servidor los pasos de caballo en el wav cuando se camina montando... Nose nada de programacion, me toy lanzando a la cosa arriesgando codigos etc y luego uno q otro post q leo comparo con el codigo q salen aqui en gszone y weno masomenos me imagino que termino se usa en un code y los de otras versiones y cambio eso etcetc xD
Al grano.. ya tengo el sonido de caballo... quien dice caballo dice tigre etc, como monturas que vi con forma de tigre, os va bien esto... busquen el wav ideal aqui:

http://wavlist.com/soundfx/animals.html

Despues podeis buscar un buen programa para editar ese sound y poner la duracion de 1seg para que no se escuche cuando pares de caminar q sigas escuchando el caballo caminando :P
El programa aconsejado es: Audacity

Ahora lo codigoo uhh ahi viene la parte de la duda que necessito ayuda y talvez todos juntos podemos poner esto completo para la gente que gustaria seguir esta idea xD
SERVIDOR
Coji esta parte del codigo aqui en el foro que creo que tiene que ver con esto y adapte con lo del snd_montado:

1- Ponen los Sonidos dentro de la carpeta WAV del cliente.

2- En 11.5 y 12.1 buscan:
Mostrar Todo el Código | Numero de Linea | Ocultar/Mostrar | Seleccionar todo
1. Public Const SND_PASOS1 As String = "23.Wav"
2. Public Const SND_PASOS2 As String = "24.Wav"
Public const SND_MONTADO As String = “XX.wav” (Pongo el ultimo numero de la carpeta wav)
1. Sub DoPasosFx(ByVal CharIndex As Integer)
Sub DoPasosFx(ByVal CharIndex As Integer)
If Not UserNavegando Then
With charlist(CharIndex)
If .Muerto = False And EstaPCarea(CharIndex) = True And (.Priv = 0 Or .Priv > 5) Then
.pie = Not .pie
If .pie Then
Call Audio.PlayWave(SND_PASOS1, .Pos.x, .Pos.y)
Else
Call Audio.PlayWave(SND_PASOS2, .Pos.x, .Pos.y)
IF USERMONTANDO THEN
WITH CHARLIST (CHARINDEX)
IF .MUERTO = FALSE AND EstaPCarea(CharIndex) = True And(.Priv = 0 Or .Priv > 5)then
If Usermontando
Call Audio.Playwave(XX.wav, .pos.x, .Pos.y)
End If
End If
End With
ElseIf UserMontando = True Then
ElseIf UserNavegando = True Then

Administrador de CruzNegrAO (Servidor Mundial Style IAO Pero Mas Desarrollado...)
http://www.cruznegrao.webs.com
RaZoV - lLider de CruzNegra|
454
Aprendiz [2]
Registrado: Diciembre 2011
Ubicación: Portugal
Mensajes: 259
Aportes: 2

Nota » 21 Dic 2011 16:04

no entendi lo que queres hacer, pero si queres qe al caminar montando se reproduzca X wav, pones en el case "M" << mover

if .montando then senddata sendtarget.topcarea, userindex, 0, "PAQUETEX"

en el cliente metes un case

case "PAQUETEX"
playwav (app.path & "\Wav\CABALLO.WAV")

Y listo, o si no podés usar el paquete qe viene ya con el ao :P

LyRan escribió:Buenos Dias amigos y programadores de Gs Zone, Me gustaria pedirle la amabilidad de una ayuda con un cliente editado para mi Ao casero, Osea me explico, yo juego Ao con varios amigos y ellos todos usan cheat y no me gusta eso me gustaria que alguien me ayudara a crear un cliente editado con auto poteo de ambas potas a la ves ya sea que se alla gastado Mana lanzando algun hechis y comienze a potear solo hasta estar completamente el Mana, igual para la salud y poteo rapido para ambos.
mAnco programEr
799
Oraculo [5]
Registrado: Años de membresíaAños de membresía
Ubicación: Bolivia
Mensajes: 2299
Aportes: 109

Nota » 21 Dic 2011 17:21

Amigo en el servidor que modulo es me sabes decir? :( es que pongo en el buscador case "M" case 'M no encuentra :( Solo encuentro el Hadle este: HandleWalk , nose si tiene q ver :( en protocol sale esto:
Case ClientPacketID.Walk 'M
Call HandleWalk(UserIndex)
Osea pongo en este handle lo de ifmontando? como se el paquete, es el numero del wav(no creo)? xd
o sera el que este en la posicion de la lista de paquetes? :

Select Case packetID
Case ClientPacketID.ConnectAccount
Call HandleLoginAccount(UserIndex)

Case ClientPacketID.CreateNewAccount
Call HandleLoginNewAccount(UserIndex)

Case ClientPacketID.LoginExistingChar 'OLOGIN
Call HandleLoginExistingChar(UserIndex)

Case ClientPacketID.LoginNewChar 'NLOGIN
Call HandleLoginNewChar(UserIndex)

Case ClientPacketID.Talk ';
Call HandleTalk(UserIndex)

Case ClientPacketID.Whisper '\
Call HandleWhisper(UserIndex)

Case ClientPacketID.Walk 'M
Call HandleWalk(UserIndex)

Case ClientPacketID.RequestPositionUpdate 'RPU
Call HandleRequestPositionUpdate(UserIndex)

Esta en 7º lugar, es el paquete numero 7, pongo asi? xd o lo que me dices es que ponga ClientPacketID.Walk y namas en lugar de PaqueteX

(Perdonen esta ignorancia pero poco a poco voy aprendiendo :P )

Administrador de CruzNegrAO (Servidor Mundial Style IAO Pero Mas Desarrollado...)
http://www.cruznegrao.webs.com
RaZoV - lLider de CruzNegra|
454
Aprendiz [2]
Registrado: Diciembre 2011
Ubicación: Portugal
Mensajes: 259
Aportes: 2

Nota » 21 Dic 2011 17:57

ah tenes binario, ubieras posteado en 12.x o 13.x, a ver hacé esto

busca en el sub moveuserchar

  1.    Dim nPos As WorldPos
  2.     Dim sailing As Boolean
  3.     Dim CasperIndex As Integer
  4.     Dim CasperHeading As eHeading
  5.     Dim CasPerPos As WorldPos


y abajo pone

  1. if userlist(userindex).flags.montando then    SendData SendTarget.ToPCArea, UserIndex, PrepareMessagePlayWave(200, UserList(UserIndex).Pos.X, UserList(UserIndex).Pos.Y)


guardas en la carpeta wav el archivo con el nombre "200.wav" y listo tendria qe funcionar

LyRan escribió:Buenos Dias amigos y programadores de Gs Zone, Me gustaria pedirle la amabilidad de una ayuda con un cliente editado para mi Ao casero, Osea me explico, yo juego Ao con varios amigos y ellos todos usan cheat y no me gusta eso me gustaria que alguien me ayudara a crear un cliente editado con auto poteo de ambas potas a la ves ya sea que se alla gastado Mana lanzando algun hechis y comienze a potear solo hasta estar completamente el Mana, igual para la salud y poteo rapido para ambos.
mAnco programEr
799
Oraculo [5]
Registrado: Años de membresíaAños de membresía
Ubicación: Bolivia
Mensajes: 2299
Aportes: 109

Nota » 21 Dic 2011 18:35

Uishh que cosa paso.. el juego no tiene sonido asi q no puedo probar :$ el volumen esta en el cliente, lo activamos y se apaga y se pone al minimo al darle guardar y salir xD ainss otro bug mas.. ya perdi la cuenta los bugs xd pero poco a poco se va remediando xd Esto sera algun fallo en direct sound o algo en el cliente? Si alguno tiene idea de como activarlo sin que sea Ingame q lo diga porfis, Grax Matih seguro q ta bien ese codigo, tiene mucha logica asi q se puede decir que es un aporte mas xd 80% tuyo xD

Administrador de CruzNegrAO (Servidor Mundial Style IAO Pero Mas Desarrollado...)
http://www.cruznegrao.webs.com
RaZoV - lLider de CruzNegra|
454
Aprendiz [2]
Registrado: Diciembre 2011
Ubicación: Portugal
Mensajes: 259
Aportes: 2

Nota » 25 Dic 2011 01:51

Fijate de borrar el codigo que te puso Matih aver si te funca el sonido en el ao. Suerte

Imagen
Usuario Registrado
10
Newbie [1]
Registrado: Años de membresíaAños de membresía
Mensajes: 14


Volver a Otras versiones

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 0 invitados