|
|
便利なツール Emacs らくらく 入門
|
|
Namazu for hns による簡易全文検索 詳しくは 詳細指定/ヘルプを参照して下さい |
|||||||||||||||||||||||||||||||||||||||||||||
2026年02月28日(土) 旧暦 [n年日記] [更新:"2004/08/09 23:43:33"]#1 [gimp] my first script-fu
(GIMP 2.10)
Put fullowing code on ~/.config/GIMP/2.10/script directory
And try:
Filters
Script-Fu > Refresh script
File
Create >
Text >
Text Box
(script-fu-register
"script-fu-text-box" ;func name
"363 Text Box" ;menu label
"Creates a simple text box, sized to fit\
around the user's choice of text,\
font, font size, and color." ;description
"Michael Terry" ;author
"copyright 1997, Michael Terry;\
2009, the GIMP Documentation Team" ;copyright notice
"October 27, 1997" ;date created
"" ;image type that the script works on
SF-STRING "Text" "Text Box" ;a string variable
SF-FONT "Font" "Charter" ;a font variable
SF-ADJUSTMENT "Font size" '(49 1 1000 1 10 0 1)
;a spin-button
SF-COLOR "Color" '(0 0 0) ;color variable
SF-ADJUSTMENT "Buffer amount" '(30 0 100 1 10 1 0)
;a slider
)
(script-fu-menu-register "script-fu-text-box" "<Image>/File/Create/Text")
(define (script-fu-text-box inText inFont inFontSize inTextColor inBufferAmount)
(let*
(
; define our local variables
; create a new image:
(theImageWidth 10)
(theImageHeight 10)
(theImage)
(theImage
(car
(gimp-image-new
theImageWidth
theImageHeight
RGB
)
)
)
(theText) ;a declaration for the text
(theBuffer) ;create a new layer for the image
(theLayer
(car
(gimp-layer-new
theImage
theImageWidth
theImageHeight
RGB-IMAGE
"layer 1"
100
LAYER-MODE-NORMAL
)
)
)
) ;end of our local variables
(gimp-image-add-layer theImage theLayer 0)
(gimp-context-set-background '(255 255 255) )
(gimp-context-set-foreground inTextColor)
(gimp-drawable-fill theLayer BACKGROUND-FILL)
(set! theText
(car
(gimp-text-fontname
theImage theLayer
0 0
inText
0
TRUE
inFontSize PIXELS
"Sans")
)
)
(set! theImageWidth (car (gimp-drawable-width theText) ) )
(set! theImageHeight (car (gimp-drawable-height theText) ) )
(set! theBuffer (* theImageHeight (/ inBufferAmount 100) ) )
(set! theImageHeight (+ theImageHeight theBuffer theBuffer) )
(set! theImageWidth (+ theImageWidth theBuffer theBuffer) )
(gimp-image-resize theImage theImageWidth theImageHeight 0 0)
(gimp-layer-resize theLayer theImageWidth theImageHeight 0 0)
(gimp-layer-set-offsets theText theBuffer theBuffer)
(gimp-display-new theImage)
(list theImage theLayer theText)
)
)
( つっこみ )
2026年01月29日(木) 旧暦 [n年日記] [更新:"2004/08/09 23:43:33"]#1 [Opera] Die Fledermaus at New National theatre 2026/01/29
CREATIVE TEAM
( つっこみ )
2025年12月25日(木) 旧暦 [n年日記] [更新:"2004/08/09 23:43:33"]#1 [pkgsrc] pbulk 11.99.3 (emacs30)![]() pkgsrc bulk build report ======================== NetBSD 11.99.3/x86_64 Compiler: gcc Build start: 2025-12-25 15:30 Build end: 2025-12-26 14:13 Full report: Machine readable version: http://www.pkgsrc-box.org/... Total number of packages: 1099 Successfully built: 1081 Failed to build: 3 Depending on failed package: 2 Explicitly broken or masked: 5 of which invalid dependencies: 0 Depending on masked package: 8 Packages breaking the most other packages Package Breaks Maintainer ------------------------------------------------------------------------- inputmethod/tamago-tsunagi 3 pkgsrc-users@NetBSD.org wip/R 3 pkgsrc-users@NetBSD.org wip/tc 3 makoto@ki.nu Build failures Package Breaks Maintainer ------------------------------------------------------------------------- inputmethod/tamago-tsunagi 3 pkgsrc-users@NetBSD.org wip/R 3 pkgsrc-users@NetBSD.org wip/tc 3 makoto@ki.nuFirefox 146.0.1 has been successfully packaged ( つっこみ )
2025年11月22日(土) 旧暦 [n年日記] [更新:"2004/08/09 23:43:33"]#1 [NetBSD] crash dumpgw5@makoto 08:17:01/251122(/export/core)% sudo crash -M netbsd.1.core -N netbsd.1 Crash version 9.4, image version 9.4. System panicked: trap Backtrace from time of crash is available. crash> bt _KERNEL_OPT_NARCNET() at 0 ?() at ffffdd0067558000 vpanic() at vpanic+0x169 snprintf() at snprintf startlwp() at startlwp calltrap() at calltrap+0x11 mutex_vector_enter() at mutex_vector_enter+0x91 ipf_nat_delete() at ipf_nat_delete+0x1b6 ipf_nat_flush_entry() at ipf_nat_flush_entry+0xe ipf_queueflush() at ipf_queueflush+0x13d ipf_nat_expire() at ipf_nat_expire+0x19b ipf_slowtimer() at ipf_slowtimer+0x29 ipf_timer_func() at ipf_timer_func+0x2d callout_softclock() at callout_softclock+0x281 softint_dispatch() at softint_dispatch+0xab DDB lost frame for Xsoftintr+0x4f, trying 0xffffdd006755b0f0 Xsoftintr() at Xsoftintr+0x4f --- interrupt --- 0: crash> ( つっこみ )
2025年10月25日(土) 旧暦 [n年日記] [更新:"2004/08/09 23:43:33"]#1 [raid] recover from disk error
2T x 2 is raid1 mirrored
u# /sbin/raidctl -s raid0
Components:
/dev/wd1a: optimal
/dev/wd0a: optimal
No spares.
Component label for /dev/wd1a:
Row: 0, Column: 0, Num Rows: 1, Num Columns: 2
Version: 2, Serial Number: 377401575, Mod Counter: 512
Clean: No, Status: 0
sectPerSU: 32, SUsPerPU: 1, SUsPerRU: 1
Queue size: 100, blocksize: 512, numBlocks: 3907029088
RAID Level: 1
Autoconfig: Yes
Root partition: Soft
Last configured as: raid0
Component label for /dev/wd0a:
Row: 0, Column: 1, Num Rows: 1, Num Columns: 2
Version: 2, Serial Number: 377401575, Mod Counter: 512
Clean: No, Status: 0
sectPerSU: 32, SUsPerPU: 1, SUsPerRU: 1
Queue size: 100, blocksize: 512, numBlocks: 3907029088
RAID Level: 1
Autoconfig: Yes
Root partition: Soft
Last configured as: raid0
Parity status: clean
Reconstruction is 100% complete.
Parity Re-write is 100% complete.
Copyback is 100% complete.
( つっこみ )
|
最近の日記 2026年02月28日 ・my first script-fu 2026年01月29日 ・Die Fledermaus at New National theatre 2026/01/29 2025年12月25日 ・pbulk 11.99.3 (emacs30) 2025年11月22日 ・crash dump 2025年10月25日 ・recover from disk error | ||||||||||||||||||||||||||||||||||||||