gui.asm

linux下的任天堂模拟器代码。供大家参考。

;Copyright (C) 1997-2007 ZSNES Team ( zsKnight, _Demo_, pagefault, Nach )
;
;http://www.zsnes.com
;http://sourceforge.net/projects/zsnes
;https://zsnes.bountysource.com
;
;This program is free software; you can redistribute it and/or
;modify it under the terms of the GNU General Public License
;version 2 as published by the Free Software Foundation.
;
;This program is distributed in the hope that it will be useful,
;but WITHOUT ANY WARRANTY; without even the implied warranty of
;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
;GNU General Public License for more details.
;
;You should have received a copy of the GNU General Public License
;along with this program; if not, write to the Free Software
;Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.



; Sorry.  The GUI code is a total mess.  One problem I encountered is that
;   there seems to be a bug in nasm with using math calculations combined
;   with macros within macros, so in some macro definitions, I had to
;   add/subtract extra values in certain macros to get the GUI to align
;   correctly.
; The GUI is drawn is mostly manually.  What I mean is such as
;   coding 5 boxes to represent a shaded box for each box.  Although that
;   can be simplified using macros to draw 5 boxes, that unknown bug in nasm
;   showed up which prevented me from using macros extensively.  I was
;   thinking of changing it to an object-based GUI for easier coding,
;   but that was decided far into the development of the GUI itself
;   and that I also never expected this code to become open-source, so I
;   decided not to proceed with it.

; Routine StartGUI is the function called to start the GUI and also
;   contains the execution main loop of the GUI.  If you want to completely
;   replace the GUI, just add a function call from that function, then
;   jump to endprog to exit ZSNES or continueprog to continue with the
;   gameplay.  Do not replace StartGUI with a function since it is not
;   a function, but rather a label that is being jumped to.

%include "macros.mac"

EXTSYM curblank,vidpastecopyscr,frameskip,newengen,cvidmode,antienab
EXTSYM soundon,StereoSound,SoundQuality,MusicRelVol,endprog
EXTSYM continueprog,spcBuffera,cbitmode,t1cc
EXTSYM romloadskip,romdata,init65816,current_zst
EXTSYM procexecloop,SPCRAM,spcPCRam,spcS,spcRamDP,spcA,spcX,spcY,spcP,spcNZ
EXTSYM Voice0Status,Voice1Status,Voice2Status,Voice3Status,Voice4Status
EXTSYM Voice5Status,Voice6Status,Voice7Status,statesaver,loadstate2
EXTSYM vidbuffer,ASCII2Font,hirestiledat,showallext,scanlines
EXTSYM sprlefttot,spritetablea,KeyRTRCycle
EXTSYM cgram,tempco0,prevbright,maxbr,prevpal,coladdr,coladdg
EXTSYM coladdb,scaddtype,initvideo,pressed,UpdateDevices,memtabler8
EXTSYM memtablew8,writeon,JoyRead,SetInputDevice,delay,FPSOn,RevStereo,WDSPReg0C
EXTSYM WDSPReg1C,pl12s34,resolutn,Makemode7Table,vidbufferofsb,wramdata,bgfixer
EXTSYM videotroub,CheatCodeSave,CheatCodeLoad,LoadCheatSearchFile
EXTSYM SaveCheatSearchFile,Get_Date,Check_Key,Get_Key,sram
EXTSYM TripBufAvail,ResetTripleBuf,ScanCodeListing
EXTSYM AdjustFrequency,GUISaveVars,Init_Mouse,Get_MouseData,Set_MouseXMax
EXTSYM Set_MouseYMax,Set_MousePosition,Get_MousePositionDisplacement,GUIInit
EXTSYM GUIDeInit,SpecialLine,DrawWater,DrawBurn,DrawSmoke
EXTSYM GetDate,horizon_get,ErrorPointer,MessageOn,GetTime
EXTSYM GetScreen,Clear2xSaIBuffer,MouseWindow,ExitFromGUI
EXTSYM newgfx16b,NumVideoModes,MusicVol,DSPMem,NumInputDevices
EXTSYM GUIInputNames,GUIVideoModeNames,GameSpecificInput,device1,device2,TwelveHourClock
EXTSYM GUIM7VID,GUINTVID,GUIHQ2X,RawDumpInProgress
EXTSYM MultiTap,SFXEnable,RestoreSystemVars
EXTSYM nssdip1,nssdip2,nssdip3,nssdip4,nssdip5,nssdip6
EXTSYM SkipMovie,MovieStop,MoviePlay,MovieRecord
EXTSYM MovieInsertChapter,MovieSeekAhead,MovieSeekBehind,ResetDuringMovie
EXTSYM MovieDumpRaw,MovieAppend,AutoLoadCht,GUIQuickLoadUpdate,GUILoadData

