20

आपका काम इनपुट के रूप में एक एन्क्रिप्टेड स्ट्रिंग लेना है, और स्ट्रिंग को डीक्रिप्ट किया गया आउटपुट है, इसके छिपे हुए संदेश को प्रकट करने के लिए।

तार, इनपुट और आउटपुट, दोनों में 64 ASCII- वर्णों की इस सूची के अक्षर होंगे (प्रमुख स्थान पर ध्यान दें):

 !"#$%&'()*+,-./0123456789:;=?@[\]^_abcdefghijklmnopqrstuvwxyz|~

इन वर्णों को संख्याएँ दी गई हैं, इस क्रम में वे ऊपर सूचीबद्ध हैं:

  ! " # $ % &   ...
0 1 2 3 4 5 6   ...

तो, स्पेस नंबर 0 है, !नंबर 1 है और ~नंबर 63 है। इन नंबरों को 6-बिट बाइनरी कोड में दर्शाया जा सकता है:

 :  0:  000000
!:  1:  000001
":  2:  000010
#:  3:  000011 
.. ...  ......
z: 61:  111101
|: 62:  111110
~: 63:  111111

एन्क्रिप्शन बहुत सरल है:

मैं eCएन्क्रिप्टेड वर्णों के लिए, और Cमूल स्ट्रिंग के पात्रों के लिए उपयोग करूँगा । C(n)मूल स्ट्रिंग eC(n)का n'th वर्ण है , जबकि एन्क्रिप्टेड स्ट्रिंग का n'th वर्ण है।

आप वर्णों के 6-बिट बाइनरी प्रतिनिधित्व का उपयोग करेंगे। पहला पात्र होगा eC(0) = not(C(0))। वहीं से सभी किरदार होंगे eC(n) = xor(C(n),C(n-1))।

उदाहरण:

मान लेते हैं कि इनपुट स्ट्रिंग है code।

c38 वां वर्ण (शून्य अनुक्रमित) है, या 100110बाइनरी में है। एन्क्रिप्ट किए गए संस्करण में सभी बिट्स फ़्लिप हो गए हैं, इसलिए 011001 -> 25 -> '9'(फिर से, शून्य अनुक्रमित)।
o50 वां वर्ण है, या 110010बाइनरी में है। xor(100110, 110010) = 010100 = 20 = '4'।
d39 वां वर्ण है, या 100111बाइनरी में है। xor(100111, 110010) = 010101 = 21 = '5'।
e40 वां वर्ण है, या 101000बाइनरी में है। xor(101000, 100111) = 001111 = 15 = '/'।

इसलिए, यदि मूल स्ट्रिंग है code, तो एन्क्रिप्टेड स्ट्रिंग बन जाएगी 945/।

परीक्षण के मामलों:

945/
code

,&'8[14 =?;gp+% 2'@s&&c45/eg8?&
programming puzzles & code golf

;a$5$%0r?2@12dw6# lb-eg&519nt%ot=9$@es@96+?;ga" 4*)&ta56dp[?o#t%oh/"(&?#ee![,+,/+fe4"
a $150 reward will be given to those sending account and pin# to hackers@steal_id.com

~!#!'!#!/!#!'!#![!#!'!#!/!#!'!#!~!#!'!#!/!#!'!#![!#!'!#!/!#!'!#!
 !"#$%&'()*+,-./0123456789:;=?@[\]^_abcdefghijklmnopqrstuvwxyz|~

code-golf binary encryption

— स्टीवी ग्रिफिन
स्रोत

4

विवाहित जीवन और पहले से ही संदेशों के डिकोडिंग के साथ? : पी

— जोनाथन एलन

1

@JonathanAllan मैं वर्षों से संदेशों को डिकोड कर रहा हूं ...: P

— Stewie Griffin

9

जेली , 27 26 बाइट्स

ØJḟ“<>`{}”ḟØAɓi@€_33^\96_ị

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

वैकल्पिक संस्करण, 22 बाइट्स (गैर-प्रतिस्पर्धात्मक)

जेली ने अंत में अन्य गोल्फिंग लैंग्स के साथ पकड़ा और एक मुद्रण योग्य ASCII परमाणु मिला , इसलिए अब यह काम करता है।

ØṖḟ“<>`{}”ḟØAɓi@€’^\Nị

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

यह काम किस प्रकार करता है

