タスクは、プログラム自体の文字のASCIIコードの合計を印刷するプログラムを作成することです。ファイルを開くことはできません（コマンドライン引数、標準入力、ファイルなどの入力は禁止されています）。

最小の数字を出力する（つまり、ASCIIコードの合計が最小の）プログラムが勝ちます。

Cで書かれたこのようなプログラムの例（最短ではありません）は次のとおりです。

#include <stdio.h>
int main(){
printf("4950");/*i*/
return 0;
}

（後に改行なし}）

wc、0を出力

誰かが「猫のような言語」と言ったので...

空のファイル：

で実行しwc -c file.wcます。0バイトでは、これが「プログラミング言語ではない」カテゴリの勝者だと思います。

また

猫、プリント80（ベース13）

80

いいえ終端改行は、数80 ₁₃進104と等価ではありません。60 ₁₇（102 dec）で短くすることもできますが、「ベース13」の方がギークポイントが多いと思います。

編集：新しいwc例、これはプログラムとして実行できます。

#!/usr/bin/wc
ÿÿzw17

（Latin-1でエンコードされた-theは値255のバイトです）

バイトの合計は2223、出力は次のとおりです。

  2  2 23 ./w

PHP、m4、およびその他の猫のような言語：150

150

単純なHaskellプログラムを使用してブルートフォースするこのソリューションを見つけました。

f :: String -> Bool
f s = (read s :: Int) == (sum . map fromEnum) s

main = mapM_ print [filter f $ sequence $ replicate n ['0'..'9'] | n <- [1..10]]

Brainf * ck、255

-.¤

これは数値255ではなく、255番目のASCII文字を印刷します。

BFコンパイラは¤をスキップするため、これは不正行為と見なされる場合があります。

Javascript、印刷9432 6902

(function a(){b="("+a+")()";c=0;for(i=0;i<b.length;i++){c+=b.charCodeAt(i-0)}alert(c)})()

Haskellの1つを正しく理解していない限り、これはこれまでの最初の素晴らしい解決策です。

パワーシェル

((310))

310を印刷します。

Perl、500

say     500

sayとの間に2つのタブがあります500ます。:)

（perl -Eこれがルールの範囲内であるとわかる限り、でワンライナーとして実行します）

ルビー、プリント380

p (380)

閉じ括弧の後に末尾の改行はありません。

パワーシェル

(230)

明らかに230を印刷します。

パワーシェル

-(-320)

320を印刷します。

J、150

?!6

ただし、正しいのは1/720の時間だけであることに注意してください。

Python、印刷781

print  781

2つのスペース。

エレメント、220

これは私自身が作成した言語であり、ここで別の質問への回答に記載されています。

220`!

これがどのように機能するかのチュートリアルです：220その数をスタックにプッシュします。次に、「outputs the top element of the stack. The！」は、コントロールスタック（別のスタック）で論理的でないものを実行し、1に設定します。

PHP、4440を印刷

<?php
for($x=0;$x<15000;$x++)if($x==4440){printf($x);exit;}

PowerShell、印刷3902

&{[char[]]$myinvocation.Line|%{$s+=+$_};$s}

現在実行されている行を調べて、コードポイント値を合計します。

インターカル、1572

まだ誰もINTERCALを行っていないとは信じられません！

DOREADOUT#1572


DOGIVEUP

（改行の終了を含む。）このプログラムはMDLXXIIを出力します。

Perl、690を印刷

die 690 . $/

または、ワンライナー（perl -E）を投稿できる場合

say(570)

570を印刷します。

（末尾の改行はありません）

JavaScript、 1750 900 860 790

alert(790)

（プログラムの前後のキャリッジリターン（CR、\rまたは\x0D））

これらのプログラムは、総当たり攻撃によって発見されます。

大きな値：

alert(860)%0
alert(900)&&6
document.write(1750)

Java -128

stdinの読み取りは許可されていませんが、スコアの計算方法の例を示したいと思います。

私のコードは、stdinに渡された自身のASCIIカウントを合計し、-128を出力します

class P{public static void main(String[]z)throws Exception{byte v=0;int b=0;while((b=System.in.read())!=-1){v+=(byte)b;}System.out.println(v);}}

末尾の改行なし

ルビー、印刷300

p   300

スペースとの間にタブがあるpと300。末尾の改行はありません。

バッチファイル、500

ECHO  500

同様に、「ECHO」（意図的に大文字）と「500」の間に2つのスペースがあることに注意してください。

C、1700

奇妙な-誰もまだCソリューションを投稿していません（質問の例を除く）。

main(R){puts("1700");}

最後に改行はありません。

K（923 796 795 746 513）

これがルールに違反するかどうかはわかりません。標準入力を使用せず、バイトと合計のベクトルとして自身を開きます。

+/1:.z.f

使用法：

q scriptname.k

編集2012.05.08-ファイルハンドル2012.05.09をhsymする必要はありません-intではなくbyteに変換することで1ポイントを保存しました

2012.05.17-ファイルをテキストではなくバイトストリームとして読み込むことにより、ポイントの負荷を節約できます。

J、198

33*6

そして

6*33

総当たりで見つけました。Jには1文字または2文字のソリューションはなく、3文字のソリューションは150。私の検索でバグがなければ、他の4文字ソリューションもありません。

#jsoftware IRCチャンネルからは<.%:10!20、429で、+/a.i.2#(,{:)'+/a.i.2#(,{:)'''1706で自己カウントのクインもありました。

bc 1160

エコーと空白で呼び出された場合、7つの空白を含む文字列全体echo 1160 | bcのバイト数は1160です。

echo 1160    |  bc

150はbcでも動作します：

echo "150" > 150
bc -q 150
150

D、9752

これは実際に私の馬と同様に計算します

enum c=q{import std.stdio;void main(){int s;foreach(d;"enum c=q{"~c~"};mixin(c);")s+=d;write(s);}};mixin(c);

ホワイトスペース、369

この20文字のプログラムは、その文字（ここではT、S、Lでそれぞれ記号化されているTab、Space、Linefeed文字）のASCII値の合計である数値369を出力します。

SSSTSTTTSSSTLTLSTLLL

（369 = 7 * 9 + 8 * 32 + 5 * 10、7つのタブ、8つのスペース、および5つの改行があります。）

ハスケル、7518

私の馬の小さな変更：

main=print.sum.map fromEnum$q++show q;q="main=print.sum.map fromEnum$q++show q;q="

Brainf*ck, 253 (or 252)

Slight improvement on Peter Olson's solution:

---.H

Provided non-printables are allowed, it can be improved further by adding a - and replacing H by ASCII code 26.

Scala 1090

println (1090)

Python, 5440

Highest score wins, right?

import sys
print sum(ord(i)for i in open(sys.argv[0]).read())

I just thought I'd post it anyway b/c it's a halfway quine solution.