[表示 : 全て 最新50 1-99 101- 201- 301- 401- 2ch.scのread.cgiへ]
Update time : 05/17 19:09 / Filesize : 125 KB / Number-of Response : 402
[このスレッドの書き込みを削除する]
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧] [類似スレッド一覧]


↑キャッシュ検索、類似スレ動作を修正しました、ご迷惑をお掛けしました

七行プログラミング part6



1 名前:デフォルトの名無しさん mailto:sage [2008/07/06(日) 23:00:49 .net]
7行×79文字なら言語は問いません。
過去作品は、もしかしたら>>2-10あたりに。

前スレ
pc11.2ch.net/test/read.cgi/tech/1142467359/
part4
pc8.2ch.net/test/read.cgi/tech/1051703369/
part 3
pc2.2ch.net/tech/kako/1033/10331/1033143528.html
part 2
pc3.2ch.net/tech/kako/1018/10188/1018840143.html
part 1
pc.2ch.net/tech/kako/984/984182993.html

2 名前:デフォルトの名無しさん mailto:sage [2008/07/06(日) 23:12:00 .net]
>>1

3 名前:デフォルトの名無しさん mailto:sage [2008/07/06(日) 23:20:55 .net]
>>1

4 名前:デフォルトの名無しさん mailto:sage [2008/07/06(日) 23:26:19 .net]
●作品集
pc2.2ch.net/test/read.cgi/tech/1033143528/5-15,25

Part 2
pc3.2ch.net/test/read.cgi/tech/1018840143/900-906

Part 4
pc8.2ch.net/test/read.cgi/tech/1051703369/993-995

Part 5
pc11.2ch.net/test/read.cgi/tech/1142467359/982-984

5 名前:デフォルトの名無しさん mailto:sage [2008/07/07(月) 13:42:19 .net]
↓7行で乙

6 名前:デフォルトの名無しさん [2008/07/07(月) 19:05:55 .net]
print'''■■■■■■■__
_____■___
___■■____
_■■______
■_______■
■_______■
_■■■■■■■_'''

7 名前:デフォルトの名無しさん [2008/07/07(月) 19:51:21 .net]
g=:(],],.])^:[(' '(<2 1)}]\4$' *')"_

シェルピンスキーのギャスケット in J

8 名前:デフォルトの名無しさん mailto:sage [2008/07/07(月) 19:59:15 .net]
alert('\u003e\u003e\u0031\u000a\u4E59')

9 名前:デフォルトの名無しさん mailto:sage [2008/07/07(月) 21:10:27 .net]
<body id=D onkeydown=K=event.keyCode-38 onload="Z=X=[B=A=12];function Y(){for(C
=[q=c=i=4];f=i--*K;c-=!Z[h+(K+6?p+K:C[i]=p*A-(p/9|0)*145)])p=B[i];for(c?0:K+6?h
+=K:t?B=C:0;i=K=q--;f+=Z[A+p])k=X[p=h+B[q]]=1;h+=A;if(f|B)for(Z=X,X=[l=228],B=[
[-7,-20,6,h=17,-9,3,3][t=++t%7]-4,0,1,t-6?-A:2];l--;)for(l%A?l-=l%A*!Z[l]:(P+=
k++,c=l+=A);--c>A;)Z[c]=Z[c-A];for(S=P;i<240;S+=X[i]|(X[i]=Z[i]|=++i%A<2|i>228)
?'':'Q')i%A||(S+='\n');D.innerText=S;Z[5]||setTimeout(Y,i-P)}Y(h=K=t=P=0)">

