301
\$\begingroup\$

This is an challenge in which each answer builds on the previous answer. I recommend sorting the thread by "oldest" in order to be sure about the order in which the posts are made.

Note: This has become quite a long-lasting challenge, and posting new answers is fairly difficult. As such, there's now a chat room available for this challenge, in case you want advice on a particular part of a potential answer, have ideas for languages that could be added, or the like. Feel free to drop in if you have anything to ask or say!

The task

The nth program to be submitted must run in n different languages; specifically, all the languages added in previous programs to be submitted, plus one more. The program must output 1 when run in the first language used in answers to this question, 2 when run in the second language, and so on. For example, the first answer could print 1 when run in Python 3, and the second answer could output 1 when run in Python 3 and 2 when run in JavaScript; in this case, the third answer would have to output 1 when run in Python 3, 2 when run in JavaScript, and 3 when run in some other language.

Additional rules

  • Your program must run without erroring out or crashing. Warnings (and other stderr output) are acceptable, but the program must exit normally (e.g. by running off the end of the program, or via a command such as exit that performs normal program termination).

  • The output must be only the integer, but trailing newlines are OK. Other unavoidable stdout output is also allowed. Examples: interpreter name and version in Befunge-93, space after printed string in Zephyr. Some languages provide two methods of printing – with and without trailing space; in this case method without trailing space must be used.

  • Each answer must be no more than 20% or 20 bytes (whichever is larger) longer than the previous answer. (This is to prevent the use of languages like Lenguage spamming up the thread, and to encourage at least a minor amount of golfing.)

  • Using different versions of the same language is allowed (although obviously they'll have to print different numbers, so you'll need to fit a version check into the polyglot). However, you may not use a language feature that returns the language's version number. Repeating the exact same language is, obviously, impossible (as the program would have to deterministically print one of two different numbers).

  • Tricks like excessive comment abuse, despite being banned in some polyglot competitions, are just fine here.

  • You don't have to use the previous answers as a guide to writing your own (you can rewrite the whole program if you like, as long as it complies with the spec); however, basing your answer mostly on a previous answer is allowed and probably the easiest way to make a solution.

  • You cannot submit two answers in a row. Let someone else post in between. This rule applies until victory condition is met.

  • As this challenge requires other competitors to post in the same languages you are, you can only use languages with a free implementation (much as though this were a contest).

  • In the case where a language has more than one interpreter, you can pick any interpreter for any given language so long as all programs which are meant to run successfully in that language do so in that interpreter. (In other words, if a program works in more than one interpreter, future posts can pick either of those interpreters, rather than a post "locking in" a particular choice of interpreter for a language.)

  • If some interpreter gets updated and the program no longer works in the newer version then new answers can either stick to the old version or fix the program to work in the new version.

  • This challenge now uses the new PPCG rules about language choice: you can use a language, or a language interpreter, even if it's newer than the question. However, you may not use a language/interpreter that's newer than the question if a) the language was designed for the purpose of polyglotting or b) the language was inspired by this question. (So newly designed practical programming languages are almost certainly going to be OK, as are unrelated esolangs, but things like A Pear Tree, which was inspired by this question, are banned.) Note that this doesn't change the validity of languages designed for polyglotting that are older than this question.

  • Note that the victory condition (see below) is designed so that breaking the chain (i.e. making it impossible for anyone else to answer after you via the use of a language that is hard to polyglot with further languages) will disqualify you from winning. The aim is to keep going as long as we can, and if you want to win, you'll have to respect that.

Answer format

As all the answers depend on each other, having a consistent answer format is going to be helpful. I recommend formatting your answer something like this (this is an example for the second link in the chain):

2. JavaScript, 40 bytes

(program goes here)

This program prints 1 in Python 3, and 2 in JavaScript.

(if you want to explain the program, the polyglotting techniques, etc., place them here)

Victory condition

Once there have been no new answers for 14 days, the winner will be whoever posted the second newest answer, i.e. the largest polyglot that's been proven not to have broken the chain. Extending the chain after that is still very welcome, though!

The winner is Chance, see answer 194 (TemplAt).

Language list

// This snippet is based on the snippet from hello world thread https://codegolf.stackexchange.com/questions/55422/hello-world
// It was tested only in Google Chrome

// https://stackoverflow.com/a/4673436
if (!String.prototype.format) {
  String.prototype.format = function() {
    var args = arguments;
    return this.replace(/{(\d+)}/g, (match, number) => (typeof args[number] != 'undefined' ? args[number] : match) );
  };
}

var QUESTION_ID = 102370; // from the question url
var ANSWER_FILTER = "!t)IWYnsLAZle2tQ3KqrVveCRJfxcRLe";

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;
}

var answers = [], answer_page = 1;

function getAnswers() {
  jQuery.ajax({
    url: answersUrl(answer_page++),
    method: "get",
    dataType: "jsonp",
    crossDomain: true,
    success: function (data) {
      answers.push.apply(answers, data.items);
      if (data.has_more) { $('#status').text($('#status').text() + '.'); getAnswers(); }
      else process();
    },
    // [Documentation](http://api.jquery.com/jquery.ajax/) states that `error` handler is not called for cross-domain JSONP requests, 
    // but it works here, probably because api.stackexchange.com and codegolf.stackexchange.com are on the same domain.
    error:  function (a,b,c) { 
      $('#status').text( "Failed to load answers: " + b + " " + c );
      console.log( b + " " + c );
    },
  });
}

getAnswers();

// https://stackoverflow.com/questions/6290442/html-input-type-text-onchange-event-not-working/39834997#39834997
// https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement/input_event
const input = document.querySelector('input');
input.addEventListener('input', onSearchInput);

function onSearchInput(e)
{
    var table = document.getElementsByTagName("table")[0];
    var str = e.srcElement.value.toLowerCase();
    var num_results = 0;

    if(str == "") // optimization for empty input
    {
        // show all rows
        for(var i = 1, row; row = table.rows[i]; i++)
        {
            row.className = "";
            num_results++;
        }
    }
    else
    {
        for(var i = 1, row; row = table.rows[i]; i++)
        {
            var hidden = row.innerText.toLowerCase().indexOf(str) == -1;
            if(!hidden) num_results++;
            row.className = hidden ? "hidden" : "";
        }
    }
    document.getElementById("results").innerText = "Results: " + num_results;
}


