ﾚｽ書き込み

ｽﾚへ戻る 写 ﾚｽ栞 ﾚｽ消

---

プログラミングのお題スレ Part22

PC,ｽﾏﾎ,PHSは ULA べっかんこ 公式(ｽﾏﾎ) 公式(PC) で書き込んでください｡

名前
ﾒｰﾙ
引用切替：ﾚｽｱﾝｶｰのみ
>>66 > >>64 > PowerShell (等幅フォント限定。最初は一番左上の領域が表示される。qキーで終了。Ubuntu版ではカーソルが消えない) > > $a = random (1..9999) -count 200 |% {$_ % 9 + 1} > $b = random (0..4999) -count 200 > $c = [char[][]](,(," " * 100) * 50) > 0..199 |% {$c[[Math]::Floor($b[$_] / 100)][$b[$_] % 100] = [string]$a[$_]} > $L = 0..49 |% {-join $c[$_]} > > $UI = $Host.UI.RawUI > $p, $s = $UI.CursorPosition, $UI.CursorSize > $p.y = [Math]::Min($p.y, $UI.BufferSize.Height - 23) > $x = $y = 0 > $border = "+" + "-" * 40 + "+" > while ($true) { > 　　 try {$UI.CursorSize = 0} catch {} > 　　 $UI.CursorPosition = $p > 　　 $border > 　　 0..19 |% {"|" + $L[$y + $_].SubString($x, 40) + "|"} > 　　 $border > 　　 switch ($UI.ReadKey(6).Character) { > 　　　　　"l" {if ($x -gt +0) {$x--}} > 　　　　　"r" {if ($x -lt 60) {$x++}} > 　　　　　"t" {if ($y -gt +0) {$y--}} > 　　　　　"b" {if ($y -lt 30) {$y++}} > 　　　　　"q" {try {$UI.CursorSize = $s} catch {} return} > 　　 } > }
ﾛｰｶﾙﾙｰﾙ SETTING.TXT

---

他の携帯ﾌﾞﾗｳｻﾞのﾚｽ書き込みﾌｫｰﾑはこちら｡書き込み設定で書き込みｻｲﾄの設定ができます｡
・ULA
・べっかんこ(身代わりの術)
・べっかんこ(通常)
・公式(ｽﾏﾎ)
・公式(PC)[PC,ｽﾏﾎ,PHS可]

---

書き込み設定(板別)で板別の名前とﾒｰﾙを設定できます｡

---

ﾒﾓ帳

(0/65535文字)

---

上下板覧索設栞歴

---

Google検索

Wikipedia

---

ぬこの手 ぬこTOP 0.008s