10 名前:デフォルトの名無しさん mailto:sage [2008/07/07(月) 21:37:11 .net]
B=:'0123456789+/',~a.{~,(a.i.'Aa')+/i.26
enc=:3 :'(B{~#._6[\,(8#2)#:a.i.y),(0 2 1 i.3|#y)#''='''
dec=:3 :'(a.{~#._8[\,(6#2)#:B i.y)}.~_2>.(i.&''=''-#)y'

BASE64エンコード&デコード in J



11 名前:デフォルトの名無しさん mailto:sage [2008/07/07(月) 22:06:01 .net]
>>9
なにこれ

12 名前:デフォルトの名無しさん mailto:sage [2008/07/07(月) 22:09:14 .net]
前スレで7行ASMってネタ出てたけど、実際どこまで出来るものかな?


13 名前:デフォルトの名無しさん [2008/07/07(月) 22:33:45 .net]
org 100h
mov ah,9
mov dx,msg
int 21h
mov ax,4c00h
int 21h
msg db "Hello, world!$"

7行でHello, world!

14 名前:デフォルトの名無しさん mailto:sage [2008/07/07(月) 22:39:18 .net]
アセンブリはCPUやコンパイラやOSによってかなり依存するからなぁ
>>13はx86/DOS/NASMか

15 名前: mailto:sage [2008/07/07(月) 23:00:18 .net]
codepad.org/LN7ZIsBO

↑こういうコードがかけるらしい。qsortの第4引数が

int strcmp(const char**a, const char**b) {
while(**a == **b) {
if(**a == '\0')
return 0;
(*a)++; (*b)++;
}
return **a - **b;
}

をコンパイルしたコードだとか。C言語で無名関数を渡す方法は他にもあるのかな?
こういうのもゴルフのテクニックのひとつ?

16 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 00:03:40 .net]
>>15
partIあたりに、

int main=0xc3;

ってのがあったぜ。

>15にしろ上のコードにしろ、実行環境依存するから美しくはないが
面白い発想ではあるな

17 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 01:09:18 .net]
もう機械語でいいじゃん

18 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 01:17:39 .net]
短くならなくね?

19 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 02:31:19 .net]
diffとpatchコマンドをそれぞれWin32用に7行でってのは既出ネタかな。
もしまだだったら面白そうだからやってみようと思ってたり。

暇な人用仕様を念のため。

・Cベースのパッチ作成&適用ツール
・差分ファイルのフォーマットは自由。7行diffで書き出した差分ファイルで7行patchが正常に動けばOK。
・テキスト関連の機能はなし。あくまでも差分書き出しと差分適用に限定。
・ディレクトリ差分、複数ファイルの差分をひとつの差分ファイルにまとめる機能も省略。

差分作成:diff.exe old.exe new.exe update.diff
差分適用:patch.exe old.exe update.diff

このネタのミソは、いかに差分を小さくする工夫があるか(同一パターンの発見精度の高さ)だよなぁ


20 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 03:50:25 .net]
ん?

/*diff.c*/
#include<windows.h>
main(int c,char**v){CopyFile(v[2],v[3],1);}

/*patch.c*/
#include<windows.h>
main(int c,char**v){CopyFile(v[2],v[1],0);}



21 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 03:56:57 .net]
それは無関係なファイルも上書きしてしまうからパッチになってない。

22 名前: mailto:sage [2008/07/08(火) 04:16:16 .net]
codepad.org/xZjkIm7R
asmも使えることを確認した。実行環境依存のものだけはここで通るように条件つけたら?

23 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 04:37:10 .net]
なんで特定のOSや特定のCPUに限定する必要があるのか理解できん

24 名前: mailto:sage [2008/07/08(火) 04:38:34 .net]
codepad.org/fozoQIdR
前スレのを試してみた。
pc11.2ch.net/test/read.cgi/tech/1142467359/879

25 名前: mailto:sage [2008/07/08(火) 04:42:13 .net]
>>23
前スレで#include <windows.h> を連発されてウザかったから。

26 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 04:43:33 .net]
unix板でも篭ってれば見なくて済むよ。

27 名前: mailto:sage [2008/07/08(火) 04:45:55 .net]
>>26
提案しただけで命令したわけではないし、>>26にUNIX板の使用を強制されるいわれもない。

28 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 04:46:35 .net]
アドバイスしただけ

29 名前: mailto:sage [2008/07/08(火) 04:48:59 .net]
とてもそういう風には読めないね。

30 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 04:56:32 .net]
文章力がないだけだな



31 名前: mailto:sage [2008/07/08(火) 05:04:10 .net]
>>30























氏ね

32 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 05:32:50 .net]
反論できなくなったら「氏ね」か。
頭のほどが知れるわ

33 名前: mailto:sage [2008/07/08(火) 05:51:27 .net]
       / \  /\  キリッ
.     / (ー)  (ー)\ "反論できなくなったら「氏ね」か。"
    /   ⌒(__人__)⌒ \ "頭のほどが知れるわ "
    |      |r┬-|    |
     \     `ー'´   /
    ノ            \
  /´               ヽ
 |    l              \
 ヽ    -一''''''"~~``'ー--、   -一'''''''ー-、.
  ヽ ____(⌒)(⌒)⌒) )  (⌒_(⌒)⌒)⌒))


          ____
        /_ノ  ヽ、_\
 ミ ミ ミ  o゚((●)) ((●))゚o      ミ ミ ミ だっておー!!!
/⌒)⌒)⌒. ::::::⌒(__人__)⌒:::\   /⌒)⌒)⌒)
| / / /     |r┬-|    | (⌒)/ / / //
| :::::::::::(⌒)    | |  |   /  ゝ  :::::::::::/
|     ノ     | |  |   \  /  )  /
ヽ    /     `ー'´      ヽ /    /
 |    |   l||l 从人 l||l      l||l 从人 l||l
 ヽ    -一''''''"~~``'ー--、   -一'''''''ー-、
  ヽ ____(⌒)(⌒)⌒) )  (⌒_(⌒)⌒)⌒))

34 名前:デフォルトの名無しさん [2008/07/08(火) 09:25:15 .net]
言っとくけど俺をあまりナメないほうがいいよ
vipでコテハンやってるしこのスレ潰すくらいの影響力は持ってるから
くだらないことで刺激して後悔しないようにね

35 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 10:17:01 .net]
>>9は正しくはこうだな
<body id=D onkeydown=K=event.keyCode-38 onload="Z=X=[B=A=12];function Y(){for(C
=[q=c=i=4];f=i--*K;c-=!Z[h+(K+6?p+K:C[i]=p*A-(p/9|0)*145)])p=B[i];for(c?0:K+6?h
+=K:t?B=C:0;i=K=q--;f+=Z[A+p])k=X[p=h+B[q]]=1;h+=A;if(f|B)for(Z=X,X=[l=228],B=[
[-7,-20,6,h=17,-9,3,3][t=++t%7]-4,0,1,t-6?-A:2];l--;)for(l%A?l-=l%A*!Z[l]:(P+=
k++,c=l+=A);--c>A;)Z[c]=Z[c-A];for(S=P;i<240;S+=X[i]|(X[i]=Z[i]|=++i%A<2|i>228)
?'■':'_')i%A||(S+='\n');D.innerText=S;Z[5]||setTimeout(Y,i-P)}Y(h=K=t=P=0)">

36 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 10:40:37 .net]
>>34
無関係の人間まで巻き込まないでね

37 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 10:42:37 .net]
       / \  /\  キリッ
.     / (ー)  (ー)\ "vipでコテハンやってるし"
    /   ⌒(__人__)⌒ \
    |      |r┬-|    |
     \     `ー'´   /
    ノ            \
  /´               ヽ
 |    l              \
 ヽ    -一''''''"~~``'ー--、   -一'''''''ー-、.
  ヽ ____(⌒)(⌒)⌒) )  (⌒_(⌒)⌒)⌒))


          ____
        /_ノ  ヽ、_\
 ミ ミ ミ  o゚((●)) ((●))゚o      ミ ミ ミ だっておー!!!
/⌒)⌒)⌒. ::::::⌒(__人__)⌒:::\   /⌒)⌒)⌒)
| / / /     |r┬-|    | (⌒)/ / / //
| :::::::::::(⌒)    | |  |   /  ゝ  :::::::::::/
|     ノ     | |  |   \  /  )  /
ヽ    /     `ー'´      ヽ /    /
 |    |   l||l 从人 l||l      l||l 从人 l||l
 ヽ    -一''''''"~~``'ー--、   -一'''''''ー-、
  ヽ ____(⌒)(⌒)⌒) )  (⌒_(⌒)⌒)⌒))

