145
\$\begingroup\$

Your task, if you wish to accept it, is to write a program that outputs a positive integer (higher than 0). The tricky part is that if I duplicate your source code, the output must be double the original integer.

Rules

  • You must build a full program. That is, your output has to be printed to STDOUT.

  • The initial source must be at least 1 byte long.

  • Both the integers must be in base 10 (outputting them in any other base or with scientific notation is forbidden).

  • Your program must not take input (or have an unused, empty input).

  • Outputting the integers with trailing / leading spaces is allowed.

  • You may not assume a newline between copies of your source.

  • This is , so the shortest (original) code in each language wins!

  • Default Loopholes apply.

Example

Let's say your source code is ABC and its corresponding output is 4. If I write ABCABC instead and run it, the output must be 8.

Leaderboard

This uses uses @manatwork's layout.

/* Configuration */

var QUESTION_ID = 132558; // Obtain this from the url
// It will be like https://XYZ.stackexchange.com/questions/QUESTION_ID/... on any question page
var ANSWER_FILTER = "!t)IWYnsLAZle2tQ3KqrVveCRJfxcRLe";
var COMMENT_FILTER = "!)Q2B_A2kjfAiU78X(md6BoYk";
var OVERRIDE_USER = 8349457; // This should be the user ID of the challenge author.

/* App */

var answers = [], answers_hash, answer_ids, answer_page = 1, more_answers = true, comment_page;

function answersUrl(index) {
  return "https://api.stackexchange.com/2.2/questions/" +  QUESTION_ID + "/answers?page=" + index + "&pagesize=100&order=desc&sort=creation&site=codegolf&filter=" + ANSWER_FILTER;
}

function commentUrl(index, answers) {
  return "https://api.stackexchange.com/2.2/answers/" + answers.join(';') + "/comments?page=" + index + "&pagesize=100&order=desc&sort=creation&site=codegolf&filter=" + COMMENT_FILTER;
}

function getAnswers() {
  jQuery.ajax({
    url: answersUrl(answer_page++),
    method: "get",
    dataType: "jsonp",
    crossDomain: true,
    success: function (data) {
      answers.push.apply(answers, data.items);
      answers_hash = [];
      answer_ids = [];
      data.items.forEach(function(a) {
        a.comments = [];
        var id = +a.share_link.match(/\d+/);
        answer_ids.push(id);
        answers_hash[id] = a;
      });
      if (!data.has_more) more_answers = false;
      comment_page = 1;
      getComments();
    }
  });
}

function getComments() {
  jQuery.ajax({
    url: commentUrl(comment_page++, answer_ids),
    method: "get",
    dataType: "jsonp",
    crossDomain: true,
    success: function (data) {
      data.items.forEach(function(c) {
        if (c.owner.user_id === OVERRIDE_USER)
          answers_hash[c.post_id].comments.push(c);
      });
      if (data.has_more) getComments();
      else if (more_answers) getAnswers();
      else process();
    }
  });  
}

getAnswers();

var SCORE_REG = /<h\d>\s*([^\n,]*[^\s,]),.*?(-?\d+)(?=[^\n\d<>]*(?:<(?:s>[^\n<>]*<\/s>|[^\n<>]+>)[^\n\d<>]*)*<\/h\d>)/;

var OVERRIDE_REG = /^Override\s*header:\s*/i;

function getAuthorName(a) {
  return a.owner.display_name;
}