ØJḟ“<>`{}”ḟØAɓi@€_33^\96_ị  Main link. Argument: s (string)

ØJ                          Yield Jelly's code page, i.e., 32 non-ASCII characters,
                            followed by all printable ASCII characters, followed by
                            129 non-ASCII characters.
  ḟ“<>`{}”                  Filterfalse; remove the characters "<>`{}".
          ḟØA               Filterfalse; remove all uppercase ASCII letters.
                            Let's call the resulting alphabet a.
             ɓ              Begin a new, dyadic chain.
                            Left argument: s. Right argument: a
              i@€           Find the (1-based) index of all characters of s in a.
                 _33        Subtract 33, so ' ' maps to 0, '~' maps to 63.
                    ^\      Compute the cumulative bitwise XOR.
                            We didn't take the bitwise NOT of the first index,
                            which can be rectified by subtracting all results from
                            63. However, we must also add 33 to account for the
                            fact that the index of ' ' in a is 33.
                      96_   Subtract the results from 96.
                         ị  Index into a.

— डेनिस
स्रोत

उह मैं यह कुछ मिनटों के अंतिम समय में सोचता था! पहली बार एक स्पष्टीकरण पोस्ट करने के लिए मुझ पर शर्म आनी चाहिए: पी

— जोनाथन एलन

6

जावास्क्रिप्ट (ईएस 6), 115 बाइट्स

s=>s.replace(/./g,s=>d[x^=d.indexOf(s)],x=63,d=` !"#$%&'()*+,-./0123456789:;=?@[\\]^_abcdefghijklmnopqrstuvwxyz|~`)

परीक्षण के मामलों

कोड स्निपेट दिखाएं

let f =

s=>s.replace(/./g,s=>d[x^=d.indexOf(s)],x=63,d=` !"#$%&'()*+,-./0123456789:;=?@[\\]^_abcdefghijklmnopqrstuvwxyz|~`)

console.log(f("945/"))
console.log(f(",&'8[14 =?;gp+% 2'@s&&c45/eg8?&"))
console.log(f(';a$5$%0r?2@12dw6# lb-eg&519nt%ot=9$@es@96+?;ga" 4*)&ta56dp[?o#t%oh/"(&?#ee![,+,/+fe4"'))
console.log(f("~!#!'!#!/!#!'!#![!#!'!#!/!#!'!#!~!#!'!#!/!#!'!#![!#!'!#!/!#!'!#!"))

Expand snippet

— Arnauld
स्रोत

मुझे लगता है कि के ^दाईं ओर जाता है ]। जवाब अभी भी परीक्षण के मामलों के लिए उस परिवर्तन के साथ काम करता है जो मुझे विश्वास है।

— जोनाथन एलन

dक्या यह गायब है से निर्माण करने के लिए छोटा हो सकता है?

— जोनाथन एलन

1

@JonathanAllan हो सकता है, लेकिन JS के पास लंबे चरित्र हेरफेर के तरीके हैं। मैं पिछली समान चुनौतियों में एक साधारण हार्डकोड किए गए स्ट्रिंग की तुलना में एक डायनामिक संस्करण को कम करने में विफल रहा और इस बार भी अब तक कोई सफलता नहीं मिली।

— अरनुलद

मुझे पता है कि यह जावास्क्रिप्ट है, लेकिन यह बिल्कुल भी ऐसा नहीं दिखता है: एस

— स्लाव ज्ञानदेव

5

जेली , 34 31 बाइट्स

डेनिस के लिए -3 बाइट्स धन्यवाद (उपयोग ḟदो बार के बजाय œ-, ;और 63 के बजाय ¤उपयोग करें )”~

32r126Ọḟ“<>`{}”ḟØAṙ1ɓ”~;i@€^\Ḋị

पात्रों की सूची लेने और लौटाने की एक विवादास्पद कड़ी।
* ध्यान दें: एक जेली कार्यक्रम के लिए इनपुट तर्क का उपयोग अजगर स्ट्रिंग, स्वरूपण तो साथ के हवाले से ", ', '''(या अगर स्पष्ट नहीं के हवाले से) सभी विकल्प हैं।

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

कैसे?

बिटवाइज़-एक्सआर उल्टा है (दिए गए "अग्रणी शून्य")।

बिटवाइज़-नॉट एक एक्सोर है जो "सभी लोगों" के साथ है - इस मामले में केवल 6 की आवश्यकता है, इसलिए 2 ⁷ -1 = 63 ।

एक बार जब हम सरणी या वर्ण बना लेते हैं और इनपुट वर्णों की अनुक्रमणिका को देख लेते हैं, तो डिकोड स्वयं बिटकॉइन-एक्सआर द्वारा केवल एक संचयी कमी होती है, जिसके बाद हम उसी सरणी में वापस अनुक्रमित कर सकते हैं।

32r126Ọḟ“<>`{}”ḟØAṙ1ɓ”~;i@€^\Ḋị - Main link: string, s
32r126                          - inclusive range -> [32,33,...,125,126]
      Ọ                         - cast to ordinals -> " !...}~"
        “<>`{}”                 - literal ['<','>','`','{','}']
       ḟ                        - filter discard
                ØA              - yield "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
               ḟ                - filter discard
                  ṙ1            - rotate left by one (Jelly indexing is one based)
                    ɓ           - dyadic chain separation, swapping arguments (call that p)
                     ”~         - literal '~'
                       ;        - concatenate with s (`~` has value 63 for the bitwise-not)
                        i@€     - first index* of €ach character of s in p
                            \   - cumulative reduce by:
                           ^    -   bitwise-xor
                             Ḋ  - dequeue (remove the 63 from '~')
                              ị - index into p

