Hi Hmueck,
Thanx for this dB2S.
Can you tell me how to add it to the table. When i first loaded, it still ran the UVP, so i added this line, but it still won't load. I saw thdB2S for 1 sec and then it disappear and my table was blank as well. Cheers.:
Sub Stargate_Init
'init controller
vpmInit Me
On Error Resume Next
With Controller
.GameName = cGameName
.Games(cGameName).Settings.Value("dmd_red")=255
.Games(cGameName).Settings.Value("dmd_green")=0
.Games(cGameName).Settings.Value("dmd_blue")=0
' .Games(cGameName).Settings.Value("dmd_pos_x")=0
' .Games(cGameName).Settings.Value("dmd_pos_y")=0
' .Games(cGameName).Settings.Value("dmd_width")=133
' .Games(cGameName).Settings.Value("dmd_height")=517
' .Games(cGameName).Settings.Value("rol")=1
Set Controller = CreateObject("B2S.Server")
If Err Then MsgBox "Can't start Game" & cGameName & vbNewLine & Err.Description : Exit Sub
.SplashInfoLine = cCredits
.HandleMechanics = 0
.HandleKeyboard=0
.ShowDMDOnly = True : .ShowFrame = False : .ShowTitle = False
.Run : If Err Then MsgBox Err.Description
End With
On Error Goto 0
etc...