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

Screen change bug?


highonpaint
 Share

Recommended Posts

ok Go into ModGraphics or whatever the hell it's named and look for a sub called DrawGUI

in that sub at the very top should be 2 lines that renders

```

RenderTexture Tex_GUI(32), 0, 0, 0, 0, 800, 64, 1, 64

RenderTexture Tex_GUI(31), 0, 600 - 64, 0, 0, 800, 64, 1, 64

```

Replace it with

```

RenderTexture Tex_GUI(32), 0, 0, 0, 0, frmMain.ScaleWidth, 64, 1, 64

RenderTexture Tex_GUI(31), 0, frmMain.ScaleHeight - 64, 0, 0, frmMain.ScaleWidth, 64, 1, 64

```
Link to comment
Share on other sites

```
Public Sub DrawGUI()

Dim i As Long, X As Long, Y As Long

Dim Width As Long, Height As Long

' render shadow

'EngineRenderRectangle Tex_GUI(27), 0, 0, 0, 0, 800, 64, 1, 64, 800, 64

'EngineRenderRectangle Tex_GUI(26), 0, 600 - 64, 0, 0, 800, 64, 1, 64, 800, 64

RenderTexture Tex_GUI(32), 0, 0, 0, 0, frmMain.ScaleWidth, 64, 1, 64

RenderTexture Tex_GUI(31), 0, frmMain.ScaleHeight - 64, 0, 0, frmMain.ScaleWidth, 64, 1, 64

' render chatbox

If Not inChat Then

If chatOn Then

Width = 412

Height = 145

RenderTexture Tex_GUI(1), GUIWindow(GUI_CHAT).X, GUIWindow(GUI_CHAT).Y, 0, 0, Width, Height, Width, Height

RenderText Font_Default, RenderChatText & chatShowLine, GUIWindow(GUI_CHAT).X + 38, GUIWindow(GUI_CHAT).Y + 126, White

' draw buttons

For i = 34 To 35

' set co-ordinate

X = GUIWindow(GUI_CHAT).X + Buttons(i).X

Y = GUIWindow(GUI_CHAT).Y + Buttons(i).Y

Width = Buttons(i).Width

Height = Buttons(i).Height

' check for state

If Buttons(i).state = 2 Then

' we're clicked boyo

'EngineRenderRectangle Tex_Buttons_c(Buttons(i).PicNum), x, y, 0, 0, width, height, width, height, width, height

RenderTexture Tex_Buttons_c(Buttons(i).PicNum), X, Y, 0, 0, Width, Height, Width, Height

ElseIf (GlobalX >= X And GlobalX <= X + Buttons(i).Width) And (GlobalY >= Y And GlobalY <= Y + Buttons(i).Height) Then

' we're hoverin'

'EngineRenderRectangle Tex_Buttons_h(Buttons(i).PicNum), x, y, 0, 0, width, height, width, height, width, height

RenderTexture Tex_Buttons_h(Buttons(i).PicNum), X, Y, 0, 0, Width, Height, Width, Height

' play sound if needed

If Not lastButtonSound = i Then

PlaySound Sound_ButtonHover, -1, -1

lastButtonSound = i

End If

Else

' we're normal

'EngineRenderRectangle Tex_Buttons(Buttons(i).PicNum), x, y, 0, 0, width, height, width, height, width, height

RenderTexture Tex_Buttons(Buttons(i).PicNum), X, Y, 0, 0, Width, Height, Width, Height

' reset sound if needed

If lastButtonSound = i Then lastButtonSound = 0

End If

Next

Else

RenderTexture Tex_GUI(1), GUIWindow(GUI_CHAT).X, GUIWindow(GUI_CHAT).Y + 123, 0, 123, 412, 22, 412, 22

End If

RenderChatTextBuffer

Else

If GUIWindow(GUI_CURRENCY).visible Then DrawCurrency

If GUIWindow(GUI_EVENTCHAT).visible Then DrawEventChat

End If

DrawGUIBars

DrawMapName

' render menu

If GUIWindow(GUI_MENU).visible Then DrawMenu

' render hotbar

If GUIWindow(GUI_HOTBAR).visible Then DrawHotbar

' render menus

If GUIWindow(GUI_INVENTORY).visible Then DrawInventory

If GUIWindow(GUI_SPELLS).visible Then DrawSkills

If GUIWindow(GUI_CHARACTER).visible Then DrawCharacter

If GUIWindow(GUI_OPTIONS).visible Then DrawOptions

If GUIWindow(GUI_PARTY).visible Then DrawParty

If GUIWindow(GUI_SHOP).visible Then DrawShop

If GUIWindow(GUI_BANK).visible Then DrawBank

If GUIWindow(GUI_TRADE).visible Then DrawTrade

If GUIWindow(GUI_DIALOGUE).visible Then DrawDialogue

' Drag and drop

DrawDragItem

DrawDragSpell

' Descriptions

DrawInventoryItemDesc

DrawCharacterItemDesc

DrawPlayerSpellDesc

DrawBankItemDesc

DrawTradeItemDesc

End Sub
```
Link to comment
Share on other sites

I have Elipse Origons couldn't veiw the entire event system page. The rest of the game was a little to big as well. Therefore I changed the resolution settings, as a result I got this: [http://i47.tinypic.com/2yy42ld.jpg](http://i47.tinypic.com/2yy42ld.jpg) (it's a jpg so the pixels suck.)

Everything is misplaced I turned it all the settings back to default, restarted PC and still looks like crap. It's clearly not even functional. Now I would just ber happy to have it back to the original size! I've searched a lot for any fixes and this thread is all I found. I feel your pain Highonpaint!
Link to comment
Share on other sites

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...