pencil tool (thickpixel)

This commit is contained in:
visionmercer 2026-05-11 10:29:29 +02:00
commit c7c145f0b1
2 changed files with 29 additions and 9 deletions

View file

@ -42,13 +42,21 @@ sub filledPolygon (Points() as long, col as long)
next y
end sub
sub thickpixel(x,y,col as long)
if state.brushsize=1 then
pset(x,y),col
else
line(x-0.5 * state.brushsize,y-0.5 * state.brushsize)-(x+0.5 * state.brushsize,y+0.5 * state.brushsize),col,bf
end if
end sub
sub thickline(x1,y1,x2,y2, col as long)
if state.brushsize=1 then
line(x1,y1)-(x2,y2),col
else
dim tempimg as long
dim od as long
tempimg=_newimage(10,10,32)
tempimg=_newimage(1,1,32)
od =_dest
_dest tempimg
pset(0,0),col