osmatsuda’s gists

osmatsuda / main.py

Last active April 9, 2023 09:46

	import requests, time, random, traceback
	import lxml.html as HTML
	from lxml.cssselect import CSSSelector
	from concurrent.futures import ThreadPoolExecutor, as_completed
	from dataclasses import dataclass, field
	from operator import attrgetter
	from urllib.parse import urlparse
	from pathlib import Path

osmatsuda / battery-status.py

Created April 3, 2023 06:49

	#!/opt/local/bin/python
	"""
	LICENSE: Public domain
	"""
	import subprocess
	import xml.etree.ElementTree as ET

	def main():
	try:
	ioreg_result = subprocess.run(

osmatsuda / ruby-directives.py

Last active September 9, 2022 03:31

	from docutils.core import publish_string
	from docutils.nodes import TextElement, Inline, Text, unescape
	from docutils.parsers import rst
	from docutils.parsers.rst import directives
	from docutils.writers.html4css1 import Writer, HTMLTranslator
	import re

	# ruby node
	class ruby(Inline, TextElement): pass
	class rt(Inline, TextElement): pass

osmatsuda / guruguru.py

Last active November 18, 2021 04:36

	from PIL import Image, ImageDraw, ImagePalette
	from math import radians, cos, sin
	from random import random, randint

	def star_points(cx, cy, r=1):
	points = [point(d, r) for d in [0,216,72,288,144]]
	poly = [points[0],
	partway(points[0], points[4], 0.3333),
	points[2],
	partway(points[2], points[1], 0.3333),

osmatsuda / comment-box-search-forward.el

Last active October 28, 2021 08:28

	;;; comment-box-search-forward.el --- -- lexical-binding: t; --

	(require 'rect)

	(defun comment-box-search-forward (&optional line-elem bound eval-as-string)
	"Search rectangle made by comment symbols. Then evaluate the contents.
	Return a a-list like '(beginning end width height content)"
	(unless line-elem (if (and (stringp comment-start)
	(> (length comment-start) 0))
	(setq line-elem comment-start)

osmatsuda / skk-jisyo-cdbmake.py

Last active April 20, 2020 15:44

	import sys
	import re, io
	import subprocess
	import concurrent.futures
	from pathlib import Path
	from hashlib import md5

	_source_enc = 'euc-jp'
	_cdbmake = '/opt/local/bin/cdbmake'

osmatsuda / simple-httpd-utils.el

Created April 2, 2020 19:53

	;; simple-httpd-utils.el

	(require 'simple-httpd)

	(defun httpd-start-with-default-dir (&optional should-read)
	"Set the value of `httpd-root' to the value of `default-directory'.
	Then start the web server with the command (httpd-start).
	If a prefix argument SHOULD-READ is non-nil, read from the minibuffer."
	(interactive "P")
	(let ((docroot (if should-read

osmatsuda / start-simple-http-server.sh

Last active April 15, 2020 11:15

osmatsuda / org-time-stamp-this-week.el

Last active November 20, 2018 02:31

	;; org-time-stamp-this-week.el

	;; use `org-agenda-start-on-weekday`
	(require 'org-agenda)

	(defun org-time-stamp-this-week (&optional from-start-on-weekday)
	"Insert a date stamp between a week like a command `org-time-stamp`.
	By default, a week start from today to a weekend defined by Org Agenda.
	When called with a prefix argument, the start day is the day
	`org-agenda-start-on-weekday` on this week."

osmatsuda / swift.tagregexp

Last active August 8, 2017 15:46

Osamu Matsuda osmatsuda