【コマンド】2chコマンド作ってよ【/usr/bin/2ch】 (179レス)
【コマンド】2chコマンド作ってよ【/usr/bin/2ch】 http://mevius.5ch.net/test/read.cgi/unix/1019380983/
上
下
前
次
1-
新
通常表示
512バイト分割
レス栞
14: 名無しさん@お腹いっぱい。 [] 02/04/21 20:19 それってnavi2chの^c ^a k じゃないくて? bannerではダメなのか http://mevius.5ch.net/test/read.cgi/unix/1019380983/14
15: 名無しさん@お腹いっぱい。 [] 02/04/21 20:30 .bashrcにalias 2ch= 'w3m http://www.2ch.net/' とかじゃだめか。 http://mevius.5ch.net/test/read.cgi/unix/1019380983/15
16: 名無しさん@お腹いっぱい。 [sage] 02/04/21 20:40 fortuneを改造して、ここの>>1を罵倒する AAを表示するプログラムキボンヌ。 http://mevius.5ch.net/test/read.cgi/unix/1019380983/16
17: こっちでやれ。 [sage] 02/04/21 22:42 http://pc.2ch.net/test/read.cgi/linux/1011982036/ http://mevius.5ch.net/test/read.cgi/unix/1019380983/17
18: ずさー [age] 02/04/22 02:11 >>13 かなりシンプルなものを作ってみました。 % cat zusa.c #include <stdio.h> int main(int a, char *b[]) { int i, j; char buf[256]; char *get[6] = { "今だ!18番ゲットォォォォ!!", " ̄ ̄ ̄ ̄ ̄∨ ̄ ̄ ̄ (´´", " ∧ ∧ (´⌒(´", " ⊂(゚Д゚⊂⌒`つ≡≡≡(´⌒;;;≡≡≡", "  ̄ ̄ (´⌒(´⌒;;", " ズザーーーーーッ" }; printf("\n\n\n\n\n\n\n"); for (j = 10; j>=0; j--) { printf("%cM%cM%cM%cM%cM%cM", 27,27,27,27,27,27); for (i = 0; i<6; i++) { memset(buf, 0x20, sizeof(buf)); strcpy(&buf[j], get[i]); strcat(buf, " "); printf("%s\n", buf); } usleep(100000); } } /* usleep()のない人はselect()でも使ってくれ */ http://mevius.5ch.net/test/read.cgi/unix/1019380983/18
19: ずさー [sage] 02/04/22 02:14 一応uuencodeしたものもうpします。 誰かかっこよくなるように改造してくれ。 begin 664 zusa.c M(VEN8VQU9&4@/'-T9&EO+F@^"FEN="!M86EN*&EN="!A+"!C:&%R("IB6UTI M"GL*"B`@:6YT(&DL(&H["B`@8VAA<B!B=69;,C4V73L*("!C:&%R("IG971; M-ET@/2!["B`@("`BC:&"OH%),3B4U(-1@V*#9X-(@TBKJX%)@4DB+`H@("`@ M(H%0@5"!4(%0@5"!R8%0@5"!4(%`@4"!0(%`@4"!0(%`*(%,@4PB+`H@("`@ M(H%`@4"!0""!R""!R(%`@4"!0(%`@4"!0""!0(%`@4`H@4R!W"B!3"(L"B`@ M("`B@4"!0(&\*-^$1-^!O('<@4V"PH'?@=^!WRB!3('<.SL[@=^!WX'?(BP* M("`@("*!0(%`@4"!0(%`@4`@@5"!4(%`("B!3('<*(%,@=P[.R(L"B`@("`B M@4"!0(%`@4"!0(%`O=Z[WK"PL+"PKR(*("!].PH*("!P<FEN=&8H(EQN7&Y< M;EQN7&Y<;EQN(BD["B`@9F]R("AJ(#T@,3`[(&H^/3`[(&HM+2D@>PH@("`@ M<')I;G1F*"(E8TTE8TTE8TTE8TTE8TTE8TTB+"`R-RPR-RPR-RPR-RPR-RPR M-RD["B`@("!F;W(@*&D@/2`P.R!I/#8[(&DK*RD@>PH@("`@("!M96US970H M8G5F+"`P>#(P+"!S:7IE;V8H8G5F*2D["B`@("`@('-T<F-P>2@F8G5F6VI= M+"!G971;:5TI.PH@("`@("!S=')C870H8G5F+"`B("(I.PH@("`@("!P<FEN M=&8H(B5S7&XB+"!B=68I.PH@("`@?0H@("`@=7-L965P*#$P,#`P,"D["B`@ $?0I]"@`` ` end http://mevius.5ch.net/test/read.cgi/unix/1019380983/19
20: 名無しさん@お腹いっぱい。 [] 02/04/22 04:06 てきとうにいじってたら、なかなか迫力のある動きをするように なった。 端末エミュの中で Enter を押し続けて、カーソルを下の 方に移動してから実行スレ。 #include <stdio.h> int main(int a, char *b[]) { int i, j; char buf[256]; int sleep_time = 800; int delta = 50; char *get[] = { "今だ!18番ゲットォォォォ!!", " ̄ ̄ ̄ ̄ ̄∨ ̄ ̄ ̄ ", " ∧ ∧ ", " ⊂(゚Д゚⊂⌒`つ ", "  ̄ ̄ ", }; printf("\n\n\n\n\n\n\n"); for (j = 40; j>=0; j--) { printf("%cM%cM%cM%cM%cM%cM", 27,27,27,27,27,27); for (i = 0; i<sizeof(get)/sizeof(get[0]); i++) { memset(buf, 0x20, sizeof(buf)); strcpy(&buf[j], get[i]); strcat(buf, " "); printf("%s\n", buf); } usleep(sleep_time); sleep_time += delta; delta += 50; } } http://mevius.5ch.net/test/read.cgi/unix/1019380983/20
21: 名無しさん@お腹いっぱい。 [sage] 02/04/22 09:37 ワロタ。端末にカスがのこったが http://mevius.5ch.net/test/read.cgi/unix/1019380983/21
22: 名無しさん@お腹いっぱい。 [] 02/04/22 13:27 おもしろー! なんかこれがきっかけでプログラミング始めたくなりました!! 感謝! 最後にクリアスクリーンをするためには…えーとなんかCALLしなきゃならんのかな? http://mevius.5ch.net/test/read.cgi/unix/1019380983/22
23: 名無しさん@Emacs [] 02/04/22 13:37 "18番ゲットォ" の "18" をプロセスのpidにしてみると面白いかも と言ってみるテスト。 http://mevius.5ch.net/test/read.cgi/unix/1019380983/23
24: 名無しさん@お腹いっぱい。 [] 02/04/22 14:05 "今だ!";pid用変数名;"番ゲットォォォォ!!", わ、わからん http://mevius.5ch.net/test/read.cgi/unix/1019380983/24
25: 名無しさん@お腹いっぱい。 [] 02/04/22 14:34 まさに今そういうアニメーションプログラムを X で作ってます。 あと2、3日で公開できると思うんでお待ちを。 ちょっとドキュメンテーションに時間がかかってて… http://mevius.5ch.net/test/read.cgi/unix/1019380983/25
26: 名無しさん@お腹いっぱい。 [] 02/04/22 14:41 ちなみに、スクリーンショットはこんなかんじ。 http://members.tripod.co.jp/s42335/tmp/screen1.png いまのところ、附属アプリケーションは ・ xclockのかわりになるギコ猫時計、 ・ メール到着を知らせる「もう来ねえよ!」(アニメーションは切り換え可能) ・ マウスポインタを追いかけるぃょぅ ・ しばらくマウスを動かさないと踊りだすイマノウチ とゆー感じ。要Python。 http://mevius.5ch.net/test/read.cgi/unix/1019380983/26
27: 名無しさん@お腹いっぱい。 [] 02/04/22 16:00 ほんとにちょっとだけ期待あげ http://mevius.5ch.net/test/read.cgi/unix/1019380983/27
28: 名無しさん@お腹いっぱい。 [sage] 02/04/22 19:36 alias 2ch w3m 2ch.net 以上 http://mevius.5ch.net/test/read.cgi/unix/1019380983/28
29: 名無しさん@お腹いっぱい。 [sage] 02/04/22 20:33 >>28 俺はこんな alias 2ch w3m http://www6.ocn.ne.jp/~mirv/2chmenu.html http://mevius.5ch.net/test/read.cgi/unix/1019380983/29
30: [] 02/04/22 21:52 http://tmp.2ch.net/test/read.cgi/download/1019446859/ 皆さんの力で助けて下さい。 http://mevius.5ch.net/test/read.cgi/unix/1019380983/30
31: 名無しさん@お腹いっぱい。 [sage] 02/04/22 23:58 begin 644 zusa.c.gz M'XL("+XCQ#P``WIU<V$N8P!]4DU+PT`0/2>_8H@H&QLU%JM"K6<O_H(8)$VV M=DN2EF0+5NF/V6@0BPAZ]%`$/12]>_2W.)MLF_J!LYME>//F);-Y*RSVPV%` MX2#E`>MO=@_UE0H:I5M\-*#I=W@8,R3_H/(@9&V)Z2SF$'DL)C+Q+/"[7@+K M;<<U]4M=DR"SH-?4M:+0'G:<>F/7;9:E-*1T<,I91*$%^[:MX("&W$.D(8$! M"TXYX#G76#^CW'&QC/J:\71U_2PFJ\'L(W_,7_)9?ELN,1$3`,.2'/$P7]F[ MR@0L0G&*@.P-MU#Q%R>;$G%WDXN[;)I]BOOKUP5M64?U_WR5XL"_(3EC'+88 M'<?$<3$A)D+XBSB-B.&'U$L,1)"3X(UUB+'J.SMV<_O(L.I[DCK'3^+E)7NT M3C\!TD-E;(#>84N>&QMF<9^5W/'O+;5_;RE9:C+41#%VD+(+VN\0_')SJ\H= MVS6Q6JN5K](B&J64$_2$!?9YW;9`<1$Q"U4MY8D_&)$UZ9N>:\F[<)A;U3S5 M;H":;3&!A/':"FR,S[#P&JD<5U26#%AKE;Z3<&G`FG+@6!_K7P:4VS0Z`P`` ` end なんとなく改造して見たり。ていうか >>26 さん公開キボンヌ。 http://mevius.5ch.net/test/read.cgi/unix/1019380983/31
32: 名無しさん@お腹いっぱい。 [sage] 02/04/23 02:08 >>22 printf("%c[2J", 27); さらにカーソルを上にやるなら printf("%c[2J%c[0;0H", 27,27); http://mevius.5ch.net/test/read.cgi/unix/1019380983/32
33: 名無しさん@お腹いっぱい。 [] 02/04/23 23:30 #!/bin/sh banner 2ch http://mevius.5ch.net/test/read.cgi/unix/1019380983/33
34: 名無しさん@お腹いっぱい。 [] 02/04/23 23:49 2chコマンドってブラウザだろ? http://mevius.5ch.net/test/read.cgi/unix/1019380983/34
35: [] 02/04/23 23:59 豊橋ギコ大製のxmascotの2ch版がいいな(ギコとかモナーとか) アラームしていしとくと「オマエモナー」っていうの♪ http://mevius.5ch.net/test/read.cgi/unix/1019380983/35
36: 名無しさん@お腹いっぱい。 [sage] 02/04/24 02:25 banner -w 60 "(w" http://mevius.5ch.net/test/read.cgi/unix/1019380983/36
37: 名無しさん@お腹いっぱい。 [] 02/04/25 17:18 http://members.tripod.co.jp/s42335/gikot/ http://mevius.5ch.net/test/read.cgi/unix/1019380983/37
38: perlだけど [sage] 02/04/25 19:38 #!/usr/bin/perl $niget=" ∧∧ 三= (゚Д゚) 三二= ⊂\⊂\三二= @ @  ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ 0 ∧∧ 三= (゚Д゚) 三二= ⊂\⊂\三二= @ @  ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ 0 ∧∧ 三= (゚Д゚) 三二= ⊂\⊂\三二= @ @  ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ 0 ∧∧ (゚Д゚) ⊂\⊂\ノミ し しミミ ミミ  ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ http://mevius.5ch.net/test/read.cgi/unix/1019380983/38
39: perlだけど [sage] 02/04/25 19:39 0 ∧∧ )=、 ⊂(゚Д゚⊂⌒`つ三ミ  ̄ ̄  ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ 0 ∧∧ ) ⊂(゚Д゚⊂⌒`つ  ̄ ̄  ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ 0 ∧∧ ) ⊂(゚Д゚⊂⌒`つ  ̄ ̄  ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ 0 2番  ̄ ̄ ̄ ̄ ̄∨ ̄ ̄ ̄ ∧∧ ) (´ ⊂(゚Д゚⊂⌒`つ≡(´⌒;;; ズ  ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ (´⌒;; ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ 0 2番ゲット  ̄ ̄ ̄ ̄ ̄∨ ̄ ̄ ̄ ∧∧ ) (´⌒(´ ⊂(゚Д゚⊂⌒`つ≡≡(´⌒; ズザ  ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ (´⌒(´⌒ ;;; ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ 0 2番ゲットォォォォ!!  ̄ ̄ ̄ ̄ ̄∨ ̄ ̄ ̄ (´´ ∧∧ ) (´⌒(´ ⊂(゚Д゚⊂⌒`つ≡≡≡(´⌒;;;(´⌒ ズザ-----ッ  ̄ ̄ ̄ ̄ ̄ ̄ ̄ (´⌒(´⌒;; (´⌒;; ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ E"; http://mevius.5ch.net/test/read.cgi/unix/1019380983/39
40: perlだけど [sage] 02/04/25 19:39 &aaa($niget); sub aaa { local($frames) = @_; @lines = split /\n/, $frames; $linenum = @lines; $fnum = 0; $lnum = 0; for ($i = 0; $i < $linenum; $i++) { $_ = $lines[$i]; if (/^[0-9]/) { $bline = &bs($lnum); $aaf[$fnum][$lnum-1] .= $bline; $fnum++; $lnum = 0; } elsif ($lines[$i] eq "E") { $bline = &bs($lnum); $aaf[$fnum][$lnum-1] .= $bline; $fnum++; } else { $aaf[$fnum][$lnum] = $lines[$i] . "\n"; $lnum++; } } for ($i=0;$i<$fnum;$i++) { for($j=0;$j<300;$j++) { for ($k=0;$k<$lnum;$k++) { print $aaf[$i][$k]; } } } } sub bs { local($num) = @_; local($bs) = ""; local($i); for ($i = 0; $i < $num; $i++) { $bs = $bs . "A\r"; } return $bs; } http://mevius.5ch.net/test/read.cgi/unix/1019380983/40
41: 名無しさん@お腹いっぱい。 [sage] 02/04/25 22:08 ん?コピペミスか? 無限ループする・・・ http://mevius.5ch.net/test/read.cgi/unix/1019380983/41
42: 名無しさん@お腹いっぱい。 [sage] 02/04/25 22:22 >>41 そういうアニメーションなんじゃない? http://mevius.5ch.net/test/read.cgi/unix/1019380983/42
43: perlだけど [sage] 02/04/26 00:18 ごめん。 ケツから4行目は、 $bs = $bs . "A\r"; ではなくて、 $bs = $bs . "^[[A\r"; ですた。 こぴぺしたときにエスケープが消えた。 emacsとかで [Ctrl+Q], [ESC], "[", "A" と入力してくだされ。 kterm上で横幅80桁くらいにとって実行。 "゚" は半角カナなんで rxvt ではうまく表示されないかも。 お目汚ししつれいしますた。 http://mevius.5ch.net/test/read.cgi/unix/1019380983/43
メモ帳
(0/65535文字)
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 136 レスあります
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.006s