Advertisement
Guest User

Untitled

a guest
Aug 13th, 2018
70
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1.  ' ++ Nueva formula para las vidas de los personajes
  2.            AumentoHP = RandomNumber(MinHP, MaxHP)
  3.            
  4.             ' ++ Fix por si las dudas xd
  5.            If AumentoHP < 3 Then AumentoHP = 3
  6.             If AumentoHP > 12 Then AumentoHP = 12
  7.  
  8.             ' ++ Si es un malaleche tremendo xd
  9.            If AumentoHP = MinHP Then
  10.                
  11.                 ' ++ Calculamos las ups suponiendo que pasa el level con la vida de AumentoHP
  12.                UPS = CalcularPromedio(UserIndex, AumentoHP)
  13.            
  14.                 If UPS < 5 Then
  15.                    
  16.                     Select Case UPS
  17.                         Case 5 To 10
  18.                             AumentoHP = RandomNumber(MinHP + RandomNumber(1, 2), MaxHP)    ' -1,+0,+1
  19.                        Case 10 To 20
  20.                             AumentoHP = RandomNumber(MinHP + RandomNumber(0, 2), MaxHP)    ' -2,-1,+0
  21.                        Case 20 To 40
  22.                             AumentoHP = RandomNumber(MinHP + RandomNumber(0, 1), MaxHP)    ' -2,-1
  23.                    End Select
  24.                    
  25.                 Else
  26.                
  27.                     ' ++ Le damos mucha probabilidad de que suba xd
  28.                    AumentoHP = RandomNumber(MixHP + RandomNumber(1, 3))    ' -1,+0,+1,+2
  29.                    
  30.                 End If
  31.                
  32.             End If
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement