kunst1080

IDENTIFICATION DIVISION.
PROGRAM-ID. PIZZA.
DATA DIVISION.
*
WORKING-STORAGE SECTION.
  01 III PIC 9(2).
*
PROCEDURE DIVISION.
MAIN-RTN.
    MOVE 1 TO III.

kunst1080

@if (1==1) /*
@echo off

if "%~1"=="" goto :USAGE
if "%~1"=="/?" goto :USAGE

:MAIN
CScript //nologo //E:JScript "%~f0" %*
If ERRORLEVEL 1 goto :USAGE
goto :eof

kunst1080

@if (1==1) /*
@CScript //nologo //E:JScript "%~f0" "%~1" "%~2"
@exit /b
@rem */
@end
function isDate(str){
	y = str.substring(0, 4);
	m = str.substring(4, 6) - 1;
	d = str.substring(6, 8);
	ymd = new Date(y, m, d);

kunst1080

Sub QuickSort(arr, idx)
	dim lstack(512)
	dim rstack(512)
	dim sp
	sp = 1
	dim ltmp, rtmp
	dim l, r, x, swap

	'0番目をpush
	lstack(0) = 0

kunst1080

体はshで出来ている
I am the bone of my sh.

血潮はsedで心はawk
Steel is my sed,and fire is my awk.

幾度のforkを越えて不敗
I have created over a thousand forks.

ただ一度のエラーもなく、

kunst1080

○○（あなたの好きなOSSの言語・もしくはLinuxディストロ）のおっかけをやって10余年が経過した。
当時大学3年生だったオレは△△（あなたの好きな何プロダクト）をやってた○○に出会い、
即効でファンになった。元々DevコンやOSSとは縁のない生活だったが、
それからは○○の為だけに生きてきたようなモンだ。
毎日○○のソースを読み、毎週勉強会へも行き、もちろんフォーラムにも参加しまくって
月3回必ず応援のコメントとpull requestを送った。イベントも全部行った。
カンファレンスで一緒に全国制覇したのも二度や三度じゃない。
ユーザー会やって二年目、セミナーで俺のハンドルを覚えてくれてた時には
嬉しくて本気で涙が出た。人生で最高の喜びだと有頂天になって、帰り道一人で吼えてた。
地元の役場の事務に就職した後も、それだけが楽しみで生きてきた。

kunst1080

I am the bone of my sh.
――― 体はshで出来ている

Steel is my sed, and fire is my awk.
血潮はsedで、心はawk

I have created over a thousand forks.
幾たびのforkを越えて不敗

Unknown to Error.

kunst1080

for /l %i in (1,1,100) do @((set/a a=%i%3,b=%i%5)>nul & if !a!!b!==00 (echo FizzBuzz) else (if !b!==0 (echo Buzz) else if !a!==0 (echo Fizz) else (echo %i)))

kunst1080

set /a n1=1,n2=1 & for /L %a in (3,1,10) do @((set /a n3=n1+n2,n1=n2,n2=n3)>nul & echo %a:!n3!)

kunst1080

2014春アニメ 視聴予定

視聴予定のものだけ

※太字斜体は録画予約がまだのもの

日曜日(Sunday)

• 24:30 BS11 一週間フレンズ。
• 25:00 サンテレビ 彼女がフラグをおられたら

月曜日(Monday)