いろんな言語で「Hello World」だ。ゴラァ

それじゃ俺が知っている C からだ。
皆も知ってる言語・スクリプトで続けてくれ！


#include <stdio.h>
int main()
{
printf("Hello World\n");
return (0);
}

<FORM method=POST action="hoge/bbs.cgi">
<input type=submit value="書き込む" name="submit">
名前：<INPUT TYPE=text NAME=FROM SIZE=19 VALUE=名無しさん＠お腹いっぱい。>
E-mail（省略可）：<INPUT TYPE=text NAME=mail SIZE=19 VALUE=sage>
<TEXTAREA rows=5 cols=70 wrap=OFF name=MESSAGE value="Hello! World"></TEXTAREA>
<INPUT type=hidden name=bbs value=linux>
</FORM>

sa

http://www2.csc.ne.jp/~cym10262/

//JOB
/*MESSAGE HELLO WORLD
//DUMMY EXEC PGM=JDJDUMMY
//

>>141
おまえ●立 汎用機か？

>>142
日●汎用機だが、何か？
ってかそれがわかる時点でｵﾏｴﾓﾅｰ

>>143
おばさんにはそんなのわかんないよ。
SHなら少しはわかるけど。すうぱぁＨだべ？

#!/bin/csh -f
echo "Hello World"

本当のscripterならこれだろ

#!/bin/sh
echo "Hello World"

FCB 3F,??
FCB 'H','E','L','L','O',' ','W','O','R','L','D',00
??のところは覚えなし

>>146
おしい！ >>4で既出

% emacs -f view-hello-file

% vi hello.c
% cc -c hello.c
% strings hello.o

ALL:
@echo "Hello, World!"

>>152 root を常用するのはやめれ(w

/var/qmail/control/me に World と書いてメールを出すと、
相手方のメールサーバに

HELO World

と名乗るかもしれんが確かめてない。

postfix なら myhostname = World
sendmail ならばこうかな？（自信なし）
DwWorld
Dj$w

# あ、でも HELO じゃなくて EHLO だな。

>>152

% cat bb.awk
BEGIN{printf("Hello World\n");}

% awk -f bb.awk
Hello World

$ PS1="Hello World"
Hello World

>>154
うまい。１本とられた。。。

>>156 サブぅ
とっくのガイシュツ >>93

echo Hello | awk -v ORS=" World\n" 1

>>157 それをいうなら「キシュツ」だろ。

ただ今外出中。

>>159
新鮮だな・・・

>>159
うん。いいね。

Linuxのアセンブラで
Hello,world!
って画面の左上に表示させるのってどうするの？

MsgBox　"Hello World!"

WScript.Echo("Hello World!");

>>159
> >>157 それをいうなら「キシュツ」だろ。
２ちゃんねる用語で"キシュツ"ってあるんだよ。
まー、最初は読み間違いから始まったんだけどな。
ＦＡＱ読んでみろ。 http://www.2ch.net/guide/faq.html

>>167
> ２ちゃんねる用語で"キシュツ"ってあるんだよ。
ガイシュツ だ。鬱死。

>>167

既出 → ガイシュツ → 外出 → 帰宅 → キタク

てことで、これからは「キタク」と言いましょう。

>>17
ｲﾔﾃﾞｽ｡｡

メインとは
"Hello world."を 表示し
スタック検査。

$ su
Password:
# cd /sys/i386/conf
# cp GENERIC HOGE
# vi HOGE
# grep ident HOGE
ident Hello_World
# config HOGE
# cd ../../compile/HOGE
# make depend && make && make install && reboot
-----------------------------------------------------
(login)
FreeBSD/i386(hoge)(ttyv1)

login:hoge
Password:
Last login: Thu Jun 14 01:09:42 from 10.20.774.3
Copyright (c) 1980, 1983, 1986, 1988, 1990, 1991, 1993, 1994
The Regents of the University of California. All rights reserved.

FreeBSD 4.3-RELEASE (Hello_World) #0: Sat Apr 21 10:54:49 GMT 2001
bash-2.05$

disp "Hello world.".

connect 'sunsite.sut.ac.jp:80'
sendln 'GET /java/tutorial/getStarted/application/index.html'

Hello World Applicationというページだから、どっかに表示されてると思う。

org 100h
mov dx,offset msg
mov ah,09h
int 21h
mov ax,4c00h
int 21h
:msg
db 'Hello World'

おっと、>>80でがいしゅつだった

>>176-177
dosの.asm(masm?)とは燻し銀じゃ

｛｝の間を削除せよ

｛楠田｝こんにちは｛楠田枝里子デ〜ス
　愛川　司会の愛川欽也です
　（略）
　両者　な〜るほど、ザ、｝ワールド！｛
　愛川　春の祭典スペッシャ〜ル｝

メモ帳(Memo)ボタンを押す
[h][逆向きの3][L][L][o][.][/(上から)][−(左から)]
[w][o][R(一筆書きで)][L][o(下から始め時計回り)][.][↑(上へ線を引く)]

最後に
[/(上から)]

大文字英字モードにする
4433555右555666################右右96667775553

「!」が長いゾ

% awk -v RS='{.*}' -v ORS="" 1
{楠田}こんにちは{楠田枝里子デ〜ス
　愛川　司会の愛川欽也です
　（略）
　両者　な〜るほど、ザ、}ワールド！{
　愛川　春の祭典スペッシャ〜ル}
CTRL-D

Oracle iDevelop 2000 で講師曰く，Oracle Portal 用 Portlet で Hello World
プログラムを書くと 300 行以上になるが，おそらく世界最長の Hello World だろう
だそうな。

実際にソース見たら，ほとんどイベント処理。VC++ のスケルトンよりも長い。

Sub Main()
Dim a As Variant
Dim c As Integer
Dim i As Integer

a = Array(72, 29, 7, 0, 3, -79, 55, 24, 3, -6, -8, -87, -3)
For i = 0 To UBound(a)
c = IIf(i, c + a(i), a(0))
Debug.Print Chr(c);
Next
End Sub

↑の For 分の次は
c = a(i) - (c <> 0) * c
という手もあるな。

ウゲ，字間違えた。
For 分→For 文。
鬱だ志乃う。

12345678901234567890
Hello World

11文字より短く出来るんだろうか？

program hello(output);

begin
　writeln( "Hello World." )
end.

あってるよな？

display dialog "Hello World!"

put "Hello World!"

　H,Es,La,Li,O,W,Os,Ra,Lu,Dy

（水素、アインスタニウム、ランタン、リチウム、酸素、
　タングステン、オスミウム、ラジウム、ルテチウム、
　ジスブロシウム）

　このカンマ区切りの元素記号を記号単位に解釈し、最終的に
Hello! World を導くスクリプトを示せ。

などとイテミル。（←弱気）

echo 'H,Es,La,Li,O,W,Os,Ra,Lu,Dy' | tr -cd A-Z

2ch% gst

"Major GC flip... done, used space = 62%"
GNU Smalltalk Ready

"Hello World" printNl!
st> stdin:1: Undefined variable printNl referenced
'Hello World' printNl!
st>
Execution begins...
'Hello World'
returned value is nil
1155 byte codes executed
which took 0.001 seconds, giving 1155000 bytecodes/sec
90 primitives, percent 7.79
self returns 5, inst var returns 2, literal returns 6
101 method cache lookups since last cleanup, percent 8.74
45 method cache hits, 56 misses, 44.55 percent hits
2ch%

Sub HelloWorld()
ActivePresentation.Slides(1).Shapes.AddLabel(msoTextOrientationHorizontal, 100, 100, 60, 150).TextFrame.TextRange.Text = "Hello World"
End Sub

insert "Hello World";

Sub HelloWorld()
Dim a As Variant
Dim p As Long
Dim i As Integer
Dim n As Integer

p = 1625176704
n = 112
a = Array(0, 2, 5, 8, 11, 15, 16, 8)
While p > 0
p = Int(p / 8)
n = n + a(p Mod 8) - 8
Debug.Print Chr(n + (((n - 104) Mod 15) = 0) * 32 + ((p Mod 8) = 7) * 79);
Wend
End Sub

>>194
case sensitiveで頼むよ。

ORG 0100H
SYSTEM EQU 0005H
STROUT EQU 09H
CR EQU 0DH
LF EQU 0AH

ORG 0100H
LD DE,MSG
LD C,STROUT
CALL SYSTEM
RET

MSG: DEFM 'Hello World'
DEFB CR,LF,'$'

しまった。 >>29 で激しくガイシュツであった…
しかも system-reset で CP/M に戻ってるし。

あ，13 行目と 14 行目を
n = n + (c Mod 16 ^ (q + 1) - c Mod 16 ^ (q - (q = 0))) / 16 ^ q - 8
とまとめれば，変数 a は不要でした。

(q - (q = 0)) は Sgn(q + 1) * q にすることも可。
>>203 の (q = 6) は (-Int(q / 6)) にすることも可。
比較演算子っていんちきくさいじゃん。なんとなく。
スレ違いかも。

>>200
ムチャゆーな。
そういうキミには >>183 を英語で出力するよう修正願おう。

PC-8801
VRAMの先頭アドレスってC000Hからで合ってたっけ？

LD HL,0C000H
LD BC,#MSG

LD B,11

LOOP:
LD A,(BC)
LD (HL),A
INC HL
INC BC
DJNZ LOOP

.data
MSG: DC "HELLO WORLD"

スマソ。LINUX板だった。

>>208
いいんじゃね〜の
10 print "Hello World"
20 goto 20
っていうのも出てるし（藁

>>207
だせっ、バグバグじゃん。そのプログラムは何番地に格納されんだよ。
LDIRぐらい使えよ。

hello:-write('Hello World'),nl.

>>212
そのProlog、おもいっきりガイシュツです

to hello
cs hideturtle home penup
lt 90 fd 100 rt 90
pendown fd 40 bk 20
repeat 2 [rt 90 fd 20]
penup lt 90 fd 30 lt 180
pendown fd 20 rt 90 fd 40 repeat 3 [rt 90 fd 20]
penup bk 30 rt 90 bk 20
pendown fd 40
penup rt 90 fd 30 lt 90
pendown bk 40
penup rt 90 fd 30 lt 90
pendown repeat 4 [fd 20 rt 90]
penup rt 90 fd 30 lt 90
pendown repeat 2 [fd 40 bk 40 rt 90 fd 20 lt 90] fd 40 bk 40
penup rt 90 fd 30 lt 90
pendown repeat 4 [fd 20 rt 90]
penup rt 90 fd 30 lt 90
pendown fd 20 rt 90 fd 20
penup fd 30
pendown repeat 4 [fd 20 rt 90] fd 20 lt 90 fd 20
end

>>207
Bレジスター破壊しまくり藁


LD DE,0C000H
LD HL,#MSG

LOOP:
LD A,(HL)
OR A
RET Z
LDI
JR LOOP

.data
MSG: DC "HELLO WORLD",0

って感じかな？

>>209
それっておもいっきりLinuxねた。
"Just for Fun "(P.31)

>>215
おーい、だからさ
>>210 氏が指摘してるようにブロック転送命令使えってばよぅ。

あ、すまん、使ってたな。しかも不定長に対応だな
一滴マス

>>218
いやいや、不定長つうたって文字列なら結局は固定長でしょ。
で、何も文字列の最後にターミネタ（0）じゃなくとも、文字列の頭に文字数でもいいわけでさ。
PASCALなんてそうだっけ？（オレはターパスしかしらんけど）
で、文字数があればちゃんとLDIRが使えるわけ。
Z80なんて速度遅いわメモリ少ないわで、さまざまなノウハウがあるわけよ。
ま、>>207は何よりBレジが痛いんだけどね。
全然LINUX板ネタじゃないんで、もう逝くよ。

かえってきました

>>219
あ、なるほど。PASCAL文字列なら(そう、それはPASCAL文字列です)、文字数をBCに入
れてLDIRでおしまい、ですね。

誰か自己書き換えとかスタックポインタいじるとかして処理してーん(とかいってみる)。
また一滴マス。

>>222
これＰＡＳＣＡＬ？

set label "Hello World" at screen 0.5,screen 0.5
set border 0
set noxtics
set noytics
set xrange [0:1]
set yrange [0:1]
plot -1 notitle

>>218
同じようなことを N88-BASIC の DRAW 命令でやろうとしたけどリファレンスが
なくて断念。ダセッ<俺。

'# hello.vbs で保存してダブルクリック
dim EXL
set EXL=WScript.CreateObject("Excel.Application")
EXL.Workbooks.Add
EXL.Cells(1,1).Value="Hello World"
EXL.Visible=True

間違えた，スマソ。
>218 は >214 が正解。

>>223
おそらくAdaではないかと思われ。
ロートル国防省からの刺客?

dialog "Hello world",0,"hogehoge"

Basic09 きぼーーんぬ

アセンブラでお願いします

>>231
既に出ているが、何か？

import com.nttdocomo.ui.*;
public class HelloIJava extends IApplication implements SoftKeyListener
{
private Panel panel;
public HelloIJava(){}
public void start()
{
panel=new Panel();
panel.add(new Label("Hello !!",Label.CENTER));
panel.setSoftLabel(Panel.SOFT_KEY_1,"Quit");
panel.setSoftKeyListener(this);

Display.setCurrent(panel);
}
public void softKeyPressed(int softKey)
{
if (softKey==Frame.SOFT_KEY_1)
{
terminate();
}
}
public void softKeyReleased(int softKey){}
}
第1のポイントのゴールはイワツバメが彼が行ったことを行ってはならなかったと
単に強調すること次のとおりです:これは受理可能ではありません。なんちゃって

10 "Hellow world" /
20 #=10

$ cat Hello\ World
echo $0

色々問題があるが。

MODULE Hello;

FROM InOut IMPORT WriteString, WriteLn;

BEGIN
　WriteString('Hello, world.');
　WriteLn();
END Hello.