* नोट: पी में एक स्थान को देखने से 64 का उत्पादन होगा, लेकिन यह ठीक है क्योंकि पी में वापस इंडेक्सिंग मॉड्यूलर है, इसलिए एक अग्रणी 1को जोड़ना 64 जोड़ना जैसा है, इंडेक्स को वापस उसी स्थान पर ले जाना जहां वह होने की आवश्यकता है)।

— जोनाथन एलन
स्रोत

3

जावा, 225 बाइट्स

String D(String E){String A="",C=" !\"#$%&'()*+,-./0123456789:;=?@[\\]^_abcdefghijklmnopqrstuvwxyz|~";for(int i=-1,J=0;++i<E.length();J=C.indexOf(E.charAt(i)),A+=C.charAt(i<1?(1<<6)-1-J:C.indexOf(A.charAt(i-1))^J));return A;}

मैंने बहुत लंबे समय में जावा में गोल्फ नहीं किया है, इसलिए किसी भी गोल्फिंग टिप्स की सराहना की जाती है।

यह ऑनलाइन की कोशिश करो!

— आर। कप
स्रोत

मुझे पता है कि यह एक समय हो गया है, लेकिन गोल्फ के लिए कुछ चीजें: जावा 8+ लैम्ब्डा का उपयोग करना, इसलिए (-15 बाइट्स) String D(String E){बन जाता है E->{; -1-Jहो सकता है +~J(-1 बाइट); और i=-1हो सकता है i=0, के ++लिए ले जाया जा सकता है i++<1?और फिर (-1 बाइट) i-1हो जाता है i-2। इसे ऑनलाइन आज़माएँ: 208 बाइट्स

— केविन क्रूज़सेन

2

05AB1E , 40 बाइट्स

'~«vžQAu"<>{}`"«SK©yk64+b¦S}r.gG^DJC®sè?

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

व्याख्या

'~«                                       # append input to "~"
   v                                      # for each char y in the resulting string
    žQ                                    # push printable ascii chars
      Au                                  # push upper case alphabet
        "<>{}`"«                          # append "<>{}`"
                SK                        # remove those chars from printable ascii
                  ©                       # store a copy in register
                   yk                     # get the index of y in that string
                     64+                  # add 64
                        b                 # convert to binary
                         ¦S               # remove leading 1 and convert to list of bits
                           }              # end loop
                            r             # reverse stack
                             .gG          # len(stack)-1 times do
                                ^         # xor top 2 lists of bits on the stack
                                 DJC      # convert a copy to decimal
                                    ®sè   # index into the char string with this
                                       ?  # print

— Emigna
स्रोत

2

सीपीयू x86 निर्देश सेट, 235 बाइट्स

00000750  50                push eax
00000751  8A10              mov dl,[eax]
00000753  80FA00            cmp dl,0x0
00000756  7418              jz 0x770
00000758  31DB              xor ebx,ebx
0000075A  EB03              jmp short 0x75f
0000075C  F9                stc
0000075D  EB13              jmp short 0x772
0000075F  8A83C1A14000      mov al,[ebx+0x40a1c1]
00000765  3C00              cmp al,0x0
00000767  74F3              jz 0x75c
00000769  38C2              cmp dl,al
0000076B  7404              jz 0x771
0000076D  43                inc ebx
0000076E  EBEF              jmp short 0x75f
00000770  42                inc edx
00000771  F8                clc
00000772  58                pop eax
00000773  C3                ret
00000774  53                push ebx
00000775  8B442408          mov eax,[esp+0x8]
00000779  31C9              xor ecx,ecx
0000077B  09C0              or eax,eax
0000077D  7505              jnz 0x784
0000077F  31C0              xor eax,eax
00000781  48                dec eax
00000782  EB2F              jmp short 0x7b3
00000784  E8C7FFFFFF        call 0x750
00000789  72F4              jc 0x77f
0000078B  7510              jnz 0x79d
0000078D  F6D3              not bl
0000078F  80E33F            and bl,0x3f
00000792  88D9              mov cl,bl
00000794  8AB3C1A14000      mov dh,[ebx+0x40a1c1]
0000079A  8830              mov [eax],dh
0000079C  40                inc eax
0000079D  E8AEFFFFFF        call 0x750
000007A2  72DB              jc 0x77f
000007A4  750D              jnz 0x7b3
000007A6  30D9              xor cl,bl
000007A8  8AB1C1A14000      mov dh,[ecx+0x40a1c1]
000007AE  8830              mov [eax],dh
000007B0  40                inc eax
000007B1  EBEA              jmp short 0x79d
000007B3  5B                pop ebx
000007B4  C20400            ret 0x4
000007B7  53                push ebx
000007B8  8B442408          mov eax,[esp+0x8]
000007BC  31C9              xor ecx,ecx
000007BE  09C0              or eax,eax
000007C0  7505              jnz 0x7c7
000007C2  31C0              xor eax,eax
000007C4  48                dec eax
000007C5  EB32              jmp short 0x7f9
000007C7  E884FFFFFF        call 0x750
000007CC  72F4              jc 0x7c2
000007CE  750F              jnz 0x7df
000007D0  30D9              xor cl,bl
000007D2  8AB1C1A14000      mov dh,[ecx+0x40a1c1]
000007D8  8830              mov [eax],dh
000007DA  88D9              mov cl,bl
000007DC  40                inc eax
000007DD  EBE8              jmp short 0x7c7
000007DF  8B442408          mov eax,[esp+0x8]
000007E3  E868FFFFFF        call 0x750
000007E8  72D8              jc 0x7c2
000007EA  750D              jnz 0x7f9
000007EC  F6D3              not bl
000007EE  80E33F            and bl,0x3f
000007F1  8AB3C1A14000      mov dh,[ebx+0x40a1c1]
000007F7  8830              mov [eax],dh
000007F9  5B                pop ebx
000007FA  C20400            ret 0x4

समारोह पाते हैं () और डीक्रिप्ट () + स्ट्रिंग एबीसी: 171 बाइट्स + 64 बाइट्स = 235 असेंबली के साथ nasmw और संकलक / पुस्तकालय के साथ बोरलैंड सी संकलक:

; nasmw -fobj  this.asm
; bcc32 -v  this.obj
section _DATA use32 public class=DATA
global _main
extern _printf

fmt1 db "result=%s" , 13, 10, 0, 0
fmt2 db "abc[63]=%c" , 13, 10, 0, 0
code1 db "code" , 0, 0
code2 db ",&'8[14 =?;gp+% 2'@s&&c45/eg8?&" , 0, 0
code3 db ';a$5$%0r?2@12dw6# lb-eg&519nt%ot=9$@es@96+?;ga" 4*)&ta56dp[?o#t%oh/"(&?#ee![,+,/+fe4"' , 0, 0
abc db ' !"#$%' , "&'()*+,-./0123456789:;=?@[\]^_abcdefghijklmnopqrstuvwxyz|~" , 0, 0

section _TEXT use32 public class=CODE

find:     
      push    eax
      mov     dl,  [eax]
      cmp     dl,  0
      je      .2
      xor     ebx,  ebx
      jmp     short  .1
.e:   stc
      jmp     short  .z
.1:   mov     al,  [abc+ebx]
      cmp     al,  0
      je      .e
      cmp     dl,  al
      je      .3
      inc     ebx
      jmp     short  .1
.2:   inc     edx           ; set zf=0
.3:   clc
.z:   pop     eax
      ret

deCript:  
      push    ebx
      mov     eax,  dword[esp+8]
      xor     ecx,  ecx
      or      eax,  eax
      jnz     .1
.e:   xor     eax,  eax
      dec     eax
      jmp     short  .z
.1:   call    find
      jc      .e
      jnz     .2
      not     bl
      and     bl,  03Fh
      mov     cl,  bl
      mov     dh,  [abc+ebx]
      mov     [eax],  dh
      inc     eax
.2:   call    find
      jc      .e
      jnz     .z
      xor     cl,  bl
      mov     dh,  [abc+ecx]
      mov     [eax],  dh
      inc     eax
      jmp     short  .2
.z:       
      pop     ebx
      ret     4

cript:    
      push    ebx
      mov     eax,  dword[esp+8]
      xor     ecx,  ecx
      or      eax,  eax
      jnz     .1
.e:   xor     eax,  eax
      dec     eax
      jmp     short  .z
.1:   call    find
      jc      .e
      jnz     .2
      xor     cl,  bl
      mov     dh,  [abc+ecx]
      mov     [eax],  dh
      mov     cl,  bl
      inc     eax
      jmp     short  .1
.2:   mov     eax,  dword[esp+8]
      call    find
      jc      .e
      jnz     .z
      not     bl
      and     bl,  03Fh
      mov     dh,  [abc+ebx]
      mov     [eax],  dh
.z:       
      pop     ebx
      ret     4

_main:    
      pushad

      push    code1
      call    cript
      push    code1
      push    fmt1
      call    _printf
      add     esp,  8

      xor     eax,  eax
      mov     al,  [abc+63]
      push    eax
      push    fmt2
      call    _printf
      add     esp,  8

      push    code1
      call    deCript
      push    code1
      push    fmt1
      call    _printf
      add     esp,  8
      push    code2
      call    deCript
      push    code2
      push    fmt1
      call    _printf
      add     esp,  8
      push    code3
      call    deCript
      push    code3
      push    fmt1
      call    _printf
      add     esp,  8

      popad
      mov     eax,  0
      ret

परिणाम:

result=945/
abc[63]=~
result=code
result=programming puzzles & code golf
result=a $150 reward will be given to those sending account and pin# to hackers@steal_id.com

असेंबली बेहतर है (सच कहूं तो मैं एक मैक्रो सिस्टम का उपयोग करता हूं, हां मुझे पता है कि यह बहुत लंबा है, लेकिन सी वन + के रूप में - मैक्रो सिस्टम के साथ, यह सच है क्योंकि निर्देश सरल हैं यह असेंबली में भी आसान लेखन कोड है बिना सुधार के रूप में एक अंग्रेजी में लिखें (मैं नहीं)

— RosLuP
स्रोत

2

सी (जीसीसी) , 153 बाइट्स

char*i=" !\"#$%&'()*+,-./0123456789:;=?@[\\]^_abcdefghijklmnopqrstuvwxyz|~";a(b){b=index(i,b)-i;}f(char*x){for(*x=i[a(*x)^63];x[1];)*x=i[a(*x)^a(*++x)];}

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

थोड़ा कम गोल्फ

char*i=" !\"#$%&'()*+,-./0123456789:;=?@[\\]^_abcdefghijklmnopqrstuvwxyz|~";
a(b){
  b=index(i,b)-i;
}
f(char*x){
  for(*x=i[a(*x)^63];x[1];)
    *x=i[a(*x)^a(*++x)];
}

— ceilingcat
स्रोत

2

एपीएल (Dyalog यूनिकोड) , 52 बाइट्स ^SBCS

आवश्यक है ⎕IO←0

{C[2∘⊥¨≠\~@0⊢(6/2)∘⊤¨⍵⍳⍨C←(32↓⎕UCS⍳127)~⎕A,'<>{}`']}

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

— voidhawk
स्रोत

हमेशा प्रश्न का उपयोग करें ¨:{C[2⊥≠\⍉~@0⍉(6/2)⊤⍵⍳⍨C←(32↓⎕UCS⍳127)~⎕A,'<>{}`']}

— Adám

जब केवल एक संदर्भ होता है ⍵, तो आप दो बाइट्स को पूर्ण प्रोग्राम में रूपांतरित करके बचा सकते हैं:C[2⊥≠\⍉~@0⍉(6/2)⊤⍞⍳⍨C←(32↓⎕UCS⍳127)~⎕A,'<>{}`']

— Adám

1

रोड़ा , 120 100 बाइट्स

f a{A=[]seq 32,126|chr _|{|v|A+=v if[v=~"[^<>`{}A-Z]"]}_;l=63;a|{|c|l=indexOf(c,A) b_xor l;[A[l]]}_}

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

मैंने l=63जावास्क्रिप्ट उत्तर से चाल का उपयोग किया । ~~अभी मैं Aप्रगति पर गोल्फ इतना छोटा करने पर काम कर रहा हूँ ...~~

— क्रिकटी लिथोस
स्रोत

1

पायथन 2 , 155 बाइट्स

lambda s,m=' !"#$%&\'()*+,-./0123456789:;=?@[\\]^_abcdefghijklmnopqrstuvwxyz|~':''.join(m[i]for i in reduce(lambda a,b:a+[a[-1]^b],map(m.find,s),[63])[1:])

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

— OVS
स्रोत

1

PHP, 103 बाइट्स

for($x=63;~$c=$argn[$i++];)echo($a=join(preg_grep("#[^A-Z<>`{}]#",range(" ","~"))))[$x^=strpos($a,$c)];

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

PHP, 107 बाइट्स

for($x=63;~$c=$argn[$i++];)echo($a=preg_filter("#[A-Z<>`{}]#","",join(range(" ","~"))))[$x^=strpos($a,$c)];

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

PHP, 118 बाइट्स

for($x=63;~$c=$argn[$i++];)echo($a=join(array_diff(range(" ","~"),range(A,Z),str_split("<>`{}"))))[$x^=strpos($a,$c)];

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

— जार्ग हुल्सरमन
स्रोत

1

पायथन + नेम्पी, 214 बाइट्स

अन्य पायथन समाधान के साथ प्रतिस्पर्धा नहीं कर सकता, हालांकि अलग-अलग, शुद्ध संख्यात्मक दृष्टिकोण का उपयोग करता है:

from numpy import *
def f(s):
    r=range
    A=array
    S=A(r(32,60)+[61,63,64]+r(91,96)+r(97,123)+[124,126])
    T=A(r(128))
    T[S]=A(r(64))
    W=T[fromstring(s,"b")]
    W[0]=~W[0]
    W=S[bitwise_xor.accumulate(W)&63]
    print W.tobytes()[::4]

थोड़ा सा स्पष्टीकरण:

S=A(r(32,60)+...) - कोड श्रेणियों के रूप में वर्णमाला को परिभाषित करें
T=A(r(128)) - init हैश का आकार 128 टेबल (सबसे बड़ा कोडपॉइंट)
T[S]=A(r(64)) - हैश टेबल भरें, यानी ASCII सूचकांकों के साथ तत्वों को 0-63 लिखें
W=T[fromstring(s,"b")] - इनपुट को सरणी में बदलें और नए कोड में अनुवाद करें
W[0]=~W[0] - 1 मान उलटा
W=S[bitwise_xor.accumulate(W)&63] - लूपिंग से बचने के लिए Xump के साथ Numpy की संचित विधि का उपयोग करें, 2 बाएं बिट्स को रीसेट करें और वापस ascii में अनुवाद करें

— मिखाइल वी
स्रोत

1

एलिस , 46 बाइट्स

/" >"{""ZNr\'?wi.h%)qXq&[.&]?oe(K
\"<~`r}A*"!/

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

व्याख्या

कार्यक्रम का पहला भाग क्रमिक मोड में चलता है और संख्याओं से वर्णों तक मानचित्रण सेट करता है। दूसरा आधा कार्डिनल मोड में चलता है और इनपुट को डीकोड करने के लिए इस मैपिंग का उपयोग करता है।

" ~"                    Push this string
    r                   Convert to entire range (all printable ASCII)
     "AZ"               Push this string
         r              Convert to entire range
          "<>`{}"       Push this string
                 *      Append last two strings
                  N     Remove characters from full string
                   !    Copy entire string to tape

'?                      Push 63 (code point of ?) onto the stack
  w                     Store return address (start main loop)
   i                    Take byte of input
    .h%                 Calculate n mod (n+1): this crashes on EOF (-1)
       )                Find byte on tape
        q               Get position on tape
         X              Bitwise XOR with current value
          q&[           Return to tape position 0
             .&]        Move to tape position corresponding to result of earlier XOR
                ?o      Get and output byte at current tape position
                  e(    Search for -1 to left of current tape position (which will put us at position -1)
                    K   Jump to previously pushed return address.

— Nitrodon
स्रोत

1

जाप `-P` , 33 बाइट्स

;
EkB+"<>}\{`"1
¬i63 åÈ^VaYÃÅm!gV

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

किसी कारण से, परीक्षण के मामलों में एक सूट के रूप में चलने पर आपत्ति होती है, इसलिए यहां दूसरा , तीसरा और व्यक्तिगत रूप से चौथा है।

स्पष्टीकरण:

;                    #Set E to a string of all printable ASCII characters

Ek          1        #Set V to E with these characters removed:
  B                  # All uppercase letters
   +"<>}\{`"         # and the characters "<>}{`"

¬                    #Turn the input into an array
 i63                 #Add the number 63 to the front of that array
     å     Ã         #Replace each character with:
      È              # The index of the previous decoded character in V
       ^             # Xor with...
        VaY          # The index of the current character in V
            Å        #Remove the extra character
             m!gV    #Map the indexes to the character in V
                     #Join to a string due to the flag

— कामिल दकरी
स्रोत

1

एपीएल (एनएआरएस), 72 चार्ट, 144 बाइट्स

{r←6⍴2⋄y←{r⊤⍵}¨¯1+⍵⍳⍨s←⎕AV[33..127]∼⎕A,'{<>}`'⋄y[1]←⊂∼↑y⋄s[1+{r⊥⍵}¨≠\y]}

यह मान लें कि इनपुट हमेशा सरणी में है ... 'समझने के लिए कि मुझे कैसे करना है विधानसभा असेंबली पहले लिखना था ...:

  h←{r←6⍴2⋄y←{r⊤⍵}¨¯1+⍵⍳⍨s←⎕AV[33..127]∼⎕A,'{<>}`'⋄y[1]←⊂∼↑y⋄s[1+{r⊥⍵}¨≠\y]}
  h ,'6'
f
  h '945/'
code
  h ",&'8[14 =?;gp+% 2'@s&&c45/eg8?&"
programming puzzles & code golf
  h ';a$5$%0r?2@12dw6# lb-eg&519nt%ot=9$@es@96+?;ga" 4*)&ta56dp[?o#t%oh/"(&?#ee![,+,/+fe4"'
a $150 reward will be given to those sending account and pin# to hackers@steal_id.com
  h "~!#!'!#!/!#!'!#![!#!'!#!/!#!'!#!~!#!'!#!/!#!'!#![!#!'!#!/!#!'!#!"
 !"#$%&'()*+,-./0123456789:;=?@[\]^_abcdefghijklmnopqrstuvwxyz|~

— RosLuP
स्रोत

1

105 103 बाइट्स, मशीन कोड (16-बिट x 86), 57 निर्देश

00000000: ff 01 b9 01 00 89 fa b4 3f cd 21 85 c0 75 02 cd
00000010: 20 8a 05 2c 20 3c 1d 72 1b 48 3c 1e 72 16 48 3c
00000020: 39 72 11 2c 1a 3c 25 72 0b 48 3c 3f 72 06 48 3c
00000030: 40 72 01 48 32 04 24 3f 88 04 3c 3f 72 01 40 3c
00000040: 3e 72 01 40 3c 24 72 01 40 3c 1f 72 02 04 1a 3c
00000050: 1d 72 01 40 3c 1c 72 01 40 04 20 43 89 d9 88 05 
00000060: b4 40 cd 21 4b eb 9b

रनिंग: save to codegolf.com, dosbox:

codegolf.com < input.bin

लगभग भूल गया मजेदार हिस्सा:

हाउडी, यह मेरी दूसरी प्रविष्टि है। पिछला एक RC4 था । एचटी हेक्सिडिटर का उपयोग करते हुए ,संकलक के बिना , लेकिन इस बार मैं Ctrl-a का उपयोग कर रहा थाassemble instruction , मैं अभी भी डननो करता हूं कि यह प्रविष्टि के रूप में गिना जाता है या नहीं।

क्यों कैसे

इसी तरह से मैंने फ़ाइल को NOPs के साथ बनाकर शुरू किया है , तो मैंने RC4 से पढ़ने / लिखने में पुन: उपयोग किया । मैंने पहली बार अजीनि से इंडेक्स तक पायथन 'ट्रांसलेशन लैडर' में लिखा था। और असेंबली में इसका इस्तेमाल किया, इसी तरह की सीढ़ी को उल्टी दिशा में बनाया, आखिरकार मैंने पहली बाइट को संभालने के लिए छोटी चाल जोड़ी

RC4 के लिए इसी तरह से अंतिम चरण अतिरिक्त से छुटकारा पा रहा था nops , जिसे फिक्सिंग जंप की आवश्यकता थी।

विच्छेदन

फिर से कार्यक्रम प्रारंभिक रजिस्टर मूल्यों पर निर्भर करता है ।

00000000 ff01                    inc         word ptr [bx+di]

डमी, बाद में जरूरत होगी

00000002 b90100                  mov         cx, 0x1
00000005 89fa                    mov         dx, di
00000007 b43f                    mov         ah, 0x3f
00000009 cd21                    int         0x21

बाइट पढ़ें

0000000b 85c0                    test        ax, ax
0000000d 7502                    jnz         0x11
0000000f cd20                    int         0x20

अगर स्टड खत्म हो गया तो छोड़ दें

00000011 8a05                    mov         al, [di]
00000013 2c20                    sub         al, 0x20
00000015 3c1d                    cmp         al, 0x1d
00000017 721b                    jc          0x34
00000019 48                      dec         ax
0000001a 3c1e                    cmp         al, 0x1e
0000001c 7216                    jc          0x34
0000001e 48                      dec         ax
0000001f 3c39                    cmp         al, 0x39
00000021 7211                    jc          0x34
00000023 2c1a                    sub         al, 0x1a
00000025 3c25                    cmp         al, 0x25
00000027 720b                    jc          0x34
00000029 48                      dec         ax
0000002a 3c3f                    cmp         al, 0x3f
0000002c 7206                    jc          0x34
0000002e 48                      dec         ax
0000002f 3c40                    cmp         al, 0x40
00000031 7201                    jc          0x34
00000033 48                      dec         ax

सीढ़ी जो इंडिसी का अनुक्रमण करता है (मन करता है कि सभी जंप 0x134 पर जाएं)

00000034 3204                    xor         al, [si]

पिछले बाइट द्वारा एक्सर बाइट, SIपते पर इंगित करता है 0x100, जिसमें शुरू में शीर्ष पर एक डमी निर्देश के ओपकोड से 0xFF होता है, जिसके परिणामस्वरूप नकारात्मक व्यवहार होता है (अनुस्मारक: COM 0x100 पर लोड होता है)

00000036 243f                    and         al, 0x3f
00000038 8804                    mov         [si], al

सूचकांक के लिए सीमा परिणाम, और 0x100 पर बाइट स्टोर करें,

0000003a 3c3f                    cmp         al, 0x3f
0000003c 7201                    jc          0x3f
0000003e 40                      inc         ax
0000003f 3c3e                    cmp         al, 0x3e
00000041 7201                    jc          0x44
00000043 40                      inc         ax
00000044 3c24                    cmp         al, 0x24
00000046 7201                    jc          0x49
00000048 40                      inc         ax
00000049 3c1f                    cmp         al, 0x1f
0000004b 7202                    jc          0x4f
0000004d 041a                    add         al, 0x1a
0000004f 3c1d                    cmp         al, 0x1d
00000051 7201                    jc          0x54
00000053 40                      inc         ax
00000054 3c1c                    cmp         al, 0x1c
00000056 7201                    jc          0x59
00000058 40                      inc         ax
00000059 0420                    add         al, 0x20

उल्टी दिशा में सीढ़ी

0000005b 43                      inc         bx
0000005c 89d9                    mov         cx, bx
0000005e 8805                    mov         [di], al
00000060 b440                    mov         ah, 0x40
00000062 cd21                    int         0x21
00000064 4b                      dec         bx

[ब] के तहत बाइट डालें, stdout को बाइट लिखें (मन कि AH = 40h एक पते के रूप में DX का उपयोग करता है, लेकिन यह बाइट पढ़ते समय सबसे ऊपर सेट किया गया था)

मन कि स्टडिन -> स्टडआउट और स्टडआउट को स्टड करने के लिए inc bx / dec bx का उपयोग किया जाता है

00000067 eb99                    jmp         0x2

लूप ^ ^

उपकरण और संसाधन

ht संपादक - इसमें 16-बिट डिसमिस / असेंबली है
hexplorer - माउस आधारित कॉपी / पेस्ट + डालने / अधिलेखित करने के लिए
डॉसबॉक्स - डिबगिंग के लिए
DOS .COM स्टार्टअप पर मूल्यों को पंजीकृत करें

— GIM
स्रोत

डिक्रिप्ट xor-एन्क्रिप्शन

परीक्षण के मामलों:

जेली , 27 26 बाइट्स

वैकल्पिक संस्करण, 22 बाइट्स (गैर-प्रतिस्पर्धात्मक)

यह काम किस प्रकार करता है

जावास्क्रिप्ट (ईएस 6), 115 बाइट्स

परीक्षण के मामलों

जेली , 34 31 बाइट्स

कैसे?

जावा, 225 बाइट्स

05AB1E , 40 बाइट्स

सीपीयू x86 निर्देश सेट, 235 बाइट्स

सी (जीसीसी) , 153 बाइट्स

एपीएल (Dyalog यूनिकोड) , 52 बाइट्स SBCS

रोड़ा , 120 100 बाइट्स

पायथन 2 , 155 बाइट्स

PHP, 103 बाइट्स

PHP, 107 बाइट्स

PHP, 118 बाइट्स

पायथन + नेम्पी, 214 बाइट्स

एलिस , 46 बाइट्स

व्याख्या

जाप -P , 33 बाइट्स

एपीएल (एनएआरएस), 72 चार्ट, 144 बाइट्स

105 103 बाइट्स, मशीन कोड (16-बिट x 86), 57 निर्देश

क्यों कैसे

विच्छेदन

उपकरण और संसाधन

एपीएल (Dyalog यूनिकोड) , 52 बाइट्स ^SBCS

जाप `-P` , 33 बाइट्स