start of something big
maybe.
This commit is contained in:
parent
1c6de1994e
commit
c302cb6139
2 changed files with 18 additions and 1 deletions
|
|
@ -103,6 +103,13 @@ function min(a,b)
|
|||
if a<=b then min=a else min=b
|
||||
end function
|
||||
|
||||
function clickregion(x as integer, y as integer, w as integer, h as integer)
|
||||
if _mousex>x and _mousey>y and _mousex<x+w and _mousey<y+h then
|
||||
if mouseclicked then clickregion=-1
|
||||
if rmouseclicked then clickregion=-2
|
||||
end if
|
||||
end function
|
||||
|
||||
function button (x as integer,y as integer,w as integer,h as integer,caption as string)
|
||||
if _mousex>x and _mousey>y and _mousex<x+w and _mousey<y+h then
|
||||
drawbutton x,y,w,h,caption,1
|
||||
|
|
|
|||
10
pixler.bas
10
pixler.bas
|
|
@ -206,7 +206,17 @@ sub toolbox
|
|||
line (16,y+16)-(64,y+64),highlightcolor,b
|
||||
line (0,y)-(48,y+48),state.fcolor,bf
|
||||
line (0,y)-(48,y+48),highlightcolor,b
|
||||
if clickregion(0, y, 48, 48) then
|
||||
palettemanager state.fcolor
|
||||
elseif clickregion(16, y + 16, 48, 48) then
|
||||
palettemanager state.bcolor
|
||||
end if
|
||||
end sub
|
||||
|
||||
sub palettemanager(col as _unsigned long)
|
||||
line (0,0)-(_width-1,_height-1),col,bf
|
||||
_display
|
||||
sleep
|
||||
end sub
|
||||
|
||||
sub colorpicker
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue