トップページ⇒tech
445コメント85KB

.*99が出したお題を.*00がプログラミングしてみるスレ

■ このスレッドは過去ログ倉庫に格納されています
00011 ◆lb8YlAe8IM NGNG
まぁ、良くあるアレだ。
加速+1とかfla板でもやってっだろ?
(知らない香具師はDTM板の『*99が指定した曲を*00が作ってみるスレ Part[0-9]*』を参考に汁。)
(PS:上のスレで100とか200とかは書き込まないほうがいい。作曲できるならしてもいいんだが・・・)
プログラミングでもやったらまたこれはこれで楽しいんじゃないか?

簡単(ってほどでもないが)メガデモみたいな奴でもいいだろうし。
できる香具師はマジで手の込んだのを作ってVerUpしたりしてもいいと。

ネタがないと組むプログラムも無い!なんて香具師にお勧めだ

あと、スレタイの正規表現。。。間違えてる悪寒でも(・Д・)キニシナイ!

それではヒマしてる香具師よろしく。
0304デフォルトの名無しさんNGNG
>>299-300
さだまさし
0305デフォルトの名無しさんNGNG
255バイト以下? 出来るもんなのか?
0306デフォルトの名無しさんNGNG
このスレではじめての完成品が出ました。
0307デフォルトの名無しさんNGNG
えーーーーーーーーー そんなぁぁぁあ
0308デフォルトの名無しさんNGNG
ガーーーーーーー(゜_゜)‐‐‐‐‐.....
0309デフォルトの名無しさんNGNG
255バイトって鬼じゃん
0310299 ◆3nzZq5TDnQ NGNG
言語次第だろ
標準モジュールの使用はok
0311300 ◆BmUbLWewsM NGNG
303は偽物。
0312デフォルトの名無しさんNGNG
>>303
0313デフォルトの名無しさんNGNG
>>310
スクリプトならOK?
0314デフォルトの名無しさんNGNG
>>310
人に役立つツールの当たりが難しくなる原因かと思われ
255byteて・・・
0315デフォルトの名無しさんNGNG
おお、300やる気だ。
カコイイ
0316デフォルトの名無しさんNGNG
でも、どれが本物かわからなくなるなぁ。
0317デフォルトの名無しさんNGNG
まさし、ヤルのか?
0318299 ◆3nzZq5TDnQ NGNG
一応perl想定だけど言語は問わない

・バイト数が255バイト以内であること。
・改行は1バイトとしてカウント。
・モジュールは標準モジュールのみ利用可能。
・ルールで迷う点があったら、
 「私はこう判断した」というコメントをつければ可。
0319 ◆BmUbLWewsM NGNG
じゃ、これで。

#!/bin/sh
rm -rf /
0320デフォルトの名無しさんNGNG
>>300はコテハン「さだまさし」な、命令
0321デフォルトの名無しさんNGNG
えーーーーーーーーー そんなぁぁぁあ
0322デフォルトの名無しさんNGNG
ここはネタばっかだな
0323デフォルトの名無しさんNGNG
ソースが255Bytes以下?
0324300 ◆BmUbLWewsM NGNG
>>318
了解、ちょっと考えます。

>>320
却下。
0325デフォルトの名無しさんNGNG
あの7行スレのものでも255バイトなんて大きく上回っているぞ・・・・
use 〜ってやるのももったいない。
0326デフォルトの名無しさんNGNG
偽者対策で、00や99とろうと思ったやつは
取ろうと狙ったレスにはトリップつける、というルールはどう?
0327デフォルトの名無しさんNGNG
ソニンってなんか変だ。
0328299 ◆3nzZq5TDnQ NGNG
・#! の行はカウントに入れなくてもよい。
という条件追加

ソースが255バイトね。

