12/07/29 01:34:56.02
あんまし全体読む気はないけど
{print"not IPS\n";exit} とか
{puts"not IPS";exit} でいいんじゃねえの
あと
＞close O;close N;close STDERR
closeしまくってるけど、ショートコーディングにcloseとか必要なの？
あとやたらIF文使ってるけど、そんくらい演算子で書き換えろよ
else使うとかまずありえねーわ
＞for($i=0;$i<-s N;++$i){if(
とか
$i=0 って本当にここで0初期化必要だったの？
どこかの適当なメソッドで戻り値0返してる奴あるんじゃねえの？
くだらねーソースあげんなカス
あとさぁ最後に
0xffff は
4**8 だろボケが
374:デフォルトの名無しさん
12/07/31 11:30:57.46
.ips バイナリ差分ファイル作成 改良:
#!/usr/bin/perl
if($#ARGV<1){print"Usage: $0 OLD NEW >IPS\n";exit}($O,$N,$o)=@ARGV;open(O)&&
open(N)||die;binmode O;binmode N;open(STDOUT,">$o")if$o;binmode STDOUT;print
"PATCH";sub P{return if!($l=length);$c=pack('n',$l);print substr(pack(N,$o),1),
$r>3&&$r==$l?"\0\0$c$s":"$c$_";$r=0}read(O,$a,-s O);read(N,$n,-s N);while($i++<
-s N){if(substr($a,$i,1)ne($c=substr($n,$i,1))){$o=$i,$s=$c if!length;$_.=$c;$r
++if$s eq$c;next if($l=length)<65535}&P;$_=''}&P;print"EOF"
puts は C の関数かと。perlの標準には無いみたい。
4**8 = 65536 = 0x10000 なんですけど。。。
375:デフォルトの名無しさん
12/07/31 22:05:03.16
綺麗に書きなおしたバージョンとかも見せてくれると未熟な俺も勉強になるんだが
376:デフォルトの名無しさん
12/08/02 17:08:03.30
つ Perl::Tidy
377:デフォルトの名無しさん
12/10/09 01:30:03.88
初めて来たけどめっちゃ過疎ってるね。4年て
378:デフォルトの名無しさん
12/10/27 11:35:02.14
まあ、板自体というかにちゃん自体が過疎ってるからねぇ
379:デフォルトの名無しさん
12/10/27 20:42:53.51
みんなどこいってんの？
380:デフォルトの名無しさん
12/10/29 17:56:09.31
見守られることも無く
381:デフォルトの名無しさん
12/12/19 13:42:28.80
640×360（16：9）か480×360（4:3）
HDなら1280x720にするのが無難
元が1920x1080ならそのままでいいだろ
別に自分から解像度を下げてUPする必要はない
訂正、960x720ね
382:デフォルトの名無しさん
13/05/27 17:27:36.47
保守
383:デフォルトの名無しさん
13/09/04 10:12:02.57
sudo halt
384:デフォルトの名無しさん
13/12/24 12:40:09.01
てｓｔ
385:デフォルトの名無しさん
14/03/22 23:57:55.27 ECpqv1dR
nCr表示、n,rの上限は999999
#include<stdio.h>
#include<stdlib.h>
int r,n,i,a[999999];int main(int c,char**v){if(c>2&&(n=atoi(v[1]))>=(r=atoi(v[2
]))&&r>0)for(--*a;*a<n-r;puts("")){for(c=0>*a;i>0&&a[i]>=n-r+i;)c=i--;for(++a[i
];c&&i+1<r;i++)a[i+1]=a[i]+1;for(c=0;c<r;)printf("%d ",a[c++]);}return 0;}
386:デフォルトの名無しさん
14/03/27 17:52:35.14 t6dxZaMZ
SJIS/JIS/EUC/UTF8用の改行変換
exec src dst n
nが0ならCR、2ならCR+LF、3ならLF
#include<stdio.h>
FILE*r,*w;int t,d;f(){d=d&&!fprintf(w,"\r\0\r\n"+t);}main(c,v)char**v;{if(c>3&&
(r=fopen(v[1],"rb"))&&(w=fopen(v[2],"wb")))for(t=*v[3]-48;~(c=fgetc(r));)c-13&&
c-10?f(),fputc(c,w):(d&c/6&&f(),d+=c/6);f();r&&fclose(r);return w&&fclose(w);}
387:デフォルトの名無しさん
14/03/28 10:07:30.44 6uoLiniK
ごめん、何言っているのか分からない。
漢字コード(エンコーディング)と改行文字に何の関係があるんだ?
388:デフォルトの名無しさん
14/03/28 13:50:38.65 zzqObK8g
UTF-16
389:デフォルトの名無しさん
14/04/01 21:01:00.03 iTOHjXEl
>>386にUTF16対応追加（CPUとエンディアンが違うBOM無しUTF16は非対応）
exec src dst n uでUTF16、u省略なら386互換
#include<stdio.h>
FILE*r,*w;short t,d,e,u,z,x;o(){u?fwrite(&z,1,2,w):fputc(z,w);}f(i){for(i=d?t:1
;d="\r\0\r\n"[i++];o())z=d<<e*u*8;}main(c,v)char**v;{if(c>3&&(r=fopen(v[1],"rb"
))&&(w=fopen(v[2],"wb")))for(u=c>4,t=*v[3]-48;u?fread(&x,1,2,r):~(x=fgetc(r));c
-13&&c-10?f(),o(z=x):(d&c/6&&f(),d+=c/6))c=u?e=e||~x==1,z=e?255&x>>8|x<<8:x:x;f
();r&&fclose(r);return w&&fclose(w);}
390:デフォルトの名無しさん
14/04/11 01:41:07.69 2dOC/21k
C/C++コメント抽出フィルタ
UTF-16だと動かないけど仕方ないよねｗ
#include<stdio.h>
char*p,b[999999];int t,s,d;FILE*r;main(c,v)char**v;{if(c>1?r=fopen(v[1],"r"):0)
for(p=b;fgets(p,b-p+999999,r);){for(;c=*p;)*p++*=c-13&&c-10;if(!*b||*--p-92){
for(p=b;c=*p++;)if(t)c-42||*p-47||(puts("*/"),t=!p++),t&&putchar(c);else if(s)s
*=c!=s,c-92||*p&&p++;else switch(c){case 47:if(*p==47)for(puts(p-1);*++p;);t=*p
==42?printf("/*",p++):0;break;case 39:case 34:s=c;}t&&puts(""),p=b;}}return 0;}
391:デフォルトの名無しさん
14/04/12 23:06:57.08 zLkUu0xk
>>390の修正版
#include<stdio.h>
char*p,b[999999];int t,s,d;FILE*r;main(c,v)char**v;{if(c>1?r=fopen(v[1],"r"):0)
for(p=b;fgets(p,b-p+999999,r);){for(;*p&&*p-13&&*p-10;)p++;*p=0;if(!*b||*--p-92
){for(p=b;c=*p++;)if(t)c-42||*p-47||(puts("*/"),t=!p++),t&&putchar(c);else if(s
)s*=c!=s,c-92||*p&&p++;else switch(c){case 47:if(*p==47)for(puts(p-1);*++p;);t=
*p==42?printf("/*",p++):0;break;case 39:case 34:s=c;}t&&puts(""),p=b;}}return r
&&fclose(r);}
削ってる途中でバグってたorz
直したら7行目に逝ったので省略してたfcloseを復活
392:デフォルトの名無しさん
14/05/30 21:27:38.41 96TSXMAF
アスペ全開か
393:デフォルトの名無しさん
14/05/30 22:21:32.79 W7NqZCBf
消えろカス