/* Function ParseHeader() extracts answer number, language name and size of polyglot from answer header.
   Argument: `header` - answer header string without markup, eg. "1. Python 3 (8 bytes)" or "59. Tcl, 1324 bytes".
   Retval:  object, eg. {num: 1, language: "Python 3", size: 8} or 
            null if header has wrong format
  
   There are two formats of header, new one with comma and old one with parens.
   Parsing new format only with regexp is hard because:
   - language name may contain commas,                                 eg. "51. Assembly (x64, Linux, AS), 1086 bytes"
   - there may be several sizes, of which the last one should be used, eg. "210. Haskell without MonomorphismRestriction, 10035 9977 bytes"

   There are only several answers with old format header: 1-5, 7, 12-17, 21. All of them have single size and don't have parens in language name,
   so they can be parsed with simple regexp.
   
   Algorithm: Find commas. If there are no commas parse it as old format. Otherwise parse it as new format.
   New format parsing: Let everything after last comma be `sizes`. Check if `sizes` ends with the word "bytes". If not, set size to 0.
   Take the word before "bytes" and convert it to number. Parse the rest of the header (before last comma) with regexp.
*/
function ParseHeader(header)
{
  var a = header.split(',');
  if(a.length > 1) // current format: Number "." Language "," Size+ "bytes"
  {
    // filter(s=>s) removes empty strings from array (handle multiple consecutive spaces)
    var sizes = a[a.length-1].split(" ").filter(s=>s); // " 123 100  bytes " -> ["123", "100", "bytes"]
    var size;
    if(sizes.length < 2 || sizes[sizes.length-1] != "bytes") size = 0;
    else size = +sizes[sizes.length-2];

    a.splice(a.length-1,1); // remove last element
    var match = a.join(',').match(/(\d*)\.(.*)/);
    if (!match) return null;
    return{
            num: +match[1],
            language: match[2].trim(),
            size: size,
          };
  }
  else // old format: Number "." Language "(" Size "bytes" ")"
  {
    var format = /(\d*)\.([^(]*)\((\d*)\s*bytes\)/;
    var match = header.match(format);
    if (!match) return null;
    return{
            num: +match[1],
            language: match[2].trim(),
            size: +match[3]
          };
  }
}

// 1533246057 (number of seconds since UTC 00:00 1 Jan 1970) -> "Aug 2 '18"
// other useful Date functions: toUTCString, getUTCDate, getUTCMonth, getUTCFullYear
function FormatDate(n)
{
  var date = new Date(n*1000); // takes milliseconds
  var md = date.toLocaleDateString("en-US", {timeZone:"UTC", day:"numeric", month:"short"});
  var y  = date.toLocaleDateString("en-US", {timeZone:"UTC", year:"2-digit"});
  return md + " '" + y;
}


var processed = []; // processed answers, it's called `valid` in original snippet

function ProcessAnswer(a)
{
  var body = a.body, header;

  //
  // Extract header from answer body.
  // Try find <h1> header (markdown #). If not found try find <h2> (markdown ##).
  // Extracted header contains only text, all markup is stripped.
  // For 99 language markup is later readded to language name because markup is essential for it.
  //
  var el = document.createElement('html'); // dummy element used for finding header
  el.innerHTML = body;
  var headers = el.getElementsByTagName('h1');
  if(headers.length != 0) header = headers[0].innerText;
  else {
    headers = el.getElementsByTagName('h2');
    if(headers.length != 0) header = headers[0].innerText;
    else { console.log(body); return; } // error: <h1> and <h2> not found
  }

  var info = ParseHeader(header)
  if(!info) { console.log(body); return; } // error: unrecognised header format

  if(info.num == 99 && info.language == "99") info.language = "<i>99</i>";

  processed.push({
    num:         info.num,
    language:    info.language,
    size:        info.size,
    answer_link:   a.share_link,
    user:          a.owner.display_name,
    user_link:     a.owner.link,         // `undefined` if user was deleted
    creation_date: a.creation_date,      // unix epoch (number of seconds since UTC 00:00 1 Jan 1970)
  });
}

function process()
{
  $('#status').remove();

  answers.forEach(ProcessAnswer); // answers -> processed
  
  processed.sort( (a,b)=>(a.num-b.num) ); // sort by answer number, ascending

  processed.forEach(function (a) {
    
    var date = FormatDate(a.creation_date);

    var user = a.user_link ? ('<a href="'+a.user_link+'">'+a.user+'</a>') : a.user; // redundant code, currently the only deleted user is ais523
    if(user == "user62131") user = '<a href="https://chat.stackexchange.com/users/246227/ais523">ais523</a>';

    var style = (a.num == 194) ? "background: #ccf" : ""; // 194 is winner answer

    var row = "<tr style='{0}'><td>{1}</td> <td><a href='{2}'>{3}</a></td> <td>{4}</td> <td>{5}</td> <td>{6}</td></tr>"
              .format(style, a.num, a.answer_link, a.language, a.size, user, date);

    $('#answers').append( row );
  });
}
a {text-decoration:none}
a:visited {color:#00e}

table, td, th { border: 1px solid black; }
td, th { padding-left: 5px; padding-right: 5px; white-space: nowrap; }
tr:hover { background-color: #ff9; }
td:first-child  { text-align:center; } /* # */
td:nth-child(4) { font-style:italic; } /* author */
td:nth-child(5) { text-align:right;  } /* date */

p { margin: 8px 0px }
.hidden { display: none } /* search hides rows */
<script src="https://ajax.googleapis.com/ajax/libs/jquery/2.1.1/jquery.min.js"></script>
<p>
  <span>Search: </span><input autofocus> &nbsp;<span id="results"></span>
</p>
<table class="answer-list">
  <thead>
    <tr><th>#</th> <th>Language</th> <th>Size (bytes)</th> <th>Author</th> <th>Date</th></tr>
  </thead>
  <tbody id="answers">
  
  </tbody>
</table>
<div id="status">Loading answers...</div>

\$\endgroup\$
28
  • 4
    \$\begingroup\$ For people who can see deleted posts: the Sandbox post was here. \$\endgroup\$
    – user62131
    Dec 6, 2016 at 19:00
  • 6
    \$\begingroup\$ There's no need to copy the previous program, although of course you can use it as a guide; redoing the program from scratch is likely to take longer! There's no need to permalink to answers; sorting by oldest will show all the answers in order already. \$\endgroup\$
    – user62131
    Dec 6, 2016 at 19:44
  • 4
    \$\begingroup\$ @ais523 I think what was meant was that should new answers contain try it links with the new code? \$\endgroup\$
    – Blue
    Dec 6, 2016 at 19:45
  • 7
    \$\begingroup\$ I think we need a script that takes a hex dump of the code and automatically runs it in all the languages... \$\endgroup\$
    – mbomb007
    Dec 7, 2016 at 20:05
  • 5
    \$\begingroup\$ This is the Versatile integer printer posted as a different type of challenge. (Inspiration?) The final answer (currently) would score 0.0127, only beaten by Sp3000's 30 language submission... :) \$\endgroup\$ Dec 17, 2016 at 12:11

451 Answers 451

1
8 9
10
11 12
16
4
\$\begingroup\$

306. HTML+JavaScript (IE7), 14340 bytes

# 6 "($?63_lv+'50;+'51;5 5 %$\--$[250=@$]aat\" a/4*DvehfbIg/\"" 3 4//*26qkp16*^[.qx]"[8=,k]Pk PPX~_~)"xvy"\( 7# CO|"14" #:7 9 7 9                      7 222222222222222222222222                           "'" #\\
# 1"7"//['][']     ````      [>.>.?]~~)[7aatxy\#184  O@              (22)Siii/ \psddpsdoh ]##### #######++(- #### ##-[###### mxf ####xAegguEay######i#u####Ft#######MZWWW####WWWWWW zR###### # ####  #######:_a5# 202ø!},{P_<Ám/e!<ÁmOe!<É}M<ÁmS15%!!%BB44,222%!!%BBPZPYAAA4D,5P[5?4-0!<½!!22<2/!]ss1]'[kkX"204".â'_PPQss 7 999993 1 7 3 1 8 1 1 55 k zzzzkf kf k zzzzzd kf k zzzzza kf bfz 2#z#111#y#y#y#_# coding=utf8             ! 1>?7ДOq#t#>2/Wr#t#t#q#68#r#t#t#68#q#63#r#t#t#6v#>#</Wr#6}#y/===Wr#7ЯOq#>J7Д/Wr#y<Wr#>5/Wr#t#t#6y#>-=/Wr#6|#>6/Wr122! 1退                               @ [[[["472"?]]]]******<
# if-0//               18&1&  nthteo nthieo nthneo  a;net R[+++].----._     /112\    ##### #######   # #    #####; #   #   #    ##### ####  ###   #### # W#W#####WW#WWWW#####W####WW###WWW####W#WW#W#####WW#WWWW#WWWWWWWWWWWWWWWWWWWW;WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWR
#6!@eD>>if 2>2*>++++++!\::    @ / 78"oo@"   '\"' ` L       >"082",,,@_ 1   x-----x########    ## ### ###### ######## #### ##### ####### ##### ###    # # #### ### ##### ####### ##### ###    # # #### ### ##### #EEEEEδΘΔΔΔΘΔΘλ
# endif/*      v>>>>>>> >>">r"{\>>>> @ 0:8:8/_ }\(*[>]R 10G|'53'S 1  >>>>  \)      # ##########>>###>## #####>>##>####>##>#>#####>>##>#####>####>>>#####>##>#>##>>##>####>>##>#####>####>>>##### ## # ##  ## ####
#comment -[v]  >>>>>>>>              xxxxx [@,,,"279"]>252O>"01",,@_ 9 h$s o#      #????!?!??!??!!!!??   ?!?!??!!?!?!!!!!?!!!!?????!????????????????????! >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>             
#[[/]e] x  > >>>>>>>@!:!8:6:2/_  >>>>>>>>>>>>>>>>>>>>>>>>>;>>>>>>>>>>>>>>>>>>      #v           @.7.8.2<
#~[! R++++++] +++++++++\++++++++++++++++++++++++++++++++++U.._+++++++._+++o+++o--ox#
####################################################################################>
 #{{{{]~*[~*  +++++++[>+++++++<-]>+._+++++._+._@]+-}}[.^+;;+;;+;;+<>;;+;;+;;+;;;;;;+;;+;;.._]}--<^>++[+++++[>+++++++<-]>._++++._+++._^<]+-+<[<=oC<=oC<._>>>>-]^>[<+++++[>++++++++++<-]>@@+.---@._+>$] '4o'6o@ )++$--![+++[>+++++++<-]>+._+++++.._>](  <<>> }<}>}[<}}<<}<<<<<}<<}<<<<}<<<}}}<}}<}}<}}<}}<}}<}}}<}}<<<<<<<<<<<}}}<}}<}}<}}<}}<}}<}}}<<<<<<<<<<}]  >>\[/>\/\>>>>>>>]>\[./>>\/\./\/>>>\./]  [[[
#-  x
#* *#p 173#*  e:1*23/5x%6E2  []-main=-[165]- ###  `. :-write(186). end_of_file. `
#`⟪`⟪\⟫9999 9 9
#/*9 999 99 9999 Mn MMM MMMMnnMnnnMnMMMMMMMnMMnnnnnMMnMnMnnMnMnnnnnnMnMnMMMMMMMMnnMnMnnnMnMMMM   @,,, "286"_+1y2 #<"67",,@␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋'''␌`297'print quit`s'''␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␌␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋
#|9  
#cs 9 9999
#   
#<<<#
#>  
#{  
#bqbqbqLzLzLzqtqtqtTcTcTcRqRqRq TzTzTzRtRtRtMbMbMbPsPsPsTqTqTqAbAbAbTmTmTmBqBqBqMtMtMtUgUgUg
#=($?$?0l0c01k1k0l0i 0r 0h0h1d111 0e 0y0y 0mo1d0y0e0e001d0i0f 0g 0n0n110mo0n0t 0t0mo0f0t0g0g0f0h0r0r0i0001k10c 0c0l11110000011100|_  )\
[ ' "`e```.1.0.6i]56pq["]298 .quit._[`\']put 294 bye!\` #s['];#/\\/;print 24;exit}}__END__/
###\MoOMoOMoOMoOMOOmoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOmOoMOomoomoOOOM e>+@+-@@@@=>+<@@@=>+<?#>;?\:-._++._++++._#/<?\>3-++._6+---2._#/++++++++++++++++++++++++++++++++++++++++++++++++._++._++++++.>!\
' WWWw;WW;WW;wv;w;;WW;wW;WW;wv;wW;W_;Ww;WW;WW;WW;WW;wW;WW;Ww;W;WW;WWWWwW;;;WWWWWWWwwwwvwWWWwWWWWwvwWWwW\WWwvwWWwWWWwvwW/Ww\WWW ho ho ho ho // ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi MU ([])  ({}<(((((()()())){}{})){}{})>)(({})){}{(<(<()>)({})({}<{}>({}){})>){({}[()])}}({}){}({}()<()()()>)  (<><()>){({}[()])}{  #(((()()()()())()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()()))  ((((((((\';  a=$(printf \\x00);b=$(echo -n $a|wc -c);case $b[1]¢ in 1?)echo 54;;1* )echo 242;;4* )echo 78;;8* )echo $((9999999999999999999>0?166:244));;0?1??)echo 50;;0* )echo 282;;* )echo 58;;esac;exit;#{IO.puts 295#)';  print (0and eval('":"&&(defined?A)&&290||(defined?pp)&&190||(defined?__dir__)&&13||"_"[0]==95&&108||110')or(None and(-1 %2>0and 9or 247)or 1/2and eval('hasattr(zip,"iters")and 200or\'𒁁\'=="-"and 241or 1')or 5<<64>>64or 68));"${print(g+91)}$/";exit; "$'#{print(187);exit}'$/"; #< ?>wWWsssss {}#(prin 45)(bye){{{}#}#}#(prin 199)(bye) 46(8+9+9+9+9+=!) >* * * * *[[[[3+4*7*@] ] ] ]xxxxxxxxxxxxxxxxxxxxx
###;{e=1}={e:null};console.log e&&39||180;\
__DATA__="""  
#"  \
__END__
set pr'[puts 59][exit]\'':;@echo 185 #';set pr'-';pr 89;exit
ifdef ss 
1     ! !
2   !    !
9      !!
2#
#  
#  
#  
#PLACET,2<- #2FAC,2SUB#1<- #52FAC,2SUB#2<- #32FACREADOUT,2PLEASEGIVEUPFACs wwwwwwwwwwwWWWwWWWWWwWWWWWWWwWWWWWWWWWwWWWWWWWWWWWWWWWwWWWWWWWWWWWWw W
jrzaeeaeuee_wuuwq jii_iullluiiiogr se_eeepaeeeeeeeeee;eeecisajjarpppppp ⠆⠄⡒⡆⡘😆😨😒😨💬95💬👥➡😻😹😸🙀🙀😹😼😿🙀🙀😼😼😸🙀🙀🙀🙀
👋🔢🌚🌝🌝🌚🌚🌚🌚🌚🐸🐸🐸🐸🐸🐸😂😂😂😂😂😂😂🌚🔥😂😂😂😂😂😂😂💯💩🐸🔥😂💞💩💞😂😂😂😂💞🔥🌚▲▲▲²²²²▲¡▼¡▲▲¡⎚¿⁵228¦ₔ₁₉₃2♦10♦10♦10♥☰䷩䷏䷏䷨䷏䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩⚎ֱֲֵֶֶֶֶַַַָָ  
밠밠따빠빠맣박다맣받다맣희맣희吾有一數曰二百八十一書之うんたんたんたんたんうんうんうんうんうんたんうんうんうんたんうんたんたんうんたんたんうんたんたんうんたんたんうんたんたんたんたんたんうんうんうんうんたんたんうんたんたんたんうんうんうんたんうんうんたんうんうんたんうんうんたんうんたんうんうんうんたんたんうんたんたんうんたんたんうんたんたんうんたんたんたんうんうん  
😊♈💖  ↨↑1↑↑↑↑↑↑↑↑↨21↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑2↨↑1↑↑↑↨↨0↑0↕→
😇♈♈  
😊♉♈  
😇♈♈  
😇♈♉  
😇♈💜  
😊♉♈  #e:>* * * * *[[[[828+*+@+*99] ] ] ]* * * * *<
😊📢♈  
😈♈💜  
😊📢♈  
😇♉💞  
😊📢♉🐸⠀⢃⠛⠋  
#-49,A,-1                              #
#-5,A,-1                               #
#6,A,-1                                #
XX  
x+------+XX   X       XXX
x|/0110@| X X  XXXXXXXXX X
x|/0011 | X X   XXXXXXX
x|/0010 | X
x|/0011 | 
x|/0001 | 
x|/$0011|  
x+------+  
#+    +
1   *xxxxxxx
53 x+       x x     xxx
1  x*  xxxx  xx   xx x  x
x  x  x  x  x x  x  x  xx
 +xx xxxxxxx +x xxxxxxx  xxxx
x  x   x      x   x
51  +xx        xxx
#  
1   *     x``   x  x
49 #+  xx+x=>+  x+x + x B+ ===+
#  =x x  x===  x x >8 xxx +++= +
#+  +x + x,_8=>+ xB  x+x
# =+R _*=x==  x +===+> x x    +
 x +R"12"+8=Dx B=xD +  + xxx+
#+ ``=>8=x>  x+~ x  x +x+B+
#  +====+x>~+B+= x x + x
#D~+x 8=++>8x +=   x+    +,_   +
15 + x   x  + +  xx   +  ?   ?@  %"18"_     !
1  + x   + x ++  xx   + ?@    ?
1 \+* x    +  +  x    +   +   *
1   ! x  +x   +       + ?  !  ?
1    ! x xx --... ...--  ? @ ?
x +   ++ xx  ++ ++     +
 +xxxxx  +     +
  
#= +
+ *   +
#= + *
#=**************************************************+>
  +  +$$$
#>"3"O._   +// rk:start | print: "69" rk:end       + e$P+++++*D*+++1++1E!s
   + ; + *
$'main' *****+ %++ %++ @@* %-- @@* %++ %++ @@*
 -+3o4o#  +
  <++"269">o+
^* *
 #+*****|
.x= #   +
,,  .=#
 #+ OOO       =#
 #^=
+`` 231 =#
#  #uuu#
,,..,.,,,,..,.,.,,..,,.,,,...,,.,,..,,,,,,..,,,.$
  
write 224;bye; 
  
 console.log 178;
  
~~~x  
main:Int  
main =248 
~~~  
literally, print 249
(print 164     (exit ) )
 ( *)
begin write         ('288'    )end.(*)
print 61
  
#<<<##>  
         print(85)
#<<<##>CO COMMENTp]] 
execute_process                            (COMMAND echo 296   )#[[
  
T:251  
E:0  
#+IDRIS: main:IO      (         );main=print 291
#ppW<#require"stdio"Stdio:write     (293  )#>;
#ceppp  ;  ;   ;
MsgBox (0,"",169   )
#cs  
Yo::=~147
::=  
You can see an x here.<<  
  
>{-<<<<<  
> 176
>> Output 1
>SET x TO 120. [0]{472454523665721469465830106052219449897}
>X x.   ;-}
>l=length$show"\0";main=print$[0,0,0,233,0,146,157]!!l{-
  
\begin{code}  
{- ;  ␉␉␉␉ 
␉
 ␉  



-}
open import IO;main = run (putStr"159" )
\end{code}
ppppppppppppp;pppp
# {{{ {{{ {{{ {{
#!ZZt >>END-IF
#xxxh  program-id.h.procedure
#xxxg  diVision.display 230.
#}}}f >>IF 2>2
#}}}e
#xxxd
#xx}c
#}}}b
#x}xa




































































































































































































































































































































<p>301</p>
<a>304</a>
<b>305</b>
<script type="text/tiscript">self.html="<p>302"</script><script> onload=function(){d=document;d.body.style.display='block';d.body.innerHTML=267-[0,0,0,10,0,0,-8,8,5,window.XMLHttpRequest ?-39:2][[""+[].pop][0].length-!!d.head-!d.fonts-28]}</script>
<style>
*+body,text{display:none}*{+color:fff}
a,b{-color:000;position:absolute;top:0}
b{color:000;-top:-90}
:after{content:"258";[;content:"276";]}
@media all\0{:after{content:"260"}}
@media \0 all{:after{content:"266"}}
</style>

<attache>Print[194]Exit[]</attache>
 
22-23-31-13-13-31-13-13-31-13-13-31-13-13-31-12-12-23-31-13-13-31-13-13-31-13-13-31-13-13-31-21-22-21-12-32
Take Northern Line to Tooting Bec
Take Northern Line to Charing Cross
Take Northern Line to Charing Cross
Take Northern Line to Bank
Take District Line to Hammersmith
Take District Line to Upminster
Take District Line to Hammersmith
Take District Line to Upminster
Take District Line to Embankment
Take Bakerloo Line to Embankment
7 UP
Take Northern Line to Mornington Crescent
7 RIGHT
7 RIGHT
7 TEACH
6 BOND
6 BOND
6 BOND
5 RIGHT
5 LEFT
5 RIGHT
7 BOND
7 TEACH
5 TEACH
6 YELL
5 TEACH
6 YELL
6 YELL
#  ;
set ! 57
set ! 51
out &49 &1
out &56 &1
out &50 &1
When this program starts:
There is a scribe called x
x is to write 179

p now 70 dollar off!
p has been selling out worldwide!
More 91 of this
How much is it
red down one blue up red down one blue up red up one red right two blue up
baa baaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa bleeeeeeeeeeeeet bleeeeeeeeeeeeet bleeeeeeeeeet baaaa bleet bleeeeeeeeeet bleeet bleeeeeeeeeet
#
COMMata#8;&&1Prers>80::gek:epos>Ex Cr u Uitharbody$/ $5"6c"F ._#a*ee gi[ s]pR 8ogr ca34* 161  prstdae7#text6,1ute_[2]!!\0/ad4ocod"r"n;z c;op>s0}e}tfeqFloat 
 ;:在ent
*/
 
#1""
#if!1
.int 2298589328,898451655,12,178790,1018168591,84934449,12597
#endif//*
#1""//*:
#include<stdio.h>
#define z(a) #a
#define u "e"//"
const char*i="24 10 31 1""a c #FFC0FF""B c #0000C0""d c #58007B""e c #0C8302""o c #FF8000""t c #FF00BC""u c #008080""h c #E60001""i c #CAFFFF""f c #280000""k c #CA0000""l c #CA007F""n c #330001 ""q c #E60000""A c #0040C0""E c #808000""F c #00C040""G c #008000 ""R c #800000""H c #0000AA""I c #00AA00""C c #55FFFF""K c #AAAAAA""r c red""g c green""b c blue""c c cyan""m c magenta""y c #FFFF00""x c black""_ c #FFFFFF""HHHahtdegggggggyrggggggc""IHHaixuEFbGGbggbryAEGRgc""CCHafyurbgbgggggggb____o""ICHakmyyyyyyyyyyyyyyyyye""I__almyyyyyyyyyyyyyyyyye""K__anmyyyyyyyyyyyyyy_y_e""HH_aqggyyyyyyyyg____m_Ce""CH_axxxxxxxxxxxxxxxxxxxx""K__aaaam___bbbbbBm_bbBab""K__________bbbbb___bbxbb";//"
typedef int known,macro;int x=!  '(',y[60];macro m(){0;}int f(int a,...){y[x=0]=x=72;printf("\x25i",!m?195:!a?124+x:sizeof' '-1? (1&*z (N)?234:"\??-"[1]?218:67^*u""):*u""?37:z (0'0  0'0 )[7]?75:"\??-"[1]?77+a/2:77);}__attribute__((weak))int main(){known y;int i;f(x,x=sizeof y);x=1;return 0;}__attribute__((destructor))int g(){x?0:puts("198");}//())*/
#1""/*/
<<<<<<<<<<WQTkTTX
 
 
>import Prelude;import GHC.IO;import Data.Functor.Const;import Data.String;import Text.Heredoc;import Control.Exception;import Language.Haskell.TH;import Text.Show.Functions;instance Monoid a=>Monad (Const a)where _>>=_=mempty
>instance K Float;instance IsString Integer where{fromString _=0};b=x#x
>i_= -1`mod`2+c;data B=B Int;_=B b;e=error"#";f?n=  unsafePerformIO$ catch (f e)$ \ErrorCall{}->r n;instance Num(a->b);instance Num();instance Show(Q a)where{show _=""};f= (^);q _=r$ (d.B)?4;d(B _)=r$0`f`f 2 64;class(Show a,Floating a)=>K a where{k::a->String;k _=show$ (id::a->a)pi};c=l (- x )`mod`4;g=[here|here<-""]--[|]
>--W
>x=0;y#a=subtract 0b1206;x#a=174;h a=a^x;r=pure;l a=length$ show a;forall=0;z|(∀)<-5=forall;b1206|let _._=x;negate _=3=206+[40,58,0,57,55,26,16,3,4,-78,0,1,8,5,6,11]!!(l("  ",0x0.1,1e1, (0`id` ),k(0::Float ),toEnum 0::Num a=>Enum a=>a )+2*l  (do a<-Const[1];pure a,h pi,h(0::Real a=>a))- 3*(l$(pure$TupE[]::ExpQ))-(-q?6+70+z));(!)=seq
>;
>main|let p!_=0=print$ sum[last$172:[[b,0,170,303]!!i_|g<">"],0!61]--} 
 
#1 ""/*/
#if!1
#endif//*
/*/
#if!1
_;
select 192;
.exit
print1(292                       )
quit
#endif
p=sizeof("   (\");print'(''72'')';end !" );main(){puts('??-'&1?"101":"92" );return 0;}
#if 0
#endif//*
#}
disp 49
#{
}{}<>
 /._++.._# !._++.-.>@
#:  /
 \?     -/!  +++++++++++++++++++++++++++++++++++++++++++++++++<>^+++++<\>+++.-.
rebol[ ]prin either Value? 'disarm[223][270];red[ ]prin 221;  + #.---.>/
#s{  /<+>/   K yya+-        &  g+$
endif#                A=AgRA;       AC
# {\
""";'"#{'#'}'}'
#@[[[["272"?]] #]]******<
#<<<#
#ce:  ~#class C{function:Main(a:String[])~Nil{83->Print();}}#$/
#endcomment;K`250
#nocomment outtext("155" )
#/`psZ283MIOnDrFe @,,,"284_"># 01-:2/_;:@,,,"285"_+1y2"982"2k,# @#;# k-'1:,,@_  pS9^7^8^MUOUOF
#\!|!o51   ;        ~nJQ  p'34'  \=#x=4;print(1>>-1<2 ? 17 : Inf16-0|>sizeof>2 ? 162 : √4x<8 ? 201 : 225+2>>1*2 )#p⟫try {EVAL 'say 「27」;exit'};say 237#⟫say 167#{{p{{}}}}say 235#]#print(47)#]#echo 21#>         :/aa*7+42@n;/#print(171)#s-#print 175#s|#print(208)#sCOMMENTprint("65" )#ERi521@<[[["172"?]]]]* * * * * *<es9#
#8M`|  <esc>dggi2<esc>// :~- <~-< ~-<<<~-! `=> #
#1//  >>END-IF*>>>9#
# '>+/*' 25  >[};]+ pppppeee^e*n*\              \! 99n*n*es*s      \*s*ee*n*n*n*e*sss*e*n*n*n*ee*js "( *)//dd"    <e 5>1  */// \)∙226p|_|_X222999612#

Try it online!diff

IE7 is separated from IE6 with window.XMLHttpRequest. Space before ? is for Chip.

\$\endgroup\$
4
\$\begingroup\$

307. HTML+JavaScript (IE8), 14333 bytes

# 6 "($?63_lv+'50;+'51;5 5 %$\--$[250=@$]aat\" a/4*DvehfbIg/\"" 3 4//*26qkp16*^[.qx]"[8=,k]Pk PPX~_~)"xvy"\( 7# CO|"14" #:7 9 7 9                      7 222222222222222222222222                           "'" #\\
# 1"7"//['][']     ````      [>.>.?]~~)[7aatxy\#184  O@              (22)Siii/ \psddpsdoh ]##### #######++(- #### ##-[###### mxf ####xAegguEay######i#u####Ft#######MZWWW####WWWWWW zR###### # ####  #######:_a5# 202ø!},{P_<Ám/e!<ÁmOe!<É}M<ÁmS15%!!%BB44,222%!!%BBPZPYAAA4D,5P[5?4-0!<½!!22<2/!]ss1]'[kkX"204".â'_PPQss 7 999993 1 7 3 1 8 1 1 55 k zzzzkf kf k zzzzzd kf k zzzzza kf bfz 2#z#111#y#y#y#_# coding=utf8             ! 1>?7ДOq#t#>2/Wr#t#t#q#68#r#t#t#68#q#63#r#t#t#6v#>#</Wr#6}#y/===Wr#7ЯOq#>J7Д/Wr#y<Wr#>5/Wr#t#t#6y#>-=/Wr#6|#>6/Wr122! 1退                               @ [[[["472"?]]]]******<
# if-0//               18&1&  nthteo nthieo nthneo  a;net R[+++].----._     /112\    ##### #######   # #    #####; #   #   #    ##### ####  ###   #### # W#W#####WW#WWWW#####W####WW###WWW####W#WW#W#####WW#WWWW#WWWWWWWWWWWWWWWWWWWW;WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWR
#6!@eD>>if 2>2*>++++++!\::    @ / 78"oo@"   '\"' ` L       >"082",,,@_ 1   x-----x########    ## ### ###### ######## #### ##### ####### ##### ###    # # #### ### ##### ####### ##### ###    # # #### ### ##### #EEEEEδΘΔΔΔΘΔΘλ
# endif/*      v>>>>>>> >>">r"{\>>>> @ 0:8:8/_ }\(*[>]R 10G|'53'S 1  >>>>  \)      # ##########>>###>## #####>>##>####>##>#>#####>>##>#####>####>>>#####>##>#>##>>##>####>>##>#####>####>>>##### ## # ##  ## ####
#comment -[v]  >>>>>>>>              xxxxx [@,,,"279"]>252O>"01",,@_ 9 h$s o#      #????!?!??!??!!!!??   ?!?!??!!?!?!!!!!?!!!!?????!????????????????????! >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>             
#[[/]e] x  > >>>>>>>@!:!8:6:2/_  >>>>>>>>>>>>>>>>>>>>>>>>>;>>>>>>>>>>>>>>>>>>      #v           @.7.8.2<
#~[! R++++++] +++++++++\++++++++++++++++++++++++++++++++++U.._+++++++._+++o+++o--ox#
####################################################################################>
 #{{{{]~*[~*  +++++++[>+++++++<-]>+._+++++._+._@]+-}}[.^+;;+;;+;;+<>;;+;;+;;+;;;;;;+;;+;;.._]}--<^>++[+++++[>+++++++<-]>._++++._+++._^<]+-+<[<=oC<=oC<._>>>>-]^>[<+++++[>++++++++++<-]>@@+.---@._+>$] '4o'6o@ )++$--![+++[>+++++++<-]>+._+++++.._>](  <<>> }<}>}[<}}<<}<<<<<}<<}<<<<}<<<}}}<}}<}}<}}<}}<}}<}}}<}}<<<<<<<<<<<}}}<}}<}}<}}<}}<}}<}}}<<<<<<<<<<}]  >>\[/>\/\>>>>>>>]>\[./>>\/\./\/>>>\./]  [[[
#-  x
#* *#p 173#*  e:1*23/5x%6E2  []-main=-[165]- ###  `. :-write(186). end_of_file. `
#`⟪`⟪\⟫9999 9 9
#/*9 999 99 9999 Mn MMM MMMMnnMnnnMnMMMMMMMnMMnnnnnMMnMnMnnMnMnnnnnnMnMnMMMMMMMMnnMnMnnnMnMMMM   @,,, "286"_+1y2 #<"67",,@␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋'''␌`297'print quit`s'''␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␌␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋
#|9  
#cs 9 9999
#   
#<<<#
#>  
#{  
#bqbqbqLzLzLzqtqtqtTcTcTcRqRqRq TzTzTzRtRtRtMbMbMbPsPsPsTqTqTqAbAbAbTmTmTmBqBqBqMtMtMtUgUgUg
#=($?$?0l0c01k1k0l0i 0r 0h0h1d111 0e 0y0y 0mo1d0y0e0e001d0i0f 0g 0n0n110mo0n0t 0t0mo0f0t0g0g0f0h0r0r0i0001k10c 0c0l11110000011100|_  )\
[ ' "`e```.1.0.6i]56pq["]298 .quit._[`\']put 294 bye!\` #s['];#/\\/;print 24;exit}}__END__/
###\MoOMoOMoOMoOMOOmoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOmOoMOomoomoOOOM e>+@+-@@@@=>+<@@@=>+<?#>;?\:-._++._++++._#/<?\>3-++._6+---2._#/++++++++++++++++++++++++++++++++++++++++++++++++._++._++++++.>!\
' WWWw;WW;WW;wv;w;;WW;wW;WW;wv;wW;W_;Ww;WW;WW;WW;WW;wW;WW;Ww;W;WW;WWWWwW;;;WWWWWWWwwwwvwWWWwWWWWwvwWWwW\WWwvwWWwWWWwvwW/Ww\WWW ho ho ho ho // ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi MU ([])  ({}<(((((()()())){}{})){}{})>)(({})){}{(<(<()>)({})({}<{}>({}){})>){({}[()])}}({}){}({}()<()()()>)  (<><()>){({}[()])}{  #(((()()()()())()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()()))  ((((((((\';  a=$(printf \\x00);b=$(echo -n $a|wc -c);case $b[1]¢ in 1?)echo 54;;1* )echo 242;;4* )echo 78;;8* )echo $((9999999999999999999>0?166:244));;0?1??)echo 50;;0* )echo 282;;* )echo 58;;esac;exit;#{IO.puts 295#)';  print (0and eval('":"&&(defined?A)&&290||(defined?pp)&&190||(defined?__dir__)&&13||"_"[0]==95&&108||110')or(None and(-1 %2>0and 9or 247)or 1/2and eval('hasattr(zip,"iters")and 200or\'𒁁\'=="-"and 241or 1')or 5<<64>>64or 68));"${print(g+91)}$/";exit; "$'#{print(187);exit}'$/"; #< ?>wWWsssss {}#(prin 45)(bye){{{}#}#}#(prin 199)(bye) 46(8+9+9+9+9+=!) >* * * * *[[[[3+4*7*@] ] ] ]xxxxxxxxxxxxxxxxxxxxx
###;{e=1}={e:null};console.log e&&39||180;\
__DATA__="""  
#"  \
__END__
set pr'[puts 59][exit]\'':;@echo 185 #';set pr'-';pr 89;exit
ifdef ss 
1     ! !
2   !    !
9      !!
2#
#  
#  
#  
#PLACET,2<- #2FAC,2SUB#1<- #52FAC,2SUB#2<- #32FACREADOUT,2PLEASEGIVEUPFACs wwwwwwwwwwwWWWwWWWWWwWWWWWWWwWWWWWWWWWwWWWWWWWWWWWWWWWwWWWWWWWWWWWWw W
jrzaeeaeuee_wuuwq jii_iullluiiiogr se_eeepaeeeeeeeeee;eeecisajjarpppppp ⠆⠄⡒⡆⡘😆😨😒😨💬95💬👥➡😻😹😸🙀🙀😹😼😿🙀🙀😼😼😸🙀🙀🙀🙀
👋🔢🌚🌝🌝🌚🌚🌚🌚🌚🐸🐸🐸🐸🐸🐸😂😂😂😂😂😂😂🌚🔥😂😂😂😂😂😂😂💯💩🐸🔥😂💞💩💞😂😂😂😂💞🔥🌚▲▲▲²²²²▲¡▼¡▲▲¡⎚¿⁵228¦ₔ₁₉₃2♦10♦10♦10♥☰䷩䷏䷏䷨䷏䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩⚎ֱֲֵֶֶֶֶַַַָָ  
밠밠따빠빠맣박다맣받다맣희맣희吾有一數曰二百八十一書之うんたんたんたんたんうんうんうんうんうんたんうんうんうんたんうんたんたんうんたんたんうんたんたんうんたんたんうんたんたんたんたんたんうんうんうんうんたんたんうんたんたんたんうんうんうんたんうんうんたんうんうんたんうんうんたんうんたんうんうんうんたんたんうんたんたんうんたんたんうんたんたんうんたんたんたんうんうん  
😊♈💖  ↨↑1↑↑↑↑↑↑↑↑↨21↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑2↨↑1↑↑↑↨↨0↑0↕→
😇♈♈  
😊♉♈  
😇♈♈  
😇♈♉  
😇♈💜  
😊♉♈  #e:>* * * * *[[[[828+*+@+*99] ] ] ]* * * * *<
😊📢♈  
😈♈💜  
😊📢♈  
😇♉💞  
😊📢♉🐸⠀⢃⠛⠋  
#-49,A,-1                              #
#-5,A,-1                               #
#6,A,-1                                #
XX  
x+------+XX   X       XXX
x|/0110@| X X  XXXXXXXXX X
x|/0011 | X X   XXXXXXX
x|/0010 | X
x|/0011 | 
x|/0001 | 
x|/$0011|  
x+------+  
#+    +
1   *xxxxxxx
53 x+       x x     xxx
1  x*  xxxx  xx   xx x  x
x  x  x  x  x x  x  x  xx
 +xx xxxxxxx +x xxxxxxx  xxxx
x  x   x      x   x
51  +xx        xxx
#  
1   *     x``   x  x
49 #+  xx+x=>+  x+x + x B+ ===+
#  =x x  x===  x x >8 xxx +++= +
#+  +x + x,_8=>+ xB  x+x
# =+R _*=x==  x +===+> x x    +
 x +R"12"+8=Dx B=xD +  + xxx+
#+ ``=>8=x>  x+~ x  x +x+B+
#  +====+x>~+B+= x x + x
#D~+x 8=++>8x +=   x+    +,_   +
15 + x   x  + +  xx   +  ?   ?@  %"18"_     !
1  + x   + x ++  xx   + ?@    ?
1 \+* x    +  +  x    +   +   *
1   ! x  +x   +       + ?  !  ?
1    ! x xx --... ...--  ? @ ?
x +   ++ xx  ++ ++     +
 +xxxxx  +     +
  
#= +
+ *   +
#= + *
#=**************************************************+>
  +  +$$$
#>"3"O._   +// rk:start | print: "69" rk:end       + e$P+++++*D*+++1++1E!s
   + ; + *
$'main' *****+ %++ %++ @@* %-- @@* %++ %++ @@*
 -+3o4o#  +
  <++"269">o+
^* *
 #+*****|
.x= #   +
,,  .=#
 #+ OOO       =#
 #^=
+`` 231 =#
#  #uuu#
,,..,.,,,,..,.,.,,..,,.,,,...,,.,,..,,,,,,..,,,.$
  
write 224;bye; 
  
 console.log 178;
  
~~~x  
main:Int  
main =248 
~~~  
literally, print 249
(print 164     (exit ) )
 ( *)
begin write         ('288'    )end.(*)
print 61
  
#<<<##>  
         print(85)
#<<<##>CO COMMENTp]] 
execute_process                            (COMMAND echo 296   )#[[
  
T:251  
E:0  
#+IDRIS: main:IO      (         );main=print 291
#ppW<#require"stdio"Stdio:write     (293  )#>;
#ceppp  ;  ;   ;
MsgBox (0,"",169   )
#cs  
Yo::=~147
::=  
You can see an x here.<<  
  
>{-<<<<<  
> 176
>> Output 1
>SET x TO 120. [0]{472454523665721469465830106052219449897}
>X x.   ;-}
>l=length$show"\0";main=print$[0,0,0,233,0,146,157]!!l{-
  
\begin{code}  
{- ;  ␉␉␉␉ 
␉
 ␉  



-}
open import IO;main = run (putStr"159" )
\end{code}
ppppppppppppp;pp
# {{{ {{{ {{{ {{
#!ZZt >>END-IF
#xxxh  program-id.h.procedure
#xxxg  diVision.display 230.
#}}}f >>IF 2>2
#}}}e
#xxxd
#xx}c
#}}}b
#x}xa






























































































































































































































































































































<p>301</p>
<a>304</a>
<b>305</b>
 
<script type="text/tiscript">self.html="<p>302"</script><script> onload=function(){
d=document
d.body.innerHTML=
257+[10,0,0,0,0,0,18,2,5,d.compatible?50:window.XMLHttpRequest?49:8][[""+[].pop][0].length-!!d.head-!d.fonts-28]
}</script>

<style>
*+body,text{display:none}*{+color:fff}
a,b{-color:000;position:absolute;top:0}
b{color:000;-top:-90}
:after{content:"258";[;content:"276";]}
@media all\0{:after{content:"260"}}
@media \0 all{:after{content:"266"}}
</style>

<attache>Print[194]Exit[]</attache>
 
22-23-31-13-13-31-13-13-31-13-13-31-13-13-31-12-12-23-31-13-13-31-13-13-31-13-13-31-13-13-31-21-22-21-12-32
Take Northern Line to Tooting Bec
Take Northern Line to Charing Cross
Take Northern Line to Charing Cross
Take Northern Line to Bank
Take District Line to Hammersmith
Take District Line to Upminster
Take District Line to Hammersmith
Take District Line to Upminster
Take District Line to Embankment
Take Bakerloo Line to Embankment
7 UP
Take Northern Line to Mornington Crescent
7 RIGHT
7 RIGHT
7 TEACH
6 BOND
6 BOND
6 BOND
5 RIGHT
5 LEFT
5 RIGHT
7 BOND
7 TEACH
5 TEACH
6 YELL
5 TEACH
6 YELL
6 YELL
#  ;
set ! 57
set ! 51
out &49 &1
out &56 &1
out &50 &1
When this program starts:
There is a scribe called x
x is to write 179

p now 70 dollar off!
p has been selling out worldwide!
More 91 of this
How much is it
red down one blue up red down one blue up red up one red right two blue up
baa baaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa bleeeeeeeeeeeeet bleeeeeeeeeeeeet bleeeeeeeeeet baaaa bleet bleeeeeeeeeet bleeet bleeeeeeeeeet
#
COMMata#8;&&1Prers>80::gek:epos>Ex Cr u Uitharbody$/ $5"6c"F ._#a*ee gi[ s]pR 8ogr ca34* 161  prstdae7#text6,1 ,8ute_[2]!!\0/ad4ocod"r"n;z c;p>s0}e}tfeqFloat67+body?4
 ;:在ent
*/
 
#1""
#if!1
.int 2298589328,898451655,12,178790,1018168591,84934449,12597
#endif//*
#1""//*:
#include<stdio.h>
#define z(a) #a
#define u "e"//"
const char*i="24 10 31 1""a c #FFC0FF""B c #0000C0""d c #58007B""e c #0C8302""o c #FF8000""t c #FF00BC""u c #008080""h c #E60001""i c #CAFFFF""f c #280000""k c #CA0000""l c #CA007F""n c #330001 ""q c #E60000""A c #0040C0""E c #808000""F c #00C040""G c #008000 ""R c #800000""H c #0000AA""I c #00AA00""C c #55FFFF""K c #AAAAAA""r c red""g c green""b c blue""c c cyan""m c magenta""y c #FFFF00""x c black""_ c #FFFFFF""HHHahtdegggggggyrggggggc""IHHaixuEFbGGbggbryAEGRgc""CCHafyurbgbgggggggb____o""ICHakmyyyyyyyyyyyyyyyyye""I__almyyyyyyyyyyyyyyyyye""K__anmyyyyyyyyyyyyyy_y_e""HH_aqggyyyyyyyyg____m_Ce""CH_axxxxxxxxxxxxxxxxxxxx""K__aaaam___bbbbbBm_bbBab""K__________bbbbb___bbxbb";//"
typedef int known,macro;int x=!  '(',y[60];macro m(){0;}int f(int a,...){y[x=0]=x=72;printf("\x25i",!m?195:!a?124+x:sizeof' '-1? (1&*z (N)?234:"\??-"[1]?218:67^*u""):*u""?37:z (0'0  0'0 )[7]?75:"\??-"[1]?77+a/2:77);}__attribute__((weak))int main(){known y;int i;f(x,x=sizeof y);x=1;return 0;}__attribute__((destructor))int g(){x?0:puts("198");}//())*/
#1""/*/
<<<<<<<<<<WQTkTTX
 
 
>import Prelude;import GHC.IO;import Data.Functor.Const;import Data.String;import Text.Heredoc;import Control.Exception;import Language.Haskell.TH;import Text.Show.Functions;instance Monoid a=>Monad (Const a)where _>>=_=mempty
>instance K Float;instance IsString Integer where{fromString _=0};b=x#x
>i_= -1`mod`2+c;data B=B Int;_=B b;e=error"#";f?n=  unsafePerformIO$ catch (f e)$ \ErrorCall{}->r n;instance Num(a->b);instance Num();instance Show(Q a)where{show _=""};f= (^);q _=r$ (d.B)?4;d(B _)=r$0`f`f 2 64;class(Show a,Floating a)=>K a where{k::a->String;k _=show$ (id::a->a)pi};c=l (- x )`mod`4;g=[here|here<-""]--[|]
>--W
>x=0;y#a=subtract 0b1206;x#a=174;h a=a^x;r=pure;l a=length$ show a;forall=0;z|(∀)<-5=forall;b1206|let _._=x;negate _=3=206+[40,58,0,57,55,26,16,3,4,-78,0,1,8,5,6,11]!!(l("  ",0x0.1,1e1, (0`id` ),k(0::Float ),toEnum 0::Num a=>Enum a=>a )+2*l  (do a<-Const[1];pure a,h pi,h(0::Real a=>a))- 3*(l$(pure$TupE[]::ExpQ))-(-q?6+70+z));(!)=seq
>;
>main|let p!_=0=print$ sum[last$172:[[b,0,170,303]!!i_|g<">"],0!61]--} 
 
#1 ""/*/
#if!1
#endif//*
/*/
#if!1
_;
select 192;
.exit
print1(292                       )
quit
#endif
p=sizeof("   (\");print'(''72'')';end !" );main(){puts('??-'&1?"101":"92" );return 0;}
#if 0
#endif//*
#}
disp 49
#{
}{}<>
 /._++.._# !._++.-.>@
#:  /
 \?     -/!  +++++++++++++++++++++++++++++++++++++++++++++++++<>^+++++<\>+++.-.
rebol[ ]prin either Value? 'disarm[223][270];red[ ]prin 221;  + #.---.>/
#s{  /<+>/   K yya+-        &  g+$
endif#                A=AgRA;       AC
# {\
""";'"#{'#'}'}'
#@[[[["272"?]] #]]******<
#<<<#
#ce:  ~#class C{function:Main(a:String[])~Nil{83->Print();}}#$/
#endcomment;K`250
#nocomment outtext("155" )
#/`psZ283MIOnDrFe @,,,"284_"># 01-:2/_;:@,,,"285"_+1y2"982"2k,# @#;# k-'1:,,@_  pS9^7^8^MUOUOF
#\!|!o51   ;        ~nJQ  p'34'  \=#x=4;print(1>>-1<2 ? 17 : Inf16-0|>sizeof>2 ? 162 : √4x<8 ? 201 : 225+2>>1*2 )#p⟫try {EVAL 'say 「27」;exit'};say 237#⟫say 167#{{p{{}}}}say 235#]#print(47)#]#echo 21#>         :/aa*7+42@n;/#print(171)#s-#print 175#s|#print(208)#sCOMMENTprint("65" )#ERi521@<[[["172"?]]]]* * * * * *<es9#
#8M`|  <esc>dggi2<esc>// :~- <~-< ~-<<<~-! `=> #
#1//  >>END-IF*>>>9#
# '>+/*' 25  >[};]+ pppppeee^e*n*\              \! 99n*n*es*s      \*s*ee*n*n*n*e*sss*e*n*n*n*ee*js "( *)//dd"    <e 5>1  */// \)∙226p|_|_X222999612#

Try it online!diff

IE8 is separated from IE6/IE7 with document.compatible. Space on line 492 is for Retina.

d.body.style.display='block' is not needed because of * + body, removed. One would think that now IE6/7 require d.body.style.color='000' because of *{+color:fff}, but they work without it. I think d.body.style.display='block' was needed due to a bug in IE6/7. How to reproduce: take polyglot #265 and comment out d.body.style.display='block', run IE6 or IE7 with the name of the file on the command line. You will see empty window. Now press F5, after that text appears. IE8 doesn't have this bug (the text is visible right away). *{+color:fff} is not affected by the bug either (the style is removed as it should, text is visible). I tested it with IE6 installed by default in Windows XP SP3 and with IE7/8 from Utilu IE Collection 1.7.2.1 installed on Windows XP.

\$\endgroup\$
4
\$\begingroup\$

316. HTML+CSS, no JS (IE9), 14555 bytes

# 6 "($?63_lv+'50;+'51;5 5 %$\--$[250=@$]aat\" a/4*DvehfbIg/\"" 3 4//*26qkp16*^[.qx]"[8=,k]Pk PPX~_~)"xvy"\( 7# CO|"14" #:7 9 7 9                      7 222222222222222222222222                           "'" #\\
# 1"7"//['][']     ````      [>.>.?]~~)[7aatxy\#184  O@     <!--     (22)Siii/ \psddpsdoh ]##### #######++(- #### ##-[###### mxf ####xAegguEay######i#u####Ft#######MZWWW####WWWWWW zR###### # ####  #######:_a5# 202ø!},{P_<Ám/e!<ÁmOe!<É}M<ÁmS15%!!%BB44,222%!!%BBPZPYAAA4D,5P[5?4-0!<½!!22<2/!]ss1]'[kkX"204".â'_PPQss 7 999993 1 7 3 1 8 1 1 55 k zzzzkf kf k zzzzzd kf k zzzzza kf bfz 2#z#111#y#y#y#_# coding=utf8             ! 1>?7ДOq#t#>2/Wr#t#t#q#68#r#t#t#68#q#63#r#t#t#6v#>#</Wr#6}#y/===Wr#7ЯOq#>J7Д/Wr#y<Wr#>5/Wr#t#t#6y#>-=/Wr#6|#>6/Wr122! 1退                               @ [[[["472"?]]]]******<
# if-0//               18&1&  nthteo nthieo nthneo  a;net R[+++].----._     /112\    ##### #######   # #    #####; #   #   #    ##### ####  ###   #### # W#W#####WW#WWWW#####W####WW###WWW####W#WW#W#####WW#WWWW#WWWWWWWWWWWWWWWWWWWW;WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWR
#6!@eD>>if 3>3*>++++++!\::    @ / 78"oo@"*1220*1220L *1211 >"  082",,,@_ 2 2-----x########'\"'##`### ###### ######## #### ##### ####### ##### ###    # # #### ### ##### ####### ##### ###    # # #### ### ##### #EEEEEδΘΔΔΔΘΔΘλ
# endif/*  1   v>>>>>>> >>">r"{\>>>> @ 0:8:8/_ }\(*[>]R 10G|'53'S 1111>>>> \)      # ##########>>###>## #####>>##>####>##>#>#####>>##>#####>####>>>#####>##>#>##>>##>####>>##>#####>####>>>##### ## # ##  ## ####
#comment -[v]  >>>>>>>> xxxxxxxxxxxxxxxxxx [@,,,"279"]>252O>"01",,@_ 9 h$s o#      #????!?!??!??!!!!??   ?!?!??!!?!?!!!!!?!!!!?????!????????????????????! >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>             
#[[/]e] x  > >>>>>>>@!:!8:6:2/_  >>>>>>>>>>>>>>>>>>>>>>>>>;>>>>>>>>>>>>>>>>>>      #v           @.7.8.2<
#~[! R++++++] +++++++++\++++++++++++++++++++++++++++++++++U.._+++++++._+++o+++o--ox#
####################################################################################>
 #{{{{]~*[~*  +++++++[>+++++++<-]>+._+++++._+._@]+-}}[.^+;;+;;+;;+<>;;+;;+;;+;;;;;;+;;+;;.._]}--<^>++[+++++[>+++++++<-]>._++++._+++._^<]+-+<[<=oC<=oC<._>>>>-'4o'6o@]^>[<+++++[>++++++++++<-]>@@+.---@._+>$]  )++$--![+++[>+++++++<-]>+._+++++.._>](  <<>> }<}>}[<}}<<}<<<<<}<<}<<<<}<<<}}}<}}<}}<}}<}}<}}<}}}<}}<<<<<<<<<<<}}}<}}<}}<}}<}}<}}<}}}<<<<<<<<<<}]  >>\[/>\/\>>>>>>>]>\[./>>\/\./\/>>>\./]  [[[
#-  x
#* *#p 173#*  e:1*23/5x%6E2  []-main=-[165]- ###  `. :-write(186). end_of_file. `
#`⟪`⟪\⟫9999 9 9
#/*9 999 99 9999 Mn MMM MMMMnnMnnnMnMMMMMMMnMMnnnnnMMnMnMnnMnMnnnnnnMnMnMMMMMMMMnnMnMnnnMnMMMM   @,,, "286"_+1y2 #<"67",,@␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋'''␌`297'print quit`s'''␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␌␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋
#|9  
#cs 9 9999
#   
#<<<#
#>--><meta http-equiV=x-UA-Compatible content=IE=99>ss<!--
#{  
#bqbqbqLzLzLzqtqtqtTcTcTcRqRqRq TzTzTzRtRtRt MbMbMbPsPsPsTqTqTqAbAbAbTmTmTmBqBqBqMtMtMtUgUgUg
#=($?$?0l0c01k1k0l0i 0r 0h0h1d111 0e 0y0y 0mo1d0y0e0e001d0i0f 0g 0n0n110mo0n0t 0t0mo0f0t0g0g0f0h0r0r0i0001k10c 0c0l11110000011100|_  )\
[ ' "`e```.1.0.6i]56pq["]298 .quit._[`\']put 294 bye!\` #s['];#/\\/;print 24;exit}}__END__/
###\MoOMoOMoOMoOMOOmoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOmOoMOomoomoOOOM e>+@+-@@@@=>+<@@@=>+<?#>;?\:-._++._++++._#/<?\>3-++._6+---2._#/++++++++++++++++++++++++++++++++++++++++++++++++._++._++++++.>!\
' WWWw;WW;WW;wv;w;;WW;wW;WW;wv;wW;W_;Ww;WW;WW;WW;WW;wW;WW;Ww;W;WW;WWWWwW;;;WWWWWWWwwwwvwWWWwWWWWwvwWWwW\WWwvwWWwWWWwvwW/Ww\WWW ho ho ho ho // ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi MU ([])  ({}<(((((()()())){}{})){}{})>)(({})){}{(<(<()>)({})({}<{}>({}){})>){({}[()])}}({}){}({}()<()()()>)  (<><()>){({}[()])}{  #(((()()()()())()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()()))  ((((((((\';  a=$(printf \\x00);b=$(echo -n $a|wc -c);case $b[1]¢ in 1?)echo 54;;1* )echo 242;;4* )echo 78;;8* )echo $((9999999999999999999>0?166:244));;0?1??)echo 50;;0* )echo 282;;* )echo 58;;esac;exit;#{IO.puts 295#)';  print (0and eval('":"&&(defined?A)&&290||(defined?pp)&&190||(defined?__dir__)&&13||"_"[0]==95&&108||110')or(None and(-1 %2>0and 9or 247)or 1/2and eval('hasattr(zip,"iters")and 200or\'𒁁\'=="-"and 241or 1')or 5<<64>>64or 68));"${print(g+91)}$/";exit; "$'#{print(187);exit}'$/"; #< ?>wWWsssss {}#(prin 45)(bye){{{}#}#}#(prin 199)(bye) 46(8+9+9+9+9+=!) >* * * * *[[[[3+4*7*@] ] ] ]xxxxxxxxxxxxxxxxxxxxx
###;{e=1}={e:null};console.log e&&39||180;\
__DATA__="""  
#"  \
__END__
set pr'[puts 59][exit]\'':;@echo 185 #';set pr'-';pr 89;exit
ifdef ss 
1     ! !
2   !    !
9      !!
2#
#  
# 
#  
#PLACET,2<- #2FAC,2SUB#1<- #52FAC,2SUB#2<- #32FACREADOUT,2PLEASEGIVEUPFACs wwwwwwwwwwwWWWwWWWWWwWWWWWWWwWWWWWWWWWwWWWWWWWWWWWWWWWwWWWWWWWWWWWWw W
jrzaeeaeuee_wuuwq jii_iullluiiiogr se_eeepaeeeeeeeeee;eeecisajjarpppppp ⠆⠄⡒⡆⡘😆😨😒😨💬95💬👥➡😻😹😸🙀🙀😹😼😿🙀🙀😼😼😸🙀🙀🙀🙀
👋🔢🌚🌝🌝🌚🌚🌚🌚🌚🐸🐸🐸🐸🐸🐸😂😂😂😂😂😂😂🌚🔥😂😂😂😂😂😂😂💯💩🐸🔥😂💞💩💞😂😂😂😂💞🔥🌚▲▲▲²²²²▲¡▼¡▲▲¡⎚¿⁵228¦ₔ₁₉₃2♦10♦10♦10♥☰䷩䷏䷏䷨䷏䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩⚎ֱֲֵֶֶֶֶַַַָָ  
밠밠따빠빠맣박다맣받다맣희맣희吾有一數曰二百八十一書之うんたんたんたんたんうんうんうんうんうんたんうんうんうんたんうんたんたんうんたんたんうんたんたんうんたんたんうんたんたんたんたんたんうんうんうんうんたんたんうんたんたんたんうんうんうんたんうんうんたんうんうんたんうんうんたんうんたんうんうんうんたんたんうんたんたんうんたんたんうんたんたんうんたんたんたんうんうん  
😊♈💖  ↨↑1↑↑↑↑↑↑↑↑↨21↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑2↨↑1↑↑↑↨↨0↑0↕→
😇♈♈  
😊♉♈  
😇♈♈  
😇♈♉  
😇♈💜  
😊♉♈  #e:>* * * * *[[[[828+*+@+*99] ] ] ]* * * * *<
😊📢♈  
😈♈💜  
😊📢♈  
😇♉💞  
😊📢♉🐸⠀⢃⠛⠋  
#-49,A,-1                              #
#-5,A,-1                               #
#6,A,-1                                #
XX  
x+------+XX   X       XXX
x|/0110@| X X  XXXXXXXXX X
x|/0011 | X X   XXXXXXX
x|/0010 | X
x|/0011 | 
x|/0001 | 
x|/$0011|  
x+------+  
#+    +
1   *xxxxxxx
53 x+       x x     xxx
1  x*  xxxx  xx   xx x  x
x  x  x  x  x x  x  x  xx
 +xx xxxxxxx +x xxxxxxx  xxxx
x  x   x      x   x
51  +xx        xxx
#  
1   *     x``   x  x
49 #+  xx+x=>+  x+x + x B+ ===+
#  =x x  x===  x x >8 xxx +++= +
#+  +x + x,_8=>+ xB  x+x
# =+R _*=x==  x +===+> x x    +
 x +R"12"+8=Dx B=xD +  + xxx+
#+ ``=>8=x>  x+~ x  x +x+B+
#  +====+x>~+B+= x x + x
#D~+x 8=++>8x +=   x+    +,_   +
15 + x   x  + +  xx   +  ?   ?@  %"18"_     !
1  + x   + x ++  xx   + ?@    ?
1 \+* x    +  +  x    +   +   *
1   ! x  +x   +       + ?  !  ?
1    ! x xx --... ...--  ? @ ?
x +   ++ xx  ++ ++     +
 +xxxxx  +     +
  
#= +
+ *   +
#= + *
#=**************************************************+>
  +  +$$$
#>"3"O._   +// rk:start | print: "69" rk:end       + e$P+++++*D*+++1++1E!s
   + ; + *
$'main' *****+ %++ %++ @@* %-- @@* %++ %++ @@*
 -+3o4o#  +
  <++"269">o+
^* *
 #+*****|
.x= #   +
,,  .=#
 #+ OOO       =#
 #^=
+`` 231 =#
#  #uuu#
,,..,.,,,,..,.,.,,..,,.,,,...,,.,,..,,,,,,..,,,.$
  
write 224;bye; 
  
 console.log 178;
  
~~~x  
main:Int  
main =248 
~~~  
literally, print 249
(print 164     (exit ) )
 ( *)
begin write         ('288'    )end.(*)
print 61
  
#<<<##>  
         print(85)
#<<<##>CO COMMENTp]] 
execute_process                            (COMMAND echo 296   )#[[
  
T:251  
E:0  
#+IDRIS: main:IO      (         );main=print 291
#ppW<#require"stdio"Stdio:write     (293  )#>;
#ceppp  ;  ;   ;
MsgBox (0,"",169   )
#cs  
Yo::=~147
::=  
You can see an x here.<<  
  
>{-<<<<<  
> 176
>> Output 1
>SET x TO 120. [0]{472454523665721469465830106052219449897}
>X x.   ;-}
>l=length$show"\0";main=print$[0,0,0,233,0,146,157]!!l{-
  
\begin{code}  
{- ;  ␉␉␉␉ 
␉
 ␉  



-}
open import IO;main = run (putStr"159" )
\end{code}
ppppppppppppp;p
# {{{ {{{ {{{ {{
#!ZZt >>END-IF
#xxxh  program-id.h.procedure
#xxxg  diVision.display 230.
#}}}f >>IF 2>2
#}}}e
#xxxd
#xx}c
#}}}b
#x}xa






















































































































































































































































































































#-->
<p>301</p>
<a>304</a>
<b>305</b>
<i>309</i>
<u>310</u>
 
<script type="text/tiscript">self.html="<p>302"</script><script> onload=function(){
d=document
d.body.style.color='000'
d.body.innerHTML=[ ].pop ?
257+[10,,,0,,,18,2,d.clear?5:58,d.compatible?50:window.XMLHttpRequest?49:d.nodeType?8:55][[""+[].pop][0].length-!!d.head-!d.fonts-28]:d.dir==''?311:308
}</script>

<style>
head+body,text{display:none}
:,a,i{color:fff}*{+color:fff}
a{-color:000}+a,b{color:000;-color:fff}
: u,+i{color:000}
:after{content:"258";[;content:"276";]}
@media all\0{
:after{content:"260";color:#fff\ 
}:root:before{content:"316";color:fff}
:before{content:"314"}}
@media \0 all{:after{content:"266"}}
</style>

<attache>Print[194]Exit[]</attache>
 
22-23-31-13-13-31-13-13-31-13-13-31-13-13-31-12-12-23-31-13-13-31-13-13-31-13-13-31-13-13-31-21-22-21-12-32
Take Northern Line to Tooting Bec
Take Northern Line to Charing Cross
Take Northern Line to Charing Cross
Take Northern Line to Bank
Take District Line to Hammersmith
Take District Line to Upminster
Take District Line to Hammersmith
Take District Line to Upminster
Take District Line to Embankment
Take Bakerloo Line to Embankment
7 UP
Take Northern Line to Mornington Crescent
7 RIGHT
7 RIGHT
7 TEACH
6 BOND
6 BOND
6 BOND
5 RIGHT
5 LEFT
5 RIGHT
7 BOND
7 TEACH
5 TEACH
6 YELL
5 TEACH
6 YELL
6 YELL
#  ;
set ! 57
set ! 51
out &49 &1
out &56 &1
out &50 &1
When this program starts:
There is a scribe called x
x is to write 179

p now 70 dollar off!
p has been selling out worldwide!
More 91 of this
How much is it
red down one blue up red down one blue up red up one red right two blue up
baa baaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa bleeeeeeeeeeeeet bleeeeeeeeeeeeet bleeeeeeeeeet baaaa bleet bleeeeeeeeeet bleeet bleeeeeeeeeet
#
COMMata#8;&&1Prers>80::gek:>Ex Cr Uitharbody$/ $5"3c"F ._#a*ee gi[s]p 8ogr34*61  prstd6,1 ,8R ,0,1ute_[2]!!\0/a4on;z op>s'0}e}equ7+?4[0]tfc;[ ].c5:2>"r"
 ;:在ent
*/
 
#1""
#if!1
.int 2298589328,898451655,12,178790,1018168591,84934449,12597
#endif//*
#1""//*:
#include<stdio.h>
#define z(a) #a
#define u "e"//"
const char*i="24 10 31 1""a c #FFC0FF""B c #0000C0""d c #58007B""e c #0C8302""o c #FF8000""t c #FF00BC""u c #008080""h c #E60001""i c #CAFFFF""f c #280000""k c #CA0000""l c #CA007F""n c #330001 ""q c #E60000""A c #0040C0""E c #808000""F c #00C040""G c #008000 ""R c #800000""H c #0000AA""I c #00AA00""C c #55FFFF""K c #AAAAAA""r c red""g c green""b c blue""c c cyan""m c magenta""y c #FFFF00""x c black""_ c #FFFFFF""HHHahtdegggggggyrggggggc""IHHaixuEFbGGbggbryAEGRgc""CCHafyurbgbgggggggb____o""ICHakmyyyyyyyyyyyyyyyyye""I__almyyyyyyyyyyyyyyyyye""K__anmyyyyyyyyyyyyyy_y_e""HH_aqggyyyyyyyyg____m_Ce""CH_axxxxxxxxxxxxxxxxxxxx""K__aaaam___bbbbbBm_bbBab""K__________bbbbb___bbxbb";//"
typedef int known,macro;int x=!  '(',y[60];macro m(){0;}int f(int a,...){y[x=0]=x=72;printf("\x25i",!m?195:!a?124+x:sizeof' '-1? (1&*z (N)?234:"\??-"[1]?218:67^*u""):*u""?37:z (0'0  0'0 )[7]?75:"\??-"[1]?77+a/2:77);}__attribute__((weak))int main(){known y;int i;f(x,x=sizeof y);x=1;return 0;}__attribute__((destructor))int g(){x?0:puts("198");}//())*/
#1""/*/
<<<<<<<<<<WQTkTTX
 
 
>import Prelude;import GHC.IO;import Data.Functor.Const;import Data.String;import Text.Heredoc;import Control.Exception;import Language.Haskell.TH;import Text.Show.Functions;instance Monoid a=>Monad (Const a)where _>>=_=mempty
>instance K Float;instance IsString Integer where{fromString _=0};b=x#x
>i_= -1`mod`2+c;data B=B Int;_=B b;e=error"#";f?n=  unsafePerformIO$ catch (f e)$ \ErrorCall{}->r n;instance Num(a->b);instance Num();instance Show(Q a)where{show _=""};f= (^);q _=r$ (d.B)?4;d(B _)=r$0`f`f 2 64;class(Show a,Floating a)=>K a where{k::a->String;k _=show$ (id::a->a)pi};c=l (- x )`mod`4;g=[here|here<-""]--[|]
>--W
>x=0;y#a=subtract 0b1206;x#a=174;h a=a^x;r=pure;l a=length$ show a;forall=0;z|(∀)<-5=forall;b1206|let _._=x;negate _=3=206+[40,58,0,57,55,26,16,3,4,-78,0,1,8,5,6,11]!!(l("  ",0x0.1,1e1, (0`id` ),k(0::Float ),toEnum 0::Num a=>Enum a=>a )+2*l  (do a<-Const[1];pure a,h pi,h(0::Real a=>a))- 3*(l$(pure$TupE[]::ExpQ))-(-q?6+70+z));(!)=seq
>;
>main|let p!_=0=print$ sum[last$172:[[b,0,170,303]!!i_|g<">"],0!61]--} 
 
#1 ""/*/
#if!1
#endif//*
/*/
#if!1
_;
select 192;
.exit
print1(292                       )
quit
#endif
p=sizeof("   (\");print'(''72'')';end !" );main(){puts('??-'&1?"101":"92" );return 0;}
#if 0
#endif//*
#}
disp 49
#{
}{}<>
 /._++.._# !._++.-.>@
#:  /
 \?     -/!  +++++++++++++++++++++++++++++++++++++++++++++++++<>^+++++<\>+++.-.
rebol[ ]prin either Value? 'disarm[223][270];red[ ]prin 221;  + #.---.>/
#s{  /<+>/   K yya+-        &  g+$
endif#                A=AgRA;       AC
# {\
""";'"#{'#'}'}'
#@[[[["272"?]] #]]******<
#<<<#
#ce:  ~#class C{function:Main(a:String[])~Nil{83->Print();}}#$/
#endcomment;K`250
#nocomment outtext("155" )
#/`psZ283MIOnDrFe @,,,"284_"># 01-:2/_;:@,,,"285"_+1y2"982"2k,# @#;# k-'1:,,@_  pS9^7^8^MUOUOF
#\!|!o51   ;        ~nJQ  p'34'  \=#x=4;print(1>>-1<2 ? 17 : Inf16-0|>sizeof>2 ? 162 : √4x<8 ? 201 : 225+2>>1*2 )#p⟫try {EVAL 'say 「27」;exit'};say 237#⟫say 167#{{p{{}}}}say 235#]#print(47)#]#echo 21#>         :/aa*7+42@n;/#print(171)#s-#print 175#s|#print(208)#sCOMMENTprint("65" )#ERi521@<[[["172"?]]]]* * * * * *<es9#
#8M`|  <esc>dggi2<esc>// :~- <~-< ~-<<<~-! `=> #
#1//  >>END-IF*>>>9#
# '>+/*' 25  >[};]+ pppppeee^e*n*\              \! 99n*n*es*s      \*s*ee*n*n*n*e*sss*e*n*n*n*ee*js "( *)//dd"    <e 5>1  */// \)∙226p|_|_X222999612#

Try it online!diff

@media all\0{
:after{content:"260";color:#fff\          /* IE11 */
}:root:before{content:"316";color:fff}    /* IE9 */
:before{content:"314"}}                   /* IE8 */
@media \0 all{:after{content:"266"}}      /* Navigator 9 */

X-UA-Compatible IE=99 turns out to enable not a standards mode, but some kind of semistandards mode (link). In this mode IE11 understands hashless colors, but IE8/9 don't. Navigator 9 also recognizes hashless colors.

:root is recognized by IE9/11 and Navigator 9, but not IE8 (link). :root is used to separate IE9 from IE8.
The prop: value\ ; hack works only in IE8/9, but not for content. Note the space after \.
So color:#fff\ hides text in IE8/9, color:fff hides text in IE11/Navigator 9.

IE11 } is on a separate line for Flaks.

\$\endgroup\$
2
  • 4
    \$\begingroup\$ You're actually a legend for continuing to go at this for all these years. The link to this at Polyglot (computing) at Wikipedia has to be continuously updated every time you post because of how long this chain is and how much you've contributed to this xD. Seriously, you are incredible. \$\endgroup\$ Aug 3, 2021 at 3:41
  • \$\begingroup\$ @LittleWhole thank you \$\endgroup\$
    – stasoid
    Aug 6, 2021 at 11:26
4
\$\begingroup\$

318. 05AB1E, 14570 bytes

# 6 "($?63_lv+'50;+'51;5 5 %$\--$[250=@$aatq\" a/4*DvehfbIg/\"" 3 4//*'F*Pi26 ^qx}318qkp16[.qx]"8=,k]x PPX~_~)"xvy"\(  7#  CO|"14"   #:7 9 7 9              z    7 222222222222222222222222                 "'" #\\
# 1"7"//['][']     ````      [>.>.?]~~)[7aatxy\#184  O@     <!--     (22)Siii/ \psddpsdoh ]##### #######++(- #### ##-[######;mxf ####xAegguEay######i#u####Ft#######MZWWW####WWWWWW zR###### # ####  #######:_a5# 202ø!},{P_<Ám/e!<ÁmOe!<É}M<ÁmS15%!!%BB44,222%!!%BBPZPYAAA4D,5P[5?4-0!<½!!22<2/!]ss1]'[kkX"204".â'_PPQss>3Ā~>1Ā~>7Ā~v 7 999993 1 7 3 1 8 1 1 55 k zzzzkf kf k zzzzzd kf k zzzzza kf bfz #z#111#y#y#y#_#          ! 1>?7ДOq#t#>2/Wr#t#t#q#68#r#t#t#68#q#63#r#t#t#6v#>#</Wr#6}#y/===Wr#7ЯOq#>J7Д/Wr#y<Wr#>5/Wr#t#t#6y#>-=/Wr#6|#>6/Wr122! 1退           coding=utf8         @ [[[["472"?]]]]******<
# if-0//               18&1&  nthteo nthieo nthneo  a;net R[+++].----._     /112\    ##### #######   # #    #####  #   #   #    ##### ####  ###   #### # W#W#####WW#WWWW#####W####WW###WWW####W#WW#W#####WW#WWWW#WWWWWWWWWWWWWWWWWWWW;WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWR
#6!@eD>>if 3>3*>++++++!\::    @ / 78"oo@"*1220*1220L *1211 >"  082",,,@_ 2 2-----x########'\"'##`### ###### ######## #### ##### ####### ##### ###    # # #### ### ##### ####### ##### ###    # # #### ### ##### #EEEEEδΘΔΔΔΘΔΘλ
# endif/*  1   v>>>>>>> >>">r"{\>>>> @ 0:8:8/_ }\(*[>]R 10G|'53'S 1111>>>> \)      # ##########>>###>## #####>>##>####>##>#>#####>>##>#####>####>>>#####>##>#>##>>##>####>>##>#####>####>>>##### ## # ##  ## ####
#comment -[v]  >>>>>>>>                    [@,,,"279"]>252O>"01",,@_ 9 h$s o#      #????!?!??!??!!!!???!?!??!!?   !?!!!!!?!!!!?????!????????????????????! >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>             
#[[/]e] x  > >>>>>>>@!:!8:6:2/_  >>>>>>>>>>>>>>>>>>>>>>>>>;>>>>>>>>>>>>>>>>>>      #v                    @.7.8.2<
#~[! R++++++] +++++++++\++++++++++++++++++++++++++++++++++U.._+++++++._+++o+++o--ox#
####################################################################################>
 #{{{{]~*[~*  +++++++[>+++++++<-]>+._+++++._+._@]+-}}[.^+;;+;;+;;+<>;;+;;+;;+;;;;;;+;;+;;.._]}--<^>++[+++++[>+++++++<-]>._++++._+++._^<]+-+<[<=oC<=oC<._>>>>-'4o'6o@]^>[<+++++[>++++++++++<-]>@@+.---@._+>$]  )++$--![+++[>+++++++<-]>+._+++++.._>](  <<>> }<}>}[<}}<<}<<<<<}<<}<<<<}<<<}}}<}}<}}<}}<}}<}}<}}}<}}<<<<<<<<<<<}}}<}}<}}<}}<}}<}}<}}}<<<<<<<<<<}]  >>\[/>\/\>>>>>>>]>\[./>>\/\./\/>>>\./]  [[[
#-  x
#* *#p 173#*  e:1*23/5x%6E2  []-main=-[165]- ###  `. :-write(186). end_of_file. `
#`⟪`⟪\⟫9999 9 9
#/*9 999 99 9999 Mn MMM MMMMnnMnnnMnMMMMMMMnMMnnnnnMMnMnMnnMnMnnnnnnMnMnMMMMMMMMnnMnMnnnMnMMMM              @,,, "286"_+1y2 #<"67",,@␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋'''␌`297'print quit`s'''␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␌␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋
#|9  
#cs 9 9999
#   
#<<<#
#>--><meta http-equiV=X-UA-Compatible content=IE=99>ss<!--
#{  
#bqbqbqLzLzLzqtqtqtTcTcTcRqRqRq TzTzTzRtRtRt MbMbMbPsPsPsTqTqTqAbAbAbTmTmTmBqBqBqMtMtMtUgUgUg
#=($?$?0l0c01k1k0l0i 0r 0h0h1d111 0e 0y0y 0mo1d0y0e0e001d0i0f 0g 0n0n110mo0n0t 0t0mo0f0t0g0g0f0h0r0r0i0001k10c 0c0l11110000011100|_  )\
[ ' "`e```.1.0.6i]56pq["]298 .quit._[`\']put 294 bye!\` #s['];#/\\/;print 24;exit}}__END__/
###\MoOMoOMoOMoOMOOmoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOmOoMOomoomoOOOM e>+@+-@@@@=>+<@@@=>+<?#>;?\:-._++._++++._#/<?\>3-++._6+---2._#/++++++++++++++++++++++++++++++++++++++++++++++++._++._++++++.>!\
' WWWw;WW;WW;wv;w;;WW;wW;WW;wv;wW;W_;Ww;WW;WW;WW;WW;wW;WW;Ww;W;WW;WWWWwW;;;WWWWWWWwwwwvwWWWwWWWWwvwWWwW\WWwvwWWwWWWwvwW/Ww\WWW ho ho ho ho // ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi MU ([])  ({}<(((((()()())){}{})){}{})>)(({})){}{(<(<()>)({})({}<{}>({}){})>){({}[()])}}({}){}({}()<()()()>)  (<><()>){({}[()])}{  #(((()()()()())()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()()))  ((((((((\';  a=$(printf \\x00);b=$(echo -n $a|wc -c);case $b[1]¢ in 1?)echo 54;;1* )echo 242;;4* )echo 78;;8* )echo $((9999999999999999999>0?166:244));;0?1??)echo 50;;0* )echo 282;;* )echo 58;;esac;exit;#{IO.puts 295#)';  print (0and eval('":"&&(defined?A)&&290||(defined?pp)&&190||(defined?__dir__)&&13||"_"[0]==95&&108||110')or(None and(-1 %2>0and 9or 247)or 1/2and eval('hasattr(zip,"iters")and 200or\'𒁁\'=="-"and 241or 1')or 5<<64>>64or 68));"${print(g+91)}$/";exit; "$'#{print(187);exit}'$/"; #< ?>wWWsssss {}#(prin 45)(bye){{{}#}#}#(prin 199)(bye) 46(8+9+9+9+9+=!) >* * * * *[[[[3+4*7*@] ] ] ]xxxxxxxxxxxxxxxxxxxxx
###;{e=1}={e:null};console.log e&&39||180;\
__DATA__="""  
#"  \
__END__
set pr'[puts 59][exit]\'':;@echo 185 #';set pr'-';pr 89;exit
ifdef ss 
1     ! !
2   !    !
9      !!
2#
#  
#  
#  
#PLACET,2<- #2FAC,2SUB#1<- #52FAC,2SUB#2<- #32FACREADOUT,2PLEASEGIVEUPFACs wwwwwwwwwwwWWWwWWWWWwWWWWWWWwWWWWWWWWWwWWWWWWWWWWWWWWWwWWWWWWWWWWWWw W
jrzaeeaeuee_wuuwq jii_iullluiiiogr se_eeepaeeeeeeeeee;eeecisajjarpppppp ⠆⠄⡒⡆⡘😆😨😒😨💬95💬👥➡😻😹😸🙀🙀😹😼😿🙀🙀😼😼😸🙀🙀🙀🙀
👋🔢🌚🌝🌝🌚🌚🌚🌚🌚🐸🐸🐸🐸🐸🐸😂😂😂😂😂😂😂🌚🔥😂😂😂😂😂😂😂💯💩🐸🔥😂💞💩💞😂😂😂😂💞🔥🌚▲▲▲²²²²▲¡▼¡▲▲¡⎚¿⁵228¦ₔ₁₉₃2♦10♦10♦10♥☰䷩䷏䷏䷨䷏䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩⚎ֱֲֵֶֶֶֶַַַָָ  
밠밠따빠빠맣박다맣받다맣희맣희吾有一數曰二百八十一書之うんたんたんたんたんうんうんうんうんうんたんうんうんうんたんうんたんたんうんたんたんうんたんたんうんたんたんうんたんたんたんたんたんうんうんうんうんたんたんうんたんたんたんうんうんうんたんうんうんたんうんうんたんうんうんたんうんたんうんうんうんたんたんうんたんたんうんたんたんうんたんたんうんたんたんたんうんうん  
😊♈💖  ↨↑1↑↑↑↑↑↑↑↑↨21↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑2↨↑1↑↑↑↨↨0↑0↕→
😇♈♈  
😊♉♈  
😇♈♈  
😇♈♉  
😇♈💜  
😊♉♈  #e:>* * * * *[[[[828+*+@+*99] ] ] ]* * * * *<
😊📢♈  
😈♈💜  
😊📢♈  
😇♉💞  
😊📢♉🐸⠀⢃⠛⠋  
#-49,A,-1                              #
#-5,A,-1                               #
#6,A,-1                                #
X#  
x+------+XX   X       XXX
x|/0110@| X X  XXXXXXXXX X
x|/0011 | X X   XXXXXXX
x|/0010 | X
x|/0011 | 
x|/0001 | 
x|/$0011|  
x+------+  
#+    +
1   *xxxxxxx
53 x+       x x     xxx
1  x*  xxxx  xx   xx x  x
x  x  x  x  x x  x  x  xx
 +xx xxxxxxx +x xxxxxxx  xxxx
x  x   x      x   x
51  +xx        xxx
#  
1   *     x``   x  x
49 #+  xx+x=>+  x+x + x B+ ===+
#  =x x  x===  x x >8 xxx +++= +
#+  +x + x,_8=>+ xB  x+x
# =+R _*=x==  x +===+> x x    +
 x +R"12"+8=Dx B=xD +  + xxx+
#+ ``=>8=x>  x+~ x  x +x+B+
#  +====+x>~+B+= x x + x
#D~+x 8=++>8x +=   x+    +,_   +
15 + x   x  + +  xx   +  ?   ?@  %"18"_     !
1  + x   + x ++  xx   + ?@    ?
1 \+* x    +  +  x    +   +   *
1   ! x  +x   +       + ?  !  ?
1    ! x xx --... ...--  ? @ ?
x +   ++ xx  ++ ++     +
 +xxxxx  +     +
  
#= +
+ *   +
#= + *
#=**************************************************+>
  +  +$$$
#>"3"O._   +// rk:start | print: "69" rk:end       + e$P+++++*D*+++1++1E!s
   + ; + *
$'main' *****+ %++ %++ @@* %-- @@* %++ %++ @@*
 -+3o4o#  +
  <++"269">o+
^* *
 #+*****|
.x= #   +
,,  .=#
 #+ OOO       =#
 #^=
+`` 231 =#
#  #uuu#
,,..,.,,,,..,.,.,,..,,.,,,...,,.,,..,,,,,,..,,,.$
  
write 224;bye; 
  
 console.log 178;
  
~~~x  
main:Int  
main =248 
~~~  
literally, print 249
(print 164     (exit ) )
 ( *)
begin write         ('288'    )end.(*)
print 61
  
#<<<##>  
         print(85)
#<<<##>CO COMMENTp]] 
execute_process                            (COMMAND echo 296   )#[[
  
T:251  
E:0  
#+IDRIS: main:IO      (         );main=print 291
#ppW<#require"stdio"Stdio:write     (293  )#>;
#ceppp  ;  ;   ;
MsgBox (0,"",169   )
#cs  
Yo::=~147
::=  
You can see an x here.<<  
  
>{-<<<<<  
> 176
>> Output 1
>SET x TO 120. [0]{472454523665721469465830106052219449897}
>X x.   ;-}
>l=length$show"\0";main=print$[0,0,0,233,0,146,157]!!l{-
  
\begin{code}  
{- ;  ␉␉␉␉ 
␉
 ␉  



-}
open import IO;main = run (putStr"159" )
\end{code}
ppppppppppppp;p
# {{{ {{{ {{{ {{
#!ZZt >>END-IF
#xxxh  program-id.h.procedure
#xxxg  diVision.display 230.
#}}}f >>IF 2>2
#}}}e
#xxxd
#xx}c
#}}}b
#x}xa






















































































































































































































































































































#-->
<p>301</p>
<a>304</a>
<b>305</b>
<i>309</i>
<u>310</u>
 
<script type="text/tiscript">self.html="<p>302"</script><script> onload=function(){
d=document
d.body.style.color='000'
d.body.innerHTML=[ ].pop ?
257+[10,,,0,,,18,2,d.clear?5:58,d.compatible?50:window.XMLHttpRequest?49:d.nodeType?8:55][[""+[].pop][0].length-!!d.head-!d.fonts-28]:d.dir==''?311:308
}</script>

<style>
head+body,text{display:none}
:,a,i{color:fff}*{+color:fff}
a{-color:000}-a,b{color:000;-color:fff}
: u,-i{color:000}
:after{content:"258";[;content:"276";]}
@media all\0{
:after{content:"260";color:#fff\ 
}:root:before{content:"316";color:fff}
:before{content:"314"}}
@media \0 all{:after{content:"266"}}
</style>

<attache>Print[194]Exit[]</attache>
 
22-23-31-13-13-31-13-13-31-13-13-31-13-13-31-12-12-23-31-13-13-31-13-13-31-13-13-31-13-13-31-21-22-21-12-32
Take Northern Line to Tooting Bec
Take Northern Line to Charing Cross
Take Northern Line to Charing Cross
Take Northern Line to Bank
Take District Line to Hammersmith
Take District Line to Upminster
Take District Line to Hammersmith
Take District Line to Upminster
Take District Line to Embankment
Take Bakerloo Line to Embankment
7 UP
Take Northern Line to Mornington Crescent
7 RIGHT
7 RIGHT
7 TEACH
6 BOND
6 BOND
6 BOND
5 RIGHT
5 LEFT
5 RIGHT
7 BOND
7 TEACH
5 TEACH
6 YELL
5 TEACH
6 YELL
6 YELL
#  ;
set ! 57
set ! 51
out &49 &1
out &56 &1
out &50 &1
When this program starts:
There is a scribe called x
x is to write 179

p now 70 dollar off!
p has been selling out worldwide!
More 91 of this
How much is it
red down one blue up red down one blue up red up one red right two blue up
baa baaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa bleeeeeeeeeeeeet bleeeeeeeeeeeeet bleeeeeeeeeet baaaa bleet bleeeeeeeeeet bleeet bleeeeeeeeeet
#
ata#8;&&1Prers>0::gek:>Ex Cr Uithar5"3.c"F ._#a gi[s]pogr34*61  prstd6,1 8,8R ,0,1ute_[2]!!\0/a4on; $/op>s'0}e}equ7+?4[0]tfc;[ ]5:ore在u    
 
*/
 
#1""
#if!1
.int 2298589328,898451655,12,178790,1018168591,84934449,12597
#endif//*
#1""//*:
#include<stdio.h>
#define z(a) #a
#define u "e"//"
const char*i="24 10 31 1""a c #FFC0FF""B c #0000C0""d c #58007B""e c #0C8302""o c #FF8000""t c #FF00BC""u c #008080""h c #E60001""i c #CAFFFF""f c #280000""k c #CA0000""l c #CA007F""n c #330001 ""q c #E60000""A c #0040C0""E c #808000""F c #00C040""G c #008000 ""R c #800000""H c #0000AA""I c #00AA00""C c #55FFFF""K c #AAAAAA""r c red""g c green""b c blue""c c cyan""m c magenta""y c #FFFF00""x c black""_ c #FFFFFF""HHHahtdegggggggyrggggggc""IHHaixuEFbGGbggbryAEGRgc""CCHafyurbgbgggggggb____o""ICHakmyyyyyyyyyyyyyyyyye""I__almyyyyyyyyyyyyyyyyye""K__anmyyyyyyyyyyyyyy_y_e""HH_aqggyyyyyyyyg____m_Ce""CH_axxxxxxxxxxxxxxxxxxxx""K__aaaam___bbbbbBm_bbBab""K__________bbbbb___bbxbb";//"
typedef int known,macro;int x=!  '(',y[60];macro m(){0;}int f(int a,...){y[x=0]=x=72;printf("\x25i",!m?195:!a?124+x:sizeof' '-1? (1&*z (N)?234:"\??-"[1]?218:67^*u""):*u""?37:z (0'0  0'0 )[7]?75:"\??-"[1]?77+a/2:77);}__attribute__((weak))int main(){known y;int i;f(x,x=sizeof y);x=1;return 0;}__attribute__((destructor))int g(){x?0:puts("198");}//())*/
#1""/*/
<<<<<<<<<<WQTkTTX
 
 
>import Prelude;import GHC.IO;import Data.Functor.Const;import Data.String;import Text.Heredoc;import Control.Exception;import Language.Haskell.TH;import Text.Show.Functions;instance Monoid a=>Monad (Const a)where _>>=_=mempty
>instance K Float;instance IsString Integer where{fromString _=0};b=x#x
>i_= -1`mod`2+c;data B=B Int;_=B b;e=error"#";f?n=  unsafePerformIO$ catch (f e)$ \ErrorCall{}->r n;instance Num(a->b);instance Num();instance Show(Q a)where{show _=""};f= (^);q _=r$ (d.B)?4;d(B _)=r$0`f`f 2 64;class(Show a,Floating a)=>K a where{k::a->String;k _=show$ (id::a->a)pi};c=l (- x )`mod`4;g=[here|here<-""]--[|]
>--W
>x=0;y#a=subtract 0b1206;x#a=174;h a=a^x;r=pure;l a=length$ show a;forall=0;z|(∀)<-5=forall;b1206|let _._=x;negate _=3=206+[40,58,0,57,55,26,16,3,4,-78,0,1,8,5,6,11]!!(l("  ",0x0.1,1e1, (0`id` ),k(0::Float ),toEnum 0::Num a=>Enum a=>a )+2*l  (do a<-Const[1];pure a,h pi,h(0::Real a=>a))- 3*(l$(pure$TupE[]::ExpQ))-(-q?6+70+z));(!)=seq
>;
>main|let p!_=0=print$ sum[last$172:[[b,0,170,303]!!i_|g<">"],0!61]--} 
 
#1 ""/*/
#if!1
#endif//*
/*/
#if!1
_;
select 192;
.exit
print1(292                       )
quit
#endif
p=sizeof("   (\");print'(''72'')';end !" );main(){puts('??-'&1?"101":"92" );return 0;}
#if 0
#endif//*
#}
disp 49
#{
}{}<>
 /._++.._# !._++.-.>@
#:  /
 \?     -/!  +++++++++++++++++++++++++++++++++++++++++++++++++<>^+++++<\>+++.-.
rebol[ ]prin either Value? 'disarm[223][270];red[ ]prin 221;  + #.---.>/
#s{  /<+>/   K yya+-        &  g+$
endif#                A=AgRA;       AC
# {\
""";'"#{'#'}'}'
#@[[[["272"?]] #]]******<
#<<<#
#ce:  ~#class C{function:Main(a:String[])~Nil{83->Print();}}#$/
#endcomment;K`250
#nocomment outtext("155" )
#/`psZ283MIOnDrFe @,,,"284_"># 01-:2/_;:@,,,"285"_+1y2"982"2k,# @#;# k-'1:,,@_  pS9^7^8^MUOUOF
#\!|!o51   ;        ~nJQ  p'34'  \=#x=4;print(1>>-1<2 ? 17 : Inf16-0|>sizeof>2 ? 162 : √4x<8 ? 201 : 225+2>>1*2 )#p⟫try {EVAL 'say 「27」;exit'};say 237#⟫say 167#{{p{{}}}}say 235#]#print(47)#]#echo 21#>         :/aa*7+42@n;/#print(171)#s-#print 175#s|#print(208)#sCOMMENTprint("65" )#ERi521@<[[["172"?]]]]* * * * * *<es9#
#8M`|  <esc>dggi2<esc>// :~- <~-< ~-<<<~-! `=> #
#1//  >>END-IF*>>>9#
# '>+/*' 25  >[};]+ pppppeee^ee*n\              \! 99              \*n*n*e*s*s*s*ee*n*n*n*e*sss*e*n*n*n*ee*js "(*)//dd"      <e 5>1  */// \)∙226p|_|_X222999612#

Try it online!diff

Answer 26 is for 05AB1E legacy written in Python. This answer is for new 05AB1E written in Elixir.

05AB1E is separated from 05AB1E legacy with P instruction (total product), which puts 1 on the stack if stack is empty in 05AB1E legacy:

Pi26q}318q            pure code (try it)
'F*Pi26 ^qx}318q      code in polyglot

} is hidden inside [] for BitChanger. q in aatq fixes Alphabetti spaghetti. F fixes P in AlphaBeta, ' is for 05AB1E. * fixes Beatnik, not a space because of Japt and l33t. x in qx and k]x fixes Beatnik. ^ is for Pyramid Scheme. z is for Z80Golf.

