ayudaaa

no se k pasa peroo ske me meto a mi server y abro el cliente y cuando m conecto el sitio donde toy ta lleno de ropas guardias , criaturas sobre las k puedo pasar como si no tarian :S
AYUDENME , DESDE YA GRAZ


PD:no se xke no pude poner la imangen :S

estan mal los mapas? osea ves todo mal o sino, si usas aoready hay una version vieja con esos bugs cambia a la nueva

uso aoready 0.6 final y no es k ten mal los mapas , es k aver veo lo k s el mapa pero k ta todo lleno DE NPCS K NO EXITEN , se pode pasar sobre ellos como si no tuvieran solo k los ves:S

farensis dijo:

uso aoready 0.6 final y no es k ten mal los mapas , es k aver veo lo k s el mapa pero k ta todo lleno DE NPCS K NO EXITEN , se pode pasar sobre ellos como si no tuvieran solo k los ves:S

Haz clic para expandir...

Jajaja, y transpasan arboles y lo que sea?, reemplaza los mapas del cliente por los del servidor (obviamente los .map nada más) y se soluciona , Avisame si te sirvió .
Suerte!

eso decia yo de los mapas

na , lo reemplace 2 vexes y na :S iwal a sido algo desde algun codigo :S

nose, fijate en los mapas , bajatelos denuevo

ya lo ixe y na :S grrcomo dije antes igual s algo de algun codigo , pero no se

si algien sabe

aora lo volvi a abrir y m puso copiele error aka miren

[/code]
Private Sub GuardiasAI(ByVal NpcIndex As Integer, Optional ByVal DelCaos As Boolean = False)

Dim headingloop As Byte
Dim tHeading As Byte
Dim Y As Integer
Dim X As Integer
Dim UI As Integer

For headingloop = NORTH To WEST
nPos = Npclist(NpcIndex).Pos
If Npclist(NpcIndex).flags.Inmovilizado = 0 Or headingloop = Npclist(NpcIndex).Char.Heading Then
Call HeadtoPos(headingloop, nPos)
If InMapBounds(nPos.Map, nPos.X, nPos.Y) Then
UI = MapData(nPos.Map, nPos.X, nPos.Y).UserIndex
If UI > 0 Then
If UserList(UI).flags.Muerto = 0 Then
'¿ES CRIMINAL?
If Not DelCaos Then
If Criminal(UI) Then
Call ChangeNPCChar(ToMap, 0, nPos.Map, NpcIndex, Npclist(NpcIndex).Char.Body, Npclist(NpcIndex).Char.Head, headingloop)
Call NpcAtacaUser(NpcIndex, UI)
Exit Sub
ElseIf Npclist(NpcIndex).flags.AttackedBy = UserList(UI).Name _
And Not Npclist(NpcIndex).flags.Follow Then
Call ChangeNPCChar(ToMap, 0, nPos.Map, NpcIndex, Npclist(NpcIndex).Char.Body, Npclist(NpcIndex).Char.Head, headingloop)
Call NpcAtacaUser(NpcIndex, UI)
Exit Sub
End If
Else
If Not Criminal(UI) Then
Call ChangeNPCChar(ToMap, 0, nPos.Map, NpcIndex, Npclist(NpcIndex).Char.Body, Npclist(NpcIndex).Char.Head, headingloop)
Call NpcAtacaUser(NpcIndex, UI)
Exit Sub
ElseIf Npclist(NpcIndex).flags.AttackedBy = UserList(UI).Name _
And Not Npclist(NpcIndex).flags.Follow Then
Call ChangeNPCChar(ToMap, 0, nPos.Map, NpcIndex, Npclist(NpcIndex).Char.Body, Npclist(NpcIndex).Char.Head, headingloop)
Call NpcAtacaUser(NpcIndex, UI)
Exit Sub
End If
End If
End If
End If
End If
End If 'not inmovil
Next headingloop

Call RestoreOldMovement(NpcIndex)

End Sub


lo k ta en color m lo señalo xfas algien ksepa k m diga
saluds

graz eso ya se me soluciono , pero mi cliente parexe tar lleno de errores weno aora me dixe copile error : END IF WITHOUT BLOCK OTHER IF o algo asi :


CODIGO Visual Basic:
rdata = Right$(rdata, Len(rdata) - 8)
If UserList(UserList(UserIndex).flags.TargetUser).flags.Muerto = 1 Then Exit Sub
End If
If CLng(val(rdata)) > 0 And CLng(val(rdata)) <= UserList(UserIndex).Stats.GLD Then
UserList(UserIndex).Stats.GLD = UserList(UserIndex).Stats.GLD - val(rdata)
UserList(UserList(UserIndex).flags.TargetUser).Stats.GLD = UserList(UserList(UserIndex).flags.TargetUser).Stats.GLD + val(rdata)
Else
Call SendData(ToIndex, UserIndex, 0, "||" & vbWhite & "°" & " No tenes esa cantidad." & "°" & UserList(UserList(UserIndex).flags.TargetUser).Char.charindex & FONTTYPE_INFO)
End If
Call SendUserStatsBox(UserIndex)
Call SendUserStatsBox(UserList(UserIndex).flags.TargetUser)
Exit Sub
End Select

en lo rojo m da error , x cierto no se m soluciono el problema de los npcs :S

Saludos


PD: Como axen pa postear imagenes , k a mi no m va , y a si pongo la foto de los npcs

xq ese end if ta demas , borralo

Faensis, Fijate que allí ya tienes un "Then Exit Sub", asi que el End If no hace falta ^^, solo borralo y ya .

Para que puedas poner imagenes, sabes usar ImageShack?, sino puedes encontrar un pequeño manual mio en la sección manuales y ayuda, con la diferencia de que ne vez de ponerla en la firma lo pones aquí.

Espero te sirva ^^, Suerte!

graz , m sirvio mirar esto es lo k m pasa k pa eso vino este pos aver si algien sabe a k se debe
<a href="http://img405.imageshack.us/img405/9696/ooovg0.png" class="postlink" rel="nofollow" onClick="window.open(this.href);return false;">http://img405.imageshack.us/img405/9696/ooovg0.png</a>

saluds :idea:

nadie sabe , xfvor k s imprtante

No p robaste bajando otro server? o ya tenes mucho modificado... tenes un back del server?

si no tenes te recomiendo k te lo bajes otra vez o prueves con otras verciones para ver si te pasa lo mismo... :wink:

va bue empexe a programar axe poko y no se muxo y si , abia metio muxas cosas pero :cry: aora e dexiio pasarme a la 0.11.5 k kreo k s algo mejor y volver a empexar otra vex ... :wink:
Saluds y graz a toos x intentar ayudarme

Che no es por nada, pero escribi un poquito mejor que no se entiende nada de lo que decis ..