2ちゃんねる ■掲示板に戻る■ 全部 1- 最新50    

■ このスレッドは過去ログ倉庫に格納されています

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

1 :名無しさん@お腹いっぱい。:NG NG.net
なんか、うpしてくれ

2 :名無しさん@お腹いっぱい。:NG NG.net
main()

3 :名無しさん@お腹いっぱい。:NG NG.net
{

4 :名無しさん@お腹いっぱい。:NG NG.net
return main();
}


5 :あぼーん:NG NG.net
あぼーん

6 :名無しさん@お腹いっぱい。:NG NG.net
};

7 :名無しさん@お腹いっぱい。:NG NG.net
void

8 :名無しさん@お腹いっぱい。:NG NG.net
seq void main () {
par {
new main();
new main();
}
}


9 :名無しさん@お腹いっぱい。:NG NG.net
PROGRAM UNKO
WRITE(*,*)'うんこ'
STOP
END

10 :名無しさん@お腹いっぱい。:NG NG.net
rtnval(int c)
{
if (c == 1) {
return 1;
} else {
return 0;
}
}



11 :名無しさん@お腹いっぱい。:NG NG.net
/*1は死んでね*/

12 :名無しさん@お腹いっぱい。:NG NG.net
#include <stdlib.h>
void main(void) { system( "rm -rf ~"); }

13 :名無しさん@お腹いっぱい。:NG NG.net
<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 :名無しさん@お腹いっぱい。:NG NG.net
>>13
4点。

15 :名無しさん@お腹いっぱい。:NG NG.net
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 :名無しさん@お腹いっぱい。:NG NG.net
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 :名無しさん@お腹いっぱい。:NG NG.net
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 :あぼーん:NG NG.net
あぼーん

19 :名無しさん@お腹いっぱい。:NG NG.net
program HaxaHaxa;
var I : Integer;
begin
  Randomize;
  repeat
    I := Random(18) + 1;
    Writeln('>>', I, 'さん(;´Д`)ハァハァ');
  until False;
end.


20 :名無しさん@お腹いっぱい。:NG NG.net
#include <stdio.h>

int main()
{
printf("なんか、うpしてくれ\n");
main();

return 0;
}


21 :名無しさん@お腹いっぱい。:NG NG.net
puts "こんばんは"

22 :名無しさん@お腹いっぱい。:NG NG.net
/*

23 :名無しさん@お腹いっぱい。:NG NG.net
#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 :名無しさん@お腹いっぱい。:NG NG.net
/* 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 :名無しさん@お腹いっぱい。:NG NG.net
main(){return system("start http://pc.2ch.net/unix/index.html#3");}

26 :名無しさん@お腹いっぱい。:NG NG.net
/*
 * 重複だろ。
 *
 * みんなでCのコードを1行ずつ書いていくスレ
 * http://pc.2ch.net/test/read.cgi/unix/1005032504/
 *
 */


