[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/arbitools 9de6cfe 01/29: [ELPA] new package: arbitools
From: |
Stefan Monnier |
Subject: |
[elpa] externals/arbitools 9de6cfe 01/29: [ELPA] new package: arbitools |
Date: |
Sun, 29 Nov 2020 19:00:32 -0500 (EST) |
branch: externals/arbitools
commit 9de6cfe146b5ea50532fca15cbbad35553d28791
Author: David Gonzalez Gandara <dggandara@member.fsf.org>
Commit: David Gonzalez Gandara <dggandara@member.fsf.org>
[ELPA] new package: arbitools
---
arbitools.el | 138 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
1 file changed, 138 insertions(+)
diff --git a/arbitools.el b/arbitools.el
new file mode 100644
index 0000000..6e0a467
--- /dev/null
+++ b/arbitools.el
@@ -0,0 +1,138 @@
+;;; arbitools.el --- Package for chess tournaments administration
+
+;; Copyright 2014 David González Gándara
+
+;; This program is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+;;
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+;; GNU General Public License for more details.
+;;
+;; You should have received a copy of the GNU General Public License
+;; along with this program. If not, see <http://www.gnu.org/licenses/>.
+
+;;;Commentary:
+
+;; REQUIRES:
+;; ---------------------------
+;;
+;;
+;; USAGE:
+;; ---------------------------
+;;
+
+;;; Code:
+
+
+
+(defun arbitools-update (list)
+ (interactive "slist:")
+ (shell-command (concat "arbitools-update.py" " -l " list " -i "
buffer-file-name)))
+
+(defun arbitools-add (addfile)
+ (interactive "saddfile: ")
+ (shell-command (concat "arbitools-add.py" " -a " addfile " -i "
buffer-file-name)))
+
+(defun arbitools-standings ()
+ (interactive)
+ ;(shell-command (concat (expand-file-name "arbitools-standings.py") " -i "
buffer-file-name))) ;this is to use the actual path
+ (shell-command (concat "arbitools-standings.py" " -i " buffer-file-name)))
+
+(defvar arbitools-highlights
+ '(
+ ("^001" . font-lock-function-name-face) ;name of the tournament
+ ;("\\( b \\)\\|\\( w \\)\\|\\( - \\)" . font-lock-keyword-face) ;colour
+ ;("\\( 1 \\)\\|\\( 0 \\)\\|\\( = \\)". font-lock-type-face) ;results
+ ("^012.*" . font-lock-comment-face)
+
("\\(^022\\|^032\\|^042\\|^052\\|^062\\|^072\\|^082\\|^092\\|^102\\|^112\\|^122\\).*"
. font-lock-constant-face)
+ ("^132.*" . font-lock-warning-face) ;dates
+
+ ("^013" . font-lock-warning-face) ;teams
+ ("\\(^013.\\{1\\}\\)\\(.\\{31\\}\\)" 2 font-lock-comment-face) ; teams
+
+ ;(" [0-9]\\{6,\\} " . font-lock-variable-name-face) ;FIDE ID
+ ("\\(^001.\\{11\\}\\)\\(.\\{32\\}\\)" 2 font-lock-string-face) ;Name
of the player (by position)
+ ("\\(^001.\\{55\\}\\)\\(.\\{10\\}\\)" 2 font-lock-function-name-face)
;FIDE ID
+
+ ("\\(^001.\\{88\\}\\)\\(.\\{4\\}\\)" 2 font-lock-comment-face) ;round
1 opponent
+ ;("\\(^132.\\{88\\}\\)\\(.\\{8\\}\\)" 2 font-lock-string-face) ;round
1 date line
+ ("\\(^001.\\{93\\}\\)\\(.\\{1\\}\\)" 2 font-lock-string-face) ;round 1
colour
+ ("\\(^001.\\{95\\}\\)\\(.\\{1\\}\\)" 2 font-lock-function-name-face)
;round 1 result
+ ;rest of rounds
+ ("\\(^001.\\{98\\}\\)\\(.\\{4\\}\\)" 2 font-lock-comment-face)
+ ;("\\(^132.\\{98\\}\\)\\(.\\{8\\}\\)" 2 font-lock-string-face)
+ ("\\(^001.\\{103\\}\\)\\(.\\{1\\}\\)" 2 font-lock-string-face)
+ ("\\(^001.\\{105\\}\\)\\(.\\{1\\}\\)" 2 font-lock-function-name-face)
+
+ ("\\(^001.\\{108\\}\\)\\(.\\{4\\}\\)" 2 font-lock-comment-face)
+ ;("\\(^132.\\{108\\}\\)\\(.\\{8\\}\\)" 2 font-lock-string-face)
+ ("\\(^001.\\{113\\}\\)\\(.\\{1\\}\\)" 2 font-lock-string-face)
+ ("\\(^001.\\{115\\}\\)\\(.\\{1\\}\\)" 2 font-lock-function-name-face)
+
+ ("\\(^001.\\{118\\}\\)\\(.\\{4\\}\\)" 2 font-lock-comment-face)
+ ;("\\(^132.\\{118\\}\\)\\(.\\{8\\}\\)" 2 font-lock-string-face)
+ ("\\(^001.\\{123\\}\\)\\(.\\{1\\}\\)" 2 font-lock-string-face)
+ ("\\(^001.\\{125\\}\\)\\(.\\{1\\}\\)" 2 font-lock-function-name-face)
+
+ ("\\(^001.\\{128\\}\\)\\(.\\{4\\}\\)" 2 font-lock-comment-face)
+ ;("\\(^132.\\{128\\}\\)\\(.\\{8\\}\\)" 2 font-lock-string-face)
+ ("\\(^001.\\{133\\}\\)\\(.\\{1\\}\\)" 2 font-lock-string-face)
+ ("\\(^001.\\{135\\}\\)\\(.\\{1\\}\\)" 2 font-lock-function-name-face)
+
+ ("\\(^001.\\{138\\}\\)\\(.\\{4\\}\\)" 2 font-lock-comment-face)
+ ;("\\(^132.\\{138\\}\\)\\(.\\{8\\}\\)" 2 font-lock-string-face)
+ ("\\(^001.\\{143\\}\\)\\(.\\{1\\}\\)" 2 font-lock-string-face)
+ ("\\(^001.\\{145\\}\\)\\(.\\{1\\}\\)" 2 font-lock-function-name-face)
+
+ ("\\(^001.\\{148\\}\\)\\(.\\{4\\}\\)" 2 font-lock-comment-face)
+ ;("\\(^132.\\{148\\}\\)\\(.\\{8\\}\\)" 2 font-lock-string-face)
+ ("\\(^001.\\{153\\}\\)\\(.\\{1\\}\\)" 2 font-lock-string-face)
+ ("\\(^001.\\{155\\}\\)\\(.\\{1\\}\\)" 2 font-lock-function-name-face)
+
+ ("\\(^001.\\{158\\}\\)\\(.\\{4\\}\\)" 2 font-lock-comment-face)
+ ;("\\(^132.\\{158\\}\\)\\(.\\{8\\}\\)" 2 font-lock-string-face)
+ ("\\(^001.\\{163\\}\\)\\(.\\{1\\}\\)" 2 font-lock-string-face)
+ ("\\(^001.\\{165\\}\\)\\(.\\{1\\}\\)" 2 font-lock-function-name-face)
+
+ ("\\(^001.\\{168\\}\\)\\(.\\{4\\}\\)" 2 font-lock-comment-face)
+ ;("\\(^132.\\{168\\}\\)\\(.\\{8\\}\\)" 2 font-lock-string-face)
+ ("\\(^001.\\{173\\}\\)\\(.\\{1\\}\\)" 2 font-lock-string-face)
+ ("\\(^001.\\{175\\}\\)\\(.\\{1\\}\\)" 2 font-lock-function-name-face)
+
+ ("\\(^001.\\{178\\}\\)\\(.\\{4\\}\\)" 2 font-lock-comment-face)
+ ;("\\(^132.\\{178\\}\\)\\(.\\{8\\}\\)" 2 font-lock-string-face)
+ ("\\(^001.\\{183\\}\\)\\(.\\{1\\}\\)" 2 font-lock-string-face)
+ ("\\(^001.\\{185\\}\\)\\(.\\{1\\}\\)" 2 font-lock-function-name-face)
+
+ ("\\(^001.\\{188\\}\\)\\(.\\{4\\}\\)" 2 font-lock-comment-face)
+ ;("\\(^132.\\{188\\}\\)\\(.\\{8\\}\\)" 2 font-lock-string-face)
+ ("\\(^001.\\{193\\}\\)\\(.\\{1\\}\\)" 2 font-lock-string-face)
+ ("\\(^001.\\{195\\}\\)\\(.\\{1\\}\\)" 2 font-lock-function-name-face)
+
+ ("\\(^001.\\{198\\}\\)\\(.\\{4\\}\\)" 2 font-lock-comment-face)
+ ;("\\(^132.\\{198\\}\\)\\(.\\{8\\}\\)" 2 font-lock-string-face)
+ ("\\(^001.\\{203\\}\\)\\(.\\{1\\}\\)" 2 font-lock-string-face)
+ ("\\(^001.\\{205\\}\\)\\(.\\{1\\}\\)" 2 font-lock-function-name-face)
+
+
+ ;("[a-zA-Z,]\\{4,\\}" . font-lock-string-face)
+ )
+)
+
+;;;###autoload
+(define-derived-mode arbitools-mode
+ fundamental-mode
+ "arbitools-mode"
+ "Major mode for Chess Tournament Management"
+ ;(setq font-lock-defaults '(arbitools-highlights))
+ (set (make-local-variable 'font-lock-defaults) '(arbitools-highlights))
+
+)
+
+(provide 'arbitools-mode)
+
+;;; arbitools.el end here
- [elpa] branch externals/arbitools created (now 62fe08e), Stefan Monnier, 2020/11/29
- [elpa] externals/arbitools 9de6cfe 01/29: [ELPA] new package: arbitools,
Stefan Monnier <=
- [elpa] externals/arbitools 5a67c19 03/29: [ELPA]: new package: arbitools, Stefan Monnier, 2020/11/29
- [elpa] externals/arbitools 46d5669 04/29: * packages/arbitools.el: correct code syntax issues, Stefan Monnier, 2020/11/29
- [elpa] externals/arbitools 538ccb4 02/29: [ELPA]: new package: arbitools, Stefan Monnier, 2020/11/29
- [elpa] externals/arbitools 37119b0 05/29: * arbitools/arbitools.el: Fix checkdoc warnings and quoting problems, Stefan Monnier, 2020/11/29
- [elpa] externals/arbitools eb1011a 07/29: * packages/arbitools: added some new functions and menus, Stefan Monnier, 2020/11/29
- [elpa] externals/arbitools dd5ddb9 08/29: * packages/arbitools: endoffile bug fixed, Stefan Monnier, 2020/11/29
- [elpa] externals/arbitools b61035e 13/29: packages/arbitools.el: Added new functions, Stefan Monnier, 2020/11/29
- [elpa] externals/arbitools 16a125c 12/29: packages/arbitools.el: Applied suggestions, improved functions, Stefan Monnier, 2020/11/29
- [elpa] externals/arbitools a833441 10/29: * packages/arbitools: Add functions and menus, Stefan Monnier, 2020/11/29
- [elpa] externals/arbitools 34c912c 20/29: *arbitools.el: Some functions improved, Stefan Monnier, 2020/11/29