LegalPosNPC

Estado
Cerrado para nuevas respuestas.

Pocho

Oráculo Lvl 3
el problema de todo este aoready es que tavo agrego esta funcion

Function LegalPosNPC(ByVal Map As Integer, ByVal X As Integer, ByVal Y As Integer, ByVal AguaValida As Byte) As Boolean
'*************************************************
'Author: Lucas Tavolaro Ortiz
'Last modified: 07/04/06
'*************************************************

' Modificado por Pablo Nicolas Petran


If Map NumMaps Or X MaxXBorder Or _
Y MaxYBorder Then
LegalPosNPC = False
Exit Function
Else
If MapData(Map, X, Y).trigger = 9 Then
LegalPosNPC = False
Exit Function
End If

If MapData(Map, X, Y).Blocked 1 Or MapData(Map, X, Y).UserIndex = 0 Or _
MapData(Map, X, Y).NpcIndex = 0 Then

If AguaValida = 0 And Not HayAgua(Map, X, Y) Then
LegalPosNPC = True
ElseIf AguaValida = 1 And HayAgua(Map, X, Y) Then
LegalPosNPC = True
Else
LegalPosNPC = False
End If
End If
End If

If MapData(Map, X, Y).Blocked = 1 Then
LegalPosNPC = False
End If

End Function



la cual permite al npc , atravezar cosas :S, si hubieran programado bien no hubiera pasado esto,
n o mire el codigo, pero imagino q el cambio de version de mapas, esta involucrado en todo esto
 

Pocho

Oráculo Lvl 3
solucion by me

Function LegalPosNPC(ByVal Map As Integer, ByVal X As Integer, ByVal Y As Integer, ByVal AguaValida As Byte) As Boolean
'*************************************************
'Author: Lucas Tavolaro Ortiz
'Last modified: 07/04/06
'Y arreglado por Fedex
'*************************************************

' Modificado por Pablo Nicolas Petran


If Map NumMaps Or X MaxXBorder Or _
Y MaxYBorder Then
LegalPosNPC = False
Exit Function
Else
If MapData(Map, X, Y).trigger = 9 Then
LegalPosNPC = False
Exit Function
End If

If MapData(Map, X, Y).Blocked 1 Or MapData(Map, X, Y).UserIndex = 0 Or _
MapData(Map, X, Y).NpcIndex = 0 Then

If AguaValida = 0 And Not HayAgua(Map, X, Y) Then
LegalPosNPC = True
ElseIf AguaValida = 1 And HayAgua(Map, X, Y) Then
LegalPosNPC = True
Else
LegalPosNPC = False
End If
End If
End If

If MapData(Map, X, Y).Blocked = 1 Then
LegalPosNPC = False
End If

[vb]<div class="vb" id="{CB}" style="font-family: monospace;"><ol><li style="" class="li1"><span style="color: #b1b100;">If</span> MapData<span style="color: #66cc66;">(</span>Map, X, Y<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">UserIndex</span> > <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li2">LegalPosNPC = <span style="color: #b1b100;">False</span></li><li style="" class="li1"><span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li><li style="" class="li2"><span style="color: #b1b100;">If</span> MapData<span style="color: #66cc66;">(</span>Map, X, Y<span style="color: #66cc66;">)</span>.<span style="color: #66cc66;">NpcIndex</span> > <span style="color: #cc66cc;">0</span> <span style="color: #b1b100;">Then</span></li><li style="" class="li1">LegalPosNPC = <span style="color: #b1b100;">False</span></li><li style="" class="li2"><span style="color: #b1b100;">End</span> <span style="color: #b1b100;">If</span></li></ol></div>[/vb]

End Function



reemplazar el viejo por este

o

agregar eso q marqe
 

Tavo

[color=#BF0000]Lucha por tus ideales![/color]
<a href="http://gs-zone.org/viewtopic.php?p=19492#19492" class="postlink" rel="nofollow" onClick="window.open(this.href);return false;">http://gs-zone.org/viewtopic.php?p=19492#19492</a>

Se arreglo supuestamente en el RC3
 
Estado
Cerrado para nuevas respuestas.
Arriba