स्विचिंग ग्रेविटी

Question

चुनौती

आपको किसी उचित विधि द्वारा इनपुट के रूप में एक विमान पर वर्णों का ASCII- कला प्रतिनिधित्व दिया जाता है। इसमें केवल शामिल होगा:

• [a-z]चल पात्रों का प्रतिनिधित्व करते हैं। प्रत्येक पत्र बोर्ड पर सबसे अधिक बार दिखाई देगा।
• # अचल दीवारों का प्रतिनिधित्व करना
• . खाली जगह का प्रतिनिधित्व करते हुए

उदाहरण के लिए:

abcdef.gh#..
.......ij.#.
#..#.......#
...#.#...###
.#.......#q#
.........###

आपको गुरुत्वाकर्षण में परिवर्तन का प्रतिनिधित्व करने वाला एक तार भी दिया जाता है। इसमें केवल शामिल होगा:

• > सही गुरुत्व में परिवर्तन का प्रतिनिधित्व करना
• < बाईं ओर के गुरुत्वाकर्षण में बदलाव का प्रतिनिधित्व करना
• ^ ऊपर की ओर गुरुत्वाकर्षण के परिवर्तन का प्रतिनिधित्व करना
• v नीचे की ओर गुरुत्वाकर्षण के परिवर्तन का प्रतिनिधित्व करना

उदाहरण के लिए:

v>^

आपके कार्यक्रम को गुरुत्वाकर्षण में प्रत्येक परिवर्तन को क्रमिक रूप से तब तक अनुकरण करना चाहिए जब तक कि सभी पात्र हिलना बंद न करें (वे एक दीवार, या किसी अन्य वर्ण से टकराते हैं)। वर्ण जो "मानचित्र के किनारे से गिरते हैं" स्थायी रूप से हटा दिए जाते हैं, और वर्ण एक दूसरे के ऊपर "स्टैक" कर सकते हैं।

इस उदाहरण में, शुरू में वहाँ नीचे गुरुत्वाकर्षण है ( v), इसलिए c, e, g, h, i, और jबंद नक्शे के नीचे गिर जाते हैं। अन्य सभी वर्ण दीवार से टकराने तक नीचे की ओर स्लाइड करते हैं, इस तरह से नक्शा छोड़ते हैं:

.........#..
a..d......#.
#..#.f.....#
.b.#.#...###
.#.......#q#
.........###

फिर, हम सही गुरुत्व ( >) की ओर बढ़ते हैं , जो हमें इस पर छोड़ देता है: ध्यान दें कि aआगे के ढेर कैसे हैं d।

.........#..
........ad#.
#..#......f#
..b#.#...###
.#.......#q#
.........###

अंत में, हम ऊपर की ओर गुरुत्वाकर्षण ( ^) का अनुकरण करते हैं , जिसके दौरान aऔर bनक्शा बंद हो जाता है।

.........#..
.........d#.
#..#......f#
...#.#...###
.#.......#q#
.........###

आपका कार्य गुरुत्वाकर्षण पारियों के बाद शेष वर्णों का उत्पादन करना है। उन्हें किसी भी क्रम में दिया जा सकता है। इस उदाहरण के लिए, आप किसी भी क्रमपरिवर्तन का उत्पादन कर सकते हैं dfq।

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

निम्नलिखित मानचित्र के लिए:

abcde
.....
##.##

v   =  abde
v>  =  <nothing>

निम्नलिखित मानचित्र के लिए:

######
#....#
abcdef
#.gh..
######

>   = <nothing>
<   = gh
^>  = bcde
v<  = bghef

Comments

इनपुट कैसे दिया जाता है? तार की सूची? समारोह तर्क? STDIN?

— लीकेय नून

@ केनीलाउ उन सभी विकल्पों में से ठीक हैं। इनपुट और आउटपुट आपकी भाषा के लिए कुछ भी उचित हो सकता है।

— 3

कुछ हद तक संबंधित।

— मार्टिन एंडर

Answer 1

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

(m,d,r=`replace`)=>[...d].map(c=>[...`<^>v`].map(d=>m=[...(m=(c==d?m[r](/[.\w]+/g,s=>s[r](/\./g,``)+s[r](/\w/g,``))[r](/^\w+/gm,s=>s[r](/./g,`.`)):m).split`
`)[0]].map((_,i)=>m.map(s=>s[i]).join``).reverse().join`
`))&&m[r](/\W/g,``)