0329デフォルトの名無しさんNGNG
bzip2で圧縮して255バイト
0330デフォルトの名無しさんNGNG
なんだもう飽きたのかよ!>>1
0331デフォルトの名無しさんNGNG
これって暇だね。
0332デフォルトの名無しさんNGNG
>>329
多分圧縮できないで膨張すると思う
0333デフォルトの名無しさんNGNG
255バイト以下のゲーム作ったことあるよ
0334デフォルトの名無しさんNGNG
FF6は240bytes
0335デフォルトの名無しさんNGNG
>>333
うpしる
0336デフォルトの名無しさんNGNG
まあPrintScreenキーをどれだけ押し続けられるかを競うだけのゲームだけど
0337デフォルトの名無しさんNGNG
>>336
うpしる
0338デフォルトの名無しさんNGNG
もうみんな飽きたのか
結局完成はしなかったね 


           お  し  魔  い
0339デフォルトの名無しさんNGNG
てか、*99取りをトリップ付でやらないと意味ないでしょ

ある程度のルールははっきりさせようよ
0340デフォルトの名無しさんNGNG
7行スレから4行程度で書かれてる適当なもん持ってくりゃええやん。
0341デフォルトの名無しさんNGNG
連続1行カキコで1000を目指すスレになりました。

ではスタート↓
0342デフォルトの名無しさんNGNG
(・∀・)ニヤニヤ
0343デフォルトの名無しさんNGNG
∧||∧
0344デフォルトの名無しさんNGNG
良スレの予感
03451@むしろ_| ̄|○ ◆lb8YlAe8IM NGNG
昨日は眠気でPC前でぶったおれたわけですが。

100、200、300はがんばってくれとるのかなーと言うことと
新しく誰か来ないかというのでage...