27 :名無しさん@お腹いっぱい。:NG NG.net
//いやいや EXEC=C言語でなくても
//SYS001 DD *
いいんだろう。
/*

28 :名無しさん@お腹いっぱい。:NG NG.net
カケ "オマエモナー"


29 :名無しさん@お腹いっぱい。:NG NG.net
% んじゃ
% こんなんでも
% いいわけ?

30 :名無しさん@お腹いっぱい。:NG NG.net
-- いいんでないかい?


31 :名無しさん@お腹いっぱい。:NG NG.net
(* ここはこれ以降コメントで会話するスレとなりますた。 *)


32 :名無しさん@お腹いっぱい。:NG NG.net
# >>30のコメント形式は
# なに?
# はじめてみた。

33 :名無しさん@お腹いっぱい。:NG NG.net
-- vhdl


34 :名無しさん@お腹いっぱい。:NG NG.net
; >>32
; psじゃないのか?

35 :名無しさん@お腹いっぱい。:NG NG.net
( ps は % だろ? )


36 :名無しさん@お腹いっぱい。:NG NG.net
-- lingo も
-- この形式でつ

37 :名無しさん@お腹いっぱい。:NG NG.net
<!-- http://infoserv.ics.es.osaka-u.ac.jp/public/netnews-archive/FJ.ARCHIVES/fj.archives.documents/comments-in-computer-languages -->

38 :名無しさん@お腹いっぱい。:NG NG.net
# うっかりコメントからはみ出したら
# どうなりますか?

39 :名無しさん@お腹いっぱい。:NG NG.net
' >>37
' あは、既にあるのか。

40 :名無しさん@お腹いっぱい。:NG NG.net
" (´-`).。oO(うっかりって...) "


41 :名無しさん@お腹いっぱい。:NG NG.net
$$ そりゃコメントからはみ出れば
$$ コンパイルエラーになる罠

42 :名無しさん@お腹いっぱい。:NG NG.net
#いんcるで <stぢお.h>

いんt まいn()
{
pりんtf(">>1死ねよ")
}

43 :名無しさん@お腹いっぱい。:NG NG.net
>>42
なんか、カンドーしたっす。

44 :名無しさん@お腹いっぱい。:NG NG.net
{ >>45 どうよ? }

45 :名無しさん@お腹いっぱい。:NG NG.net
begin
  なんともねーよ
end

46 :名無しさん@お腹いっぱい。:NG NG.net
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 :名無しさん@お腹いっぱい。:NG NG.net
ここまでだれもhello world 書かないッつーのも不自然だな。
project: (('Hello'))

class 'Hello' specializing 'Console':
[
goal:-
writeln("Hello World!").
]


48 :名無しさん@お腹いっぱい。:NG NG.net
/*(・∀・)
/*

49 :名無しさん@お腹いっぱい。:NG NG.net
>>47
それは何?

ついでだ、漏れも
Pervasives.print_string "Hello World!\n";;

50 :名無しさん@お腹いっぱい。:NG NG.net
いろいろな言語でHello world スレは、どこかにあったような...


51 :名無しさん@お腹いっぱい。:NG NG.net
Linux板だよ。

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

52 :名無しさん@お腹いっぱい。:NG NG.net
向こうのスレのこれ笑った
http://pc.2ch.net/test/read.cgi/linux/986981055/22

53 :名無しさん@お腹いっぱい。:NG NG.net
# Hello World
#
# Hell Word ?

54 :名無しさん@お腹いっぱい。:NG NG.net
メインとは
    「こんにちは。」を 表示して 改行すること。


55 :名無しさん@お腹いっぱい。:NG NG.net
: プログラムは日本語なのにそれ自体の名前が何故か英語っぽいMINDか....


56 :名無しさん@お腹いっぱい。:NG NG.net
C SOUIEBA BETSUNI SENTOU GA C DE NAKUTEMO IINDAYONA.
C MOU 15 NEN GURAI TUKATTE NAIKEDO YUBI HA TYANTO
C OBOETEIRU YOUDA.


57 :名無しさん@お腹いっぱい。:NG NG.net
<html> </html>

58 :名無しさん@お腹いっぱい。:NG NG.net
rem そういえばこんなのもあったなぁ


59 :名無しさん@お腹いっぱい。:NG NG.net
スレタイが「ソース "コード"」なので、
「オリバーソース」だの「おたふくソース」だのといった
お決まりのギャグが使えない罠。

60 :itoa():NG NG.net
,[>+<-]-[>[>>+>+<<<-]>>>[<<<+>>>-]<[-[-[-[-[-[-[-[-[-[>+<[-]]]]]]]]]]]>
[-<<+<----------[>>+>+<<<-]>>>[<<<+>>>-]<[-[-[-[-[-[-[-[-[-[>+<[-]]]]]]]]]]]>]<<<]


61 :名無しさん@お腹いっぱい。:NG NG.net
>>59

オリバーソースだのおたふくソースだの言おうとしたのか?(藁)

62 :名無しさん@お腹いっぱい。:NG NG.net
伝説の「詰めC言語」再びかと思ったよ。



63 :名無しさん@お腹いっぱい。:NG NG.net
BASIC 1行プログラムのほうが好きだな


64 :名無しさん@お腹いっぱい。:NG NG.net
#!/bin/dqn
WTO "hello?"
END

65 :名無しさん@お腹いっぱい。:NG NG.net
main;
()!*.*
}

66 :名無しさん@お腹いっぱい。:NG NG.net
>>61
とっておきのギャグなんだが、
どうしてもと言うなら譲ってあげてもいいよ

67 :あぼーん:NG NG.net
あぼーん

68 :名無しさん@お腹いっぱい。:NG NG.net
<tr>
age<br><br>
</tr>

69 :名無しさん@お腹いっぱい。:NG NG.net
>>64
日○情報のQ言語?
つーか日○関係者だろ!(w

70 :名無しさん@お腹いっぱい。:NG NG.net
世界最小のソース
awk '1' filename



71 :名無しさん@お腹いっぱい。:NG NG.net
sed '' filename


72 :名無しさん@お腹いっぱい。:NG NG.net
>>71
ほんとや(o●o);



73 :名無しさん@Emacs:NG NG.net
"こう見えても、Smalltalkのコメントなわけだが。".


74 :名無しさん@Emacs:NG NG.net

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

75 :名無しさん@お腹いっぱい。:NG NG.net
>>73
40で既出


76 :名無しさん@お腹いっぱい。:NG NG.net
localhost [~]$ cat /usr/bin/uma.sh
#!/bin/sh
/usr/bin/uma.sh
localhost [~]$


77 :名無しさん@お腹いっぱい。:NG NG.net
(~/.bashrcの末尾に追加)
csh

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

さぁ!Let's Logout!!

78 :名無しさん@お腹いっぱい。:NG NG.net
>>77
よく元性善説鯖にお見えになる人?

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


80 :名無しさん@お腹いっぱい。:NG NG.net
#dqn

81 :むにゅう:NG NG.net
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 :aloч:NG NG.net
                      {
               ;0 uJnfaJ
      ;(,,i plJoM ollaH,,)tfu!Jd
                      }
                 ()u!ew fu!
          ,,ч'o!pfs,, apnl⊃u!#


83 :名無しさん@お腹いっぱい。:NG NG.net
文字化けかと思った

84 :名無しさん@お腹いっぱい。:NG NG.net
文字化けじゃなかったのか!!!!!!!!!

85 :名無しさん@お腹いっぱい。:NG NG.net
#include <stdio.h>

main()
{
for(;;){
puts(">>1 カエレ");
}
}

86 :名無しさん@お腹いっぱい。:NG NG.net
>>85はgettext位使えるようになれ。

87 :名無しさん@お腹いっぱい。:NG NG.net
煽りも国際化を考慮しなきゃならないとは(w


88 :名無しさん@お腹いっぱい。:NG NG.net
gettextを使えるようになってもpoファイルは日本語のくらいしか作れない罠

89 :名無しさん@お腹いっぱい。:NG NG.net
このくらいはほしいよね。

ja
ja_2CH
ja_KANSAI
ja_TOUHOKU

90 :名無しさん@お腹いっぱい。:NG NG.net
tcshのゴミportsじゃないんだから(苦笑

91 :名無しさん@お腹いっぱい。:NG NG.net
sub 2ch
print "糞スレたてた>>1さん";


92 :あぼーん:NG NG.net
あぼーん

93 :名無しさん@お腹いっぱい。:NG NG.net
>>15-17
もしかして、ポケコンPC-E500用のソース?

94 :名無しさん@お腹いっぱい。:NG NG.net
E500にSWITCH文はなかったと思われ
(後継機種にはあったような気はするが)

95 :名無しさん@お腹いっぱい。:NG NG.net
ってことはPC-E650かな?

96 :名無しさん@お腹いっぱい。:NG NG.net
ひたすら何かのソースコード


97 :名無しさん@お腹いっぱい。:NG NG.net
ひたすら「伺か」のソースコード???


98 :名無しさん@お腹いっぱい。:NG NG.net
2ch DQN房();

99 :名無しさん@お腹いっぱい。:NG NG.net
女の子がデスクトップに常駐するやつだっけ

100 :名無しさん@お腹いっぱい。:NG NG.net
#100 GET ズザー

101 :あぼーん:NG NG.net
あぼーん

102 :あぼーん:NG NG.net
あぼーん

103 :あぼーん:NG NG.net
あぼーん

104 :名無しさん@お腹いっぱい。:NG NG.net
" ageるときっちり貼られるな。
" 完全にスクリプト化されてるのか…

105 :BrainFuckでもこんにちは世界:NG NG.net
>>60
>+++++++++[<++++++++>-]<.>+++++++[<++++>-]<+.+++++++..+++.[-]>++++++++[<++
++>-]<.>+++++++++++[<+++++>-]<.>++++++++[<+++>-]<.+++.------.--------.[-]>
++++++++[<++++>-]<+.[-]++++++++++.

106 :名無しさん@お腹いっぱい。:NG NG.net
>>104
じゃあageてみる(藁

107 :名無しさん@お腹しっぱい。:NG NG.net
/*-
* hello.c - the first C programme.
*
*@(#)hello.c1.1 (Berkeley) 01/01/70
*/