function process() {
  var valid = [];
  
  answers.forEach(function(a) {
    var body = a.body;
    a.comments.forEach(function(c) {
      if(OVERRIDE_REG.test(c.body))
        body = '<h1>' + c.body.replace(OVERRIDE_REG, '') + '</h1>';
    });
    
    var match = body.match(SCORE_REG);
    if (match)
      valid.push({
        user: getAuthorName(a),
        size: +match[2],
        language: match[1],
        link: a.share_link,
      });
    
  });
  
  valid.sort(function (a, b) {
    var aB = a.size,
        bB = b.size;
    return aB - bB
  });

  var languages = {};
  var place = 1;
  var lastSize = null;
  var lastPlace = 1;
  valid.forEach(function (a) {
    if (a.size != lastSize)
      lastPlace = place;
    lastSize = a.size;
    ++place;
    
    var answer = jQuery("#answer-template").html();
    answer = answer.replace("{{PLACE}}", lastPlace + ".")
                   .replace("{{NAME}}", a.user)
                   .replace("{{LANGUAGE}}", a.language)
                   .replace("{{SIZE}}", a.size)
                   .replace("{{LINK}}", a.link);
    answer = jQuery(answer);
    jQuery("#answers").append(answer);

    var lang = a.language;
    if (! /<a/.test(lang)) lang = '<i>' + lang + '</i>';
    lang = jQuery(lang).text().toLowerCase();

    languages[lang] = languages[lang] || {lang: a.language, user: a.user, size: a.size, link: a.link, uniq: lang};
  });

  var langs = [];
  for (var lang in languages)
    if (languages.hasOwnProperty(lang))
      langs.push(languages[lang]);

  langs.sort(function (a, b) {
    if (a.uniq > b.uniq) return 1;
    if (a.uniq < b.uniq) return -1;
    return 0;
  });

  for (var i = 0; i < langs.length; ++i)
  {
    var language = jQuery("#language-template").html();
    var lang = langs[i];
    language = language.replace("{{LANGUAGE}}", lang.lang)
                       .replace("{{NAME}}", lang.user)
                       .replace("{{SIZE}}", lang.size)
                       .replace("{{LINK}}", lang.link);
    language = jQuery(language);
    jQuery("#languages").append(language);
  }

}
body { text-align: left !important}

#answer-list {
  padding: 10px;
  width: 290px;
  float: left;
}

#language-list {
  padding: 10px;
  width: 290px;
  float: left;
}

table thead {
  font-weight: bold;
}

table td {
  padding: 5px;
}
<script src="https://ajax.googleapis.com/ajax/libs/jquery/2.1.1/jquery.min.js"></script>
<link rel="stylesheet" type="text/css" href="//cdn.sstatic.net/Sites/codegolf/all.css?v=617d0685f6f3">
<div id="answer-list">
  <h2>Leaderboard</h2>
  <table class="answer-list">
    <thead>
      <tr><td></td><td>Author</td><td>Language</td><td>Size</td></tr>
    </thead>
    <tbody id="answers">

    </tbody>
  </table>
</div>
<div id="language-list">
  <h2>Winners by Language</h2>
  <table class="language-list">
    <thead>
      <tr><td>Language</td><td>User</td><td>Score</td></tr>
    </thead>
    <tbody id="languages">

    </tbody>
  </table>
</div>
<table style="display: none">
  <tbody id="answer-template">
    <tr><td>{{PLACE}}</td><td>{{NAME}}</td><td>{{LANGUAGE}}</td><td><a href="{{LINK}}">{{SIZE}}</a></td></tr>
  </tbody>
</table>
<table style="display: none">
  <tbody id="language-template">
    <tr><td>{{LANGUAGE}}</td><td>{{NAME}}</td><td><a href="{{LINK}}">{{SIZE}}</a></td></tr>
  </tbody>
</table>

\$\endgroup\$
32
  • 2
    \$\begingroup\$ @Mr.Xcoder Then I'll just have to include one in my own source. \$\endgroup\$ – steenbergh Jul 15 '17 at 17:55
  • 3
    \$\begingroup\$ @Mr.Xcoder I think that you should have prevented reading your own source code. \$\endgroup\$ – caird coinheringaahing Jul 15 '17 at 18:09
  • 2
    \$\begingroup\$ It only needs to work when doubled once? We don't need to support n many doublings? \$\endgroup\$ – Cody Gray Jul 16 '17 at 8:36
  • 7
    \$\begingroup\$ @Daniel Let's say your source is `` (empty program) and it produces 5. If you double it, your source is `` (empty program) and that produces 5 as well, no matter what you do. That being said, an empty program duplicated is still the empty program, and always produces the same output, except for the case where the empty program means something else (a random number generator, for example), which could not be valid anyway. \$\endgroup\$ – Mr. Xcoder Jul 17 '17 at 9:11
  • 1
    \$\begingroup\$ This shouldn't be hard for esolangs that automatically dump the top of stack upon program termination. \$\endgroup\$ – MD XF Jul 18 '17 at 22:26

150 Answers 150

1 2 3 4
5
1
\$\begingroup\$

Ruby, 31 bytes

x||=1;x*=2;END{p x;exit!};