EXTSYM GUIwinposx,GUIwinposy,maxskip,GUIEffect,hqFilter,En2xSaI,NTSCFilter
EXTSYM NTSCBlend,NTSCHue,NTSCSat,NTSCCont,NTSCBright,NTSCSharp,NTSCRef
EXTSYM NTSCGamma,NTSCRes,NTSCArt,NTSCFringe,NTSCBleed,NTSCWarp
EXTSYM LowPassFilterType,MovieStartMethod,MovieDisplayFrame,savewinpos
EXTSYM SnapPath,SPCPath,BSXPath,SGPath,STPath,GNextPath,FEOEZPath,SJNSPath
EXTSYM MDHPath,SPL4Path,SRAMPath,CheatSrcByteSize,prevloadfnamel
EXTSYM prevloadiname,prevloaddnamel,prevlfreeze,FirstTimeData,MMXSupport
EXTSYM GUIRAdd,GUIGAdd,GUIBAdd,GUITRAdd,GUITGAdd,GUITBAdd,GUIWRAdd
EXTSYM GUIWGAdd,GUIWBAdd,GUIloadfntype,SoundInterpType
EXTSYM CheatSrcByteBase,CheatSrcSearchType,CheatUpperByteOnly,GUIComboGameSpec
EXTSYM KeyStateSlc0,KeyStateSlc1,KeyStateSlc2,KeyStateSlc3,KeyStateSlc4
EXTSYM KeyStateSlc5,KeyStateSlc6,KeyStateSlc7,KeyStateSlc8,KeyStateSlc9
EXTSYM RewindStates,RewindFrames,PauseRewind,PauseLoad,SRAMState,AutoState
EXTSYM LatestSave,SRAMSave5Sec,AutoIncSaveSlot,KeyUsePlayer1234
EXTSYM pl1contrl,pl1selk,pl1startk,pl1upk,pl1downk,pl1leftk,pl1rightk,pl1Xk
EXTSYM pl1Ak,pl1Lk,pl1Yk,pl1Bk,pl1Rk,pl1Xtk,pl1Ytk,pl1Atk,pl1Btk,pl1Ltk,pl1Rtk
EXTSYM pl1ULk,pl1URk,pl1DLk,pl1DRk,pl2contrl,pl2selk,pl2startk,pl2upk,pl2downk
EXTSYM pl2leftk,pl2rightk,pl2Xk,pl2Ak,pl2Lk,pl2Yk,pl2Bk,pl2Rk,pl2Xtk,pl2Ytk
EXTSYM pl2Atk,pl2Btk,pl2Ltk,pl2Rtk,pl2ULk,pl2URk,pl2DLk,pl2DRk,pl3contrl,pl3selk
EXTSYM pl3startk,pl3upk,pl3downk,pl3leftk,pl3rightk,pl3Xk,pl3Ak,pl3Lk,pl3Yk
EXTSYM pl3Bk,pl3Rk,pl3Xtk,pl3Ytk,pl3Atk,pl3Btk,pl3Ltk,pl3Rtk,pl3ULk,pl3URk
EXTSYM pl3DLk,pl3DRk,pl4contrl,pl4selk,pl4startk,pl4upk,pl4downk,pl4leftk
EXTSYM pl4rightk,pl4Xk,pl4Ak,pl4Lk,pl4Yk,pl4Bk,pl4Rk,pl4Xtk,pl4Ytk,pl4Atk,pl4Btk
EXTSYM pl4Ltk,pl4Rtk,pl4ULk,pl4URk,pl4DLk,pl4DRk,pl5contrl,pl5selk,pl5startk
EXTSYM pl5upk,pl5downk,pl5leftk,pl5rightk,pl5Xk,pl5Ak,pl5Lk,pl5Yk,pl5Bk,pl5Rk
EXTSYM pl5Xtk,pl5Ytk,pl5Atk,pl5Btk,pl5Ltk,pl5Rtk,pl5ULk,pl5URk,pl5DLk,pl5DRk
EXTSYM KeyResetAll,KeyExtraEnab1,KeyExtraEnab2,KeyVolDown,KeyVolUp
EXTSYM KeyBGDisble0,KeyBGDisble1,KeyBGDisble2,KeyBGDisble3,KeySprDisble
EXTSYM KeyDisableSC0,KeyDisableSC1,KeyDisableSC2,KeyDisableSC3,KeyQuickSnapShot
EXTSYM KeyDisableSC4,KeyDisableSC5,KeyDisableSC6,KeyDisableSC7,KeyQuickSaveSPC
EXTSYM KeyQuickLoad,KeyQuickRst,KeyQuickExit,KeyQuickClock,KeyQuickChat
EXTSYM KeyInsrtChap,KeyPrevChap,KeyNextChap,KeyDisplayFPS,KeyNewGfxSwt
EXTSYM KeyIncStateSlot,KeyDecStateSlot,KeySaveState,KeyLoadState,KeyStateSelct
EXTSYM KeyRewind,KeyEmuSpeedUp,KeyEmuSpeedDown,KeyFRateUp,KeyFRateDown
EXTSYM KeyFastFrwrd,KeySlowDown,KeyResetSpeed,EMUPauseKey,INCRFrameKey
EXTSYM KeyWinDisble,KeyOffsetMSw,JoyPad1Move,init_save_paths,loadquickfname
EXTSYM mousewrap,GUIRClick,SaveSramData,SwapMouseButtons
EXTSYM FPSAtStart,Turbo30hz,TimerEnable,SmallMsgText,mouse1lh,mouse2lh
EXTSYM AutoPatch,RomInfo,AllowUDLR,GrayscaleMode,GUIMovieForcedText
EXTSYM Mode7HiRes16b,FFRatio,SDRatio,EmuSpeed,mouseshad,MovieForcedLengthEnabled
EXTSYM esctomenu,GUILoadKeysJumpTo,lhguimouse,MZTForceRTR,GetMovieForcedLength
EXTSYM GUIEnableTransp,FilteredGUI,Surround,SPCDisable,nosaveSRAM
EXTSYM FastFwdToggle,gui_key,gui_key_extended,GUILoadKeysNavigate
EXTSYM KeyDisplayBatt,KeyIncreaseGamma,KeyDecreaseGamma
EXTSYM MovieVideoMode,MovieAudio,MovieVideoAudio,MovieAudioCompress,newfont
EXTSYM d_names,selected_names,GUIfileentries,GUIdirentries,GUIcurrentdirviewloc
EXTSYM GUIcurrentfilewin,GUIcurrentcursloc,GUIcurrentviewloc,SetMovieForcedLength
EXTSYM GUIcurrentdircursloc,GetLoadData,ZRomPath,SaveSecondState,ClockBox,DisplayInfo
EXTSYM GUIJT_currentviewloc,GUIJT_currentcursloc,GUIJT_entries,ScreenShotFormat
EXTSYM GUIJT_offset,GUIJT_viewable,GUIGenericJumpTo,SSAutoFire,SSPause