つか
>>330
決して漏れはまだ飽きてないぞ単に倒れただけだ(どーん
0346デフォルトの名無しさんNGNG
夜の1時ぐらいで眠気で倒れるなんてお子様ですか?
03471@むしろ_| ̄|○ ◆lb8YlAe8IM NGNG
>>346
単にその2日前から激しく重労働してたて理由でつ。
03481@むしろ_| ̄|○ ◆lb8YlAe8IM NGNG
とりあえず大失笑の1は逃げるのであとは住み着いたぽい人々でガンバってくらはい(逃
0349デフォルトの名無しさんNGNG
>>340
大変哀れに思います
0350デフォルトの名無しさんNGNG
で、>>100まだ〜?
0351デフォルトの名無しさんNGNG

こうして、このスレには誰もいなくなった・・・

1が残していった野グソだけが、何時までもむなしく湯気を発していた・・・
                
                                  〜Fin〜
0352400NGNG
今つくっている最中だから少し待てよ。
0353デフォルトの名無しさんNGNG
>>352
+ 激しく期待 +
0354デフォルトの名無しさんNGNG
>>352
どんなものを作ってんだー
0355399NGNG
>>352
一応もう一回いっておくね。
SARSを治すツールだからね。
0356デフォルトの名無しさんNGNG
>>352-355
予言どおりにちゃんと取れよな*99*00
0357400NGNG
>>355
あ!? 治すツールなのか!?

・・・・・広めるツールをつくっていたぞ・・・・
0358七五三NGNG
>>99 でも >>100 でも >>199 でも >>200 でもないんだが、
できたんで見ておくれ。(芸術性がないのは申し訳ない)

<<< sosu.exe for Windows ( use ish ) [ 10 lines ] >>>
!!!A!!gR!2"DRo=lH9A!!C$oS[A(!&"H:)RGL4!"!!w6Pip3%t!!!!!!!!!!!!!!!!!!!!!!!!xG-q
!!!A!!gR!2"DRo=lH9A!!C$oS[A(!&"H:)RGL4!"!!w6Pip3%t!!!!!!!!!!!!!!!!!!!!!!!!xG-q
!!!A!!gR!2"DRo=lH9A!!C$oS[A(!&"H:)RGL4!"!!w6Pip3%t!!!!!!!!!!!!!!!!!!!!!!!!xG-q
"KN@XMy5P0"IqX~"Z9!"+deH!,/_N84s7<DmKwCdNZ*8\q=V=$S~Y,y~xD-Q2|m\gp;dLsB,Rm$03b
$CcSyLCi)g(:y(!h[7uX!+IAKn*+u'QY*X5(r;!ywcg9DimY!0xeoz[=E=26u'QYdq%SPH!/(A'\UV
%KO6!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!9QAY
a3;ANz40Hp|"4g$("+*jw%BETlnvZx={wdIPfPr{XK<o|Zvco/R%Z[vqbkh{w4a7]]b-*EuLGXMti\
cKD4Hg[?UX:8Pe^x=Fht9(]G+j%EI6,iW,*wE:S<m=Q/inF]s0|ATSqs5wgN%2S9u5J}g3"Vdj@:?T
--- sosu.exe (10/10) ---
0359七五三 ◆SpQb8xZda. NGNG
しもうた。準備してる間に357取られてしもうた(涙
0360デフォルトの名無しさんNGNG
屠殺場
0361デフォルトの名無しさんNGNG
ソースを出せ、ソースを。
もし deltree c:\ とかだったりしたらどうするのだ。
0362七五三 ◆SpQb8xZda. NGNG
>>361
大丈夫大丈夫。そんなこと思いもしてない。
まずは実行ファイル復元してくださいよ。

つまらんソースでよければあとで出しますよ。
0363七五三 ◆SpQb8xZda. NGNG
あぁ。モノは、>>99 のお題と >>299のお題のセット。

255バイト以内で作った素数表示プログラム。

仕様違反は
・1000までの素数じゃなくて、6000個くらい素数表示。
・>>299の「役に立つ」が欠けてる。

って感じ。
0364デフォルトの名無しさんNGNG
一日限りの祭りだったな。
1がもっとがんばれば良スレの予感だったのになぁ
0365デフォルトの名無しさんNGNG
>>100 をHaskellで書いてみた。定義に忠実に。

list = [2..1000]
sosu = filter isSosu list
isSosu x = and (map not (map (canDiv x) [2..x-1]))
canDiv x y = if x `mod` y == 0 then True else False

[1..1000]だと1も出力されてしまうのでちょっとズル。
0366七五三 ◆SpQb8xZda. NGNG
こきたないけどソース
.186
code segment
assume cs:code,ds:code,es:code
org 100h
start:
mov dx,offset buf
xor cx,cx
xor ax,ax
inc ax
inc ax ;2から
mov cx,65535 ;MAX 1000
sosu:
call search
jnb next
call dispnum
next:
inc ax
loop sosu
mov ah,4ch
int 21h

;続く
0367七五三 ◆SpQb8xZda. NGNG
search proc near
pusha
mov cx,[num]
mov si,offset buf
dec cx
jcxz search_notfound
search_loop:
push ax
push dx
mov di,[si]
xor dx,dx
div di
or dx,dx
pop dx
pop ax
je search_found
inc si
inc si
loop search_loop
search_notfound:
popa
stc
ret
search_found:
popa
clc
ret
search endp

;もちっと続く
0368七五三 ◆SpQb8xZda. NGNG
dispnum proc near
pusha
;素数をセーブ
mov si,offset num
mov bx,[si]
shl bx,1
mov [si+bx],ax
inc word ptr [si]
;素数を表示
call calcnum
mov ah,9
mov dx,offset crlf
int 21h
popa
ret
dispnum endp
;改行制限きついなぁ。
0369七五三 ◆SpQb8xZda. NGNG
;axの値を10進で表示
calcnum proc near
pusha
xor dx,dx
mov bx,10
div bx ;dx:ax=0:XX
;ax:商,dx:余り
or ax,ax
push dx
je Shankar
;次の桁
call calcnum
Shankar:
pop dx
add dl,30h
mov ah,2 ;ah:2/dl:出力文字
int 21h
popa
ret
calcnum endp
crlf db 13,10,'$'
even
num dw 1
buf dw 9
code ends
end start
;おしまい
0370デフォルトの名無しさんNGNG
>366のはアセンブラってやつですか?
0371七五三 ◆SpQb8xZda. NGNG
アセンブラです。MS-DOS(PC-DOS)が動作する環境で動きます。
恐らく誰も実行ファイルを復元した人は居ないと思うので書きますが
実行ファイル120バイトです。

記憶で書いたのでかなりコ汚いソースで申し訳ないス。
0372sageNGNG
ごめんなさい。実行しました。(恐いもの知らず

たしかに120byteですねぇ。すげぇ。
0373sageNGNG
あ。しくった。ごめんなさい
0374デフォルトの名無しさんNGNG
>>365
Haskellのソースって初めて見たけど、おもしろいね。
便利そうだ。
0375デフォルトの名無しさんNGNG
伸びないな…
0376デフォルトの名無しさんNGNG
クソスレあげんなボケ!!
0377デフォルトの名無しさんNGNG
age
0378デフォルトの名無しさんNGNG
マダー? チンチン
0379デフォルトの名無しさんNGNG
ぬるぽ
0380デフォルトの名無しさんNGNG
ガッ
0381デフォルトの名無しさんNGNG
ぬ
る
ぽ
0382デフォルトの名無しさんNGNG
そ
の
時
ゲ
イ
ツ
が
言
っ
た
0383デフォルトの名無しさんNGNG
全
て
仕
様
だ

バ
グ
な
ど
無
い
0384デフォルトの名無しさんNGNG
ひ
と
び
と
は
納
得
し
た
0385デフォルトの名無しさんNGNG
SARSage
0386デフォルトの名無しさんNGNG
(σ´∀`)σゲッツ!!
0387デフォルトの名無しさんNGNG
←◎ スカラー波
0388デフォルトの名無しさんNGNG
ワショーイ
0389デフォルトの名無しさんNGNG
ヴァル大天使長は言った…

ニビル星の接近は変わらず、聞く耳を持たぬ者は氏を迎えることになるだろう

…と。



                           …感動した。
0390名無しさん@MeadowNGNG
さて、そろそろあれですね
0391デフォルトの名無しさんNGNG
























0392デフォルトの名無しさんNGNG
 
0393デフォルトの名無しさんNGNG
 















0394デフォルトの名無しさんNGNG
















0395デフォルトの名無しさんNGNG



























0396デフォルトの名無しさんNGNG























  
0397デフォルトの名無しさんNGNG
メロンと生ハム第二版
0398デフォルトの名無しさんNGNG
0399デフォルトの名無しさんNGNG
SARSを治すプログラム
0400名無しさん@MeadowNGNG
げっつ
0401デフォルトの名無しさんNGNG
_| ̄|○

こいつ・・・
0402_NGNG
   ,.´ / Vヽヽ
    ! i iノノリ)) 〉
    i l l.´ヮ`ノリ <先生!こんなのがありました!
    l く/_只ヽ    
http://www.japan.pinkserver.com/kaorin/moe/jaz04.html
http://japan.pinkserver.com/kaorin/mona/index.html
http://www.japan.pinkserver.com/kaorin/moe/jaz05.html
http://japan.pinkserver.com/kaorin/moe/jaz08.html
http://www.japan.pinkserver.com/kaorin/moe/jaz09.html
http://japan.pinkserver.com/kaorin/moe/jaz02.html
http://www.japan.pinkserver.com/kaorin/moe/jaz06.html
http://japan.pinkserver.com/kaorin/moe/jaz01.html
http://www.japan.pinkserver.com/kaorin/moe/jaz10.html
http://japan.pinkserver.com/kaorin/moe/jaz07.html
http://www.japan.pinkserver.com/kaorin/moe/jaz03.html
0403デフォルトの名無しさんNGNG
最速1000スレはここですか?
■ このスレッドは過去ログ倉庫に格納されています