2023/12/15, りょくちゃ (@suitougreentea)
この記事は、Simutrans Advent Calendar 2023 15日目の記事です。
どうもお久しぶりです…!初めましての方は初めまして。りょくちゃと申します。5年くらい前までシムトラやってたのですが、それからは全然触れず…。先日久しぶりにExtendedを触ったら、色々と進化していて驚きました。
| \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 |
2023/12/15, りょくちゃ (@suitougreentea)
この記事は、Simutrans Advent Calendar 2023 15日目の記事です。
どうもお久しぶりです…!初めましての方は初めまして。りょくちゃと申します。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. |
| 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 |
| 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 |