38 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 11:19:34 .net]
専ブラ用あぼ〜ん条件を正規表現で79*7バイトで書いたら、
そこそこ強力なフィルタが書けそうだな

39 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 11:19:53 .net]
たしかにwindows.hが続いてたとき
環境依存うぜーって話はなかったのに、
それ以外の時は出るんだよな。
winユーザーが多いのは認めるが、それでも環境依存って
ことには代わりはないとは思うがね

40 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 11:42:55 .net]
>>39
俺は環境依存はそんなに気にならないかな。

特定の環境でしか動かないソースってのは「ハードルを下げたら
ここまでジャンプして越えることが出来たよ」って言ってるようなもんだから、
依存しようとしてなかろうと作者の工夫次第と思ってる。
# 別にwindows.hを使うのが幼稚だと言ってるワケじゃないからあしからず ;-)

環境依存は少ないほうが好みだけど、ライン引きが難しいから
「標準出力がゲーム機で動かないじゃないか」というツッコミまで許すことになりそうで怖い。



41 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 11:47:02 .net]
>>40
s/標準出力が/標準出力がない/

42 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 13:42:14 .net]
FirefoxでBase64エンデコード

<p id=B></p><textarea cols=64 rows=8 onblur=B.innerHTML=/[^+/-9A-Z]/i.test(v=value)?btoa(unescape(encodeURI(v))):decodeURIComponent(escape(atob(v)))>

43 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 16:47:53 .net]
>>39
標準Cにない機能を使うための止むを得ない環境依存と、
字数を減らすためだけの"馴れ馴れしい"環境依存の違いだと思うよ(後者が悪いとは言わない)。

音を鳴らすという課題なら、windows.hなりXlib.hなり#includeしないわけには行かないだろう。
もちろん79x7の範囲でクロスプラットフォームにできれば言うことはないw

44 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 17:44:28 .net]
少なくとも前スレのwindows.hのやつはstdio.h使わずにprintfしてたと思うがね
なぜそこに突っ込まないのか…‥ もしかしてwindows.hにprintfがあるのか?

45 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 17:47:53 .net]
それはwindows.hうんぬんの話ではなくて、コンパイラ依存になるってのが論点になるよ・・・

46 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 17:59:35 .net]
なんでもありでいいじゃない
(面白|凄)ければ評価されるだろうし、逆も然り。
納得できないコードだったら自分で直して投下すればいい
コードで語ろうぜ

47 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 18:02:45 .net]
>>44
そんなんあったっけ。気づかんかった

48 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 18:04:39 .net]
printfだけなら、stdio.hつかわないでもプロトタイプ宣言してやればいい。

49 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 18:55:06 .net]
っていうかインクルードファイル内でprintf使ってれば当然宣言済みなんじゃないのか?
前スレで7行ライブラリの話が出てたのを皆忘れてしまったのだろうか?

50 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 19:03:24 .net]
どのインクルードファイルがprintf使ってるんだ。



51 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 19:44:12 .net]
調べといてよ。
とりあえず、インクルード内でstdio.h含めインクルードしてるのはよくあるんじゃないか?
よく移植の時に重複定義で悩ませられるような。

52 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 20:17:33 .net]
重複定義で悩ませられるってなんだよそれ。
標準ライブラリのヘッダがインクルードガードしてないわけがないじゃん。

53 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 21:21:15 .net]
>>52
なぜかすっぽ抜けてたりしてわけがわからない時に悩むんだっての。

とりあえずまあガードしてるってことはどちらでも問題ないってことじゃないのか?

54 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 21:28:36 .net]
言ってることが分からん。

多いのは問題ないが、足りないのは問題だろ。

55 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 21:49:46 .net]
多くたって問題だからガードするんだろ?
問題だったら省略されるわけないんだから、多少忘れたって足りない問題は起きない。

56 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 21:51:03 .net]
標準ライブラリでガードされてないなんて、どこの標準非準拠処理系だよ

