A2osX/LIB/LIBGUI.G.BM.txt
burniouf 9a7d20a7e1 ProDOS 203 / FX:TC mod for year 2022-2026
FORMAT: new switches & checks
SH:BREAK in FOR and WHILE
ASM / S-C MASM: new directives, CString support and .HX
LC / UC:bugfix
DHGR.DRV:bugfix
LIBGUI:wip
CC:wip
2022-12-07 08:02:29 +01:00

242 lines
4.5 KiB
Plaintext
Raw Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

NEW
AUTO 3,1
*--------------------------------------
BM.Apple .DA #S.BM.F.BBP4
.DA #2 RowBytes
.DA 16 W
.DA 7 H
.DA BM.Apple.AND-BM.Apple
.HS 0006 green (8)
.HS 6006 green (8)
.HS EEEE yellow (15)
.HS CC0C orange (14)
.HS 8808 magenta (10)
.HS 9999 violet (11)
.HS 1001 Dark blue (4)
BM.Apple.AND .HS FFF0
.HS 0FF0
.HS 0000
.HS 00F0
.HS 00F0
.HS 0000
.HS 0FF0
*--------------------------------------
BM.Close .DA #S.BM.F.BBP4
.DA #2 RowBytes
.DA 12 W
.DA 7 Y
.DA BM.Close.AND-BM.Close
.HS 0000
.HS 0000
.HS E000
.HS EE0E
.HS E000
.HS 0000
.HS 0000
BM.Close.AND .HS FF0F
.HS 0F0F
.HS 0000
.HS 0000
.HS 0000
.HS 0F0F
.HS FF0F
*--------------------------------------
BM.Max .DA #S.BM.F.BBP4
.DA #2 RowBytes
.DA 12 W
.DA 7 Y
.DA BM.Max.AND-BM.Max
.HS 0000
.HS 0000
.HS E000
.HS EE0E
.HS 0E0E
.HS 0000
.HS 0000
BM.Max.AND .HS FF0F
.HS FF0F
.HS 0F0F
.HS 0000
.HS F000
.HS FF0F
.HS FF0F
*--------------------------------------
BM.Min .DA #S.BM.F.BBP4
.DA #2 RowBytes
.DA 12 W
.DA 7 Y
.DA BM.Min.AND-BM.Min
.HS 0000
.HS 0000
.HS 0E0E
.HS EE0E
.HS E000
.HS 0000
.HS 0000
BM.Min.AND .HS FF0F
.HS 0F0F
.HS F000
.HS 0000
.HS 0F0F
.HS 0F0F
.HS FF0F
*--------------------------------------
BM.Left .DA #S.BM.F.BBP1
.DA #1 RowBytes
.DA 7 W
.DA 7 Y
.DA BM.Left.AND-BM.Left
.DA #%0000000
.DA #%0010000
.DA #%0011000
.DA #%0011100
.DA #%0011000
.DA #%0010000
.DA #%0000000
BM.Left.AND .DA #%1001111
.DA #%1000111
.DA #%1000011
.DA #%1000001
.DA #%1000011
.DA #%1000111
.DA #%1001111
*--------------------------------------
BM.Right .DA #S.BM.F.BBP1
.DA #1 RowBytes
.DA 7 W
.DA 7 Y
.DA BM.Right.AND-BM.Right
.DA #%0000000
.DA #%0000100
.DA #%0001100
.DA #%0011100
.DA #%0001100
.DA #%0000100
.DA #%0000000
BM.Right.AND .DA #%1111001
.DA #%1110001
.DA #%1100001
.DA #%1000001
.DA #%1100001
.DA #%1110001
.DA #%1111001
*--------------------------------------
BM.Up .DA #S.BM.F.BBP1
.DA #1 RowBytes
.DA 7 W
.DA 7 Y
.DA BM.Up.AND-BM.Up
.DA #%0000000
.DA #%0000000
.DA #%0001000
.DA #%0011100
.DA #%0111110
.DA #%0000000
.DA #%0000000
BM.Up.AND .DA #%1111111
.DA #%1110111
.DA #%1100011
.DA #%1000001
.DA #%0000000
.DA #%0000000
.DA #%1111111
*--------------------------------------
BM.Down .DA #S.BM.F.BBP1
.DA #1 RowBytes
.DA 7 W
.DA 7 Y
.DA BM.Down.AND-BM.Down
.DA #%0000000
.DA #%0000000
.DA #%0111110
.DA #%0011100
.DA #%0001000
.DA #%0000000
.DA #%0000000
BM.Down.AND .DA #%1111111
.DA #%0000000
.DA #%0000000
.DA #%1000001
.DA #%1100011
.DA #%1110111
.DA #%1111111
*--------------------------------------
BM.Checked .DA #S.BM.F.BBP1
.DA #1 RowBytes
.DA 7 W
.DA 7 Y
.DA BM.Checked.AND-BM.Checked
.DA #%0000000
.DA #%0100000
.DA #%0101000
.DA #%0010000
.DA #%0001000
.DA #%0001000
.DA #%0000000
BM.Checked.AND .DA #%1111111
.DA #%1111111
.DA #%1111111
.DA #%1111111
.DA #%1111111
.DA #%1111111
.DA #%1111111
*--------------------------------------
BM.Info .DA #S.BM.F.BBP4
.DA #4 RowBytes
.DA 32 W
.DA 14 H
.DA BM.Info.AND-BM.Info
.HX 00000000
.HX 00022000
.HX 00222200
.HX 002FF200
.HX 022FF220
.HX 02222220
.HX 02FFFF20
.HX 022FF220
.HX 022FF220
.HX 02FFFF20
.HX 00222200
.HX 00222200
.HX 00022000
.HX 00000000
BM.Info.AND .HX FFF00FFF
.HX FF0000FF
.HX F000000F
.HX F000000F
.HX 00000000
.HX 00000000
.HX 00000000
.HX 00000000
.HX 00000000
.HX 00000000
.HX F000000F
.HX F000000F
.HX FF0000FF
.HX FFF00FFF
*--------------------------------------
MAN
SAVE usr/src/lib/libgui.g.bm
LOAD usr/src/lib/libgui.s
ASM