Jump to content

File:Polgar starchess a setup.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 627 × 543 pixels, file size: 148 KB)

Summary

Description
English: Polgár’s hexagonal chess – a possible setup
Date
Source Own work
Author László Németh
SVG development
InfoField
 
The SVG code is valid.
 
This polgar starchess was created with LibreOffice.
Source code
InfoField

LibreOffice code

; Created in LibreOffice 4 with this LibreLogo program (+object to path conversion
 ; of FreeSerif chess figures of the final SVG by Inkscape for Wikipedia SVG rendering)
 ; Usage: Put this code into an English language document in LibO Writer,
 ; and click on the Start icon of the View»Toolbars»Logo toolbar.
 ; requested chess font: http://mip.noekeon.org/HTMLTTChess/chess_merida_unicode.html
 ; for other setup, positions, modify the arguments of the chess call in the end of the file
 GLOBAL FIX_SVG_EXPORT
 FIX_SVG_EXPORT = 3pt ; 3pt FOR SVG export, OR SET zero FOR other usage
 
 TO hexagon s n
         p = POSITION
         H = HEADING
         PENUP LEFT 30 FORWARD s LEFT 120 PENDOWN
         PENCOLOR BLACK FILLCOLOR WHITE
         REPEAT 6 [ FORWARD s LEFT 60 ] FILL
         PENUP POSITION p HEADING 0 LEFT 155 FORWARD 4.5*s/7 HEADING 0
         FONTCOLOR GRAY FONTSIZE 10 FONTFAMILY Nimbus Sans L LABEL n
         PENUP POSITION p HEADING H
 END
 
 TO zigzag size
 REPEAT 2 [ 
 	FORWARD size
 	RIGHT 60
 	FORWARD size
 	LEFT 60
 ]
 END
 
 TO chess WHITE BLACK
 PENCOLOR BLACK ; PENDOWN RIGHT 60
 FILLCOLOR INVISIBLE PENSIZE 2
 FILLCOLOR BLUE PENSIZE 10 PENDOWN
 HEADING 0 RIGHT 30
 size = 35
 REPEAT 6 [ zigzag size FORWARD size LEFT 60 zigzag size RIGHT 120 ] CLOSE
 LEFT 60 PENUP FORWARD size
 
 PENUP 
 PENSIZE 2
 data = {K: “♔♚”, Q: “♕♛”, R: “♖♜”, B: “♗♝”, N: “♘♞”, P: “♙♟”, o: “•••”, x: “✕✕✕”, *: “⭑⭑⭑”}
 HEADING 0
 n = 0
 figures = WHITE +   + BLACK +  
 M = SQRT size**2  (size/2)**2
 n = 0
 FOR i IN [0, 1, 4, 6, 5, 5, 6, 4, 1] [
 	PENUP RIGHT 90 FORWARD size * 1.5 LEFT 90 BACK i * 2 * M + M
 	REPEAT [1, 2, 7, 6, 5, 6, 7, 2, 1][REPCOUNT-1] [
 		n = n + 1
 		hexagon size n
                 p = [QKBRNP]%d  % n
                 what = SEARCH (p, figures)
                 IF what [
                         what = what.start()
                         FONTFAMILY Chess Merida Unicode
                         FONTSIZE 45
                         H = HEADING
                         HEADING 0 FORWARD FIX_SVG_EXPORT
                         k = data[figures[what]]
                         FONTCOLOR WHITE
                         LABEL k[2]
                         FONTCOLOR BLACK
                         LABEL k[what > COUNT WHITE]
                         BACK FIX_SVG_EXPORT HEADING H
                 ]
 
 		FORWARD M*2
 	]
 ]
 END
 
 HOME CLEARSCREEN
 PENUP POSITION [70, PAGESIZE[1]/2]
 PENJOINT MITER HIDETURTLE
 
 ; PICTURE Polgar_starchess_a_setup.svg [ ; from LibO 4.1.1
 PICTURE [
 chess K28 Q11 R4 B17 N22 P5 P12 P18 P23 P29 Q21 K10 R34 N16 B27 P9 P15 P20 P26 P33 
 ]

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

5 August 2013

File history

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

Date/TimeThumbnailDimensionsUserComment
current09:24, 5 August 2013Thumbnail for version as of 09:24, 5 August 2013627 × 543 (148 KB)Nl74User created page with UploadWizard

The following page uses this file:

Global file usage

The following other wikis use this file:

Metadata