Mirage Source
Again... - Printable Version

+- Mirage Source (https://mirage-engine.uk/forums)
+-- Forum: Mirage Source (Nostalgia) (https://mirage-engine.uk/forums/forumdisplay.php?fid=61)
+--- Forum: Archive (2006-2011) (https://mirage-engine.uk/forums/forumdisplay.php?fid=18)
+---- Forum: General (https://mirage-engine.uk/forums/forumdisplay.php?fid=17)
+---- Thread: Again... (/showthread.php?tid=2005)



Again... - Pbcrazy - 12-08-2008

ok so can any one tell me why this is crashing my server?
Code:
If Parse(0) = PH_AttackNPC Then
    npcname = Parse(1)
    
    Call AddText("recieved backet", vbBlack)
    For i = 1 To MAX_NPC
        Call AddText("in for loop", vbBlack)
        If Npc(i).Name = npcname Then
            Call AddText("in if statement", vbBlack)
            Call AttackNPC(Index, i)
            Call AddText("recieved attack request", vbBlack)
        End If
    Next i
End If



Re: Again... - GIAKEN - 12-08-2008

Give us more details (error number / whatever, and so on)


Re: Again... - Pbcrazy - 12-08-2008

unfortunately i dont have a error number for you as the only way i can get to that part of the sub is if i compile it, and then, it just crashes the entire program.

and im not sure how to go through debug line by line -_-


Re: Again... - Matt - 12-08-2008

Comment it all out, recreate the issue and see if it still happens.


Re: Again... - Pbcrazy - 12-08-2008

ok thanks for the advice, should have thought of that earlier -_- but i figured out whats actually crashing it i think
[code]Sub AttackNPC(ByVal Index As Integer, ByVal NPCnum As Integer)
Dim PlayerDmg As Integer
Dim NPCDmg As Integer
Dim PlayerDef As Integer
Dim NPCDef As Integer
Dim BattleFinished As Boolean
Dim battlecount As Byte
Dim LastSec As Integer

BattleFinished = False
battlecount = 0
LastSec = 0

Call AddText("in attack sub", vbBlack)
Do Until BattleFinished = True
If ServerSecond


Re: Again... - Matt - 12-08-2008

Um. If you think that's the spot, YOU sort through it. Learn from your mistakes.

Personally, I'd comment each of it out first, just to make sure it is in fact the issue.


Re: Again... - Pbcrazy - 12-08-2008

Dave Wrote:breakpoint
F8 until it stops working
Then you know what line.

wait how do i do the break point and stuff -_-


Re: Again... - Robin - 12-08-2008

Pbcrazy Wrote:
Dave Wrote:breakpoint
F8 until it stops working
Then you know what line.

wait how do i do the break point and stuff -_-

http://www.google.co.uk/search?hl=en&q=vb6+breakpoints&btnG=Google+Search&meta=


Re: Again... - Matt - 12-08-2008

I click the area next to the code, which makes it highlight the line in red. Makes the code break there, and show you what's going on, IF it reaches that point.


Re: Again... - Pbcrazy - 12-08-2008

thanks ill see what i can do