2017-11-30 16:33:33 +00:00
|
|
|
|
NEW
|
2019-07-30 08:57:25 +00:00
|
|
|
|
AUTO 3,1
|
2017-11-30 16:33:33 +00:00
|
|
|
|
*--------------------------------------
|
|
|
|
|
CUR.T .BS 1
|
|
|
|
|
CUR.bVisible .BS 1
|
2017-12-01 15:53:29 +00:00
|
|
|
|
CUR.Pos .BS S.POINT
|
2017-11-30 16:33:33 +00:00
|
|
|
|
*--------------------------------------
|
|
|
|
|
CUR.HotPoints .DA #0,#0 CUR.T.ARROW
|
2017-12-05 07:09:16 +00:00
|
|
|
|
.DA #7,#4 CUR.ResizeX
|
|
|
|
|
.DA #6,#5 CUR.ResizeY
|
|
|
|
|
.DA #5,#5 CUR.ResizeXY1
|
|
|
|
|
.DA #5,#5 CUR.ResizeXY2
|
2017-12-06 16:26:36 +00:00
|
|
|
|
.DA #5,#5 CUR.Cross
|
|
|
|
|
.DA #5,#3 CUR.Text
|
2017-12-04 07:18:24 +00:00
|
|
|
|
.DA #5,#6 CUR.Wait1
|
|
|
|
|
.DA #5,#6 CUR.Wait2
|
|
|
|
|
.DA #5,#6 CUR.Wait3
|
|
|
|
|
.DA #5,#6 CUR.Wait4
|
2017-12-04 16:42:08 +00:00
|
|
|
|
.DA #8,#7 CUR.Wait5
|
|
|
|
|
.DA #8,#7 CUR.Wait6
|
2017-11-30 16:33:33 +00:00
|
|
|
|
*--------------------------------------
|
|
|
|
|
CUR.CB .DA #S.CB.CMD.BITBLT
|
|
|
|
|
.BS 1
|
2017-12-22 21:24:30 +00:00
|
|
|
|
.DA #S.CB.M.MONO
|
2017-11-30 16:33:33 +00:00
|
|
|
|
.DA #0
|
2017-12-06 16:26:36 +00:00
|
|
|
|
.BS S.CB-4
|
2017-11-30 16:33:33 +00:00
|
|
|
|
*--------------------------------------
|
2017-12-06 16:26:36 +00:00
|
|
|
|
CUR.SaveBuf .BS 64 16*4
|
2017-11-30 16:33:33 +00:00
|
|
|
|
*--------------------------------------
|
|
|
|
|
CUR.Arrow .DA #S.BM.F.BBP1
|
|
|
|
|
.DA #2 RowBytes
|
|
|
|
|
.DA 11 W
|
|
|
|
|
.DA 13 H
|
|
|
|
|
.DA CUR.Arrow.MASK-CUR.Arrow
|
|
|
|
|
.DA %000.00000000
|
|
|
|
|
.DA %000.00000010
|
|
|
|
|
.DA %000.00000110
|
|
|
|
|
.DA %000.00001110
|
|
|
|
|
.DA %000.00011110
|
|
|
|
|
.DA %000.00111110
|
|
|
|
|
.DA %000.01111110
|
|
|
|
|
.DA %000.11111110
|
|
|
|
|
.DA %001.11111110
|
|
|
|
|
.DA %010.01111110
|
|
|
|
|
.DA %000.11110010
|
|
|
|
|
.DA %000.11100000
|
|
|
|
|
.DA %000.00000000
|
|
|
|
|
CUR.Arrow.MASK .DA %111.11111100
|
|
|
|
|
.DA %111.11111000
|
|
|
|
|
.DA %111.11110000
|
|
|
|
|
.DA %111.11100000
|
|
|
|
|
.DA %111.11000000
|
|
|
|
|
.DA %111.10000000
|
|
|
|
|
.DA %111.00000000
|
|
|
|
|
.DA %110.00000000
|
|
|
|
|
.DA %100.00000000
|
|
|
|
|
.DA %000.00000000
|
|
|
|
|
.DA %000.00000000
|
|
|
|
|
.DA %110.00000000
|
|
|
|
|
.DA %110.00001111
|
|
|
|
|
*--------------------------------------
|
2017-12-05 07:09:16 +00:00
|
|
|
|
CUR.ResizeX .DA #S.BM.F.BBP1
|
|
|
|
|
.DA #2 RowBytes
|
|
|
|
|
.DA 14 W
|
|
|
|
|
.DA 7 H
|
|
|
|
|
.DA CUR.ResizeX.MASK-CUR.ResizeX
|
|
|
|
|
.DA %000000.00000000
|
|
|
|
|
.DA %000100.00001000
|
|
|
|
|
.DA %001100.00001100
|
|
|
|
|
.DA %011111.11111110
|
|
|
|
|
.DA %001100.00001100
|
|
|
|
|
.DA %000100.00001000
|
|
|
|
|
.DA %000000.00000000
|
|
|
|
|
CUR.ResizeX.MASK
|
|
|
|
|
.DA %111001.11100111
|
|
|
|
|
.DA %110001.11100011
|
|
|
|
|
.DA %100000.00000001
|
|
|
|
|
.DA %000000.00000000
|
|
|
|
|
.DA %100000.00000001
|
|
|
|
|
.DA %110001.11100011
|
|
|
|
|
.DA %111001.11100111
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
CUR.ResizeY .DA #S.BM.F.BBP1
|
|
|
|
|
.DA #2 RowBytes
|
|
|
|
|
.DA 9 W
|
|
|
|
|
.DA 11 H
|
|
|
|
|
.DA CUR.ResizeY.MASK-CUR.ResizeY
|
|
|
|
|
.DA %0.00000000
|
|
|
|
|
.DA %0.00010000
|
|
|
|
|
.DA %0.01111100
|
|
|
|
|
.DA %0.11111110
|
|
|
|
|
.DA %0.00010000
|
|
|
|
|
.DA %0.00010000
|
|
|
|
|
.DA %0.00010000
|
|
|
|
|
.DA %0.11111110
|
|
|
|
|
.DA %0.01111100
|
|
|
|
|
.DA %0.00010000
|
|
|
|
|
.DA %0.00000000
|
|
|
|
|
CUR.ResizeY.MASK
|
|
|
|
|
.DA %1.11101111
|
|
|
|
|
.DA %1.11000111
|
|
|
|
|
.DA %1.00000001
|
|
|
|
|
.DA %0.00000000
|
|
|
|
|
.DA %0.00000000
|
|
|
|
|
.DA %1.11000111
|
|
|
|
|
.DA %1.11000111
|
|
|
|
|
.DA %0.00000000
|
|
|
|
|
.DA %1.00000001
|
|
|
|
|
.DA %1.11000111
|
|
|
|
|
.DA %1.11101111
|
2017-12-04 07:18:24 +00:00
|
|
|
|
*--------------------------------------
|
2017-12-05 07:09:16 +00:00
|
|
|
|
CUR.ResizeXY1 .DA #S.BM.F.BBP1
|
|
|
|
|
.DA #2 RowBytes
|
|
|
|
|
.DA 11 W
|
2017-12-05 16:33:06 +00:00
|
|
|
|
.DA 11 H
|
2017-12-05 07:09:16 +00:00
|
|
|
|
.DA CUR.ResizeXY1.MASK-CUR.ResizeXY1
|
|
|
|
|
.DA %000.00000000
|
|
|
|
|
.DA %011.11000000
|
|
|
|
|
.DA %011.10000000
|
|
|
|
|
.DA %011.10000000
|
2017-12-05 16:33:06 +00:00
|
|
|
|
.DA %010.01000000
|
|
|
|
|
.DA %000.00100000
|
|
|
|
|
.DA %000.00010010
|
|
|
|
|
.DA %000.00001110
|
2017-12-05 07:09:16 +00:00
|
|
|
|
.DA %000.00001110
|
|
|
|
|
.DA %000.00011110
|
|
|
|
|
.DA %000.00000000
|
|
|
|
|
CUR.ResizeXY1.MASK
|
|
|
|
|
.DA %000.00001111
|
|
|
|
|
.DA %000.00011111
|
2017-12-05 16:33:06 +00:00
|
|
|
|
.DA %000.00111111
|
|
|
|
|
.DA %000.00111111
|
|
|
|
|
.DA %000.00011110
|
|
|
|
|
.DA %001.10001100
|
|
|
|
|
.DA %011.11000000
|
|
|
|
|
.DA %111.11100000
|
|
|
|
|
.DA %111.11100000
|
2017-12-05 07:09:16 +00:00
|
|
|
|
.DA %111.11000000
|
|
|
|
|
.DA %111.10000000
|
2017-12-04 07:18:24 +00:00
|
|
|
|
*--------------------------------------
|
2017-12-06 16:26:36 +00:00
|
|
|
|
CUR.ResizeXY2 .DA #S.BM.F.BBP1
|
|
|
|
|
.DA #2 RowBytes
|
|
|
|
|
.DA 11 W
|
|
|
|
|
.DA 11 H
|
|
|
|
|
.DA CUR.ResizeXY2.MASK-CUR.ResizeXY2
|
|
|
|
|
.DA %000.00000000
|
|
|
|
|
.DA %000.00011110
|
|
|
|
|
.DA %000.00001110
|
|
|
|
|
.DA %000.00001110
|
|
|
|
|
.DA %000.00010010
|
|
|
|
|
.DA %000.00100000
|
|
|
|
|
.DA %010.01000000
|
|
|
|
|
.DA %011.10000000
|
|
|
|
|
.DA %011.10000000
|
|
|
|
|
.DA %011.11000000
|
|
|
|
|
.DA %000.00000000
|
|
|
|
|
CUR.ResizeXY2.MASK
|
|
|
|
|
.DA %111.10000000
|
|
|
|
|
.DA %111.11000000
|
|
|
|
|
.DA %111.11100000
|
|
|
|
|
.DA %111.11100000
|
|
|
|
|
.DA %011.11000000
|
|
|
|
|
.DA %001.10001100
|
|
|
|
|
.DA %000.00011110
|
|
|
|
|
.DA %000.00111111
|
|
|
|
|
.DA %000.00111111
|
|
|
|
|
.DA %000.00011111
|
|
|
|
|
.DA %000.00001111
|
2017-12-04 07:18:24 +00:00
|
|
|
|
*--------------------------------------
|
2017-12-06 16:26:36 +00:00
|
|
|
|
CUR.Cross .DA #S.BM.F.BBP1
|
|
|
|
|
.DA #2 RowBytes
|
|
|
|
|
.DA 11 W
|
|
|
|
|
.DA 11 H
|
|
|
|
|
.DA CUR.Cross.MASK-CUR.Cross
|
|
|
|
|
.DA %000.00100000
|
|
|
|
|
.DA %000.01010000
|
|
|
|
|
.DA %000.01010000
|
|
|
|
|
.DA %000.01010000
|
|
|
|
|
.DA %011.11011110
|
|
|
|
|
.DA %100.00000001
|
|
|
|
|
.DA %011.11011110
|
|
|
|
|
.DA %000.01010000
|
|
|
|
|
.DA %000.01010000
|
|
|
|
|
.DA %000.01010000
|
|
|
|
|
.DA %000.00100000
|
|
|
|
|
CUR.Cross.MASK
|
|
|
|
|
.DA %111.11011111
|
|
|
|
|
.DA %111.10001111
|
|
|
|
|
.DA %111.10001111
|
|
|
|
|
.DA %111.10001111
|
|
|
|
|
.DA %100.00000001
|
|
|
|
|
.DA %000.00100000
|
|
|
|
|
.DA %100.00000001
|
|
|
|
|
.DA %111.10001111
|
|
|
|
|
.DA %111.10001111
|
|
|
|
|
.DA %111.10001111
|
|
|
|
|
.DA %111.11011111
|
2017-12-04 07:18:24 +00:00
|
|
|
|
*--------------------------------------
|
2017-12-06 16:26:36 +00:00
|
|
|
|
CUR.Text .DA #S.BM.F.BBP1
|
|
|
|
|
.DA #1 RowBytes
|
|
|
|
|
.DA 7 W
|
|
|
|
|
.DA 11 H
|
|
|
|
|
.DA CUR.Text.MASK-CUR.Text
|
|
|
|
|
|
|
|
|
|
.DA #%0000000
|
|
|
|
|
.DA #%0000000
|
|
|
|
|
.DA #%0000000
|
|
|
|
|
.DA #%0000000
|
|
|
|
|
.DA #%0000000
|
|
|
|
|
.DA #%0000000
|
|
|
|
|
.DA #%0000000
|
|
|
|
|
.DA #%0000000
|
|
|
|
|
.DA #%0000000
|
|
|
|
|
.DA #%0000000
|
|
|
|
|
.DA #%0000000
|
|
|
|
|
CUR.Text.MASK
|
|
|
|
|
.DA #%0011100
|
|
|
|
|
.DA #%1101011
|
|
|
|
|
.DA #%1110111
|
|
|
|
|
.DA #%1110111
|
|
|
|
|
.DA #%1110111
|
|
|
|
|
.DA #%1110111
|
|
|
|
|
.DA #%1110111
|
|
|
|
|
.DA #%1110111
|
|
|
|
|
.DA #%1110111
|
|
|
|
|
.DA #%1101011
|
|
|
|
|
.DA #%0011100
|
2017-12-04 07:18:24 +00:00
|
|
|
|
*--------------------------------------
|
|
|
|
|
CUR.Wait1 .DA #S.BM.F.BBP1
|
|
|
|
|
.DA #2 RowBytes
|
|
|
|
|
.DA 11 W
|
|
|
|
|
.DA 13 H
|
|
|
|
|
.DA CUR.Wait4.MASK-CUR.Wait1
|
|
|
|
|
.DA %000.00000000
|
|
|
|
|
.DA %001.11111100
|
|
|
|
|
.DA %001.00000100
|
|
|
|
|
.DA %000.10001000
|
|
|
|
|
.DA %000.01010000
|
|
|
|
|
.DA %000.00100000
|
|
|
|
|
.DA %000.00100000
|
|
|
|
|
.DA %000.00100000
|
|
|
|
|
.DA %000.01110000
|
|
|
|
|
.DA %000.11111000
|
|
|
|
|
.DA %001.11111100
|
|
|
|
|
.DA %001.11111100
|
|
|
|
|
.DA %000.00000000
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
CUR.Wait2 .DA #S.BM.F.BBP1
|
|
|
|
|
.DA #2 RowBytes
|
|
|
|
|
.DA 11 W
|
|
|
|
|
.DA 13 H
|
|
|
|
|
.DA CUR.Wait4.MASK-CUR.Wait2
|
|
|
|
|
.DA %000.00000000
|
|
|
|
|
.DA %001.11111100
|
|
|
|
|
.DA %001.11111100
|
|
|
|
|
.DA %000.10001000
|
|
|
|
|
.DA %000.01010000
|
|
|
|
|
.DA %000.00100000
|
|
|
|
|
.DA %000.00100000
|
|
|
|
|
.DA %000.00100000
|
|
|
|
|
.DA %000.01110000
|
|
|
|
|
.DA %000.11111000
|
|
|
|
|
.DA %001.00000100
|
|
|
|
|
.DA %001.11111100
|
|
|
|
|
.DA %000.00000000
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
CUR.Wait3 .DA #S.BM.F.BBP1
|
|
|
|
|
.DA #2 RowBytes
|
|
|
|
|
.DA 11 W
|
|
|
|
|
.DA 13 H
|
|
|
|
|
.DA CUR.Wait4.MASK-CUR.Wait3
|
|
|
|
|
.DA %000.00000000
|
|
|
|
|
.DA %001.11111100
|
|
|
|
|
.DA %001.11111100
|
|
|
|
|
.DA %000.11111000
|
|
|
|
|
.DA %000.01010000
|
|
|
|
|
.DA %000.00100000
|
|
|
|
|
.DA %000.00100000
|
|
|
|
|
.DA %000.00100000
|
|
|
|
|
.DA %000.01110000
|
|
|
|
|
.DA %000.10001000
|
|
|
|
|
.DA %001.00000100
|
|
|
|
|
.DA %001.11111100
|
|
|
|
|
.DA %000.00000000
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
CUR.Wait4 .DA #S.BM.F.BBP1
|
|
|
|
|
.DA #2 RowBytes
|
|
|
|
|
.DA 11 W
|
|
|
|
|
.DA 13 H
|
|
|
|
|
.DA CUR.Wait4.MASK-CUR.Wait4
|
|
|
|
|
.DA %000.00000000
|
|
|
|
|
.DA %001.11111100
|
|
|
|
|
.DA %001.11111100
|
|
|
|
|
.DA %000.11111000
|
|
|
|
|
.DA %000.01110000
|
|
|
|
|
.DA %000.00100000
|
|
|
|
|
.DA %000.00100000
|
|
|
|
|
.DA %000.00100000
|
|
|
|
|
.DA %000.01010000
|
|
|
|
|
.DA %000.10001000
|
|
|
|
|
.DA %001.00000100
|
|
|
|
|
.DA %001.11111100
|
|
|
|
|
.DA %000.00000000
|
2017-12-04 16:42:08 +00:00
|
|
|
|
CUR.Wait4.MASK .DA %110.00000011
|
2017-12-04 07:18:24 +00:00
|
|
|
|
.DA %100.00000001
|
|
|
|
|
.DA %100.00000001
|
|
|
|
|
.DA %110.00000011
|
|
|
|
|
.DA %111.00000111
|
|
|
|
|
.DA %111.10001111
|
|
|
|
|
.DA %111.10001111
|
|
|
|
|
.DA %111.10001111
|
|
|
|
|
.DA %111.00000111
|
|
|
|
|
.DA %110.00000011
|
|
|
|
|
.DA %100.00000001
|
|
|
|
|
.DA %100.00000001
|
2017-12-04 16:42:08 +00:00
|
|
|
|
.DA %110.00000011
|
2017-12-04 07:18:24 +00:00
|
|
|
|
*--------------------------------------
|
|
|
|
|
CUR.Wait5 .DA #S.BM.F.BBP1
|
|
|
|
|
.DA #2 RowBytes
|
|
|
|
|
.DA 16 W
|
2017-12-04 16:42:08 +00:00
|
|
|
|
.DA 14 H
|
2017-12-04 07:18:24 +00:00
|
|
|
|
.DA CUR.Wait5.MASK-CUR.Wait5
|
|
|
|
|
.DA %00000000.00000000
|
|
|
|
|
.DA %00000010.00000000
|
|
|
|
|
.DA %00000110.00000000
|
|
|
|
|
.DA %00001110.00000000
|
|
|
|
|
.DA %00011110.00000000
|
|
|
|
|
.DA %00111110.00000000
|
|
|
|
|
.DA %00000001.00000000
|
|
|
|
|
.DA %00000000.10000000
|
|
|
|
|
.DA %00000000.01111100
|
|
|
|
|
.DA %00000000.01001000
|
|
|
|
|
.DA %00000000.01010000
|
|
|
|
|
.DA %00000000.01100000
|
|
|
|
|
.DA %00000000.01000000
|
|
|
|
|
.DA %00000000.00000000
|
2017-12-04 16:42:08 +00:00
|
|
|
|
CUR.Wait5.MASK .DA %11111100.11111111
|
2017-12-04 07:18:24 +00:00
|
|
|
|
.DA %11111000.11111111
|
|
|
|
|
.DA %11110000.11111111
|
|
|
|
|
.DA %11100000.11111111
|
|
|
|
|
.DA %11000000.11111111
|
|
|
|
|
.DA %10000000.01111111
|
2017-12-04 16:42:08 +00:00
|
|
|
|
.DA %10000000.00111111
|
|
|
|
|
.DA %11111100.00000001
|
2017-12-04 07:18:24 +00:00
|
|
|
|
.DA %11111110.00000001
|
|
|
|
|
.DA %11111111.00000011
|
|
|
|
|
.DA %11111111.00000111
|
|
|
|
|
.DA %11111111.00001111
|
|
|
|
|
.DA %11111111.00011111
|
|
|
|
|
.DA %11111111.00111111
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
CUR.Wait6 .DA #S.BM.F.BBP1
|
|
|
|
|
.DA #2 RowBytes
|
|
|
|
|
.DA 16 W
|
2017-12-04 16:42:08 +00:00
|
|
|
|
.DA 14 H
|
2017-12-04 07:18:24 +00:00
|
|
|
|
.DA CUR.Wait6.MASK-CUR.Wait6
|
|
|
|
|
.DA %00000000.00000000
|
|
|
|
|
.DA %00000000.01000000
|
|
|
|
|
.DA %00000000.01100000
|
|
|
|
|
.DA %00000000.01010000
|
|
|
|
|
.DA %00000000.01001000
|
|
|
|
|
.DA %00000000.01111100
|
|
|
|
|
.DA %00000000.10000000
|
|
|
|
|
.DA %00000001.00000000
|
|
|
|
|
.DA %00111110.00000000
|
|
|
|
|
.DA %00011110.00000000
|
|
|
|
|
.DA %00001110.00000000
|
|
|
|
|
.DA %00000110.00000000
|
|
|
|
|
.DA %00000010.00000000
|
|
|
|
|
.DA %00000000.00000000
|
2017-12-04 16:42:08 +00:00
|
|
|
|
CUR.Wait6.MASK .DA %11111111.00111111
|
2017-12-04 07:18:24 +00:00
|
|
|
|
.DA %11111111.00011111
|
|
|
|
|
.DA %11111111.00001111
|
|
|
|
|
.DA %11111111.00000111
|
|
|
|
|
.DA %11111111.00000011
|
|
|
|
|
.DA %11111110.00000001
|
2017-12-04 16:42:08 +00:00
|
|
|
|
.DA %11111100.00000001
|
|
|
|
|
.DA %10000000.00111111
|
2017-12-04 07:18:24 +00:00
|
|
|
|
.DA %10000000.01111111
|
|
|
|
|
.DA %11000000.11111111
|
|
|
|
|
.DA %11100000.11111111
|
|
|
|
|
.DA %11110000.11111111
|
|
|
|
|
.DA %11111000.11111111
|
|
|
|
|
.DA %11111100.11111111
|
|
|
|
|
*--------------------------------------
|
2017-11-30 16:33:33 +00:00
|
|
|
|
MAN
|
2018-11-17 17:17:13 +00:00
|
|
|
|
SAVE USR/SRC/LIB/LIBGUI.G.CUR
|
|
|
|
|
LOAD USR/SRC/LIB/LIBGUI.S
|
2017-11-30 16:33:33 +00:00
|
|
|
|
ASM
|