七行プログラミング part5

七行プログラミング p ..

67:デフォルトの名無しさん
06/05/19 18:56:48
>>66
>>7の2行目と5行目のことじゃね？

68:デフォルトの名無しさん
06/05/19 21:30:54
>67
空白行？

69:デフォルトの名無しさん
06/05/19 22:14:04
つーかcomファイルなんて実行できねえよ

70:デフォルトの名無しさん
06/05/19 22:39:38
>>68
二行目
> ﾌﾌﾌﾌﾌﾌﾌﾌﾌﾌﾌﾌｹﾀﾀｲｶｻｮo3ﾚS]ｻ｣J3ﾚｾ -ｸ$$Pｸﾍﾊ3ﾁP_SXｲﾐﾌWWWｳﾊWWWWｵkWWWWｲｵﾀP[%
五行目　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　 ~~~~~~~~~~~~~~~~~~~~~~~~~~~
> ｰA3ﾁｴ^PUSVRRｰﾊ3ﾁｴ PｳｪｳｪWWWWWWW3ﾀｰ"ﾑﾈﾍﾐT]ｸ&&2ﾀﾑﾈ3ﾉｱ｡3ﾒ3ﾛSSﾍﾐ^_ｸ@QﾑﾀPPﾇﾟ%
　　　　　　　　　　　　　　　　　~~~~~~~~~~~~~~~~~

71:デフォルトの名無しさん
06/05/19 23:24:49
>>70
作者乙

72:デフォルトの名無しさん
06/05/19 23:55:08
>>69
死ね

73:デフォルトの名無しさん
06/05/23 08:28:49
comファイルはバイナリそのもので、
プログラムングとは言えないんじゃね？

74:デフォルトの名無しさん
06/05/23 08:41:54
貴様ヘッドアセンブルを否定したな！

75:デフォルトの名無しさん
06/05/23 10:20:29
この類のは散々既出かもしれませんが、PHPで1行掲示板を書いてみました。
連投対策(同IPから60秒間連投を制限)も一応施してあります。なんかまだまだ
短くできそうな悪寒がします。

<?$ip=$_SERVER['REMOTE_ADDR'];$d=time();$n=htmlspecialchars($_POST['n']);
$m=htmlspecialchars($_POST['m']);$p="log.txt";if($n&&$m){$l=@file($p);
$s=explode("<>",$l[0]);if(($ip!=$s[0])||($d-$s[3]>60)){$fp=fopen($p,"w+");fputs
($fp,$ip."<>".$n."<>".$m."<>".$d."<>\n");for($i=0;$i<20;$i++)fputs($fp,$l[$i]);
fclose($fp);}}?><form method=POST><input name=n>:<input name=m><input type=
submit><?$l=@file($p);foreach($l as $arr){$s=explode("<>",$arr);print("<hr>[".
$s[1]."] ".$s[2]." (".date("Y/m/d h:i:s", $s[3]).")");}?>

76:デフォルトの名無しさん
06/05/23 18:25:51
確かにプログラムングとは言えないな

77:デフォルトの名無しさん
06/05/23 18:31:57
>>75
PHPは関数名が長いね…

縮め、改行入力阻止、0のみ入力許可
<?$f=array('n','m');foreach($f as&$v){$v=strtr(htmlspecialchars($_POST[$v]),
"\n",' ');}$p='log.txt';if($f[0]!=''&&$f[1]!=''){$l=@file($p);$s=explode('<>',
$l[0]);if(($ip=$_SERVER['REMOTE_ADDR'])!=$s[0]||($d=time())-$s[3]>60){$l[20]=''
;file_put_contents($p,"$ip<>$f[0]<>$f[1]<>$d<>\n".implode('',$l));}}?><form
method=POST><input name=n>:<input name=m><input type=submit><?$l=@file($p);
foreach($l as$arr){$s=explode('<>',$arr);echo"<hr>[$s[1]] $s[2] (".date(
'Y/m/d h:i:s',$s[3]).')';}?>

78:デフォルトの名無しさん
06/06/29 14:59:10
保守

79:デフォルトの名無しさん
06/07/18 21:50:29
ﾎｯｼｭ

80:デフォルトの名無しさん
06/08/10 02:37:10
シェルピンスキーのギャスケット

#include <stdio.h>
main()
{
    int x, y;
    for (y = 0; y < 32; y++){ for (x = 0; x < 32; x++)
    printf(x & y? "..": "■"); printf("\n"); }
}

81:デフォルトの名無しさん
06/08/19 15:58:18
JavaScript 弾避け。マウスカーソルを四角にぶつけないように動かす
互換性のないように作ってあるので、IE専用

<body id=B onMouseMove=y=event.y;x=event.x><script>h=B.clientHeight-20;a=[b=[q=
[D=document]]];for(U=x=99;x--;C=F=q[x]=P=y=0)D.write("<b style=background:red;"
+"width=16;height=16;position:absolute;top:-20></b>");function T(){for(i=C;i--*
!F;J=D.all(5+i).style,l=q[i]/U,m=J.left=a[i]*(c=1-l)+a[d=i+U]*l,n=J.top=b[i]*c+
b[d]*l,F=m-15<x&x<m+16&n-15<y&y<n+16)if(!q[s=i]--)for(j=2;j--;s+=R%3+1)R=Math.
random(q[i]=U)*w*h|0,a[c=j?i:i+U]=s%2?s%4>1?0:w:R%w,b[c]=s%2?R%h:s%4?h:0;P++-C*
9||C-U&&C++;if(F)alert(P);else setTimeout(T,U-C)}T(w=B.clientWidth-20)</script>

82:デフォルトの名無しさん
06/08/19 16:15:30
GJ!
だんだん多く速くなるあたり職人芸だな

83:デフォルトの名無しさん
06/08/28 21:02:17
保守age

84:デフォルトの名無しさん
06/09/29 15:58:31
保守

85:デフォルトの名無しさん
06/10/09 16:07:24
hosyu

86:デフォルトの名無しさん
06/10/10 20:06:29
俺には無理だったお題
perlでモジュールを使わずに7行でRSSリーダー(RSS to html)を作れ

LWP::Simpleも使わずに7行はやっぱり無理か？？

87:デフォルトの名無しさん
06/10/10 20:13:20
RSSリーダーの定義による

88:86
06/10/10 20:24:20
定義はRSSをgetして、htmlに変換するってもの
LWP::Simpleと、XML::RSSで作れたんだがモジュール無しは俺にはむりぽ

89:デフォルトの名無しさん
06/10/10 23:22:55
Socketも使えんがな

90:デフォルトの名無しさん
06/10/10 23:32:32
curlで取得

91:デフォルトの名無しさん
06/10/10 23:33:19
一先ずLWP::Simpleだけで作れないかやってみるお

92:デフォルトの名無しさん
06/10/11 00:28:14
XSLT使えば2～3行で書けるんじゃない？あほらしくてやる気しないけど

93:デフォルトの名無しさん
06/10/12 14:02:19
じゃあ俺も無理だったお題。
Cで7行正規表現。どうやっても7行は無理だったｗ腕に覚えのある奴がいたら、是非挑戦してみてくれ。

94:デフォルトの名無しさん
06/10/12 14:07:44
>>93
正規表現って何をサポートすればいいんだ？

95:デフォルトの名無しさん
06/10/12 22:49:52
#include "regexp.h"

96:デフォルトの名無しさん
06/10/12 22:53:17
#include <boost/regex.h>

97:デフォルトの名無しさん
06/10/14 02:02:18
catコマンドってC言語で7行で作れる？
どこまでの機能を詰め込めるかの問題になりそうだけど。

98:97
06/10/14 02:04:30
作れる？ってのはおかしいか。
作るだけなら余裕だろうし。
どれだけ機能を削ったり詰め込めるかって感じ。

99:トリッキーの１
06/10/14 05:40:11
お久しぶりです。part1でお世話になったトリッキーの１です。
>>60-64で晒されていますが、そのサイトは私のサイトです。
正規表現が面白そうだったので久々に作ってみましたが、9行になりました。
縮めるテクニックなどを完全に忘れてしまっていますが、頑張れば7行は可能そうです。
仕事の合間に7行目指して頑張ってみようと思います。

使える記号は()*|のみです。とりあえずこれだけあれば他のも表現できると思います。
文脈自由文法は、
R ::= T | T "|" R
T ::= ε | FT
F ::= P | P*
P ::= char | "(" R ")"
となっています。gcc2.91でのみコンパイル確認しました。
使い方は、"a.exe regexp"とすれば、標準入力から読んだ内容をregexpで走査します。
見つかればmatchと表示して終了します

#include <stdio.h>
int n[999][99],z=2,i;char*s,c[999][99],v[9999];h(f,t,k){for(i=0;c[f][i]!=0;i++)
;c[f][i]=k;n[f][i]=t;}p(int o,int f,int t,char*l){int x;if(l){for(x=0;(f=c[o][x
])!=0;x++)if((f==1||*l==f)&&(n[o][x]==1||p(n[o][x],0,0,(f==1)?l:l+1)))return 1;
}else{(o==0)?p(1,f,t,0),(*s=='|')?s++,p(0,f,t,0):0:(o==1)?(*s==')'||*s=='|'||*s
==0)?h(f,t,1):(x=z++,p(2,f,x,0),p(1,x,t,0)):(o==2)?(x=z++,c[x][0]=1,n[x][0]=t,p
(3,f,x,0),(*s=='*')?h(f,t,1),s++,n[x][0]=f:0):(*s)?(*s=='(')?(s++,p(0,f,t,0),++
s,0):h(f,t,*s++):0;}}main(int x, char**o){s=o[1];p(0,0,1,0);while(gets(v)){s=v;
while(*s){if(p(0,0,0,s++))return printf("match");}}}

100:トリッキーの１
06/10/14 05:47:13
多分大体のコンパイラで動くバージョンはこちらです。連投失礼しました。

#include <stdio.h>
int n[999][99],z=2,i;char*s,c[999][99],v[9999];p(int o,int f,int t,char*l){int
x;if(l){for(x=0;(f=c[o][x])!=0;x++)if((f==1||*l==f)&&(n[o][x]==1||p(n[o][x],0,
0,(f==1)?l:l+1)))return 1;}else{(o==0)?p(1,f,t,0),(*s=='|')?s++,p(0,f,t,0):0:(
o==1)?(*s==')'||*s=='|'||*s==0)?c[f][c[f][98]]=1,n[f][c[f][98]++]=t:(x=z++,p(2
,f,x,0),p(1,x,t,0)):(o==2)?(x=z++,c[x][0]=1,n[x][0]=t,p(3,f,x,0),(*s=='*')?c[f
][c[f][98]]=1,n[f][c[f][98]++]=t,s++,n[x][0]=f:0):(*s)?(*s=='(')?(s++,p(0,f,t,
0),s++,0):(c[f][c[f][98]]=*s++,n[f][c[f][98]++]=t):0;}return 0;}main(int x,char
**o){s=o[1];p(0,0,1,0);while(gets(v)){s=v;while(*s){if(p(0,0,0,s++))return
printf("match");}}return 0;}

101:デフォルトの名無しさん
06/10/14 10:22:42
ｷﾀ━(━(━(-( ( (ﾟ∀ﾟ) ) )-)━)━) ━ !!!!!

102:デフォルトの名無しさん
06/10/14 11:17:28
凄すぎます。

103:デフォルトの名無しさん
06/10/14 14:51:06
天　才　現　る

104:デフォルトの名無しさん
06/10/14 14:53:22
何て恐ろしい子！

105:デフォルトの名無しさん
06/10/14 15:15:59
BNFの自前パース＋NFA検索ってところかな？
10行でもありえないくらい凄いよ…本当に7行なんて出来るんだろうか

106:デフォルトの名無しさん
06/10/15 01:37:57
よく読んでないんだけどa==bを使ってるところをうまくa-bにするとかで数文字減れないかな

107:トリッキーの１
06/10/15 02:06:53
>>105
おお、その通りです。あのコードからよくわかりましたね！
DFAにすべきなんでしょうが、動けばいいやってことでNFAにしました。
でも現状では最初に適当に作りすぎたためにどんなに頑張っても9行なので、
行数を減らすことを前提に少し構造を変えないといけないかも…
等価なBNFで状態数の小さいものを書くことが出来ればなんとかなるのかな？

>>106
ヒントありがとうございます。
まだ小細工は全然していないのですが、数文字が重要になってきたら試してみます。

7行達成したらお披露目にきますね　ﾉｼ

108:デフォルトの名無しさん
06/10/15 12:12:36
int x;if(l){for(x=0;
↓
int x=0;if(l){for(;

こういう積み重ねが大事なんだろうな。人間ってすごいな。

109:デフォルトの名無しさん
06/10/15 13:28:33
for(int x=0; はＣ言語では駄目なんだっけ
C++で出来るようになったのか

110:デフォルトの名無しさん
06/10/15 14:07:28
>>109
C99なら可。

111:デフォルトの名無しさん
06/10/15 19:01:41
(o==0)?(A):(B)　→　(o)?(B):(A)
とかあるけど……まぁそれでも７行には入りそうにないな。
もっと根本的な対策がいる。

112:デフォルトの名無しさん
06/10/16 01:50:15
'|' とかの即値を数字で書くと一字減る

113:デフォルトの名無しさん
06/10/16 06:58:49
>>112
それは限りなく最後の手段。ASCII文字配列でないコンピュータで動かなくなる。

114:デフォルトの名無しさん
06/10/16 07:58:30
いつの時代のコンピューだよｗ

115:デフォルトの名無しさん
06/10/16 15:10:16
いや、それは気にすべきだろ。

116:デフォルトの名無しさん
06/10/16 15:48:13
こういう基本的なことは重要

117:デフォルトの名無しさん
06/10/16 17:02:54
それよりもコンピューという略し方のほうが異常だと僕は思うね。

118:デフォルトの名無しさん
06/10/17 00:14:52
>>117
ついに「ぴゅー太」と呼ぶ時代が来たようだな。時代が追いついてきたな。

119:デフォルトの名無しさん
06/10/17 00:20:38
マイコンと呼ぶ日も近そうだ。ベーマガスペシャル復刊とかね

120:デフォルトの名無しさん
06/10/17 01:03:25
1chipMSX買っちゃったしね。

121:デフォルトの名無しさん
06/10/27 23:58:59
BCELを使った Java難読化プログラムです．
現在，9行．あと少し．キャストがうぜぇ．groovy なら問題なくできるだろう．

import org.apache.bcel.classfile.*;class O{public static void main(String[]s)
throws Exception{new O(new ClassParser(s[0]).parse());}int n=0;void u(Constant
c){ConstantUtf8 u=(ConstantUtf8)c;if(u.getBytes().charAt(0)!='<')u.setBytes(""+
++n);}O(JavaClass j)throws Exception{ConstantPool p=j.getConstantPool();
Constant[]c=p.getConstantPool();for(int i=0;i<c.length;i++){if(c[i]!=null){int
t=c[i].getTag();if(t>8&&t<12){ConstantCP q=(ConstantCP)c[i];if(j.getClassName()
.equals(q.getClass(p)))u(c[((ConstantNameAndType)c[q.getNameAndTypeIndex()]).
getNameIndex()]);}}}u(c[((ConstantClass)c[j.getClassNameIndex()]).getNameIndex(
)]);j.dump(n+".class");}}

BCELじゃなく，ASMとか，javassist を使ったほうがいいのかな？

java -cp .:bcel.jar O <target classfile>

122:デフォルトの名無しさん
06/10/28 01:02:08
>>121
純粋な疑問なんだけど、importが許されるなら、そこで全部書けばいいんじゃない？

123:デフォルトの名無しさん
06/10/28 15:16:15
>>122
「BCELを使った」が前提なだけだから、BECL以外をimportしちゃダメだろう。

もちろん他所で書いてimportして「1行で書きました！ 7行以下だからいいよね！」
って主張するのは各人の勝手だとは思うけど、スルーされるか叩かれるだけじゃね？

124:デフォルトの名無しさん
06/10/28 16:08:23
うーん、公式ライブラリ以外を使っているのは微妙な気もするけどな。

125:デフォルトの名無しさん
06/10/28 19:48:05
>>122
Cで #include <stdio.h> 書くのは許していいの？

126:デフォルトの名無しさん
06/10/28 20:19:46
じゃあお前includeディレクティブなしでCでなんか書いてみろ。
できなかったら半年ROMってろ。

127:デフォルトの名無しさん
06/10/28 20:44:46
Cなら楽だろ。

128:デフォルトの名無しさん
06/10/28 23:04:28
>>125
Javaでjava.*を使わなかったら認めてやるよ

129:デフォルトの名無しさん
06/10/29 00:44:16
標準ライブラリや有名どころのはいいんじゃね？

130:デフォルトの名無しさん
06/10/29 01:32:42
標準ライブラリは誰からも文句をつけられないが、
有名どころなら一部の人からは認められないだろうね。
正規表現をboost使って実装されてもﾊｧ?だし。

131:デフォルトの名無しさん
06/10/29 03:21:16
boostを使った面白ネタキボン

132:デフォルトの名無しさん
06/10/29 03:25:40
スレ違い。

133:sage
06/11/09 00:13:29
まだ続いてたんだこのスレ。感動した。

134:デフォルトの名無しさん
06/11/11 16:56:12
age

135:デフォルトの名無しさん
06/11/27 22:46:20
だれかなんかねーの？

136:デフォルトの名無しさん
06/11/27 23:19:49
昔、ポケコンで１行プログラムがあったな。
BASICだが、独特の技術だった。

137:デフォルトの名無しさん
06/11/27 23:45:01
>>135
ネタが無いなら対戦リバーシとかどう？

138:デフォルトの名無しさん
06/11/27 23:46:52
>>137
俺が作るのかｗ
対戦ってコンピューターとの対戦だよな。
交互に入力する対戦でもいいか。

139:デフォルトの名無しさん
06/11/27 23:49:18
リバーシって昔なかったっけ？
x軸とy軸を入力するやつだった気が

140:デフォルトの名無しさん
06/11/27 23:58:45
おいおいすでに誰かのHPにあったろ。

141:デフォルトの名無しさん
06/11/28 00:08:24
ログみたらオセロ、マインスイーパ、ドラクエ
いろいろあったわ。
同じゲーム作ってもおもしろいんじゃないか？
ネタがあれば作る人はたくさん出てきそうだけどな

142:デフォルトの名無しさん
06/11/28 00:09:31
辞書を外に持った簡易日本語IMEってのはどうだ？

143:デフォルトの名無しさん
06/11/28 00:11:24
>>142
データを外に持つのか。それはいいのか？

144:デフォルトの名無しさん
06/11/28 00:16:31
ダメだったら毎回辞書を標準入力から…

145:デフォルトの名無しさん
06/11/28 00:16:39
だめです

146:デフォルトの名無しさん
06/11/28 00:22:08
ネタとして楽しめるならなんでもいいよ。
評価は見てる人がそれぞれすれば良いんだから。

147:デフォルトの名無しさん
06/11/28 00:25:35
じゃー明日オセロ作るわ。
明日な、明日。

148:デフォルトの名無しさん
06/11/28 00:31:34
>>147
プログラム作ってる暇があったらちゃんとオナニーしろよな

149:デフォルトの名無しさん
06/11/28 00:33:27
>>148
校則で禁止されています。

150:デフォルトの名無しさん
06/11/28 01:25:21
破るためにあるんですよ。ナニとは言いませんが。

151:デフォルトの名無しさん
06/11/28 03:45:57
オナニーじゃ処女膜は破れない

152:デフォルトの名無しさん
06/11/28 04:00:38
処女がバイブ使うのは、推奨しない。
でも、たった7行で逝けるなんて感動。

153:デフォルトの名無しさん
06/11/28 07:54:50
今日はじめてみたけど楽しそうなスレだね。
初代のトリッキー1さんとかってまだ居るの？
5年前って凄いな。

154:デフォルトの名無しさん
06/11/28 08:06:29
7行printfは組込で実際に使った。便利だった。

155:デフォルトの名無しさん
06/11/29 03:25:04
そういや、VBScriptやJScriptってsprintf無いよね？

156:デフォルトの名無しさん
06/11/29 11:02:47
ないみたいだな。
URLﾘﾝｸ(www.google.com)
自前でいろいろ作ってる人はたくさんいるみたいだけど、
これを7行のプログラムにするのも楽しそうだなｗｗ

157:デフォルトの名無しさん
06/11/30 03:32:53
10進BASICで七行プログラミング

158:138
06/12/02 21:34:13
先輩！
COMとの対戦オセロ作ってるんですけど50行くらいあるんですよね。
月曜日まで待ってもらっていいですか？

159:デフォルトの名無しさん
06/12/02 22:01:46
よーし　じゃあ父さんもなでしこで七行プログラミングしちゃうぞー

160:デフォルトの名無しさん
06/12/02 22:52:59
>>158
きたいあげ

161:138
06/12/04 12:06:28
今14行　あと7行……

162:デフォルトの名無しさん
06/12/04 13:22:05
COMとの対戦オセロなら、パート1でトリッキーの1さんが6行で作ってますね

163:デフォルトの名無しさん
06/12/04 14:07:25
>>162
だから？

164:デフォルトの名無しさん
06/12/04 14:13:19
>>163
せっかくオブラートに包んであげたのに…
既に素晴らしい作品があるから、二番煎じな上に14行なんて面白くもなんともない経過報告いらないですよ

165:デフォルトの名無しさん
06/12/04 14:49:11
>>164
(＾ω＾；)
最近7行のプログラム出てこないから書いてるだけなんだけど
面白くないと思うなら面白いものを提示してくれ

166:デフォルトの名無しさん
06/12/04 17:44:52
>>165
相殺法と呼ばれる詭弁術の典型例
やっていることがつまらないという評価に対してなんら反論できてない

167:デフォルトの名無しさん
06/12/04 18:02:36
ああ　他人が見ても面白くないのはわかるよ。

#include <stdio.h>
typedef int n;n t[64]={0};n a(n i,n&g){n s=g%8;g+=("1987"[i%4]-48)*(i>3?-1:1);
return !((!s||s==7)&&s+g%8==7);}n h(n x,n m){n i=0,r=1,g;if(t[x])return 1;for(
;i<8&&a(i,g);i++,g=x){for(;t[g]==3-m&&a(i,g)&&g>=0&&g<64;){if(t[g]==m){while(g
!=x)t[a((i+4)%8,g)]=m;r=0;}}}if(!r)printf("%s:%d %d\n",m==1?"黒":"白",x%8+1,x/
8+1);return r;}n d(){n s=0,d,i=0;for(;i<64;i++){printf("□\0○\0●"+(d=t[i])*3
);if(i%8==7)puts("");s=s?d&&s!=d?3:s:d;}return s!=3;}void main(){n x=1,y,p,m=0
,c=0,k=0,r=-1;t[35]=t[28]=1;t[27]=t[36]=2;while(!d()||x&&k!=r){puts("x y");
scanf("%d %d",&x,&y);m=m?m:x?1:2;if(x||--x>7||--y>7||h(x+y*8,m))continue;if(d(
))break;k=r=(c++/2+x*8+y)%64;while(++k!=r&&h(k,3-m))if(k>64)k=0;}x=y=c=0;for(;
c<64;c++)if(p=t[c])p==1?x++:y++;printf("黒:%d 白:%d %s",x,y,x>y?"黒の勝ち":x<y
?"白の勝ち":"引き分け");}

12行までいけたけどもうやめるわ。すまんかったな

168:デフォルトの名無しさん
06/12/04 18:13:07
>>167
関数使いすぎ。
グローバル変数は仕様上自動的にゼロに初期化される。
セミコロン多すぎ、結果if文増えすぎ。
for文やwhile文多すぎ。これらは工夫で1つか2つまで減らせるはず。
breakやcontinue使うとかありえない。最初から構造をもっと考えて設計するといいと思う
番兵使おう。

別のお題で再挑戦頑張れ

169:デフォルトの名無しさん
06/12/04 18:13:49
自分からネタも出せない批評家気取りのクズは死ねばいいのに

170:デフォルトの名無しさん
06/12/04 18:16:14
より完成度の高い対戦オセロがでてくる『可能性』の芽をつぶしたバカ晒し上げ

>162 >164 >166

171:デフォルトの名無しさん
06/12/04 18:22:01
>>168
じゃーお題出してくれ

172:デフォルトの名無しさん
06/12/04 18:24:04
実際過疎気味だしオセロとか低レベルなのでもいいと思うけどね
新しい7erが現れるかもしれんし

>>138=>>163=>>165=>>167
なら少しくらい煽り耐性つけろよと言いたいがな

173:デフォルトの名無しさん
06/12/04 18:40:07
よくわからないけれど　ここは荒んでいますね　よくわかります

174:デフォルトの名無しさん
06/12/04 18:45:31
うお　バグりまくり

175:デフォルトの名無しさん
06/12/04 18:58:10
#include <stdio.h>
typedef int n;n t[64]={0};n a(n i,n&g){n s=g%8;g+=("1987"[i%4]-48)*(i>3?-1:1);
return !((!s||s==7)&&s+g%8==7);}n h(n x,n m){n i=0,r=1,g=x;if(t[x])return 1;
for(;i<8&&a(i,g);i++,g=x){for(;t[g]==3-m&&a(i,g)&&g>=0&&g<64;){if(t[g]==m){
while(g!=x)a((i+4)%8,g),t[g]=m;r=0;}}}if(!r)printf("%s:%d %d\n",m==1?"黒":"白"
,x%8+1,x/8+1);return r;}n d(){n s=0,d,i=0;for(;i<64;i++){printf("□\0○\0●"+(
d=t[i])*3);if(i%8==7)puts("");s=s?d&&s!=d?3:s:d;}return s!=3;}void main(){n x=
1,y,p,m=0,c=0,k=0,r=-1;t[35]=t[28]=1;t[27]=t[36]=2;while(!d()||x&&k!=r){puts(
"x y");scanf("%d %d",&x,&y);m=m?m:x?1:2;if(x&&(--x>7||--y>7||h(x+y*8,m)))
continue;if(d())break;k=r=(c++/2+x*8+y)%64;while(++k!=r&&h(k,3-m))if(k>64)k=0;
}x=y=c=0;for(;c<64;c++)if(p=t[c])p==1?x++:y++;printf("黒:%d 白:%d %s",x,y,x>y?
"黒の勝ち":x<y?"白の勝ち":"引き分け");}

176:デフォルトの名無しさん
06/12/04 19:12:59
低レベルなのを上げられるくらいならいなくなったほうが・・・

177:デフォルトの名無しさん
06/12/04 20:06:25
低レベルなのも上げられないやつがいなくなったほうが

178:デフォルトの名無しさん
06/12/04 20:18:21
低レベルから高レベルに育っていく過程を見てみたいので期待ａｇｅ

179:デフォルトの名無しさん
06/12/04 21:04:04
七行(C)の心得

・ローカル変数は敵だ
・セミコロンも敵だ
・っていうか括弧も敵だ
・参考演算子は神

もっとある？

180:デフォルトの名無しさん
06/12/04 21:04:45
まちがえた。
○三項演算子
×参考演算子

181:デフォルトの名無しさん
06/12/04 21:05:20
なでしこは敵だ

182:デフォルトの名無しさん
06/12/04 21:19:59
再帰は敗北
番兵は勝利
7行プログラムは作る前から7行（構想と構造が大事）

183:デフォルトの名無しさん
06/12/04 22:58:03
> 7行プログラムは作る前から7行
なんか良く分かんないけど感銘を受けた

184:デフォルトの名無しさん
06/12/04 23:04:01
>>183
俺もだ
なんかこう…　　深いよな

185:デフォルトの名無しさん
06/12/04 23:08:11
!「nakonet.nako」を取り込む。サーバーとはＴＣＰサーバー。そのポートは80。サーバーを開始。
サーバーの受信した時は～
　　サーバーの受信データを「」で区切る。ファイル名はそれ[1]の「/」を「」に置換したもの。
　　もし、ファイル名が空ならば、ファイル名は「index.html」。
　　もし、ファイル名が存在するならば、ファイル名を開く。違えば、それは「なし」。
　　内容は「HTTP/1.0 200 OK{改行}Content-Type: text/html{改行}{改行}{それ}」。(サーバーの相手IP)へ(内容)をサーバーで送信。
サーバーの送信完了した時は～サーバーの相手IPをサーバーが切断。

(＾o＾)ﾉ＜HTTPサーバーできたぞー

186:デフォルトの名無しさん
06/12/04 23:14:16
>>185
7行なのはいいとして桁数オーバーしてないか？

187:デフォルトの名無しさん
06/12/04 23:17:53
>>186
(＾o＾)ﾉ＜こっちだったぞー

!「nakonet.nako」を取り込む。
サーバーとはＴＣＰサーバー。そのポートは80。サーバーを開始。
サーバーの受信した時は～サーバーの受信データを「」で区切る。ファイル名はそれ[1]の「/」を「」に置換したもの。
　　もし、ファイル名が空ならば、ファイル名は「index.html」。
　　もし、ファイル名が存在するならば、ファイル名を開く。違えば、それは「なし」。
　　内容は「HTTP/1.0 200 OK{改行}Content-Type: text/html{改行}{改行}{それ}」。(サーバーの相手IP)へ(内容)をサーバーで送信。
サーバーの送信完了した時は～サーバーの相手IPをサーバーが切断。

188:デフォルトの名無しさん
06/12/04 23:24:39
しかも、HTTPサーバって過去スレにあったよな

189:デフォルトの名無しさん
06/12/04 23:28:45
>>187
これがなでしこってやつなの？

>>188
だから(ry

190:デフォルトの名無しさん
06/12/04 23:37:33
既に誰かが解いたことのあるパズルってだけでやる気無くすのか？
そんなこたぁ無いだろー。

しかし、なでしこは初見だが、結構日本語風なんだな。びっくりした。

191:デフォルトの名無しさん
06/12/04 23:41:13
「メールホストを入力してください」と尋ねて、メールホストに代入。「メール差出人を入力してください」と尋ねて、メール差出人に代入。
「メール宛先を入力してください」と尋ねて、メール宛先に代入。「メール件名を入力してください」と尋ねて、メール件名に代入。
「メール本文を入力してください」で、メモ記入して、メール本文に代入。「いままでの内容が気に入らなければ、{改行}取消ボタンを押してください」を、「続行{改行}取消」のボタン選択。
もし、それが「続行」ならば、「メールホスト：{A}{改行}メール差出人：{B}{改行}メール宛先：{C}
メール件名：{D}{改行}メール本文：{E}{改行}{改行}送信します。」と言う。違えば、終了。
メール送信。「送信が終わりました」と言う。終了。

(＾o＾)ﾉ＜最低限機能メール送信ソフトだぞー

192:デフォルトの名無しさん
06/12/04 23:42:04
＾＾；

193:デフォルトの名無しさん
06/12/04 23:51:40
利用リストとはリスト。その幅は４００。退避ボタンとはボタン。退避リストとはリスト。その幅は４００。利用ボタンとはボタン。更新処理。
●更新処理（{=""}Ｆを{=""}Ａから{=""}Ｂへ）
　　もし、Ｆ≠空ならば、「{A}{F}」から「{B}{F}」へファイル移動。
　　利用リストのアイテムは「{SENDTOパス}*」をファイル列挙。退避リストのアイテムは「{SENDTOパス}退避\*」をファイル列挙。
退避ボタンをクリックした時は～
　　「{SENDTOパス}退避\」へフォルダ作成。利用リストをSENDTOパスから「{SENDTOパス}退避\」へ更新処理。
利用ボタンをクリックした時は～退避リストを「{SENDTOパス}退避\」からSENDTOパスへ更新処理。

(＾o＾)ﾉ＜Windows送るメニューカスタマイズソフトだぞー

194:デフォルトの名無しさん
06/12/04 23:55:47
とても読みやすいんだけど、書きにくくないか？

195:デフォルトの名無しさん
06/12/04 23:59:24
なでしこは案外作り易そうだな

標準で使えるライブラリのサポートが多いせいもありそうだけど
１文字(2Byte)辺りの表現力が高いお陰なのかな

196:デフォルトの名無しさん
06/12/04 23:59:39
俺はCとか英語で書くの本格的にやったこと無いから、そっちの方が異次元だ
なでしこなら

「Hello,World!」を表示。

の一行だぜ

197:デフォルトの名無しさん
06/12/05 00:00:19
なでしこなんか貼るな、空気嫁

198:デフォルトの名無しさん
06/12/05 00:01:33
なでしこの中の人すげーな

>>197
おまえが空気読め

199:デフォルトの名無しさん
06/12/05 00:03:38
というか、連投されると有り難みが薄れるぜ
でもせっかくだから、作り易いなら正規表現辺りにチャレンジして欲しい

200:デフォルトの名無しさん
06/12/05 00:04:43
どうかんがえてもなでしこの方が空気読めてません。

201:デフォルトの名無しさん
06/12/05 00:06:06
なでしこの欠点は速度とか云々よりも”日本語”だから駄目だと言われた。
日本語らしさを追求するばかり、機械的な書き方が出来なくなる、と

しかし二重インタプリタという感じで、メモリも速度も重いんだぜ

202:デフォルトの名無しさん
06/12/05 00:11:12
C/C++得意な人に聞きたいんだけど
&&の代わりに&を使うテクニックがあったよね
どういうときに使えるか覚えている人いる？
ぐぐり辛い…

203:デフォルトの名無しさん
06/12/05 00:12:28
>>201
なでしこってインタプリタなの？（　ﾟдﾟ）

204:デフォルトの名無しさん
06/12/05 00:15:28
はいそうです

205:デフォルトの名無しさん
06/12/05 00:17:12
>>202
&&は前の式がtrueなら後ろの式が評価されないけど&は評価される
ただ&は演算結果がboolean値ではないので思わぬ結果を巻き起こしやすいので
&&から&に変える場合には最新の注意が必要

206:デフォルトの名無しさん
06/12/05 00:18:12
>>202　ビット積演算子

207:デフォルトの名無しさん
06/12/05 00:19:23
>>202
なんか作成中なのか？

208:デフォルトの名無しさん
06/12/05 00:29:40
>>205-206
さんくす
結構限定的っぽいですねえ

>>207
いや…自分はまだそんなレベルじゃないです
過去の作品とか見ながら文字数の減らし方とか考えていてふと思ったので…
でも何か出来たら持ってきます

209:デフォルトの名無しさん
06/12/05 00:45:21
||の代わりに|なら比較的ありがちなテクニック。
あと&&の代わりに*もありがち。ただこっちはオーバフローの危険あり

210:デフォルトの名無しさん
06/12/05 02:06:55
なでしこかよｗｗ　ぱっと見て「なに構想語ってんの？」とか思ってしまった

211:デフォルトの名無しさん
06/12/05 06:36:36
まあまあ
７行なら良いじゃない

なでしこはその前身のひまわりより
書きにくいとも聞くがどうなんだろ

212:デフォルトの名無しさん
06/12/05 07:08:06
特に変わらないと思う
なでしこの処理速度はひまわりの十倍です

213:デフォルトの名無しさん
06/12/05 07:37:08
なでしこ面白いね
ただ七行にするためのテクニックを駆使するものではなさそうだけど

214:デフォルトの名無しさん
06/12/05 09:38:44
なでしこいいけど、1行80文字くらいは守ってもらおう

215:デフォルトの名無しさん
06/12/05 10:12:36
なでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこ
なでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこ
なでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこ
なでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこ
なでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこ
なでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこ
なでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこなでしこ

216:デフォルトの名無しさん
06/12/05 10:34:18
>>215
一見ただの荒らしに見えるが、「なでしこ」という文字の中にひとつだけ
違うものが混じっている。探してみよう！

m9（＾Д＾）

217:デフォルトの名無しさん
06/12/05 12:01:37
随分ノリノリだな

218:デフォルトの名無しさん
06/12/05 17:45:46
TTSneoのことも思い出してあげて下さい

219:デフォルトの名無しさん
06/12/05 21:33:18
なにそれ？

220:デフォルトの名無しさん
06/12/05 21:41:03
なでしこのようなものです

221:デフォルトの名出しこさん
06/12/05 23:46:00
なでしこでインデント禁止だと辛いです。この間、テトリス作って15行でした。
>>191の真似してメール送信フォームです。

S="ﾒｰﾙﾎｽﾄvﾒｰﾙ差出人vﾒｰﾙ宛先vﾒｰﾙ件名vﾒｰﾙ本文";C=~もし回数=5ならﾒｰﾙ送信;終
S=(Sをvで区切)を全角変換;文字ｻｲｽﾞ=16;反復,対象を9,回数*36-24へ文字表示;
ﾀﾞｲｱﾛｸﾞ数値変換=0;155,10へ移動;4回,E\回数をｴﾃﾞｨﾀとして作成;E[回数]→W=400
E\5をﾒﾓとして作成;E\5→W=400;E\5→H=230;母艦のﾀｲﾄﾙ="メール送信";送信とはﾎﾞﾀﾝ
その位置="560,365";そのｸﾘｯｸ時=~Sで反復,EVAL(対象&｢=E[{回数}]→ﾃｷｽﾄ｣),C

222:デフォルトの名無しさん
06/12/06 03:47:10
>221
暗号臭くなって来て良い感じｗ

223:デフォルトの名無しさん
06/12/06 09:46:20
>>221
イイヨイイヨー

224:デフォルトの名無しさん
06/12/06 15:44:47
１行目の「終」はなでしこならではだね
ホントは「終わり」だったと思うけど
なでしこは漢字＋送り仮名の命令に対して
助詞以外の送り仮名は飛ばす
Mindとかでもそうなってるハズ

225:デフォルトの名無しさん
06/12/13 08:49:50
>>221
ちょっとなでしこに興味湧いた

226:デフォルトの名無しさん
06/12/19 00:19:30
com2textを半角ｶﾅﾊﾞｰｼﾞｮﾝで、
ファイル指定は8.3形式で、
ゴミがつくのは仕様で、
実行は自己責任で。

H72ﾀPQSVWP[Pｸﾂﾂ0G=0GAs2A0GN1GP0GY0G[0Gg0Gl0Gv1Gy3ﾉｱ0T_)ﾏ)ﾏWｾSﾃ､Iu>%
@3ﾛKCuﾌXｾ}ﾃ_="@3ﾀｬ,&|9uﾅ_^[Y3ﾀﾃHP[ｱﾄｬ<｡xﾀ,0,0ﾑﾛﾑﾐｪ<ﾉu,)ﾗ#
Oｺ1ｽ60ﾆX@ｽ50ﾆ@Xｽp01?Q1ﾃ30ｼp0Jｿp0ｸ@ﾙ5ｷWuﾋｼ06Nﾆ@uﾌi[mｺ4ｽｳ06ﾆ@ｾ50ｺ*Oｼ30ｽD51ﾆ@rﾀj
(UｿD1[[2_Iﾉｼ300Iﾀｶﾈﾌﾈ+ﾍNSl12WH2HｵTj(ﾗﾈﾍﾈﾍpYﾁCｺ1ﾆ@I_ｼ30ｶu_ﾈｺ1ﾆ@T4jﾛVjｼｺ[1ｽ60ﾆ@
_ｽ50ﾆ@ｾ450ﾕｳｽC?0ｺ1ﾆ@ｺ-Oﾆ@ｺ1ｽ460ﾆ@ｽ550ﾆ@ﾆ@TXKIﾀXXY1[[X]Xｼ?ﾁﾁHSNH>SPiIPH4SWHSXH
BS\HS]H2ScHSfHdSkHSlIZﾄｸHZ_DVﾇDﾇ[ｿYTﾁｲTjOB`65PIﾍUJQjﾆ\ｿnNﾁ_NAPIGﾀｶFCnL^jﾂ__]\
LIﾀﾁTX]8ｸﾂｶNｰlGﾀFHFHﾈJﾍﾈﾈｵNﾄdjFDﾋA6'5B0000'000000&

227:デフォルトの名無しさん
06/12/19 01:57:17
バイナリは誰かがためしてからじゃないと怖くて実行出来ないです＞＜

228:デフォルトの名無しさん
06/12/19 02:20:51
誰かが試しても実行できないけど、自分自身をcom2textしているのはわかった。
行末の改行そのままでいいの？

229:デフォルトの名無しさん
06/12/19 12:45:39
>>228
やってみた。
・行末の改行はCRLFを残す
・>>226の行末についてしまっている空白は取り除く
・JIS X0201
で。

コード表眺めて気がついたけどNOP使えないから小賢しい技はちょっと使いづらいね。

230:226
06/12/20 00:14:09
行末の空白をひとつだけ無視できるように。
ファイルにリダイレクトした時そのまま使えるように。
変な事してるっぽいけど気にしない。

H72ﾀPQSVWP[Pｸﾂﾂ0G;0G?s1KA0GP1GR0G[0G]0Gi0Gn0Gz3ﾉｱ0T_)ﾏ)ﾏWｾTﾃ､Iu>5
4@3ﾛCAKuﾌXｾ}ﾃ_="54@ｬ,&|9uﾅ_^[Y3ﾀﾃHP[ｱﾄｬ<｡xﾀ,0,0ﾑﾛﾑﾐｪIu-tﾙ######Xｽp01?Q1ﾃ30ｼp0
Jｿp0ｸ@ﾙ5ｷWuﾋｼ06Nﾆ@uﾌi[gｺ4ｽｧ0.ﾆ@ｾ10ｺ*Oｼ30ｽ951ﾆ@rﾀj(Uｿ91[[2_Iﾉｼ300Iﾀｶﾈﾌﾈ+ﾍNSl12
WH2HｵTj(ﾗﾈﾍﾈﾍpYﾁCｺ1ﾆ@I_ｼ30ｶu_ﾈｺ1ﾆ@T4jﾛVjｼｺ[1ｽ60ﾆ@_ｽ50ﾆ@ｾ450ﾕｳｽC?0ｺ1ﾆ@ｺ5Oﾆ@ﾆ@T
XKIﾀXXY1[[X]Xｼ?ﾁﾁHSMHfSOiHUPAHSXHSY]HS]HS^=HSdHSgaHSmIﾄｸcHZ_DﾇD:ﾇ[ｿZﾁｲBTjOJ65
cJPIﾍQPJUjﾆ\ｿn>ﾁ_NAJJGPｶFCnL^jﾂ__]\LIﾀﾁTX]8ｸﾂｶNｰlGﾀFHFHﾈZﾍﾈﾈｵTjdFjﾌAAA.AAAB00&

231:デフォルトの名無しさん
06/12/20 00:55:25
>>230
カタカナ無しは無理かな？int 21hのどこかが必ずカタカナに抵触しそうかな。
確かCD 21だったよね

232:デフォルトの名無しさん
06/12/20 22:17:27
変換効率が3/2とかなら簡単だろうけど、4/3だと難しそう。
intよりもmovやシフトが使えないのが痛い

233:デフォルトの名無しさん
07/01/02 01:21:25
07年age

234:デフォルトの名無しさん
07/01/18 18:49:08
保守がてら

参考リンク
URLﾘﾝｸ(www.4dm.org)

7行ネタが思い付かない人は、PKUに挑戦してみるのだ

235:デフォルトの名無しさん
07/01/19 00:32:26
>>234
面白いものつくってなーｗ

236:デフォルトの名無しさん
07/01/19 05:22:24
アセンブラ用に使えるニモニックの一覧表ってどこにあるんだっけ

237:デフォルトの名無しさん
07/01/19 10:43:21
>>236
石は……？

238:デフォルトの名無しさん
07/01/19 11:34:14
適当なバイナリ作って逆汗

239:デフォルトの名無しさん
07/01/19 16:33:39
>>236
アセンブラのソースコードでも読めば。

240:デフォルトの名無しさん
07/01/22 21:26:35
>>234
A+B Problemからわからんorz

241:デフォルトの名無しさん
07/01/23 19:04:29
>>240
問題のヒントに答えが書いてありますがな

242:240
07/01/23 19:43:36
>>241
さすがに答えはわかるｗそうじゃなくて、どうやって短く書いてんのかがさっぱりわからんってこと。

243:デフォルトの名無しさん
07/01/23 19:52:47
>>242
参考程度に昔自分が書いてたコード
main(n){gets(&n);putchar(n%85+5);}
これはAとBの合計が10未満で、
入力の1Byte目がA,2byte目が空白,3byte目がB,4byte目が改行|EOFのときだけ動く。
今はテストケースが改善されて10以上もあるから通らないけどな。

244:デフォルトの名無しさん
07/01/24 19:14:12
C#でブロックソート書いてみた。

using　System;using　System.Collections.Generic;namespace　BWT{public　static
class　BlockSort{public　static　int　Sort(ref　byte[]data){int　l=data.Length,i=1,j
;byte[][]t=new　byte[l][];t[0]=data;for(;i<l;i++){t[i]=new　byte[l];for(j=1;j<l;
j++){t[i][j]=t[i-1][j-1];}t[i][0]=t[i-1][l-1];}Array.Sort<byte[]>(t,new　Comp()
);i=Array.IndexOf<byte[]>(t,data);for(j=0;j<l;j++){data[j]=t[j][l-1];}return　i
;}}class　Comp:IComparer<byte[]>{public　int　Compare(byte[]x,byte[]y){int　r=0,l=
x.Length,i=0;for(;i<l;i++){r=(int)(x[i]-y[i]);if(r!=0)i+=l;}return　r;}}}

ジャグ配列のソートを自前で実装するのは行数的に厳しいです　orz
修行が足りません。

245:244
07/01/24 19:41:10
同じくソート解除

using　System;using　System.Collections.Generic;namespace　DBWT{struct　DE{public
DE(int　i,byte　d){Ind=i;Data　=　d;}public　int　Ind;public　byte　Data;}public
static　class　DeBlockSort{public　static　void　Restoration(int　ind,ref　byte[]data
){int　i,l=data.Length;DE[]　de=new　DE[l];for(i=0;i<l;i++){de[i]=new　DE(i,data[i
]);}Array.Sort<DE>(de,new　Comp());for(i=0;i<l;i++){data[i]=de[ind].Data;ind=
de[ind].Ind;}}}class　Comp:IComparer<DE>{public　int　Compare(DE　x,DE　y){if(x
.Data　!=　y.Data){return(int)(x.Data-y.Data);}else{return　x.Ind-y.Ind;}}}}

やっぱりまだまだです　orz

246:デフォルトの名無しさん
07/01/24 20:24:34
perl -e "for(;;){print eval<STDIN>}"

インタラクティブパールできたよー

247:デフォルトの名無しさん
07/01/24 20:31:50
引数何も無しでおｋだから、さ

248:デフォルトの名無しさん
07/01/24 21:10:17
perl -pe '$_=eval$_'
これで十分だろと

249:デフォルトの名無しさん
07/01/24 21:12:09
それは長すぎ。
perl　-pe　"$_=eval($_)"
で十分。

250:249
07/01/24 21:13:27
被った上に()の分負けてるー
orz

251:デフォルトの名無しさん
07/01/25 02:49:12
perl -pe 'eval$_'

でいいんじゃない？

252:デフォルトの名無しさん
07/01/25 11:45:00
これって標準入力を評価して標準出力に出力するってこと？
具体的にどういう使い方があるの？

253:デフォルトの名無しさん
07/01/25 13:43:07
irb のように使う？

254:デフォルトの名無しさん
07/01/25 23:44:26
電卓がわりとかじゃね？

255:デフォルトの名無しさん
07/01/26 00:44:33
あなたの実家に腐ったイカを送りましたよ

256:デフォルトの名無しさん
07/01/26 19:59:39
ある変数がマイナスだったら-1、プラスだったら1 に変換するCの式
if( a<0 ){
　a=-1;
}else if( a>0 ){
　a=1;
}else{
　a=0;
}
を、なんか格好よく書くにはどんな本を読んで勉強するべきでしょうか？

257:デフォルトの名無しさん
07/01/26 20:12:38
>>256
(a>0)-(a<0)
(a>=0)-(a<=0)
(a>>31)|((unsigned)-x>>31)　(算術シフト前提)

258:デフォルトの名無しさん
07/01/26 20:19:16
まず中1の数学の教科書だと思う。
a = a ? -1 * ( a / a ) : a;

259:デフォルトの名無しさん
07/01/26 20:22:10
あ、ちがった。ゴメン。
a = a > 0 ? 1 : ( a < 0 ? -1 : 0 );
とか。

260:256
07/01/26 21:08:24
>>258
ヒントありがとう

a = (a>0)-(a<0);
までがんばれたっぽい。

261:デフォルトの名無しさん
07/01/27 00:10:37
>>260 >>257の一番上

262:デフォルトの名無しさん
07/01/27 01:55:23
もうすこし短くならない？

263:デフォルトの名無しさん
07/01/27 01:56:35
そういう関数があったと思ったが・・・

264:デフォルトの名無しさん
07/01/27 01:58:51
これ以上はむりじゃね？

265:デフォルトの名無しさん
07/01/27 06:43:02
>>179の心得に従ってみた
a=a>0?1:-!!a

266:デフォルトの名無しさん
07/01/27 10:13:35
>>183に従え

267:デフォルトの名無しさん
07/01/27 14:25:48
>>265
ｽﾊﾟｼｰﾊﾞ

268:デフォルトの名無しさん
07/01/27 16:11:59
>>265
:-!!
監禁されてガムテープで口縛られてるみたいだぞ

269:デフォルトの名無しさん
07/01/27 16:43:12
a=a>0||-!!a;

↑ってどう？

270:デフォルトの名無しさん
07/01/27 17:35:56
a=５のときどうなる？

271:デフォルトの名無しさん
07/01/27 17:44:36
>>269
正しく動かない。
main(){
int a = -5;
a=a>0||-!!a;
assert(a==-1);
return 0;
}

272:デフォルトの名無しさん
07/01/27 17:54:52
あ、そっか0か1にしかなんねーじゃん

273:デフォルトの名無しさん
07/01/27 18:04:00
まだそんなこと言ってるの？
アホが1匹まじってますよ～

274:デフォルトの名無しさん
07/01/27 18:09:37
短い順

a=a>0?1:-!!a; //13
a=(a>0)-(a<0); //14
a=a>=0+(a>0)-1; //15
a=(a>=0)-(a<=0); //16
a=a>0?1:a<0?-1:0; //17

275:デフォルトの名無しさん
07/01/27 18:11:14
>>274
3つ目はカッコないとだめだろ
a=(a>=0)+(a>0)-1; //17

276:デフォルトの名無しさん
07/01/27 18:13:46
a>0が真のとき値は必ず-1になるんですか？

277:デフォルトの名無しさん
07/01/27 18:16:09
間違えた
1desu

278:デフォルトの名無しさん
07/01/27 21:01:51
環境によるんじゃないかなぁ、実のところ。

279:デフォルトの名無しさん
07/01/27 23:27:29
今までの作品見てて思ったんだが、音物ってまだでてないね。
やっぱりヘッダだけでもかなり文字数食うのかな。

280:デフォルトの名無しさん
07/01/27 23:37:20
>>279
1行食うからな…

でもwindows.hだけでbeep音は鳴らせるよな？

281:デフォルトの名無しさん
07/01/28 00:09:18
10 BEEP

282:デフォルトの名無しさん
07/01/28 00:25:02
>>279
昔のMSXとかBASIC見たいにMML鳴らせればねえ

283:デフォルトの名無しさん
07/01/28 00:58:37
10 PLAY ALLOC 0: PLAY "CDEFG"

284:デフォルトの名無しさん
07/01/28 02:23:05
cygwinとかbsd系でdsp使える環境
#include　<sys/ioctl.h>
#include　<fcntl.h>
int　main(void){int　rfd,dfd;char　buf[1024];rfd=open("/dev/random",O_RDONLY);dfd=
open("/dev/dsp",O_WRONLY);while(1){read(rfd,buf,1024);write(dfd,buf,1024);}}

音なるよ

285:デフォルトの名無しさん
07/01/28 02:42:59
それで4行なら7行で方形波生成+メロディ位いけるんじゃないか?

286:デフォルトの名無しさん
07/01/28 02:48:27
>>284
read, write未定義って言われる・・・

287:デフォルトの名無しさん
07/01/28 02:50:37
cygwinいれんのﾏﾝﾄﾞｸｾ
会社行ったらやってみよ

288:デフォルトの名無しさん
07/01/28 02:51:01
#include <unistd.h>
か、
すげーーーーー音なった!!

289:デフォルトの名無しさん
07/01/28 02:52:09
ちなみに、cygwinです。

290:デフォルトの名無しさん
07/01/28 02:54:11
ちなみにどんな音がなるんだ？

291:デフォルトの名無しさん
07/01/28 02:56:16
いや、ノイズだよ。
ザーって。

292:デフォルトの名無しさん
07/01/28 02:56:56
/dev/random辺りから察して砂嵐だろう

293:デフォルトの名無しさん
07/01/28 02:57:52
ボリュームに気をつけたほうがいい。いつもので行ったら死にそうになった。

294:デフォルトの名無しさん
07/01/28 02:58:00
なんだ
ランダムだからどんなんかな～と思ったけど、一音そんなに短いのか

295:284
07/01/28 02:58:13
>>288　thx
>>290　/dev/randomから読み取ってdspに直書きしてるだけだから>>291です
単一の音色のソフトシンセくらいなら作れる可能性があるね7行で

296:デフォルトの名無しさん
07/01/28 02:59:21
/dev/dspってすげーな。

> cat /cygdrive/c/WINDOWS/Media/tada.wav > /dev/dsp

普通にwav鳴らせるんだ・・・

297:デフォルトの名無しさん
07/01/28 03:00:55
こんな時間に人が沸いてきた方が驚きなんだけど。仕事中か？

298:デフォルトの名無しさん
07/01/28 03:00:59
ああ、>>ちなみにcygwinのコマンドラインで
cat　/dev/random　>　/dev/dsp
などとしても音なるよ
同じことです

299:デフォルトの名無しさん
07/01/28 03:03:29
>>296
んだんだ
cygwinのdspさんはwaveファイルも使えるんだ

あとioctl()とか使ってサンプリングレートとかチャンネル数とか変えれるから、
ちょっと気張ればネット越しに音鳴らすサウンドサーバが出来る
mixingも自力で頑張ればウハウハ

コード自体はfreebsdでも動くから、bsd機をpxebootで起動させればHDDいらずで(ry

300:デフォルトの名無しさん
07/01/28 03:36:23
#include <windows.h>
int d[]={659,195,2,739,184,2,783,164,4,739,220,2,659,220,2,622,246,4,659,220,2,
739,220,2,493,195,4,554,184,2,622,184,2,659,164,4,587,184,2,523,184,2,493,195,4
,440,220,2,391,220,2,361,246,4,391,220,2,440,220,2,493,195,2,440,195,2,391,246,
2,361,246,2,329,164,2,329,184,2,659,195,2,739,184,2,783,164,4,739,220,2,659,220
,2,622,246,4,659,220,2,739,220,2,493,195,4,554,184,2,622,184,2,659,164,4,587,1\
84,2,523,184,2,493,195,4,440,220,2,391,220,2,369,293,6,391,293,2,391,195,8};vo\
id b(int x,int y, int z){if(y){for(int i=0;i<z/50;++i){Beep(x,25);Beep(y,25);}}
else{Beep(x,z);}Sleep(0);}int WINAPI WinMain(HINSTANCE,HINSTANCE,LPSTR,int){fo\
r(int i=0;i<sizeof(d);i+=3)b(d[i],d[i+1],d[i+2]*100);return 0;}
ノートが周波数そのままなので、七行超えてしまた。Beep()で音が鳴るPCでどうぞ。
Bio_100%の蟹味噌のインスパイアです。

301:デフォルトの名無しさん
07/01/28 03:53:05
>>300
すげー、ピコピコなってるよ・・・

かに味噌なつかしす( ´ー｀)

302:300
07/01/28 04:30:09
#include <windows.h>
int d[]={659,195,2,739,184,2,783,164,4,739,220,2,659,220,2,622,246,4,659,220,2,
739,220,2,493,195,4,554,184,2,622,184,2,659,164,4,587,184,2,523,184,2,493,195,4
,440,220,2,391,220,2,361,246,4,391,220,2,440,220,2,493,195,2,440,195,2,391,246,
2,361,246,2,329,164,2,329,184,2,659,195,2,739,184,2,783,164,4,739,220,2,659,220
,2,622,246,4,659,220,2,739,220,2,493,195,4,554,184,2,622,184,2,659,164,4,587,1\
84,2,523,184,2,493,195,4,440,220,2,391,220,2,369,293,6,391,293,2,391,195,8};vo\
id b(int x,int y, int z){for(int i=0;i<z/50;++i){Beep(x,25);Beep(y,25);}}int W\
INAPI WinMain(HINSTANCE,HINSTANCE,LPSTR,int){for(int i=0;i<sizeof(d)/sizeof(in\
t);i+=3)b(d[i],d[i+1],d[i+2]*100);return 0;}
酷いバグを直して19バイト削減。曲データ抜きなら4行だから、まぁアリってことにしてくださいm(__)m

次ページ