#1
seeker
seeker
-

-
Favorite Pinball: MM
Posted 25 February 2009 - 08:53 AM
Hello everybody,
I just fired up JPSalas Medieval Madness and got an error (
mSlingbump not found).
After analyzing the file core.vbs I detected that
VP9 (9.0.2) supports a wrong VPBuildVersion.
This is 902.
Thus, in the following code from core.vbs the variable vpmCheckVPVer is set to 60!
In my opinion this is wrong.
CODE
'---------------------------
' Check VP version running
'---------------------------
Private Function vpmCheckVPVer
On Error Resume Next
' a bug in VBS?: Err object is not cleared on Exit Function
If VPBuildVersion < 0 Or Err Then vpmCheckVPVer = 50 : Err.Clear : Exit Function
If VPBuildVersion > 2806 Then
vpmCheckVPVer = 63
ElseIf VPBuildVersion > 2721 Then
vpmCheckVPVer = 61
Else
vpmCheckVPVer = 60
End If
End Function
I have modified the code the following way:
CODE
'---------------------------
' Check VP version running
'---------------------------
Private Function vpmCheckVPVer
'msgbox (VPBuildVersion)
On Error Resume Next
' a bug in VBS?: Err object is not cleared on Exit Function
If VPBuildVersion < 0 Or Err Then vpmCheckVPVer = 50 : Err.Clear : Exit Function
If VPBuildVersion > 2806 Then
vpmCheckVPVer = 63
ElseIf VPBuildVersion > 2721 Then
vpmCheckVPVer = 61
ElseIf VPBuildVersion >= 900 and VPBuildVersion <= 999 Then
vpmCheckVPVer = 90
Else
vpmCheckVPVer = 60
End If
End Function
Thus, there is no error with the
mSlingbump.
It is possible to change the code in core.vbs.
Or perhaps it is possible to change the Buildnumber in
VP9...?
cu
seeker
Edited by seeker, 25 February 2009 - 08:55 AM.