\$\endgroup\$
4
\$\begingroup\$

320. Affine Mess, 14640 bytes

# 6 "($?63_lv+'50;+'51;5 5 %$\--$[1140=@$aatq\" a/4*DvehfbIg/\"" 3 4//*'F*Pi26^qx}318qkp16[.qx]"8=,k]x PPX~_~)"xvy"\(  7#  CO|"14"   #:7 9 7 9              z    7 222222222222222222222222                 "'" #\\
# 1"7"//['][']     ````      [>.>.?]~~)[7aatxy \#184  O@    <!--     (22)Siii/ \psddpsdoh ]##### #######++(- #### ##-[######;mxf ####xAegguEay######i#u####Ft#######MZWWW####WWWWWW zR###### # ####  #######:_a5# 202ø!},{P_<Ám/e!<ÁmOe!<É}M<ÁmS15%!!%BB44,222%!!%BBPZPYAAA4D,5P[5?4-0!<½!!22<2/!]ss1]'[kkX"204".â'_PPQss>3Ā~>1Ā~>7Ā~v 7 999993 1 7 3 1 8 1 1 55 k zzzzkf kf k zzzzzd kf k zzzzza kf bfz #z#1111#y#y#y#_#         ! 1>?7ДOq#t#>2/Wr#t#t#q#68#r#t#t#68#q#63#r#t#t#6v#>#</Wr#6}#y/===Wr#7ЯOq#>J7Д/Wr#y<Wr#>5/Wr#t#t#6y#>-=/Wr#6|#>6/Wr122! 1退           coding=utf8         @ [[[["472"?]]]]******<
# if-0//               18&1&  nthteo nthieo nthneo an-;et R[+++].----._     /112\11  ##### #######   # #    #####  #   #   #    ##### ####  ###   #### # W#W#####WW#WWWW#####W####WW###WWW####W#WW#W#####WW#WWWW#WWWWWWWWWWWWWWWWWWWW;WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWR
#6!@eD>>if 3>3*>++++++!\::    @ / 78"oo@" *1220*1220L*1211  >" 082",,,@_   2-----2########'\"'##`### ###### ######## #### ##### ####### ##### ###11  # # #### ### ##### ####### ##### ###    # # #### ### ##### #EEEEEδΘΔΔΔΘΔΘλ
# endif/*  1 1 v>>>>>>> >>">r"{\>>>>  @ 0:8:8/_}\(* [>]R 10G|'53'S 11111111\)      # ##########>>###>##>#####>>##>####>##>#>#####>>##>#####>####>>>#####>##>#>##>>##>####>>##>#####>####>>>#####>##>#>##  ## ####
#comment -[v   >>>>>>>> >>>>>>>>>>>>>>>>>>>9 @,,,"279"]>252O>"01",,@_  h$s o#      #????!?!??!??!!!!???!?!??!!?   !?!!!!!?!!!!?????!????????????????????! >>>>>>>>>>>>>>>>>>>>>>>                                
#[[/]e] x  > >>>>>>>@!:!8:6:2/_ >>>>>>>>>>>>>>>>>>>>>>>>>> ;>>>>>>>>>>>>>>>>>    11#[email protected]<axayatbubxbtcuc11
#~[! R++++++] +++++++++\++++++++++++++++++++++++++++++++++U.._+++++++._+++o+++o--ox#
####################################################################################>
 #{{{{]~*[~*  +++++++[>+++++++<-]>+._+++++._+._@]+-}}[.^+;;+;;+;;+<>;;+;;+;;+;;;;;;+;;+;;.._]}--<^>++[+++++[>+++++++<-]>._++++._+++._^<]+-+<[<=oC<=oC<._>>>>-]^>[<+++++[>++++++++++<-]>@@+.---@._+>$] '4o'6o@ )++$--![+++[>+++++++<-]>+._+++++.._>](  <<>> }<}>}[<}}<<}<<<<<}<<}<<<<}<<<}}}<}}<}}<}}<}}<}}<}}}<}}<<<<<<<<<<<}}}<}}<}}<}}<}}<}}<}}}<<<<<<<<<<}]  >>\[/>\/\>>>>>>>]>\[./>>\/\./\/>>>\./]  [[[
#-  x
#* *#p 173#*  e:1*23/5x%6E2  []-main=-[165]- ###  `. :-write(186). end_of_file. `
#`⟪`⟪\⟫9999 9 9
#/*9 999 99 9999 Mn MMM MMMMnnMnnnMnMMMMMMMnMMnnnnnMMn>MnMnnMnMnnnnnnMnMnMMMMMMMMnnMnMnnnMnMMMM             @,,, "286"_+1y2 #<"67",,@␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋'''␌`297'print quit`s'''␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␌␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋
#|9  
#cs 9 9999
#<<<#-->
#><meta http-equiV=X-UA-Compatible content=IE=99><!-- e$P+++++*D*+++1++1E!sss
#   
#{  
#bqbqbqLzLzLzqtqtqtTcTcTcRqRqRq TzTzTzRtRtRt MbMbMbPsPsPsTqTqTqAbAbAbTmTmTmBqBqBqMtMtMtUgUgUg
#=($?$?0l0c01k1k0l0i 0r 0h0h1d1 1 1 0e 0y0y 0mo1d0y0e0e001d0i0f 0g 0n0n1 10mo0n0t 0t0mo0f0t0g0g0f0h0r0r0i0001k10c 0c0l1111000001 1 100|_  )\
[ ' "`e```.1.0.6i]56pq["]298 .quit._[`\']put 294 bye!\` #s['];#/\\/;print 24;exit}}__END__/
###\MoOMoOMoOMoOMOOmoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOmOoMOomoomoOOOM e>+@+-@@@@=>+<@@@=>+<?#>;?\:-._++._++++._#/<?\>3-++._6+---2._#/++++++++++++++++++++++++++++++++++++++++++++++++._++._++++++.>!\
' WWWw;WW;WW;wv;w;;WW;wW;WW;wv;wW;W_;Ww;WW;WW;WW;WW;wW;WW;Ww;W;WW;WWWWwW;;;WWWWWWWwwwwvwWWWwWWWWwvwWWwW\WWwvwWWwWWWwvwW/Ww\WWW ho ho ho ho // ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi MU ([])  ({}<(((((()()())){}{})){}{})>)(({})){}{(<(<()>)({})({}<{}>({}){})>){({}[()])}}({}){}({}()<()()()>)  (<><()>){({}[()])}{  #(((()()()()())()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()()))  ((((((((\';  a=$(printf \\x00);b=$(echo -n $a|wc -c);case $b[1]¢ in 1?)echo 54;;1* )echo 242;;4* )echo 78;;8* )echo $((9999999999999999999>0?166:244));;0?1??)echo 50;;0* )echo 282;;* )echo 58;;esac;exit;#{IO.puts 295#)';  print (0and eval('":"&&(defined?A)&&290||(defined?pp)&&190||(defined?__dir__)&&13||"_"[0]==95&&108||109+1')or(None and(-1 %2>0and 9or 247)or 1/2and eval('hasattr(zip,"iters")and 200or\'𒁁\'=="-"and 241or 1')or 5<<64>>64or 68));"${print(g+91)}$/";exit; "$'#{print(187);exit}'$/"; #< ?>wWWsssss{}#(prin 45)(bye){{{}#}#}#(prin 199)(bye)46(8+9+9+9+9+=!)>* * * * *[[[[3+4*7*@] ] ] ]xxxxxxxxxxxxxxxxxxxxxx
###;{e=1}={e:null};console.log e&&39||180;\
__DATA__="""  
#"  \
__END__
set pr'[puts 59][exit]\'':;@echo 185 #';set pr'-';pr 89;exit
ifdef ss 
1     ! !
2   !    !
9      !!
2#
#  
#  
#  
#PLACET,2<- #2FAC,2SUB#1<- #52FAC,2SUB#2<- #32FACREADOUT,2PLEASEGIVEUPFACs wwwwwwwwwwwWWWwWWWWWwWWWWWWWwWWWWWWWWWwWWWWWWWWWWWWWWWwWWWWWWWWWWWWw W
jrzaeeaeuee_wuuwq jii_iullluiiiogr se_eeepaeeeeeeeeee;eeecisajjarpppppp ⠆⠄⡒⡆⡘😆😨😒😨💬95💬👥➡😻😹😸🙀🙀😹😼😿🙀🙀😼😼😸🙀🙀🙀🙀
👋🔢🌚🌝🌝🌚🌚🌚🌚🌚🐸🐸🐸🐸🐸🐸😂😂😂😂😂😂😂🌚🔥😂😂😂😂😂😂😂💯💩🐸🔥😂💞💩💞😂😂😂😂💞🔥🌚▲▲▲²²²²▲¡▼¡▲▲¡⎚¿⁵228¦ₔ₁₉₃2♦10♦10♦10♥☰䷩䷏䷏䷨䷏䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩⚎ֱֲֵֶֶֶֶַַַָָ  
밠밠따빠빠맣박다맣받다맣희맣희吾有一數曰二百八十一書之うんたんたんたんたんうんうんうんうんうんたんうんうんうんたんうんたんたんうんたんたんうんたんたんうんたんたんうんたんたんたんたんたんうんうんうんうんたんたんうんたんたんたんうんうんうんたんうんうんたんうんうんたんうんうんたんうんたんうんうんうんたんたんうんたんたんうんたんたんうんたんたんうんたんたんたんうんうん  
😊♈💖  ↨↑1↑↑↑↑↑↑↑↑↨21↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑2↨↑1↑↑↑↨↨0↑0↕→
😇♈♈  
😊♉♈  
😇♈♈  
😇♈♉  
😇♈💜  
😊♉♈  
😊📢♈  #e:>*****[[[[828+*+@+*99] ] ] ]*****<
😈♈💜  
😊📢♈  
😇♉💞  
😊📢♉🐸⠀⢃⠛⠋  
#-49,A,-1                              #
#-5,A,-1                               #
#6,A,-1                                #
#X  
#+------+XX   X       XXX
_|/0110@| X X  XXXXXXXXX X
_|/00011| X X   XXXXXXX
_|/1001 | X 
_|/1001 | 
_|/1000 | 
_|/$001 | 
#+------+  
#+    +
1   *xxxxxxx
53 x+       x x     xxx
1  x*  xxxx  xx   xx x  x
x  x  x  x  x x  x  x  xx
 +xx xxxxxxx +x xxxxxxx  xxxx
x  x   x      x   x
51  +xx        xxx
#  
1   *     x``   x  x
49 #+  xx+x=>+  x+x + x B+ ===+
#  =x x  x===  x x >8 xxx +++= +
#+  +x + x,_8=>+ xB  x+x
# =+R _*=x==  x +===+> x x    +
 x +R"12"+8=Dx B=xD +  + xxx+
#+ ``=>8=x>  x+~ x  x +x+B+
#  +====+x>~+B+= x x + x
#D~+x 8=++>8x +=   x+    +,_   +
15 + x   x  + +  xx   +  ?   ?@  %"18"_     !
1  + x   + x ++  xx   + ?@    ?
1 \+* x    +  +  x    +   +   *
1   ! x  +x   +       + ?  !  ?
1    ! x xx --... ...--  ? @ ?
x +   ++ xx  ++ ++     +
 +xxxxx  +     +
  
#= +
+ *   +
#= + *
#=**************************************************+
  +  +$$$
#>"3"O._   +// rk:start | print: "69" rk:end       +
   + ; + *
$'main' *****+ %++ %++ @@* %-- @@* %++ %++ @@*
 -+3o4o#  +
  <++"269">o+
^* *
 #+*****|
.x= #   +
,,  .=#
 #+ OOO       =#
 #^=
+`` 231 =#
#  #uuu#
,,..,.,,,,..,.,.,,..,,.,,,...,,.,,..,,,,,,..,,,.$
  
write 224;bye; 
  
 console.log 178;
  
~~~x  
main:Int  
main =248 
~~~  
literally, print 249
(print 164     (exit ) )
 ( *)
begin write         ('288'    )end.(*)
print 61
  
#<<<##>  
         print(85)
#<<<##>CO COMMENTp]] 
execute_process                            (COMMAND echo 296   )#[[
  
T:251  
E:0  
#+IDRIS: main:IO      (         );main=print 291
#ppW<#require"stdio"Stdio:write     (293  )#>;
#ceppp  ;  ;   ;
MsgBox (0,"",169   )
#cs  
Yo::=~147
::=  
You can see an x here.<<  
  
>{-<<<<<  
> 176
>> Output 1
>SET x TO 120. [0]{472454523665721469465830106052219449897}
>X x.   ;-}
>l=length$show"\0";main=print$[0,0,0,233,0,146,157]!!l{-
  
\begin{code}  
{- ;  ␉␉␉␉ 
␉
 ␉  



-}
open import IO;main = run (putStr"159" )
\end{code}
ppppppppppppp;p
# {{{ {{{ {{{ {{
#!ZZt >>END-IF
#xxxh  program-id.h.procedure
#xxxg  diVision.display 230.
#}}}f >>IF 2>2
#}}}e
#xxxd
#xx}c
#}}}b
#x}xa










































































































































































































































































































#-->
<p>301</p>
<a>304</a>
<b>305</b>
<i>309</i>
<u>310</u>
 
<script type="text/tiscript">self.html="<p>302"</script><script> onload=function(){
d=document
d.body.style.color='000'
d.body.innerHTML=[ ].pop ?
257+[10,,,0,,,18,2,d.clear?5:58,d.compatible?50:window.XMLHttpRequest?49:d.nodeType?8:55][[""+[].pop][0].length-!!d.head-!d.fonts-28]:d.dir==''?312-1:308
}</script>

<style>
head+body,text{display:none}
:,a,i{color:fff}*{+color:fff}
a{-color:000}-a,b{color:000;-color:fff}
: u,-i{color:000}
:after{content:"258";[;content:"276";]}
@media all\0{
:after{content:"260";color:#fff\ 
}:root:before{content:"316";color:fff}
:before{content:"314"}}
@media \0 all{:after{content:"266"}}
</style>

<attache>Print[194]Exit[]</attache>
 
22-23-31-13-13-31-13-13-31-13-13-31-13-13-31-12-12-23-31-13-13-31-13-13-31-13-13-31-13-13-31-21-22-21-12-32
Take Northern Line to Tooting Bec
Take Northern Line to Charing Cross
Take Northern Line to Charing Cross
Take Northern Line to Bank
Take District Line to Hammersmith
Take District Line to Upminster
Take District Line to Hammersmith
Take District Line to Upminster
Take District Line to Embankment
Take Bakerloo Line to Embankment
7 UP
Take Northern Line to Mornington Crescent
7 RIGHT
7 RIGHT
7 TEACH
6 BOND
6 BOND
6 BOND
5 RIGHT
5 LEFT
5 RIGHT
7 BOND
7 TEACH
5 TEACH
6 YELL
5 TEACH
6 YELL
6 YELL
4OURfuorfuor
FOU4
FOU4
FOU4fuor
FOU4four
4444fuor
FOU4
FOU4four
4444
4OUR
4OUR
4444
 ; ;
set ! 57
set ! 51
out &49 &1
out &56 &1
out &50 &1
When this program starts:
There is a scribe called x
x is to write 179

p now 70 dollar off!
p has been selling out worldwide!
More 91 of this
How much is it
red down one blue up red down one blue up red up one red right two blue up
baa baaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa bleeeeeeeeeeeeet bleeeeeeeeeeeeet bleeeeeeeeeet baaaa bleet bleeeeeeeeeet bleeet bleeeeeeeeeet
#
ata#8;&&1Prers>0::geEx Cr Uithary,85"3.c"F ._# gi[s]pogr3461  prstd!\0/a4on;k: $/op>s}e}equ+4[0]!!tfc;""[ ]5:ore>80C0 4?4在u
 
*/
 
#1""
#if!1
.int 2298589328,898451655,12,178790,1018168591,84934449,12597
#endif//*
#1""//*:
#include<stdio.h>
#define z(a) #a
#define u "e"//"
const char*i="24 10 31 1""a c #FFC0FF""B c #0000C0""d c #58007B""e c #0C8302""o c #FF8000""t c #FF00BC""u c #008080""h c #E60001""i c #CAFFFF""f c #280000""k c #CA0000""l c #CA007F""n c #330001 ""q c #E60000""A c #0040C0""E c #808000""F c #00C040""G c #008000 ""R c #800000""H c #0000AA""I c #00AA00""C c #55FFFF""K c #AAAAAA""r c red""g c green""b c blue""c c cyan""m c magenta""y c #FFFF00""x c black""_ c #FFFFFF""HHHahtdegggggggyrggggggc""IHHaixuEFbGGbggbryAEGRgc""CCHafyurbgbgggggggb____o""ICHakmyyyyyyyyyyyyyyyyye""I__almyyyyyyyyyyyyyyyyye""K__anmyyyyyyyyyyyyyy_y_e""HH_aqggyyyyyyyyg____m_Ce""CH_axxxxxxxxxxxxxxxxxxxx""K__aaaam___bbbbbBm_bbBab""K__________bbbbb___bbxbb";//"
typedef int known,macro;int x=!  '(',y[60];macro m(){0;}int f(int a,...){y[x=0]=x=72;printf("\x25i",!m?195:!a?124+x:sizeof' '-1? (1&*z (N)?234:"\??-"[1]?218:67^*u""):*u""?37:z (0'0  0'0 )[7]?75:"\??-"[1]?77+a/2:77);}__attribute__((weak))int main(){known y;int i;f(x,x=sizeof y);x=1;return 0;}__attribute__((destructor))int g(){x?0:puts("198");}//())*/
#1""/*/
<<<<<<<<<<WQTkTTX
 
 
>import Prelude;import GHC.IO;import Data.Functor.Const;import Data.String;import Text.Heredoc;import Control.Exception;import Language.Haskell.TH;import Text.Show.Functions;instance Monoid a=>Monad (Const a)where _>>=_=mempty
>instance K Float;instance IsString Integer where{fromString _=0};b=x#x
>i_= -1`mod`2+c;data B=B Int;_=B b;e=error"#";f?n=  unsafePerformIO$ catch (f e)$ \ErrorCall{}->r n;instance Num(a->b);instance Num();instance Show(Q a)where{show _=""};f= (^);q _=r$ (d.B)?4;d(B _)=r$0`f`f 2 64;class(Show a,Floating a)=>K a where{k::a->String;k _=show$ (id::a->a)pi};c=l (- x )`mod`4;g=[here|here<-""]--[|]
>--W
>x=0;y#a=subtract 0b1206;x#a=174;h a=a^x;r=pure;l a=length$ show a;forall=0;z|(∀)<-5=forall;b1206|let _._=x;negate _=3=206+[40,58,0,57,55,26,16,3,4,-78,0,1,8,5,6,12-1]!!(l("  ",0x0.1,1e1,(0`id`),k(0::Float ),toEnum 0::Num a=>Enum a=>a )+2*l  (do a<-Const[1];pure a,h pi,h(0::Real a=>a))- 3*(l$(pure$TupE[]::ExpQ))-(-q?6+70+z));(!)=seq
>;
>main|let p!_=0=print$ sum[last$172:[[b,0,170,303]!!i_|g<">"],0!61]--} 
 
#1 ""/*/
#if!1
#endif//*
/*/
#if!1
_;
select 192;
.exit
print1(292                       )
quit
#endif
p=sizeof("   (\");print'(''72'')';end !" );main(){puts('??-'&1?"101":"92" );return 0;}
#if 0
#endif//*
#}
disp 49
#{
}{}<>
 /._++.._# !._++.-.>@
#:  /
 \?     -/!  +++++++++++++++++++++++++++++++++++++++++++++++++<>^+++++<\>+++.-.
rebol[ ]prin either Value? 'disarm[223][270];red[ ]prin 221;  + #.---.>/
#s{  /<+>/   K yya+-        &  g+$
endif#                A=AgRA;       AC
# {\
""";'"#{'#'}'}'
#@[[[["272"?]] #]]******<
#<<<#
#ce:  ~#class C{function:Main(a:String[])~Nil{83->Print();}}#$/
#endcomment;K`250
#nocomment outtext("155" )
#/`psZ283MIOnDrFe @,,,"284_"># 01-:2/_;:@,,,"285"_+1y2"982"2k,# @#;# k-'1:,,@_ pS9^7^8^MUOUOF
#\!|!o51   ;        ~nJQ  p'34'  \=#x=4;print(1>>-1<2 ? 17 : Inf16-0|>sizeof>2 ? 162 : √4x<8 ? 201 : 225+2>>1*2 )#p⟫try {EVAL 'say 「27」;exit'};say 237#⟫say 167#{{p{{}}}}say 235#]#print(47)#]#echo 21#>         :/aa*7+42@n;/#print(171)#s-#print 175#s|#print(208)#sCOMMENTprint("65" )#ERi521@<[[["172"?]]]]* * * * * *<es9#
#8M`|  <esc>dggi2<esc>// :~- <~-< ~-<<<~-! `=> #
#1//  >>END-IF*>>>9#
# '>+/*' 25  >[};]+ pppppeee^ee*n\               \! 99              \*n*n*e*s*s*s*ee*n*n*n*e*sss*e*n*n*n*ee*js"(*)//dd"      <e 5>1  */// \)∙226p|_|_X222999612#

