visionmercer/pixler
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

gradient

Browse source
This commit is contained in:
visionmercer 2026-05-20 22:38:36 +02:00
commit 41b28e4fd2
2 changed files with 71 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

8
pixler.bas
View file

@ -734,7 +734,7 @@ function icon (index as long)
static icons() as long
if not init then
redim icons(19) as long ' Room for 20 icons
dim c as _unsigned long:c=_rgb32(255,255,255) ' Main icon color
dim c as _unsigned long:c=highlightcolor ' Main icon color
' --- 1. Pencil Tool ---
icons(0)=_newimage(32,32,32):_dest icons(0)
@ -758,8 +758,7 @@ function icon (index as long)
' --- 4. Filled Circle ---
icons(3)=_newimage(32,32,32):_dest icons(3)
dim r as integer
for r=0 to 11:circle (16,16),r,c:next r
filledcircle 16,16,11,c
_dest 0
' --- 5. Hollow Box ---
@ -794,8 +793,7 @@ function icon (index as long)
line (20,26)-(26,20),c
line (26,20)-(14,8),c
line (14,8)-(8,14),c
' Fixed syntax: Using valid multiplier expressions for the arc
circle (14,11),6,c,_pi(1),_pi(1.5)
circle (14,11),6,c,_pi(1.5),_pi(1)
pset (6,28),c ' Spilling drip point
_dest 0