Skip to content

Instantly share code, notes, and snippets.

View suitougreentea's full-sized avatar

suitougreentea suitougreentea

View GitHub Profile
\version "2.22.0"
#(define color5-engraver
(make-engraver
(acknowledgers
((note-head-interface engraver grob source-engraver)
(let* ((cause (event-cause grob))
(pitch (ly:prob-property cause 'pitch))
(alteration (ly:pitch-alteration pitch)))
(ly:grob-set-property! grob 'color
\version "2.22.0"
#(define color5-engraver
(make-engraver
(acknowledgers
((note-head-interface engraver grob source-engraver)
(let* ((cause (event-cause grob))
(pitch (ly:prob-property cause 'pitch))
(alteration (ly:pitch-alteration pitch)))
(ly:grob-set-property! grob 'color
@suitougreentea
suitougreentea / simutrans-advent-calendar-231215.md
Last active December 14, 2023 14:59
SimuDia-Extended リニューアルのお知らせ

SimuDia-Extended リニューアルのお知らせ

2023/12/15, りょくちゃ (@suitougreentea)

この記事は、Simutrans Advent Calendar 2023 15日目の記事です。

新しくなったSimuDia-Extended

どうもお久しぶりです…!初めましての方は初めまして。りょくちゃと申します。5年くらい前までシムトラやってたのですが、それからは全然触れず…。先日久しぶりにExtendedを触ったら、色々と進化していて驚きました。

\version "2.19.59"
cright = \change Staff = "right"
cleft = \change Staff = "left"
vil = {
\change Staff = "left"
\override Rest.staff-position = 4
}
vir = {
\version "2.19.82"
% This file provides a way to create a separate whiteout grob from existing grobs
% to make their layers separate, which is useful for whiting out overlapping grobs.
% To use it, simply \include this file and:
% 1. set whiteout-ex property of the grob you want to whiteout to #t (or thickness number).
% 2. set whiteout-layer property of the grob to a number you like
% (default -1, so you might want to set the layer of the behind grob to -2)
% whiteout styles other than outline is not supported.
@suitougreentea
suitougreentea / gist:9be3e5ac2436bd65c2835d279508e47f
Last active November 7, 2018 15:33
全部俺CTWC2018振り返りアドベントカレンダー (仮)

全部俺CTWC2018振り返りアドベントカレンダー (仮)

細かく細かく区切って25日続けようという魂胆

それでも時間がなさそうなので多分やりません

これで25個

  • 水曜日の日記
  • 木曜日の日記
Assume X-Y bounding box: [-1, 1]*[-1, 1] -> 2*2 size
Orthographic camera scale: 2*sqrt(2)=2.82843
Camera X, Y: (1, 1)
Camera Z: 2*sqrt(2)*tan(30deg)=1.63299 (<- looking at (-1, -1, 0) from (1, 1, Z))
Camera Rot: (60deg, 0deg, 135deg)
% There is an exception to this general rule: inside of an {…} construct (sequential music), the construct’s notion of the “current context” will descend whenever an element of the sequence ends in a subcontext of the previous current context. This avoids spurious creation of implicit contexts in a number of situations but means that the first context descended into will be kept alive until the end of the expression.
% In contrast, the contexts of a <<…>> construct’s (simultaneous music) expression are not carried forth, so enclosing a context creating command in an extra pair of <<…>> will keep the context from persisting through all of the enclosing {…} sequence.
% - http://lilypond.org/doc/v2.19/Documentation/notation/keeping-contexts-alive.html
\version "2.19.81"
\score {
\new Staff {
\new Voice {
\override NoteHead.stencil = ##f
@suitougreentea
suitougreentea / config.default
Last active April 27, 2018 15:27
Compile Simutrans-Extended with MinGW toolchain on Cygwin environment
CXX = i686-w64-mingw32-g++
C = i686-w64-mingw32-gcc
LD = i686-w64-mingw32-ld
SDL_CONFIG = /usr/i686-w64-mingw32/sys-root/mingw/bin/sdl-config
SDL2_CONFIG = /usr/i686-w64-mingw32/sys-root/mingw/bin/sdl2-config
BACKEND=gdi
COLOUR_DEPTH=16
OSTYPE=mingw32