%ifdef __UNIXSDL__
EXTSYM numlockptr
%elifdef __WIN32__
EXTSYM initDirectDraw,reInitSound,CheckAlwaysOnTop,CheckPriority,AlwaysOnTop
EXTSYM CheckScreenSaver,MouseWheel,TrapMouseCursor,AllowMultipleInst,TripleBufferWin
EXTSYM HighPriority,DisableScreenSaver,SaveMainWindowPos,PrimaryBuffer
EXTSYM CBBuffer,CBLength,PasteClipBoard,ctrlptr,PauseFocusChange
%elifdef __MSDOS__
EXTSYM dssel,SetInputDevice209,initvideo2,Force8b,SBHDMA,vibracard,smallscreenon
EXTSYM pl1p209,pl2p209,pl3p209,pl4p209,pl5p209,SidewinderFix,Triplebufen,ScreenScale
EXTSYM GUIEAVID,GUIFSVID,GUIWSVID,GUISSVID,GUITBVID,GUISLVID,GUIHSVID,GUI2xVID
EXTSYM JoyMinX209,JoyMaxX209,JoyMinY209,JoyMaxY209,DOSClearScreen,dosmakepal
%endif

%ifndef __MSDOS__
EXTSYM ZsnesPage,DocsPage,GUICustomX,GUICustomY,GetCustomXY,SetCustomXY,initwinvideo
EXTSYM Keep4_3Ratio,PrevFSMode,PrevWinMode,NTSCFilterInit,hqFilterlevel
EXTSYM GUIWFVID,GUIDSIZE,GUIHQ3X,GUIHQ4X,GUIKEEP43,Keep43Check,changeRes
%endif

