- 1 名前：デフォルトの名無しさん mailto:sage [2008/07/06(日) 23:00:49 ]
- 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
- 230 名前：デフォルトの名無しさん mailto:sage [2009/05/28(木) 08:02:07 ]
- ついでに CRC16
#include <stdio.h>
int main(int c,char *v[]){unsigned short C,t[256];int i,j;FILE *F;
if(!(F=fopen(v[1],"r"))){fprintf(stderr,"Can't Open:%s\n",v[1]);return 1;}
for(i=0;i<256;t[i++]=C)for(C=i,j=9;--j;)C=C/2^(C&1?0xa001:0);
for(C=0;(i=getc(F))>=0;C=t[C&255^i]^C>>8);
fclose(F);printf("%04x %s\n",C,v[1]);return 0;}
CRC16の場合、テーブル無しに直接計算するコードもあったりするのだが
ttp://retroarchive.org/cpm/cdrom/CPM/GENASM/CRC16.ASM
ttp://retroarchive.org/cpm/cdrom/CPM/GENASM/CRC120.ASM
こういうのをCにしてみるのも面白いかと思った。
- 231 名前：デフォルトの名無しさん mailto:sage [2009/06/12(金) 08:57:12 ]
- DOS系ディスクイメージのヘッダ出力。perl-5.8.8と DOS版Jperl4 で動作確認。
こんな感じだと、ちょっとしたバイナリデータ確認なんかにも使えそうだと思った。
#!/usr/bin/perl
sub D{print"@_\n";exit 1}&D("$0 [-o offset] <imgfile>")if$#ARGV<0;$F=shift;if(
$F=~/^-/){&D("??: -$'")if"o"ne$';$_=eval(shift);$F=shift}open(F)||&D("$F:$!\n")
;binmode F;seek(F,$_,0);read(F,$_,128);close F;@_=unpack(vCvCv2Cv3V,substr($_,
11,21));$i=0;for((secsize,cluster_secs,reseverd_secs,fat_num,root_dir_max,
seccount,media_disc,fat_secs,trk_secs,heads,hidden_secs)){print"$_:$_[$i++]\n"}
print"VolLbl:'".substr($_,0x2b,11)."'\nFatType:'".substr($_,0x36,8)."'\n"
- 232 名前：デフォルトの名無しさん mailto:sage [2009/07/22(水) 20:21:54 ]
- >>230
反転してるのかこれ
- 233 名前：デフォルトの名無しさん mailto:sage [2009/08/23(日) 21:07:49 ]
- 既出を参考にマインスイーパ
コマンドライン引数として「横 縦 地雷数」を「"」で囲んで渡す 例）"9 9 10"
座標は左上を「1 1」として「x y」で入力
#include <stdio.h>
extern"C"long time(long*);int r=time(0),w,h,b,m;char*f,*p,*q;void C(int t){if(
p[t]==63){int i=9,k=0;for(m--;i--;p[t]=q[t]?64:48+k)k+=q[t+i/3*w-w+i%3-1];for(
i=9;!k&&i--;)C(t+i/3*w-w+i%3-1);}}int main(int n,char**v){sscanf(v[1],"%d%d%d"
,&w,&h,&b);n=w++*h;h*=w;f=new char[m=h+w*4+h];for(q=f+w*2;m--;p=q+h+w)f[m]=0;
for(m=n-b;h--;)p[h]=(h+1)%w?r=r*69069+5,(r>>26&63)<64*b/n--?b-=q[h]=1,63:63:10
;for(;puts(p),m*=!q[h];C(h=--n*w+--b))scanf("%d%d",&b,&n);delete[]f;return 0;}
先人たちに感謝を
- 234 名前：デフォルトの名無しさん mailto:sage [2009/09/01(火) 04:04:50 ]
- おお、久しぶりに大作きたか
しかし過疎ったな…このスレ。活気あった頃が懐かしい
- 235 名前：デフォルトの名無しさん [2009/09/23(水) 06:31:29 ]
- ゲーム音楽にありそう
- 236 名前：デフォルトの名無しさん mailto:sage [2009/09/23(水) 06:33:37 ]
- 誤爆しました
- 237 名前：デフォルトの名無しさん [2009/09/23(水) 07:28:31 ]
- ネタくれ
- 238 名前：デフォルトの名無しさん mailto:sage [2009/09/23(水) 10:24:12 ]
- ゲーム音楽
- 239 名前：デフォルトの名無しさん [2009/09/25(金) 01:29:19 ]
- ゲーム音楽という言葉が出たのでスレ違いだけど、
音出しテスト用にデータ量が少ないBGM探してるんだけど
おすすめ何かありませんか？
今はゼビウス使ってますが飽きてきたので
この年代のナムコは簡単でいいBGMが多いね
- 240 名前：デフォルトの名無しさん mailto:sage [2009/09/25(金) 01:42:37 ]
- ファルコムの曲でもつかえば？
場合によってはライセンスがフリーだし
- 241 名前：デフォルトの名無しさん [2009/09/25(金) 01:44:17 ]
- じゃあxanaduにするわ
あんがと
- 242 名前：デフォルトの名無しさん mailto:sage [2009/09/25(金) 02:03:53 ]
- MML から WAVE 生成とかできるかな
- 243 名前：デフォルトの名無しさん mailto:sage [2009/09/25(金) 09:31:17 ]
- >>242
cm.xrea.cc/thread/program_004.html#R867
867-869,920 七行達成ビミョーだけど。
- 244 名前：デフォルトの名無しさん mailto:sage [2009/09/25(金) 12:13:33 ]
- >>243
なるほど・・・
- 245 名前：デフォルトの名無しさん [2009/09/30(水) 03:10:07 ]
- 人生を変える名言・格言 今日の昼飯 ガッカリした観光名所 おまえら花粉対策何してる？
どんな本を読めばいいのかわからない ニコニコ動画でこれは見とけ！って いう動画ある？
一番欲しい物┌──────────────────────┐...ただし異論は認める
ュー速 三大 |┌‐‐.───────────────────‐.┐| ν速民 お薦めの漫
決めようぜ ! !｜| lニニニl |｜.先での悲惨な出来事
マイナｰだけ...｜| |｜ 今期で一番面白いア
外食で 何食 .｜|‐iﾆﾆﾆi.iﾆﾆﾆi──────┬─────────┤| ど.こ.までが一般的な
遅.刻.の.言.い｜|. L∩,,」L∩,,」 i |｜.っ て 言 う の ？
あ つ ま れ〜｜| i ∧＿∧ |｜った映画 といえば ？
外食600円以.｜| i （´∀｀ ） |｜ コロコミックの思い出
がいい 職業 .｜| i /"￣￣￣ﾞi |｜ んだらどうするの ？
エリアの魅力.｜| i | ヽ | .|｜にありがちな事と言え
る.んじゃね.??｜| i ゝ＿＿＿丿 |｜ν速民ならどうする？
.未だにニコ.｜| i |｜ い奴はいないよな ？
..日の思い出..｜!'‐/￣￣￣￣￣￣￣￣￣￣￣￣ﾞヽ───────┘| 必ずレスがもらえるコ
衝撃の動画├─| ─┐─┐ ﾅ＿ヽヽ | |..|───────‐┤絶対 入れたい アドオ
がいいよネ ｜ | .ﾉ ／ イ / ＿ ── ． ．| |する理由、やめた理由
野山の魅力 ｜ ＼＿＿＿＿ ＿＿＿＿＿＿/ ｜ 一体 どっちが害悪？
お前らの知っ.｜ ＼／ |.してもらうと嬉しいこと
- 246 名前：デフォルトの名無しさん [2009/09/30(水) 03:10:48 ]
- 5日ぶりのレスが誤爆でごめんね、ごめんね；；
- 247 名前：デフォルトの名無しさん mailto:sage [2009/11/03(火) 08:34:35 ]
- ガタガタじゃないか
- 248 名前：デフォルトの名無しさん mailto:sage [2009/11/05(木) 10:21:33 ]
- というほどでもないと思うが
- 249 名前：デフォルトの名無しさん mailto:sage [2009/11/09(月) 02:39:25 ]
- 「テトリスを1時間強で作ってみた」動画の投稿者にインタビュー──「プログラミングの楽しさ伝えたい」：ITpro
itpro.nikkeibp.co.jp/article/Interview/20091104/340019/?ST=develop&P=2
> ちなみに以前は，「7行プログラミング」という2ちゃんねるのスレによく書き込んでいたのですよ。
> 「トリッキーの1」っていうハンドル・ネームで「6行オセロ」とかを作っていて，面白かったですね。
- 250 名前：デフォルトの名無しさん mailto:sage [2009/11/09(月) 03:04:30 ]
- >>249
俺が書こうと思ってきたら書き込まれてたｗｗｗｗ
- 251 名前：デフォルトの名無しさん mailto:sage [2009/11/09(月) 03:12:48 ]
- ttp://tsushima.2ch.net/test/read.cgi/newsplus/1257697437/
ν即+見て久方ぶりに飛んできました…初期の砂嵐なんかはお題も良かったね。
ttp://www.broadtail.jp/
typedef と詰め詰めのコードがキモいヘッダ画像はさすが悪趣味だね。
- 252 名前：デフォルトの名無しさん mailto:sage [2009/11/09(月) 16:03:40 ]
- ぬるぽ
- 253 名前：デフォルトの名無しさん mailto:sage [2009/11/10(火) 00:16:35 ]
- ｶﾞｯ
- 254 名前：デフォルトの名無しさん mailto:sage [2009/12/02(水) 19:48:41 ]
- >>249
この人part1からいたみたいだな
しかも常連さん
- 255 名前：デフォルトの名無しさん mailto:sage [2009/12/10(木) 17:04:13 ]
- おれもいつかインタビューで仮眠愚アウトする日がくるかもしれない
- 256 名前：デフォルトの名無しさん mailto:sage [2009/12/26(土) 19:17:39 ]
- #define MAX 36
typedef long long a,b[MAX];void c(a*e,a*f){a g=*e,h=*f;for(;g?h%=g:0;)g%=h;*e/=
g+=h;*f/=g;}int printf(char*,...),d;int main(){for(b e={1},f={1};printf("B[%d]\
=%lld/%lld\n",d,e[d],f[d]),++d<MAX;){a g=0,h=1,i=d,j,k,l;for(;i--;g=g*l+k*h,h*=
l,c(&h,&g))for(l=f[j=i],k=e[i];c(&k,&l),j;k*=d+1-j)l*=j--;h*=d+1;c(&g,&h);l=h<0
?i:1;e[d]=-g/l;f[d]=h/l;}}
- 257 名前：デフォルトの名無しさん mailto:sage [2009/12/27(日) 11:02:20 ]
- ベルヌーイ数か
これはC99のソースなんだな
|
 |
