05-06-2006, 09:00 PM
Advocate Wrote:It's no where near that simple william.Hehe, yes it is, you simply just want to change those. Im pretty skilled with the frames cause Ive spent some time on it before, this is my code:
Code:
' Check for animation
If Player(Index).Attacking = 0 Then
Select Case GetPlayerDir(Index)
Case DIR_UP
If (Player(Index).YOffset < PIC_Y / 1) Then
Anim = 1
End If
If (Player(Index).YOffset < PIC_Y / 2) Then
Anim = 2
End If
If (Player(Index).YOffset < PIC_Y / 8) Then
Anim = 0
End If
Case DIR_DOWN
If (Player(Index).YOffset > (PIC_Y / 1) * -1) Then
Anim = 1
End If
If (Player(Index).YOffset > (PIC_Y / 2) * -1) Then
Anim = 2
End If
If (Player(Index).YOffset > (PIC_Y / 8) * -1) Then
Anim = 0
End If
Case DIR_LEFT
If (Player(Index).XOffset < PIC_Y / 1) Then
Anim = 1
End If
If (Player(Index).XOffset < PIC_Y / 2) Then
Anim = 0
End If
Case DIR_RIGHT
If (Player(Index).XOffset < PIC_Y / 2 * -1) Then
Anim = 1
End If
End Select
Else
If Player(Index).AttackTimer + AttackSpeed > GetTickCount Then
Anim = 3
End If
End If