%ifndef __WIN32__
EXTSYM GUII2VID
%endif

%ifndef __UNIXSDL__
EXTSYM vsyncon
%endif

%ifdef __OPENGL__
EXTSYM BilinearFilter,GUIBIFIL,drawscreenwin,blinit
%endif

%include "gui/guitools.inc"
%include "gui/guimisc.inc"
%include "gui/guimouse.inc"
%include "gui/guiwindp.inc"
%include "gui/guikeys.inc"
%include "gui/guicheat.inc"
%include "gui/guicombo.inc"

; Things to do :
;
; .checkmenuboxclick
; gray scale = 32 .. 63
; shadow = 96 .. 127
; blue scale = 148 .. 167, 168 .. 187
; gray scale = 189 .. 220 (32+137)

; |  Game        Config     Cheat     MultiPlay    Misc
;-------------------------------------------------------
;    Load        Input      Add Code  Modem        Misc Keys
;    Run         -----      Browse    IPX          GUI Opts
;    Reset       Devices    Search                 Movie Opt
;    -----       Chip Cfg                          Key Comb.
;    Save State  -----                             Save Cfg
;    Load State  Options                           -----
;    Pick State  Video                             About
;    -----       Sound
;    Quit        Paths
;                Saves
;                Speed

; NetPlay only has "Internet" for Windows/Linux

; Windows : 1 = Load
;           2 = Chose State
;           3 = Input Device Window
;           4 = Options
;           5 = Video
;           6 = Sound
;           7 = Cheat
;           8 = Net Options
;           9 = Game Options
;           10 = GUI Options
;           11 = About
;           12 = Reset Confirmation
;           13 = Cheat Search
;           14 = SaveState Confirmation
;           15 = Movies
;           16 = Key Combo
;           17 = Devices
;           18 = Chip Config
;           19 = Paths
;           20 = Saves
;           21 = Speed

SECTION .data

;The first byte is the number of fields on the right not including the seperators
MenuDat1 db 12, 3,1,1,1,1,1,1,1,1,1,0,1,2,0
MenuDat2 db 8,  3,1,1,0,1,1,1,0,2,0
MenuDat3 db 10, 3,0,1,1,0,1,1,1,1,1,2,0
MenuDat4 db 2,  3,1,2,0
%ifndef __MSDOS__
MenuDat5 db 0,  2,0,0
%else
MenuDat5 db 1,  3,2,0
%endif
MenuDat6 db 6,  3,1,1,1,1,0,2,0

NEWSYM GUIPrevMenuData,
  db 1,'1.                            ',0
  db 1,'2.                            ',0
  db 1,'3.                            ',0
  db 1,'4.                            ',0
  db 1,'5.                            ',0
  db 1,'6.                            ',0
  db 1,'7.                            ',0
  db 1,'8.                            ',0
  db 1,'9.                            ',0
  db 1,'0.                            ',0
  db 0,'------------',0
  db 1,'FREEZE DATA: OFF   ',0
  db 1,'CLEAR ALL DATA     ',0
GUIGameMenuData:
  db 1,'LOAD        ',0
  db 1,'RUN  [ESC]  ',0
  db 1,'RESET       ',0
  db 0,'------------',0
  db 1,'SAVE STATE  ',0
  db 1,'OPEN STATE  ',0
  db 1,'PICK STATE  ',0
  db 0,'------------',0
  db 1,'QUIT        ',0
