You are using an outdated browser that does not support modern web technologies, in order to use this site please update to a new browser.
Browsers supported include Chrome, FireFox, Safari, Opera, Internet Explorer 10+ or Microsoft Edge.
' This code is SMALL part of my entire game
' I assume an Imports DarkGDK statement for the following lines
Net.Multiplayer.SetConnection(3,My.Computer.Name) ' Connection 3 is an Tcp/Ip connection on my machine...I also tried with IPX connection but I've the same problem
Net.Multiplayer.SetConnection(3,"KORPIKLAANI") ' I set another Tcp/Ip connection pointing my machine who is running the game in HOST mode (I have Tcp/Ip connection on slot 3 on each PC)
For I As Integer = 1 To 400
Dim mem_leak As New Basic3D.Plane(100.0F,100.0F)
Dim vLight As New Lighting.AdditionalLight
DGDKPlugins.CDarkGDK.oDBLight.SetSpotLight(vLight.Id, 10.0F, 45.0F)
' vLight.Type property gets LightType.Directional enum value!!
' It seems to me that you have messed up the LightType enum because calling SetSpotLight directly, correctly sets the light as a SpotLight and it seems you have forgotten a call to SetSpotLight inside your class!
//Put this on your main loop
if(DarkGDK.IO.Mouse.Click == 2)
MessageBox.Show("Right Mouse Button Clicked");
//Made an label that is suppose to be filled whit the keyboard scan code.
lblTest.Text = DarkGDK.IO.Keyboard.ScanCode.ToString();
Public Class Game
Private Delay As Integer = 0
Dim ship As Basic2D.AnimatedSprite
Public Sub Entry()
Engine.WorkingDirectory = "..\..\Assets"
Display.SetDisplayMode(640, 480, 32)
ship = New Basic2D.AnimatedSprite("MyShip.png", 3, 7)
ship.Frame = 7
Text.ShowText(0, 0, "Frame: " + ship.Frame.ToString)
Private Sub Run()
If ship.Frame = 21 Then Exit Sub
Delay += 1
If Delay > 40 Then
Delay = 0
ship.frame += 1
Login to post a reply