Virtual Jaguar 2.1 released

Pyramid_Head · February 10, 2013

Thanks man!! That new module worked out perfectly

dustind900 · February 10, 2013

Hopefully like brolly said they will just add an option to hide the toolbar in future builds.

Pyramid_Head · February 10, 2013

I agree that would be awesome

everten2 · February 11, 2013

I can't seem to hide the toolbar. I'm using Hyperlaunch 2.25 and Virtual Jaguar 2.1 on Windows XP. I tried copying your code into a fresh "Atari Jaguar.ahk" file in the modules folder but it doesn't work. Any advice?

dustind900 · February 11, 2013

I can't seem to hide the toolbar. I'm using Hyperlaunch 2.25 and Virtual Jaguar 2.1 on Windows XP. I tried copying your code into a fresh "Atari Jaguar.ahk" file in the modules folder but it doesn't work. Any advice?

Try using the version listed in the module I made

In the Module Replace

If (A_OSVersion = "WIN_7"){

with

If (A_OSVersion = "WIN_7" || A_OSVersion = "WIN_XP"){

let me know

everten2 · February 11, 2013

I don't see any reference to OSVersion.

dustind900 · February 12, 2013

I don't see any reference to OSVersion.

Are you sure you are using the module I posted?

Try both versions I post here and let me know which one works for you

1

;------------------------------------------------------------------------
; Atari Jaguar
; Virtual Jaguar Git - 02/09/2013 - http://www.emucr.com/2013/02/virtual...=1360460895285
;
; 1.0
;
; Notes:
; Set Virtual Jaguar to start full screen.
;------------------------------------------------------------------------

GUI_ID := FadeInStart()

7z1 := 7z(romPath, romName, romExtension, 7zExtractDir)

Run %executable% "%romPath%%romName%%romExtension%", %emuPath%,, VJ_PID

WinWait ahk_pid %VJ_PID%
WinWaitActive ahk_pid %VJ_PID%
If A_OSVersion in WIN_7,WIN_XP
{	MouseClick Right, 1, 1
MouseClick Left, 5, 5
}
ControlMove QGLWidget1, 0, 0, %A_ScreenWidth%, %A_ScreenHeight%, ahk_pid %VJ_PID%

GUI_ID2 := FadeInExit()

Process, WaitClose, %VJ_PID%

7z2 := 7zCleanUp()

GUI_ID4 := FadeOutExit()

WinActivate, HyperSpin

ExitApp

CloseProcess:
GUI_ID3 := FadeOutStart()
WinClose ahk_pid %VJ_PID%
Return

2

;------------------------------------------------------------------------
; Atari Jaguar
; Virtual Jaguar Git - 02/09/2013 - http://www.emucr.com/2013/02/virtual...=1360460895285
;
; 1.0
;
; Notes:
; Set Virtual Jaguar to start full screen.
;------------------------------------------------------------------------

GUI_ID := FadeInStart()

7z1 := 7z(romPath, romName, romExtension, 7zExtractDir)

Run %executable% "%romPath%%romName%%romExtension%", %emuPath%,, VJ_PID

WinWait ahk_pid %VJ_PID%
WinWaitActive ahk_pid %VJ_PID%
If (A_OSVersion = "WIN_7"){
MouseClick Right, 1, 1
MouseClick Left, 5, 5
}
ControlMove QGLWidget1, 0, 0, %A_ScreenWidth%, %A_ScreenHeight%, ahk_pid %VJ_PID%

GUI_ID2 := FadeInExit()

Process, WaitClose, %VJ_PID%

7z2 := 7zCleanUp()

GUI_ID4 := FadeOutExit()

WinActivate, HyperSpin

ExitApp

CloseProcess:
GUI_ID3 := FadeOutStart()
WinClose ahk_pid %VJ_PID%
Return

djvj · February 12, 2013

BTW, this is slightly cleaner:

If A_OSVersion in WIN_7,WIN_XP

{

dustind900 · February 12, 2013

Yeah I've been trying to use "in" and "not in" in my code more often, but old habits are hard to break.

everten2 · February 13, 2013

Neither codes are working, game loads, but the toolbar is still up and as ugly as ever.

brolly · February 13, 2013

If you're using loading screens the mouse click part must be done after FadeInExit and not before otherwise you'll be clicking the fade GUI. Mouse click is also needed for XP btw.

everten2 · February 13, 2013

Brolly, you are right. I moved the code after the FadeInExit and it worked. Now how do I remove the gray bar at the bottom of the screen?

Here's my code:

;------------------------------------------------------------------------
; Atari Jaguar
; Virtual Jaguar Git - 02/09/2013 - http://www.emucr.com/2013/02/virtual...=1360460895285
;
; 1.0
;
; Notes:
; Set Virtual Jaguar to start full screen.
;------------------------------------------------------------------------

GUI_ID := FadeInStart()

7z1 := 7z(romPath, romName, romExtension, 7zExtractDir)

Run %executable% "%romPath%%romName%%romExtension%", %emuPath%,, VJ_PID

WinWait ahk_pid %VJ_PID%
WinWaitActive ahk_pid %VJ_PID%

ControlMove QGLWidget1, 0, 0, %A_ScreenWidth%, %A_ScreenHeight%, ahk_pid %VJ_PID%

GUI_ID2 := FadeInExit()

If A_OSVersion in WIN_7,WIN_XP
{	MouseClick Right, 1, 1
MouseClick Left, 5, 5
}

Process, WaitClose, %VJ_PID%

7z2 := 7zCleanUp()

GUI_ID4 := FadeOutExit()

WinActivate, HyperSpin

ExitApp

CloseProcess:
GUI_ID3 := FadeOutStart()
WinClose ahk_pid %VJ_PID%
Return

brolly · February 14, 2013

ControlMove QGLWidget1, 0, 0, %A_ScreenWidth%, %A_ScreenHeight%, ahk_pid %VJ_PID%

Must be moved as well, thats what hides the control... so just put it after the if condition.

Pyramid_Head · February 15, 2013

A new git has been released. Don't know if anything regarding the fullscreen issue has been fixed or not. http://www.emucr.com/2013/02/virtual-jaguar-git-20130214.html

brolly · February 15, 2013

Seems removing the toolbar isn't an easy fix after all, Shamus will try to address it at a later version, but it probably will take a while so for now we'll have to stick to doing it on the module.

Pyramid_Head · February 15, 2013

I don't mind using the module method for now. Hopefully that tool bar problem will be a thing of the past

dustind900 · February 16, 2013

New Module... MouseClicks are not needed for Windows 7 anymore. Need someone with XP to verify this is working.

;------------------------------------------------------------------------
; Atari Jaguar
; Virtual Jaguar Git - 02/14/2013 - [url="http://www.emucr.com/2013/02/virtual-jaguar-git-20130214.html"]http://www.emucr.com/2013/02/virtual-jaguar-git-20130214.html[/url]
;
;For use with HyperLaunch v2.25c
;
; 1.1
;
;----------------------------------------------------------------------------
; Notes:
; Fullscreen works but is not perfect until the emu dev allows hiding of the toolbar
; The emu stores its config in the registry @ HKEY_CURRENT_USER\Software\Underground Software\Virtual Jaguar
;----------------------------------------------------------------------------
Fullscreen = true
;------------------------------------------------------------------------

GUI_ID := FadeInStart()

currentFullScreen := ReadReg("fullscreen")
If (Fullscreen = "true" && currentFullScreen = "false")
WriteReg("fullscreen", "true")
Else If (Fullscreen != "true" && currentFullScreen = "true")
WriteReg("fullscreen", "false")

7z1 := 7z(romPath, romName, romExtension, 7zExtractDir)

Run %executable% "%romPath%%romName%%romExtension%", %emuPath%,, VJ_PID

WinWait ahk_pid %VJ_PID%
WinWaitActive ahk_pid %VJ_PID%

If Fullscreen != true
Center(ahk_class QWidget)

GUI_ID2 := FadeInExit()

If Fullscreen = true	; if windowed mode, moving the control causes the game to never show
{
ControlMove QGLWidget1, 0, 0, %A_ScreenWidth%, %A_ScreenHeight%, ahk_pid %VJ_PID%
ControlMove QWidget2, 0, 0, 0, 0, ahk_pid %VJ_PID%
}

Process WaitClose, %VJ_PID%

7z2 := 7zCleanUp()

GUI_ID4 := FadeOutExit()

WinActivate HyperSpin

ExitApp

CloseProcess:
GUI_ID3 := FadeOutStart()
WinClose ahk_pid %VJ_PID%
Return

ReadReg(var1){
RegRead regValue, HKEY_CURRENT_USER, Software\Underground Software\Virtual Jaguar, %var1%
Return %regValue%
}

WriteReg(var1, var2){
RegWrite REG_SZ, HKEY_CURRENT_USER, Software\Underground Software\Virtual Jaguar, %var1%, %var2%
}

Center(title){
WinGetPos X, Y, width, height, %title%
x := ( A_ScreenWidth / 2 ) - ( width / 2 )
y := ( A_ScreenHeight / 2 ) - ( height / 2 )
WinMove %title%, , x, y
}

Stole some of your code djvj

djvj · February 16, 2013

Some? Looks like you added a link...

dustind900 · February 16, 2013

Nobody adds links like I do. I could have changed the variable names and then you never would have known.

JK...

For real though, there wasn't anything I could have done differently anyway. Maybe I could of left out the functions and put all the code in the autoexecute section, but that would have looked ugly.

Yardley · March 3, 2013

Hi guys, any way to remove the grey bar at the bottom?

dustind900 · March 3, 2013

Hi guys, any way to remove the grey bar at the bottom?

Are you using the module that is three posts above yours?

If thats not working, try this one.

;------------------------------------------------------------------------
; Atari Jaguar
; Virtual Jaguar Git - 02/14/2013 - [url]http://www.emucr.com/2013/02/virtual...-20130214.html[/url]
;
;For use with HyperLaunch v2.25c
;
; 1.1
;
;----------------------------------------------------------------------------
; Notes:
; Fullscreen works but is not perfect until the emu dev allows hiding of the toolbar
; The emu stores its config in the registry @ HKEY_CURRENT_USER\Software\Underground Software\Virtual Jaguar
;----------------------------------------------------------------------------
Fullscreen = true
MouseClicks = true
;------------------------------------------------------------------------

GUI_ID := FadeInStart()

currentFullScreen := ReadReg("fullscreen")
If (Fullscreen = "true" && currentFullScreen = "false")
WriteReg("fullscreen", "true")
Else If (Fullscreen != "true" && currentFullScreen = "true")
WriteReg("fullscreen", "false")

7z1 := 7z(romPath, romName, romExtension, 7zExtractDir)

Run %executable% "%romPath%%romName%%romExtension%", %emuPath%,, VJ_PID

WinWait ahk_pid %VJ_PID%
WinWaitActive ahk_pid %VJ_PID%

If Fullscreen != true
Center(ahk_class QWidget)

GUI_ID2 := FadeInExit()

If Fullscreen = true	; if windowed mode, moving the control causes the game to never show
{
If (MouseClicks = true){
	MouseClick Right, 1, 1
	MouseClick Left, 5, 5
}
ControlMove QGLWidget1, 0, 0, %A_ScreenWidth%, %A_ScreenHeight%, ahk_pid %VJ_PID%
If (MouseClicks != true)
	ControlMove QWidget2, 0, 0, 0, 0, ahk_pid %VJ_PID%
}

Process WaitClose, %VJ_PID%

7z2 := 7zCleanUp()

GUI_ID4 := FadeOutExit()

WinActivate HyperSpin

ExitApp

CloseProcess:
GUI_ID3 := FadeOutStart()
WinClose ahk_pid %VJ_PID%
Return

ReadReg(var1){
RegRead regValue, HKEY_CURRENT_USER, Software\Underground Software\Virtual Jaguar, %var1%
Return %regValue%
}

WriteReg(var1, var2){
RegWrite REG_SZ, HKEY_CURRENT_USER, Software\Underground Software\Virtual Jaguar, %var1%, %var2%
}

Center(title){
WinGetPos X, Y, width, height, %title%
x := ( A_ScreenWidth / 2 ) - ( width / 2 )
y := ( A_ScreenHeight / 2 ) - ( height / 2 )
WinMove %title%, , x, y
}

Yardley · March 4, 2013

I'm using the first module you posted on post 32. These last two modules make it worse, adding a thin line on the right side of the screen plus the one at the bottom. I'm on windows 7 x64.

dustind900 · March 4, 2013

I'm using the first module you posted on post 32. These last two modules make it worse, adding a thin line on the right side of the screen plus the one at the bottom. I'm on windows 7 x64.

The one in post 42 should be the one you want then. Use the emu version that is linked in the module.

The module in post 42 was tested and confirmed working on Windows 7 x64 and Windows 8 x64.

Yardley · March 4, 2013

Downloaded emu linked in module and used module in post 42. Got the side and bottom bars, see picture. When I go to about in emu it says git 20130213 even though download links are labeled 20130214.

onilink55 · March 5, 2013

Set the mouse cursor to hidden in Atari Jaguar.ini
I just want to make it clear that the Module works on Windows 7 & 8. I just need someone with XP to test it.

Module and setup went great but I'm still stuck on how to hide the mouse cursor. Where is Atari Jaguar.ini located?

Announcement

Virtual Jaguar 2.1 released

Recommended Posts

Pyramid_Head

dustind900

Pyramid_Head

everten2

dustind900

everten2

dustind900

djvj

dustind900

everten2

brolly

everten2

brolly

Pyramid_Head

brolly

Pyramid_Head

dustind900

djvj

dustind900

Yardley

dustind900

Yardley

dustind900

Yardley

onilink55

Archived

Community

Development Tracker

Membership

Activity