if PktDamageTo >= gMinPlayerIdx and PktDamageTo <= gMaxPlayerIdx then ' Primer check, si el que recibe el daño es un character if PlayerID = PktDamageTo then ' Segundo check, si el Character que recibe el daño somos nosotros if Atacker(PlayerID) >= gMinPlayerIdx and Atacker(PlayerID) <= gMaxPlayerIdx or Atacker(PlayerID) >= (gMinPlayerIdx AND &H7FFF) and Atacker(PlayerID) <= (gMaxPlayerIdx AND &H7FFF) then ' Tercer check, si el que nos ataca es un character if ActualSG(PlayerID) > 0 THEN ' Tenemos SG Player = GetPlayerAddress(PlayerID) Player->HP += Pktdamage if ActualSG(PlayerID) > PktDamage THEN ActualSG(PlayerID) -= PktDamage SgWentZero(PlayerID) = &H0 else ActualSG(PlayerID) = &H0 SgWentZero(PlayerID) = &H1 endif pProtocol(8) = pProtocol(5) pProtocol(9) = pProtocol(6) pProtocol(5) = &H0 pProtocol(6) = &H0 else ' no keda SG pProtocol(8) = &H0 pProtocol(9) = &H0 endif else ' Nos ataco un Mob pProtocol(8) = &H0 pProtocol(9) = &H0 endif else ' No estamos recibiendo el daño nosotros if ActualSG(PktDamageTo) > &H0 THEN pProtocol(8) = pProtocol(5) pProtocol(9) = pProtocol(6) pProtocol(5) = &H0 pProtocol(6) = &H0 else ' no le queda SG mostremos que sacamos vida if SgWentZero(PktDamageTo) = &H0 Then pProtocol(8) = &H0 pProtocol(9) = &H0 else SgWentZero(PktDamageTo) = &H0 pProtocol(8) = pProtocol(5) pProtocol(9) = pProtocol(6) pProtocol(5) = &H0 pProtocol(6) = &H0 endif endif endif else ' Se esta dañando un mob pProtocol(8) = &H0 pProtocol(9) = &H0 endif End If