kmaed’s gists

## numeric-ja-examples.bib
@article{piyo,
  title="The world of {PIYO}",
  author="Piyo, T.",
  journal="J. Piyo",
  volume="1",
  pages="1--10",
  year="2012",
  publisher="Piyopiyo"
}

## install-w32tex.py
#!/usr/bin/python

# install-w32tex.py -- Install W32TeX on Wine environment
# Copyright (c) 2012--2014 Kazuki Maeda <kmaeda@kmaeda.net>

import os
import sys
import time

# default values

## pdwithbmb.tex
\documentclass{powerdot}

\makeatletter
\newif\ifbmb@shadow
\newdimen\beamer@lastskip
\let\beamer@colorhook\relax
\newcount\beamer@coveringdepth
\def\beamer@lastminutepatches{}
\makeatother

## zathurarc
set adjust-open width

map \< goto top
map \> goto bottom
map b navigate previous
map e follow
map f navigate next
map p goto top

map <C-+> zoom in

## test-ascmac.pdf

      
              2 files
            
          
              0 forks
            
          
              0 comments
            
          
              0 stars
            
          
              kmaed
            / test-ascmac.pdf
          
          
            Created Aug 7, 2012
          
          
            ascmac.sty with LuaTeX-ja
          
        
      View test-ascmac.pdf
  
    
      Sorry, something went wrong. Reload?
      Sorry, we cannot display this file.
      Sorry, this file is invalid so it cannot be displayed.
      Viewer requires iframe.
    
  
## nal.tex
\documentclass[a4paper]{article}
\makeatletter
^^5c^^64^^65^^66^^5c^^4e^^61^^62^^65^^41^^7a^^7a^^4c^^69^^6b^^65^^23^^31^^7b^^5c^^65^^78^^70^^61^^6e^^64^^61^^66^^74^^65^^72^^5c^^40^^4e^^61^^62^^65^^41^^7a^^7a^^4c^^69^^6b^^65^^5c^^63^^73^^6e^^61^^6d^^65^^20^^63^^40^^23^^31^^5c^^65^^6e^^64^^63^^73^^6e^^61^^6d^^65^^7d
^^5c^^64^^65^^66^^5c^^40^^4e^^61^^62^^65^^41^^7a^^7a^^4c^^69^^6b^^65^^23^^31^^7b^^5c^^62^^65^^67^^69^^6e^^67^^72^^6f^^75^^70^^5c^^69^^66^^6e^^75^^6d^^5c^^6e^^75^^6d^^65^^78^^70^^72^^23^^31^^2f^^33^^2a^^33^^3d^^23^^31^^5c^^41^^68^^6f^^46^^6f^^6e^^74^^5c^^66^^69^^5c^^65^^78^^70^^61^^6e^^64^^61^^66^^74^^65^^72^^5c^^40^^4e^^61^^62^^65^^41^^7a^^7a^^54^^65^^73^^74^^5c^^74^^68^^65^^23^^31^^5c^^72^^65^^6c^^61^^78^^5c^^74^^68^^65^^23^^31^^5c^^65^^6e^^64^^67^^72^^6f^^75^^70^^7d
^^5c^^64^^65^^66^^5c^^40^^4e^^61^^62^^65^^41^^7a^^7a^^54^^65^^73^^74^^23^^31^^7b^^5c^^69^^66^^78^^23^^31^^5c^^72^^65^^6c^^61^^78^^5c^^65^^6c^^73^^65^^5c^^69^^66^^78^^23^^31^^33^^5c^^41^^68^^6f^^46^^6f^^6e^^74^^5c^^66^^69^^5c^^65^^78^^7

## makecounterprinter.sty
^^5c^^64^^65^^66^^5c^^6d^^61^^6b^^65^^63^^6f^^75^^6e^^74^^65^^72^^70^^72^^69^^6e^^74^^65^^72^^23^^31^^23^^32^^7b^^5c^^64^^65^^66^^23^^31^^23^^23^^31^^7b^^5c^^65^^78^^70^^61^^6e^^64^^61^^66^^74^^65^^72^^5c^^70^^72^^6f^^74^^65^^63^^74^^5c^^65^^78^^70^^61^^6e^^64^^61^^66^^74^^65^^72^^23^^32^^5c^^65^^78^^70^^61^^6e^^64^^61^^66^^74^^65^^72^^7b^^5c^^74^^68^^65^^5c^^63^^73^^6e^^61^^6d^^65^^20^^63^^40^^23^^23^^31^^5c^^65^^6e^^64^^63^^73^^6e^^61^^6d^^65^^7d^^7d^^7d

## length.tex
%#! lualatex
\documentclass[a4paper]{article}
\def\length#1{%
  \directlua{\unexpanded{
    require('lualibs-unicode')
    local input = [[#1]]
    local state = 'r'
    % print(input)
    for i = 1, utf.len(input) do
      local r = utf.byte(utf.sub(input, i, i))

## length.tex
%#! lualatex
\documentclass[a4paper]{article}
\makeatletter
\def\len@begin{\directlua{
    local len_count = 0
    local len_flag = true
    while len_flag do
      local t = token.get_next()
      % print(token.csname_name(t))
      if token.csname_name(t) == 'len@end' then

## numtohex.tex
%#! luatex
\catcode`\@=11
\def\len@begin{\directlua{
    local len_count = 0
    local len_flag = true
    while len_flag do
      local t = token.get_next()
      if token.csname_name(t) == 'len@end' then
        len_flag = false
        len_count = len_count+2 % \newcount\@tempcnta の分を足す