2015-03-23 07:28:03 +00:00
|
|
|
|
NEW
|
2019-07-07 20:48:57 +00:00
|
|
|
|
AUTO 3,1
|
|
|
|
|
.LIST OFF
|
2015-03-23 07:28:03 +00:00
|
|
|
|
*--------------------------------------
|
2019-01-09 06:58:19 +00:00
|
|
|
|
LIBGUI.Draw .EQ 4
|
|
|
|
|
LIBGUI.SetCursor .EQ 6
|
|
|
|
|
LIBGUI.SetCursorPos .EQ 8
|
|
|
|
|
LIBGUI.HideCursor .EQ 10
|
|
|
|
|
LIBGUI.ShowCursor .EQ 12
|
|
|
|
|
LIBGUI.UpdateCursor .EQ 14
|
|
|
|
|
LIBGUI.ReadMouse .EQ 16
|
2019-01-10 16:26:58 +00:00
|
|
|
|
*--------------------------------------
|
|
|
|
|
CUR.T.ARROW .EQ 0
|
|
|
|
|
CUR.T.RESIZEX .EQ 2
|
|
|
|
|
CUR.T.RESIZEY .EQ 4
|
|
|
|
|
CUR.T.RESIZEXY1 .EQ 6
|
|
|
|
|
CUR.T.RESIZEXY2 .EQ 8
|
|
|
|
|
CUR.T.CROSS .EQ 10
|
|
|
|
|
CUR.T.TEXT .EQ 12
|
|
|
|
|
CUR.T.WAIT .EQ 14
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
S.MOUSE.X1 .EQ 0
|
|
|
|
|
S.MOUSE.Y1 .EQ 2
|
|
|
|
|
S.MOUSE.X2 .EQ 4
|
|
|
|
|
S.MOUSE.Y2 .EQ 6
|
|
|
|
|
S.MOUSE.S .EQ 8
|
|
|
|
|
S.MOUSE.S.UP .EQ %00000001
|
|
|
|
|
S.MOUSE.S.DOWN .EQ %00000010
|
|
|
|
|
S.MOUSE.S.MOVE .EQ %00000100
|
|
|
|
|
S.MOUSE.S.DRAGSTART .EQ %00001000
|
|
|
|
|
S.MOUSE.S.DRAGEND .EQ %00010000
|
|
|
|
|
S.MOUSE.S.CLK .EQ %00100000
|
|
|
|
|
S.MOUSE.S.DCLK .EQ %01000000
|
|
|
|
|
S.MOUSE.KEYMOD .EQ 9
|
|
|
|
|
S.MOUSE.KEYMOD.OA .EQ %00000001
|
|
|
|
|
S.MOUSE.KEYMOD.CA .EQ %00000010
|
|
|
|
|
*
|
|
|
|
|
S.MOUSE .EQ 10
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
S.POINT.X .EQ 0
|
|
|
|
|
S.POINT.Y .EQ 2
|
|
|
|
|
*
|
|
|
|
|
S.POINT .EQ 4
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
S.RECT.X1 .EQ 0
|
|
|
|
|
S.RECT.Y1 .EQ 2
|
|
|
|
|
S.RECT.X2 .EQ 4
|
|
|
|
|
S.RECT.Y2 .EQ 6
|
|
|
|
|
*
|
|
|
|
|
S.RECT .EQ 8
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
S.OBJ.T .EQ 0
|
|
|
|
|
S.OBJ.T.SCREEN .EQ 0
|
|
|
|
|
S.OBJ.T.WND .EQ 2
|
|
|
|
|
S.OBJ.T.MENUBAR .EQ 4
|
|
|
|
|
S.OBJ.T.MENU .EQ 6
|
|
|
|
|
S.OBJ.T.MITEM .EQ 8
|
|
|
|
|
S.OBJ.T.BUT .EQ 10
|
|
|
|
|
S.OBJ.T.TEXT .EQ 12
|
|
|
|
|
|
|
|
|
|
S.OBJ.F .EQ 1
|
|
|
|
|
S.OBJ.S .EQ 2
|
|
|
|
|
S.OBJ.ID .EQ 3
|
|
|
|
|
S.OBJ.hOWNER .EQ 4
|
|
|
|
|
S.OBJ.hPARENT .EQ 6
|
|
|
|
|
|
|
|
|
|
S.OBJ.X1 .EQ 8
|
|
|
|
|
S.OBJ.Y1 .EQ 10
|
|
|
|
|
S.OBJ.X2 .EQ 12
|
|
|
|
|
S.OBJ.Y2 .EQ 14
|
|
|
|
|
S.OBJ.W .EQ 16
|
|
|
|
|
S.OBJ.H .EQ 18
|
|
|
|
|
S.OBJ.Childs .EQ 20
|
|
|
|
|
*
|
|
|
|
|
S.OBJ .EQ 22
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
S.SCREEN.hDEV .EQ S.OBJ
|
|
|
|
|
*
|
|
|
|
|
S.SCREEN .EQ S.OBJ+1
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
S.WND.F.RESIZE .EQ %00000001
|
|
|
|
|
S.WND.F.MOVE .EQ %00000010
|
|
|
|
|
S.WND.F.CLOSE .EQ %00000100
|
|
|
|
|
S.WND.F.MAX .EQ %00001000
|
|
|
|
|
S.WND.F.MIN .EQ %00010000
|
|
|
|
|
S.WND.F.BORDER .EQ %00100000
|
|
|
|
|
S.WND.F.MODAL .EQ %01000000
|
|
|
|
|
S.WND.F.SYSMODAL .EQ %10000000
|
|
|
|
|
*
|
|
|
|
|
S.WND.S.MAX .EQ %00001000
|
|
|
|
|
S.WND.S.MIN .EQ %00010000
|
|
|
|
|
*
|
|
|
|
|
S.WND.MinW .EQ S.OBJ
|
|
|
|
|
S.WND.MinH .EQ S.OBJ+2
|
|
|
|
|
S.WND.hTITLE .EQ S.OBJ+4
|
|
|
|
|
S.WND.hMENUBAR .EQ S.OBJ+6
|
|
|
|
|
S.WND.hBKCOLOR .EQ S.OBJ+8
|
|
|
|
|
S.WND.hBKBM .EQ S.OBJ+10
|
|
|
|
|
S.WND.hCUR .EQ S.OBJ+12
|
|
|
|
|
S.WND.hSTATUS .EQ S.OBJ+14
|
|
|
|
|
S.WND.hICON .EQ S.OBJ+16
|
|
|
|
|
S.WND.InnerW .EQ S.OBJ+18
|
|
|
|
|
S.WND.InnerH .EQ S.OBJ+20
|
|
|
|
|
*
|
|
|
|
|
S.WND .EQ S.OBJ+22
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
S.MBAR.MENULIST .EQ S.OBJ
|
|
|
|
|
* ... S.MENUs...
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
S.MENU.hSAVEBUF .EQ S.OBJ
|
|
|
|
|
S.MENU.ITEMLIST .EQ S.OBJ+2
|
|
|
|
|
* ... S.MITEMs...
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
*S.MITEM.F. .EQ %00000001
|
|
|
|
|
*S.MITEM.F. .EQ %00000010
|
|
|
|
|
*S.MITEM.F. .EQ %00000100
|
|
|
|
|
*S.MITEM.F. .EQ %00001000
|
|
|
|
|
*S.MITEM.F. .EQ %00010000
|
|
|
|
|
S.MITEM.F.SEP .EQ %00100000
|
|
|
|
|
*
|
|
|
|
|
S.MITEM.S
|
|
|
|
|
S.MITEM.S.CHECKED .EQ %01000000
|
|
|
|
|
S.MITEM.S.DISABLED .EQ %10000000
|
|
|
|
|
*
|
|
|
|
|
S.MITEM.hSUBM .EQ S.OBJ
|
|
|
|
|
S.MITEM.hBM .EQ S.OBJ+2
|
|
|
|
|
S.MITEM.HOTKEY .EQ S.OBJ+4
|
|
|
|
|
S.MITEM.KEYMOD .EQ S.OBJ+5
|
|
|
|
|
S.MITEM.KEYMOD.CTRL .EQ %10000000
|
|
|
|
|
S.MITEM.KEYMOD.OA .EQ %01000000
|
|
|
|
|
S.MITEM.KEYMOD.CA .EQ %00100000
|
|
|
|
|
S.MITEM.TEXTLEN .EQ S.OBJ+6
|
|
|
|
|
S.MITEM.TEXT .EQ S.OBJ+8 CSTR
|
|
|
|
|
* ...
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
S.BUT.F.DISABLED .EQ %10000000
|
|
|
|
|
*
|
|
|
|
|
S.BUT.S.PUSHED .EQ %10000000
|
|
|
|
|
*
|
|
|
|
|
S.BUT.hBM .EQ S.OBJ
|
|
|
|
|
S.BUT.TEXTX .EQ S.OBJ+2
|
|
|
|
|
S.BUT.TEXTY .EQ S.OBJ+4
|
|
|
|
|
S.BUT.TEXTLEN .EQ S.OBJ+6
|
|
|
|
|
S.BUT.TEXT .EQ S.OBJ+8
|
|
|
|
|
* ...
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
S.TEXT.F.DISABLED .EQ %10000000
|
|
|
|
|
*
|
|
|
|
|
S.TEXT.hBM .EQ S.OBJ
|
|
|
|
|
S.TEXT.TEXTX .EQ S.OBJ+2
|
|
|
|
|
S.TEXT.TEXTY .EQ S.OBJ+4
|
|
|
|
|
S.TEXT.TEXTLEN .EQ S.OBJ+6
|
|
|
|
|
S.TEXT.TEXT .EQ S.OBJ+8
|
|
|
|
|
* ...
|
2017-11-28 16:32:38 +00:00
|
|
|
|
*--------------------------------------
|
2015-03-23 07:28:03 +00:00
|
|
|
|
MAN
|
2019-07-07 20:48:57 +00:00
|
|
|
|
SAVE INC/LIBGUI.I
|
2018-11-17 17:17:13 +00:00
|
|
|
|
LOAD USR/SRC/LIB/LIBGUI.S
|
2017-11-27 16:39:09 +00:00
|
|
|
|
ASM
|