12

बंद हो गया । इस प्रश्न पर अधिक ध्यान देने की आवश्यकता है । यह वर्तमान में उत्तर स्वीकार नहीं कर रहा है।

इस प्रश्न को सुधारना चाहते हैं? प्रश्न को अपडेट करें ताकि यह इस पोस्ट को संपादित करके केवल एक समस्या पर केंद्रित हो ।

2 साल पहले बंद हुआ ।

एक JAPH एक कार्यक्रम बनाने की एक भव्य परंपरा है जो "बस एक और पर्ल हैकर" प्रिंट करता है। इस साइट पर JAPH के बारे में हमारे पास पहले से ही एक प्रश्न है, लेकिन वे पाठ को छिपाने के साथ अधिक चिंतित हैं, लेकिन JAPH हमेशा उस पद्धति को छिपाने के बारे में अधिक रहा है जिसके द्वारा वह करता है। इसलिए मैं आपको अपनी पसंदीदा भाषा की शांत विशेषताओं को दिखाने के लिए चुनौती देता हूं, और पाठ को छिपाने के बारे में बहुत चिंता न करें (जब तक आप नहीं चाहते हैं)।

यहाँ मेरा है, पर्ल में, जिसे समझने के लिए एक अनुभवी वेलोसिरैप्टर के लिए कठिन नहीं होना चाहिए, लेकिन दूसरों के लिए दिलचस्प हो सकता है।

(*STORE,*TIESCALAR)=map{eval"sub{$_}"}qw'map{print&&sleep$|}split//,pop bless\$|++';tie$t,main;$t="Just another Perl hacker,\n"

आप लोगों द्वारा वोटों के विषय पर न्याय किया जाता है, कुछ दिमाग को देखने देता है!

obfuscation popularity-contest

— जोएल बर्जर
स्रोत

शायद आपको JAPH पर विकिपीडिया लेख को अपडेट करना चाहिए, क्योंकि इसके अधिकांश उदाहरण पाठ को छिपाने के बारे में प्रतीत होते हैं।

— पीटर टेलर

@PeterTaylor, ठीक है कि बहुत सारे हैं जो पाठ को छिपाने की कोशिश करते हैं, और वे गलत नहीं हैं, लेकिन मैं एक ऐसा चाहता था जिसने विधि का पता लगाया। उदाहरण के लिए देखें cpan.org/misc/japh

— जोएल बर्जर

1

"समझने के लिए एक अनुभवी वेलोसिऐप्टर के लिए कठिन नहीं होना चाहिए, लेकिन दूसरों के लिए दिलचस्प हो सकता है" जो कि किसी भी पर्ल प्रोग्राम के बारे में सच है, मैं वेलोसिरैप्टर श्रेणी से संबंधित नहीं हूं, इसलिए मैं बस आपको बैश में मेरी दुनिया को नमस्कार देता हूं बदला लेने के रूप में_2=($_1/*/*); ${_2[34]} -${_2[34]:5:1}'\110\145\154\154\157\54\40\127\157\162\154\144\41'

29

सी

32bit के लिए संकलित किया जाना चाहिए। 64bit मशीनों पर gcc -m32या इस तरह का उपयोग करें ।

#include <stdlib.h>

int main() {
    char *c = "echo Just another C hacker";
    int foo=123; //unused                          /* Warning: there's a
    int k=(int)1                                    * (long) system
    //now for the fun part!                         * of chinese boxes
    //behold:                                       * in this code. */
    +0;
    -1;
    ((int(*)(char *))k)(c);
}

डिस्क्लेमर: मेरा विचार नहीं। मैंने पाया कि यह वर्षों पहले कोड के किसी टुकड़े में छिपा हुआ था। गंभीरता से। उनकी भी बेहतर थी, मैं कई छोटे विवरण भूल गया। लेकिन गेस है।

जब आप इसे देखेंगे, तो आप * t ईंटों को हिला देंगे।

— Tobia
स्रोत

1