Try it online!

\$\endgroup\$
3
  • 1
    \$\begingroup\$ You can use END instead of at_exit for -7 bytes. \$\endgroup\$ – Jordan Dec 17 '17 at 23:02
  • \$\begingroup\$ @Jordan nice, thanks! I've edited to incorporate that, but your answer is still shorter so I hope that's okay with you :) \$\endgroup\$ – Simon George Dec 18 '17 at 15:49
  • \$\begingroup\$ Totally fine. Nice answer! \$\endgroup\$ – Jordan Dec 18 '17 at 15:50
1
\$\begingroup\$

Implicit on TIO, 2 bytes

:.

Hmm, not particularly positive how this works. I'll explain it to myself:

:.
    (implicit read integer input), duplicate stack (stack: 0, 0)
 .  increment                                      (stack: 0, 1)

Ok, now I see. : doesn't read input if the stack has a value on it.

:.:.
:     stack: 0, 0
 .    stack: 0, 1
  :   stack: 0, 1, 1
   .  stack: 0, 1, 2

Only works on TIO (:., :.:.) when the input box is empty.

\$\endgroup\$
5
  • \$\begingroup\$ Would this not also work if you redirect STDIN to an empty file, or if you press Ctrl + Shift + 2 when prompted for input? \$\endgroup\$ – LyricLy Sep 7 '17 at 5:32
  • \$\begingroup\$ @LyricLy Yes, but those require extra bytes. \$\endgroup\$ – MD XF Sep 8 '17 at 2:42
  • \$\begingroup\$ I don't understand. Doesn't it work that way already? Both methods would be sending empty input, just like TIO does. Or am I misunderstanding the reason that it only works on TIO? \$\endgroup\$ – LyricLy Sep 8 '17 at 2:45
  • \$\begingroup\$ @LyricLy Yes, it works that way. But redirecting to STDIN would require, in a shell, ./interpreter sourcefile < emptyfile, and assuming you have an empty file is a standard loophole. Pressing Ctrl+Shift+2 would require user input that is not specified in the challenge, another standard loophole. \$\endgroup\$ – MD XF Sep 8 '17 at 2:46
  • 1
    \$\begingroup\$ I wouldn't consider merely requiring EOF to be piped to the program a standard loophole, but I see where you're coming from. \$\endgroup\$ – LyricLy Sep 8 '17 at 2:52
1
\$\begingroup\$

Pyt, 2 bytes

Explanation:

0       Push 0 onto the stack [0]
 Ł      Get the length of the stack (1)


Try it online!


Doubled:

0Ł0Ł

Explanation:

0           Push 0 onto the stack [0]
 Ł          Get the length of the stack (1)
  0         Push 0 onto the stack [1,0]
   Ł        Get the length of the stack (2)


Try it online!

\$\endgroup\$
1
\$\begingroup\$

Chip, 11+5 = 16 bytes

+5 bytes for -wc1

<b
*\ae*f
`

The active code:

*\ae*f

Activates a, e, and f which means 0x00110001.

Active code when doubled:

 b
*\ae*f
`<
*\a

Prevents activation of both a's, activates b, e, and f, which means 0x00110010.

Try it online!

\$\endgroup\$
1
\$\begingroup\$

tinylisp, 16 bytes