57 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 21:57:55 .net]
だから、ガードを前提にそこら中でインクルードしまくられてるんだから
どっかでインクルードされてりゃ問題ないだろって話。

58 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 21:59:13 .net]
どっかってどこだよ。

59 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 22:04:44 .net]
そもそも他でインクルードされてなきゃ、ガードなんて無駄なだけじゃないか。

60 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 22:08:26 .net]
>>39-59
7行でおk



61 名前:デフォルトの名無しさん mailto:sage [2008/07/08(火) 22:11:38 .net]
全く話がかみ合ってないからもうやめろよ

62 名前:デフォルトの名無しさん mailto:sage [2008/07/09(水) 00:12:38 .net]
#include<stdio.h>/*第一引数のファイル名を検索*/
#include<dirent.h>/*bcc限定かも……*/
char*f,r[4]="B:";void _(char*v){DIR*d;struct dirent*e;int c=0,i;char b[512];A:
if(!(d=opendir(strcmp(v,"C:")?v:"\\")))return;if(c)for(i=0;i<c;i++)readdir(d);B
:while(c++,e=readdir(d)){if(*e->d_name=='.')goto B;sprintf(b,"%s\\%s",v,e->
d_name);if(fclose(fopen(b,"r"))?closedir(d),_(b),1:strcmp(f,e->d_name)?0:puts(v
))goto A;}}main(int c,char**v){if(c==2){f=v[1];for(;r[0]++-75;)_(r);}return 0;}

63 名前:デフォルトの名無しさん mailto:sage [2008/07/09(水) 18:16:44 .net]
っ 七行クロンダイク

64 名前:デフォルトの名無しさん [2008/07/09(水) 20:29:09 .net]
#include<stdio.h>
*s,*d;main(int c,char**v){long W,H,*t,x,y=0,a;unsigned char h[54],f[3];s=fopen(
v[1],"rb");d=fopen(v[2],"wb");fread(h,1,54,s);W=*(t=(long*)&h[18]);H=*(t+1);a=4
-W*3%4;fwrite(h,1,54,d);for(;y++<H;){for(x=0;x++<W;)fread(h,1,3,s),f[0]=f[1]=f[
2]=77*h[2]+150*h[1]+29*h[0]>>8,fwrite(f,1,3,d);a-4?fread(h,1,a,s):0;}}

bmp形式の画像(24bit限定)をグレイスケールに変換
一応4ビット境界にも対応させてある

65 名前:64 [2008/07/09(水) 21:48:21 .net]
訂正
×4ビット境界
○4バイト境界

66 名前:デフォルトの名無しさん mailto:sage [2008/07/09(水) 22:09:25 .net]
こんなに可読性の低いコード書いてて恥ずかしくないの?

67 名前:デフォルトの名無しさん mailto:sage [2008/07/09(水) 22:22:25 .net]
すげー誤読してた
>>64に「こんなに可読性の高いコード書いてて恥ずかしくないの?」
って言ってるんだと思って普通に読み流してた

