No replies to this topic

[BarryS]

Ultimate Spiderman FS [UVP]



Version: 1.0.0
Category: Animated Backglasses

Author(s): BarryS

Description:
UVP for Ultimate Spiderman 2011
You need to add the following to the script.

After the following like (Line 16):

Option Explicit 'Force variables to be declared

Add:

LoadVPM "01320000", "WPC.VBS", 3.13

'==============================================
' Check requirements and load VPM, VPVBS files
'==============================================
Sub LoadVPM(VPMver, VBSfile, VBSver)
On Error Resume Next
If ScriptEngineMajorVersion < 5 Then MsgBox "VB Script Engine 5.0 or higher required" : Exit Sub
ExecuteGlobal GetTextFile(VBSfile)
If Err Then MsgBox "Unable to open " & VBSfile & ". Ensure that it is in the same folder as this table. " & vbNewLine & Err.Description : Exit Sub
Set Controller = CreateObject("UltraVP.BackglassServ")
If Err Then MsgBox "Unable to load VPinMAME." & vbNewLine & Err.Description : Exit Sub
If VPMver > "" Then
If Controller.Version < VPMver Or Err Then MsgBox "This table requires VPinMAME ver " & VPMver & " or higher." : Exit Sub
End If
If VPinMAMEDriverVer < VBSver Or Err Then MsgBox "This table requires " & VBSFile & " ver " & VBSver & " or higher." : Exit Sub
End Sub

View File

Submitted by BarryS, on Nov 20 2010, 05:13 PM