((q(G(i G 2 1)))

Try it online!

Try it doubled!

How?

(q (G (function-body))) creates an unnamed lambda function that takes a variable number of arguments and names the arglist G. In our case, the body of the function is (i G 2 1), which tests if G is empty or not; if it is, we return 1; if it isn't, we return 2. In other words, if we call this function with zero arguments, it returns 1; otherwise, 2.

In the single version, therefore, we call the function without arguments: (function (with an implicit closing parenthesis). In the double version, we call the function, and then call it again with that result as an argument: (function (function (with two implicit closing parentheses).

\$\endgroup\$
1
\$\begingroup\$

Newline 3 bytes

i\n

Note: running newline in TC mode

Output is the red text up top

Try it online

\$\endgroup\$
8
  • \$\begingroup\$ You should indicate a newline by leaving an empty line in the code block, not by using an escape sequence. \$\endgroup\$ – Jakob Aug 22 '17 at 22:38
  • \$\begingroup\$ You're referring to the last line of code, correct? That is an actual newline; the string literal is 2 bytes (i and a newline), but its representation in JavaScript source is three (i\n). Your submission here should be encoded as text, not JavaScript source. \$\endgroup\$ – Jakob Aug 23 '17 at 1:32
  • \$\begingroup\$ Could you provide a reference to the thread on Meta? You posted a 3-byte solution here, but the solution you link to is 2 bytes. This doesn't make sense to me. \$\endgroup\$ – Jakob Aug 23 '17 at 21:24
  • \$\begingroup\$ continuing in chat \$\endgroup\$ – Jakob Aug 24 '17 at 21:25
  • 1
    \$\begingroup\$ @Christopher This has nothing to do with rewriting the interpreter in another language. The source code of your program in memory is 2 bytes, not 3. Whether you create that string with a literal (which takes more than 2 characters) or read it from a file (which would contain 2 characters) doesn't matter. \$\endgroup\$ – Martin Ender Feb 13 '18 at 14:15
1
\$\begingroup\$

Microscript, 2 bytes

1 

(Note the trailing space.)

\$\endgroup\$
1
\$\begingroup\$

SNOBOL4 (CSNOBOL4), 48 bytes

	INPUT('I',1,,'.code.tio');	OUTPUT =size(I);end;

Try it online!

Equivalent to this python answer.

Because the existence of an END label terminates the program, reading the source file is the only way to get this to work, as the program ABCABC is otherwise equivalent to ABC.

SNOBOL always reads input one line at a time so we have to use ; rather than newlines.

\$\endgroup\$
1
\$\begingroup\$

Stax, 2 bytes

|X

Run online, doubled

Added for completeness. |X in Stax means increment register x and push. Register x is implicitly initialized with 0. The top of stack is implicitly output.

\$\endgroup\$
1
\$\begingroup\$

SmileBASIC, 11 10 bytes

CLS?X+1X=1
\$\endgroup\$
1
\$\begingroup\$

Yabasic, 22 bytes

An Anonymous function that takes no input and outputs to STDOUT in graphics mode.

Clear Screen
n=n+1
?n

Note: Because this answer uses graphics mode, it does not function on TIO

\$\endgroup\$
1
\$\begingroup\$

JavaScript (console), 30 bytes

[$^=1]+{valueOf:x=>alert(2-$)}

In console environments, we have the $ default global variable, which is two characters shorter than Map, which is the shortest in other environments.

The way this works:

  1. $ is coerced to a number, and has bitwise XOR applied to it, making it 1.
  2. The object at the end is part of an addition equation, so it is also coerced into a number, calling the valueOf function which alerts 2-$, which equals 1.

When the code is repeated, it looks like this:

[$^=1]+{valueOf:x=>alert(2-$)}[$^=1]+{valueOf:x=>alert(2-$)}

The first instance of the object now has a member operator attached, so instead of the object's valueOf being called, instead we have (object)[$^=1 /* 0 */ ], which is undefined. The first instance doesn't alert anything, but the second one does, and by now $ has been changed to 0 because $^=1 has run twice, so it alerts 2.

Or, for non-console environments, we can use Map instead of $ (34 bytes):

[Map^=1]+{valueOf:x=>alert(2-Map)}

Or, we could use...

JavaScript, 32 bytes

-0?alert(2)+'':[,a=alert(1)]=[1]

When not repeated:

When repeated:

-0?alert(2)+'':[,a=alert(1)]=[1]-0?alert(2)+'':[,a=alert(1)]=[1]

  • -0 is still false, so we go to [,a=alert(1)]=[1]-0?alert(2)+'':[,a=alert(1)]=[1]
  • [1]-0 returns 1 which is true, so we alert(2) and coerce the undefined result to a string by adding an empty string. This returns "undefined". a is still being set to the "undefined"[1] which is this case is the letter "n". Since "n" is a value, the default alert(1) isn't run.
\$\endgroup\$
1
  • \$\begingroup\$ Wow, this is brilliant. I learnt a lot! I don't get yet why Map or $ are coerced to the value 1, though. \$\endgroup\$ – Steve Bennett Sep 20 '20 at 13:21
1
\$\begingroup\$

Fission, 13 bytes

O\aL;
+
$
SV;

Returns 1

Try it online!

Doubled:

O\aL;
+
$
SV;O\aL;
+
$
SV;

Returns 2

Try it online!

Fun twist with this language, that doubling source will double atoms, and each atom is in general command pointer. So my idea was to build such code that second atom will be destroyed.

  L  Created atom, moving left (mass 1, energy 0)
 a   stores in it ascii code of 'a' (97)
\    mirrors
 V   fission reactor, spliting atom into two with halved masses (48)
  ;  destroy right atom
S    conditional mirror - mirrors right, if energy is zero (default energy level)
$    increase energy by 1 (mass 48, energy 1)
+    increase mass by one (mass 49)

if one copy on source:

O    print ascii by mass of atom, destroy atom (prints 1)

if code was copied

S    conditional mirror - energy is 1 now, so goes throw
$    increase energy by 1 (mass 49, energy 2)
+    increase mass by one (mass 50)
O    print ascii by mass of atom, destroy atom (prints 2)

Second atom is created with copied code \aL; on 4th row. Mirror \ sends it to the ; on the first row, where atom is destroyed

\$\endgroup\$
1
\$\begingroup\$

Reflections, 10 bytes

_~#  _#_v

Test it! Test it double!

Explanation:

  • _~: read own source and push size
  • # _: convert to string
  • #_: print the first digit
  • v: reflects the IP down

Then, the program does either end when hitting the other v or when leaving the grid.

\$\endgroup\$
0
1
\$\begingroup\$

QBasic, 12 bytes

A script that takes no input and outputs to the console. Outputs 1 when single, outputs 2 when doubled.

CLS
n=n+1
?n
\$\endgroup\$
1
\$\begingroup\$

Small Basic, 45 bytes

A script which takes no input and outputs to the TextWindow console.

n=n+1
TextWindow.Clear()
TextWindow.Write(n)

Try it at SmallBasic.com

n=n+1
TextWindow.Clear()
TextWindow.Write(n)
n=n+1
TextWindow.Clear()
TextWindow.Write(n)

Try it Doubled at SmallBasic.com

SmallBasic.com depends on Silverlight, and thus the links must be opened in IE to function.

\$\endgroup\$
1
\$\begingroup\$

Python 2, 25 24 bytes

x=1
print 4*'\b',x,;x=2#

Both values of x (1 and 2) get printed when the code is repeated. However the second time, the backspace character backspaces/"erases" the 1 and prints the 2 over the top of it.

The behaviour of printing the backspace escape character \b seems quite system dependent (and it doesn't seem to work on many web REPLs...).

Trailing comment idea inspired by W W's answer.

Edit: byte saved, see comment.

\$\endgroup\$
3
  • \$\begingroup\$ Welcome to the site! \$\endgroup\$ – Wheat Wizard Jul 17 '18 at 17:52
  • \$\begingroup\$ Why don't you put x=2 after the print and before the comment instead of multiplying by two before the print? \$\endgroup\$ – Wheat Wizard Jul 17 '18 at 17:54
  • \$\begingroup\$ Thanks: I think that will save a byte or two... \$\endgroup\$ – Harry King Jul 17 '18 at 19:46
1
\$\begingroup\$

Z80Golf, 6 bytes

00000000: 3676 f630 3ce5                           6v.0<.

Try it online!

Doubled

00000000: 3676 f630 3ce5 3676 f630 3ce5            6v.0<.6v.0<.

Try it online!

Disassembly

start:
  ld (hl), $76
  or $30
  inc a
  push hl

The trick is to exclude any call or rst instructions, so that the execution exactly follows the order:

  • The program (one or two copies)
  • The nop slide, then putchar at address $8000 (exactly once), and then
  • halt which should be hit on return from putchar.

or $30; inc a sets up the ASCII '1' = $31 to print. push hl sets up the stack; ld (hl), $76 writes the halt instruction on the return address.

When doubled, the second inc a changes the value to ASCII '2' = $32. The other instructions are effective no-ops; the return address and the halt instruction on return don't change.

\$\endgroup\$
1
\$\begingroup\$

Ahead, 7 bytes

1~@O+K~

Prints 1 on its own, 2 when doubled, 3 when tripled etc.

Try it online!

\$\endgroup\$
1
\$\begingroup\$

Aheui, 23 bytes

분아떠망히
아뷴

outputs 4.

Doubled:

분아떠망히
아뷴
분아떠망히
아뷴

outputs 8.

Try it on jsaheui

\$\endgroup\$
1
\$\begingroup\$

W, 2 bytes

1+

Explanation

1+   % Adds an (implicit) 0 (on empty input)
  1+ % Add the constant 1 by 1
     % Implicit output
\$\endgroup\$
1
\$\begingroup\$

MathGolf, 1 byte

Added just for completeness.

)

Try it online!

\$\endgroup\$
1
\$\begingroup\$

05AB1E, 2 bytes

2*

Try it online!

2 pushes 2 to the stack.

* multiplies the last 2 elements of the stack.

Doubled

05AB1E, 4 bytes

2*2*

Try it online!

\$\endgroup\$
1
\$\begingroup\$

Javascript (NodeJS) 44 bytes

l={get a(){console.log(z)}};z=this.z?2:1;l.a

Or in a browser environment, 38 bytes:

l={get a(){alert(z)}};z=this.z?2:1;l.a

I found this really challenging, but really interesting. I probably overlooked a much simpler way of doing this.

Using a getter was the only way I could think of so far where appending the second copy of the string would not cause the initial behaviour to run before we get a chance to intervene. When it's repeated, we get:

l={get a(){console.log(z)}};z=this.z?2:1;l.al={get a(){console.log(z)}};z=this.z?2:1;l.a

The critical part is that l.a (the getter) only ends up happening once, because the first time it becomes l.al=...

\$\endgroup\$
1
\$\begingroup\$

Desmos, 3 bytes

Original

1+0

Doubled

1+01+0

Try It On Desmos!

Any answer in the form a+0, where a is a positive integer, will work. For example, 4444+0 outputs 4444 and 4444+04444+0 outputs 8888.

\$\endgroup\$
1
\$\begingroup\$

BRASCA, 2 bytes

Original:

C}

Doubled:

C}C}

Try it!

Try it!Try it!

Explanation

Original:

C     - Sets implicit output to number mode
 }    - Increment top of stack (stack is infinite zeroes by default)