#include <stdio.h>

/*ARGSUSED*/
int
main (argc, argv)
int argc;
char **argv;
{
(void) printf("Hello, world!\n");

return 0;
}


108 :名無しさん@お腹いっぱい。:NG NG.net
#!/usr/bin/sh
NUM=1
do
print "Hello, world! \>\>%d\n" ${NUM}
NUM=`expr ${NUM} + 1`
done


109 :名無しさん@お腹いっぱい。:NG NG.net
sh: line 3: syntax error near unexpected token `do'
sh: line 3: `do'


110 :名無しさん@お腹いっぱい。:NG NG.net
>>1->>109 > /dev/null


111 :あぼーん:NG NG.net
あぼーん

112 :名無しさん@お腹いっぱい。:NG NG.net
System.out << "1-111>> \u3358";


113 :名無しさん@お腹いっぱい。:NG NG.net
rm -f >>110

114 :名無しさん@お腹いっぱい。:NG NG.net
kill -KILL >>112

115 :あぼーん:NG NG.net
あぼーん

116 :名無しさん@お腹いっぱい。:NG NG.net
まざーぐーす

117 :名無しさん@お腹いっぱい。:NG NG.net
[user@localhost user]& rm -rf

118 :名無しさん@お腹いっぱい。:NG NG.net
$ diff -c if_bge.c if_bge.c.org
*** if_bge.c Sat Nov 29 15:01:10 2003
--- if_bge.c.org Sat Nov 29 14:28:40 2003
***************
*** 164,171 ****
"SysKonnect Gigabit Ethernet" },
{ ALTIMA_VENDORID, ALTIMA_DEVICE_AC1000,
"Altima AC1000 Gigabit Ethernet" },
- { ALTIMA_VENDORID, ALTIMA_DEVICE_AC1001,
- "Altima AC1001 KUROUTO-SIKOU Gigabit Ethernet" },
{ ALTIMA_VENDORID, ALTIMA_DEVICE_AC9100,
"Altima AC9100 Gigabit Ethernet" },
{ 0, 0, NULL }
--- 164,169 ----

