एक रेडिएशन हार्डडेन क्विन बनाएं


15

कल रात मैं रेडिएशन हार्डर्ड क्वीन चैलेंज की तलाश कर रहा था, लेकिन मुझे यह नहीं मिला। पता चला कि किसी ने अभी तक यह नहीं पूछा है! तो यहाँ यह है:

आपका कार्य एक क्वीन बनाना है, यह एक गैर-खाली कंप्यूटर प्रोग्राम है जो इसे पढ़ने के बिना अपने स्वयं के स्रोत को प्रिंट करता है। इसके अलावा यदि आप अपने मूल कार्यक्रम से किसी एक बाइट को हटाते हैं तो नए कार्यक्रम को आपके मूल कार्यक्रम के स्रोत को प्रिंट करना चाहिए।

यह इसलिए उत्तर बाइट्स में कम बाइट के साथ बेहतर स्कोर किए जाते हैं।



इसके अलावा संबंधित (हटाने के बजाय दोहराव)
जुंगहवान मिन

1
क्या यह नहीं पूछा गया, 1.5 साल से अनुत्तरित है और फिर उपयोगकर्ता खाता नष्ट कर दिया गया था या कुछ और हटाया गया था? यह कहते हुए कि मैं एक नहीं चाहता, हालांकि +1। बस कसम मैंने इसे देखा है।
मैजिक ऑक्टोपस Urn

@MagicOctopusUrn मुझे लगा कि यह अस्तित्व में है। मैं इसका जवाब देना चाहता था, लेकिन नहीं मिला। अगर किसी को पुराना लगता है तो मुझे यह खुद को धोखा देना खुशी होगी।
पोस्ट रॉक गार्फ हंटर

मैं इसे नहीं ढूँढ सकता। मुझे धीरे-धीरे पागल होना चाहिए।
मैजिक ऑक्टोपस Urn

जवाबों:


7

गोल> <> , 49 45 बाइट्स

<<H~Kla}\`q%2l}}ss2"<\
<<H~Kla}\`q%2l}}ss2"<\

इसे ऑनलाइन आज़माएं!

सत्यापन!

मैंने इसे गोल> <> के बजाय> <> में किया, क्योंकि पूर्व में आसान Kऑपरेटर है nजो स्टैक पर शीर्ष वस्तुओं की प्रतिलिपि बनाता है, जो स्रोत कोड की स्वच्छ प्रतिलिपि को आसान बनाता है।

स्पष्टीकरण:

यह निष्पादन कोड की दो प्रतियां होने से काम करता है, और पहले क्षतिग्रस्त होने पर दूसरे को पुनर्निर्देशित करता है। यह तब विफल हो जाता है जब अंतिम \या बीच की नई लाइन को हटा दिया जाता है, दोनों को बाद में मुआवजा दिया जाता है।

<<                       Redirect left 
                    <\  Switch to other source code if this line is irradiated
                   "     Push source with wrapping string literal
                ss2      Push quote
              }}         Move "< to end
          q%2l           If the length of the stack is not right
        \`               Push an extra \
       }                 Move the \ to the end
      a                  Newline
    Kl                   Duplicate the stack
   ~                     Pop the extra newline
  H                      Halt and print stack

मैं 2 बाइट से गोल्फ गया !!!
KrystosTheOverlord


मुझे बस एहसास हुआ कि मैंने इसे पूरी तरह से गलत किया है, क्षमा करें, पात्रों का एक सेट है कि अगर वे गायब हैं, तो कार्यक्रम बस काम नहीं करता है ...
KrystosTheOverlord

@KrystosTheOverlord आप अपने कार्यक्रमों का परीक्षण करने के लिए सत्यापन कार्यक्रम का उपयोग कर सकते हैं
जो किंग
हमारी साइट का प्रयोग करके, आप स्वीकार करते हैं कि आपने हमारी Cookie Policy और निजता नीति को पढ़ और समझा लिया है।
Licensed under cc by-sa 3.0 with attribution required.