GUIConfigMenuData:
  db 1,'INPUT       ',0
  db 0,'------------',0
  db 1,'DEVICES     ',0
  db 1,'CHIP CFG    ',0
  db 0,'------------',0
  db 1,'OPTIONS     ',0
  db 1,'VIDEO       ',0
  db 1,'SOUND       ',0
  db 1,'PATHS       ',0
  db 1,'SAVES       ',0
  db 1,'SPEED       ',0
GUICheatMenuData:
  db 1,'ADD CODE    ',0
  db 1,'BROWSE      ',0
  db 1,'SEARCH      ',0
GUINetPlayMenuData:
%ifndef __MSDOS__
  db 1,'INTERNET    ',0
  db 0,'------------',0
%else
  db 1,'MODEM       ',0
  db 1,'IPX         ',0
%endif
GUIMiscMenuData:
  db 1,'MISC KEYS   ',0
  db 1,'GUI OPTS    ',0
  db 1,'MOVIE OPT   ',0
  db 1,'KEY COMB.   ',0
  db 1,'SAVE CFG    ',0
  db 0,'------------',0
  db 1,'ABOUT       ',0

; Window sizes and positions
;                LOAD STAT INPT OPT  VID  SND  CHT  NET  GMKEY GUIOP ABT  RSET SRC  STCN MOVE CMBO ADDO CHIP PATH SAVE SPED
GUIwinposxo dd 0,6   ,65  ,33  ,42  ,5   ,34  ,6   ,64  ,8    ,5    ,33  ,56  ,64  ,56  ,5   ,3   ,28  ,48  ,6    ,28  ,53
GUIwinposyo dd 0,20  ,70  ,20  ,20  ,20  ,20  ,20  ,30  ,30   ,20   ,20  ,60  ,30  ,60  ,20  ,20  ,60  ,60  ,20   ,30  ,20
GUIwinsizex dd 0,244 ,126 ,205 ,180 ,245 ,188 ,244 ,128 ,240  ,245  ,190 ,144 ,128 ,144 ,246 ,250 ,200 ,160 ,244  ,200 ,150
GUIwinsizey dd 0,190 ,68  ,192 ,190 ,190 ,188 ,191 ,40  ,170  ,150  ,190 ,42  ,40  ,42  ,190 ,190 ,120 ,100 ,190  ,168 ,180
NEWSYM GUIwinptr, db 0

NEWSYM WaterOn,  db 1
NEWSYM ForceROMTiming, db 0
NEWSYM ForceHiLoROM, db 0
NEWSYM CalibXmin, dd 0
NEWSYM CalibXmax, dd 0
NEWSYM CalibYmin, dd 0
NEWSYM CalibYmax, dd 0
NEWSYM CalibXmin209, dd 0
NEWSYM CalibXmax209, dd 0
NEWSYM CalibYmin209, dd 0
NEWSYM CalibYmax209, dd 0

EEgg db 0
RestoreValues db 0
NEWSYM numdrives, dd 26
SubPalTable times 256 db 1      ; Corresponding Gray Scale Color

SECTION .bss
NEWSYM CombinDataGlob, resb 3300 ; 20-name, 42-combo, 2-key#, 1-P#, 1-ff
NEWSYM CombinDataLocl, resb 3300

NEWSYM GUIwinorder, resb 22
GUIwinpos   resb 22
NEWSYM GUIwinactiv, resb 22
ViewBuffer  resb 50*32