Doubled:

C     - Sets implicit output to number mode
 }    - Increment top of stack (stack is infinite zeroes by default)
  C   - Implicit output is already set to number mode, so it does nothing
   }  - Increment top of stack again
\$\endgroup\$
1
\$\begingroup\$

Pxem (esolang-box notation), 8 bytes.

In this docker environment Pxem program, officially given as a pair of filename and its content, is given as a file:

The first line is the file name of the pxem code.

The rest is the content of the pxem code.

Original is

.f.+.n
.

which is translated to filename .f.+.n with content .. It outputs 46, which is ASCII code for ..

When doubled:

.f.+.n
..f.+.n
.

which is translated to filename .f.+.n with content ..f.+.n\n.. It outputs 92.

How it works

.f pushes content in reverse order
.+ does push (pop+pop) if size>=2; nop otherwise
.n does printf %d pop

Try it online!

Try it online!Try it online!

\$\endgroup\$
0
0
\$\begingroup\$

05AB1E, 2 bytes

¼¾

Try it online!

¼¾  # full program
¼   # increment counter_variable (initially 0)
 ¾  # push counter_variable
    # implicit output

Doubled, 4 bytes

¼¾¼¾

Try it online!Try it online!

¼¾¼¾  # full program
¼     # increment counter_variable (initially 0)
 ¾    # push counter_variable
  ¼   # increment counter_variable
   ¾  # push counter_variable
      # implicit output
\$\endgroup\$
0
\$\begingroup\$

Pxem, 0 bytes (content) + 21 bytes (filename); requires to be executed on console.

  • Content is empty.
  • Filename (escaped): \001.r.v.w.s\b2.p.d.a11.o

Try it online!

Try it online!Try it online!

How it works

When single, it just outputs 1; when doubled, it appends backspace character and 2; this is how it looks like as if it were doubled. If this would violate the rules, I'm sorry.

\$\endgroup\$
-3
\$\begingroup\$

Unary(Inefficient conversion), 596 bytes

Not doubled: <<+.

Doubled: ++.>

Well, require left-exist tape, and output not ascii, but

\$\endgroup\$
1 2 3 4
5

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service, privacy policy and cookie policy

Not the answer you're looking for? Browse other questions tagged or ask your own question.