संपादित करें: @WashingtonGuedes के लिए धन्यवाद 18 बाइट्स सहेजे गए।

प्रत्येक दिशात्मक चरित्र के लिए चार बार इनपुट ग्रिड को घुमाकर काम करता है, लेकिन उस दिशा पर जहां दिशात्मक चरित्र लूप चरित्र से मेल खाता है हम बाईं गुरुत्वाकर्षण चीज़ करते हैं। स्यूडोकोड:

function slideleft(map) {
    map = map.replace(/[.\w+]/g, match=>movedotstoend(match));
    map = map.replace(/^\w+/gm, match=>changetodots(match));
}
function rotate(map) {
    return joinrows(reverse([for each (column of rows(map)[0])
            joinrow([for each (row of rows(map)) row[column]])
           ]));
}
function gravity(map, directions) {
    for each (direction of directions) {
        for each (angle of '<^>v') {
            if (direction == angle) map = slideleft(map);
            map = rotate(map);
        }
    }
    return letters(map);
}

Answer 2

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

@ नील के उत्तर के समान रूप से। प्रत्येक दिशात्मक चरित्र के लिए ग्रिड को चार बार घुमाया जाता है, जब सही स्थिति में बाईं ओर गुरुत्वाकर्षण पारी को प्रत्येक पंक्ति में लागू किया जाता है।

x=>y=>(x=>{for(d of y){R='';for(e of'^>v<')x=[...x[0]].map((c,i)=>e!=d?x.map(r=>r[i]).join``:x.map(r=>(c=r[i])<'.'?(q+=p+c,p=''):c>'.'&&q?(q+=c,R+=c):p+='.',q=p='')&&q+p).reverse();}})(x.split`
`)||R

F=x=>y=>(x=>{for(d of y){R='';for(e of'^>v<')x=[...x[0]].map((c,i)=>e!=d?x.map(r=>r[i]).join``:x.map(r=>(c=r[i])<'.'?(q+=p+c,p=''):c>'.'&&q?(q+=c,R+=c):p+='.',q=p='')&&q+p).reverse();}})(x.split`
`)||R

// Less golfed

U=(x,y)=>
{
  x = x.split`\n`;
  for(d of y)
  {
    R = '';
    for(e of '^>v<')
      x = [...x[0]].map( 
        (c,i) => e != d
        ? x.map( r => r[i] ).join`` // basic rotation
        : x.map( // rotation with gravity shift
          r=> (c=r[i])<'.' ? (q+=p+c,p='') : c>'.'&&q?(q+=c,R+=c) : p+='.', q=p=''
        ) && q+p
      ).reverse();
  }
  return R
}

console.log=x=>O.textContent+=x+'\n'

;[
  ['abcdef.gh#..\n.......ij.#.\n#..#.......#\n...#.#...###\n.#.......#q#\n.........###',
   [['v>^','dfq']]
  ],
  ['abcde\n.....\n##.##',[['v','abde'],['v>','']]],
  ['######\n#....#\nabcdef\n#.gh..\n######',[['>',''],['<','gh'],['^>','bcde'],['v<','befgh']]]
].forEach(t => {
  var i=t[0]
  console.log(i)
  t[1].forEach(([d,k])=>{
    var r=F(i)(d),ok=[...r].sort().join``==k
    console.log((ok?'OK ':'KO ')+d+' : '+r+(ok?'':' (expected '+k+')'))
  })
  console.log('')
})

<pre id=O></pre>

Answer 3

पायथ, 143 बाइट्स

(क्या हमें वास्तव में उस बाइट्स की आवश्यकता है?)

JhQKeQMe.u:N+"\."H+H"."G;DybVkI}NG=gkN;D'bVlJ=k@JNykVkI}HG=:kH\.).?B)=XJNk;VKIqN\<'J)IqN\v=C_J'J=_CJ)IqN\>=C_CJ'J=C_CJ)IqN\^=CJ'J=CJ;VJVNI}HGpH

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

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

हम एक फ़ंक्शन को परिभाषित करते हैं leftजो बाईं ओर गुरुत्वाकर्षण कार्य करता है।