GUItextcolor resb 5
NEWSYM GUIcmenupos, resb 1
GUIescpress  resb 1
GUIcwinpress resb 1
NEWSYM GUIpmenupos, resb 1
GUIcrowpos   resd 1
GUIpclicked  resb 1
GUImouseposx resd 1
GUImouseposy resd 1
GUICYLocPtr  resd 1
GUIMenuL     resd 1
GUIMenuR     resd 1
GUIMenuD     resd 1
GUIOnMenuItm resb 1
NEWSYM GUIQuit, resb 1
GUIHold      resb 1
GUIHoldx     resd 1
GUIHoldy     resd 1
GUIHoldxm    resd 1
GUIHoldym    resd 1
GUIcolscaleval resd 1
cwindrawn    resb 1
GUIWincol    resd 1
GUIWincoladd resd 1
GUITemp      resd 1
GUIHoldXlimL resd 1
GUIHoldXlimR resd 1
GUIHoldYlim  resd 1
GUIHoldYlimR resd 1
cloadnpos    resd 1
cloadnposb   resd 1
cloadmaxlen  resd 1
cloadnleft   resd 1
cplayernum   resb 1
vbuflimtop   resd 1
vbuflimbot   resd 1
GUIScrolTim1 resd 1
GUIScrolTim2 resd 1
BlankVar     resb 1
GUICHold     resd 1
NEWSYM GUICBHold,    resd 1
GUICBHold2   resd 1
GUIDClickTL  resd 1
GUIDClCWin   resd 1
GUIDClCEntry resd 1
GUICResetPos resd 1
GUICStatePos resd 1
GUICCFlash   resb 1
GUILDFlash   resb 1
GUIPalConv   resd 1
PrevResoln   resw 1
SnowMover    resd 1
keycontrolval resd 1
NEWSYM CheatBDoor,   resb 1
NEWSYM ShowTimer,    resb 1
NEWSYM MousePRClick, resb 1
NEWSYM MouseDis, resb 1

NEWSYM CheatOn, resd 1
NEWSYM NumCheats, resd 1
NEWSYM cheatdataprev, resb 28 ; leave contents blank
NEWSYM cheatdata, resb 28*255+56 ; toggle, value, address, pvalue, name(22)

curgsval resb 1

NEWSYM GUICMessage, resd 1
NEWSYM GUICTimer,   resd 1
NEWSYM GUIOn,       resb 1
NEWSYM GUIOn2,      resb 1
NEWSYM GUIReset,    resb 1
NEWSYM CurPalSelect, resb 1
NEWSYM MotionBlur, resb 1

NEWSYM StartLL, resd 1
NEWSYM StartLR, resd 1

NEWSYM TRVal, resw 1
NEWSYM TGVal, resw 1
NEWSYM TBVal, resw 1
NEWSYM TRVali, resw 1
NEWSYM TGVali, resw 1
NEWSYM TBVali, resw 1
NEWSYM TRVal2, resw 1
NEWSYM TGVal2, resw 1
NEWSYM TBVal2, resw 1

SECTION .data
NEWSYM ComboHeader, db 'Key Combination File',26,1,0
NEWSYM ComboBlHeader, times 23 db 0

SECTION .text
%macro GUIInitIRQs 0
  call GUIInit
  mov esi,pressed
  mov ecx,256
  mov al,0
.loopa
  mov [esi],al
  inc esi
  dec ecx
  jnz .loopa
%endmacro

%macro GUIDeInitIRQs 0
  call GUIDeInit
%endmacro

SECTION .data
NEWSYM GUIoldhand9o, dd 0
NEWSYM GUIoldhand9s, dw 0
NEWSYM GUIoldhand8o, dd 0
NEWSYM GUIoldhand8s, dw 0
GUIt1cc dd 0
GUIt1ccSwap db 0
GUIskipnextkey42 db 0

SECTION .text
NEWSYM GUIinit18_2hz
  mov al,00110110b
  out 43h,al
  mov ax,0
  out 40h,al
  mov al,ah
  out 40h,al
  ret

NEWSYM GUIinit36_4hz
  mov al,00110110b
  out 43h,al
  mov ax,32768
  out 40h,al
  mov al,ah
  out 40h,al
  ret

NEWSYM GUI36hzcall
  inc dword[GUIt1cc]
  inc dword[SnowMover]
  cmp dword[GUIEditStringLTxt],0
  je .nodec
  dec dword[GUIEditStringLTxt]
.nodec
  cmp dword[GUIScrolTim1],0
  je .nodec4
  dec dword[GUIScrolTim1]
.nodec4
  cmp dword[GUIDClickTL],0
  je .nodec2
  dec dword[GUIDClickTL]
.nodec2
  cmp dword[GUIkeydelay],0
  je .nodec3
  dec dword[GUIkeydelay]
