Tugas Anda adalah untuk membangun program (hanya menggunakan karakter ASCII yang dapat dicetak dan / atau tab dan baris baru) yang mencetak persis karakter dalam ruang ASCII yang dapat dicetak ( 0x20ke 0x7e) yang tidak muncul dalam kode sumber program Anda (dalam urutan apa pun, namun berkali-kali kamu mau).

Kode terpendek untuk melakukan ini dalam bahasa apa pun menang.

GolfScript, 15 12 karakter

{`),32>^.}.~

Berdasarkan jawaban Jan Dvorak dengan beberapa putaran dan juga gaya Peter Taylor .

Polyglot, 95

#undef X;A!"$%&'()*+-[,.]/0123456789:<=>?@BCDEFGHIJKLMNOPQRSTUVWYZ\^_`abcghijklmopqrstvwxyz{|}~

• Perl
• Perl 6
• Setiap * nx-seperti shell ( tclsh, bash, sh, ksh, dll)
• Awk (GNU / POSIX)
• Brainfuck , Brian & Chuck , turunan lainnya
• Rubi
• Naskah
• Naskah Golf
• Python
• R
• Julia
• Ruang putih
• rk
• Gaot ++
• bc
• jq
• Kegembiraan
• Tcl
• 99
• V (FMota)
• Acc !!
• C - jika tidak main()diperlukan. Berkat urogen
• Mungkin lebih.

Tidak melakukan apa-apa.

PHP 5.2, 4

<?<<

Simpan sebagai file yang dipanggil NYUIOMK()'DEAQRWVX[Z]\^@CBGFJqwv{z}|~`bgfkj203547698;=>!#"%$&+*-.phpdi suatu tempat di /home. short_open_tagperlu Ondi Anda php.ini.

Outputnya adalah:

PHP Parse error:  syntax error, unexpected T_SL in /home/wherever/NYUIOMK()'DEAQRWVX[Z]\^@CBGFJqwv{z}|~`bgfkj203547698;=>!#"%$&+*-.php on line 1

JavaScript - 88

alert("BCDFGHIJKMNPQUVXYZ".toLowerCase())// !#$%&'*+,-0123456789:;<=>?@[\]^_`{|}~AERTOWS

mencetak "bcdfghijkmnpquvxyz"

Spasi, 61 57 karakter

Ini bukan yang terpendek tetapi mungkin memiliki logika paling sederhana (itu hanya satu lingkaran).

Ini sepenuhnya dikomentari, di mana S adalah ruang, T adalah tab, L adalah umpan baris:

SSSTSSSSSL     # push 0x20
LSSSL          # label S
SSSTL          # push 1
TSSS           # add
SLS            # duplicate top of stack
SLS            # duplicate again
TLSS           # output ASCII character
SSSTTTTTTSL    # push 0x7E
TSST           # subtract (result - 0x7E)
LTTSL          # branch to label S if top of stack is negative
LLL            # end

Berkat @res untuk koreksi di atas (diperlukan duplikat tambahan untuk instruksi cabang) dan untuk angka yang lebih kecil untuk mendorong tumpukan.

C, 83 74 69 karakter

main(z) {for(;++z<96;"\33iE!vk?}GkRP8z"[z/7]&1<<z%7&&putchar(z+32));}

Saya benar-benar mencoba menurunkannya di bawah 80 karakter, tetapi saya belum bisa melakukannya. Saya akhirnya memutuskan untuk memposting apa yang saya miliki, dengan asumsi bahwa saya (atau orang lain) akan mencari solusi 79-karakter sepuluh menit setelah memposting ini. Oke, itu bukan sepuluh menit, tapi itu pada prinsipnya berhasil.

Saya benar-benar ingin memposting versi yang tidak harus memiliki ruang serampangan dalam kode sumber, tetapi yang mendarat di orbit-penarik aneh, memantul di antara beberapa solusi. Setelah beberapa menit mencoba untuk mendorong salah satu dari mereka menjadi solusi yang stabil, saya menyerah dan menambahkan ruang.

Skrip golf, 26 24 karakter

"126,32>''+".~\-'.~\-"'-

Mengambil skrip pembuatan generasi, menduplikasinya, mengeksekusinya, mengambilnya dari hasilnya, kemudian mengurangi kode pengurangan hasil dan karakter kutipan lainnya.

Ikan - 80

zbcdjkpqruvwxaABCDEFGHIJKLMNOPQRSTUVWXYZ#!"'$%^&*()@!+-[]{},;:/\<>=?|~0123456789

Ketika kesalahan ikan itu mencetak "sesuatu berbau amis ...". Karena z adalah instruksi yang salah, ia langsung salah

Saya tahu itu tidak memenangkan kontes. Saya hanya ingin mencobanya dalam bahasa yang biasanya tidak digunakan, hanya untuk iseng.

Java - 209 195 152 140 karakter

class a{public static void main(String[]a){for(char c=0;;c++)System.out.print("publicas{tvodmn(Srg[])h=0;w+ye.\"\\xO<?:}".indexOf(c)<0?c:"");}}

Dengan jeda baris dan tab

class a{
    public static void main(String[]a) {
        for(char c=0;;c++)
            System.out.print("publicas{tvodmn(Srg[])h=0;w+ye.\"\\xO<?:} ".indexOf(c)<0?c:"");
    }
}

Waspadalah jika Anda menjalankan: program tidak berakhir. Ha ha

Penjelasan

1. for(char c=0;;c++): Karena a chardapat diperlakukan sebagai int, saya menggunakannya untuk keuntungan saya di sini untuk meningkatkan semua nilai yang mungkin dari c. Saya menghilangkan kondisi terminating dalam loop (yang akan pergi antara dua titik koma) untuk menghemat karakter, karena tidak ditentukan bahwa program harus diakhiri. :)
2. "publicas{tvodmn(Srg[])h=0;w+ye.\"\\xO<?:} ".indexOf(c)<0?c:"": Sedihnya, bukan pendekatan yang sangat elegan, tapi itu menyelesaikan pekerjaan. Secara manual daftarkan setiap karakter yang ada dalam kode sumber sebagai Stringliteral, lalu periksa apakah arus char cterjadi di dalamnya indexOf(). Jika indexOf()panggilan kembali -1, itu tidak ada, dan karena itu kita harus mencetaknya. Sisanya hanya menggunakan operator ternary untuk menghemat karakter dan ruang.

