diff --git a/.Floppies/A2OSX.BUILD.po b/.Floppies/A2OSX.BUILD.po index c6659d5f..fa30fa56 100644 Binary files a/.Floppies/A2OSX.BUILD.po and b/.Floppies/A2OSX.BUILD.po differ diff --git a/DRV/DHGR.DRV.S.LBUF.txt b/DRV/DHGR.DRV.S.LBUF.txt index 79b617fc..90cec1ca 100644 --- a/DRV/DHGR.DRV.S.LBUF.txt +++ b/DRV/DHGR.DRV.S.LBUF.txt @@ -65,6 +65,7 @@ LBUF.DrawAtY lda BASEL,y setup line Base Ptr lda CB.Cache+S.CB.OP .3 and #$F + beq .8 tax jmp (J.LBUF.DrawAtY,x) @@ -87,7 +88,7 @@ LBUF.DrawAtY lda BASEL,y setup line Base Ptr inx bcc .5 - rts +.8 rts *-------------------------------------- LBUF.DrawAtY.SET LBUF.DrawAtY.AND.SET diff --git a/DRV/DHGR.DRV.S.txt b/DRV/DHGR.DRV.S.txt index 9be1ffea..e59c9dac 100644 --- a/DRV/DHGR.DRV.S.txt +++ b/DRV/DHGR.DRV.S.txt @@ -336,14 +336,14 @@ J.Cmds .DA SETPIXEL .DA BITBLT .DA GETRECTBUFSIZE *-------------------------------------- -J.LBUF.DrawAtY .DA LBUF.DrawAtY.XOR +J.LBUF.DrawAtY .DA $ffff + .DA LBUF.DrawAtY.XOR .DA LBUF.DrawAtY.SET .DA LBUF.DrawAtY.ORA .DA $ffff .DA LBUF.DrawAtY.AND.XOR .DA LBUF.DrawAtY.AND.SET .DA LBUF.DrawAtY.AND.ORA -* .DA $ffff L.Color.Pixels .DA Color.Pixels .DA 0 end or relocation *-------------------------------------- diff --git a/INC/GFX.I.txt b/INC/GFX.I.txt index 38c7a007..5457dae7 100644 --- a/INC/GFX.I.txt +++ b/INC/GFX.I.txt @@ -52,9 +52,9 @@ S.CB.CMD.DRAWLINE .EQ 20 S.CB.CMD.DRAWTEXT2 .EQ 22 S.CB.CMD.OSD .EQ 128 S.CB.OP .EQ 1 -S.CB.OP.XOR .EQ 0 screen EOR bitmap -> Screen -S.CB.OP.SET .EQ 2 replace screen with bitmap -S.CB.OP.ORA .EQ 4 combine screen & bitmap -> Screen +S.CB.OP.XOR .EQ 2 screen EOR bitmap -> Screen +S.CB.OP.SET .EQ 4 replace screen with bitmap +S.CB.OP.ORA .EQ 6 combine screen & bitmap -> Screen S.CB.OP.MASK .EQ %00001000 Apply BitMap mask before painting S.CB.OP.SAVE .EQ %00010000 Save Screen to DstPtr before painting S.CB.OP.RESTORE .EQ %00100000 Restore Screen From DstPtr diff --git a/INC/LIBGUI.I.txt b/INC/LIBGUI.I.txt index 56a39f78..b67823a7 100644 --- a/INC/LIBGUI.I.txt +++ b/INC/LIBGUI.I.txt @@ -159,18 +159,20 @@ S.MITEM.F.SUBMENU .EQ 6 S.MITEM.S .EQ 2 S.MITEM.S.CHECKED .EQ %01000000 S.MITEM.S.DISABLED .EQ %10000000 -S.MITEM.pICON .EQ 3 -S.MITEM.pMENU .EQ 5 -S.MITEM.KEYMOD .EQ 7 +S.MITEM.ID .EQ 3 +S.MITEM.pICON .EQ 4 +S.MITEM.pMENU .EQ 6 +S.MITEM.KEYMOD .EQ 6 S.MITEM.KEYMOD.CA .EQ 2 S.MITEM.KEYMOD.OA .EQ 4 S.MITEM.KEYMOD.CTRL .EQ 8 -S.MITEM.KEY .EQ 8 -S.MITEM.ID .EQ 9 +S.MITEM.KEY .EQ 7 -S.MITEM.TEXT .EQ 10 CSTR +S.MITEM.TEXT .EQ 8 CSTR * ... *-------------------------------------- +BM.ID.APPLE .EQ 2 +*-------------------------------------- S.BUT.F.DISABLED .EQ %10000000 * S.BUT.S.PUSHED .EQ %10000000 diff --git a/LIB/LIBGUI.S.MENU.txt b/LIB/LIBGUI.S.MENU.txt index f6c25eac..266546cf 100644 --- a/LIB/LIBGUI.S.MENU.txt +++ b/LIB/LIBGUI.S.MENU.txt @@ -84,7 +84,7 @@ MENU.MBarInit >STYA ZPMENUPtr .8 lda #$80 ldy #S.MBAR.S - sta (ZPPtr1),y + sta (ZPMENUPtr),y .80 clc rts @@ -138,12 +138,15 @@ MENU.New >LDYAI S.MENU MENU.New.RTS rts *-------------------------------------- +* ---------------------------------------------- +* |Icon ChkMrk "Menu Item" KEYMOD1-KEYMOD2-KEY>| +* ---------------------------------------------- MENU.Show >SYSCALL2 GetMemPtr >STYA ZPMENUPtr jsr GetCBBuf bcs MENU.New.RTS - >DEBUG + ldy #S.MENU.MITEMS lda (ZPMENUPtr),y sta ZPPtr1 @@ -151,7 +154,8 @@ MENU.Show >SYSCALL2 GetMemPtr lda (ZPMENUPtr),y sta ZPPtr1+1 -* |Icon ChkMrk "Menu Item" KEYMOD1-KEYMOD2-KEY > | + stz DX + stz DX+1 stz IY Icon Margin W @@ -160,17 +164,13 @@ MENU.Show >SYSCALL2 GetMemPtr stz INE Max Mod-Key W - lda #12 2px Borders+5 LMARGIN (Checked) +5 RMARGIN (SubMenu) - sta DX - stz DX+1 - lda #2 2px Borders sta DY Menu H stz DY+1 .1 lda (ZPPtr1) beq .3 - + jsr MENU.Show.GetW lda DY @@ -188,8 +188,15 @@ MENU.Show >SYSCALL2 GetMemPtr inc ZPPtr1+1 bra .1 -.3 lda DX +.3 lda #12 2px Borders+5 LMARGIN (Checked) +5 RMARGIN (SubMenu) clc + adc IY + sta DX + bcc .30 + inc DX+1 + +.30 lda DX + sec 1px sep adc IE Text W sta DX @@ -198,27 +205,42 @@ MENU.Show >SYSCALL2 GetMemPtr sta DX+1 lda DX - clc + sec 1px sep adc INE Mod-Key W sta DX bcc .4 inc DX+1 -.4 ldy #S.OBJ.Y1 - lda (ZPMENUPtr),y - clc - adc DY - tax - +.4 ldy #S.OBJ.W + sta (ZPMENUPtr),y iny - lda (ZPMENUPtr),y - adc DY+1 + lda DX+1 + sta (ZPMENUPtr),y + + iny #S.OBJ.H + + lda DY + sta (ZPMENUPtr),y + tax + iny + lda DY+1 + sta (ZPMENUPtr),y + pha + txa + ldy #S.OBJ.Y1 + clc + adc (ZPMENUPtr),y + tax + pla + iny + adc (ZPMENUPtr),y + cpx WND.Screen+S.OBJ.H sbc WND.Screen+S.OBJ.H+1 bcc .5 - dey + ldy #S.OBJ.Y1 lda (ZPMENUPtr),y * sec @@ -231,8 +253,49 @@ MENU.Show >SYSCALL2 GetMemPtr sbc DY+1 sta (ZPMENUPtr),y -.5 jsr MENU.Show.Borders +.5 >LDYA ZPMENUPtr + jsr OBJ.SetX2Y2 + + jsr MENU.Show.Borders + + ldy #S.MENU.MITEMS + lda (ZPMENUPtr),y + sta ZPPtr1 + iny + lda (ZPMENUPtr),y + sta ZPPtr1+1 + ldy #S.OBJ.Y1 + lda (ZPMENUPtr),y + clc + adc #1 + sta DY + iny + lda (ZPMENUPtr),y + adc #0 + sta DY+1 + +.6 lda (ZPPtr1) + beq .8 + + jsr MENU.Show.Item + + lda DY + clc + adc SYSFON.H + sta DY + bcc .7 + + inc DY+1 + +.7 lda (ZPPtr1) + clc + adc ZPPtr1 + sta ZPPtr1 + bcc .6 + inc ZPPtr1+1 + bra .6 + .8 >LDYA L.WND.Screen jmp DrawCBPtrToYA1 @@ -249,31 +312,228 @@ MENU.Show.GetW ldy #S.MITEM.F ora (ZPPtr1),y beq .1 - lda #16 - sta DX + lda #17 Reserve space for Icon W + 1px SEP + sta IY -.1 lda #S.MITEM.TEXT +.1 jsr MENU.GetText + ldx hSYSFON + jsr FON.GetTextSize + + ldx CB.Cache+S.CB.SrcW + cpx IE + lda CB.Cache+S.CB.SrcW+1 + sbc IE+1 + bcc .2 + + stx IE Set Max text W + lda CB.Cache+S.CB.SrcW+1 + sta IE+1 + +.2 jsr MENU.GetKeyString + beq .8 + + >LDYA L.KEYSTRING + ldx hSYSFON + jsr FON.GetTextSize + + lda CB.Cache+S.CB.SrcW + cmp INE + bcc .8 + + sta INE set Max Mod-key W + +.8 rts +*-------------------------------------- +MENU.Show.Borders + lda #S.CB.CMD.FILLRECT + jsr PutA2CBBuf + lda #S.CB.OP.SET + jsr PutA2CBBuf + lda #S.CB.M.MONO + jsr PutA2CBBuf + lda PREFS.MENUCOLOR + jsr PutA2CBBuf + ldy #S.OBJ.X1 + jsr MENU.Show.Borders.Y + ldy #S.OBJ.Y1 + jsr MENU.Show.Borders.Y + ldy #S.OBJ.X2 + jsr MENU.Show.Borders.Y + ldy #S.OBJ.Y2 + jsr MENU.Show.Borders.Y + + lda #S.CB.CMD.HLINE TOP + jsr MENU.Show.Borders.H + ldy #S.OBJ.X1 + jsr MENU.Show.Borders.Y + ldy #S.OBJ.Y1 + jsr MENU.Show.Borders.Y + ldy #S.OBJ.X2 + jsr MENU.Show.Borders.Y + ldy #S.OBJ.Y1 + jsr MENU.Show.Borders.Y + + lda #S.CB.CMD.VLINE LEFT + jsr MENU.Show.Borders.H + ldy #S.OBJ.X1 + jsr MENU.Show.Borders.Y + ldy #S.OBJ.Y1 + jsr MENU.Show.Borders.Y + ldy #S.OBJ.X1 + jsr MENU.Show.Borders.Y + ldy #S.OBJ.Y2 + jsr MENU.Show.Borders.Y + + lda #S.CB.CMD.VLINE RIGHT + jsr MENU.Show.Borders.H + ldy #S.OBJ.X2 + jsr MENU.Show.Borders.Y + ldy #S.OBJ.Y1 + jsr MENU.Show.Borders.Y + ldy #S.OBJ.X2 + jsr MENU.Show.Borders.Y + ldy #S.OBJ.Y2 + jsr MENU.Show.Borders.Y + + lda #S.CB.CMD.HLINE BOTTOM + jsr MENU.Show.Borders.H + ldy #S.OBJ.X1 + jsr MENU.Show.Borders.Y + ldy #S.OBJ.Y2 + jsr MENU.Show.Borders.Y + ldy #S.OBJ.X2 + jsr MENU.Show.Borders.Y + ldy #S.OBJ.Y2 + jmp MENU.Show.Borders.Y + +MENU.Show.Borders.H + jsr PutA2CBBuf + lda #S.CB.OP.SET + jsr PutA2CBBuf + lda #S.CB.M.MONO + jsr PutA2CBBuf + lda PREFS.BORDERCOLOR + jmp PutA2CBBuf + +MENU.Show.Borders.Y + lda (ZPMENUPtr),y + jsr PutA2CBBuf + iny + lda (ZPMENUPtr),y + jmp PutA2CBBuf +*-------------------------------------- +MENU.Show.Item ldy #S.MITEM.F + lda (ZPPtr1),y + cmp #S.MITEM.F.SEP + bne .1 + + lda #S.CB.CMD.HLINE + jsr PutA2CBBuf + lda #S.CB.OP.SET + jsr PutA2CBBuf + lda #S.CB.M.MONO + jsr PutA2CBBuf + lda PREFS.BORDERCOLOR + jsr PutA2CBBuf + + ldy #S.OBJ.X1 + jsr MENU.Show.Borders.Y + lda SYSFON.H + lsr + clc + adc DY + jsr PutA2CBBuf + lda DY+1 + adc #0 + jsr PutA2CBBuf + + ldy #S.OBJ.X2 + jsr MENU.Show.Borders.Y + ldy #S.OBJ.Y1 + jmp MENU.Show.Borders.Y +*-------------------------------------- +.1 ldy #S.OBJ.X1 + lda (ZPMENUPtr),y + + sec +1px Border + + adc #5 TODO : Checked + sta DX + iny + lda (ZPMENUPtr),y + adc #0 + sta DX+1 + + jsr MENU.GetIcon + beq .2 + + jsr DRAW.YABMAtDXDY + +.2 lda DX + clc + adc IY Icon reserved W + sta DX + + lda DX+1 + adc #0 + sta DX+1 + + jsr MENU.GetText + + ldx hSYSFON + jsr DRAW.YATextAtDXDY + + jsr MENU.GetKeyString + beq .3 + + lda DX + sec + adc IE + sta DX + lda DX+1 + adc IE+1 + sta DX+1 + + >LDYA L.KEYSTRING + ldx hSYSFON + jsr DRAW.YATextAtDXDY + +.3 + + clc + rts +*-------------------------------------- +MENU.GetIcon ldy #S.MITEM.pICON+1 + lda (ZPPtr1),y + bne .1 + + dey + lda (ZPPtr1),y + beq .8 + + tax + ldy L.BMs,x + lda L.BMs+1,x NON ZERO +.8 rts + +.1 pha + dey + lda (ZPPtr1),y + tay + pla NON ZERO + + rts +*-------------------------------------- +MENU.GetText lda #S.MITEM.TEXT clc adc ZPPtr1 tay lda ZPPtr1+1 adc #0 - - ldx hSYSFON - jsr FON.GetTextSize - - lda CB.Cache+S.CB.SrcW - cmp IE - lda CB.Cache+S.CB.SrcW+1 - sbc IE+1 - bcc .2 - - lda CB.Cache+S.CB.SrcW - sta IE - lda CB.Cache+S.CB.SrcW+1 - sta IE+1 - -.2 ldx #0 + rts +*-------------------------------------- +MENU.GetKeyString + ldx #0 ldy #S.MITEM.KEYMOD lda (ZPPtr1),y @@ -296,7 +556,7 @@ MENU.Show.GetW ldy #S.MITEM.F lda #1 sta KEYSTRING,x inx - lda #"-" + lda #'-' sta KEYSTRING,x inx @@ -308,108 +568,26 @@ MENU.Show.GetW ldy #S.MITEM.F lda #2 sta KEYSTRING,x inx - lda #"-" + lda #'-' sta KEYSTRING,x inx .6 iny lda (ZPPtr1),y - beq .8 + beq .7 sta KEYSTRING,x inx - stz KEYSTRING,x - >LDYA L.KEYSTRING - ldx hSYSFON - jsr FON.GetTextSize - cpy INE - bcs .8 - - sty INE - -.8 rts -*-------------------------------------- -MENU.Show.Borders - lda #S.CB.CMD.HLINE TOP - jsr MENU.Show.Borders.H - - ldy #S.OBJ.X1 - jsr MENU.Show.Borders.Y - - ldy #S.OBJ.Y1 - jsr MENU.Show.Borders.Y - - ldy #S.OBJ.X2 - jsr MENU.Show.Borders.Y - - ldy #S.OBJ.Y1 - jsr MENU.Show.Borders.Y - - lda #S.CB.CMD.VLINE LEFT - jsr MENU.Show.Borders.Y - - ldy #S.OBJ.X1 - jsr MENU.Show.Borders.Y - - ldy #S.OBJ.Y1 - jsr MENU.Show.Borders.Y - - ldy #S.OBJ.X1 - jsr MENU.Show.Borders.Y - - ldy #S.OBJ.Y2 - jsr MENU.Show.Borders.Y - - lda #S.CB.CMD.VLINE RIGHT - jsr MENU.Show.Borders.H - - ldy #S.OBJ.X2 - jsr MENU.Show.Borders.Y - - ldy #S.OBJ.Y1 - jsr MENU.Show.Borders.Y - - ldy #S.OBJ.X2 - jsr MENU.Show.Borders.Y - - ldy #S.OBJ.Y2 - jsr MENU.Show.Borders.Y - - lda #S.CB.CMD.HLINE BOTTOM - jsr MENU.Show.Borders.H - - ldy #S.OBJ.X1 - jsr MENU.Show.Borders.Y - - ldy #S.OBJ.Y2 - jsr MENU.Show.Borders.Y - - ldy #S.OBJ.X2 - jsr MENU.Show.Borders.Y - - ldy #S.OBJ.Y2 - jsr MENU.Show.Borders.Y +.7 stz KEYSTRING,x + txa rts - -MENU.Show.Borders.H - jsr PutA2CBBuf - lda #S.CB.OP.SET - jsr PutA2CBBuf - lda #S.CB.M.MONO - jsr PutA2CBBuf - lda PREFS.BORDERCOLOR - jmp PutA2CBBuf - -MENU.Show.Borders.Y - lda (ZPMENUPtr),y - jsr PutA2CBBuf - iny - lda (ZPMENUPtr),y - jmp PutA2CBBuf *-------------------------------------- MENU.Destroy + + clc + rts *-------------------------------------- MAN SAVE usr/src/lib/libgui.s.menu diff --git a/LIB/LIBGUI.S.SYSBAR.txt b/LIB/LIBGUI.S.SYSBAR.txt index 69affab4..ff33d5a1 100644 --- a/LIB/LIBGUI.S.SYSBAR.txt +++ b/LIB/LIBGUI.S.SYSBAR.txt @@ -172,7 +172,7 @@ SYSBAR.Show.W lda #S.CB.CMD.FILLRECT lda WND.SysBar+S.OBJ.Y2+1 jmp PutA2CBBuf *-------------------------------------- -DRAW.YABMAtDXDY >STYA ZPPtr1 Src BM +DRAW.YABMAtDXDY >STYA ZPBMPtr Src BM lda #S.CB.CMD.BITBLT jsr PutA2CBBuf @@ -211,16 +211,16 @@ DRAW.YABMAtDXDY >STYA ZPPtr1 Src BM ldy #S.BM.W -.2 lda (ZPPtr1),y S.CB.SrcW,S.CB.SrcH +.2 lda (ZPBMPtr),y S.CB.SrcW,S.CB.SrcH jsr PutA2CBBuf iny dex bne .2 - lda ZPPtr1 S.CB.SrcPtr + lda ZPBMPtr S.CB.SrcPtr jsr PutA2CBBuf - lda ZPPtr1+1 + lda ZPBMPtr+1 jsr PutA2CBBuf lda #0 S.CB.DstPtr @@ -230,7 +230,8 @@ DRAW.YABMAtDXDY >STYA ZPPtr1 Src BM rts *-------------------------------------- DRAW.YATextAtDXDY - >STYA ZPPtr1 Src Text + pha Src Text + phy lda #S.CB.CMD.DRAWTEXT2 jsr PutA2CBBuf @@ -252,7 +253,7 @@ DRAW.YATextAtDXDY ldy #0 ldx #4 -.1 lda DX,y S.CB.X1,S.CB.Y1 +.1 lda DX,y DX,DY -> S.CB.X1,S.CB.Y1 jsr PutA2CBBuf iny dex @@ -277,22 +278,16 @@ DRAW.YATextAtDXDY jsr PutA2CBBuf S.CB.SrcH jsr PutA2CBBuf - lda ZPPtr1 S.CB.SrcPtr - jsr PutA2CBBuf - - lda ZPPtr1+1 - jsr PutA2CBBuf - - lda #0 S.CB.DstPtr - jsr PutA2CBBuf + jsr PutA2CBBuf S.CB.SrcPtr jsr PutA2CBBuf - lda ZPPtr1 - jsr PutA2CBBuf S.CB.TxtPtr - lda ZPPtr1+1 + jsr PutA2CBBuf S.CB.DstPtr jsr PutA2CBBuf - - rts + + pla + jsr PutA2CBBuf S.CB.TxtPtr + pla + jmp PutA2CBBuf *-------------------------------------- MAN SAVE usr/src/lib/libgui.s.sysbar diff --git a/LIB/LIBGUI.S.txt b/LIB/LIBGUI.S.txt index 2aa0b8c5..8609e6d5 100644 --- a/LIB/LIBGUI.S.txt +++ b/LIB/LIBGUI.S.txt @@ -78,6 +78,7 @@ ZPCBPtr .BS 2 ZPObjPtr .BS 2 ZPWNDPtr .BS 2 ZPMENUPtr .BS 2 +ZPBMPtr .BS 2 CLIP.Line.P1 .BS 1 CLIP.Line.P2 .BS 1 @@ -146,6 +147,7 @@ L.WND.SysBar .DA WND.SysBar L.WND.SysBar.2osX .DA WND.SysBar.2osX L.MENU.Sys .DA MENU.Sys *-------------------------------------- +L.BMs .EQ *-2 L.BM.Apple .DA BM.Apple L.BM.Close .DA BM.Close L.BM.Max .DA BM.Max @@ -425,10 +427,10 @@ KEY.Ctrl .AZ "Ctrl-" MENU.Sys .DA #.1-* next .DA #S.MITEM.F.ITEM F .DA #0 S - .DA 0 pICON - .DA #S.MITEM.KEYMOD.CA+S.MITEM.KEYMOD.OA+S.MITEM.KEYMOD.CTRL - .DA #"A" .DA #2 ID + .DA BM.ID.APPLE pICON + .DA #S.MITEM.KEYMOD.CA+S.MITEM.KEYMOD.OA+S.MITEM.KEYMOD.CTRL + .DA #'A' .AZ "About..." .1 .DA #.2-* next @@ -437,13 +439,44 @@ MENU.Sys .DA #.1-* next .2 .DA #.3-* next .DA #S.MITEM.F.SUBMENU F .DA #0 S + .DA #0 ID + .DA 0 pICON + .DA 0 pMENU + .AZ "Programs" + +.3 .DA #.4-* next + .DA #S.MITEM.F.SUBMENU F + .DA #0 S + .DA #0 ID .DA 0 pICON .DA 0 pMENU .AZ "Settings" -.3 .DA #0 +.4 .DA #.5-* next + .DA #S.MITEM.F.SEP + +.5 .DA #.6-* next + .DA #S.MITEM.F.ITEM F + .DA #0 S + .DA #8 ID + .DA 0 pICON + .DA #0 + .DA #0 + .AZ "Search..." + +.6 .DA #.7-* next + .DA #S.MITEM.F.ITEM F + .DA #0 S + .DA #10 ID + .DA 0 pICON + .DA #S.MITEM.KEYMOD.OA + .DA #'R' + .AZ "Run..." + +.7 .DA #0 *-------------------------------------- PREFS.BESTVIEWEDX .DA #$FC +PREFS.MENUCOLOR .DA #C.WHITE PREFS.SYSBARCOLOR .DA #C.WHITE PREFS.MBARXMARGIN .DA #5 PREFS.BORDERCOLOR .DA #C.BLACK diff --git a/SBIN/GUI.S.txt b/SBIN/GUI.S.txt index 36c4f664..a6ae1951 100644 --- a/SBIN/GUI.S.txt +++ b/SBIN/GUI.S.txt @@ -42,6 +42,7 @@ CS.START cld .DA CS.QUIT L.LIBGUI .DA LIBGUI L.MouseData .DA MouseData +L.LOGOFILE .DA LOGOFILE L.WND.TITLE .DA WND.TITLE L.WND.MBAR .DA WND.MBAR L.WND.STATUS .DA WND.STATUS @@ -53,11 +54,20 @@ CS.INIT >LDYA L.LIBGUI sta hLIBGUI * clc -.9 rts +.9 +CS.INIT.RTS rts *-------------------------------------- CS.RUN >LIBCALL hLIBGUI,LIBGUI.ShowCursor - + >PUSHW L.LOGOFILE + >PUSHBI O.RDONLY + >PUSHBI $CB Type + >PUSHWZ Aux type + >SYSCALL LoadStkObj + bcs CS.INIT.RTS + + stx hLogo + CS.RUN.LOOP >SLEEP >PUSHW L.MouseData @@ -163,6 +173,8 @@ hLIBGUI .BS 1 *-------------------------------------- MouseData .BS S.MOUSE *-------------------------------------- +hLogo .BS 1 +LOGOFILE .AZ "${ROOT}root/bmp/A2OSX.LOGO" hWND .BS 1 WND.TITLE .AZ "Window Title" *--------------------------------------