Code center > Bugs and fixes

Houston we have a problem!

<< < (2/2)

Botsareus:
Num I seen an overflow, brb I'll go get source:

Here is the corrected code (dont mind my really extream methods of correction , I did them bc this way its backwords compatible)


The Shots_Module:

--- Quote ---Public Sub newshot(n As Integer, shottype As Integer, val As Long, rngmultiplier As Single)
....
  If shottype = -7 Then
    Dim tempa As Single
    tempa = CLng(rob(n).mem(338)) * 20  'Must have a Clng in there
    If tempa <= 32000 Then
      Shots(a).nrg = rob(n).mem(338) * 20
    Else
      KillRobot n
    End If
    Shots(a).range = Shots(a).nrg
    Shots(a).color = vbCyan
  End If
....
--- End quote ---

Numsgil:
I already got that one in 2.37.2 I beleive.

Botsareus:
I am pritty sure there is no clng in there (unless the source code on the web site is not the one, or unless I messed up when copying my own custom functions from 3.26)

Num, check it for clng() to make sure

Numsgil:
Not a CLng, but I fixed it another way.  That particular overflow should be fixed.

Navigation

[0] Message Index

[*] Previous page