Try it online!diff

Ungolfed code, based on hello world:

11
   Sliding memory. A single 1 starts at a, and slides to c, 
   where it causes the program to halt.
11

cbbb zc baaa abaca1

11
   Print '320'
11

      ta ua       xa ya      11  '3' = 51 = 00ll00ll  11
      tb ub       xb         11  '2' = 50 = 00ll00l0  11
      tc uc                  11  '0' = 48 = 00ll0000  11

Code in polyglot:

11#v1cbbbzcbaaaabaca1tau...axayatbubxbtcuc11

Most of the polyglot is hidden inside 11 ... 11 comments which start on line 1. Some instances of 11 are replaced with 1 1, some with 12-1, some are paired with another 11. 4 or 8 consecutive 1s need not to be fixed. Nhohnhehr code was changed to get rid of some 11s.

v1 cancels another v1 before comment (see line 1, note: l is not a command).

\$\endgroup\$
4
\$\begingroup\$

325. Treehugger, 14663 bytes

# 6 "($?63_lv+'50;+'51;5 5 %$\--$[1140=@$aatq\" a/4*DvehfbIg/\"" 3 4//*'F*Pi26^qx}318qkp16[.qx]"8=,k]x PPX~_~)"xvy"\(  7#  CO|"14"   #:7 9 7 9              z    7 222222222222222222222222                 "'" #\\
# 1"7"//['][']     ````      [>.>.?]~~)[7aatxy \#184  O@    <!--     (22)Siii/ \psddpsdoh ]##### #######++(- #### ##-[######;mxf ####xAegguEay######i#u####Ft#######MZWWW####WWWWWW zR###### # ####  #######:_a5# 202ø!},{P_<Ám/e!<ÁmOe!<É}M<ÁmS15%!!%BB44,222%!!%BBPZPYAAA4D,5P[5?4-0!<½!!22<2/!]ss1]'[kkX"204".â'_PPQss>3Ā~>1Ā~>7Ā~v 7 999993 1 7 3 1 8 1 1 55 k zzzzkf kf k zzzzzd kf k zzzzza kf bfz #z#1111#y#y#y#_#         ! 1>?7ДOq#t#>2/Wr#t#t#q#68#r#t#t#68#q#63#r#t#t#6v#>#</Wr#6}#y/===Wr#7ЯOq#>J7Д/Wr#y<Wr#>5/Wr#t#t#6y#>-=/Wr#6|#>6/Wr122! 1退           coding=utf8         @ [[[["472"?]]]]******<
# if-0//     xxxxxxxxx 18&1&  nthteo nthieo nthneo an-;et R[+++].----._     /112\11  ##### #######   # #    #####  #   #   #    ##### ####  ###   #### # W#W#####WW#WWWW#####W####WW###WWW####W#WW#W#####WW#WWWW#WWWWWWWWWWWWWWWWWWWW;WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWR
#6!@eD>>if 3>3*>++++++!\::    @ / 78"oo@" *1220*1220L*1211  >" 082",,,@_   2-----2########'\"'##`### ###### ######## #### ##### ####### ##### ###11  # # #### ### ##### ####### ##### ###    # # #### ### ##### #EEEEEδΘΔΔΔΘΔΘλ
# endif/*   v 1 >>>>>>> >>">r"{\>>>>  @ 0:8:8/_}\(* [>]R 10G|'53'S 11111 1 1\)     # ##########>>###>##>#####>>##>####>##>#>#####>>##>#####>####>>>#####>##>#>##>>##>####>>##>#####>####>>>#####>##>#>##  ## ####
#comment -[v>]-main=-[165]-   ### >>>>>>>>9 [@,,,"279"]>252O>"01",,@_  h$s o#      #????!?!??!??!!!!???!?!??!!?   !?!!!!!?!!!!?????!????????????????????! >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>   :1*23/5%6E2
#[[/]e] x  > >>>>>>>@!:!8:6:2/_ >>>>>>>>>>>>>>>>>>>>>>>>>> ;>>>>>>>>>>>>>>>>>    11#[email protected]<axayatbubxbtcuc11
#~[! R++++++] +++++++++\++++++++++++++++++++++++++++++++++U.._+++++++._+++o+++o--ox#
####################################################################################>
 #{{{{]~*[~* -[>+<-----]>-._+++++._+._@]+-}}[.^+;;+;;+;;+<>;;+;;+;;+;;;;;;+;;+;;.._]}++<^>--[^>[+[>+^-----]>.-._+++._>]<[+[>+<-----]>--._++++._+++._<] ]+-+<['4o'6o@<=oC<=oC<._>>>>-]^>[<-[>+<-----]>-@@+.---@._+>$]  )++$--![+++[>+++++++<-]>+._+++++.._>](  <<>> }<}>}[<}}<<}<<<<<}<<}<<<<}<<<}}}<}}<}}<}}<}}<}}<}}}<}}<<<<<<<<<<<}}}<}}<}}<}}<}}<}}<}}}<<<<<<<<<<}]  >>\[/>\/\>>>>>>>]>\[./>>\/\./\/>>>\./]  [[[
#-  e:
#* *#p 173#*
#`⟪`⟪\⟫9999 9 9
#/*9 999 99 9999 nMn MMM MMMMnnMnnnMnMMMMMMMnMMnnnnnMM>nMnMnnMnMnnnnnnM //`. :-write(186). end_of_file. `M  @,,, "286"_+1y2 #<"67",,@␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋'''␌`297'print quit`sMMMMMMMMnnMnMnnnMnMMMM'''␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␌␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋
#|9  
#cs 9 9999
#<<<#-->
#><meta http-equiV=X-UA-Compatible content=IE=99><!-- e$P+++++*D*+++1++1E!sss
#   
#{  
#bqbqbqLzLzLzqtqtqtTcTcTcRqRqRq TzTzTzRtRtRt MbMbMbPsPsPsTqTqTqAbAbAbTmTmTmBqBqBqMtMtMtUgUgUg
#=($?$?0l0c01k1k0l0i 0r 0h0h1d1 1_1 0e 0y0y 0mo1d0y0e0e001d0i0f 0g 0n0n1 10mo0n0t 0t0mo0f0t0g0g0f0h0r0r0i0001k10c 0c0l1111000001_1 100|_  )\
[ ' "`e```.1.0.6i]56pq["]298 .quit._[`\']put 294 bye!\` #s['];#/\\/;print 24;exit}}__END__/
###\MoOMoOMoOMoOMOOmoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOmOoMOomoomoOOOM e>+@+-@@@@=>+<@@@=>+<?#>;?\:-._++._++++._#/<?\>3-++._6+---2._#/++++++++++++++++++++++++++++++++++++++++++++++++._++._++++++.>!\
' WWWw;WW;WW;wv;w;;WW;wW;WW;wv;wW;W_;Ww;WW;WW;WW;WW;wW;WW;Ww;W;WW;WWWWwW;;;WWWWWWWwwwwvwWWWwWWWWwvwWWwW\WWwvwWWwWWWwvwW/Ww\WWW ho ho ho ho // ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi MU ([])  ({}<(((((()()())){}{})){}{})>)(({})){}{(<(<()>)({})({}<{}>({}){})>){({}[()])}}({}){}({}()<()()()>)  (<><()>){({}[()])}{  #(((()()()()())()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()()))  ((((((((\';  a=$(printf \\x00);b=$(echo -n $a|wc -c);case $b[1]¢ in 1?)echo 54;;1* )echo 242;;4* )echo 78;;8* )echo $((9999999999999999999>0?166:244));;0?1??)echo 50;;0* )echo 282;;* )echo 58;;esac;exit;#{IO.puts 295#)';  print (0and eval('":"&&(defined?A)&&290||(defined?pp)&&190||(defined?__dir__)&&13||"_"[0]==95&&108||109+1')or(None and(-1 %2>0and 9or 247)or 1/2and eval('hasattr(zip,"iters")and 200or\'𒁁\'=="-"and 241or 1')or 5<<64>>64or 68));"${print(g+91)}$/";exit; "$'#{print(187);exit}'$/"; #< ?>wWWsssss{}#(prin 45)(bye){{{}#}#}#(prin 199)(bye)46(8+9+9+9+9+=!)>* * * * *[[[[3+4*7*@] ] ] ]xxxxxxxxxxxxxxxxxxxxxx
###;{e=1}={e:null};console.log e&&39||180;\
__DATA__="""  
#"  \
__END__
set pr'[puts 59][exit]\'':;@echo 185 #';set pr'-';pr 89;exit
ifdef ss 
1     ! !
2   !    !
9      !!
2#
#  
#  
#  
#PLACET,2<- #2FAC,2SUB#1<- #52FAC,2SUB#2<- #32FACREADOUT,2PLEASEGIVEUPFACs wwwwwwwwwwwWWWwWWWWWwWWWWWWWwWWWWWWWWWwWWWWWWWWWWWWWWWwWWWWWWWWWWWWw W
jrzaeeaeuee_wuuwq jii_iullluiiiogr se_eeepaeeeeeeeeee;eeecisajjarpppppp ⠆⠄⡒⡆⡘😆😨😒😨💬95💬👥➡😻😹😸🙀🙀😹😼😿🙀🙀😼😼😸🙀🙀🙀🙀
👋🔢🌚🌝🌝🌚🌚🌚🌚🌚🐸🐸🐸🐸🐸🐸😂😂😂😂😂😂😂🌚🔥😂😂😂😂😂😂😂💯💩🐸🔥😂💞💩💞😂😂😂😂💞🔥🌚▲▲▲²²²²▲¡▼¡▲▲¡⎚¿⁵228¦ₔ₁₉₃2♦10♦10♦10♥☰䷩䷏䷏䷨䷏䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩⚎ֱֲֵֶֶֶֶַַַָָ  
밠밠따빠빠맣박다맣받다맣희맣희吾有一數曰二百八十一書之うんたんたんたんたんうんうんうんうんうんたんうんうんうんたんうんたんたんうんたんたんうんたんたんうんたんたんうんたんたんたんたんたんうんうんうんうんたんたんうんたんたんたんうんうんうんたんうんうんたんうんうんたんうんうんたんうんたんうんうんうんたんたんうんたんたんうんたんたんうんたんたんうんたんたんたんうんうん  
😊♈💖  ↨↑1↑↑↑↑↑↑↑↑↨21↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑2↨↑1↑↑↑↨↨0↑0↕→
😇♈♈  
😊♉♈  
😇♈♈  
😇♈♉  
😇♈💜  
😊♉♈  
😊📢♈  #e:>*****[[[[828+*+@+*99] ] ] ]*****<
😈♈💜  
😊📢♈  
😇♉💞  
😊📢♉🐸⠀⢃⠛⠋  
#-49,A,-1                              #
#-5,A,-1                               #
#6,A,-1                                #
#X  
#+------+XX   X       XXX
_|/0110@| X X  XXXXXXXXX X
_|/00011| X X   XXXXXXX
_|/1001 | X
_|/1001 | 
_|/1000 | 
_|/$001 | 
#+------+  
#+    +
1   *xxxxxxx
53 x+       x x     xxx
1  x*  xxxx  xx   xx x  x
x  x  x  x  x x  x  x  xx
 +xx xxxxxxx +x xxxxxxx  xxxx
x  x   x      x   x
51  +xx        xxx
#  
1   *     x``   x  x
49 #+  xx+x=>+  x+x + x B+ ===+
#  =x x  x===  x x >8 xxx +++= +
#+  +x + x,_8=>+ xB  x+x
# =+R _*=x==  x +===+> x x    +
 x +R"12"+8=Dx B=xD +  + xxx+
#+ ``=>8=x>  x+~ x  x +x+B+
#  +====+x>~+B+= x x + x
#D~+x 8=++>8x +=   x+    +,_   +
15 + x   x  + +  xx   +  ?   ?@  %"18"_     !
1  + x   + x ++  xx   + ?@    ?
1 \+* x    +  +  x    +   +   *
1   ! x  +x   +       + ?  !  ?
1    ! x xx --... ...--  ? @ ?
x +   ++ xx  ++ ++     +
 +xxxxx  +     +
  
#= +
+ *   +
#= + *
#=**************************************************+
  +  +$$$
#>"3"O._   +// rk:start | print: "69" rk:end       +
   + ; + *
$'main' *****+ %++ %++ @@* %-- @@* %++ %++ @@*
 -+3o4o#  +
  <++"269">o+
^* *
 #+*****|
.x= #   +
,,  .=#
 #+ OOO       =#
 #^=
+`` 231 =#
#  #uuu#
,,..,.,,,,..,.,.,,..,,.,,,...,,.,,..,,,,,,..,,,.$
  
write 224;bye; 
  
 console.log 178;
  
~~~x  
main:Int  
main =248 
~~~  
literally, print 249
(print 164  (exit    ) )
 ( *)
begin write         ('288'    )end.(*)
print 61
  
#<<<##>  
         print(85)
#<<<##>CO COMMENTp]] 
execute_process(COMMAND echo 296)#[[
  
T:251  
E:0  
#+IDRIS: main:IO      (    );main=print 291
#ppW<#require"stdio"Stdio:write     (293  )#>
#ceppp  ;  ;   ; ;
MsgBox (0,"",169   )
#cs  
You can see an x here.<<  
  
>{-<<<<<  
> 176
>> Output 1
>SET x TO 120.
>X x.   ;-}
>l=length$show"\0";main=print$[0,0,0,233,0,146,157]!!l{-
  
\begin{code}  
{- ;  ␉␉␉␉ 
␉
 ␉  



-}
open import IO;main = run (putStr"159" )
\end{code}
ppppppppppppp;p
# {{{ {{{ {{{ {{
#!ZZt >>END-IF
#xxxh  program-id.h.procedure
#xxxg  diVision.display 230.
#}}}f >>IF 2>2
#}}}e
#xxxd
#xx}c
#}}}b
#x}xa
#n::=~147
42::~322
::=
#^^aa>>[0]{472454523665721469465830106052219449897} ()
#aa->=323







































































































































































































































































































#-->
<p>301</p>
<a>304</a>
<b>305</b>
<i>309</i>
<u>310</u>
 
<script type="text/tiscript">self.html="<p>302"</script><script> onload=function(){
d=document
d.body.style.color='000'
d.body.innerHTML=[ ].pop ?
257+[10,,,0,,,18,2,d.clear?5:58,d.compatible?50:window.XMLHttpRequest?49:d.nodeType?8:55][[""+[].pop][0].length-!!d.head-!d.fonts-28]:d.dir==''?312-1:308
}</script>

<style>
head+body,text{display:none}
:,a,i{color:fff}*{+color:fff}
a{-color:000}-a,b{color:000;-color:fff}
: u,-i{color:000}
:after{content:"258";[;content:"276";]}
@media all\0{
:after{content:"260";color:#fff\ 
}:root:before{content:"316";color:fff}
:before{content:"314"}}
@media \0 all{:after{content:"266"}}
</style>

<attache>Print[194]Exit[]</attache>
 
22-23-31-13-13-31-13-13-31-13-13-31-13-13-31-12-12-23-31-13-13-31-13-13-31-13-13-31-13-13-31-21-22-21-12-32
Take Northern Line to Tooting Bec
Take Northern Line to Charing Cross
Take Northern Line to Charing Cross
Take Northern Line to Bank
Take District Line to Hammersmith
Take District Line to Upminster
Take District Line to Hammersmith
Take District Line to Upminster
Take District Line to Embankment
Take Bakerloo Line to Embankment
7 UP
Take Northern Line to Mornington Crescent
7 RIGHT
7 RIGHT
7 TEACH
6 BOND
6 BOND
6 BOND
5 RIGHT
5 LEFT
5 RIGHT
7 BOND
7 TEACH
5 TEACH
6 YELL
5 TEACH
6 YELL
6 YELL
4OURfuorfuor
FOU4
FOU4
FOU4fuor
FOU4four
4444fuor
FOU4
FOU4four
4444
4OUR
4OUR
4444
 ; ;
set ! 57
set ! 51
out &49 &1
out &56 &1
out &50 &1
When this program starts:
There is a scribe called x
x is to write 179

p now 70 dollar off!
p has been selling out worldwide!
More 91 of this
How much is it
red down one blue up red down one blue up red up one red right two blue up
baa baaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa bleeeeeeeeeeeeet bleeeeeeeeeeeeet bleeeeeeeeeet baaaa bleet bleeeeeeeeeet bleeet bleeeeeeeeeet
#
ata#8;&&1Prers>0::ge>Ex Cr Uithary,85".c"F ._# gi[s]pogr3461  prstd!\0k:4o $/op>asequ+4[]!!tfc;[ ]5:ore>8 4?4920C05r""Hadisptext在uR 8
 
*/
 
#1""
#if!1
.int 2298589328,898451655,12,178790,1018168591,84934449,12597
#endif//*
#1""//*:
#include<stdio.h>
#define z(a) #a
#define u "e"//"
const char*i="25 10 37 1""a c #FFC0FF""B c #0000C0""d c #58007B""e c #0C8302""o c #FF8000""t c #FF00BC""u c #008080""h c #E60001""i c #CAFFFF""f c #280000""k c #CA0000""l c #CA007F""n c #330001""q c #E60000""A c #0040C0""E c #808000""F c #00C040""G c #008000""R c #800000""H c #0000AA""I c #00AA00""C c #55FFFF""K c #AAAAAA""r c red""g c green""b c blue""c c cyan""m c magenta""y c #FFFF00""x c black""_ c #FFFFFF""V c #000502"": c #010001""@ c #090909""2 c #000002""3 c #000003""4 c #000004""HHHVahtdegggggggyrggggggc""IHH3aixuEFbGGbggbryAEGRgc""CCH:afyurbgbgggggggb____o""ICH2akmyyyyyyyyyyyyyyyyye""I__:almyyyyyyyyyyyyyyyyye""K__4anmyyyyyyyyyyyyyy_y_e""HH_:aqggyyyyyyyyg____m_Ce""CH_@axxxxxxxxxxxxxxxxxxxx""K___aaaam___bbbbbBm_bbBab""K___________bbbbb___bbxbb";//"
typedef int known,macro;int x=!  '(',y[60];macro m(){0;}int f(int a,...){y[x=0]=x=72;printf("\x25i",!m?195:!a?124+x:sizeof' '-1? (1&*z (N)?234:"\??-"[1]?218:67^*u""):*u""?37:z (0'0  0'0 )[7]?75:"\??-"[1]?77+a/2:77);}__attribute__((weak))int main(){known y;int i;f(x,x=sizeof y);x=1;return 0;}__attribute__((destructor))int g(){x?0:puts("198");}//())*/
#1""/*/
<<<<<<<<<<WQTkTTX
 
 
>import Prelude;import GHC.IO;import Data.Functor.Const;import Data.String;import Text.Heredoc;import Control.Exception;import Language.Haskell.TH;import Text.Show.Functions;instance Monoid a=>Monad (Const a)where _>>=_=mempty
>instance K Float;instance IsString Integer where{fromString _=0};b=x#x
>i_= -1`mod`2+c;data B=B Int;_=B b;e=error"#";f?n=  unsafePerformIO$ catch (f e)$ \ErrorCall{}->r n;instance Num(a->b);instance Num();instance Show(Q a)where{show _=""};f= (^);q _=r$ (d.B)?4;d(B _)=r$0`f`f 2 64;class(Show a,Floating a)=>K a where{k::a->String;k _=show$ (id::a->a)pi};c=l (- x )`mod`4;g=[here|here<-""]--[|]
>--W
>x=0;y#a=subtract 0b1206;x#a=174;h a=a^x;r=pure;l a=length$ show a;forall=0;z|(∀)<-5=forall;b1206|let _._=x;negate _=3=206+[40,58,0,57,55,26,16,3,4,-78,0,1,8,5,6,12-1]!!(l("  ",0x0.1,1e1,(0`id`),k(0::Float ),toEnum 0::Num a=>Enum a=>a )+2*l  (do a<-Const[1];pure a,h pi,h(0::Real a=>a))- 3*(l$(pure$TupE[]::ExpQ))-(-q?6+70+z));(!)=seq
>;
>main|let p!_=0=print$ sum[last$172:[[b,0,170,303]!!i_|g<">"],0!61]--} 
 
#1 ""/*/
#if!1
#endif//*
/*/
#if!1
_;
select 192;
.exit
print1(292)
quit
#endif
p=sizeof("   (\");print'(''72'')';end !" );main(){puts('??-'&1?"101":"92" );return 0;}
#if 0
#endif//*
#}
disp 49
#{
}{}<>
 /._++.._# !._++.-.>@
#:  /
 \?     -/!  +++++++++++++++++++++++++++++++++++++++++++++++++<>^+++++<\>+++.-.
rebol[ ]prin either Value? 'disarm[223][270];red[ ]prin 221;  + #.---.>/
#s{  /<+>/   K yya+-        &  g+$
endif#                A=AgRA;       AC
# {\
""";'"#{'#'}'}'
#@[[[["272"?]] #]]******<
#<<<#
#ce:  ~#class C{function:Main(a:String[])~Nil{83->Print();}}#$/
#endcomment;K`250
#nocomment outtext("155" )
#/`psZ283MIOnDrFe @,,,"284_"># 01-:2/_;:@,,,"285"_+1y2"982"2k,# @#;# k-'1:,,@_ pS9^7^8^MUOUOF
#\!|!o51   ;        ~nJQ  p'34'  \=#x=4;print(1>>-1<2 ? 17 : Inf16-0|>sizeof>2 ? 162 : √4x<8 ? 201 : 225+2>>1*2 )#p⟫try {EVAL 'say 「27」;exit'};say 237#⟫say 167#{{p{{}}}}say 235#]#print(47)#]#echo 21#>/123nnn; :/aa*7+42@n;/#print(171)#s-#print 175#s|#print(208)#sCOMMENTprint("65" )#ERi521@<[[["172"?]]]]* * * * * *<es9#
#8M`|  <esc>dggi2<esc>// :~- <~-< ~-<<<~-! `=> #
#1//  >>END-IF*>>>9#
# '>+/*' 25  >[};]+ pppppeee^ee*n\               \! 99              \*n*n*e*s*s*s*ee*n*n*n*e*sss*e*n*n*n*ee*js"(*)//dd"      <e 5>1  */// \)∙226p|_|_X222999612#

Try it online!diff

Both interpreters linked from esolangs article have problems. Haskell interpreter doesn't implement input and ignores everything after first #. JavaScript interpreter incorrectly handles nested loops. Also, the interpreters have different cell sizes, so Haskell interpreter won't work with polyglot even if . takeWhile (/='#') is removed. This is the js interpreter that is used for polyglot. I adapted it for nodejs and fixed the problem with loops.

Treehugger takes the path of HDBF:

old:  --<^>++[ hdbf code ]
new:  ++<^>--[ ^>[+[>+^-----]>.-._+++._>] <[ hdbf code ] ]

-- and ++ are switched for golf. After ++<^>-- Treehugger tree is

   [2]
[0]   [254]*

