notimetoplay/genoa
notimetoplay
/
genoa
1
0
Fork 0
Code Issues Pull Requests Projects Wiki Activity

Add new icons

This commit is contained in:
No Time To Play 2023-09-15 14:59:48 +00:00
parent d55bfaf1b3
commit 11108a8f35
3 changed files with 34 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
examples/icons/16x16.tcl Normal file
View File

@ -0,0 +1,11 @@
viewport 8 8 16 16
color ""; fill midnightblue; circle 16 16 8
color gold; fill ""; width 1
set x 8; set i 1; set r $x
repeat 3 {
incr i; incr r -2
circle [+ $x 8] 16 $r
incr x 1
}

11
examples/icons/32x32.tcl Normal file
View File

@ -0,0 +1,11 @@
viewport 0 0 32 32
color ""; fill midnightblue; circle 16 16 16
color gold; fill ""; width 2
set x 14; set i 1; set r $x
repeat 3 {
incr i; incr r [- $i]
circle [+ $x 2] 16 $r
incr x $i
}

12
examples/icons/64x64.tcl Normal file
View File

@ -0,0 +1,12 @@
viewport 0 0 64 64
color ""; fill midnightblue; circle 32 32 32
color gold; fill ""; width 1
set y 32; set r 16
repeat 5 {
oval 32 $y $r [/ $r 2]
incr y 1; incr r 3
}
color ""; fill fuchsia; circle 32 24 12