Usage

The B2S Server is a Windows COM Server application.

Sub Table1_Init
    vpmInit Me
    With Controller
   .GameName = cGameName
        If Err Then MsgBox "Can't start Game " & cGameName & vbNewLine & Err.Description:Exit Sub
        .SplashInfoLine = "Batman, Data East 1991" & vbNewLine & "VPX table by Javier v1.0"
        .HandleKeyboard = 0
        .ShowTitle = 0
        .ShowDMDOnly = 1
        .ShowFrame = 0
        .HandleMechanics = 0
        .Hidden = 0
        if GetCustomParam(1)= "NOPUP" Then .PuPHide=1 else .LaunchBackglass=0 end if
        .Games(cGameName).Settings.Value("sound") = 1
        On Error Resume Next
        .Run GetPlayerHWnd
        If Err Then MsgBox Err.Description
    End With
    On Error Goto 0