फिर, अन्य दिशाओं को सरणी के साथ गड़बड़ करके लागू किया जाता है ताकि वांछित दिशा बाईं ओर हो, फिर करें left।

यहाँ का एल्गोरिदम leftहै:

• निम्नलिखित करें जब तक कि बेरोजगार न हो:
• के ".X"साथ बदलें "X.", जहां Xएक पत्र का प्रतिनिधित्व करता है।

पूरे कार्यक्रम को निम्नलिखित 6 खंडों में विभाजित किया गया है:

JhQKeQ
Me.u:N+"\."H+H"."G;
DybVkI}NG=gkN;
D'bVlJ=k@JNykVkI}HG=:kH\.).?B)=XJNk;
VKIqN\<'J)IqN\v=C_J'J=_CJ)IqN\>=C_CJ'J=C_CJ)IqN\^=CJ'J=CJ;
VJVNI}HGpH

प्रथम खंड

JhQKeQ     Q auto-initialized to evaluate(input())
JhQ        J = Q[0]
   KeQ     K = Q[len(Q)-1]

दूसरा खंड

Me.u:N+"\."H+H"."G;   @memoized
M                 ;   def g(G,H):
  .u             G      repeat_until_idempotent(start:G, as N):
    :Nxxxxxxyyyyy         return N.replace(xxxxxx,yyyyy)
      +"\."H                               "\."+H
            +H"."                                 H+"."

तीसरा खंड

DybVkI}NG=gkN;    @memoized
Dyb          ;    def y(b):
   Vk               for N in k:     --TAKES GLOBAL VARIABLE k
     I}NG             if N in G:    --G pre-initialized to "abcde...z"
         =gkN           k = g(k,N)

चौथा खंड

D'bVlJ=k@JNykVkI}HG=:kH\.).?B)=XJNk;  @memoized
D'b                                ;  def single_quote(b):
   VlJ                       )          for N in range(len(J)): --TAKES GLOBAL VARIABLE J
      =k@JN                               k = J[N] --SETS GLOBAL VARIABLE k
           yk                             y(k) --returns nothing, but MODIFIES GLOBAL VARIABLE k
             Vk                           for H in k:
               I}HG      )                  if H in G:
                   =:kH\.                     k = k.replace(H,".")
                          .?                else:
                            B                 break
                              =XJNk     J[N] = k --MODIFIES GLOBAL VARIABLE J

पांचवा खंड

VKIqN\<'J)IqN\v=C_J'J=_CJ)IqN\>=C_CJ'J=C_CJ)IqN\^=CJ'J=CJ;
VK                                                       ; for N in K:
  IqN\<  )                                                   if N == '<':
       'J                                                      single-quote(J)
          IqN\v          )                                   if N == 'v':
               =C_J                                            J = transpose(reverse(J))
                   'J                                          single-quote(J)
                     =_CJ                                      J = reverse(transpose(J))
                          IqN\>            )                 if N == '>':
                               =C_CJ                           J = transpose(reverse(transpose(J)))
                                    'J                         single-quote(J)
                                      =C_CJ                    J = transpose(reverse(transpose(J)))
                                            IqN\^            if N == '^':
                                                 =CJ           J = transpose(J)
                                                    'J         single-quote(J)
                                                      =CJ      J = transpose(J)

छठा खंड

VJVNI}HGpH
VJ           for N in J:
  VN           for H in N:
    I}HG         if H in G: --G = "abc...z"
        pH         print(H)

Answer 4

रूबी, 306 बाइट्स

अनाम फ़ंक्शन। सुंदर सर्किट तकनीक जिसे शायद अनुकूलित किया जा सकता है।

->s,d{w=[];x=y=0;m={}
s.chars.map{|c|c>?!?(c<?A?c<?.?w<<[x,y]:0:m[c]=[x,y]
x+=1):(x=0;y+=1)}
d.chars.map{|c|q=[c<?=?-1:c<?A?1:0,c>?a?1:c>?A?-1:0];e=1
(n=m.clone.each{|k,v|z=[v[0]+q[0],v[1]+q[1]]
w.index(z)||m.value?(z)?0:m[k]=z}
m.reject!{|k,v|i,j=v;i<0||i>=x||j<0||j>y}
e=(m!=n ?1:p))while e}
m.keys.join}