.nodec3
  cmp dword[GUIkeydelay2],0
  je .nodec3b
  dec dword[GUIkeydelay2]
.nodec3b
  cmp dword[GUICTimer],0
  je .nodec6
  dec dword[GUICTimer]
.nodec6
  inc byte[GUICCFlash]
  and byte[GUICCFlash],0Fh
  inc byte[GUILDFlash]
  and byte[GUILDFlash],0Fh
  ret

%ifdef __MSDOS__
NEWSYM GUIhandler8h
  cli
  push ds
  push eax
  mov ax,[cs:dssel]
  mov ds,ax
  call GUI36hzcall
  xor byte[GUIt1ccSwap],1
  cmp byte[GUIt1ccSwap],0
  je .nocall
  pushf
  call far [GUIoldhand8o]
.nocall
  mov al,20h
  out 20h,al
  pop eax
  pop ds
  sti
  iretd

NEWSYM GUIhandler9h
  cli
  push ds
  push eax
  push ebx
  mov ax,[cs:dssel]
  mov ds,ax

  xor ebx,ebx
  in al,60h                 ; get keyboard scan code
  cmp al,42
  jne .no42
  cmp byte[GUIskipnextkey42],0
  je .no42
  mov byte[GUIskipnextkey42],0
  jmp .skipkeyrel
.no42
  cmp al,0E0h
  jne .noE0
  mov byte[GUIskipnextkey42],1
  jmp .skipkeyrel
.noE0
  mov byte[GUIskipnextkey42],0
  mov bl,al
  xor bh,bh
  test bl,80h               ; check if bit 7 is on (key released)
  jnz .keyrel
  cmp byte[pressed+ebx],0
  jne .skipa
  mov byte[pressed+ebx],1        ; if not, set key to pressed
.skipa
  jmp .skipkeyrel
.keyrel
  and bl,7Fh
  mov byte[pressed+ebx],0        ; if not, set key to pressed
.skipkeyrel
  mov byte[pressed],0

  pushf
  call far [GUIoldhand9o]
  mov al,20h
  out 20h,al
  pop ebx
  pop eax
  pop ds
  sti
  iretd
%endif

%macro loadmenuopen 1
  mov al,[GUIcmenupos]
  mov [GUIpmenupos],al
  mov byte[GUIcmenupos],0
  cmp byte[GUIwinactiv+%1],1
  je %%menuontop
  xor eax,eax
  mov al,[GUIwinptr]
  inc byte[GUIwinptr]
  mov byte[GUIwinorder+eax],%1
  mov byte[GUIwinactiv+%1],1
  cmp byte[savewinpos],0
  jne %%nomenuitem
  mov eax,[GUIwinposxo+%1*4]
  mov [GUIwinposx+%1*4],eax
  mov eax,[GUIwinposyo+%1*4]
  mov [GUIwinposy+%1*4],eax
  jmp %%nomenuitem
%%menuontop
  xor eax,eax
  ; look for match
%%notfoundyet
  mov bl,[GUIwinorder+eax]
  cmp bl,%1
  je %%nextfind
  inc eax
  jmp %%notfoundyet
%%nextfind
  inc eax
  cmp al,[GUIwinptr]
  je %%foundend
  mov cl,[GUIwinorder+eax]
  mov [GUIwinorder+eax-1],cl
  jmp %%nextfind
%%foundend
  mov byte[GUIpclicked],0
  mov [GUIwinorder+eax-1],bl
%%nomenuitem
%endmacro

loadnetopen:
  loadmenuopen 8
  ret

SECTION .bss
MouseInitOkay resb 1
SECTION .text

LoadDetermine:
  mov byte[GUIGameMenuData+14],1
  mov byte[GUIGameMenuData+14*2],1
  mov byte[GUIGameMenuData+14*4],1
  mov byte[GUIGameMenuData+14*5],1
  mov byte[GUIGameMenuData+14*6],1
  mov byte[GUICheatMenuData],1
  mov byte[GUICheatMenuData+14],1
  mov byte[GUICheatMenuData+14*2],1
  mov byte[GUIMiscMenuData+14*2],1
  mov byte[GUINetPlayMenuData],2             ; Gray out Netplay options