^> in ^>[+ doesn't change current cell in Treehugger, but moves to zero cell in HDBF. Brainfuck loop to get 51 -[>+<-----]> becomes +[>+^-----]> here because there is -- in front and <^.

Golf: changed all bf loops except Brainlove to -[>+<-----]>, in Brainlove it doesn't gain any bytes. Moved Ursala up to fix -[ in brainfuck code.

\$\endgroup\$
2
  • \$\begingroup\$ I wonder if it's possible to use the flaws in the other interpreters to add them separate to the polyglot. The Haskell one is obviously unusable, but maybe the JS one can be used? \$\endgroup\$
    – Wheat Wizard
    Sep 27, 2021 at 9:33
  • \$\begingroup\$ @WheatWizard I don't feel good about the loop bug in the JS interpreter. I feel like it's something that should be fixed, not something that should be relied upon. But even if someone is willing to accept the JS interpreter as is, it would be very hard to add because polyglot relies heavily on correct loop behavior. Haskell interpreter without takeWhile could be added, but I don't want to do it right now. (I said it "won't work" meaning with current polyglot, because I used a Treehugger loop that relies on cells wrapping like unsigned byte.) \$\endgroup\$
    – stasoid
    Sep 28, 2021 at 3:50
4
\$\begingroup\$

333. bc, 14932 bytes

# 6 "($11k_rv+'50;+'51;5 5 %$\--$[0=@$a a tqx\" a/4*DvehfbIg/\"" 3 4//*'F*Pi26^qx}318qkp16[.qx]"8=,k]x PPX~_~)"xvy"\(   #  CO|"14"   #:9 {?63#k9 #          z      2222222222222222222222222                "'" #\\
# 1"7"//['][']     ````      [>.>.?]~~)[ aatxy \#184  O@     <!--    (22)Siii/ \psddpsdoh ]##### #######++(- #### ##-[######;mxf ####xAegguEay######i#u####Ft#######MZWWW####WWWWWW zR###### # ####&:#######:_a5# 202ø!},{P_<Ám/e!<ÁmOe!<É}M<ÁmS15%!!%BB44,222%!!%BBPZPYAAA4D,5P[5?4-0!<½!!22<2/!]ss1]'[kkX"204".â'_PPQss>3Ā~>1Ā~>7Ā~v 7 999993 1 7 3 1 8 1 1 55 k zzzzkf kf k zzzzzd kf k zzzzza kf bfz #z#1111#y#y#y#_#         ! 1>?7ДOq#t#>2/Wr#t#t#q#68#r#t#t#68#q#63#r#t#t#6v#>#</Wr#6}#y/===Wr#7ЯOq#>J7Д/Wr#y<Wr#>5/Wr#t#t#6y#>-=/Wr#6|#>6/Wr122! 1退           coding=utf8         @ [[[["472"?]]]]******<
# if-0//      n&goto e 18&1&  nthteo nthieo nthneo an-;et R[+++]._----.^    /112\11  ##### #######   # #    #####  #   #   #    ##### ####  ###   #### # W#W#####WW#WWWW#####W####WW###WWW####W#WW#W#####WW#WWWW#WWWWWWWWWWWWWWWWWWWW;WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWR
#6!@eD>>if 3>3*>++++++!\::    @ / 78"oo@"  , '\"' ` L       >"082",,,@_    x-----x########    ## ### ###### ######## #### ##### ####### ##### ###    # # #### ### ##### ####### ##### ###    # # #### ### ##### #EEEEEδΘΔΔΔΘΔΘλ
# endif/*   v 1 >>>>>>> >>">r"{\>>>>  @ 0:8:8/_}\(* [>]R 10G|'53'S  1 1 1  \)      # ##########>>###>##>#####>>##>####>##>#>#####>>##>#####>####>>>#####>##>#>##>>##>####>>##>#####>####>>>#####>##>#>##  ## ####
#comment -[v>]-main=-[165]-   ### >>>>>>>>9 [@,,,"279"]>252O>"01",,@_  h$s o# 326  #????!?!??!??!!!!???!?!??!!?   !?!!!!!?!!!!?????!????????????????????! >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>   :1*23/5%6E2
#[[/]e] x  > >>>>>>>@!:!8:6:2/_ >>>>>>>>>>>>>>>>>>>>>>>>>> ;>>>>>>>>>>>>>>>>> eeePs#v11cbbbzcba[email protected]<uaxayatbubxbtcuc11
#~[! R++++++] +++++++++\++++++++++++++++++++++++++++++++++U.._+++++++._+++o+++o--ox#
####################################################################################>121 *1220*1211k*1220 2 2 2 11
 #{{{{]~*[~* -[>+<-----]>-._+++++._+._@]+-}}[._+;;+;;+;;+<>;;+;;+;;+;;;;;;+;;+;;.._]}++<^>--[^>[+[>+^-----]>.-._+++._>]<[+[>+<-----]>--._++++._+++._'4o'6o@<] ]+-+<[<=oC<=oC<._>>>>-]^>[<-[>+<-----]>-@@+.---@._+>$]  )++$--![+++[>+++++++<-]>+._+++++.._>](  <<>> }<}>}[<}}<<}<<<<<}<<}<<<<}<<<}}}<}}<}}<}}<}}<}}<}}}<}}<<<<<<<<<<<}}}<}}<}}<}}<}}<}}<}}}<<<<<<<<<<}] [328]  >>\[/>\/\>>>>>>>]>\[./>>\/\./\/>>>\./]  [[[
#-  e:
#* *#p 173#*
#`⟪`⟪\⟫9999 9 9
#/*9 999 99 9999   Mn MMMMMMMnnMnnnMnMMMMMMMnMMnnnnnMM>nMnMnnMnMnnnn   //`. :-print(186). end_of_file. `MnM @,,, "286"_+1y2 #<"67",,@_␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋'''␌`297'print quit`sssMMMMMMMMnnMnMnn n M n M M M M''';201-1|>print;exit 0␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␌␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋
#|9 e: 
#cs 9 9999
#<<<#-->
#><meta http-equiv=X-UA-Compatible content=IE=99><!-- e$P+++++*D*+++1++1E!sss
#   
#{  
#bqbqbqLzLzLz TcTcTcRqRqRq TzTzTzRtRtRt MbMbMbTqTqTqAbAbAbTmTmTmBqBqBqMtMtMtUgUgUg\␍331;"${print+191}$x";exit;#?>\␍print(f'𒁁'=='-'and 241or 1);'''ss';@'
#= $1$10l0c01b1b0l0i 0r 0h0h1d1 1_1 0e 0y0y 0mo1d0y0e0e001d0i0f 0g 0n0n1 10mo0n0t_0t0mo0f0t0g0g0f0h0r0r0i0001b10c 0c0l1111000001_1 100|_\
[ ' "`e```.1.0.6i]56pq["``\/*]298 .quit._[`\']put 294 bye!\` #s['];#/\\/;print 24;exit}}__END__/
###\MoOMoOMoOMoOMOOmoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOmOoMOomoomoOOOM  e>+@+-@@@@=>+<@@@=>+<?#>;?\:-._++._++++._#/<?\>3-++._6+---2._#/++++++++++++++++++++++++++++++++++++++++++++++++._++._++++++.>!\
'w(WWW;wW;WW;Ww;v;;wW;Ww;WW;Ww;vw;W_;WW;wW;WW;WW;WW;Ww;WW;WW;w;WW;WWWWWw;;;WWWWWWWWwwwwvwWWWwWWWWwvwWWwW\WWwvwWWwWWWwvwW/Ww\WWW ho ho ho ho // ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi MU ) ([])({}<(((((()()())){}{})){}{})>)(({})){}{(<(<()>)({})({}<{}>({}){})>){({}[()])}}({}){}({}()<()()()>) (<><()>){({}[()])}{  #(((()()()()())()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())) ((((((((\'; a=$(printf \\x00);b=$(echo -n $a|wc -c);case $b[1]¢ in 1?)echo 54;;1* )echo 242;;4* )echo 78;;8* )echo $((9999999999999999999>0?166:244));;0?1??)echo 50;;0* )echo 282;;* )echo 58;;esac;exit;#{IO.puts 295#';  print (0and eval('":"&&(defined?A)&&290||(defined?pp)&&190||(defined?__dir__)&&13||"_"[0]==95&&108||109+1')or(None and(-1 %2>0and 9or 247)                                                                      or 5<<64>>64or 68));                   exit; "$'#{print(187);exit}'$/"; #    wWWsssss {}#(prin 45)(bye){{{}#}#}#(prin 199)(bye)) 46(8+9+9+9+9+=!) >* * * * *[[[[3+4*7*@] ] ] ]xxxxxxxxxxxxxxxxxxxxxx
###;{e=1}={e:null};console.log e&&39||180;\
__DATA__="""  
#"  \
__END__
set pr'[puts 59][exit]\'':;@echo 185 #';set pr'-';pr 89;exit
ifdef ss 
1     ! !
2   !    !
9      !!
2#
#  
#  
#dddd d b ggggg g iii i llllll l dddd ddddd cc ggggg g ooooooo dddd d ooooooo iii iiiii ooooooo eeeeeeeeee
#PLACET,2<- #2FAC,2SUB#1<- #52FAC,2SUB#2<- #32FACREADOUT,2PLEASEGIVEUPFACs wwwwwwwwwwwWWWwWWWWWwWWWWWWWwWWWWWWWWWwWWWWWWWWWWWWWWWwWWWWWWWWWWWWw W
jrzaeeaeuee_wuuwq jii_iullluiiiogr se_eeepaeeeeeeeeee;eeecisajjarpppppp ⠆⠄⡒⡆⡘😆😨😒😨💬95💬👥➡😻😹😸🙀🙀😹😼😿🙀🙀😼😼😸🙀🙀🙀🙀
👋🔢🌚🌝🌝🌚🌚🌚🌚🌚🐸🐸🐸🐸🐸🐸😂😂😂😂😂😂😂🌚🔥😂😂😂😂😂😂😂💯💩🐸🔥😂💞💩💞😂😂😂😂💞🔥🌚▲▲▲²²²²▲¡▼¡▲▲¡⎚¿⁵228¦ₔ₁₉₃2♦10♦10♦10♥☰䷩䷏䷏䷨䷏䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩⚎ֱֲֵֶֶֶֶַַַָָ  
밠밠따빠빠맣박다맣받다맣희맣희吾有一數曰二百八十一書之うんたんたんたんたんうんうんうんうんうんたんうんうんうんたんうんたんたんうんたんたんうんたんたんうんたんたんうんたんたんたんたんたんうんうんうんうんたんたんうんたんたんたんうんうんうんたんうんうんたんうんうんたんうんうんたんうんたんうんうんうんたんたんうんたんたんうんたんたんうんたんたんうんたんたんたんうんうん  
😊♈💖  ↨↑1↑↑↑↑↑↑↑↑↨21↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑2↨↑1↑↑↑↨↨0↑0↕→
😇♈♈  
😊♉♈  
😇♈♈  
😇♈♉  
😇♈💜  
😊♉♈  
😊📢♈  #e:>*****[[[[828+*+@+*99] ] ] ]*****<
😈♈💜  
😊📢♈  
😇♉💞  
😊📢♉🐸⠀⢃⠛⠋  
#-49,A,-1                              #
#-5,A,-1                               #
#6,A,-1                                #
#X  
#+------+XX   X       XXX
_|/0110@| X X  XXXXXXXXX X
_|/00011| X X   XXXXXXX
_|/1001 | X
_|/1001 | 
_|/1000 | 
_|/$001 | 
#+------+  
#+    +
1   *xxxxxxx
53 x+       x x     xxx
1  x*  xxxx  xx   xx x  x
x  x  x  x  x x  x  x  xx
 +xx xxxxxxx +x xxxxxxx  xxxx
x  x   x      x   x
51  +xx        xxx
#  
1   *     x``   x  x
49 #+  xx+x=>+  x+x + x B+ ===+
#  =x x  x===  x x >8 xxx +++= +
#+  +x + x,_8=>+ xB  x+x
# =+R _*=x==  x +===+> x x    +
 x +R"12"+8=Dx B=xD +  + xxx+
#+ ``=>8=x>  x+~ x  x +x+B+
#  +====+x>~+B+= x x + x
#D~+x 8=++>8x +=   x+    +,_   +
15 + x   x  + +  xx   +  ?   ?@  %"18"_     !
1  + x   + x ++  xx   + ?@    ?
1 \+* x    +  +  x    +   +   *
1   ! x  +x   +       + ?  !  ?
1    ! x xx --... ...--  ? @ ?
x +   ++ xx  ++ ++     +
 +xxxxx  +     +
  
#= +
+ *   +
#= + *
#=**************************************************+
  +  +$$$
#>"3"O._   +// rk:start | print: "69" rk:end       +
   + ; + *
$'main' *****+ %++ %++ @@* %-- @@* %++ %++ @@*
 -+3o4o#  +
  <++"269">o+
^* *
 #+*****|
.x= #   +
,,  .=#
 #+ OOO       =#
 #^=
+`` 231 =#
#  #uuu#
,,..,.,,,,..,.,.,,..,,.,,,...,,.,,..,,,,,,..,,,.$
  
write 224;bye; 
  
 console.log 178;
  
~~~x  
main:Int  
main =248 
~~~  
literally, print 249
(print 164  (exit    ) )
 ( *)
begin write         ('288'    )end.(*)
print 61
  
#<<<##>  
         print(85)
#<<<##>CO COMMENTp]] 
execute_process(COMMAND echo 296)#[[
  
T:251  
E:0  
#+IDRIS: main:IO      (    );main=print 291
#ppW<#require"stdio"Stdio:write     (293  )#>
#ceppp  ;  ;   ; ;
MsgBox (0,"",169   )
#cs  
You can see an x here.<<  
  
>{-<<<<<  
> 176
>> Output 1
>SET x TO 120.
>X x.   ;-}
>l=length$show"\0";main=print$[0,0,0,233,0,146,157]!!l{-
  
\begin{code}  
{- ;  ␉␉␉␉ 
␉
 ␉  



-}
open import IO;main = run (putStr"159" )
\end{code}
ppppppppppppp;p
# {{{ {{{ {{{ {{
#!ZZt >>END-IF
#xxxh  program-id.h.procedure
#xxxg  diVision.display 230.
#}}}f >>IF 2>2
#}}}e
#xxxd
#xx}c
#}}}b
#x}xa
#n::=~147
42::~322
::=
#^^aa>>[0]{472454523665721469465830106052219449897} ()
#aa->=323
:e
echo 330
exit

*/
#1""/*
333
quit

































































































































































































































































































#-->
<p>301</p>
<a>304</a>
<b>305</b>
<i>309</i>
<u>310</u>
 
<script type="text/tiscript">self.html="<p>302"</script><script> onload=function(){
d=document
d.body.style.color='000'
d.body.innerHTML=[ ].pop ?
257+[10,,,0,,,18,2,d.clear?5:58,d.compatible?50:window.XMLHttpRequest?49:d.nodeType?8:55][[""+[].pop][0].length-!!d.head-!d.fonts-28]:d.dir==''?312-1:308
}</script>

<style>
head+body,text{display:none}
:,a,i{color:fff}*{+color:fff}
a{-color:000}-a,b{color:000;-color:fff}
: u,-i{color:000}
:after{content:"258";[;content:"276";]}
@media all\0{
:after{content:"260";color:#fff\ 
}:root:before{content:"316";color:fff}
:before{content:"314"}}
@media \0 all{:after{content:"266"}}
</style>

<attache>Print[194]Exit[]</attache>
 
22-23-31-13-13-31-13-13-31-13-13-31-13-13-31-12-12-23-31-13-13-31-13-13-31-13-13-31-13-13-31-21-22-21-12-32
Take Northern Line to Tooting Bec
Take Northern Line to Charing Cross
Take Northern Line to Charing Cross
Take Northern Line to Bank
Take District Line to Hammersmith
Take District Line to Upminster
Take District Line to Hammersmith
Take District Line to Upminster
Take District Line to Embankment
Take Bakerloo Line to Embankment
7 UP
Take Northern Line to Mornington Crescent
7 RIGHT
7 RIGHT
7 TEACH
6 BOND
6 BOND
6 BOND
5 RIGHT
5 LEFT
5 RIGHT
7 BOND
7 TEACH
5 TEACH
6 YELL
5 TEACH
6 YELL
6 YELL
4OURfuorfuor
FOU4
FOU4
FOU4fuor
FOU4four
4444fuor
FOU4
FOU4four
4444
4OUR
4OUR
4444
 ; ;
set ! 57
set ! 51
out &49 &1
out &56 &1
out &50 &1
When this program starts:
There is a scribe called x
x is to write 179

p now 70 dollar off!
p has been selling out worldwide!
More 91 of this
How much is it
red down one blue up red down one blue up red up one red right two blue up
baa baaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa bleeeeeeeeeeeeet bleeeeeeeeeeeeet bleeeeeeeeeet baaaa bleet bleeeeeeeeeet bleeet bleeeeeeeeeet
#
ata#8;&&1Pr"93"s>0::ge>Ex Cr Uithary,85".c"F ._#gi[s]pogr3461!\0k:4op>astdequ+4[]!!tfc;[ ]5:ore>8?4C05在u/a>""Ha 892
 
*/
#if!1
.int 2298589328,898451655,12,178790,1018168591,84934449,12597
#endif//*
#1""//*:
#include<stdio.h>
#define z(a) #a
#define u "e"//"
const char*i="25 10 37 1""a c #FFC0FF""B c #0000C0""d c #58007B""e c #0C8302""o c #FF8000""t c #FF00BC""u c #008080""h c #E60001""i c #CAFFFF""f c #280000""k c #CA0000""l c #CA007F""n c #330001""q c #E60000""A c #0040C0""E c #808000""F c #00C040""G c #008000""R c #800000""H c #0000AA""I c #00AA00""C c #55FFFF""K c #AAAAAA""r c red""g c green""b c blue""c c cyan""m c magenta""y c #FFFF00""x c black""_ c #FFFFFF""V c #000502"": c #010001""@ c #090909""2 c #000002""3 c #000003""4 c #000004""HHHVahtdegggggggyrggggggc""IHH3aixuEFbGGbggbryAEGRgc""CCH:afyurbgbgggggggb____o""ICH2akmyyyyyyyyyyyyyyyyye""I__:almyyyyyyyyyyyyyyyyye""K__4anmyyyyyyyyyyyyyy_y_e""HH_:aqggyyyyyyyyg____m_Ce""CH_@axxxxxxxxxxxxxxxxxxxx""K___aaaam___bbbbbBm_bbBab""K___________bbbbb___bbxbb";//"
typedef int known,macro;int x=!  '(',y[60];macro m(){0;}int f(int a,...){y[x=0]=x=72;printf("\x25i",!m?195:!a?124+x:sizeof' '-1? (1&*z (N)?234:"\??-"[1]?218:67^*u""):*u""?37:z (0'0  0'0 )[7]?75:"\??-"[1]?77+a/2:77);}__attribute__((weak))int main(){known y;int i;f(x,x=sizeof y);x=1;return 0;}__attribute__((destructor))int g(){x?0:puts("198");}//())*/
#1""/*/
<<<<<<<<<<WQTkTTX
 
 
>import Prelude;import GHC.IO;import Data.Functor.Const;import Data.String;import Text.Heredoc;import Control.Exception;import Language.Haskell.TH;import Text.Show.Functions;instance Monoid a=>Monad (Const a)where _>>=_=mempty
>instance K Float;instance IsString Integer where{fromString _=0};b=x#x
>i_= -1`mod`2+c;data B=B Int;_=B b;e=error"#";f?n=  unsafePerformIO$ catch (f e)$ \ErrorCall{}->r n;instance Num(a->b);instance Num();instance Show(Q a)where{show _=""};f= (^);q _=r$ (d.B)?4;d(B _)=r$0`f`f 2 64;class(Show a,Floating a)=>K a where{k::a->String;k _=show$ (id::a->a)pi};c=l (- x )`mod`4;g=[here|here<-""]--[|]
>--W
>x=0;y#a=subtract 0b1206;x#a=174;h a=a^x;r=pure;l a=length$ show a;forall=0;z|(∀)<-5=forall;b1206|let _._=x;negate _=3=206+[40,58,0,57,55,26,16,3,4,-78,0,1,8,5,6,12-1]!!(l("  ",0x0.1,1e1,(0`id`),k(0::Float ),toEnum 0::Num a=>Enum a=>a )+2*l  (do a<-Const[1];pure a,h pi,h(0::Real a=>a))- 3*(l$(pure$TupE[]::ExpQ))-(-q?6+70+z));(!)=seq
>;
>main|let p!_=0=print$ sum[last$ 172:[[b,0,170,303]!!i_|g<">"],0!61]--} 
 
#1 ""/*/
#if!1
#endif//*
/*/
#if!1
p_;
select 192;
.exit
382-9/5*50
quit
#endif
p=sizeof("   (\");print'(''72'')';end !" );main(){puts('??-'&1?"101":"92" );return 0;}
#if 0
#endif//*
#}
disp 49
#{
}{}<>
 /._++.._# !._++.-.>@
#:  /
 \?     -/!  +++++++++++++++++++++++++++++++++++++++++++++++++<>^+++++<\>+++.-.
rebol[ ]prin either Value? 'disarm[223][270];red[ ]prin 221;  + #.---.>/
#s{  /<+>/   K yya+-        &  g+$
endif#                A=AgRA;       AC
# {\
""";'"#{'#'}'}'
#@[[[["272"?]] #]]******<
#<<<##>␍'@#'''
#ce:  ~#class C{function:Main(a:String[])~Nil{83->Print();}}#$/
#endcomment K`250
#nocomment outtext("155" )
#/`psZ283MIOnDrFe @,,,"284_"># 01-:2/_;:@,,,"285"_!k1"923"3k,# @#_+1y2"982"2k,# @#;# k-'1:,,@_  pS9^7^8^MUOUOF
#\!|!o51   ;        ~nJQ  p'34'  \=#x=4;print(1>>-1<2 ? 17 : Inf16-0|>sizeof>2 ? 162 : √4x<8 ? 201 : 225+2>>1*2 )#p⟫try {EVAL 'say 「27」;exit'};say 237#⟫say 167#{{p{{}}}}say 235#]#print(47)#]#echo 21#>/123nnn; :/aa*7+42@n;/#print(171)#s-#print 175#s|#print(208)#sCOMMENTprint("65" )#ERi521@<[[["172"?]]]]* * * * * *<es9#
#8M`|  <esc>dggi2<esc>// :~- <~-< ~-<<<~-! `=> #
#1//  >>END-IF*>>>9#
# '>+/*' 25  >[};]+ pppppeee^ee*n\               \! 99              \*n*n*e*s*s*s*ee*n*n*n*e*sss*e*n*n*n*ee*js"(*)//dd"      <e 5>1  */// \)∙226p|_|_X222999612#

Try it online!diff

bc has # line comments, /**/ block comments, multiline "" strings without escapes, no '' strings, quit/halt to exit.

To hide Joy's quit from bc I use ``\/*. This doesn't break Joy somehow. ` fixes Retina1, doubled for Pip, \ fixes Thutu.

Main code:

*/
#1""/*
333
quit
\$\endgroup\$
4
\$\begingroup\$

330. Windows Batch, 14825 bytes

# 6 "($11k_rv+'50;+'51;5 5 %$\--$[0=@$a a tqx\" a/4*DvehfbIg/\"" 3 4//*'F*Pi26^qx}318qkp16[.qx]"8=,k]x PPX~_~)"xvy"\(   #  CO|"14"   #:9 {?63#k9 #          z      2222222222222222222222222                "'" #\\
# 1"7"//['][']     ````      [>.>.?]~~)[ aatxy \#184  O@     <!--    (22)Siii/ \psddpsdoh ]##### #######++(- #### ##-[######;mxf ####xAegguEay######i#u####Ft#######MZWWW####WWWWWW zR###### # ####&:#######:_a5# 202ø!},{P_<Ám/e!<ÁmOe!<É}M<ÁmS15%!!%BB44,222%!!%BBPZPYAAA4D,5P[5?4-0!<½!!22<2/!]ss1]'[kkX"204".â'_PPQss>3Ā~>1Ā~>7Ā~v 7 999993 1 7 3 1 8 1 1 55 k zzzzkf kf k zzzzzd kf k zzzzza kf bfz #z#1111#y#y#y#_#         ! 1>?7ДOq#t#>2/Wr#t#t#q#68#r#t#t#68#q#63#r#t#t#6v#>#</Wr#6}#y/===Wr#7ЯOq#>J7Д/Wr#y<Wr#>5/Wr#t#t#6y#>-=/Wr#6|#>6/Wr122! 1退           coding=utf8         @ [[[["472"?]]]]******<
# if-0//      n&goto e 18&1&  nthteo nthieo nthneo an-;et R[+++]._----.^    /112\11  ##### #######   # #    #####  #   #   #    ##### ####  ###   #### # W#W#####WW#WWWW#####W####WW###WWW####W#WW#W#####WW#WWWW#WWWWWWWWWWWWWWWWWWWW;WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWR
#6!@eD>>if 3>3*>++++++!\::    @ / 78"oo@"  , '\"' ` L       >"082",,,@_    x-----x########    ## ### ###### ######## #### ##### ####### ##### ###    # # #### ### ##### ####### ##### ###    # # #### ### ##### #EEEEEδΘΔΔΔΘΔΘλ
# endif/*   v 1 >>>>>>> >>">r"{\>>>>  @ 0:8:8/_}\(* [>]R 10G|'53'S         \)      # ##########>>###>##>#####>>##>####>##>#>#####>>##>#####>####>>>#####>##>#>##>>##>####>>##>#####>####>>>#####>##>#>##  ## ####
#comment -[v>]-main=-[165]-   ### >>>>>>>>9 [@,,,"279"]>252O>"01",,@_  h$s o# 326  #????!?!??!??!!!!???!?!??!!?   !?!!!!!?!!!!?????!????????????????????! >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>   :1*23/5%6E2
#[[/]e] x  > >>>>>>>@!:!8:6:2/_ >>>>>>>>>>>>>>>>>>>>>>>>>> ;>>>>>>>>>>>>>>>>> eeePs#[email protected]<uaxayatbubxbtcuc11
#~[! R++++++] +++++++++\++++++++++++++++++++++++++++++++++U.._+++++++._+++o+++o--ox#
####################################################################################>121 *1220*1211k*1220 2 2 2 11
 #{{{{]~*[~* -[>+<-----]>-._+++++._+._@]+-}}[._+;;+;;+;;+<>;;+;;+;;+;;;;;;+;;+;;.._]}++<^>--[^>[+[>+^-----]>.-._+++._>]<[+[>+<-----]>--._++++._+++._'4o'6o@<] ]+-+<[<=oC<=oC<._>>>>-]^>[<-[>+<-----]>-@@+.---@._+>$]  )++$--![+++[>+++++++<-]>+._+++++.._>](  <<>> }<}>}[<}}<<}<<<<<}<<}<<<<}<<<}}}<}}<}}<}}<}}<}}<}}}<}}<<<<<<<<<<<}}}<}}<}}<}}<}}<}}<}}}<<<<<<<<<<}] [328]  >>\[/>\/\>>>>>>>]>\[./>>\/\./\/>>>\./]  [[[
#-  e:
#* *#p 173#*
#`⟪`⟪\⟫9999 9 9
#/*9 999 99 9999   Mn MMMMMMMnnMnnnMnMMMMMMMnMMnnnnnMM>nMnMnnMnMnnnnnnM //`. :-write(186). end_of_file. `M  @,,, "286"_+1y2 #<"67",,@␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋'''␌`297'print quit`sMMMMMMMMnnMnMnnnM n M M M M'''␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␌␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋
#|9  
#cs 9 9999
#<<<#-->
#><meta http-equiV=X-UA-Compatible content=IE=99><!-- e$P+++++*D*+++1++1E!sss
#   
#{  
#bqbqbqLzLzLzqtqtqtTcTcTcRqRqRq TzTzTzRtRtRt MbMbMbPsPsPsTqTqTqAbAbAbTmTmTmBqBqBqMtMtMtUgUgUg
#= $1$10l0c01b1b0l0i 0r 0h0h1d1 1_1 0e 0y0y 0mo1d0y0e0e001d0i0f 0g 0n0n1 10mo0n0t 0t0mo0f0t0g0g0f0h0r0r0i0001b10c 0c0l1111000001_1 100|_\
[ ' "`e```.1.0.6i]56pq["]298 .quit._[`\']put 294 bye!\` #s['];#/\\/;print 24;exit}}__END__/
###\MoOMoOMoOMoOMOOmoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOmOoMOomoomoOOOM e>+@+-@@@@=>+<@@@=>+<?#>;?\:-._++._++++._#/<?\>3-++._6+---2._#/++++++++++++++++++++++++++++++++++++++++++++++++._++._++++++.>!\
'W(WWw;WW;WW;wv;w;;WW;wW;WW;wv;wW;W_;Ww;WW;WW;WW;WW;wW;WW;Ww;W;WW;WWWWwW;;;WWWWWWWwwwwvwWWWwWWWWwvwWWwW\WWwvwWWwWWWwvwW/Ww\WWW ho ho ho ho // ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi MU ) ([])({}<(((((()()())){}{})){}{})>)(({})){}{(<(<()>)({})({}<{}>({}){})>){({}[()])}}({}){}({}()<()()()>) (<><()>){({}[()])}{  #(((()()()()())()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())) ((((((((\'; a=$(printf \\x00);b=$(echo -n $a|wc -c);case $b[1]¢ in 1?)echo 54;;1* )echo 242;;4* )echo 78;;8* )echo $((9999999999999999999>0?166:244));;0?1??)echo 50;;0* )echo 282;;* )echo 58;;esac;exit;#{IO.puts 295#';  print (0and eval('":"&&(defined?A)&&290||(defined?pp)&&190||(defined?__dir__)&&13||"_"[0]==95&&108||109+1')or(None and(-1 %2>0and 9or 247)or 1/2and eval('hasattr(zip,"iters")and 200or\'𒁁\'=="-"and 241or 1')or 5<<64>>64or 68));"${print(g+91)}$/";exit; "$'#{print(187);exit}'$/"; #< ?>wWWsssss {}#(prin 45)(bye){{{}#}#}#(prin 199)(bye)) 46(8+9+9+9+9+=!) >* * * * *[[[[3+4*7*@] ] ] ]xxxxxxxxxxxxxxxxxxxxxx
###;{e=1}={e:null};console.log e&&39||180;\
__DATA__="""  
#"  \
__END__
set pr'[puts 59][exit]\'':;@echo 185 #';set pr'-';pr 89;exit
ifdef ss 
1     ! !
2   !    !
9      !!
2#
#  
#  
#dddd d b ggggg g iii i llllll l dddd ddddd cc ggggg g ooooooo dddd d ooooooo iii iiiii ooooooo eeeeeeeeee
#PLACET,2<- #2FAC,2SUB#1<- #52FAC,2SUB#2<- #32FACREADOUT,2PLEASEGIVEUPFACs wwwwwwwwwwwWWWwWWWWWwWWWWWWWwWWWWWWWWWwWWWWWWWWWWWWWWWwWWWWWWWWWWWWw W
jrzaeeaeuee_wuuwq jii_iullluiiiogr se_eeepaeeeeeeeeee;eeecisajjarpppppp ⠆⠄⡒⡆⡘😆😨😒😨💬95💬👥➡😻😹😸🙀🙀😹😼😿🙀🙀😼😼😸🙀🙀🙀🙀
👋🔢🌚🌝🌝🌚🌚🌚🌚🌚🐸🐸🐸🐸🐸🐸😂😂😂😂😂😂😂🌚🔥😂😂😂😂😂😂😂💯💩🐸🔥😂💞💩💞😂😂😂😂💞🔥🌚▲▲▲²²²²▲¡▼¡▲▲¡⎚¿⁵228¦ₔ₁₉₃2♦10♦10♦10♥☰䷩䷏䷏䷨䷏䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩⚎ֱֲֵֶֶֶֶַַַָָ  
밠밠따빠빠맣박다맣받다맣희맣희吾有一數曰二百八十一書之うんたんたんたんたんうんうんうんうんうんたんうんうんうんたんうんたんたんうんたんたんうんたんたんうんたんたんうんたんたんたんたんたんうんうんうんうんたんたんうんたんたんたんうんうんうんたんうんうんたんうんうんたんうんうんたんうんたんうんうんうんたんたんうんたんたんうんたんたんうんたんたんうんたんたんたんうんうん  
😊♈💖  ↨↑1↑↑↑↑↑↑↑↑↨21↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑2↨↑1↑↑↑↨↨0↑0↕→
😇♈♈  
😊♉♈  
😇♈♈  
😇♈♉  
😇♈💜  
😊♉♈  
😊📢♈  #e:>*****[[[[828+*+@+*99] ] ] ]*****<
😈♈💜  
😊📢♈  
😇♉💞  
😊📢♉🐸⠀⢃⠛⠋  
#-49,A,-1                              #
#-5,A,-1                               #
#6,A,-1                                #
#X  
#+------+XX   X       XXX
_|/0110@| X X  XXXXXXXXX X
_|/00011| X X   XXXXXXX
_|/1001 | X
_|/1001 | 
_|/1000 | 
_|/$001 | 
#+------+  
#+    +
1   *xxxxxxx
53 x+       x x     xxx
1  x*  xxxx  xx   xx x  x
x  x  x  x  x x  x  x  xx
 +xx xxxxxxx +x xxxxxxx  xxxx
x  x   x      x   x
51  +xx        xxx
#  
1   *     x``   x  x
49 #+  xx+x=>+  x+x + x B+ ===+
#  =x x  x===  x x >8 xxx +++= +
#+  +x + x,_8=>+ xB  x+x
# =+R _*=x==  x +===+> x x    +
 x +R"12"+8=Dx B=xD +  + xxx+
#+ ``=>8=x>  x+~ x  x +x+B+
#  +====+x>~+B+= x x + x
#D~+x 8=++>8x +=   x+    +,_   +
15 + x   x  + +  xx   +  ?   ?@  %"18"_     !
1  + x   + x ++  xx   + ?@    ?
1 \+* x    +  +  x    +   +   *
1   ! x  +x   +       + ?  !  ?
1    ! x xx --... ...--  ? @ ?
x +   ++ xx  ++ ++     +
 +xxxxx  +     +
  
#= +
+ *   +
#= + *
#=**************************************************+
  +  +$$$
#>"3"O._   +// rk:start | print: "69" rk:end       +
   + ; + *
$'main' *****+ %++ %++ @@* %-- @@* %++ %++ @@*
 -+3o4o#  +
  <++"269">o+
^* *
 #+*****|
.x= #   +
,,  .=#
 #+ OOO       =#
 #^=
+`` 231 =#
#  #uuu#
,,..,.,,,,..,.,.,,..,,.,,,...,,.,,..,,,,,,..,,,.$
  
write 224;bye; 
  
 console.log 178;
  
~~~x  
main:Int  
main =248 
~~~  
literally, print 249
(print 164  (exit    ) )
 ( *)
begin write         ('288'    )end.(*)
print 61
  
#<<<##>  
         print(85)
#<<<##>CO COMMENTp]] 
execute_process(COMMAND echo 296)#[[
  
T:251  
E:0  
#+IDRIS: main:IO      (    );main=print 291
#ppW<#require"stdio"Stdio:write     (293  )#>
#ceppp  ;  ;   ; ;
MsgBox (0,"",169   )
#cs  
You can see an x here.<<  
  
>{-<<<<<  
> 176
>> Output 1
>SET x TO 120.
>X x.   ;-}
>l=length$show"\0";main=print$[0,0,0,233,0,146,157]!!l{-
  
\begin{code}  
{- ;  ␉␉␉␉ 
␉
 ␉  



-}
open import IO;main = run (putStr"159" )
\end{code}
ppppppppppppp;p
# {{{ {{{ {{{ {{
#!ZZt >>END-IF
#xxxh  program-id.h.procedure
#xxxg  diVision.display 230.
#}}}f >>IF 2>2
#}}}e
#xxxd
#xx}c
#}}}b
#x}xa
#n::=~147
42::~322
::=
#^^aa>>[0]{472454523665721469465830106052219449897} ()
#aa->=323
:e
echo 330
exit




































































































































































































































































































#-->
<p>301</p>
<a>304</a>
<b>305</b>
<i>309</i>
<u>310</u>
 
<script type="text/tiscript">self.html="<p>302"</script><script> onload=function(){
d=document
d.body.style.color='000'
d.body.innerHTML=[ ].pop ?
257+[10,,,0,,,18,2,d.clear?5:58,d.compatible?50:window.XMLHttpRequest?49:d.nodeType?8:55][[""+[].pop][0].length-!!d.head-!d.fonts-28]:d.dir==''?312-1:308
}</script>

<style>
head+body,text{display:none}
:,a,i{color:fff}*{+color:fff}
a{-color:000}-a,b{color:000;-color:fff}
: u,-i{color:000}
:after{content:"258";[;content:"276";]}
@media all\0{
:after{content:"260";color:#fff\ 
}:root:before{content:"316";color:fff}
:before{content:"314"}}
@media \0 all{:after{content:"266"}}
</style>

<attache>Print[194]Exit[]</attache>
 
22-23-31-13-13-31-13-13-31-13-13-31-13-13-31-12-12-23-31-13-13-31-13-13-31-13-13-31-13-13-31-21-22-21-12-32
Take Northern Line to Tooting Bec
Take Northern Line to Charing Cross
Take Northern Line to Charing Cross
Take Northern Line to Bank
Take District Line to Hammersmith
Take District Line to Upminster
Take District Line to Hammersmith
Take District Line to Upminster
Take District Line to Embankment
Take Bakerloo Line to Embankment
7 UP
Take Northern Line to Mornington Crescent
7 RIGHT
7 RIGHT
7 TEACH
6 BOND
6 BOND
6 BOND
5 RIGHT
5 LEFT
5 RIGHT
7 BOND
7 TEACH
5 TEACH
6 YELL
5 TEACH
6 YELL
6 YELL
4OURfuorfuor
FOU4
FOU4
FOU4fuor
FOU4four
4444fuor
FOU4
FOU4four
4444
4OUR
4OUR
4444
 ; ;
set ! 57
set ! 51
out &49 &1
out &56 &1
out &50 &1
When this program starts:
There is a scribe called x
x is to write 179

p now 70 dollar off!
p has been selling out worldwide!
More 91 of this
How much is it
red down one blue up red down one blue up red up one red right two blue up
baa baaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa bleeeeeeeeeeeeet bleeeeeeeeeeeeet bleeeeeeeeeet baaaa bleet bleeeeeeeeeet bleeet bleeeeeeeeeet
#
ata#8;&&1Prers>0::ge>Ex Cr Uithary,85".c"F ._#gi[s]pogr33461*  prstd!\0k:4op>asequ+4[]!!tfc;[ ]5:ore>8?4C05r"93"$/""Ha在uR 
 
*/
 
#1""
#if!1
.int 2298589328,898451655,12,178790,1018168591,84934449,12597
#endif//*
#1""//*:
#include<stdio.h>
#define z(a) #a
#define u "e"//"
const char*i="25 10 37 1""a c #FFC0FF""B c #0000C0""d c #58007B""e c #0C8302""o c #FF8000""t c #FF00BC""u c #008080""h c #E60001""i c #CAFFFF""f c #280000""k c #CA0000""l c #CA007F""n c #330001""q c #E60000""A c #0040C0""E c #808000""F c #00C040""G c #008000""R c #800000""H c #0000AA""I c #00AA00""C c #55FFFF""K c #AAAAAA""r c red""g c green""b c blue""c c cyan""m c magenta""y c #FFFF00""x c black""_ c #FFFFFF""V c #000502"": c #010001""@ c #090909""2 c #000002""3 c #000003""4 c #000004""HHHVahtdegggggggyrggggggc""IHH3aixuEFbGGbggbryAEGRgc""CCH:afyurbgbgggggggb____o""ICH2akmyyyyyyyyyyyyyyyyye""I__:almyyyyyyyyyyyyyyyyye""K__4anmyyyyyyyyyyyyyy_y_e""HH_:aqggyyyyyyyyg____m_Ce""CH_@axxxxxxxxxxxxxxxxxxxx""K___aaaam___bbbbbBm_bbBab""K___________bbbbb___bbxbb";//"
typedef int known,macro;int x=!  '(',y[60];macro m(){0;}int f(int a,...){y[x=0]=x=72;printf("\x25i",!m?195:!a?124+x:sizeof' '-1? (1&*z (N)?234:"\??-"[1]?218:67^*u""):*u""?37:z (0'0  0'0 )[7]?75:"\??-"[1]?77+a/2:77);}__attribute__((weak))int main(){known y;int i;f(x,x=sizeof y);x=1;return 0;}__attribute__((destructor))int g(){x?0:puts("198");}//())*/
#1""/*/
<<<<<<<<<<WQTkTTX
 
 
>import Prelude;import GHC.IO;import Data.Functor.Const;import Data.String;import Text.Heredoc;import Control.Exception;import Language.Haskell.TH;import Text.Show.Functions;instance Monoid a=>Monad (Const a)where _>>=_=mempty
>instance K Float;instance IsString Integer where{fromString _=0};b=x#x
>i_= -1`mod`2+c;data B=B Int;_=B b;e=error"#";f?n=  unsafePerformIO$ catch (f e)$ \ErrorCall{}->r n;instance Num(a->b);instance Num();instance Show(Q a)where{show _=""};f= (^);q _=r$ (d.B)?4;d(B _)=r$0`f`f 2 64;class(Show a,Floating a)=>K a where{k::a->String;k _=show$ (id::a->a)pi};c=l (- x )`mod`4;g=[here|here<-""]--[|]
>--W
>x=0;y#a=subtract 0b1206;x#a=174;h a=a^x;r=pure;l a=length$ show a;forall=0;z|(∀)<-5=forall;b1206|let _._=x;negate _=3=206+[40,58,0,57,55,26,16,3,4,-78,0,1,8,5,6,12-1]!!(l("  ",0x0.1,1e1,(0`id`),k(0::Float ),toEnum 0::Num a=>Enum a=>a )+2*l  (do a<-Const[1];pure a,h pi,h(0::Real a=>a))- 3*(l$(pure$TupE[]::ExpQ))-(-q?6+70+z));(!)=seq
>;
>main|let p!_=0=print$ sum[last$ 172:[[b,0,170,303]!!i_|g<">"],0!61]--} 
 
#1 ""/*/
#if!1
#endif//*
/*/
#if!1
_;
select 192;
.exit
print1(292)
quit
#endif
p=sizeof("   (\");print'(''72'')';end !" );main(){puts('??-'&1?"101":"92" );return 0;}
#if 0
#endif//*
#}
disp 49
#{
}{}<>
 /._++.._# !._++.-.>@
#:  /
 \?     -/!  +++++++++++++++++++++++++++++++++++++++++++++++++<>^+++++<\>+++.-.
rebol[ ]prin either Value? 'disarm[223][270];red[ ]prin 221;  + #.---.>/
#s{  /<+>/   K yya+-        &  g+$
endif#                A=AgRA;       AC
# {\
""";'"#{'#'}'}'
#@[[[["272"?]] #]]******<
#<<<#
#ce:  ~#class C{function:Main(a:String[])~Nil{83->Print();}}#$/
#endcomment;K`250
#nocomment outtext("155" )
#/`psZ283MIOnDrFe @,,,"284_"># 01-:2/_;:@,,,"285"_!k1"923"3k,# @#_+1y2"982"2k,# @#;# k-'1:,,@_  pS9^7^8^MUOUOF
#\!|!o51   ;        ~nJQ  p'34'  \=#x=4;print(1>>-1<2 ? 17 : Inf16-0|>sizeof>2 ? 162 : √4x<8 ? 201 : 225+2>>1*2 )#p⟫try {EVAL 'say 「27」;exit'};say 237#⟫say 167#{{p{{}}}}say 235#]#print(47)#]#echo 21#>/123nnn; :/aa*7+42@n;/#print(171)#s-#print 175#s|#print(208)#sCOMMENTprint("65" )#ERi521@<[[["172"?]]]]* * * * * *<es9#
#8M`|  <esc>dggi2<esc>// :~- <~-< ~-<<<~-! `=> #
#1//  >>END-IF*>>>9#
# '>+/*' 25  >[};]+ pppppeee^ee*n\               \! 99              \*n*n*e*s*s*s*ee*n*n*n*e*sss*e*n*n*n*ee*js"(*)//dd"      <e 5>1  */// \)∙226p|_|_X222999612#

Try it online!diff

I tested it on Windows 10 64-bit.
Command line: cmd /q /c polyglot.bat 2> nul

& separates several commands on a single line, like ; in bash.
: at the start of a line creates a label.
&: causes cmd.exe to ignore the rest of the line, I use it on line 2 to fix fatal error.
goto label is used to skip lines until main code, see line 3: n&goto e (n and e are for ETA).

Main code:

:e
echo 330
exit
\$\endgroup\$
4
\$\begingroup\$

327. Poetic, 14787 bytes

# 6 "($11k_rv+'50;+'51;5 5 %$\--$[0=@$a a tqx\" a/4*DvehfbIg/\"" 3 4//*'F*Pi26^qx}318qkp16[.qx]"8=,k]x PPX~_~)"xvy"\(   #  CO|"14"   #:9 {?63#k9 #          z      2222222222222222222222222                "'" #\\
# 1"7"//['][']     ````      [>.>.?]~~)[ aatxy \#184  O@    <!--     (22)Siii/ \psddpsdoh ]##### #######++(- #### ##-[######;mxf ####xAegguEay######i#u####Ft#######MZWWW####WWWWWW zR###### # ####  #######:_a5# 202ø!},{P_<Ám/e!<ÁmOe!<É}M<ÁmS15%!!%BB44,222%!!%BBPZPYAAA4D,5P[5?4-0!<½!!22<2/!]ss1]'[kkX"204".â'_PPQss>3Ā~>1Ā~>7Ā~v 7 999993 1 7 3 1 8 1 1 55 k zzzzkf kf k zzzzzd kf k zzzzza kf bfz #z#1111#y#y#y#_#         ! 1>?7ДOq#t#>2/Wr#t#t#q#68#r#t#t#68#q#63#r#t#t#6v#>#</Wr#6}#y/===Wr#7ЯOq#>J7Д/Wr#y<Wr#>5/Wr#t#t#6y#>-=/Wr#6|#>6/Wr122! 1退           coding=utf8         @ [[[["472"?]]]]******<
# if-0//     x x x x x 18&1&  nthteo nthieo nthneo an-;et R[+++]._----.^    /112\11  ##### #######   # #    #####  #   #   #    ##### ####  ###   #### # W#W#####WW#WWWW#####W####WW###WWW####W#WW#W#####WW#WWWW#WWWWWWWWWWWWWWWWWWWW;WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWR
#6!@eD>>if 3>3*>++++++!\::    @ / 78"oo@"  , '\"' ` L       >"082",,,@_    x-----x########    ## ### ###### ######## #### ##### ####### ##### ###    # # #### ### ##### ####### ##### ###    # # #### ### ##### #EEEEEδΘΔΔΔΘΔΘλ
# endif/*   v 1 >>>>>>> >>">r"{\>>>>  @ 0:8:8/_}\(* [>]R 10G|'53'S         \)      # ##########>>###>##>#####>>##>####>##>#>#####>>##>#####>####>>>#####>##>#>##>>##>####>>##>#####>####>>>#####>##>#>##  ## ####
#comment -[v>]-main=-[165]-   ### >>>>>>>>9 [@,,,"279"]>252O>"01",,@_  h$s o# 326  #????!?!??!??!!!!???!?!??!!?   !?!!!!!?!!!!?????!????????????????????! >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>   :1*23/5%6E2
#[[/]e] x  > >>>>>>>@!:!8:6:2/_ >>>>>>>>>>>>>>>>>>>>>>>>>> ;>>>>>>>>>>>>>>>>> eeePs#[email protected]<uaxayatbubxbtcuc11
#~[! R++++++] +++++++++\++++++++++++++++++++++++++++++++++U.._+++++++._+++o+++o--ox#
####################################################################################>121 *1220*1211k*1220 2 2 2 11
 #{{{{]~*[~* -[>+<-----]>-._+++++._+._@]+-}}[._+;;+;;+;;+<>;;+;;+;;+;;;;;;+;;+;;.._]}++<^>--[^>[+[>+^-----]>.-._+++._>]<[+[>+<-----]>--._++++._+++._<]'4o'6o@ ]+-+<[<=oC<=oC<._>>>>-]^>[<-[>+<-----]>-@@+.---@._+>$]  )++$--![+++[>+++++++<-]>+._+++++.._>](  <<>> }<}>}[<}}<<}<<<<<}<<}<<<<}<<<}}}<}}<}}<}}<}}<}}<}}}<}}<<<<<<<<<<<}}}<}}<}}<}}<}}<}}<}}}<<<<<<<<<<}]  >>\[/>\/\>>>>>>>]>\[./>>\/\./\/>>>\./]  [[[
#-  e:
#* *#p 173#*
#`⟪`⟪\⟫9999 9 9
#/*9 999 99 9999  nMn MMMMMMMnnMnnnMnMMMMMMMnMMnnnnnMM>nMnMnnMnMnnnnnnM //`. :-write(186). end_of_file. `M  @,,, "286"_+1y2 #<"67",,@␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋'''␌`297'print quit`sMMMMMMMMnnMnMnnnMnM M M M'''␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␌␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋
#|9  
#cs 9 9999
#<<<#-->
#><meta http-equiV=X-UA-Compatible content=IE=99><!-- e$P+++++*D*+++1++1E!sss
#   
#{  
#bqbqbqLzLzLzqtqtqtTcTcTcRqRqRq TzTzTzRtRtRt MbMbMbPsPsPsTqTqTqAbAbAbTmTmTmBqBqBqMtMtMtUgUgUg
#= $1$10l0c01b1b0l0i 0r 0h0h1d1 1_1 0e 0y0y 0mo1d0y0e0e001d0i0f 0g 0n0n1 10mo0n0t 0t0mo0f0t0g0g0f0h0r0r0i0001b10c 0c0l1111000001_1 100|_\
[ ' "`e```.1.0.6i]56pq["]298 .quit._[`\']put 294 bye!\` #s['];#/\\/;print 24;exit}}__END__/
###\MoOMoOMoOMoOMOOmoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOmOoMOomoomoOOOM e>+@+-@@@@=>+<@@@=>+<?#>;?\:-._++._++++._#/<?\>3-++._6+---2._#/++++++++++++++++++++++++++++++++++++++++++++++++._++._++++++.>!\
'W(WWw;WW;WW;wv;w;;WW;wW;WW;wv;wW;W_;Ww;WW;WW;WW;WW;wW;WW;Ww;W;WW;WWWWwW;;;WWWWWWWwwwwvwWWWwWWWWwvwWWwW\WWwvwWWwWWWwvwW/Ww\WWW ho ho ho ho // ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi MU ) ([])({}<(((((()()())){}{})){}{})>)(({})){}{(<(<()>)({})({}<{}>({}){})>){({}[()])}}({}){}({}()<()()()>) (<><()>){({}[()])}{  #(((()()()()())()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())) ((((((((\'; a=$(printf \\x00);b=$(echo -n $a|wc -c);case $b[1]¢ in 1?)echo 54;;1* )echo 242;;4* )echo 78;;8* )echo $((9999999999999999999>0?166:244));;0?1??)echo 50;;0* )echo 282;;* )echo 58;;esac;exit;#{IO.puts 295#';  print (0and eval('":"&&(defined?A)&&290||(defined?pp)&&190||(defined?__dir__)&&13||"_"[0]==95&&108||109+1')or(None and(-1 %2>0and 9or 247)or 1/2and eval('hasattr(zip,"iters")and 200or\'𒁁\'=="-"and 241or 1')or 5<<64>>64or 68));"${print(g+91)}$/";exit; "$'#{print(187);exit}'$/"; #< ?>wWWsssss {}#(prin 45)(bye){{{}#}#}#(prin 199)(bye)) 46(8+9+9+9+9+=!) >* * * * *[[[[3+4*7*@] ] ] ]xxxxxxxxxxxxxxxxxxxxxx
###;{e=1}={e:null};console.log e&&39||180;\
__DATA__="""  
#"  \
__END__
set pr'[puts 59][exit]\'':;@echo 185 #';set pr'-';pr 89;exit
ifdef ss 
1     ! !
2   !    !
9      !!
2#
#  
#  
#dddd d b ggggg g iii i llllll l dddd ddddd cc ggggg g ooooooo dddd d ooooooo iii iiiii ooooooo eeeeeeeeee
#PLACET,2<- #2FAC,2SUB#1<- #52FAC,2SUB#2<- #32FACREADOUT,2PLEASEGIVEUPFACs wwwwwwwwwwwWWWwWWWWWwWWWWWWWwWWWWWWWWWwWWWWWWWWWWWWWWWwWWWWWWWWWWWWw W
jrzaeeaeuee_wuuwq jii_iullluiiiogr se_eeepaeeeeeeeeee;eeecisajjarpppppp ⠆⠄⡒⡆⡘😆😨😒😨💬95💬👥➡😻😹😸🙀🙀😹😼😿🙀🙀😼😼😸🙀🙀🙀🙀
👋🔢🌚🌝🌝🌚🌚🌚🌚🌚🐸🐸🐸🐸🐸🐸😂😂😂😂😂😂😂🌚🔥😂😂😂😂😂😂😂💯💩🐸🔥😂💞💩💞😂😂😂😂💞🔥🌚▲▲▲²²²²▲¡▼¡▲▲¡⎚¿⁵228¦ₔ₁₉₃2♦10♦10♦10♥☰䷩䷏䷏䷨䷏䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩⚎ֱֲֵֶֶֶֶַַַָָ  
밠밠따빠빠맣박다맣받다맣희맣희吾有一數曰二百八十一書之うんたんたんたんたんうんうんうんうんうんたんうんうんうんたんうんたんたんうんたんたんうんたんたんうんたんたんうんたんたんたんたんたんうんうんうんうんたんたんうんたんたんたんうんうんうんたんうんうんたんうんうんたんうんうんたんうんたんうんうんうんたんたんうんたんたんうんたんたんうんたんたんうんたんたんたんうんうん  
😊♈💖  ↨↑1↑↑↑↑↑↑↑↑↨21↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑2↨↑1↑↑↑↨↨0↑0↕→
😇♈♈  
😊♉♈  
😇♈♈  
😇♈♉  
😇♈💜  
😊♉♈  
😊📢♈  #e:>*****[[[[828+*+@+*99] ] ] ]*****<
😈♈💜  
😊📢♈  
😇♉💞  
😊📢♉🐸⠀⢃⠛⠋  
#-49,A,-1                              #
#-5,A,-1                               #
#6,A,-1                                #
#X  
#+------+XX   X       XXX
_|/0110@| X X  XXXXXXXXX X
_|/00011| X X   XXXXXXX
_|/1001 | X
_|/1001 | 
_|/1000 | 
_|/$001 | 
#+------+  
#+    +
1   *xxxxxxx
53 x+       x x     xxx
1  x*  xxxx  xx   xx x  x
x  x  x  x  x x  x  x  xx
 +xx xxxxxxx +x xxxxxxx  xxxx
x  x   x      x   x
51  +xx        xxx
#  
1   *     x``   x  x
49 #+  xx+x=>+  x+x + x B+ ===+
#  =x x  x===  x x >8 xxx +++= +
#+  +x + x,_8=>+ xB  x+x
# =+R _*=x==  x +===+> x x    +
 x +R"12"+8=Dx B=xD +  + xxx+
#+ ``=>8=x>  x+~ x  x +x+B+
#  +====+x>~+B+= x x + x
#D~+x 8=++>8x +=   x+    +,_   +
15 + x   x  + +  xx   +  ?   ?@  %"18"_     !
1  + x   + x ++  xx   + ?@    ?
1 \+* x    +  +  x    +   +   *
1   ! x  +x   +       + ?  !  ?
1    ! x xx --... ...--  ? @ ?
x +   ++ xx  ++ ++     +
 +xxxxx  +     +
  
#= +
+ *   +
#= + *
#=**************************************************+
  +  +$$$
#>"3"O._   +// rk:start | print: "69" rk:end       +
   + ; + *
$'main' *****+ %++ %++ @@* %-- @@* %++ %++ @@*
 -+3o4o#  +
  <++"269">o+
^* *
 #+*****|
.x= #   +
,,  .=#
 #+ OOO       =#
 #^=
+`` 231 =#
#  #uuu#
,,..,.,,,,..,.,.,,..,,.,,,...,,.,,..,,,,,,..,,,.$
  
write 224;bye; 
  
 console.log 178;
  
~~~x  
main:Int  
main =248 
~~~  
literally, print 249
(print 164  (exit    ) )
 ( *)
begin write         ('288'    )end.(*)
print 61
  
#<<<##>  
         print(85)
#<<<##>CO COMMENTp]] 
execute_process(COMMAND echo 296)#[[
  
T:251  
E:0  
#+IDRIS: main:IO      (    );main=print 291
#ppW<#require"stdio"Stdio:write     (293  )#>
#ceppp  ;  ;   ; ;
MsgBox (0,"",169   )
#cs  
You can see an x here.<<  
  
>{-<<<<<  
> 176
>> Output 1
>SET x TO 120.
>X x.   ;-}
>l=length$show"\0";main=print$[0,0,0,233,0,146,157]!!l{-
  
\begin{code}  
{- ;  ␉␉␉␉ 
␉
 ␉  



-}
open import IO;main = run (putStr"159" )
\end{code}
ppppppppppppp;p
# {{{ {{{ {{{ {{
#!ZZt >>END-IF
#xxxh  program-id.h.procedure
#xxxg  diVision.display 230.
#}}}f >>IF 2>2
#}}}e
#xxxd
#xx}c
#}}}b
#x}xa
#n::=~147
42::~322
::=
#^^aa>>[0]{472454523665721469465830106052219449897} ()
#aa->=323







































































































































































































































































































#-->
<p>301</p>
<a>304</a>
<b>305</b>
<i>309</i>
<u>310</u>
 
<script type="text/tiscript">self.html="<p>302"</script><script> onload=function(){
d=document
d.body.style.color='000'
d.body.innerHTML=[ ].pop ?
257+[10,,,0,,,18,2,d.clear?5:58,d.compatible?50:window.XMLHttpRequest?49:d.nodeType?8:55][[""+[].pop][0].length-!!d.head-!d.fonts-28]:d.dir==''?312-1:308
}</script>

<style>
head+body,text{display:none}
:,a,i{color:fff}*{+color:fff}
a{-color:000}-a,b{color:000;-color:fff}
: u,-i{color:000}
:after{content:"258";[;content:"276";]}
@media all\0{
:after{content:"260";color:#fff\ 
}:root:before{content:"316";color:fff}
:before{content:"314"}}
@media \0 all{:after{content:"266"}}
</style>

<attache>Print[194]Exit[]</attache>
 
22-23-31-13-13-31-13-13-31-13-13-31-13-13-31-12-12-23-31-13-13-31-13-13-31-13-13-31-13-13-31-21-22-21-12-32
Take Northern Line to Tooting Bec
Take Northern Line to Charing Cross
Take Northern Line to Charing Cross
Take Northern Line to Bank
Take District Line to Hammersmith
Take District Line to Upminster
Take District Line to Hammersmith
Take District Line to Upminster
Take District Line to Embankment
Take Bakerloo Line to Embankment
7 UP
Take Northern Line to Mornington Crescent
7 RIGHT
7 RIGHT
7 TEACH
6 BOND
6 BOND
6 BOND
5 RIGHT
5 LEFT
5 RIGHT
7 BOND
7 TEACH
5 TEACH
6 YELL
5 TEACH
6 YELL
6 YELL
4OURfuorfuor
FOU4
FOU4
FOU4fuor
FOU4four
4444fuor
FOU4
FOU4four
4444
4OUR
4OUR
4444
 ; ;
set ! 57
set ! 51
out &49 &1
out &56 &1
out &50 &1
When this program starts:
There is a scribe called x
x is to write 179

p now 70 dollar off!
p has been selling out worldwide!
More 91 of this
How much is it
red down one blue up red down one blue up red up one red right two blue up
baa baaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa bleeeeeeeeeeeeet bleeeeeeeeeeeeet bleeeeeeeeeet baaaa bleet bleeeeeeeeeet bleeet bleeeeeeeeeet
#
ata#8;&&1Prers>0::ge>Ex Cr Uithary,85".c"F ._#gi[s]pogr3461*  prstd!\0k:4op>asequ+40[]!!tfc;[ ]5:ore>8?4920C05r""Ha在uR 8$/
 
*/
 
#1""
#if!1
.int 2298589328,898451655,12,178790,1018168591,84934449,12597
#endif//*
#1""//*:
#include<stdio.h>
#define z(a) #a
#define u "e"//"
const char* i="25 10 37 1""a c #FFC0FF""B c #0000C0""d c #58007B""e c #0C8302""o c #FF8000""t c #FF00BC""u c #008080""h c #E60001""i c #CAFFFF""f c #280000""k c #CA0000""l c #CA007F""n c #330001""q c #E60000""A c #0040C0""E c #808000""F c #00C040""G c #008000""R c #800000""H c #0000AA""I c #00AA00""C c #55FFFF""K c #AAAAAA""r c red""g c green""b c blue""c c cyan""m c magenta""y c #FFFF00""x c black""_ c #FFFFFF""V c #000502"": c #010001""@ c #090909""2 c #000002""3 c #000003""4 c #000004""HHHVahtdegggggggyrggggggc""IHH3aixuEFbGGbggbryAEGRgc""CCH:afyurbgbgggggggb____o""ICH2akmyyyyyyyyyyyyyyyyye""I__:almyyyyyyyyyyyyyyyyye""K__4anmyyyyyyyyyyyyyy_y_e""HH_:aqggyyyyyyyyg____m_Ce""CH_@axxxxxxxxxxxxxxxxxxxx""K___aaaam___bbbbbBm_bbBab""K___________bbbbb___bbxbb";//"
typedef int known,macro;int x=!  '(',y[60];macro m(){0;}int f(int a,...){y[x=0]=x=72;printf("\x25i",!m?195:!a?124+x:sizeof' '-1? (1&*z (N)?234:"\??-"[1]?218:67^*u""):*u""?37:z (0'0  0'0 )[7]?75:"\??-"[1]?77+a/2:77);}__attribute__((weak))int main(){known y;int i;f(x,x=sizeof y);x=1;return 0;}__attribute__((destructor))int g(){x?0:puts("198");}//())*/
#1""/*/
<<<<<<<<<<WQTkTTX
 
 
>import Prelude;import GHC.IO;import Data.Functor.Const;import Data.String;import Text.Heredoc;import Control.Exception;import Language.Haskell.TH;import Text.Show.Functions;instance Monoid a=>Monad (Const a)where _>>=_=mempty
>instance K Float;instance IsString Integer where{fromString _=0};b=x#x
>i_= -1`mod`2+c;data B=B Int;_=B b;e=error"#";f?n=  unsafePerformIO$ catch (f e)$ \ErrorCall{}->r n;instance Num(a->b);instance Num();instance Show(Q a)where{show _=""};f= (^);q _=r$ (d.B)?4;d(B _)=r$0`f`f 2 64;class(Show a,Floating a)=>K a where{k::a->String;k _=show$ (id::a->a)pi};c=l (- x )`mod`4;g=[here|here<-""]--[|]
>--W
>x=0;y#a=subtract 0b1206;x#a=174;h a=a^x;r=pure;l a=length$ show a;forall=0;z|(∀)<-5=forall;b1206|let _._=x;negate _=3=206+[40,58,0,57,55,26,16,3,4,-78,0,1,8,5,6,12-1]!!(l("  ",0x0.1,1e1,(0`id`),k(0::Float ),toEnum 0::Num a=>Enum a=>a )+2*l  (do a<-Const[1];pure a,h pi,h(0::Real a=>a))- 3*(l$(pure$TupE[]::ExpQ))-(-q?6+70+z));(!)=seq
>;
>main|let p!_=0=print$ sum[last$ 172:[[b,0,170,303]!!i_|g<">"],0!61]--} 
 
#1 ""/*/
#if!1
#endif//*
/*/
#if!1
_;
select 192;
.exit
print1(292)
quit
#endif
p=sizeof("   (\");print'(''72'')';end !" );main(){puts('??-'&1?"101":"92" );return 0;}
#if 0
#endif//*
#}
disp 49
#{
}{}<>
 /._++.._# !._++.-.>@
#:  /
 \?     -/!  +++++++++++++++++++++++++++++++++++++++++++++++++<>^+++++<\>+++.-.
rebol[ ]prin either Value? 'disarm[223][270];red[ ]prin 221;  + #.---.>/
#s{  /<+>/   K yya+-        &  g+$
endif#                A=AgRA;       AC
# {\
""";'"#{'#'}'}'
#@[[[["272"?]] #]]******<
#<<<#
#ce:  ~#class C{function:Main(a:String[])~Nil{83->Print();}}#$/
#endcomment;K`250
#nocomment outtext("155" )
#/`psZ283MIOnDrFe @,,,"284_"># 01-:2/_;:@,,,"285"_+1y2"982"2k,# @#;# k-'1:,,@_ pS9^7^8^MUOUOF
#\!|!o51   ;        ~nJQ  p'34'  \=#x=4;print(1>>-1<2 ? 17 : Inf16-0|>sizeof>2 ? 162 : √4x<8 ? 201 : 225+2>>1*2 )#p⟫try {EVAL 'say 「27」;exit'};say 237#⟫say 167#{{p{{}}}}say 235#]#print(47)#]#echo 21#>/123nnn; :/aa*7+42@n;/#print(171)#s-#print 175#s|#print(208)#sCOMMENTprint("65" )#ERi521@<[[["172"?]]]]* * * * * *<es9#
#8M`|  <esc>dggi2<esc>// :~- <~-< ~-<<<~-! `=> #
#1//  >>END-IF*>>>9#
# '>+/*' 25  >[};]+ pppppeee^ee*n\               \! 99              \*n*n*e*s*s*s*ee*n*n*n*e*sss*e*n*n*n*ee*js"(*)//dd"      <e 5>1  */// \)∙226p|_|_X222999612#

Try it online!diff

I use Python interpreter.

Poetic code is on line 38, it corresponds to brainfuck program -[>+<-----]>.-.+++++.:

-      [ >       +     <        -----      ]  >       .       -      .       +++++     .       exit
dddd d b ggggg g iii i llllll l dddd ddddd cc ggggg g ooooooo dddd d ooooooo iii iiiii ooooooo eeeeeeeeee

aatq on line 1 was changed to a a tqx to open two loops to skip over subsequent instructions (x is for Beatnik). Brian & Chuck ?63 was moved further on the line: {?63#k9 #. { cancels effect of } in B&C, #k9 skips several instructions in Befunge-98, 9 is also for YABALL. Second # reopens string in Turtlèd.

On line 16 nesting level of Poetic loops is about 50. To close all these loops a lot of two-letter words needed. To save bytes I placed Poetic code after line 25 because Moorhens ho ho .. MU closes all these loops for free. To further adjust nesting level I used x x x x x on line 3 and M M M on line 14.

How to keep it working: add/remove spaces between Ms on line 14. Too many spaces: ERROR: Mismatched IF/EIF. Too few spaces: program hangs.

\$\endgroup\$
4
\$\begingroup\$

371. Befunge-98 (Fungi), 16278 bytes

# 6 "($11k_rv+'50;+'51;5 5 %$\--$[0=@$a a tqx\"  /*4DvehfdIg/\"" 3 4//*{{{'F*Pi^5 6-di26qxy}363qx}318qkp16[.qx]"8=,k] PPX~_~)"xvyq"\(2#CO|"14"   #:9 {?63#k9 #  a   k zzzzkf kf k zzzzzd kf k zzzzza kf bfz "'" #\\
# 1"7"//['][']     ````      [>.>.?]~~)[aatxy iiipsddpsdoh (22)S ## &rem      / \     <!--     mxf                  5  xAegguEa>2.8.7.@_;yiuFtMZWWWWWWWWWUUUUUzR           z      ]++(--[                   :_a5# 202ø!},{P_<Ám/e!<ÁmOe!<É}M<ÁmS15%!!%BB44,222%!!%BBPZPYAAA4D,5P[5?4-0!<½!!22<2/!]ss1]'[kkX"204".â'_PPQss>3Ā~>1Ā~>7Ā~v 7 999993 1 7 3 1 8 1 1 55                                         #z#1111#y#y#y#_#        {! 1>?7ДOq#t#>2/Wr#t#t#q#68#r#t#t#68#q#63#r#t#t#6v#>#</Wr#6}#y/===Wr#7ЯOq#>J7Д/Wr#y<Wr#>5/Wr#t#t#6y#>-=/Wr#6|#>6/Wr122! 1退           coding=utf8         @ [[[["472"?]]]]******<
# if-0//        nthteo 18&1& nthieo nthneo anet\#184  O@  R[+++]._----.^    p/112\11&if -%*==-* (echo 335&exit)else goto e&WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWW#WWWWWWWWWWWWWWWWWWWW;WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWR
#6!@`D>>if 3>3*>++++++ \        / 78"oo@" , `'[]'[]`L ;     >"082",,,@_     x-----x        ##### #######     #### ##  ######     ####         ###### # ####  #######     ####         ###### # ####  #######    #EEEEEδΘΔΔΔΘΔΘλ
# endif/*   v 1 >>>>@::c>>">r"{\>>>>> @ 0:8:8/_}\(* [>]R 10G|'53'S   1111  \) >>>>>>>#####>#######>>>#>#>>>>#####>>#>>>#>>>#>>>>#####>####>>###>>>####>#  # #####  #    ##### ####  ###   #### #  # #####  #    #
#comment -[v>]-main=-[165]-   ###>>>>>>>>>9 [@,,,"279"]>252O @_xxxxxxx h$s o# 326 ########>>>>##>###>######>########>####>#####>#######>#####>###>>>>#>#>####>###>#####>#######>#####>###>>>>#>#>####>###>#####>#>>>>>>>>>
#[[/]e]    >>>>>>>> @!:!8:6:2/_>>>>>>>>>>>>>>>>>>>>>>>>>>> ; >>>>>>>>>>>>_>>>>eeePs#v##########  ### ## #####  ## #### ## # #####  ## ##### ####   ##### ## # ##  ## ####  ## ##### ####   ##### ## # ##  ## ####
#e                                    @,,,"361";@,,,"362_ ";># 23-2g_"01",,@_      # ????!?!??!??!!!!???!?!??!!?!?!!!!!?!!!!?????!????????????????????! :1*23/5%6E2 iiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiii            
#11 cbbbzcba aaabaca1tauaxayatbubxbtcuc 11               r3o5o8ox xxxxx .-#351$#&  #
#~[! R++++++] +++++++++\++++++++++++++++++++++++++++++++++U.._+++++++._+++o+++o--ox#
####################################################################################>121 *1220*1211k*1220 2 2 2 11
 #{{{{]~*[~* -[>+<-----]>-._+++++._+._@]+-}}[._+;;+;;+;;+<>;;+;;+;;+;;;;;;+;;+;;.._]}++<^>--[^>[+[>+^-----]>.- ._+++._>]<[+[>+<-----]>--._++++._+++._<] ]+-+<[<=oC<=oC<._>>>>-'4o'6o@]^>[<-[>+<-----]>-@@+.---@._+>$]  )++$--![+++[>+++++++<-]>+._+++++.._>](  {{{ {{{ {{{ {{{ {{{ {{{ {{{ {{{ {{{ {{{ {{{ {{{ {{{ {{{ {{ <<>> }<}>}[<}}<<}<<<<<}<<}<<<<}<<<}}}<}}<}}<}}<}}<}}<}}}<}}<<<<<<<<<<<}}}<}}<}}<}}<}}<}}<}}}<<<<<<<<<<}]  >>\[/>\/\>>>>>>>]>\[./>>\/\./\/>>>\./]  [328][]  [[[[.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.].,][.].,][.][.][.].,]  [[].[[[
#* *#p 173#*
#`⟪`⟪\⟫9999 9 9e:
#{  
#/*9 999 99 9999  nMn MMMMMMMnnMnnnMnMMMMMMMnMMnnnnnMM>nMnMnnMnMnnnn   //`. :-print(186). end_of_file. `MnM             @,,, "286"_+1y2 #<"67",,@_␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋'''␌`297'print quit`sssMMMMMMMMnnMnMnnnMnMMMM''';201-1|>print;exit 0␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␌␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋
#|9 e: 
#cs 9 9999
#<<<#//-->
#><meta http-equiv=X-UA-Compatible content=IE=99><!-- e$P+++++*D*+++1++1E!sss \font\f=cmr12\f352\end
#-bqbqbqLzLzLz TcTcTcRqRqRq TzTzTzRtRtRt MbMbMbTqTqTqAbAbAbTmTmTmBqBqBqMzMzMzUgUgUg\␍331;"${print+191}$x";exit;#?>\␍try:len[id];print(349 )#\␍except:print(f'𒁁'=='-'and 241or 1);'''ssss';@'
#= $1$10l0c01b1b0l0i 0r 0h0h1d1 1_1 0e 0y0y 0mo1d0y0e0e001d0i0f 0g 0n0n1 10mo0n0t_0t0mo0f0t0g0g0f0h0r0r0i0001b10c 0c0l1111000001_1 100|_\
[ ' "`e```.1.0.6i]56pq["``\/*]298 .quit._[`\']"\"put 294 bye!\`""360"print bye! #ss['];#/\\/;print 24;exit}}__END__/
###\MoOMoOMoOMoOMOOmoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOmOoMOomoomoOOOM  e>+@+-@@@@=>+<@@@=>+<?#>;?\:-._++._++++._#/<?\>3-++._6+---2._#/++++++++++++++++++++++++++++++++++++++++++++++++._++._++++++.>!\
'w(WWW;wW;WW;Ww;v;;wW;Ww;WW;Ww;vw;W_;WW;wW;WW;WW;WW;Ww;WW;WW;w;WW;WWWWWw;;;WWWWWWWWwwwwvwWWWwWWWWwvwWWwW\WWwvwWWwWWWwvwW/Ww\WWW ho ho ho ho // ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi MU ) ([])({}<(((((()()())){}{})){}{})>)(({})){}{(<(<()>)({})({}<{}>({}){})>){({}[()])}}({}){}({}()<()()()>) (<><()>){({}[()])}{  #(((()()()()())()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())) ((((((((\'; ";echo 350;exit#"; a=$(printf \\x00);b=$(echo -n $a|wc -c);case $b[1]¢ in 1?)echo 54;;1* )echo 242;;4* )echo 78;;8* )echo $((9999999999999999999>0?166:244));;0?1??)echo 50;;0* )[ ~+ = \~+ ]&&echo 282||echo $((346+010));;* )echo 58;;esac;exit;#{IO.puts 295#';  print (0and eval('":"&&(defined?A)&&290||(defined?pp)&&190||(defined?__dir__)&&13||"_"[0]==95&&108||109+1')or(None and(-1 %2>0and 9or 247)or eval('5<<64>>64or 68'))); [exit];  '"';"#{puts 187;exit}";'"';          # wWWssss {}#(prin 45)(bye){{{}#}#}#r"\"print(355);#{}"(prin 199)(bye)) 46(8+9+9+9+9+=!) >* * * * *[[[[3+4*7*@] ] ] ]sxxxxxxxxxxxxxxxxxxxxx
###;{e=1}={e:null};console.log e&&39||180;\
__DATA__="""  
#"  \
__END__
se pr'[puts 59][exit]:;@echo 185 #';se pr'-';pr 89+1/2*518;exi
ifdef ss 
1     ! !
2   !    !
9      !!
2#
#  
dddd d b ggggg g iii i llllll l dddd ddddd cc ggggg g ooooooo dddd d ooooooo iii iiiii ooooooo eeeeeeeeee
echo 353;exit;'
#PLACET,2<- #2FAC,2SUB#1<- #52FAC,2SUB#2<- #32FACREADOUT,2PLEASEGIVEUPFACs wwwwwwwwwwwWWWwWWWWWwWWWWWWWwWWWWWWWWWwWWWWWWWWWWWWWWWwWWWWWWWWWWWWw W
jrzaeeaeuee_wuuwq jii_iullluiiiogr se_eeepaeeeeeeeeee;eeecisajjarpppppp ⠆⠄⡒⡆⡘😆😨😒😨💬95💬👥➡😻😹😸🙀🙀😹😼😿🙀🙀😼😼😸🙀🙀🙀🙀
👋🔢🌚🌝🌝🌚🌚🌚🌚🌚🐸🐸🐸🐸🐸🐸😂😂😂😂😂😂😂🌚🔥😂😂😂😂😂😂😂💯💩🐸🔥😂💞💩💞😂😂😂😂💞🔥🌚▲▲▲²²²²▲¡▼¡▲▲¡⎚¿⁵228¦ₔ₁₉₃2♦10♦10♦10♥☰䷩䷏䷏䷨䷏䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩⚎ֱֲֵֶֶֶֶַַַָָ  
밠밠따빠빠맣박다맣받다맣희맣희吾有一數曰二百八十一書之うんたんたんたんたんうんうんうんうんうんたんうんうんうんたんうんたんたんうんたんたんうんたんたんうんたんたんうんたんたんたんたんたんうんうんうんうんたんたんうんたんたんたんうんうんうんたんうんうんたんうんうんたんうんうんたんうんたんうんうんうんたんたんうんたんたんうんたんたんうんたんたんうんたんたんたんうんうん  
😊♈💖  ↨↑1↑↑↑↑↑↑↑↑↨21↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑2↨↑1↑↑↑↨↨0↑0↕→
😇♈♈  
😊♉♈  
😇♈♈  
😇♈♉  
😇♈💜  
😊♉♈  
😊📢♈  #e:>*****[[[[828+*+@+*99] ] ] ]*****<
😈♈💜  
😊📢♈  
😇♉💞  
😊📢♉🐸⠀⢃⠛⠋  
#-49,A,-1                              #
#-5,A,-1                               #
#6,A,-1                                #
#X  
#+------+XX   X       XXX
_|/0110@| X X  XXXXXXXXX X
_|/00011| X X   XXXXXXX
_|/1001 | X
_|/1001 | 
_|/1000 | 
_|/$001 | 
#+------+  [``]````
#+    +
1   *xxxxxxx
53 x+       x x     xxx
1  x*  xxxx  xx   xx x  x
x  x  x  x  x x  x  x  xx
 +xx xxxxxxx +x xxxxxxx  xxxx
x  x   x      x   x
51  +xx        xxx
#  
1   *     x``   x  x
49 #+  xx+x=>+  x+x + x B+ ===+
#  =x x  x===  x x >8 xxx +++= +
#+  +x + x,_8=>+ xB  x+x
# =+R _*=x==  x +===+> x x    +
 x +R"12"+8=Dx B=xD +  + xxx+
#+ ``=>8=x>  x+~ x  x +x+B+
#  +====+x>~+B+= x x + x
#D~+x 8=++>8x +=   x+    +,_   +
15 + x   x  + +  xx   +  ?   ?@  %"18"_     !
1  + x   + x ++  xx   + ?@    ?
1 \+* x    +  +  x    +   +   *
1   ! x  +x   +       + ?  !  ?
1    ! x xx --... ...--  ? @ ?
x +   ++ xx  ++ ++     +
 +xxxxx  +     +
  
#= +
+ *   +
#= + *
#=**************************************************+
  +  +$$$
#>"3"O._   +// rk:start | print: "69" rk:end       +
   + ; + *
$'main' *****+ %++ %++ @@* %-- @@* %++ %++ @@*
 -+3o4o#  +
  <++"269">o+
^* *
 #+*****|
.x= #   +
,,  .=#
 #+ OOO       =#
 #^=
+`` 231 =#
#  #uuu#
,,..,.,,,,..,.,.,,..,,.,,,...,,.,,..,,,,,,..,,,.$
  
write 224;bye; 
  
 console.log 178;
  
~~~x  
main:Int  
main =248 
~~~  
literally, print 249
(print 164  (exit    ) )
 ( *)
begin write         ('288'    )end.(*)
print 61
  
#<<<##>  
         print(85)
#<<<##>CO COMMENTp]] 
execute_process(COMMAND echo 296)#[[
  
T:251  
E:0  
#+IDRIS: main:IO      (    );main=print 291
#ppW<#require"stdio"Stdio:write     (293  )#>
#ceppp  ;  ;   ; ;
MsgBox (0,"",169   )
#cs  
You can see an x here.<<  
  
>{-<<<<<  
> 176
>> Output 1
>SET x TO 120.
>X x.   ;-}
>l=length$show"\0";main=print$[0,0,0,233,0,146,157]!!l{-
  
\begin{code}  
{- ;  ␉␉␉␉ 
␉
 ␉  



-}
open import IO;main = run (putStr"159" )
\end{code}
ppppppppppppp;
# {{{ {{{ {{{ {{
#!ZZt >>END-IF
#xxxh  program-id.h.procedure
#xxxg  diVision.display 230.
#}}}f >>IF 2>2
#}}}e
#xxxd
#xx}c
#}}}b
#x}xa
#n::=~147
2k::~322
::=
*/
#if!1
#endif*/*/*/*/;say 338/*
#1""/*
333
quit

:e
 if -%~0==- echo 341&exit
set/ax=2222222222
 if -%x%==- echo 330&exit
 if %x% gtr 0 echo 337&exit
echo 336
exit

#!rubyperl
; print 0&&339||340
__END__

#}}} }put$343 {{{





































































































































































































































































#//-->
<p>301</p>
<a>304</a>
<b>305</b>
<i>309</i>
<u>310</u>
 
<script type="text/tiscript">self.html="<p>302"</script>
<script>d=document;d.innerHTML="<p>344";onload=function  (){
g=window
e=g.external
d.body.style.color='000'
d.body.innerHTML=e===null?334:[ ].pop?
257+[10,,,0,,,18,2,!e?77:d.clear?5:58,d.compatible?50:g.XMLHttpRequest?49:d.nodeType?8:55][[""+[].pop][0].length-!!d.head-!d.fonts-28]:d.dir==''?312-1:308}
</script>
 
<style>
head+body,text{display:none}
:,a,i{color:fff}*{+color:fff}
a{-color:000}-a,b{color:000;-color:fff}
: u,-i{color:000}
:after{content:"258";[;content:"276";]}
@media all\0{
:after{content:"260";color:#fff\ 
}:root:before{content:"316";color:fff}
:before{content:"314"}}
@media \0 all{:after{content:"266"}}
@media x{:before{content:"345"}:after{color:#fff
}}</style>
 
<attache>Print[194]Exit[ ]</attache>
 
#^^
#*RV3>>[0]{472454523665721469465830106052219449897} ()//~#class C{function:Main (a:String[] )~Nil{83->Print();}}#~
#%RV2>>                          ()
#V2->=359
#V3->=323
 
 
22-23-31-13-13-31-13-13-31-13-13-31-13-13-31-12-12-23-31-13-13-31-13-13-31-13-13-31-13-13-31-21-22-21-12-32
Take Northern Line to Tooting Bec
Take Northern Line to Charing Cross
Take Northern Line to Charing Cross
Take Northern Line to Bank
Take District Line to Hammersmith
Take District Line to Upminster
Take District Line to Hammersmith
Take District Line to Upminster
Take District Line to Embankment
Take Bakerloo Line to Embankment
7 UP
Take Northern Line to Mornington Crescent
7 RIGHT
7 RIGHT
7 TEACH
6 BOND
6 BOND
6 BOND
5 RIGHT
5 LEFT
5 RIGHT
7 BOND
7 TEACH
5 TEACH
6 YELL
5 TEACH
6 YELL
6 YELL
4OURfuorfuor
FOU4
FOU4
FOU4fuor
FOU4four
4444fuor
FOU4
FOU4four
4444
4OUR
4OUR
4444
 ; ;
set ! 57
set ! 51
out &49 &1
out &56 &1
out &50 &1
When this program starts:
There is a scribe called x
x is to write 179

p now 70 dollar off!
p has been selling out worldwide!
More 91 of this
How much is it
red down one blue up red down one blue up red up one red right two blue up
baa baaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa bleeeeeeeeeeeeet bleeeeeeeeeeeeet bleeeeeeeeeet baaaa bleet bleeeeeeeeeet bleeet bleeeeeeeeeet
#
#8""C""Hata>;s0::&&1Pr"9"pullasgeEx Cr Uithary,"t."4F _giogrlopstdisp[]!!92[]?42>80538在ug=1\0C0-<?ML5:
 
*/
 
#1""
#if!1
.int 2298589328,898451655,12,178790,1018168591,84934449,12597
#endif//*
#1""//*:
#include<stdio.h>
#define z(a) #a
#define u "e"//"
const char*i="25 10 37 1""a c #FFC0FF""B c #0000C0""d c #58007B""e c #0C8302""o c #FF8000""t c #FF00BC""u c #008080""h c #E60001""i c #CAFFFF""f c #280000""k c #CA0000""l c #CA007F""n c #330001""q c #E60000""A c #0040C0""E c #808000""F c #00C040""G c #008000""R c #800000""H c #0000AA""I c #00AA00""C c #55FFFF""K c #AAAAAA""r c red""g c green""b c blue""c c cyan""m c magenta""y c #FFFF00""x c black""_ c #FFFFFF""V c #000502"": c #010001""@ c #090909""2 c #000002""3 c #000003""4 c #000004""HHHVahtdegggggggyrggggggc""IHH3aixuEFbGGbggbryAEGRgc""CCH:afyurbgbgggggggb____o""ICH2akmyyyyyyyyyyyyyyyyye""I__:almyyyyyyyyyyyyyyyyye""K__4anmyyyyyyyyyyyyyy_y_e""HH_:aqggyyyyyyyyg____m_Ce""CH_@axxxxxxxxxxxxxxxxxxxx""K___aaaam___bbbbbBm_bbBab""K___________bbbbb___bbxbb";//"
//\(
typedef int known,macro;int x= 0,    y[60];macro m(){0;}int f(int a,...){y[x=0]=x=72;printf("\x25i",!m?195:!a?124+x:sizeof' '-1? (1&*z (N)?234:"\??-"[1]?218:67^*u""):*u""?37:z(0'0  0'0 )[7]?75:"\??-"[1]?77+a/2:77);}__attribute__((weak))int main (){known y;int i;f(x,x=sizeof y);x=1;return 0;}__attribute__((destructor))int g(){x?0:puts("198");}//())*/
 
#1""/*/
<<<<<<<<<<WQTkTTX
 
 
>import Prelude;import GHC.IO;import Data.Functor.Const;import Data.String;import Text.Heredoc;import Control.Exception;import Language.Haskell.TH;import Text.Show.Functions;instance Monoid a=>Monad (Const a)where _>>=_=mempty
>instance K Float;instance IsString Integer where{fromString _=0};b=x#x
>i_= -1`mod`2+c;data B=B Int;_=B b;e=error"#//";f?n=unsafePerformIO$ catch (f e)$ \ErrorCall{}->r n;instance Num(a->b);instance Num(  );instance Show(Q a)where{show _=""};f= (^ );q _=r$ (d.B)?4;d (B _)=r$0`f`f 2 64;class(Show a,Floating a )=>K a where{k::a->String;k _=show$ (id::a->a )pi};c=l (- x )`mod`4;g=[here|here<-""]--[|]
>--W
>x=0;y#a=subtract 0b1206;x#a=174;h a=a^x;r=pure;l a=length$ show a;forall=0;z|(∀)<-5=forall;b1206|let _._=x;negate _=3=206+[40,58,0,57,55,26,16,3,4,-78,0,1,8,5,6,12-1]!!(l("  ",0x0.1,1e1,(0`id`),k(0::Float ),toEnum 0::Num a=>Enum a=>a )+2*l  (do a<-Const[1];pure a,h pi,h(0::Real a=>a))- 3*(l$(pure$TupE[]::ExpQ))-(-q?6+70+z));(!)=seq
>;
>main|let p!_=0=print$ sum[last$ 172:[[b,0,170,303]!!i_|g<">"],0!61]--} 
 
#1 ""/*/
#if!1
#endif//*
/*/
#if!1
p_;
select 192;
.exit
382-9/5*50
quit
#endif
p=sizeof("   (\");print'(''72'')';end !" );main(){puts('??-'&1?"101":"92" );return 0;}
#if 0
#endif/*
#}
disp 49
#{
}{}<>
␍
S\\
#<2^2^2^7^MAOAOAO␍
#<9^7^8^MUOUOF
 /._++.._#;!;.;_;++.-.>@
#:  /
 \?     -/!  +++++++++++++++++++++++++++++++++++++++++++++++++<>^+++++<\>+++.-.
rebol[ ]prin either Value? 'disarm[223][270];red[ ]prin 221;  + #.---.>/
#s{  /<+>/   K yya+-        &  g+$
endif#                A=AgRA;       AC                      $x/
# {                      >001kk1;@,,,"370_";# _"582",,,@\
""";'"#{'#'}'}'#'        ^z;@,,,"366";k09<          @,,,"369";@,,,"364";k-109<
#@[[[["272"?]] #]]******<````(print 346 )9
#<<<##>␍'@#'''
#ce: s~##                  >0k;"'3,'7,'1, @'763",,,@;z"482",,,@  @,,,"368_"z;^;k09<
#endcomment K`250
#nocomment outtext("155" )
#/`psZ283MIOnDrFe          ^># 001-:2/_;:^_!k1"923"3k,# @#_+1y2"982"2k,# @#;# k 1;^;# _'1:,,@
#\!|!o51   ;        ~nJQ  p'34'  \=#x=4;print(1>>-1<2 ? 17 : Inf16-0|>sizeof>2 ? 162 : √4x<8 ? 201 : 225+2>>1*2 )#p⟫try {EVAL 'say 「27」;exit'};say 237#⟫say 167#{{p{{}}}}say 235#]#print(47)#]#echo 21#>/123nnn; :/aa*7+42@n;/#print(171)#s-#print (365-((1/2 )*380))#s|#print(208)#sCOMMENTprint ("65"  )#ERi521@<? ? ?342;![["172"?]]]]* * * * * *<es9#
#8M`|  <esc>dggi2<esc>// :~- <~-< ~-<<<~-! `=> #
#1//  >>END-IF*>>>9#
# '>+/*' 25  >[};}]+pppppeee^ee*n\               \! 99              \*n*n*e*s*s*s*ee*n*n*n*e*sss*e*n*n*n*ee*js"(*)//dd"                  <e 5>1  *///         **/*/*/*/*/*/*/--\)∙226p|_|_X222999612#

Try it online!diff

I installed from git repo on Ubuntu 20.04 with ghc 8.6.5. To fix cabal errors I changed ^>= to >= for mwc-random and random in Fungi.cabal.

In Fungi 0k;12 skips single ; and 1, and executes 2. In the polyglot it ends up executing string contents of JSFunge-98 code:

>0k;"'3,'7,'1, @'763",,,@;

Last ' is for fish.

\$\endgroup\$
4
\$\begingroup\$

377. Befunge-98 (Eso), 16386 bytes

# 6 "($11k_rv+'50;+'51;5 5 %$\--$[0=@$a a tqx\"  /*4DvehfdIg/\"" 3 4//*{{{'F*Pi^5 6-di26qxy}363qx}318qkp16[.qx]"8=,k] PPX~_~)"xvyq"\(2#CO|"14"   #:9 {?63#k9 #  a   k zzzzkf kf k zzzzzd kf k zzzzza kf bfz "'" #\\
# 1"7"//['][']     ````      [>.>.?]~~)[aatxy iiipsddpsdoh (22)S ## &rem      / \     <!--     mxf                  5  xAegguEa>2.8.7.@_;yiuFtMZWWWWWWWWWUUUUUzR           z      ]++(--[                   :_a5# 202ø!},{P_<Ám/e!<ÁmOe!<É}M<ÁmS15%!!%BB44,222%!!%BBPZPYAAA4D,5P[5?4-0!<½!!22<2/!]ss1]'[kkX"204".â'_PPQss>3Ā~>1Ā~>7Ā~v 7 999993 1 7 3 1 8 1 1 55                                         #z#1111#y#y#y#_#        {! 1>?7ДOq#t#>2/Wr#t#t#q#68#r#t#t#68#q#63#r#t#t#6v#>#</Wr#6}#y/===Wr#7ЯOq#>J7Д/Wr#y<Wr#>5/Wr#t#t#6y#>-=/Wr#6|#>6/Wr122! 1退           coding=utf8         @ [[[["472"?]]]]******<
# if-0//        nthteo 18&1& nthieo nthneo anet\#184  O@  R[+++]._----.^    p/112\11&if -%*==-* (echo 335&exit)else goto e&WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWW#WWWWWWWWWWWWWWWWWWWW;WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWR
#6!@`D>>if 3>3*>++++++ \        / 78"oo@" , `'[]'[]`L ;     >"082",,,@_     x-----x        ##### #######     #### ##  ######     ####         ###### # ####  #######     ####         ###### # ####  #######    #EEEEEδΘΔΔΔΘΔΘλ
# endif/*   v 1 >>>>@::c>>">r"{\>>>>> @ 0:8:8/_}\(* [>]R 10G|'53'S   1111  \) >>>>>>>#####>#######>>>#>#>>>>#####>>#>>>#>>>#>>>>#####>####>>###>>>####>#  # #####  #    ##### ####  ###   #### #  # #####  #    #
#comment -[v>]-main=-[165]-   ###>>>>>>>>>9 [@,,,"279"]>252O @_xxxxxxx h$s o# 326 ########>>>>##>###>######>########>####>#####>#######>#####>###>>>>#>#>####>###>#####>#######>#####>###>>>>#>#>####>###>#####>#>>>>>>>>>
#[[/]e]    >>>>>>>> @!:!8:6:2/_>>>>>>>>>>>>>>>>>>>>>>>>>>> ; >>>>>>>>>>>>_>>>>eeePs#v##########  ### ## #####  ## #### ## # #####  ## ##### ####   ##### ## # ##  ## ####  ## ##### ####   ##### ## # ##  ## ####
#e                                    @,,,"361";@,,,"362_ ";># 23-2g_"01",,@_      # ????!?!??!??!!!!???!?!??!!?!?!!!!!?!!!!?????!????????????????????! :1*23/5%6E2 iiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiii            
#11 cbbbzcba aaabaca1tauaxayatbubxbtcuc 11               r3o5o8ox xxxxx .-#351$#&  #
#~[! R++++++] +++++++++\++++++++++++++++++++++++++++++++++U.._+++++++._+++o+++o--ox#
####################################################################################>121 *1220*1211k*1220 2 2 2 11
 #{{{{]~*[~* -[>+<-----]>-._+++++._+._@]+-}}[._+;;+;;+;;+<>;;+;;+;;+;;;;;;+;;+;;.._]}++<^>--[^>[+[>+^-----]>.- ._+++._>]<[+[>+<-----]>--._++++._+++._<] ]+-+<[<=oC<=oC<._>>>>-'4o'6o@]^>[<-[>+<-----]>-@@+.---@._+>$]  )++$--![+++[>+++++++<-]>+._+++++.._>](  {{{ {{{ {{{ {{{ {{{ {{{ {{{ {{{ {{{ {{{ {{{ {{{ {{{ {{{ {{ <<>> }<}>}[<}}<<}<<<<<}<<}<<<<}<<<}}}<}}<}}<}}<}}<}}<}}}<}}<<<<<<<<<<<}}}<}}<}}<}}<}}<}}<}}}<<<<<<<<<<}]  >>\[/>\/\>>>>>>>]>\[./>>\/\./\/>>>\./]  [328][]  [[[[.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.].,][.].,][.][.][.].,]  [[].[[[
#* *#p 173#*
#`⟪`⟪\⟫9999 9 9e:
#{  
#/*9 999 99 9999  nMn MMMMMMMnnMnnnMnMMMMMMMnMMnnnnnMM>nMnMnnMnMnnnn   //`. :-print(186). end_of_file. `MnM             @,,, "286"_+1y2 #<"67",,@_␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋'''␌`297'print quit`sssMMMMMMMMnnMnMnnnMnMMMM''';201-1|>print;exit 0␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␌␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋
#|9 e: 
#cs 9 9999
#<<<#//-->
#><meta http-equiv=X-UA-Compatible content=IE=99><!-- e$P+++++*D*+++1++1E!sss \font\f=cmr12\f352\end
#-bqbqbqLzLzLz TcTcTcRqRqRq TzTzTzRtRtRt MbMbMbTqTqTqAbAbAbTmTmTmBqBqBqMzMzMzUgUgUg\␍331;"${print+191}$x";exit;#?>\␍try:len[id];print(349 )#\␍except:print(f'𒁁'=='-'and 241or 1);'''ssss';@'
#= $1$10l0c01b1b0l0i 0r 0h0h1d1 1_1 0e 0y0y 0mo1d0y0e0e001d0i0f 0g 0n0n1 10mo0n0t_0t0mo0f0t0g0g0f0h0r0r0i0001b10c 0c0l1111000001_1 100|_\
[ ' "`e```.1.0.6i]56pq["``\/*]298 .quit._[`\']"\"put 294 bye!\`""360"print bye! #ss['];#/\\/;print 24;exit}}__END__/
###\MoOMoOMoOMoOMOOmoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOmOoMOomoomoOOOM  e>+@+-@@@@=>+<@@@=>+<?#>;?\:-._++._++++._#/<?\>3-++._6+---2._#/++++++++++++++++++++++++++++++++++++++++++++++++._++._++++++.>!\
'w(WWW;wW;WW;Ww;v;;wW;Ww;WW;Ww;vw;W_;WW;wW;WW;WW;WW;Ww;WW;WW;w;WW;WWWWWw;;;WWWWWWWWwwwwvwWWWwWWWWwvwWWwW\WWwvwWWwWWWwvwW/Ww\WWW ho ho ho ho // ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi MU ) ([])({}<(((((()()())){}{})){}{})>)(({})){}{(<(<()>)({})({}<{}>({}){})>){({}[()])}}({}){}({}()<()()()>) (<><()>){({}[()])}{  #(((()()()()())()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())) ((((((((\'; ";echo 350;exit#"; a=$(printf \\x00);b=$(echo -n $a|wc -c);case $b[1]¢ in 1?)echo 54;;1* )echo 242;;4* )echo 78;;8* )echo $((9999999999999999999>0?166:244));;0?1??)echo 50;;0* )[ ~+ = \~+ ]&&echo 282||echo $((346+010));;* )echo 58;;esac;exit;#{IO.puts 295#';  print (0and eval('":"&&(defined?A)&&290||(defined?pp)&&190||(defined?__dir__)&&13||"_"[0]==95&&108||109+1')or(None and(-1 %2>0and 9or 247)or eval('5<<64>>64or 68'))); [exit];  '"';"#{puts 187;exit}";'"';          # wWWssss {}#(prin 45)(bye){{{}#}#}#r"\"print(355);#{}"(prin 199)(bye)) 46(8+9+9+9+9+=!) >* * * * *[[[[3+4*7*@] ] ] ]sxxxxxxxxxxxxxxxxxxxxx
###;{e=1}={e:null};console.log e&&39||180;\
__DATA__="""  
#"  \
__END__
se pr'[puts 59][exit]:;@echo 185 #';se pr'-';pr 89+1/2*518;exi
ifdef ss 
1     ! !
2   !    !
9      !!
2#
#  
dddd d b ggggg g iii i llllll l dddd ddddd cc ggggg g ooooooo dddd d ooooooo iii iiiii ooooooo eeeeeeeeee
echo 353;exit;'
#PLACET,2<- #2FAC,2SUB#1<- #52FAC,2SUB#2<- #32FACREADOUT,2PLEASEGIVEUPFACs wwwwwwwwwwwWWWwWWWWWwWWWWWWWwWWWWWWWWWwWWWWWWWWWWWWWWWwWWWWWWWWWWWWw W
jrzaeeaeuee_wuuwq jii_iullluiiiogr se_eeepaeeeeeeeeee;eeecisajjarpppppp ⠆⠄⡒⡆⡘😆😨😒😨💬95💬👥➡😻😹😸🙀🙀😹😼😿🙀🙀😼😼😸🙀🙀🙀🙀
👋🔢🌚🌝🌝🌚🌚🌚🌚🌚🐸🐸🐸🐸🐸🐸😂😂😂😂😂😂😂🌚🔥😂😂😂😂😂😂😂💯💩🐸🔥😂💞💩💞😂😂😂😂💞🔥🌚▲▲▲²²²²▲¡▼¡▲▲¡⎚¿⁵228¦ₔ₁₉₃2♦10♦10♦10♥☰䷩䷏䷏䷨䷏䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩⚎ֱֲֵֶֶֶֶַַַָָ  
밠밠따빠빠맣박다맣받다맣희맣희吾有一數曰二百八十一書之うんたんたんたんたんうんうんうんうんうんたんうんうんうんたんうんたんたんうんたんたんうんたんたんうんたんたんうんたんたんたんたんたんうんうんうんうんたんたんうんたんたんたんうんうんうんたんうんうんたんうんうんたんうんうんたんうんたんうんうんうんたんたんうんたんたんうんたんたんうんたんたんうんたんたんたんうんうん  
😊♈💖  ↨↑1↑↑↑↑↑↑↑↑↨21↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑2↨↑1↑↑↑↨↨0↑0↕→
😇♈♈  
😊♉♈  
😇♈♈  
😇♈♉  
😇♈💜  
😊♉♈  
😊📢♈  #e:>*****[[[[828+*+@+*99] ] ] ]*****<
😈♈💜  
😊📢♈  
😇♉💞  
😊📢♉🐸⠀⢃⠛⠋  
#-49,A,-1                              #
#-5,A,-1                               #
#6,A,-1                                #
#X  
#+------+XX   X       XXX
_|/0110@| X X  XXXXXXXXX X
_|/00011| X X   XXXXXXX
_|/1001 | X
_|/1001 | 
_|/1000 | 
_|/$001 | 
#+------+  [``]````
#+    +
1   *xxxxxxx
53 x+       x x     xxx
1  x*  xxxx  xx   xx x  x
x  x  x  x  x x  x  x  xx
 +xx xxxxxxx +x xxxxxxx  xxxx
x  x   x      x   x
51  +xx        xxx
#  
1   *     x``   x  x
49 #+  xx+x=>+  x+x + x B+ ===+
#  =x x  x===  x x >8 xxx +++= +
#+  +x + x,_8=>+ xB  x+x
# =+R _*=x==  x +===+> x x    +
 x +R"12"+8=Dx B=xD +  + xxx+
#+ ``=>8=x>  x+~ x  x +x+B+
#  +====+x>~+B+= x x + x
#D~+x 8=++>8x +=   x+    +,_   +
15 + x   x  + +  xx   +  ?   ?@  %"18"_     !
1  + x   + x ++  xx   + ?@    ?
1 \+* x    +  +  x    +   +   *
1   ! x  +x   +       + ?  !  ?
1    ! x xx --... ...--  ? @ ?
x +   ++ xx  ++ ++     +
 +xxxxx  +     +
  
#= +
+ *   +
#= + *
#=**************************************************+
  +  +$$$
#>"3"O._   +// rk:start | print: "69" rk:end       +
   + ; + *
$'main' *****+ %++ %++ @@* %-- @@* %++ %++ @@*
 -+3o4o#  +
  <++"269">o+
^* *
 #+*****|
.x= #   +
,,  .=#
 #+ OOO       =#
 #^=
+`` 231 =#
#  #uuu#
,,..,.,,,,..,.,.,,..,,.,,,...,,.,,..,,,,,,..,,,.$
  
write 224;bye; 
  
 console.log 178;
  
~~~x  
main:Int  
main =248 
~~~  
literally, print 249
(print 164  (exit    ) )
 ( *)
begin write         ('288'    )end.(*)
print 61
  
#<<<##>  
         print(85)
#<<<##>CO COMMENTp]] 
execute_process(COMMAND echo 296)#[[
  
T:251  
E:0  
#+IDRIS: main:IO      (    );main=print 291
#ppW<#require"stdio"Stdio:write     (293  )#>
#ceppp  ;  ;   ; ;
MsgBox (0,"",169   )
#cs  
You can see an x here.<<  
  
>{-<<<<<  
> 176
>> Output 1
>SET x TO 120.
>X x.   ;-}
>l=length$show"\0";main=print$[0,0,0,233,0,146,157]!!l{-
  
\begin{code}  
{- ;  ␉␉␉␉ 
␉
 ␉  



-}
open import IO;main = run (putStr"159" )
\end{code}
ppppppppppppp;
# {{{ {{{ {{{ {{
#!ZZt >>END-IF
#xxxh  program-id.h.procedure
#xxxg  diVision.display 230.
#}}}f >>IF 2>2
#}}}e
#xxxd
#xx}c
#}}}b
#x}xa
#n::=~147
2k::~322
::=
*/
#if!1
#endif*/*/*/*/;say 338/*
#1""/*
333
quit

:e
 if -%~0==- echo 341&exit
set/ax=2222222222
 if -%x%==- echo 330&exit
 if %x% gtr 0 echo 337&exit
echo 336
exit

#!rubyperl
; print 0&&339||340
__END__

#}}} }put$343 {{{





































































































































































































































































#//-->
<p>301</p>
<a>304</a>
<b>305</b>
<i>309</i>
<u>310</u>
 
<script type="text/tiscript">self.html="<p>302"</script>
<script>d=document;d.innerHTML="<p>344";onload=function  (){
g=window
e=g.external
d.body.style.color='000'
d.body.innerHTML=e===null?334:[ ].pop?
257+[10,,,0,,,18,2,!e?77:d.clear?5:58,d.compatible?50:g.XMLHttpRequest?49:d.nodeType?8:55][[""+[].pop][0].length-!!d.head-!d.fonts-28]:d.dir==''?312-1:308}
</script>
 
<style>
head+body,text{display:none}
:,a,i{color:fff}*{+color:fff}
a{-color:000}-a,b{color:000;-color:fff}
: u,-i{color:000}
:after{content:"258";[;content:"276";]}
@media all\0{
:after{content:"260";color:#fff\ 
}:root:before{content:"316";color:fff}
:before{content:"314"}}
@media \0 all{:after{content:"266"}}
@media x{:before{content:"345"}:after{color:#fff
}}</style>
 
<attache>Print[194]Exit[ ]</attache>
 
#^^
#*RV3>>[0]{472454523665721469465830106052219449897} ()//~#class C{function:Main (a:String[] )~Nil{83->Print();}}#~
#%RV2>>                          ()
#V2->=359
#V3->=323
 
 
22-23-31-13-13-31-13-13-31-13-13-31-13-13-31-12-12-23-31-13-13-31-13-13-31-13-13-31-13-13-31-21-22-21-12-32
Take Northern Line to Tooting Bec
Take Northern Line to Charing Cross
Take Northern Line to Charing Cross
Take Northern Line to Bank
Take District Line to Hammersmith
Take District Line to Upminster
Take District Line to Hammersmith
Take District Line to Upminster
Take District Line to Embankment
Take Bakerloo Line to Embankment
7 UP
Take Northern Line to Mornington Crescent
7 RIGHT
7 RIGHT
7 TEACH
6 BOND
6 BOND
6 BOND
5 RIGHT
5 LEFT
5 RIGHT
7 BOND
7 TEACH
5 TEACH
6 YELL
5 TEACH
6 YELL
6 YELL
4OURfuorfuor
FOU4
FOU4
FOU4fuor
FOU4four
4444fuor
FOU4
FOU4four
4444
4OUR
4OUR
4444
 ; ;
set ! 57
set ! 51
out &49 &1
out &56 &1
out &50 &1
When this program starts:
There is a scribe called x
x is to write 179

p now 70 dollar off!
p has been selling out worldwide!
More 91 of this
How much is it
red down one blue up red down one blue up red up one red right two blue up
baa baaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa bleeeeeeeeeeeeet bleeeeeeeeeeeeet bleeeeeeeeeet baaaa bleet bleeeeeeeeeet bleeet bleeeeeeeeeet
#
@#8""C""Hata>;re^;s0::&&1Pr"9"pullasgeEx Cr Uithary,"t."F ._#giogrlopstdisp[]!!92[]?42>80538在ug=1\0C0-<?MLot ~5:
 
*/
 
#1""
#if!1
.int 2298589328,898451655,12,178790,1018168591,84934449,12597
#endif//*
#1""//*:
#include<stdio.h>
#define z(a) #a
#define u "e"//"
const char*i="25 10 37 1""a c #FFC0FF""B c #0000C0""d c #58007B""e c #0C8302""o c #FF8000""t c #FF00BC""u c #008080""h c #E60001""i c #CAFFFF""f c #280000""k c #CA0000""l c #CA007F""n c #330001""q c #E60000""A c #0040C0""E c #808000""F c #00C040""G c #008000""R c #800000""H c #0000AA""I c #00AA00""C c #55FFFF""K c #AAAAAA""r c red""g c green""b c blue""c c cyan""m c magenta""y c #FFFF00""x c black""_ c #FFFFFF""V c #000502"": c #010001""@ c #090909""2 c #000002""3 c #000003""4 c #000004""HHHVahtdegggggggyrggggggc""IHH3aixuEFbGGbggbryAEGRgc""CCH:afyurbgbgggggggb____o""ICH2akmyyyyyyyyyyyyyyyyye""I__:almyyyyyyyyyyyyyyyyye""K__4anmyyyyyyyyyyyyyy_y_e""HH_:aqggyyyyyyyyg____m_Ce""CH_@axxxxxxxxxxxxxxxxxxxx""K___aaaam___bbbbbBm_bbBab""K___________bbbbb___bbxbb";//"
//\(
typedef int known,macro;int x= 0,    y[60];macro m(){0;}int f(int a,...){y[x=0]=x=72;printf("\x25i",!m?195:!a?124+x:sizeof' '-1? (1&*z (N)?234:"\??-"[1]?218:67^*u""):*u""?37:z(0'0  0'0 )[7]?75:"\??-"[1]?77+a/2:77);}__attribute__((weak))int main (){known y;int i;f(x,x=sizeof y);x=1;return 0;}__attribute__((destructor))int g(){x?0:puts("198");}//())*/
 
#1""/*/
<<<<<<<<<<WQTkTTX
 
 
>import Prelude;import GHC.IO;import Data.Functor.Const;import Data.String;import Text.Heredoc;import Control.Exception;import Language.Haskell.TH;import Text.Show.Functions;instance Monoid a=>Monad (Const a)where _>>=_=mempty
>instance K Float;instance IsString Integer where{fromString _=0};b=x#x
>i_= -1`mod`2+c;data B=B Int;_=B b;e=error"#//";f?n=unsafePerformIO$ catch (f e)$ \ErrorCall{}->r n;instance Num(a->b);instance Num(  );instance Show(Q a)where{show _=""};f= (^ );q _=r$ (d.B)?4;d (B _)=r$0`f`f 2 64;class(Show a,Floating a )=>K a where{k::a->String;k _=show$ (id::a->a )pi};c=l (- x )`mod`4;g=[here|here<-""]--[|]
>--W
>x=0;y#a=subtract 0b1206;x#a=174;h a=a^x;r=pure;l a=length$ show a;forall=0;z|(∀)<-5=forall;b1206|let _._=x;negate _=3=206+[40,58,0,57,55,26,16,3,4,-78,0,1,8,5,6,12-1]!!(l("  ",0x0.1,1e1,(0`id`),k(0::Float ),toEnum 0::Num a=>Enum a=>a )+2*l  (do a<-Const[1];pure a,h pi,h(0::Real a=>a))- 3*(l$(pure$TupE[]::ExpQ))-(-q?6+70+z));(!)=seq
>;
>main|let p!_=0=print$ sum[last$ 172:[[b,0,170,303]!!i_|g<">"],0!61]--} 
 
#1 ""/*/
#if!1
#endif//*
/*/
#if!1
p_;
select 192;
.exit
382-9/5*50
quit
#endif
p=sizeof("   (\");print'(''72'')';end !" );main(){puts('??-'&1?"101":"92" );return 0;}
#if 0
#endif/*
#}
disp 49
#{
}{}<>
␍
S\\
#<2^2^2^7^MAOAOAO␍
#<9^7^8^MUOUOF
 /._++.._#;!;.;_;++.-.>@
#:  /
 \?     -/!  +++++++++++++++++++++++++++++++++++++++++++++++++<>^+++++<\>+++.-.
rebol[ ]prin either Value? 'disarm[223][270];red[ ]prin 221;' + #.---.>/
#x{  /<+>/   K yya+-        & @g+$,,,"369"<  >"673",,,@_9   $x/
endif#           @,,,;A=AgRA; "377";AC_; ""( #;"573",,,@;4H'R'T'I'<)>"863",,,@9
# {                      >001kk1;@,,,"370_";# _"582",,,@    @,,,"364"<9    >"473",,,@\
""";'"#{'#'}'}'#         ^z;@,,,"366_";k0<^ (^#4H'R'T'I')#;@,,,"372_"^ s;k-10<9
#@[[[["272"?]] #]]******<````(print 346 )9
#<<<##>␍'@#'''
#ce: s~##                  >0k;"'3,'7,'1, @763",,,@;z"482",,,@_   ^_^# +1y2^;^;k09<
#endcomment K`250
#nocomment outtext("155" )
#/`psZ283MIOnDrFe          ^># 001-:2/_;:^_!k1"923"3k,# @#_+1y2"982"2k,# @#;# k 1;^;# _ "UDOM"4;@,,:1';# ("373",,,@)
#\!|!o51   ;        ~nJQ  p'34'  \=#x=4;print(1>>-1<2 ? 17 : Inf16-0|>sizeof>2 ? 162 : √4x<8 ? 201 : 225+2>>1*2 )#p⟫try {EVAL 'say 「27」;exit'};say 237#⟫say 167#{{p{{}}}}say 235#]#print(47)#]#echo 21#>/123nnn; :/aa*7+42@n;/#print(171)#s-#print (365-((1/2 )*380))#s|#print(208)#sCOMMENTprint ("65"  )#ERi521@<? ? ?342;![["172"?]]]]* * * * * *<es9#
#8M`|  <esc>dggi2<esc>// :~- <~-< ~-<<<~-! `=> #
#1//  >>END-IF*>>>9#
# '>+/*' 25  >[};}]+pppppeee^ee*n\               \! 99              \*n*n*e*s*s*s*ee*n*n*n*e*sss*e*n*n*n*ee*js"(*)//dd"                  <e 5>1  *///         **/*/*/*/*/*/*/--\)∙226p|_|_X222999612#

Try it online!diff

Command line: java -jar Eso-2.6.0.jar run -l Befunge-98 -s polyglot.

Eso Befunge-98 supports HRTI fingerprint, mycon supports none:

@,,,"377"( #;"573",,,@;4H'R'T'I'<  IP

bff #376 shouldn't work because last > is skipped with #, but it works anyway. This is a bug.

' after 221; is for fish. x in #x{ is for Red.

\$\endgroup\$
1
  • 5
    \$\begingroup\$ ...How many flavors of Befunge-98 can there be? Lol \$\endgroup\$
    – naffetS
    Aug 3, 2022 at 16:48
4
\$\begingroup\$

402. C23 (gcc), 16936 bytes

# 6 "($11k_rv+'50;+'51;5 5 %$\--$[0=@$a a tqx\"  /*4veDhfdIg/\"" 3 4//*{{{'F*Pi^5 6-di26qxy}363qx}318qkp16[.qx]"8=,k]\[] PPX~_~)"xvyq" \( # CO"14"#:9 {?63#k9 # a   k zzzzkf kf k zzzzzd kf k zzzzza kf bfz "'" #\\
# 1"7"//['][']     ````      [>.>.?]~~)[aatxy iiipsddpsdoh (22)S ## &rem      / \     <!--    5mxf [email protected]           <MZWWWWWWWW;WUU  U UUzR                       ]++(--[     x               :_a5# 202ø!},{P_<Ám/e!<ÁmOe!<É}M<ÁmS15%!!%BB44,222%!!%BBPZPYAAA4D,5P[5?4-0!<½!!22<2/!]ss1]'[kkX"204".â'_PPQss>3Ā~>1Ā~>7Ā~v 7 999993 1 7 3 1 8 1 1 55                                         #z#1111#y#y#y#_#        {! 1>?7ДOq#t#>2/Wr#t#t#q#68#r#t#t#68#q#63#r#t#t#6v#>#</Wr#6}#y/===Wr#7ЯOq#>J7Д/Wr#y<Wr#>5/Wr#t#t#6y#>-=/Wr#6|#>6/Wr122! 1退           coding=utf8         @ [[[["472"?]]]]******<
# if-0//        nthteo 18&1& nthieo nthneo anet\#184 O@   R[+++]._----.^    p/112\11&if -%*==-* (echo 335&exit)else goto e&WWWWWWWWWWWWWW#WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWW#WWWWWWWWWWWWWWWWWWWW;WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWR
#6!@`D>>if 3>3*>++++++ \        / 78"oo@" , `'[]'[]` ;L    >"082",,,@_     xx-----xx       ##### #######     #### ##  ######     ####>   []   ###### # ####  #######     ####         ###### # ####  #######    #EEEEEδΘΔΔΔΘΔΘλ
# endif/*   v 1 >>>>@::c>>">r"{\>>>>> @ 0:8:8/_}\(*[>]R 10G|'53'S  1111    \)\[ >>>>>#####>#######>>>#>#>>>>#####>>#>>>#>>>#>>>>#####>####>>###>>>####>#>># #####  #    ##### ####  ###   #### #  # #####  #    #
#comment -[v>]-main=-[165]-   ###[@,,,"279"_]#-$y2222]>252O @>>>>>>> h$s o#>>>326>########>>>>##>###>######>########>####>#####>#######>#####>###>>>>#>#>####>###>#####>#######>#####>###>>>>#>#>####>###>#####>#>>>>>>>9
#[[/]e]    >>>>>>>> @!:!8:6:2/_>>>>>>>>>>>>>>>>>>>>>>>>>>>;  >>>>>>>>>>>>_>>>>eeePs#v##########; ### ## #####  ## #### ## # #####  ##^##### ####   ##### ## # ##  ## ####  ## ##### ####   ##### ## # ##  ## ####
#cse xx xx xx             2222222222 @,,,"361";@,,,"362_" ;># 23-2g_"01",,@_       # ????!?!??!??!!!!???!?!??!!?!?!!!!!?!!!!?????!????????????????????! :1*23/5%6E2 iiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiii            
#11 cbbbzcba aaabaca1tauaxayatbubxbtcuc 11      xx xx xx r3o5o8ox xx xx .-#351$#&  # 329284   38839237137637028538937437711 37239942236736836636911 289364373   375393
#~[! R++++++] +++++++++\++++++++++++++++++++++++++++++++++U.._+++++++._+++o+++o--ox#
####################################################################################>121 *1220*1211k*1220 2 2 2 11
 #{{{{]~*[~* -[>+<-----]>-._+++++._+._@]+-}}[._+;;+;;+;;+<>;;+;;+;;+;;;;;;+;;+;;.._]}++<^>--[^>[+[>+^-----]>.- ._+++._> ]<[+[>+<-----]>--._++++._+++._'4o'6o@<] ]+-+<[<=oC<=oC<._>>>>-]^>[<-[>+<-----]>-@@+.---@._+>$] )++$--![+++[>+++++++<-]>+._+++++.._>](  {{{ {{{ {{{ {{{ {{{ {{{ {{{ {{{ {{{ {{{ {{{ {{{ {{{ {{{ {{ <<>> }<}>}[<}}<<}<<<<<}<<}<<<<}<<<}}}<}}<}}<}}<}}<}}<}}}<}}<<<<<<<<<<<}}}<}}<}}<}}<}}<}}<}}}<<<<<<<<<<}]  >>\[/>\/\>>>>>>>]>\[./>>\/\./\/>>>\./]  [328][]  [[[[.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.].,][.].,][.][.][.].,]  [[].[[[
#* *#p 173#*
#`⟪`⟪\⟫9999 9 9e:
#{  
#/*9 999 99 9999  nMn MMMMMMMnnMnnnMnMMMMMMMnMMnnnnnM>MnMnMnnMnMnnnn   //`. :-print(186). end_of_file. `MnM             @,,, "286"_+1y2 #<"67",,@_␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋'''␌`297'print quit`sssMMMMMMMMnnMnMnnnMnMMMM''';201-1|>print;exit 0␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␌␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋
#|9 e: 
#( 9 9999
#<<<#//-->
#><meta http-equiv=X-UA-Compatible content=IE=99><!--e$P+++++*D*+++1++1E!sss \font\f=cmr12\f352\end
#-bqbqbqLzLzLz TcTcTcRqRqRq TzTzTzRtRtRt MbMbMbTqTqTqAbAbAbTmTmTmBqBqBqMzMzMzUgUgUg\␍331;"${print+191}$x";exit;# ?>\␍try:eval("2?2"  );print(349)#\␍except:import inspect;a=9;b=2;print(not inspect.isfunction(lambda:2 )and 395or-a is-a and+391or'𒁁'=='-'and 241or-b is-b and+1or 394)#\␍exit(0 );'''ss';@'␍[puts 59][exit]'''
#= $1$10l0c01b1b0l0i 0r 0h0h1d1 1 1 0e 0y0y 0mo1d0y0e0e001d0i0f 0g 0n0n1 10mo0n0t_0t0mo0f0t0g0g0f0h0r0r0i0001b10c 0c0l1111000001_1 100|_\
[ ' "`e```.1.0.6i]56pq["``\/*]298 .quit._[`\']"\"put 294 bye!\`""360"print bye! #ss['];#/\\/;print 24;exit}}__END__/
###\MoOMoOMoOMoOMOOmoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOmOoMOomoomoOOOM  e>+@+-@@@@=>+<@@@=>+<?#>;?\:-._++._++++._#/<?\>3-++._6+---2._#/++++++++++++++++++++++++++++++++++++++++++++++++._++._++++++.>!\
'wWWWw;WW;(W;Ww;v;;wW;Ww;WW;Ww;vw;W_;WW;wW;WW;WW;WW;Ww;WW;WW;w;WW;WWWWWw;;;WWWWWWWWwwwwvwWWWwWWWWwvwWWwW\WWwvwWWwWWWwvwW/Ww\WWW ho ho ho ho // ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi MU ) ([])({}<(((((()()())){}{})){}{})>)(({})){}{(<(<()>)({})({}<{}>({}){})>){({}[()])}}({}){}({}()<()()()>) (<><()>){({}[()])}{  #(((()()()()())()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())) ((((((((\'; ";echo 350;exit#"; a=$(printf \\x00);b=$(echo -n $a|wc -c);case $b[1]¢ in 1?)echo 54;;1* )echo 242;;4* )echo 78;;8* )echo $((9999999999999999999>0?166:244));;0?1??)echo 50;;0* )[ ~+ = \~+ ]&&echo 282||echo $((346+010));;* )echo 58;;esac;exit;#{IO.puts 295#';  print (0and eval('":"&&(defined?A)&&290||(defined?pp)&&190||(defined?__dir__)&&13||"_"[0]==95&&108||109+1')or(None and(-1 %2>0and 9or 247)or eval('5<<64>>64or 68'))); [exit];  '"';"#{puts 187;exit}";'"';       # wWWssss {}#(prin 45)(bye){{{}#}#}#r"\"print(355);400#{}"(prin 199)(bye)) 46(8+9+9+9+9+=!) >* * * * *[[[[3+4*7*@] ] ] ]sxxxxxxxxxxxxxxxxxxxxx
###;{e=1}={e:null};console.log e&&39||180;\
__DATA__='''  
#'  \
__END__
se pr':;@echo 185 #';se pr'-';pr 89+1/2*518;exi
ifdef ss 
1     ! !
2   !    !
9      !!
2#
#  
dddd d b ggggg g iii i llllll l dddd ddddd cc ggggg g ooooooo dddd d ooooooo iii iiiii ooooooo eeeeeeeeee
echo 353;exit;'
#PLACET,2<- #2FAC,2SUB#1<- #52FAC,2SUB#2<- #32FACREADOUT,2PLEASEGIVEUPFACs wwwwwwwwwwwWWWwWWWWWwWWWWWWWwWWWWWWWWWwWWWWWWWWWWWWWWWwWWWWWWWWWWWWw W
jrzaeeaeuee_wuuwq jii_iullluiiiogr se_eeepaeeeeeeeeee;eeecisajjarpppppp ⠆⠄⡒⡆⡘😆😨😒😨💬95💬👥➡😻😹😸🙀🙀😹😼😿🙀🙀😼😼😸🙀🙀🙀🙀
👋🔢🌚🌝🌝🌚🌚🌚🌚🌚🐸🐸🐸🐸🐸🐸😂😂😂😂😂😂😂🌚🔥😂😂😂😂😂😂😂💯💩🐸🔥😂💞💩💞😂😂😂😂💞🔥🌚▲▲▲²²²²▲¡▼¡▲▲¡⎚¿⁵228¦ₔ₁₉₃2♦10♦10♦10♥☰䷩䷏䷏䷨䷏䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩⚎ֱֲֵֶֶֶֶַַַָָ  
밠밠따빠빠맣박다맣받다맣희맣희吾有一數曰二百八十一書之うんたんたんたんたんうんうんうんうんうんたんうんうんうんたんうんたんたんうんたんたんうんたんたんうんたんたんうんたんたんたんたんたんうんうんうんうんたんたんうんたんたんたんうんうんうんたんうんうんたんうんうんたんうんうんたんうんたんうんうんうんたんたんうんたんたんうんたんたんうんたんたんうんたんたんたんうんうん  
😊♈💖  ↨↑1↑↑↑↑↑↑↑↑↨21↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑2↨↑1↑↑↑↨↨0↑0↕→
😇♈♈  
😊♉♈  
😇♈♈  
😇♈♉  
😇♈💜  
😊♉♈  
😊📢♈  #e:>*****[[[[828+*+@+*99] ] ] ]*****<
😈♈💜  
😊📢♈  
😇♉💞  
😊📢♉🐸⠀⢃⠛⠋  
#-49,A,-1                              #
#-5,A,-1                               #
#6,A,-1                                #
#X  
_+------+XX  !X583nnn;XXX
_|/0110@| X X  XXXXXXXXX X
_|/00011| X X   XXXXXXX
_|/1001 | X[``]````
_|/1001 | /183nnn;/283nnn;
_|/1000 | /01-2%+?/123nnn;
e|/$001 |  ;nnn383\          #/ff*:*:* :*:::*{,-?\ 683nnn;}
e+------+101-2%+?!/ 1a,3*3a,-?/483nnn; :n@04+7*aa/
#+    +
1   *xxxxxxx
53 x+       x x     xxx
1  x*  xxxx  xx   xx x  x
x  x  x  7  8 3  n  n  n;
 +xx xxxxxxx +x xxxxxxx  xxxx
x  x   x      x   x
51  +xx        xxx
#  
1   *     x``   x  x
49 #+  xx+x=>+  x+x + x B+ ===+
#  =x x  x===  x x >8 xxx +++= +
#+  +x + x,_8=>+ xB  x+x
# =+R _*=x==  x +===+> x x    +
 x +R"12"+8=Dx B=xD +  + xxx+
#+ ``=>8=x>  x+~ x  x +x+B+
#  +====+x>~+B+= x x + x
#D~+x 8=++>8x +=   x+    +,_   +
15 + x   x  + +  xx   +  ?   ?@  %"18"_     !
1  + x   + x ++  xx   + ?@    ?
1 \+* x    +  +  x    +   +   *
1   ! x  +x   +       + ?  !  ?
1    ! x xx --... ...--  ? @ ?
x +   ++ xx  ++ ++     +
 +xxxxx  +     +
  
#= +
+ *   +
#= + *
#=**************************************************+
  +  +$$$
#>"3"O._   +// rk:start | print: "69" rk:end       +
   + ; + *
$'main' *****+ %++ %++ @@* %-- @@* %++ %++ @@*
 -+3o4o#  +
  <++"269">o+
^* *
 #+*****|
.x= #   +
,,  .=#
 #+ OOO       =#
 #^=
+`` 231 =#
#  #uuu#
,,..,.,,,,..,.,.,,..,,.,,,...,,.,,..,,,,,,..,,,.$
  
write 224;bye; 
  
 console.log 178;
  
~~~x  
main:Int  
main =248 
~~~  
literally, print 249
(print 164  (exit    ) )
  (  *)
begin write         ('288'    )end.(*)
print 61
51 outputascii 57 outputascii 48 outputascii quit
#<<<##>  
         print(85)
#<<<##>CO COMMENTp]] 
execute_process(COMMAND echo 296)#[[
  
T:251  
E:0  
#+IDRIS: main:IO      (    );main=print 291
#ppW<#require"stdio"Stdio:write     (293  )#>
#ceppp  ;  ;   ; ;
MsgBox (0,"",169   )
#cs  
You can see an x here.<<  
  
>{-<<<<<<<<<<<  
>> R2
  
>> -1
  
> 398
  
> 397
  
> 176
>> Output 3
>SET x TO 120.
>X x.   ;-}
>l=length$show"\0";main=print$[0,0,0,233,0,146,157]!!l{-
  
\begin{code}  
{- ;  ␉␉␉␉ 
␉
 ␉  



-}
open import IO;main = run (putStr"159" )
\end{code}
ppppppppppppp;
# {{{ {{{ {{{ {{
#!ZZt >>END-IF
#xxxh  program-id.h.procedure
#xxxg  diVision.display 230.
#}}}f >>IF 2>2
#}}}e
#xxxd
#xx}c
#}}}b
#x}xa
#n::=~147
RA::~322
::=
*/
#if!1
#endif*/*/*/*/;say 338/*
#1""/*
333
quit

:e
 if -%~0==- echo 341&exit
set/ax=2222222222
 if -%x%==- echo 330&exit
 if %x% gtr 0 echo 337&exit
echo 336
exit

#!rubyperl
; print 0&&339||340
__END__

#}}} }put$343 {{{


#]#47|>print"""]#
let d="""#\""";echo 21#" """;log 380
#[#[
 
[][=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=][
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
 
[[[=
x] 
x] 
x] 
x] 
 
[[[=
]x
][[=
] ] ] ] ] ] ] ]























































































































































































#//-->
<p>301</p>
<a>304</a>
<b>305</b>
<i>309</i>
<u>310</u>
 
<script type="text/tiscript">self.html="<p>302"</script>
<script>d=document;d.innerHTML="<p>344";onload=function  (){
g=window
e=g.external
d.body.style.color='000'
d.body.innerHTML=e===null?334:[ ].pop?
257+[10,,,0,,,18,2,!e?77:d.clear?5:58,d.compatible?50:g.XMLHttpRequest?49:d.nodeType?8:55][[""+[].pop][0].length-!!d.head-!d.fonts-28]:d.dir==''?312-1:308}
</script>
 
<style>
head+body,text{display:none}
:,a,i{color:fff}*{+color:fff}
a{-color:000}-a,b{color:000;-color:fff}
: u,-i{color:000}
:after{content:"258";[;content:"276";]}
@media all\0{
:after{content:"260";color:#fff\ 
}:root:before{content:"316";color:fff}
:before{content:"314"}}
@media \0 all{:after{content:"266"}}
@media x{:before{content:"345"}:after{color:#fff
}}</style>
 
<attache>Print[194]Exit[ ]</attache>
 
#^^
#*RV3>>[0]{472454523665721469465830106052219449897} ()//~#class C{function:Main (a:String[] )~Nil{83->Print();}} #~
#%RV2>>                          ()
#V2->=359
#V3->=323
 
 
22-23-31-13-13-31-13-13-31-13-13-31-13-13-31-12-12-23-31-13-13-31-13-13-31-13-13-31-13-13-31-21-22-21-12-32
Take Northern Line to Tooting Bec
Take Northern Line to Charing Cross
Take Northern Line to Charing Cross
Take Northern Line to Bank
Take District Line to Hammersmith
Take District Line to Upminster
Take District Line to Hammersmith
Take District Line to Upminster
Take District Line to Embankment
Take Bakerloo Line to Embankment
7 UP
Take Northern Line to Mornington Crescent
7 RIGHT
7 RIGHT
7 TEACH
6 BOND
6 BOND
6 BOND
5 RIGHT
5 LEFT
5 RIGHT
7 BOND
7 TEACH
5 TEACH
6 YELL
5 TEACH
6 YELL
6 YELL
4OURfuorfuor
FOU4
FOU4
FOU4fuor
FOU4four
4444fuor
FOU4
FOU4four
4444
4OUR
4OUR
4444
 ; ;
set ! 57
set ! 51
out &49 &1
out &56 &1
out &50 &1
When this program starts:
There is a scribe called x
x is to write 179

p now 70 dollar off!
p has been selling out worldwide!
More 91 of this
How much is it
red down one blue up red down one blue up red up one red right two blue up
baa baaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa bleeeeeeeeeeeeet bleeeeeeeeeeeeet bleeeeeeeeeet baaaa bleet bleeeeeeeeeet bleeet bleeeeeeeeeet
#
#8""C""Hata_;re7^0::Prullasge>Ex Crithary,8,3"t"F :n^*2giogrlopstdisp[]!!48 ?\在ug=2\0C05+---<?ML42yalet d=1/;b=~ 16mb|>^ ?4oequ@  :!?25:
 
*/
 
#1""
#if!1
.int 2298589328,898451655,12,178790,1018168591,84934449,12597
#endif//*
#1""//*:
#include<stdio.h>
#define z(a) #a
#define u "e"//"
const char*i="25 10 37 1""a c #FFC0FF""B c #0000C0""d c #58007B""e c #0C8302""o c #FF8000""t c #FF00BC""u c #008080""h c #E60001""i c #CAFFFF""f c #280000""k c #CA0000""l c #CA007F""n c #330001""q c #E60000""A c #0040C0""E c #808000""F c #00C040""G c #008000""R c #800000""H c #0000AA""I c #00AA00""C c #55FFFF""K c #AAAAAA""r c red""g c green""b c blue""c c cyan""m c magenta""y c #FFFF00""x c black""_ c #FFFFFF""V c #000502"": c #010001""@ c #090909""2 c #000002""3 c #000003""4 c #000004""HHHVahtdegggggggyrggggggc""IHH3aixuEFbGGbggbryAEGRgc""CCH:afyurbgbgggggggb____o""ICH2akmyyyyyyyyyyyyyyyyye""I__:almyyyyyyyyyyyyyyyyye""K__4anmyyyyyyyyyyyyyy_y_e""HH_:aqggyyyyyyyyg____m_Ce""CH_@axxxxxxxxxxxxxxxxxxxx""K___aaaam___bbbbbBm_bbBab""K___________bbbbb___bbxbb";//"
//\(
typedef int known,macro;int x= 0,    y[60];macro m(){0;}int f(int a,...){y[x=0]=x=72;printf("\x25i",!m?195:!a?124+x:sizeof' '-1? (1&*z (N)?234:!"\??-"[1]?67^*u"":*u""?218:402 ):*u""?37:z (0'0  0'0 )[7]?75:"\??-"[1]?77+a/2:77);}__attribute__ ((weak))int main (){known y;int i;f(x,x=sizeof y);x=1;return 0;}__attribute__((destructor  ))int g(){x?0:puts("198");}//())*/
 
#1""/*/
<<<<<<<<<<WQTkTTX
 
 
>import Prelude;import GHC.IO;import Data.Functor.Const;import Data.String;import Text.Heredoc;import Control.Exception;import Language.Haskell.TH;import Text.Show.Functions;instance Monoid a=>Monad (Const a)where _>>=_=mempty
>instance K Float;instance IsString Integer where{fromString _=0};b=x#x
>i_= -1`mod`2+c;data B=B Int;_=B b;e=error"#//";f?n=unsafePerformIO$ catch (f e)$ \ErrorCall{}->r n;instance Num(a->b);instance Num(  );instance Show(Q a)where{show _=""};f= (^ );q _=r$ (d.B)?4;d (B _)=r$0`f`f 2 64;class(Show a,Floating a )=>K a where{k::a->String;k _=show$ (id::a->a )pi};c=l (- x )`mod`4;g=[here|here<-""]--[|]
>--W
>x=0;y#a=subtract 0b1206;x#a=174;h a=a^x;r=pure;l a=length$ show a;forall=0;z|(∀)<-5=forall;b1206|let _._=x;negate _=3=206+[40,58,0,57,55,26,16,3,4,-78,0,1,8,5,6,12-1]!!(l("  ",0x0.1,1e1,(0`id`),k(0::Float ),toEnum 0::Num a=>Enum a=>a )+2*l  (do a<-Const[1];pure a,h pi,h(0::Real a=>a))- 3*(l$(pure$TupE[]::ExpQ))-(-q?6+70+z));(!)=seq
>;
>main|let p!_=0=print$ sum[last$ 172:[[b,0,170,303]!!i_|g<">"],0!61]--} 
 
#1 ""/*/
#if!1
#endif//*
/*/
#if!1
p_;
select 192;
.exit
382-9/5*50
quit
#endif
p=sizeof("   (\");print'(''72'')';end !" );main(){puts('??-'&1?"101":"92" );return 0;}
#if 0
#endif/*
#}
disp 49
#{
}{}<>
␍
S\\
#<2^2^2^7^MAOAOAO␍
#<9^7^8^MUOUOF
 /._++.._#;!;.;_;++.-.>@
#:  /
 \?     -/!  +++++++++++++++++++++++++++++++++++++++++++++++++<>^+++++<\>+++.-.
rebol[ ]prin either Value? 'disarm[223][270];red[ ]prin 221;  -_#.---.>/
#x{  /<+>/   K yya+-        &:>g+$02y#v_"693",,,@_>10k !'&* 001- #vk!>2*+'P:3+'D'34#v({64cf6e9d-b164-405b-a844-f21caf252402}+<>2+^              >0  ^
# {\
''';'#{' #'}'}'
#@[[[["272"?]] #]]******<````(print 346 )#9)print 379#s()
#<<<##>␍'@#'
#ce:ss~#
#endcomment K`250
#nocomment outtext("155" )
#/`psZ283MIOnDrFe
#\!|!o51   ;         ~nJQ  p'34' \=#x=4;print(1>>-1<2 ? 17 : Inf16-0|>sizeof>2 ? 162 : √4x<8 ? 201 : 225+2>>1*2 )#p⟫try {EVAL 'say 「27」;exit'};say 237#⟫say 167#{{p{{}}}}say 235#]#                #]##>/1a97*.;  /8a7*._/#print  (171)#s-#print(365-((1/2)*380))#s|# print(208)#sCOMMENTprint("65")#ERi521@<? ? ?342;![["172"?]]]]* * * * * *<es9#
#8M`|  <esc>dggi2<esc>// :~-<~ -< ~-<<<~-! `=> #
#1//  >>END-IF*>>>9#
# '>+/*' 25  >[};}]+pppppeeeee^*n\               \! 99              \*n*n*e*s*s*s*ee*n*n*n*e*sss*e*n*n*n*ee*js"(*)//dd"                  <e 5>1  */// **/*/*/*/*/*/*/--\)∙226p|_|_X222999612#

Try it online!

At least gcc 13 is needed. Compile with -std=c2x.

C23 shares code with tcc because both of them don't support trigraphs. They are separated with *u"", where #define u "e" (tcc doesn't support u prefix for strings).

\$\endgroup\$
4
\$\begingroup\$

404. HTML+CSS (QEmacs), 17048 bytes

# 6 "($11k_rv+'50;+'51;5 5 %$\--$[0=@$a a tqx\"  /*4veDhfdIg/\"" 3 4//*{{{'F*Pi^5 6-di26qxy}363qx}318qkp16[.qx]"8=,k]\[] PPX~_~)"xvyq" \( # CO"14"#:9 {?63#k9 # a   k zzzzkf kf k zzzzzd kf k zzzzza kf bfz "'" #\\
# 1"7"//['][']     ````      [>.>.?]~~)[aatxy iiipsddpsdoh (22)S ## &rem      / \     <!--    5mxf [email protected]           <MZWWWWWWWW;WUU  U UUzR                       ]++(--[     x               :_a5# 202ø!},{P_<Ám/e!<ÁmOe!<É}M<ÁmS15%!!%BB44,222%!!%BBPZPYAAA4D,5P[5?4-0!<½!!22<2/!]ss1]'[kkX"204".â'_PPQss>3Ā~>1Ā~>7Ā~v 7 999993 1 7 3 1 8 1 1 55                                         #z#1111#y#y#y#_#        {! 1>?7ДOq#t#>2/Wr#t#t#q#68#r#t#t#68#q#63#r#t#t#6v#>#</Wr#6}#y/===Wr#7ЯOq#>J7Д/Wr#y<Wr#>5/Wr#t#t#6y#>-=/Wr#6|#>6/Wr122! 1退           coding=utf8         @ [[[["472"?]]]]******<
# if-0//        nthteo 18&1& nthieo nthneo anet\#184 O@   R[+++]._----.^    p/112\11&if -%*==-* (echo 335&exit)else goto e&WWWWWWWWWWWWWW#WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWW#WWWWWWWWWWWWWWWWWWWW;WWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWWR
#6!@`D>>if 3>3*>++++++ \        / 78"oo@" , `'[]'[]` ;L    >"082",,,@_     xx-----xx       ##### #######     #### ##  ######     ####>   []   ###### # ####  #######     ####         ###### # ####  #######    #EEEEEδΘΔΔΔΘΔΘλ
# endif/*   v 1 >>>>@::c>>">r"{\>>>>> @ 0:8:8/_}\(*[>]R 10G|'53'S  1111    \)\[ >>>>>#####>#######>>>#>#>>>>#####>>#>>>#>>>#>>>>#####>####>>###>>>####>#>># #####  #    ##### ####  ###   #### #  # #####  #    #
#comment -[v>]-main=-[165]-   ###[@,,,"279"_]#-$y2222]>252O @>>>>>>> h$s o#>>>326>########>>>>##>###>######>########>####>#####>#######>#####>###>>>>#>#>####>###>#####>#######>#####>###>>>>#>#>####>###>#####>#>>>>>>>9
#[[/]e]    >>>>>>>> @!:!8:6:2/_>>>>>>>>>>>>>>>>>>>>>>>>>>>;  >>>>>>>>>>>>_>>>>eeePs#v##########; ### ## #####  ## #### ## # #####  ##^##### ####   ##### ## # ##  ## ####  ## ##### ####   ##### ## # ##  ## ####
#cse xx xx xx             2222222222 @,,,"361";@,,,"362_" ;># 23-2g_"01",,@_       # ????!?!??!??!!!!???!?!??!!?!?!!!!!?!!!!?????!????????????????????! :1*23/5%6E2 iiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiii            
#11 cbbbzcba aaabaca1tauaxayatbubxbtcuc 11      xx xx xx r3o5o8ox xx xx .-#351$#&  # 329284   38839237137637028538937437711 37239942236736836636911 289364373   375393
#~[! R++++++] +++++++++\++++++++++++++++++++++++++++++++++U.._+++++++._+++o+++o--ox#
####################################################################################>121 *1220*1211k*1220 2 2 2 11
 #{{{{]~*[~* -[>+<-----]>-._+++++._+._@]+-}}[._+;;+;;+;;+<>;;+;;+;;+;;;;;;+;;+;;.._]}++<^>--[^>[+[>+^-----]>.- ._+++._> ]<[+[>+<-----]>--._++++._+++._<] ]+-+<[<=oC<=oC<._>>>>-]^>[<-[>+<-----]>-@@+.---@._+>$]  )++$--![+++[>+++++++<-]>+._+++++.._>]( '4o'6o@ {{{ {{{ {{{ {{{ {{{ {{{ {{{ {{{ {{{ {{{ {{{ {{{ {{{ {{{ {{ <<>> }<}>}[<}}<<}<<<<<}<<}<<<<}<<<}}}<}}<}}<}}<}}<}}<}}}<}}<<<<<<<<<<<}}}<}}<}}<}}<}}<}}<}}}<<<<<<<<<<}]  >>\[/>\/\>>>>>>>]>\[./>>\/\./\/>>>\./]  [328][]  [[[[.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.][.].,][.].,][.][.][.].,]  [[].[[[
#* *#p 173#*
#`⟪`⟪\⟫9999 9 9e:
#{  
#/*9 999 99 9999  nMn MMMMMMMnnMnnnMnMMMMMMMnMMnnnnnM>MnMnMnnMnMnnnn   //`. :-print(186). end_of_file. `MnM             @,,, "286"_+1y2 #<"67",,@_␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋'''␌`297'print quit`sssMMMMMMMMnnMnMnnnMnMMMM''';201-1|>print;exit 0␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␌␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋␋
#|9 e: 
#( 9 9999
#<<<#//-->
#><meta http-equiv=X-UA-Compatible content=IE=99><!--e$P+++++*D*+++1++1E!sss \font\f=cmr12\f352\end
#-bqbqbqLzLzLz TcTcTcRqRqRq TzTzTzRtRtRt MbMbMbTqTqTqAbAbAbTmTmTmBqBqBqMzMzMzUgUgUg\␍331;"${print+191}$x";exit;# ?>\␍try:eval("2?2"  );print(349)#\␍except:import inspect;a=9;b=2;print(not inspect.isfunction(lambda:2 )and 395or-a is-a and+391or'𒁁'=='-'and 241or-b is-b and+1or 394)#\␍exit(0 );'''ss';@'␍[puts 59][exit]'''
#= $1$10l0c01b1b0l0i 0r 0h0h1d1 1 1 0e 0y0y 0mo1d0y0e0e001d0i0f 0g 0n0n1 10mo0n0t_0t0mo0f0t0g0g0f0h0r0r0i0001b10c 0c0l1111000001_1 100|_\
[ ' "`e```.1.0.6i]56pq["``\/*]298 .quit._[`\']"\"put 294 bye!\`""360"print bye! #ss['];#/\\/;print 24;exit}}__END__/
###\ e>+@+-@@@@=>+<@@@=>+<?#>;?\:-._++._++++._#/<?\>3-++._6+---2._#/++++++++++++++++++++++++++++++++++++++++++++++++._++._++++++.>!\
[ ']`w`WWW(wWWWWwvwWWwWWWwvwWWW\wWW_WWWWWWwWWWW/wW\WWWWWWwWWWWWWWWw//wwwvwWWWwWWWWwvwWWwWWWwvwWWwWWWwvwWWwWWW xx xx xx xx xx xx xx ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho ho hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi hi MU ) ([])({}<(((((()()())){}{})){}{})>)(({})){}{(<(<()>)({})({}<{}>({}){})>){({}[()])}}({}){}({}()<()()()>) (<><()>){({}[()])}{ #(((()()()()())()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())(()()())) ((((((((\'; x=echo 403;$x||echo 350;exit#;a=$(printf \\x00);b=$(echo -n $a|wc -c);case $b[1]¢ in 1?)echo 54;;1* )echo 242;;4* )echo 78;;8* )echo $((9999999999999999999>0?166:244));;0?1??)echo 50;;0* )[ ~+ = \~+ ]&&echo 282||echo $((346+010));;* )echo 58;;esac;exit;#{IO.puts 295# [']; print (0and eval('":"&&(defined?A)&&290||(defined?pp)&&190||(defined?__dir__)&&13||"_"[0]==95&&108||109+1')or(None and(-1 %2>0and 9or 247)or eval('5<<64>>64or 68')));[exit];'"';"#{puts 187;exit}";'"';#wWWssss{}#(prin 45)(bye){{{}#}#}#r"\"print(355);400#{}"(prin 199)(bye)) 46(8+9+9+9+9+=!) >* * * * *[[[[3+4*7*@] ] ] ]sxxxxxxxxxxxxxxxxxxxxx
###;{e=1}={e:null};console.log e&&39||180;\
__DATA__='''  
#'  \
__END__
se pr':;@echo 185 #';se pr'-';pr 89+1/2*518;exi
ifdef ss 
1     ! !
2   !    !
9      !!
2#
#xx xx xx xx xx
dddd d b ggggg g iii i llllll l dddd ddddd cc ggggg g ooooooo dddd d ooooooo iii iiiii ooooooo eeeeeeeeee
echo 353;exit;'
#PLACET,2<- #2FAC,2SUB#1<- #52FAC,2SUB#2<- #32FACREADOUT,2PLEASEGIVEUPFACs wwwwwwwwwwwWWWwWWWWWwWWWWWWWwWWWWWWWWWwWWWWWWWWWWWWWWWwWWWWWWWWWWWWw W
jrzaeeaeuee_wuuwq jii_iullluiiiogr se_eeepaeeeeeeeeee;eeecisajjarpppppp ⠆⠄⡒⡆⡘😆😨😒😨💬95💬👥➡😻😹😸🙀🙀😹😼😿🙀🙀😼😼😸🙀🙀🙀🙀
👋🔢🌚🌝🌝🌚🌚🌚🌚🌚🐸🐸🐸🐸🐸🐸😂😂😂😂😂😂😂🌚🔥😂😂😂😂😂😂😂💯💩🐸🔥😂💞💩💞😂😂😂😂💞🔥🌚▲▲▲²²²²▲¡▼¡▲▲¡⎚¿⁵228¦ₔ₁₉₃2♦10♦10♦10♥☰䷩䷏䷏䷨䷏䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩䷩⚎ֱֲֵֶֶֶֶַַַָָ  
밠밠따빠빠맣박다맣받다맣희맣희吾有一數曰二百八十一書之うんたんたんたんたんうんうんうんうんうんたんうんうんうんたんうんたんたんうんたんたんうんたんたんうんたんたんうんたんたんたんたんたんうんうんうんうんたんたんうんたんたんたんうんうんうんたんうんうんたんうんうんたんうんうんたんうんたんうんうんうんたんたんうんたんたんうんたんたんうんたんたんうんたんたんたんうんうん  
😊♈💖  ↨↑1↑↑↑↑↑↑↑↑↨21↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑↨↨↑2↨↑1↑↑↑↨↨0↑0↕→
😇♈♈  
😊♉♈  
😇♈♈  
😇♈♉  
😇♈💜  
😊♉♈  
😊📢♈  #e:>*****[[[[828+*+@+*99] ] ] ]*****<
😈♈💜  
😊📢♈  
😇♉💞  
😊📢♉🐸⠀⢃⠛⠋  
#-49,A,-1                              #
#-5,A,-1                               #
#6,A,-1                                #
#X  
_+------+XX  !X583nnn;XXX
_|/0110@| X X  XXXXXXXXX X
_|/00011| X X   XXXXXXX
_|/1001 | X[``]````
_|/1001 | /183nnn;/283nnn;
_|/1000 | /01-2%+?/123nnn;
e|/$001 |  ;nnn383\          #/ff*:*:* :*:::*{,-?\ 683nnn;}
e+------+101-2%+?!/ 1a,3*3a,-?/483nnn; :n@04+7*aa/
#+    +
1   *xxxxxxx
53 x+       x x     xxx
1  x*  xxxx  xx   xx x  x
x  x  x  7  8 3  n  n  n;
 +xx xxxxxxx +x xxxxxxx  xxxx
x  x   x      x   x
51  +xx        xxx
#  
1   *     x``   x  x
49 #+  xx+x=>+  x+x + x B+ ===+
#  =x x  x===  x x >8 xxx +++= +
#+  +x + x,_8=>+ xB  x+x
# =+R _*=x==  x +===+> x x    +
 x +R"12"+8=Dx B=xD +  + xxx+
#+ ``=>8=x>  x+~ x  x +x+B+
#  +====+x>~+B+= x x + x
#D~+x 8=++>8x +=   x+    +,_   +
15 + x   x  + +  xx   +  ?   ?@  %"18"_     !
1  + x   + x ++  xx   + ?@    ?
1 \+* x    +  +  x    +   +   *
1   ! x  +x   +       + ?  !  ?
1    ! x xx --... ...--  ? @ ?
x +   ++ xx  ++ ++     +
 +xxxxx  +     +
  
#= +
+ *   +
#= + *
#=**************************************************+
  +  +$$$
#>"3"O._   +// rk:start | print: "69" rk:end       +
   + ; + *
$'main' *****+ %++ %++ @@* %-- @@* %++ %++ @@*
 -+3o4o#  +
  <++"269">o+
^* *
 #+*****|
.x= #   +
,,  .=#
 #+ OOO       =#
 #^=
+`` 231 =#
#  #uuu#
,,..,.,,,,..,.,.,,..,,.,,,...,,.,,..,,,,,,..,,,.$
  
write 224;bye; 
  
 console.log 178;
  
~~~x  
main:Int  
main =248 
~~~  
literally, print 249
(print 164  (exit    ) )
  (  *)
begin write         ('288'    )end.(*)
print 61
51 outputascii 57 outputascii 48 outputascii quit
#<<<##>  
         print(85)
#<<<##>CO COMMENTp]] 
execute_process(COMMAND echo 296)#[[
  
T:251  
E:0  
#+IDRIS: main:IO      (    );main=print 291
#ppW<#require"stdio"Stdio:write     (293  )#>
#ceppp  ;  ;   ; ;
MsgBox (0,"",169   )
#cs  
You can see an x here.<<  
  
>{-<<<<<<<<<<<  
>> R2
  
>> -1
  
> 398
  
> 397
  
> 176
>> Output 3
>SET x TO 120.
>X x.   ;-}
>l=length$show"\0";main=print$[0,0,0,233,0,146,157]!!l{-
  
\begin{code}  
{- ;  ␉␉␉␉ 
␉
 ␉  



-}
open import IO;main = run (putStr"159" )
\end{code}
ppppppppppppp;
# {{{ {{{ {{{ {{
#!ZZt >>END-IF
#xxxh  program-id.h.procedure
#xxxg  diVision.display 230.
#}}}f >>IF 2>2
#}}}e
#xxxd
#xx}c
#}}}b
#x}xa
#n::=~147
RA::~322
::=
*/
#if!1
#endif*/*/*/*/;say 338/*
#1""/*
333
quit

:e
 if -%~0==- echo 341&exit
set/ax=2222222222
 if -%x%==- echo 330&exit
 if %x% gtr 0 echo 337&exit
echo 336
exit

#!rubyperl
; print 0&&339||340
__END__

#}}} }put$343 {{{


#]#47|>print"""]#
let d="""#\""";echo 21#" """;log 380
#[#[
 
[][=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=[=][
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
]x
 
[[[=
x] 
x] 
x] 
x] 
 
[[[=
]x
][[=
] ] ] ] ] ] ] ]

MoOMoOMoOMoOMOOmoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOMoOmOoMOomoomoOOOM
  ;  ;  ;  ; ;;  ;  ;  ;  ;  ;  ;  ;  ;  ;  ;  ;  ;  ;  ; ;  ;      ;;;



















































































































































































#//-->
<attache>Print[194]Exit[ ]</attache>
 
<script type="text/tiscript">self.html="<p>302"</script>
<script>d=document;d.innerHTML="<p>344";onload=function  (){
g=window
e=g.external
d.body.style.color='000'
d.body.innerHTML=e===null?334:[ ].pop?
257+[10,,,0,,,18,2,!e?77:d.clear?5:58,d.compatible?50:g.XMLHttpRequest?49:d.nodeType?8:55][[""+[].pop][0].length-!!d.head-!d.fonts-28]:d.dir==''?312-1:308}
</script>
 
<h1>404</h1> #//<!--> ->
<p>301</p>
<a>304</a>
<b>305</b>
<i>309</i>
<u>310</u>
 
<style>
head+body,text,h1{display:none}
:,a,i{color:fff}*{+color:fff}
a{-color:000}-a,b{color:000;-color:fff}
: u,-i{color:000}
:after{content:"258";[;content:"276";]}
@media all\0{
:after{content:"260";color:#fff\ 
}:root:before{content:"316";color:fff}
:before{content:"314"}}
@media \0 all{:after{content:"266"}}
@media x{:before{content:"345"}:after{color:#fff
}}</style>
 
#^^
#*RV3>>[0]{472454523665721469465830106052219449897} ()//~#class C{function:Main (a:String[] )~Nil{83->Print();}} #~
#%RV2>>                          ()
#V2->=359
#V3->=323
 
 
22-23-31-13-13-31-13-13-31-13-13-31-13-13-31-12-12-23-31-13-13-31-13-13-31-13-13-31-13-13-31-21-22-21-12-32
Take Northern Line to Tooting Bec
Take Northern Line to Charing Cross
Take Northern Line to Charing Cross
Take Northern Line to Bank
Take District Line to Hammersmith
Take District Line to Upminster
Take District Line to Hammersmith
Take District Line to Upminster
Take District Line to Embankment
Take Bakerloo Line to Embankment
7 UP
Take Northern Line to Mornington Crescent
7 RIGHT
7 RIGHT
7 TEACH
6 BOND
6 BOND
6 BOND
5 RIGHT
5 LEFT
5 RIGHT
7 BOND
7 TEACH
5 TEACH
6 YELL
5 TEACH
6 YELL
6 YELL
4OURfuorfuor
FOU4
FOU4
FOU4fuor
FOU4four
4444fuor
FOU4
FOU4four
4444
4OUR
4OUR
4444
 ; ;
set ! 57
set ! 51
out &49 &1
out &56 &1
out &50 &1
When this program starts:
There is a scribe called x
x is to write 179

p now 70 dollar off!
p has been selling out worldwide!
More 91 of this
How much is it
red down one blue up red down one blue up red up one red right two blue up
baa baaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa bleeeeeeeeeeeeet bleeeeeeeeeeeeet bleeeeeeeeeet baaaa bleet bleeeeeeeeeet bleeet bleeeeeeeeeet
#
9#8""C""Hata;re7^0::Prullsge>Ex Crithary,8,3"t"F :n^*2giogrlopstdisp[*u""]!!48 ?\在u2\0C05+---<?ML42yad=1/;b=~ 16mb|>^ ?4o@  let ,0,1._#:
 
*/
 
#1""
#if!1
.int 2298589328,898451655,12,178790,1018168591,84934449,12597
#endif//*
#1""//*:
#include<stdio.h>
#define z(a) #a
#define u "e"//"
const char*i="25 10 37 1""a c #FFC0FF""B c #0000C0""d c #58007B""e c #0C8302""o c #FF8000""t c #FF00BC""u c #008080""h c #E60001""i c #CAFFFF""f c #280000""k c #CA0000""l c #CA007F""n c #330001""q c #E60000""A c #0040C0""E c #808000""F c #00C040""G c #008000""R c #800000""H c #0000AA""I c #00AA00""C c #55FFFF""K c #AAAAAA""r c red""g c green""b c blue""c c cyan""m c magenta""y c #FFFF00""x c black""_ c #FFFFFF""V c #000502"": c #010001""@ c #090909""2 c #000002""3 c #000003""4 c #000004""HHHVahtdegggggggyrggggggc""IHH3aixuEFbGGbggbryAEGRgc""CCH:afyurbgbgggggggb____o""ICH2akmyyyyyyyyyyyyyyyyye""I__:almyyyyyyyyyyyyyyyyye""K__4anmyyyyyyyyyyyyyy_y_e""HH_:aqggyyyyyyyyg____m_Ce""CH_@axxxxxxxxxxxxxxxxxxxx""K___aaaam___bbbbbBm_bbBab""K___________bbbbb___bbxbb";//"
//\(
typedef int known,macro;int x= 0,    y[60];macro m(){0;}int f(int a,...){y[x=0]=x=72;printf("\x25i",!m?195:!a?124+x:sizeof' '-1? (1&*z (N)?234:!"\??-"[1]?67^*u"":*u""?218:402 ):*u""?37:z (0'0  0'0 )[7]?75:"\??-"[1]?77+a/2:77);}__attribute__ ((weak))int main (){known y;int i;f(x,x=sizeof y);x=1;return 0;}__attribute__((destructor  ))int g(){x?0:puts("198");}//())*/
 
#1""/*/
<<<<<<<<<<WQTkTTX
 
 
>import Prelude;import GHC.IO;import Data.Functor.Const;import Data.String;import Text.Heredoc;import Control.Exception;import Language.Haskell.TH;import Text.Show.Functions;instance Monoid a=>Monad (Const a)where _>>=_=mempty
>instance K Float;instance IsString Integer where{fromString _=0};b=x#x
>i_= -1`mod`2+c;data B=B Int;_=B b;e=error"#//";f?n=unsafePerformIO$ catch (f e)$ \ErrorCall{}->r n;instance Num(a->b);instance Num(  );instance Show(Q a)where{show _=""};f= (^ );q _=r$ (d.B)?4;d (B _)=r$0`f`f 2 64;class(Show a,Floating a )=>K a where{k::a->String;k _=show$ (id::a->a )pi};c=l (- x )`mod`4;g=[here|here<-""]--[|]
>--W
>x=0;y#a=subtract 0b1206;x#a=174;h a=a^x;r=pure;l a=length$ show a;forall=0;z|(∀)<-5=forall;b1206|let _._=x;negate _=3=206+[40,58,0,57,55,26,16,3,4,-78,0,1,8,5,6,12-1]!!(l("  ",0x0.1,1e1,(0`id`),k(0::Float ),toEnum 0::Num a=>Enum a=>a )+2*l  (do a<-Const[1];pure a,h pi,h(0::Real a=>a))- 3*(l$(pure$TupE[]::ExpQ))-(-q?6+70+z));(!)=seq
>;
>main|let p!_=0=print$ sum[last$ 172:[[b,0,170,303]!!i_|g<">"],0!61]--} 
 
#1 ""/*/
#if!1
#endif//*
/*/
#if!1
p_;
select 192;
.exit
382-9/5*50
quit
#endif
p=sizeof("   (\");print'(''72'')';end !" );main(){puts('??-'&1?"101":"92" );return 0;}
#if 0
#endif/*
#}
disp 49
#{
}{}<>
␍
S\\
#<2^2^2^7^MAOAOAO␍
#<9^7^8^MUOUOF
 /._++.._#;!;.;_;++.-.>@
#:  /
 \?     -/!  +++++++++++++++++++++++++++++++++++++++++++++++++<>^+++++<\>+++.-.
rebol[ ]prin either Value? 'disarm[223][270];red[ ]prin 221;  -_#.---.>/
#x{  /<+>/   K yya+-        &:>g+$02y#v_"693",,,@_>10k !'&* 001- #vk!>2*+'P:3+'D'34#v({27acf46b-af0d-4edf-8b25-70b17fb8660c}+<>2+^              >0  ^
# {\
''';'#{' #'}'}[']
#@[[[["272"?]] #]]******<````(print 346 )#9)print 379#s()
#<<<##>␍'@#'
#ce:ss~#
#endcomment K`250
#nocomment outtext("155" )
#/`psZ283MIOnDrFe
#\!|!o51   ;         ~nJQ  p'34' \=#x=4;print(1>>-1<2 ? 17 : Inf16-0|>sizeof>2 ? 162 : √4x<8 ? 201 : 225+2>>1*2 )#p⟫try {EVAL 'say 「27」;exit'};say 237#⟫say 167#{{p{{}}}}say 235#]#                #]##>/1a97*.;  /8a7*._/#print  (171)#s-#print(365-((1/2)*380))#s|# print(208)#sCOMMENTprint("65")#ERi521@<? ? ?342;![["172"?]]]]* * * * * *<es9#
#8M`|  <esc>dggi2<esc>// :~-<~ -< ~-<<<~-! `=> #
#1//  >>END-IF*>>>9#
# '>+/*' 25  >[};}]+pppppeeeee^*n\               \! 99              \*n*n*e*s*s*s*ee*n*n*n*e*sss*e*n*n*n*ee*js"(*)//dd"    <<  --># #    _e 5>1  */// **/*/*/*/*/*/*/--\)∙226p|_|_X222999612#

Try it online!

Get source (this is newer than qemacs-0.3.3.tar.gz):

cvs -z3 -d:pserver:[email protected]:/sources/qemacs co qemacs

QEmacs has utility html2png, I use it to test this answer.

The code:

<h1>404</h1> #//<!--> ->

QEmacs ignores top-level text outside of block-level elements, so in aaa<p>xxx</p>bbb only xxx is rendered. If there are any rogue < characters html2png segfaults. Most of the polyglot before HTML code is already commented out, and the part that is not commented out doesn't contain rogue < characters, so nothing needs to be done here.

I use <!--> to comment out the text after QEmacs code. <!--> opens a comment in QEmacs, unlike HTML standard, which treats it like <!-- -->. # is for Flaks, // is for Maze v2. Note how there are no < characters after the --> on the last line.

Sciter, IE 3.01 and Attache also consider <!--> to be a comment opener. Sciter (JS/TIS) and Attache are fixed by moving <script> and <attache> before comment (QEmacs doesn't support JavaScript). IE 3.01 is fixed by ->, which closes HTML comment in IE 3.01. Another way to fix it would be to use <!--->, but that breaks Navigator and Safari.

,h1 in <style> is for HTMLayout.

\$\endgroup\$
1
  • 2
    \$\begingroup\$ it can finally replace the 404 page polyglot \$\endgroup\$
    – Jo King
    Aug 17 at 11:16
4
\$\begingroup\$

451. SerenityOS Shell, 18950 bytes

Try it online!

I run it outside of SerenityOS (in Ubuntu 22.04).
Build: Meta/serenity.sh build lagom Shell
Run: Build/lagom/bin/Shell polyglot 2> /dev/null

SerenityOS Shell supports escaping a newline with \ inside a comment, unlike any other shells, so it skips lines 23 and 25 and ends up executing fish code. It is separated from fish using the same thing, escaping a newline inside a comment:

#...\
echo 353;exit
echo 451;exit;'...

(fish skips the code of other shells for a different reason: it recognizes \' inside '' strings)
It is necessary for both fish and SerenityOS Shell to hide a lot of stuff after exit inside '' strings to avoid syntax errors.

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

143. Beatnik, 6220 bytes