Jump to content

File:RGB color wheel 10.svg

Page contents not supported in other languages.
This is a file from the Wikimedia Commons
From Wikipedia, the free encyclopedia

Original file (SVG file, nominally 451 × 451 pixels, file size: 50 KB)

Summary

Description
English: RGB color wheel (10°) and RGB pixels
Date
Source Own work
Author László Németh
Other versions
SVG development
InfoField
 
The SVG code is valid.
 
This vector image was created with LibreOffice.
Source code
InfoField

LibreOffice code

; Created in LibreOffice 4 with this LibreLogo program.
 ; Usage: Put this code into an English language document in LibO Writer,
 ; and click on the Start icon of the View»Toolbars»Logo toolbar. 
 TO subpixel r g b size
 FILLCOLOR [r, g, b]
 RECTANGLE [size*3, size]
 END
 
 TO pixel r g b where width
 z = HEADING
 v = PENSIZE
 IF where = -1 [ ; central RGB pixel for white
 	distance = 0
 	PENCOLOR BLACK
 ] [
 	distance = 150 + 1.5 * width
 	PENCOLOR WHITE
 ]
 PENUP HEADING where-width
 FORWARD distance HEADING 3h
 PENSIZE width/5
 PENDOWN SQUARE 1.5 * width
 PENUP BACK width/2
 subpixel r 0 0 width/2 FORWARD width/2
 subpixel 0 g 0 width/2 FORWARD width/2
 subpixel 0 0 b width/2 BACK width/2
 HEADING where-width BACK distance
 HEADING z
 PENSIZE v
 END
 
 TO pie r g b where width
 FILLCOLOR [r, g, b]
 CIRCLE [300, 300, where, where + width]
 pixel r g b where width
 FILLCOLOR [r ^ 0xff, g ^ 0xff, b ^ 0xff]
 CIRCLE [300, 300, 180 + where, 180 + where + width]
 r = r^0xff
 g = g^0xff
 b = b^0xff
 pixel r g b 180+where width
 END
 
 PENDOWN HOME CLEARSCREEN HIDETURTLE
 i = INPUT Level or Enter (level = 2)
 IF i = “” [ i = 2 ] [ i = INT i ]
 PENCOLOR INVISIBLE
 
 size = 360/(12*i)
 LEFT size * 1.5
 
 ; PICTURE RGB_color_wheel_%d.svg % size [ ; from LibreOffice 4.1.1 
 PICTURE [
 FILLCOLOR BLACK CIRCLE 300 + size * 6
 FILLCOLOR WHITE CIRCLE 300
 
 REPEAT 2*i+1 [
 	u = (REPCOUNT-1) * 255/(2*i)
 	pie 255 255 - INT u 0 REPCOUNT * size size
 ]
 REPEAT 2*i [
 	u = REPCOUNT * 255/(2*i)
 	pie 255 0 INT u 60 + (REPCOUNT + 1) * size size 
 ]
 REPEAT 2*i-1 [
 	u = REPCOUNT * 255/(2*i)
 	pie 255 - INT u 0 255 120 + (REPCOUNT + 1) * size size 
 ]
 FILLCOLOR WHITE CIRCLE 100
 pixel 255 255 255 -1 size
 ]

Licensing

I, the copyright holder of this work, hereby publish it under the following license:
Creative Commons CC-Zero This file is made available under the Creative Commons CC0 1.0 Universal Public Domain Dedication.
The person who associated a work with this deed has dedicated the work to the public domain by waiving all of their rights to the work worldwide under copyright law, including all related and neighboring rights, to the extent allowed by law. You can copy, modify, distribute and perform the work, even for commercial purposes, all without asking permission.

Captions

Add a one-line explanation of what this file represents

Items portrayed in this file

depicts

25 June 2013

File history

Click on a date/time to view the file as it appeared at that time.

Date/TimeThumbnailDimensionsUserComment
current10:32, 6 August 2013Thumbnail for version as of 10:32, 6 August 2013451 × 451 (50 KB)Nl74fix pixel positions
22:42, 20 July 2013Thumbnail for version as of 22:42, 20 July 2013451 × 451 (50 KB)Nl74valid SVG
01:33, 25 June 2013Thumbnail for version as of 01:33, 25 June 2013451 × 451 (50 KB)Nl74User created page with UploadWizard

The following page uses this file:

Global file usage

The following other wikis use this file:

Metadata