68 名前:デフォルトの名無しさん mailto:sage [2008/07/09(水) 22:31:37 .net]
>>64
* main(c,v)char**v{って書くのが一番短いよ。
* yはグローバル変数にすれば初期化は不要だよ。
* H=*++t;とすればちょっと得するよ。
* (ANSI C) *s,*d;のように型無しで変数を定義するのは認められてないよ。

69 名前:デフォルトの名無しさん [2008/07/09(水) 22:40:53 .net]
#include<stdio.h>
int*s,*d,y;main(c,v)char**v;{long W,H,*t,x,a;unsigned char h[54],f[3];s=fopen(v
[1],"rb");d=fopen(v[2],"wb");fread(h,1,54,s);W=*(t=(long*)&h[18]);H=*++t;a=4-W*
3%4;fwrite(h,1,54,d);for(;y++<H;){for(x=0;x++<W;)fread(h,1,3,s),f[0]=f[1]=f[2]=
77*h[2]+150*h[1]+29*h[0]>>8,fwrite(f,1,3,d);a-4?fread(h,1,a,s):0;}}

こんな感じかな

70 名前:デフォルトの名無しさん mailto:sage [2008/07/09(水) 22:54:44 .net]
for(;y++<H;)は{ }がいらないと思う
あとその次のforは第3項をうまく使えば , が一つ消せそうな

freadが3つあるのが気になるけどCだから関数を文字でおく
とかはできないんだよな



71 名前:デフォルトの名無しさん mailto:sage [2008/07/09(水) 23:09:46 .net]
こんなもんか

#include<stdio.h>
int*s,*d,y;main(c,v)char**v;{long W,H,*t,a;unsigned char h[54],f[3];fread(h,1,
54,s=fopen(v[1],"rb"));W=*(t=(long*)&h[18]);a=4-W*3%4;fwrite(h,1,54,d=fopen(v[2
],"wb"));++t;for(;y++<*t;a-4&&fread(h,1,a,s))for(c=W;c--;fwrite(f,1,3,d))fread(
h,1,3,s),f[0]=f[1]=f[2]=77*h[2]+150*h[1]+29*h[0]>>8;}

72 名前:デフォルトの名無しさん mailto:sage [2008/07/09(水) 23:11:07 .net]
#include<stdio.h>
int*s,*d,y;main(c,v)char**v;{long W,H,*t,x,a;unsigned char h[54],f[3];s=fopen(v
[1],"rb");d=fopen(v[2],"wb");fread(h,1,54,s);W=*(t=(long*)&h[18]);H=*++t;a=4-W*
3%4;fwrite(h,1,54,d);for(;y++<H;){for(x=0;x++<W;)fread(h,1,3,s),f[0]=f[1]=f[2]=
77*h[2]+150*h[1]+29*h[0]>>8,fwrite(f,1,3,d);a-4?fread(h,1,a,s):0;}}

73 名前:72 mailto:sage [2008/07/09(水) 23:12:24 .net]
誤爆した上に負けてる…

#include<stdio.h>
int*s,*d,y;main(c,v)char**v{long W,H,*t,x,a;unsigned char h[54],f[3];s=fopen(v[
1],"rb");d=fopen(v[2],"wb");for(fread(h,1,54,s),W=*(t=(long*)&h[18]),H=*++t,a=4
-W*3%4,fwrite(h,1,54,d);y++<H;a-4?fread(h,1,a,s):0)for(x=0;x++<W;fwrite(f,1,3,d
))fread(h,1,3,s),f[0]=f[1]=f[2]=77*h[2]+150*h[1]+29*h[0]>>8;}

74 名前:71 mailto:sage [2008/07/09(水) 23:13:40 .net]
こんなもんかと思ったけどWはlongだったんだな

75 名前:72 mailto:sage [2008/07/09(水) 23:17:19 .net]
あーそうかCでも&&は左から評価なのか
勉強になった

76 名前:デフォルトの名無しさん mailto:sage [2008/07/09(水) 23:17:48 .net]
>>70
size_t(*r)()=fread;
とはできるが、もう少し使用回数が多くないと得にはならないな。

77 名前:71 mailto:sage [2008/07/09(水) 23:20:19 .net]
#include<stdio.h>
int*s,*d,y;main(c,v)char**v;{long W,*t,x,a;unsigned char h[54],f[3];fread(h,1,
54,s=fopen(v[1],"rb"));W=*(t=(long*)&h[18]);a=4-W*3%4;fwrite(h,1,54,d=fopen(v[2
],"wb"));++t;for(;y++<*t;a-4&&fread(h,1,a,s))for(x=W;x--;fwrite(f,1,3,d))fread(
h,1,3,s),f[0]=f[1]=f[2]=77*h[2]+150*h[1]+29*h[0]>>8;}

これならいいか

78 名前:デフォルトの名無しさん mailto:sage [2008/07/09(水) 23:21:05 .net]
yもいつのまにかintにされてるんだが。

79 名前:デフォルトの名無しさん mailto:sage [2008/07/09(水) 23:29:28 .net]
>>77>>78
じゃあyもlongにして、あとtも消せる?

#include<stdio.h>
int*s,*d;main(c,v)char**v;{long W,x,y,a;unsigned char h[54],f[3];for(fread(h,1,
54,s=fopen(v[1],"rb")),W=*(long*)&h[18],fwrite(h,1,54,d=fopen(v[2],"wb")),a=4-W
*3%4;y++<*++&W;a-4&&fread(h,1,a,s))for(x=W;x--;fwrite(f,1,3,d))fread(h,1,3,s),f
[0]=f[1]=f[2]=77*h[2]+150*h[1]+29*h[0]>>8;}

80 名前:79 mailto:sage [2008/07/09(水) 23:30:33 .net]
すまんなんでもない



81 名前:デフォルトの名無しさん mailto:sage [2008/07/09(水) 23:32:05 .net]
>>79
お前ちゃんと走らせてるのか?
出力が同じになることぐらい確認しとけよ。

82 名前:79 mailto:sage [2008/07/09(水) 23:32:56 .net]
実は今出先なのでCのコンパイラがなかった
すます

83 名前:71 mailto:sage [2008/07/09(水) 23:43:43 .net]
面倒だからみんなlongで

#include<stdio.h>
long*s,*d,y;main(c,v)char**v;{unsigned char h[54],f[3];long *t=&h[18],x,a;fread
(h,1,54,s=fopen(v[1],"rb"));a=4-*t*3%4;fwrite(h,1,54,d=fopen(v[2],"wb"));for(;y
++<t[1];a-4&&fread(h,1,a,s))for(x=*t;x--;fwrite(f,1,3,d))fread(h,1,3,s),f[0]=f[
1]=f[2]=77*h[2]+150*h[1]+29*h[0]>>8;}

84 名前:71 mailto:sage [2008/07/10(木) 00:13:01 .net]
#include<stdio.h>
unsigned char h[54],f[3];long*s,*d,y,*t=h+18,x,a;main(c,v)char**v;{fwrite(h,1,
fread(h,1,54,s=fopen(v[1],"rb")),d=fopen(v[2],"wb"));for(a=4-*t*3%4;y++<t[1];a-
4&&fread(h,1,a,s))for(x=*t;x--;fwrite(f,1,3,d))fread(h,1,3,s),*f=f[1]=f[2]=77*h
[2]+150*h[1]+29**h>>8;}

85 名前:デフォルトの名無しさん mailto:sage [2008/07/10(木) 00:49:30 .net]
いい流れだ

86 名前:デフォルトの名無しさん mailto:sage [2008/07/10(木) 09:14:57 .net]
おまえらそんな可読性の高いコード書いてて恥ずかしくないの?

87 名前:デフォルトの名無しさん mailto:sage [2008/07/10(木) 11:00:43 .net]
>>86 恥なんかあったら、コードは掛けんよ(笑


88 名前:デフォルトの名無しさん mailto:sage [2008/07/13(日) 16:10:20 .net]
JavascriptでBase64エンデコード
<script>S=String.fromCharCode;c='0123456789+/=';for(i=122;64<i;i-=i-97?1:7)c=S(
i)+c;document.write(eval('l=v.length;for(i=p=0;i<l;){for(n=0,j='+(/[^+/-9=A-Z]/
i.test(v=unescape(encodeURI(prompt(r=''))))?'3;j--;l<i&&p--)n=n<<8|v.charCodeAt
(i++);for(j=4;j--;)r+=c.charAt(n>>6*j&63)}p?r.slice(0,p)+(p+1?"==":"="):r':'4;j
--;t-64||p--)n=n<<6|(t=c.indexOf(v.charAt(i++)))&63;for(j=3;j--;)r+=S(n>>8*j&25
5)}decodeURIComponent(escape(r.slice(0,p)||r))')))</script>

ほぼ限界だと思うんだが、どうなんだろう
pやcharAtが冗長な気もするけど・・・

89 名前:デフォルトの名無しさん mailto:sage [2008/07/13(日) 16:18:39 .net]
お、79文字に収まった

<script>S=String.fromCharCode;c='0123456789+/=';for(i=123;65<i;)c=S(i-=i-97?1:7
)+c;document.write(eval('l=v.length;for(i=p=0;i<l;){for(n=0,j='+(/[^+/-9=A-Z]/i
.test(v=unescape(encodeURI(prompt(r=''))))?'3;j--;l<i&&p--)n=n<<8|v.charCodeAt\
(i++);for(j=4;j--;)r+=c.charAt(n>>6*j&63)}p?r.slice(0,p)+(p+1?"==":"="):r':'4;\
j--;t-64||p--)n=n<<6|(t=c.indexOf(v.charAt(i++)))&63;for(j=3;j--;)r+=S(n>>8*j&\
255)}decodeURIComponent(escape(r.slice(0,p)||r))')))</script>

90 名前:デフォルトの名無しさん mailto:sage [2008/07/14(月) 19:05:50 .net]
<body id=D onKeyDown=K=event.keyCode-38 onload='Z=X=[B=A=12];(Y=function(){for(
C=[q=c=i=4];f=i--*K;c-=!Z[h+(K+6?p+K:C[i]=p*A-(p/9|0)*145)])p=B[i];for(c?0:K+6?
h+=K:t?B=C:0;i=K=q--;f+=Z[A+p])k=X[p=h+B[q]]=1;h+=A;if(f|B)for(Z=X,X=[l=228],B=
[[-7,-20,6,h=17,-9,3,3][t=++t%7]-4,0,1,t-6?-A:2];l--;)for(l%A?l-=l%A*!Z[l]:(P+=
k++,c=l+=A);--c>A;)Z[c]=Z[c-A];for(S="";i<240;S+=X[i]|(X[i]=Z[i]|=++i%A<2|i>228
)?i%A?"■":"■<br>":"_");D.innerHTML=S+P;Z[5]||setTimeout(Y,i-P)})(h=K=t=P=0)'



