Jump to content
Search In
  • More options...
Find results that contain...
Find results in...

PVJsquad

Members
  • Posts

    461
  • Joined

  • Last visited

    Never

Posts posted by PVJsquad

  1. > Bump, have a error in this line
    >
    > CopyMemory ByVal VarPtr(Serial(SerialNum)), ByVal VarPtr(**SerialData(0)**), SerialSize
    >
    > in Serial Data, The subscript is out of range. How to fix this D: ?
    >
    >  
    >
    > –-------------- EDIT I FIX THIS **( Client & Server )**
    >
    > Public this in ModConstants
    >
    > ```
    > Public Const SERIAL_LENGTH As Byte = 10 ' Change this value to max length you like in your codes
    >
    > ```
    > Now, go to modCode in **Public Type SerialRec **change this :
    >
    >  
    >
    > ```
    >
    > Name As String * NAME_LENGTH
    > ```
    > to:
    >
    > ```
    >
    > Name As String * SERIAL_LENGTH
    > ```
    > **Client WORK**
    >
    >  
    >
    > Go to frmSerial and click the txtName
    >
    >  
    >
    > ![](http://i58.servimg.com/u/f58/18/38/65/59/val210.png)
    >
    >  
    >
    > Change the MAX LENGTH to Public Const SERIAL_LENGTH As Byte = **10 **<- to your VALUE in SERIAL_LENGTH
    >
    >  
    >
    > ![](http://i58.servimg.com/u/f58/18/38/65/59/val110.png)
    >
    >  
    >
    > Cya ~
  2. i will make it simple for show some picturebox or many object in visual basic

    **frmMain
    .picClaim
    .visible
    = true**

    **Red**
     = the form name (example: Form1, Form2, frmMain, frmMenu, frmEditor_Item, …)

    **Orange**
    = the object name (example: picClaim, picCover, picSprite, cmbClass, scrlStats, …)

    **Yellow**  
    = destination for showing object (example: caption, enable, BackColor, …)

    **Green **
    = True or False

    so if you will make some object appear, type like that

    ```

    frmMain.picClaim.visible = true
    ```
    but if you want hide the object do it

    ```

    frmMain.picClaim.visible = false
    ```
    and if you want make toggle show/hide object do that

    ```

    frmMain.picClaim.visible = not frmMain.picClaim.visible
    ```
  3. try to tell developer about your problem in here [http://www.eclipseorigins.com/community/index.php?/forum/123-bug-reports/](http://www.eclipseorigins.com/community/index.php?/forum/123-bug-reports/)

    because this place for **Other Eclipse Engine** Only
  4. > Thanks Death, but my error is in buffer sever side and client, i'm using the final frontier, and i delete the buffer lines and this erro appaer.. :x Now i solve.
    >
    >  
    >
    > Nice Tuto, waiting for more like a good this tuto.

    can you show that the error ?
  5. > U.U how to solve? rsrs
    >
    >  
    >
    > [https://fbcdn-sphotos-b-a.akamaihd.net/hphotos-ak-xpf1/t1.0-9/10385375_479474208850255_9097954168469142182_n.jpg](https://fbcdn-sphotos-b-a.akamaihd.net/hphotos-ak-xpf1/t1.0-9/10385375_479474208850255_9097954168469142182_n.jpg)
    >
    >  
    >
    > Edit -  I solve s2 thx

    find 

    ```

    If Not Player(Index).GuildName = vbNullString Then
    ```
    replace with

    ```

    If Not Trim$(Player(Index).GuildName) = vbNullString Then
    ```
  6. in first time of server started and open client login , the player can login and play the game

    but after logout and login back the server not get packet data from client (Set breakpoints methods.) but the client sending packet to server
  7. I've got a problem, the machine I use is Eclipse Advance

    when i login for firstime the client is work absolutly, but when i logout then login back the client is stuck not doing anything

    even the login form that should disappear it does not happen

    before it when i take debug in ip localhost the error disappear

    but when i place the server in VPS or playing online the error is appear

    *i edited some script i change frmMenu suprt rendering system but not edited TCP module
  8. Hello guys i have problem with my engine

    I've previously added 

    [http://www.eclipseorigins.com/community/index.php?/topic/128175-eo-30-tile-based-simulated-lighting-system-10-deathbeam/?hl=light](http://www.eclipseorigins.com/community/index.php?/topic/128175-eo-30-tile-based-simulated-lighting-system-10-deathbeam/?hl=light)

    which makes the problem is when I would add tile to light systems

    ```

    Public Const TILE_TYPE_LIGHT as long = 'some number
    ```
    and i add some script in **CalcVertexBrightness**

    ```

    Public Function CalcVertexBrightness(LightX As Long, LightY As Long, VertexX As Long, VertexY As Long, Optional isTile As Boolean = False)
    Dim X1 As Long, x2 As Long, Y1 As Long, y2 As Long, distance As Double, LightSteps As Long
        Dim lXDistance As Long
        Dim lYDistance As Long
        Dim lDistance As Long
        Dim lVertexDistance As Long
        Dim lDistanceNormal As Long
        Dim lLightSteps As Long
        Dim lTileX As Long, lTileY As Long

        If Not isTile Then
            X1 = ConvertMapX(LightX * 32) + 8
            Y1 = ConvertMapY(LightY * 32) + 8
            x2 = VertexX
            y2 = VertexY
        Else
            lTileX = LightX - StartXValue
            lTileY = LightY - StartYValue
            If lTileX < 0 Then lTileX = 0
            If lTileY < 0 Then lTileY = 0

            X1 = ((LightX * 32) - (lTileX * PIC_X) - Camera.Left) + 8
            Y1 = ((LightY * 32) - (lTileY * PIC_Y) - Camera.Top) + 8
            x2 = VertexX
            y2 = VertexY
        End If

        lDistanceNormal = CLng(Sqr((PIC_X / 2) ^ 2 + (PIC_Y / 2) ^ 2))
        '// Calculate distance from vertex
        lXDistance = CLng(Abs(X1 - x2))
        lYDistance = CLng(Abs(Y1 - y2))
        lVertexDistance = CLng(Sqr(lXDistance ^ 2 + lYDistance ^ 2) / lDistanceNormal)

        If lVertexDistance <= LIGHT_MAXSTEPS Then
            '// Calculate light steps
            lLightSteps = CLng(Abs((LIGHT_BEGIN - LIGHT_END)) / (LIGHT_MAXSTEPS))

            If lLightSteps = 0 Then
                    lLightSteps = 1
            End If

            '// Calculate vertex brightness
            CalcVertexBrightness = CLng(LIGHT_BEGIN - (lVertexDistance * lLightSteps))

        Else
            '// Return lowest value
            CalcVertexBrightness = LIGHT_END
        End If
    End Function
    ```
    i got problem like that

    >! ![](http://eclipseorigins.com/community/filehost/c9f1544a1bc3c52b18ac323fefea4121.png)

    some tile not like player lighting and top left is tile light and bottom right is tile dark

    my predicition the error in that command

    ```

    If Not isTile Then
            X1 = ConvertMapX(LightX * 32) + 8
            Y1 = ConvertMapY(LightY * 32) + 8
            x2 = VertexX
            y2 = VertexY
        Else
            lTileX = LightX - StartXValue
            lTileY = LightY - StartYValue
            If lTileX < 0 Then lTileX = 0
            If lTileY < 0 Then lTileY = 0

            X1 = ((LightX * 32) - (lTileX * PIC_X) - Camera.Left) + 8
            Y1 = ((LightY * 32) - (lTileY * PIC_Y) - Camera.Top) + 8
            x2 = VertexX
            y2 = VertexY
        End If
    ```
    can you fix that
×
×
  • Create New...