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

[EO] Resolution problem


multigame
 Share

Recommended Posts

Gush, I followed this guide: http://www.touchofdeathforums.com/smf/index.php/topic,63604.0.html.

The problem is this:
![](http://img163.imageshack.us/img163/600/bugfail.png)

This is my form_load in frmMainGame:
```
Private Sub Form_Load()
    picScreen.width = 800 ' Width in tiles * 32
    picScreen.height = 608 ' Height in tiles * 32
    picAdmin.Left = 10
    picCurrency.Left = txtMyChat.Left
    picCurrency.Top = txtMyChat.Top
End Sub
```I also changed it in properties width=800 and height=608.

In modConstants:
```
Public Const MAX_MAPX As Byte = 24
Public Const MAX_MAPY As Byte = 18
```
But it still dosen't work, please help!
Link to comment
Share on other sites

I've never come across this problem before.

If you screw up that tutorial, you'll just get a stretched screen.

The camera system should stop you from being able to scroll past the edge of the map.

The only reason I can see this happening is if you've managed to screw up the UpdateCamera procedure.
Link to comment
Share on other sites

@Robin:

> I've never come across this problem before.
>
> If you screw up that tutorial, you'll just get a stretched screen.
>
> The camera system should stop you from being able to scroll past the edge of the map.
>
> The only reason I can see this happening is if you've managed to screw up the UpdateCamera procedure.

Naa, I don't think I've touched it:

```
Public Sub UpdateCamera()
    Dim offsetX As Long
    Dim offsetY As Long
    Dim StartX As Long
    Dim StartY As Long
    Dim EndX As Long
    Dim EndY As Long
    offsetX = Player(MyIndex).XOffset + PIC_X
    offsetY = Player(MyIndex).YOffset + PIC_Y
    StartX = GetPlayerX(MyIndex) - ((MAX_MAPX + 1) \ 2) - 1
    StartY = GetPlayerY(MyIndex) - ((MAX_MAPY + 1) \ 2) - 1

    If StartX < 0 Then
        offsetX = 0

        If StartX = -1 Then
            If Player(MyIndex).XOffset > 0 Then
                offsetX = Player(MyIndex).XOffset
            End If
        End If

        StartX = 0
    End If

    If StartY < 0 Then
        offsetY = 0

        If StartY = -1 Then
            If Player(MyIndex).YOffset > 0 Then
                offsetY = Player(MyIndex).YOffset
            End If
        End If

        StartY = 0
    End If

    EndX = StartX + (MAX_MAPX + 1) + 1
    EndY = StartY + (MAX_MAPY + 1) + 1

    If EndX > Map.MaxX Then
        offsetX = 32

        If EndX = Map.MaxX + 1 Then
            If Player(MyIndex).XOffset < 0 Then
                offsetX = Player(MyIndex).XOffset + PIC_X
            End If
        End If

        EndX = Map.MaxX
        StartX = EndX - MAX_MAPX - 1
    End If

    If EndY > Map.MaxY Then
        offsetY = 32

        If EndY = Map.MaxY + 1 Then
            If Player(MyIndex).YOffset < 0 Then
                offsetY = Player(MyIndex).YOffset + PIC_Y
            End If
        End If

        EndY = Map.MaxY
        StartY = EndY - MAX_MAPY - 1
    End If

    With TileView
        .Top = StartY
        .Bottom = EndY
        .Left = StartX
        .Right = EndX
    End With

    With Camera
        .Top = offsetY
        .Bottom = .Top + ScreenY
        .Left = offsetX
        .Right = .Left + ScreenX
    End With

    UpdateDrawMapName

End Sub

```
Link to comment
Share on other sites

@Fixed:

> Worked, thank you!

Of course it bloody worked. You just turned off the scrolling engine.

That's like you complaining about your city being flooded and me telling you to close your curtains. Just because you can't see it doesn't mean it isn't there. Stop hiding from your problems and face them.
Link to comment
Share on other sites

@Robin:

> @Fixed:
>
> > Worked, thank you!
>
> Of course it bloody worked. You just turned off the scrolling engine.
>
> That's like you complaining about your city being flooded and me telling you to close your curtains. Just because you can't see it doesn't mean it isn't there. Stop hiding from your problems and face them.

I don't want to face problems I don't know how to fix.
Link to comment
Share on other sites

simple solution delete all maps server and client and change in server

in modConstants change
```
Public Const MAX_MAPX As Byte = 14
Public Const MAX_MAPY As Byte = 11
```
to
```
Public Const MAX_MAPX As Byte = 24
Public Const MAX_MAPY As Byte = 18
```
Link to comment
Share on other sites

@Robin:

> @Fixed:
>
> > Worked, thank you!
>
> Of course it bloody worked. You just turned off the scrolling engine.
>
> That's like you complaining about your city being flooded and me telling you to close your curtains. Just because you can't see it doesn't mean it isn't there. Stop hiding from your problems and face them.

Of course not.Just change the variables t the map editor to IE ; x 40 y 40 and everything including the scrolling engine will work.
Link to comment
Share on other sites

  • 3 weeks later...

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

×
×
  • Create New...