pikmojicon

Documentation
Login

Documentation

Up one directory

Pikmoji: ui

Tap any pikchr to see its source code.

accept

# Zero-clause BSD license by Andreas Kupreis
B : circle color green fill green
@large = 70/100 * (B .diameter)		# 70% diameter 
@small = 20/100 * (B .diameter)		# 20% diameter
box at last color white fill white width @large height @small
box at last color white fill white width @small height @large

edit-pen

# Zero-clause BSD license by Andreas Kupreis
B: circle color lightblue fill lightblue
@large = 50/100 * (B .diameter)	# 50% diameter 
@small = 20/100 * (B .diameter)	# 20% diameter
S: box fill white width @small height @large at B .c
box fill white width @small height @small/2 \
     at 7/16*@small above S .n
line fill black \
     from 90/100     between S .sw and S .se \
     to   3/4*@small below   S .s \
     to   10/100     between S .sw and S .se \
     close

goto-first

# Zero-clause BSD license by Andreas Kupreis
B: circle color green fill green
@side = 40/100 * (B .diameter)
circle color white fill white rad 10% at 20/100 between B .w and B .e
line color white fill white \
     from 35/100 between B .w and B .e \
     go   @side heading  60 \
     go   @side heading 180 \
     close

goto-last

# Zero-clause BSD license by Andreas Kupreis
B: circle color green fill green
@side = 40/100 * (B .diameter)
circle color white fill white rad 10% at 80/100 between B .w and B .e
line color white fill white \
     from 65/100 between B .w and B .e \
     go   @side heading 300 \
     go   @side heading 180 \
     close

goto-next

# Zero-clause BSD license by Andreas Kupreis
B: circle color green fill green
@altitude = 60/100 * (B .radius)
line color white fill white \
     from (@altitude heading  90 from B .c) \
     to   (@altitude heading 330 from B .c) \
     to   (@altitude heading 210 from B .c) \
     close

goto-previous

# Zero-clause BSD license by Andreas Kupreis
B: circle color green fill green
@altitude = 60/100 * (B .radius)
line color white fill white \
     from (@altitude heading 270 from B .c) \
     to   (@altitude heading 150 from B .c) \
     to   (@altitude heading  30 from B .c) \
     close

reject

# Zero-clause BSD license by Andreas Kupreis
B: circle color red fill red
@large = 70/100 * (B .diameter)		# 70% diameter 
@small = 20/100 * (B .diameter)		# 20% diameter
box at last color white fill white width @large height @small

star-blue

# Zero-clause BSD license by Andreas Kupreis
B: circle color lightblue fill lightblue
@outer = 80/100 * (B .radius)	
@inner = @outer/3
line color white fill white \
     from (@inner heading   0 from B .c) \
     to   (@outer heading  36 from B .c) \
     to   (@inner heading  72 from B .c) \
     to   (@outer heading 108 from B .c) \
     to   (@inner heading 144 from B .c) \
     to   (@outer heading 180 from B .c) \
     to   (@inner heading 216 from B .c) \
     to   (@outer heading 252 from B .c) \
     to   (@inner heading 288 from B .c) \
     to   (@outer heading 324 from B .c) \
     close