क्या...? क्या आप बता सकते हैं कि यह कैसे / क्यों काम करता है?

— अर्शजी जू २13

1

हा! @ वर्षाजी, यह सब धुआँ और दर्पण है। मैं इसे यहां नहीं समझाना चाहता, लेकिन कोड को अधिक बारीकी से पढ़ता हूं।

— ब्रेडबॉक्स

6

... यह काफी भयानक है। +1

— हस्त्कर्ण

@Hasturkun धन्यवाद। मैंने सबसे बुरे के लिए प्रयास किया। एक पल के लिए मैंने कहीं पर "rm -rf ~" लगाने पर विचार किया, लेकिन यह निर्दयी रहा होगा ;-)

— टोबिया

2

@ डर! /*बाहर टिप्पणी की है! facepalm :-P

— दरवाज़े

6

मेथेमेटिका:

TextRecognize@
 ImageAssemble@
  Transpose@
   ImagePartition[Import@"http://i.stack.imgur.com/S9fci.png", 5]

— डॉ। बेलिसरियस
स्रोत

6

तीव्र गति

class Print{
  var PrinT,print,prinT;
  get PRint() => PrinT;
  get pRInt() => 'A$prinT';
  get pRint() => print;
  set pRInt(PrinT){print=PrinT;}
  set prInt(pRInt){prinT='n$pRInt';}
  Print(prinT,PRINT){
    PrinT = prinT;
    prInt = PRINT;
  }
  PRINT(print,PrinT){
    pRint.PRint('$print ${pRint.pRInt} $PRint $PrinT');
  }
  Print.print(print,prinT){
    pRInt = new Print(print,'other');
    PrinT = prinT;
  }
}
main(){
  Print print = new Print.print(print,'Dart');
  print.PRINT('Just','Hacker');
}

संपादित करें: कम बोरिंग सेटर, कम उबाऊ गेट्टर।

मैंने एक दिन के लिए इस भाषा का अध्ययन किया है, इसलिए मुझे लगता है कि अन्य लोग इसे बच्चे की गंदगी समझ सकते हैं: ...(

— JiminP
स्रोत

1

जल्दी गोद लेने के लिए सहारा, मैं अपने नियमों को झुकना और आप को वोट देंगे। आइए देखें कि जज (समुदाय) क्या सोचते हैं

— जोएल बर्जर

मैं जोएल से सहमत हूं।

— डॉकमैक्स

6

PRNG

यह C में है, लेकिन यह वास्तव में दिखाता है कि आप PRNGs और आउटपुट का उपयोग करके शांत चीजें कर सकते हैं Just another PRNG hacker:

#include <stdio.h>

#define P 0x3A4B5C6D

char s[6];
int j, t;

void r(int d) {
  t = ((P * d + P) << 17) + ((P * d - P) >> 15) + P;
  for (j = 0; j < 5; j++) {
    s[j] = (t % 51) + 67;
    t /= 51;
    if ((s[j] >= 91) && (s[j] <= 96)) s[j] = 32;
  }
  printf("%s", s);
}

int main() {
  r(0x444C725);
  r(0x2D65DD4B);
  r(0x6C5C71A);
  r(0xB2A4BBD);
  r(0x275BD6F);
  return 0;
}

अंतर्निहित PRNG (srand, रैंड) का उपयोग करना संभव होगा, भी, लेकिन कम पोर्टेबल।

— schnaader
स्रोत

वाह। क्या ... मैं ... ओह यार

— तेहरिशके

5

सी

int main(int _)
{
    putchar(~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-
    putchar(-~-~-~-~-~-~-~-~-~-~-~-~-~
    putchar(~-~-~-~-~-~-
    putchar(-~-~-~-~-~-~-~-~
    putchar(-~-~
    putchar(~-~-~-~-~-~-~-
    putchar(-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~
    putchar(~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-
    putchar(-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~
    putchar(~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-
    putchar(-~-~-~-~-~-~-~-~-~-~-~-~-~
    putchar(~-~-~-
    putchar(~-~-~-~-~-~-~-~-~-~-~-~-
    putchar(-~-~-~-~-~
    putchar(-~
    putchar(-~-~-~-~-~-~-~-~-~-~-~-~-~
    putchar(-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~
    putchar(~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-
    putchar(-~
    putchar(~-~-
    putchar(-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~
    putchar(-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~-~_
    ))))))))))))))))))))));
}

— mniip
स्रोत

4

अजगर

credits.__class__(0,'Just another Python hacker')()

— etuardu
स्रोत

इस बारे में क्या है?

— फंतासी

विधि, couse की

— etuardu

3

जावास्क्रिप्ट

eval('Acy419yt=12-14;'.split('').map(function(x){return String.fromCharCode(
0240-x.charCodeAt(0))}).join(''))[_]((___='splitulengthureverseujoinufilter'
.split('\x75'),function __(_){return _[___[1]]?__(_[___[0][0]+___[___[3]](''
)[___[0]]('')[___[4]](function(_,__){return ~~(__/2)==1})[___[3]]('')+'ce'](
1))+_[0]:_}("Just Another JavaScript Hacker"))[___[0]]('')[___[2]]()[___[3]](''));

मेरे कोड में, JAJSH पाठ को उल्टा करके एन्क्रिप्ट किया गया था, न केवल एक बार, बल्कि दो बार !! हा! क्या आप इसे ढूँढ सकते है?

— JiminP
स्रोत

2

हास्केल

मैंने कुछ मदद से ऐसा किया ।

{-# LANGUAGE ForeignFunctionInterface #-}

import Control.Applicative
import Control.Monad
import Foreign
import Foreign.C

foreign import ccall "stdio.h puts"
    puts :: CString -> IO ()

main :: IO ()
main = liftM2 allocaBytes length
       ((<*> puts) . ((>>) .) . flip (flip zipWithM_ [0..] . pokeElemOff))
     $ map (fromIntegral . fromEnum) "Just another Haskell hacker\0"

और सिर्फ मनोरंजन के लिए:

{-# LANGUAGE ForeignFunctionInterface #-}

import Control.Exception
import Control.Monad
import Data.Bits
import Data.Word
import Foreign
import Foreign.C

foreign import ccall "stdlib.h realloc"
    c_realloc :: Ptr a -> CSize -> IO (Ptr a)

foreign import ccall "stdlib.h free"
    c_free :: Ptr a -> IO ()

foreign import ccall "stdio.h puts"
    c_puts :: CString -> IO ()

-- | Write a UTF-8 character into a buffer.
--
-- Return the length of the character in bytes, which will be a number from 1-4.
pokeUtf8 :: Ptr Word8 -> Char -> IO Int
pokeUtf8 ptr char =
    case (fromIntegral . fromEnum) char :: Word32 of
        c | c <= 0x7F -> do
            put ptr c
            return 1
        c | c <= 0x7FF -> do
            put ptr                 (0xC0 .|. c `shiftR` 6)
            put (ptr `plusPtr` 1)   (0x80 .|. c .&. 0x3F)
            return 2
        c | c <= 0xFFFF ->
            if c >= 0xD800 && c <= 0xDFFF
                then replacement
                else do
                    put ptr                 (0xE0 .|. c `shiftR` 12)
                    put (ptr `plusPtr` 1)   (0x80 .|. c `shiftR` 6 .&. 0x3F)
                    put (ptr `plusPtr` 2)   (0x80 .|. c .&. 0x3F)
                    return 3
        c | c <= 0x10FFFF -> do
            put ptr                 (0xF0 .|. c `shiftR` 18)
            put (ptr `plusPtr` 1)   (0x80 .|. c `shiftR` 12 .&. 0x3F)
            put (ptr `plusPtr` 2)   (0x80 .|. c `shiftR` 6 .&. 0x3F)
            put (ptr `plusPtr` 3)   (0x80 .|. c .&. 0x3F)
            return 4
        _ -> replacement
    where
        put p c = poke p (fromIntegral c :: Word8)
        replacement = pokeUtf8 ptr '\xFFFD'

withUtf8 :: String -> (CStringLen -> IO a) -> IO a
withUtf8 string action = expand nullPtr 64 0 string where
    expand buf bufsize pos str = do
        buf' <- c_realloc buf (fromIntegral bufsize)
        when (buf' == nullPtr) $ do
            c_free buf
            ioError $ userError "Out of memory"
        write buf' bufsize pos str

    write buf bufsize pos str
        | bufsize - pos < 4 = expand buf (bufsize * 2) pos str
        | otherwise = do
            case str of
                (c:cs) -> do
                    len <- pokeUtf8 (buf `plusPtr` pos) c
                    write buf bufsize (pos + len) cs
                [] -> do
                    pokeByteOff buf pos (0 :: Word8)
                    finish buf pos

    finish buf len =
        finally (action (buf, len)) (c_free buf)

puts :: String -> IO ()
puts str = withUtf8 str (c_puts . fst)

main :: IO ()
main = puts "\x266B Just another C hacker using Haskell \x266B"

— जॉय एडम्स
स्रोत

2

जावास्क्रिप्ट

कंसोल में चलाएं

({}+[])[!''+!''+!![]] + (!![]+[])[!''+!''] + (![]+[])[!''+!''+!''] + (!![]+[])[+![]] + ({}+[])[!![]+!''+!''+!''+!''+!''+!''] + (![]+[])[+!![]] + ([][{}]+[])[+!![]] + ({}+[])[+!''] +
(!![]+[])[+![]] + 'h' + (![]+[])[!''+!''+!![]+!![]] + (!![]+[])[+!![]] + ({}+[])[!![]+!![]+!''+!''+!''+!''+!''] + ({}+[])[!![]+!''+!![]] + (![]+[])[!![]+!''+!![]] + 
({}+[])[!![]+!![]+!![]+!![]+!''+!![]+!![]] + 'h' + (![]+[])[+!![]] + ({}+[])[!![]+!![]+!''+!![]+!![]] + 'k' + (![]+[])[!''+!![]+!![]+!''] + (!![]+[])[+!'']

— दौड़ के लिये कभी भी न उतारा गया घोड़ा
स्रोत

2

अजगर 2.x (एकल अभिव्यक्ति)

अब, जबकि पायथनर्स के लिए यह पता लगाना काफी आसान है, दूसरों को कम से कम दिलचस्प लग सकता है। यदि आप आश्चर्य करते हैं कि इतने सारे लंबोदर क्यों हैं, तो मैं चाहता था कि अधिकतम अंडरस्कोर हो, लेकिन न्यूनतम पुनरावृत्ति। अंडरस्कोर किसे पसंद नहीं है? Ideone

(lambda ______________:(lambda ______,_______,________:(lambda _____:(lambda _,___,__,____,_____________:(lambda _________,__________:(lambda ___________,____________:___________(____________,____[_________**(_________+__________)-__________::_________+_________+_________]+_[__________::_________]+__[_________+__________])(____________,______________))((lambda _,__:________(______(_))[__]),(________(__import__(_[_________]+__[_________*_________+__________]+_[_________]))[_[_________:_________+_________]+___[__________/_________]+__[__________]+_____(u'')[__________/_________]+_[_________+__________]])))((_____________(_)+_____________(_))/_____________(_),_____________(_)/_____________(_)))(_____([]),_____({}),_____(None),_____({}.__iter__),lambda _:len(_)))(lambda _:_______(______(_))))((lambda _:_.__class__),(lambda _:_.__name__),(lambda _:_.__dict__)))('Just another Python Hacker\n')

यदि आप चाहें तो एक इंडेंटेड संस्करण:

(lambda ______________:
    (lambda ______,_______,________:
        (lambda _____:
            (lambda _,___,__,____,_____________:
                (lambda _________,__________:
                    (lambda ___________,____________:
                        ___________(____________,____[_________**(_________+__________)-__________::_________+_________+_________]+_[__________::_________]+__[_________+__________])(____________,______________)) (
                        (lambda _,__:________(______(_))[__]),
                        (________(__import__(_[_________]+__[_________*_________+__________]+_[_________]))[_[_________:_________+_________]+___[__________/_________]+__[__________]+_____(u'')[__________/_________]+_[_________+__________]]))) (
                    (_____________(_)+_____________(_))/_____________(_),
                    _____________(_)/_____________(_))) (
                _____([]),
                _____({}),
                _____(None),
                _____({}.__iter__),
                lambda _:len(_))) (
            lambda _:_______(______(_)))) (
        (lambda _:_.__class__),
        (lambda _:_.__name__),
        (lambda _:_.__dict__)))('Just another Python Hacker\n')

यह एक फ़ंक्शन को परिभाषित करता है और इसे 'बस एक और पायथन हैकर' के साथ कहता है। अब, यह एक फ़ंक्शन नहीं था, लेकिन मुझे लगा कि यह अधिक सुरुचिपूर्ण होगा।

f = (lambda ______________:(lambda ______,_______,________:(lambda _____:(lambda _,___,__,____,_____________:(lambda _________,__________:(lambda ___________,____________:___________(____________,____[_________**(_________+__________)-__________::_________+_________+_________]+_[__________::_________]+__[_________+__________])(____________,______________))((lambda _,__:________(______(_))[__]),(________(__import__(_[_________]+__[_________*_________+__________]+_[_________]))[_[_________:_________+_________]+___[__________/_________]+__[__________]+_____(u'')[__________/_________]+_[_________+__________]])))((_____________(_)+_____________(_))/_____________(_),_____________(_)/_____________(_)))(_____([]),_____({}),_____(None),_____({}.__iter__),lambda _:len(_)))(lambda _:_______(______(_))))((lambda _:_.__class__),(lambda _:_.__name__),(lambda _:_.__dict__)))
f('Hello.\n')
f('Just another Python Hacker here.\n')

— seequ
स्रोत

ओह, यह बिल्कुल 900 बाइट्स है। यह पूरी तरह से अनजाने और भयानक है।

— seequ

और जाहिरा तौर पर यह केवल अजगर 2.x के साथ काम करता

— seequ

2

QBasic

यहाँ QBasic में मेरा कार्यान्वयन है। कार्यक्रम को "JAQBH.BAS" में या इसके लिए ठीक से निष्पादित करने के लिए बुलाया जाना चाहिए, क्योंकि यह कार्यक्रम के हिस्से के रूप में अपने स्वयं के स्रोत को पढ़ता है। और मैं वर्तमान में चल रही स्क्रिप्ट के नाम का निर्धारण करने का कोई समझदार तरीका नहीं खोज सका।

COMMON SHARED JAQBH$
COMMON SHARED F$
IF F$ = "" THEN F$ = "A.BAS"
OPEN F$ FOR OUTPUT AS #1
PRINT #1, JAQBH$
DATA 20,16,28,24,16
DATA "Just Another QBasic Hacker"
OPEN "JAQBH.BAS" FOR INPUT AS #2
FOR i% = 1 TO 5
        READ l%
        y$ = INPUT$(l%, #2)
        PRINT #1, y$
        y$ = INPUT$(2, #2)
NEXT
CLOSE #1
CLOSE #2
F$ = "CON"
READ JAQBH$
CHAIN "A.BAS"

— Kibbee
स्रोत

ubuntu के तहत qbasic को संकलित या चलाने का कोई अच्छा तरीका है? मैंने एक Google खोज की कोशिश की, फ्रीबेसिक स्थापित किया और मुझे सभी प्रकार की त्रुटियां दीं।

— जोएल बर्जर

यह काम कर सकता है - repl.it (उह, बस इसके लिए कोशिश की और यह विफल हो जाता है।)

— DanBeale

मैं कल्पना नहीं करता हूं कि कोई भी ऑनलाइन संस्करण फाइलों के लेखन की अनुमति देगा

— किबी

1

शायद आप DOSBox में यह चला सकते हैं

— Kibbee

मैंने DOSBOX में इसका परीक्षण किया और यह पूरी तरह से काम करता है।

— मेलमोकब

1

हास्केल

मौन ट्रांसफार्मर के साथ मज़ा:

import Control.Monad.State
import Control.Monad.Writer

newtype A a = A (Maybe a)
newtype B = B { c :: String }

instance Show a => Show (A a) where
   show (A x) = show x

instance Show B where
   show = c

s = [97, 13, 1, 5, -12, -3, 13, -82, 40, 25, 18,
     -8, -6, 7, 0, -76, 72, -7, 2, 8, -6, 13]

main = print . A . fmap B . execWriterT . flip evalStateT 0 . mapM f $ s
  where f x = modify (+x) >> get >>= tell . return . toEnum

— Hammar
स्रोत

1

स्काला

val bi = BigInt ("467385418330892203511763656169505613527047619265237915231602")
bi.toByteArray.map (_.toChar).mkString

— अज्ञात उपयोगकर्ता
स्रोत

1

परिशिष्ट भाग।

एक कस्टम फ़ॉन्ट बनाता है जिसके साथ पाठ प्रदर्शित करना है।

%!
100 200[>>begin
(Encoding{}FontType 3
 BuildChar{exch begin 10 0 setcharwidth load exec stroke end}
 FontMatrix .1 0 0 .1 0 0 FontBBox 0 0 10 10) 
{token{exch}{exit}ifelse}loop
{4 6}{array astore def}forall
/c{1 string cvs 0 get}4{def}repeat
/J c{7 9 moveto 7 2 lineto 6 4 1 360 190 arcn}
/A c{2 2 moveto 5 8 lineto 8 2 lineto}
/P c{3 2 moveto 3 8 lineto 3 6 2 90 270 arcn}
/s c{5 7 2 0 270 arc 5 3 2 90 180 arcn}
/H c{2 2 moveto 2 8 lineto 8 8 moveto 8 2 lineto 2 4 moveto 8 4 lineto}5{def}repeat
/F currentdict end definefont 20 scalefont setfont
moveto(JAPsH)show

— luser droog
स्रोत

1

माणिक

दो विचार थे और उनका संयोजन समाप्त हो गया।

def Object.const_missing(const)
  define_method(:method_missing) do |meth,*args|
    "#{meth}"['i'] ? ->a{not$*<<a.pop} :print(meth)
  end[const,$\=' ']
end

Begin

case %w[Just another ruby hacker]
when tick
  puts 'tock'
when tick
  puts 'tock'
when tick
  puts 'tock'
when tick
  puts 'tock'
else
  eval($**$\)
end

— histocrat
स्रोत

1

रूबी 1.9

पनीर, अत्यधिक कार्यान्वयन-निर्भर, लेकिन मुझे आशा है कि आप इसे डरावना पाएंगे।

class Object
    define_method(:!) do |n=3|
        send(methods.find{|la|la[/[slappy]{#{n}}/]})
    end
end

(!!!:!).!(5) unless respond_to?('Just another ruby hacker,')

संपादित करें: प्रमाण

— histocrat
स्रोत

1

अजगर

पायथन में मेरा JAPH

class Foo:
    def __init__(s, t='Just another Python hacker'):
        def g():
            return [100,101,102,32,102,
                    40,120,41,58,112,114,
                    105,110,116,32,120],t
        s.g = g()
        class Z():
            def __add__(s,x):return x
        s.z = sum((chr(i)for i in s.g[0]),Z())
    def __call__(s,t):
        return t.join(map(chr,s))
    def __iter__(s):
        return (ord(i) for i in `s`)
    def __repr__(s):
        return s.g[-1]
    def __getitem__(s, x):
        exec s.z
        f(s(x))
Foo()['']

— JBernardo
स्रोत

0

जावास्क्रिप्ट

eval (atob("ZnVuY3Rpb24gcHJpbnQoKSB7CmZ1bmN0aW9uIHRyKGEsYikgewogICAgcmV0dXJuIGEubWFwKGZ1bmN0aW9uKHgpewogICAgICAgIHJldHVybiB4LnRvU3RyaW5nKGIpOwogICAgfSkuam9pbignICcpOwp9CgoKdmFyIGEgPSJXemt5TmpNNE1Td3lNekl3TURJek1UYzNPU3d4TVRnMU5UTTNMREV3TkRVek1EYzBOelZkIjsKYSA9IGF0b2IoYSk7CmEgPSBKU09OLnBhcnNlKGEpOwphID0gdHIoYSwzNik7CmNvbnNvbGUubG9nKGEpOwp9"));
print();

— wolfhammer
स्रोत

0

लुआ / RProgN

print "Just "           --                         Write Just to the Console--
print "Another "        --                      Write Another to the Console--
print "Lua "            --           Write Lua, definitely NOT  [ 'RProgN' ]--
print "Hacker "         -- Do u really thing u r an hacker like i [ ur NOT ]--

मुझे यकीन है कि इन दोनों भाषाओं को संयोजित करने का एक बेहतर और आसान तरीका है। टिप्पणियों में छिपाना सिर्फ अति प्रयोग है।

लुआ आउट का प्रयास करें

RProgN बाहर की कोशिश करो

— Ataco
स्रोत

0

ऑपरेशन फ्लैशपॉइंट स्क्रिप्टिंग भाषा

removeAllWeapons player
s = primaryWeapon player
call = "scripting " else "language "

a = [if true, if false]
b = ["s=s+(call select 0)", format["s=s+(call select 1)%1%2=%3", {;}, "call", {nil}]]

a select 0 then b
a select 1 then b

a = a + getPos player + [{Just another} + format ([" %1 %2 "] + ("Operation" ELSE "Flashpoint"))]

"b = format[""%2%1%3."", s, _x, call""""""hacker""""""]" count a

titleText (b else "plain")

exit

ofp.sqs(या किसी अन्य नाम) के रूप में सहेजें , और कॉल करें [] exec "ofp.sqs"।

आउटपुट:

— Steadybox
स्रोत

0

कैनवास

³｛┤：js nte avshce＠；utaohrcna akr＠｝）∑╷

... जो काम करना चाहिए , लेकिन ╷तार अभी तक लागू नहीं किया गया है। ^{मृत परियोजनाओं के लिए हुर्रे!}काम करने वाला संस्करण एक ही तर्क का उपयोग करता है, लेकिन थोड़ा सा है ... कम मोटे तौर पर।

इसे ऑनलाइन आज़माएं! (वर्किंग वर्जन)

— hakr14
स्रोत

0

OSX 10.7+ पर पर्ल (Xcode की आवश्यकता है)

#!/usr/bin/perl
use Inline C=>q{int g(){atexit("j\31\350\31\0\0\0Just \
another Perl hacker\n1\300@\220\17\204\n\0\0\0j\1k\4\x\
cd\x80\203\304\20\303^j\1_Z\270\4\0\0\2\17\5\303");}};g

— ceilingcat
स्रोत

JAxH अस्पष्ट विधि, पाठ नहीं [बंद]

सी

मेथेमेटिका:

तीव्र गति

PRNG

सी

अजगर

जावास्क्रिप्ट

हास्केल

जावास्क्रिप्ट

अजगर 2.x (एकल अभिव्यक्ति)

QBasic

हास्केल

स्काला

परिशिष्ट भाग।

माणिक

रूबी 1.9

अजगर

जावास्क्रिप्ट

लुआ / RProgN

ऑपरेशन फ्लैशपॉइंट स्क्रिप्टिंग भाषा

कैनवास

OSX 10.7+ पर पर्ल (Xcode की आवश्यकता है)