Perl, 49 karakter

say grep/[^+-246\[-^aceghmprsy]/,map chr,041..126

Ini adalah tantangan yang menarik - ini semacam anti-quine, dan saya telah berhasil mempersingkat program beberapa kali dengan meningkatkan rentang karakter yang muncul di dalamnya.

Ruby, 81 78 68 66 62 57

(?!..?~).map{|a|$><<a if/[()ifmap{}|?!.~\/\\\[\]$><]/!~a}

Cukup periksa sendiri. Duplikat karakter yang dihapus secara manual.

Terima kasih kepada Josh untuk menyimpan 4 karakter, dan minitech untuk menyimpan 5 karakter!

Befunge (48)

<|::-1,+*88:<+3*87
6<@.**85
9>"()~&"/%$ |!#';=?}

Output: {zyxwvutsrqponmlkjihgfedcba` _ ^] [ZYXWVUTSRQPONMLKJIHGFEDCBA240

Tidak terlalu serius, tetapi saya harus mencobanya:

JSFuck (138152)

(sumber kompilasi di sini)

Sumber asli:

for(x=0x7e;x>0x19;x--){
    console.log(String.fromCharCode(x).replace(/[\[\]!\+\(\)]/ig, ''))
}

Mencetak semua karakter kecuali () + []!

Tugas Anda adalah untuk membangun program (hanya menggunakan karakter ASCII yang dapat dicetak dan / atau tab dan baris baru)

Astaga, Anda menyulitkan APL (Apakah itu delibarate?)
Jadi saya memutuskan untuk Abaikan Semua Aturan !!!

APL (Dyalog), 3 10

⎕AV

Mencetak vektor atom (yang mencakup semua karakter ASCII yang bisa diperbaiki)

Ternyata saya benar-benar lupa tentang bagian "tanpa" ...
Tapi itu perbaikan yang mudah

⎕AV~'AV'''

~'AV'''berarti mengecualikan ( ~) karakter A, V dan kutipan tunggal (lolos sebagai tanda kutip tunggal berlipat ganda)

Mengenai pencetakan non-ASCII, well, Saya Mengabaikan Semua Aturan.

GolfScript ( 18 16 karakter)

"),@`^^32>#.~".~

Demo online dengan garis tambahan yang melakukan pengecekan kebenaran dan menampilkan jumlah karakter yang salah.

(Saya memiliki berbagai alternatif yang setara. @`^Dapat diganti dengan \\`; #Dapat diganti dengan `atau ]. Kombinasi yang tepat dapat digunakan dengan trik Howard untuk menyamakan skornya 15 karena backslash tidak perlu melarikan diri dalam blok seperti yang mereka lakukan dalam string literal: {),\`^32>].~}.~Tapi Howard layak mendapatkan pujian untuk trik itu).

Brainfuck, 173

+++++[->++++++<]>>>++[------<+>]<++++>>----[----<+>]>-[-------<+>]>-[---<+>]<------->>-[---<+>]<+++++++++>>--[-----<+>]<+++++>>+[---------<++>]+++++++++++++[<[.+<]>[>]<-]\=,

Cukup lama, saya mungkin akan mencoba lagi nanti.

J ( 52 40)

Sunting: Duh, lupakan e.

'''(-@.e#[)~95{32}a'(-.@e.#[)~95{.32}.a.

Versi lama:

(>@(*/@('(>@*/''&~:).#]32{95}a'&~:)&.>)#])95{.32}.a.

Varian lain (panjang yang sama tetapi keluaran lebih sedikit):

([#~*/"1@('([#~*/"1@''&:0)95{.32}a'&~:"0))95{.32}.a.

Python 3 - 68 61

x=r"print(*set(map(chr,range(32,127)))-set(x+'=\"'))"
exec(x)

... terima kasih kepada @WolframH untuk perbaikannya.

PowerShell: 96

Harus disimpan dan dijalankan sebagai skrip.

diff([char[]](gc $MyInvocation.InvocationName))([char[]](32..126))-Pa|?{$_.SideIndicator-eq'=>'}

diffadalah alias bawaan untuk Compare-Object.

gcadalah alias bawaan untuk Get-Content.

$MyInvocation.InvocationName mendapatkan path lengkap ke skrip yang dieksekusi.

32..126adalah ekivalen desimal untuk 0x20..0x7e, dan karenanya menciptakan larik kode ASCII desimal yang kami cari.

[char[]]mengambil konten objek berikutnya dan menempatkannya ke dalam array, memecahnya dan mengubahnya menjadi karakter ASCII. Jadi, kami sekarang memiliki dua larik karakter ASCII - satu ditarik dari skrip ini, yang lain ditentukan oleh kriteria tantangan.

-Pamengatur Compare-Objectke format "Passthru", jadi hanya item yang ditemukan berbeda antara input yang dikeluarkan pada konsol - indikator item mana yang inputnya masih disimpan dalam data objek, tetapi tidak ditampilkan.

|?{$_.SideIndicator-eq'=>'}Compare-Objectkeluaran pipa ke Where-Object, yang memfilternya hanya ke item yang eksklusif untuk input kedua.

PHP - 92

<? //A"$%&'()*+[,.]0123456789:=-@ABCDEFGHIJKLMNOPQRSTUVWYZ\^_`abcdefghijklmopqrstuvwxyz{|}~#

Keluaran:

tidak ada

OP meminta untuk mencetak semua karakter yang tidak digunakan, well, saya hanya menggunakan semuanya

Javascript, 92

(function f(){for(i=32;126>i++;)!~(""+f).indexOf(c=String.fromCharCode(i))&&console.log(c)})()

Java - 126 karakter

diminimalkan:

class hjq{public static void main(String...w){for(char z='"'|0;++z!='a';)if("'()+.0;=OS".indexOf(z)==~0)System.out.print(z);}}

tidak dikurangi:

class hjq {
    public static void main(String... w) { 
        for (char z = '"'|0; ++z != 'a';) {
            if ("'()+.0;=OS".indexOf(z) == ~0) {
                System.out.print(z);
            }
        }
    }
}

Ini adalah masalah yang menarik, karena token individual mungkin mendapat manfaat dari bentuknya yang lebih lama karena menggunakan kembali karakter. Sebagai contoh, biasanya String[]akan lebih pendek, tetapi String...menghilangkan kebutuhan untuk tanda kurung dalam string bersyarat.

Saya menemukan triknya adalah dengan mencoba dan menggunakan karakter di awal dan akhir rentang sehingga Anda dapat mengecualikan mereka dari output hanya dengan mengubah awal dan akhir loop Anda.

Untuk Java, karakter kunci yang dikecualikan adalah ", karena memiliki itu di dalam string memerlukannya, yang menambah \program Anda, yang perlu masuk dalam string, yang menambahkan \\. Dengan menghapus "dari string kondisional Anda, Anda menghapus 4 karakter. Ini dapat dicapai dengan memastikan Anda menggunakan dan !dan memulai putaran Anda dari #.

Semua huruf kecil muncul di dekat akhir dari jangkauan, dengan hanya {, |, }dan ~datang setelah mereka. Karena verbositas Java, sebagian besar huruf kecil digunakan hanya untuk boilerplate. Demikian juga, {dan }sepele untuk program Java, karena boilerplate membutuhkannya.

|dapat digunakan jika Anda memiliki atau kondisi, tetapi saya tidak bisa menemukan cara untuk mengambil keuntungan dari yang mengarah ke program yang lebih pendek daripada hanya menggunakan |sebagai operator bitwise. Itu |0membuat saya merasa sedikit kotor, karena itu satu-satunya bagian yang nop hanya untuk mendapatkan karakter di sana.

~0hasil -1, yang berguna karena itulah yang perlu kita periksa indexOf. Menggabungkan ini dengan menggunakan !=kondisional loop menghilangkan <karakter sama sekali, yang berarti tidak perlu masuk ke dalam string kondisional.

sh (47)

tr</dev/urandom -cd \[:print:]|tr -d "`cat $0`"

Menggunakan pendekatan referensial diri. Asumsi /dev/urandompada akhirnya akan menghasilkan setiap oktet setidaknya sekali. Tidak berakhir.

Jika kita menganggap itu mansudah diinstal, kita bisa menggunakan halaman ascii(7)manual (dan dengan demikian memiliki program terminating) ( 44 karakter, terima kasih @fennec).

man ascii|tr -cd \[:print:]|tr -d "`cat $0`"

BitShift , 1038 byte

BitShift adalah bahasa yang hanya mendukung 0dan 1sebagai sintaksis. Saya pikir itu akan mudah untuk mencetak semua karakter lain, tetapi karena itu tidak benar-benar mendukung perulangan masih berakhir dengan 1038 byte besar.
Namun, saya percaya itu tidak benar-benar mungkin lebih kecil dari ini ..

101001100101011011010100110111010100100101011001101111010100100101011001000101011011010100101100110110101001001010110010001010110110101000001101010010010101100100010101101101010000010000011001010110110101000010000101011011010100110111010100100101011111100101011011010100110111010100100101011001101111010100100101011001000101011011010100000000011010100100101011001000101011011010100110010000101011011010100110111010100100101011001101001101010010010101100100010101101101010011001000010101101101010011011101010010010101111011111110010101101101010011011101010010010101100101100101011011010100010001010110110101001000010101101101010011011101010010010101110111110010101101101010011011101010010010101111111100101011011010100110111010100100101011111011110101001001010110010001010110110101001000100000101011011010100110111010100100101011111010011010100100101011001000101011011010100100000101011011010100110111010100100101011001101111010100100101011001000101011011010100010000010101101101010011011101010010010101101001101101010010010101101001101010

Cetakan

 !"#$%&'()*+,-./23456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~

Coba di sini

Jelas merupakan solusi terpanjang di sini, tetapi pengkodean di Lino selalu menyenangkan:

L.in.oleum -655 523 karakter

"libraries"/arch/cpu/base;/hmi/conout;/data/bytes;/data/string/t2s;/data/heap;/data/heap/connect/mgrab;"stockfile"a;"directors"displaystatus=engage;"injection"c=524;b<-bytes.bytesizeconvert:c;b<-heap.alloc:b;a<-heap.alloc:c;[filecommand]=readfile;[filename]=stockfile;[fileposition]=0;[fileblocksize]=c;[fileblockpointer]=b;arch.fileread;[string.psource]=b;[string.ptarget]=a;string.t2s;b<-heap.alloc:7fh;c=32;d=b;"f"[d_32]=c;+c;+d;?c<7fh>f;"w"d=[a];+a;?d=0>y;?d<32>w;?d>7eh>w;e=b;e+d;[e]=33;^w;"y"b+32;"v"conout.say:b;bye;

Tidak ada komentar, baca saja sumber yang dikompilasi menjadi biner. Simpan sebagai a.txtatau tidak akan dikompilasi!

Brainfuck, 133 123 114 110 byte

++++++++++++++++[->++++++>++>+++>++++>++<<<<<]>-->>->->+[---<.+.+<.+<.+<.+.+.+>>>>]++[-<.+.+.+<.+>>]<+.<+.<++.

Sedikit lebih mengutak-atik solusi sebelumnya (sebelum saya menyadari di bawah ini lebih kecil - meskipun ini sebelum saya melakukan optimasi berat). Ini bekerja dengan menyimpan 4 set nomor ascii dan mencetaknya dengan beberapa perulangan rumit, dan kemudian memberikan karakter yang hilang sesudahnya (yaitu yang berada di antara nomor ascii yang tidak valid).

Pengiriman asli

>>+++++++++++[<+<+>>->++>+++<<]<++>>++++++>>+++++[-<<<++++++>>>]<<<+<<[->>+.<<]>>++.++<[->+.<]>++.+>[-<+.>]<++.+>>[-<<+.>>]

Ini melakukan hal berikut:

• Buat 4 register yang berisi 11. 13, 28, 33
• Buat angka 5 dengan nilai 31 untuk memulai pencetakan
• Cetak ascii 32-42 (11)
• Cetak ascii 44
• Cetak ascii 47-59 (13)
• Cetak ascii 61
• Cetak ascii 63-90 (28)
• Cetak ascii 92
• Cetak ascii 94-126 (33)

Haskell (70)

import Data.List
main=putStrLn$[' '..'~']\\" \\\"$'.=DLS[]aimnoprstu~"

Solusi duplikat-karakter-dalam-program-dalam-string, kurangi-dari-universal-membosankan. Jauh dari pemenang codegolf, meskipun mengejutkan terbaca panjangnya.

(Sekarang dengan pengurangan daftar bukan filter/ notWith.)

J - 21

(u:32+i.97)-.1!:1<":5

tulis ini ke file yang disebut 5di direktori saat ini. Kemudian muat jalankan skrip dengan0!:1<'5'

Atau 25 tanpa trik file:

(-.~".)'(":u:32+i.0-~95)'

Clojure (142, 106, 103)

(defn -main[](let[c"(fn[l](pr(reduce disj(set(map char(range 32 126)))l)));-\\\"o"]((load-string c)c)))

diformat:

(defn -main []
  (let [c "(fn[l](pr(reduce disj(set(map char(range 32 126)))l)));-\\\"o"]
    ((load-string c) c)))

Pikir ini yang melakukannya, mungkin perlu beberapa penyesuaian. keluaran:

#{@ ` ! A B b # C $ D % E & F ' G H I * J + K k , L M . N / O 0 P Q q R S 4 T 5 U V v 7 W w 8 X x 9 Y y : Z z { < | = } > ^ ? _}

menjalankan string, yang merupakan kode clojure yang dapat dievaluasi, dengan sendirinya. String memiliki beberapa komentar di bagian akhir untuk mendapatkan karakter yang digunakan di luar string (metode utama, dll)

Python 2, 69

for x in range(38):print chr(x+59)#!"$%&'*,-./012467bdjklmqsuvwyz{|}~

Saya menggunakan urutan chars terus menerus terpanjang (yang saya dapat temukan) yang dapat saya cetak dan tambahkan yang lain sebagai komentar setelah kode.