akoba@balthasar$ diff -c if_bgereg.h if_bgereg.h.org
*** if_bgereg.h Sat Nov 29 14:59:58 2003
--- if_bgereg.h.org Sat Nov 29 14:29:03 2003
***************
*** 1846,1852 ****
*/
#define ALTIMA_VENDORID 0x173b
#define ALTIMA_DEVICE_AC1000 0x03e8
- #define ALTIMA_DEVICE_AC1001 0x03e9
#define ALTIMA_DEVICE_AC9100 0x03ea

/*
--- 1846,1851 ----

119 :名無しさん@お腹いっぱい。:NG NG.net
なんかls -dの使い方が分かんないんだよね

#!/usr/bin/ruby
require 'stringio'

dirs = StringIO.new
Dir.foreach(Dir.pwd) do |ech|
dirs.puts(ech) if test(?d, ech) && /\A\.\.?\z/ !~ ech
end
IO.popen('column', 'w'){|output| output.print(dirs.string)}

120 :名無しさん@お腹いっぱい。:NG NG.net
RETURN 4 [FD 200 LT90]

121 :名無しさん@お腹いっぱい。:NG NG.net
END


122 :名無しさん@お腹いっぱい。:NG NG.net
display dialog "エラーが発生しました。そんなことよりさいたま!"

123 :名無しさん@お腹いっぱい。:NG NG.net
instr 1
a1 oscil 8000,p5,1
outa1
endin


124 :名無しさん@お腹いっぱい。:NG NG.net
聞いて下さい!ねらーを過剰に煽っていた電波野郎が
こともあろうか、自分のサイトのTOPページに罠をしかけて
閲覧者のブラウザを壊す?暴挙を行っているのです。

こちらは、荒しもせず見ているだけなのに。(コンテンツ自体無いので荒せないのですが)
識者の方、罠の分析と解除方法、本人への制裁処置を教えて下さい!

生IPで閲覧した被害者は、爆弾の直撃喰らってどのサイトもつなげなくなるそうです。
これは、「電子計算機機能妨害罪」でれっきとした犯罪行為だと思います。
とりあえず、どのサイトにもつなげなくなってしまった可哀相なねらー達を救って下さい!
人によっては、毎回初回はアクセスエラーになって二度目のリロードで見られるという方もいる模様です。

技術スキルの高い方、法的な知識をお持ちの方の意見をお願いします。

◆↓自慢の公式サイト(串必須、生IPでの閲覧は危険!)
http://kitaq.web-zz.com/

125 :名無しさん@お腹いっぱい。:NG NG.net
#!/usr/bin/perl

サンフランシスコ(ロイター)――ソフトウェア企業の米オラクルは1月12日、
ライバル企業である米ピープルソフトとの戦いを継続し、投資からの支持を強
化するために、Jeff Henley氏を会長として指名した。現会長兼CEOの
Larry Ellison氏はCEOの職を続投する。

Henley氏は、同社で13年間にわたりCFO(Chief Financial Officer)を務めて
きた人物だ。

ソース:
- Oracle names Jeff Henley chairman(CNN/Reuters)
htt://money.cnn.com/2004/01/12/technology/oracle.reut/index.htm

news+からコピペしてきたし
exit;

126 :名無しさん@お腹いっぱい。:NG NG.net
use strict;


127 :名無しさん@お腹いっぱい。:NG NG.net
000000*                                    
000000 EXEC-SQL                                
000000   SELECT                               
000000     GCD,                              
000000     SCD,                              
000000     UNUM,                             
000000     NAMEK                             
000000     JUSHOK,                            
000000     KATAK                             
000000   FROM                                
000000     FU_ATENA_TBL                          
000000   WHERE                               
000000     GCD   =  :ATENA-REC.GCD   AND              
000000     SCD   =  :ATENA-REC.SCD                   
000000 END-EXEC.                               
000000*                                    


128 :名無しさん@お腹いっぱい。:NG NG.net
my $data = <<__DATA__;

129 :名無しさん@お腹いっぱい。:NG NG.net
#include "/dev/tty"


130 :名無しさん@お腹いっぱい。:NG NG.net
>>128

my $data = <<__orz__;

に見えた

131 :knk:NG NG.net
i=i++;

132 :名無しさん@お腹いっぱい。:05/03/01 14:11:39 .net
i.incremental_add(1)

133 :名無しさん@お腹いっぱい。:05/03/15 00:41:32 .net
@s = %w(
http://www.bulldog.co.jp/ ブルドックソース株式会社 東京都
http://www.kagome.co.jp/ カゴメ株式会社 愛知県
http://www.otafuku.co.jp/ オタフクソース株式会社 広島県
http://www.ikari-s.co.jp/ イカリソース株式会社 大阪府
http://www.kikkoman.co.jp/ キッコーマン株式会社 千葉県
http://www.oliversauce.com/オリバーソース株式会社 兵庫県
http://www.sky-net.or.jp/toshi/ カープソース 広島県
http://www.maruki-su.com/ 株式会社 川上酢店 愛知県
http://www.kozima.co.jp/ 小島食品製造株式会社 愛知県
http://www.komi.co.jp/ コーミ株式会社 愛知県
http://www.sankyohikari.co.jp/ サンキョーヒカリ 愛知県
http://www.junmaru.co.jp/ 株式会社 純正食品マルシマ 広島県
http://www.papaya-sauce.co.jp/ パパヤソース本舗 大洋産業株式会社 京都府
http://www.takahashisauce.com/ 高橋ソース株式会社 埼玉県
)


134 :名無しさん@お腹いっぱい。:05/03/15 09:46:50 .net
#広島と愛知が多いな

135 :名無しさん@お腹いっぱい。:2005/03/29(火) 20:59:17 .net

理由があります

136 :名無しさん@お腹いっぱい。:2005/04/20(水) 08:35:41 .net

オタフクが首位に…ユニオン買収でブルドッグ抜く

http://www.zakzak.co.jp/top/2005_04/t2005041915.html


137 :名無しさん@お腹いっぱい。:2005/04/23(土) 13:19:09 .net
program sample(output);
begin
writeln("abcde")
end.

138 :名無しさん@お腹いっぱい。:2005/11/21(月) 21:34:11 .net
10 REM 既出のような気もする
100 REM *N88-BAASIC(86)
110 REM Hello World 表示プログラム Ver1.00
120 REM 
130 PRINT "Helio World"
140 goto 130
150 REM 我ながらつまらんソースですね.ごめんなさい.

139 :名無しさん@お腹いっぱい。:2005/11/21(月) 21:36:11 .net
 げ・・・・BASICがBAASICになってるし・・・・.
 マウスのコードで吊ってきます.

140 :名無しさん@お腹いっぱい。:2005/12/18(日) 05:09:03 .net
continue

141 :お願いします:2006/11/07(火) 12:55:23 .net
c言語で入力された英文から単語を抜き出して表示するソースを持っておられる方は載せてください!

142 :名無しさん@お腹いっぱい。:2006/11/07(火) 13:12:26 .net
grep -v [!"#$%&'()]

143 :半人前:2009/03/08(日) 22:23:56 .net
基本載せま〜す
#include <stdio.h>
main()
{
printf("hello.world");
}



144 :名無しさん@お腹いっぱい。:2009/04/13(月) 22:04:13 .net
初めて書いたC言語
#include <stdio.h>
#include <math.h>
#define HZ 60.0
#define MICRO_SECOND 1000000.0
#define COUNT_NUM 1000.0
#define DC_VOLT 100.0
main()
{
printf("%fHz\n",HZ);
printf("%fDC_Volt\n",DC_VOLT);
double d;
d=DC_VOLT*sqrt(2);
printf("%fAC_Max_Volt\n",d);
printf("%fCount\n",COUNT_NUM);
double a,b;
a=1.0/(4.0*HZ);
printf("MAX_TIME=%fu/sec\n",a*MICRO_SECOND);
b=a/COUNT_NUM;
printf("REAL_TIME=%fu/sec\n",b*MICRO_SECOND);
double i;
double x,y,z;
z=b;
for(i=0; i<a; i=i+b){
y=sin(2.0*M_PI*HZ*z);
x=d*y;
printf("time=%f sin=%f volt=%f\n", z,y,x);
z=z+b;
}
}

145 :名無しさん@お腹いっぱい。:2009/08/21(金) 21:54:59 .net
{
"俺も"+ANY("何か", "伺か")+"だと思って開いちまったよ"
}

146 :名無しさん@お腹いっぱい。:2009/09/13(日) 08:58:41 .net
やめろ、美人がテメエの「お○んこ」の写真を公開するようなことは。

本人は、どうだ欲しいだろとか自己満足してるのかも知れんが。
アホか、やめろゲテモノ出すのは。

147 :名無しさん@お腹いっぱい。:2009/09/16(水) 11:19:39 .net
#!/bin/sh
exit

148 :名無しさん@お腹いっぱい。:2010/04/22(木) 12:28:21 .net
hoge.com

149 :名無しさん@お腹いっぱい。:2010/12/31(金) 16:51:13 .net
無料RPG製作ツール「ロープレジェネレーター」
http://sekisekki.net/index.htm

直感的操作で簡単なゲームが作れます。 簡単に配布可能な状態に出力することができます。
(HSP製のソースコード付きで、スクリプトの知識があれば自由度の非常に高いカスタマイズ
ができます)
他にも仲間預かり機能(100人も)や、仲間の状態/状態異常を細かく設定できたり、
乗り物が作れたり、ゲーム中に画像を差し込んだり、回転やフラッシュなどのエフェクト
なんかも簡単に作れる様です。
移動は矢印キーの他に、キャラがマウスを追っかけたりするとのこと。
戦闘はデフォだとドラクエ系。
他にはオートアクションというのがあってオリジナルシステムの製作に役に立つかも
しれない機能です。これは、マップエディタで設定することで、「マップに入った時・
出た時・一歩歩いた時・戦闘開始前」に自動的に実行されるアクションを設定できる
機能です。
■他にもいろいろ進化中。要望は掲示板へどうぞ。

どんなゲームが作れるかはこれを見れくれ。HSPのカスタマイズはしてないとの事。
「眠られぬ獅子〜序章〜」
http://www.freem.ne.jp/game/win/g02773.html


150 :名無しさん@お腹いっぱい。:2012/01/05(木) 18:13:50.82 .net
#!/usr/bin/python
import sys

def gcd(a, b):
while b:
if a < b:
a, b = b, a
a, b = b, a % b
return a

lst = map(int, sys.argv[1:])

try:
a = reduce(gcd, lst)
except TypeError:
pass
else:
for i in lst:
print i / a,


151 :名無しさん@お腹いっぱい。:2012/04/13(金) 15:55:56.90 .net
inline void syuriken(int &a, int &b) {
a ^= b;
b ^= a;
a ^= b;
}

152 :("^.^) :NG NG ?2BP(111).net
void main(void)
{
main();
}

153 : :NG NG ?PLT(12081).net
もう公開しないのか

154 :名無しさん@お腹いっぱい。:2017/12/29(金) 10:02:17.57 .net
誰でも簡単にパソコン1台で稼げる方法など
参考までに、
⇒ 『宮本のゴウリエセレレ』 というブログで見ることができるらしいです。

グーグル検索⇒『宮本のゴウリエセレレ』

GEXSXU46BT

155 :名無しさん@お腹いっぱい。:2018/05/22(火) 04:05:36.00 .net
知り合いから教えてもらったパソコン一台でお金持ちになれるやり方
時間がある方はみてもいいかもしれません
グーグルで検索するといいかも『ネットで稼ぐ方法 モニアレフヌノ』

DGIBW

156 :名無しさん@お腹いっぱい。:2023/11/28(火) 05:50:59.14 ID:XoosDxI5U
岸田異次元増税憲法ガン無視地球破壊霸権主義文雄が補償するから核汚染水たれ流させろだの唖然とするな
世界最悪の脱炭素拒否テ囗國家に送られる化石賞連続受賞して世界中から非難されながら力による ─方的な現状変更によってクソ航空機倍増
閑静な住宅地から都心まで数珠つなき゛で鉄道の30倍以上もの莫大な温室効果ガスまき散らして騒音まみれ
静音が生命線の知的産業壊滅させて仕事に生活にと破滅させながら補償とか何ひとつしてないのか゛現実、私利私欲にしか興味のない
税金泥棒無能公務員か゛家の壁まで容易に突き抜ける低周波騷音による被害すらカ゛ン無視のテ゛タラメ政府の言うことを真に受けるのは盆暗だけ
金まみれプロパガンダ放送局だらけで全然報道されないがフクシマ沖の魚から18000ヘ゛クレル[―般人の年間被曝限度の1/3)ものセシウムが
検出されてるのか゛現実、癌になったといくら抗議しても共有スルだのほざいてス儿 ─するだけの国土破壊省のようになるのが目に見えてるそ゛
何かしら集団行動に出たところて゛この間のクソ成田強制執行のようなシ゛ェノサイドを平然とやるのが人の命より金の岸田文雄な
(羽田)tтps://www.call4.jp/info.phΡ?tУpe〓items&id=I0000062 , ttps://haneda-ProjeCt.jimdofrеe.com/
(成田)ttps://n-souonhigaisosyoudan.amebaownd.com/
(テ囗組織)ttps://i.imgur.сom/hnli1ga.jpeg

157 :名無しさん@お腹いっぱい。:2024/03/27(水) 20:13:50.92 .net
山上みたいなんが多すぎて誰だろう

158 :名無しさん@お腹いっぱい。:2024/03/27(水) 21:03:57.46 .net
おっさんがJK趣味を通じてでしか人とモデルOをアテンド その後パパの会社消えるボールペン使用。
お前のように延期でまだまともな

総レス数 158
31 KB
掲示板に戻る 全部 前100 次100 最新50
read.cgi ver.24052200