91 名前:デフォルトの名無しさん mailto:sage [2008/07/14(月) 21:04:11 .net]
>>35の方が少し短い

92 名前:デフォルトの名無しさん mailto:sage [2008/07/14(月) 21:17:17 .net]
innerHTMLのほうがいい罠

93 名前:デフォルトの名無しさん mailto:sage [2008/07/14(月) 21:34:04 .net]
innerTextとかIEだけじゃん 環境依(Ry

94 名前:デフォルトの名無しさん mailto:sage [2008/07/14(月) 21:58:39 .net]
Firefoxで動くから問題ない

95 名前:デフォルトの名無しさん mailto:sage [2008/07/15(火) 15:44:19 .net]
Firefoxじゃ動かんだろ

96 名前:デフォルトの名無しさん mailto:sage [2008/07/15(火) 16:18:26 .net]
うごくよ

97 名前:デフォルトの名無しさん mailto:sage [2008/07/15(火) 16:54:21 .net]
どちらもIEとFirefoxで動いたが、
OperaとSafariではどちらも動かなかった。

98 名前:デフォルトの名無しさん mailto:sage [2008/07/15(火) 17:18:11 .net]
Mozilla Firefox 2.0.0.6,
Mozilla Firefox-3.0 3.0a8,

どっちでも動かないんだが・・・

99 名前:デフォルトの名無しさん mailto:sage [2008/07/15(火) 18:49:10 .net]
Firefox では動かないよ
まあそんなことはどうでもいいけど、<br> を \n にするだけのために innerText を使うのはいただけない

100 名前:デフォルトの名無しさん mailto:sage [2008/07/15(火) 20:43:48 .net]
htaで動けばおk



101 名前:デフォルトの名無しさん mailto:sage [2008/07/16(水) 00:26:40 .net]
W3C DOMで採択されていないinnerTextを使うなんて…なぜ標準厨が湧かないんだ!!






[ 続きを読む ] / [ 携帯版 ]

前100 次100 最新50 [ このスレをブックマーク! 携帯に送る ] 2chのread.cgiへ
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧]( ´∀`)<125KB

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef