Виклик

Враховуючи рядок, що описує правило розрізання, та іншу рядок, виріжте частини другої рядки, використовуючи правило, описане першим рядком.

Обидва рядки будуть складатися з літер a-zабо A-Z, що б ви не вибрали (вони не повинні бути представлені однаково). Спосіб зміни другого рядка описаний нижче:

Алгоритм

Візьміть перший рядок і уявіть собі заповнення прогалин між сусідніми (зростаючими) літерами за допомогою =; наприклад, abcfg=> abc==fg. Потім вибудуйте два рядки та поверніть усі символи з першого рядка, які не знаком рівності. Наприклад, наведені abcfgта qrstuvwвхідні дані:

qrstuvw - Modify
abc==fg - Modifier

qrs--vw -> qrsvw

Якщо модифікатор буде коротшим після заповнення рівними знаками, слід включити всі проміжні символи у другому рядку. Якщо модифікатор довший, проміжні символи ігноруються.

Модифікатор не гарантується сортуванням.

Випробування

abcfg, qrstuvw -> qrsvw
abqrs, qwertyuiopasdfghjklzxcvbnm -> qwjklzxcvbnm
za, qr -> qr
azazaz, qwertyuioplkjhgfdsazxcvbnmnbvcxzasdfghjklpoiuytrewq -> qmn

Довідкова реалізація (використовується для створення тестових випадків) -> TIO

Правила

• Застосовуються стандартні лазівки
• Ви можете приймати дані як два рядки, два списки символів, матриця символів тощо (будь-який інший розумний формат прийнятний)
• Ви можете вивести рядок або список символів (або якийсь інший стандартний формат для рядків)
• Це код-гольф , тому найкоротша відповідь у байтах кожною мовою оголошується переможцем для своєї мови. Відповідь не буде прийнято.
• Будь-який рядок може бути порожнім.

Щасливого гольфу!

_{^{Натхненний останніми двома викликами Кевіна Круїссена: "Там я виправив це ( стрічкою / мотузкою )"}}

JavaScript (ES6), 81 80 байт

Здійснює введення в синтаксис currying (modify)(modifier).

s=>g=([c,...a],d=i=0,x=s[k=parseInt(c,36),i+=c?d&&(k-d+26)%26:1])=>x?x+g(a,k):''

Спробуйте в Інтернеті!

Прокоментував

s =>                       // outer function, taking the string s to modify
  g = (                    // recursive inner function g(), taking:
    [c, ...a],             //   c = current modifier character; a[] = remaining characters
    d = i = 0,             //   d = code of previous modifier character; i = pointer in s
    x = s[                 //   x = i-th character of s
      k = parseInt(c, 36), //     k = code of the current modifier character in [10..35]
      i += c ?             //     update i; if c is defined:
        d &&               //       if d = 0, let i unchanged
        (k - d + 26) % 26  //       otherwise, add the difference between k and d (mod 26)
      :                    //     else:
        1                  //       just pick the next character by adding 1
    ]                      //   end of character lookup in s
  ) =>                     //
    x ?                    // if x is defined:
      x + g(a, k)          //   append x and do a recursive call to g()
    :                      // else:
      ''                   //   stop recursion

Python 3 , 99 байт

lambda a,b:[x for x,y in zip(a,''.join(d+(ord(c)+~ord(d))%26*'='for c,d in zip(b[1:],b))+a)if'='<y]

Спробуйте в Інтернеті!

05AB1E , 20 17 байт

ćsv¹Ç¥Nè<yú«}SðÊÏ

Спробуйте в Інтернеті!

Обчислює відстань ASCII між кожним знаком, попередньо передбачивши, що багато пробілів, якщо вони позитивні. Негативна відстань призводить до додавання 0 пробілів відповідно до специфікації. Після цього я натискаю всі символи на однакові показники в рядку 2, як пробіли в першій маніпульованій рядку.

Input: [azaz,qwertyuiopasdfghjklzxcvbnm]
--------------------------------------------------------------------------------

ćs                # Remove head, swap                           | [a, zaz]
  v               # Iterate...                                  | ............
   ¹Ç¥            # Push deltas between each char of string 1   | [a,[25,-25,25,-25]]
      Nè          # Push delta at index...                      | [a, 25]
        <         # Decrement (for 1-indexed answer)            | [a, 24]
         y        # Push current char in iteration...           | [a, 24, z]
          ú       # Append b spaces to a...                     | [a, '(spaces)z']
           «      # Concat                                      | [a(spaces)z]
            }     # End loop.                                   | [a(spaces)za(spaces)z]
             SðÊ  # Split, push 1 for non-space elements.       | [Long array of 1/0]
                Ï # Push chars from 2 that aren't spaces in 1.  | ['qmn']

На 90% впевнений, що я можу втратити ще 2-3 байти, не використовуючи пробіли, але натиснувши знак на індекс N. На даний момент я працюю над цим варіантом ... На чому закінчилася моя "краща ідея":

05AB1E , 18 байт

Ç¥ε1‚Z}ηO0¸ìʒ²g‹}è

Спробуйте в Інтернеті!

Я відчуваю , що я що - то НЕ вистачає, якщо ви бачите поліпшення на ε1‚Z}, ʒ²g‹}або 0¸ìЛМК ...

Ç¥ε1‚Z}ηO0¸ìèбуло 13, але це обертає , коли n > |input_2|до input_2[n%|input_2|]...

Стакс , 15 байт

Ç«|¢Äα•è@╟╣i`vF

Запустіть і налагоджуйте його

Це представлення ascii.

:-Z+{v0|Mt|cB]pFp

1. Отримайте попарні відмінності.
2. Додайте нуль.
3. Передбачте різницю, повторіть
   4. Віднімаємо 1 і приймаємо максимум з нулем.
   5. Видаліть стільки символів з початку рядка.
   6. Зупиніть, якщо рядок порожній.
4. Роздрукуйте решту рядка.

Желе , 14 байт

OI’R¬⁸żFḣL}aḟ0

Дьядічне посилання, що приймає модифікатор як список символів зліва та список символів, який потрібно змінити, праворуч повертаючи списки символів.

Спробуйте в Інтернеті!

Як?

OI’R¬⁸żFḣL}aḟ0 - Link list of characters Modifier, list of characters InStr
               -                       e.g.  ['a','c','g','a'], ['n','m','l','k','j']
O              - ordinals of Modifier        [97,99,103,97]
 I             - incremental differences     [2,4,-6]
  ’            - decrement                   [1,3,-7]
   R           - range                       [[1],[1,2,3],[]]
    ¬          - NOT (vectorises)            [[0],[0,0,0],[]]
     ⁸         - chain's left argument, Modifier
      ż        - zip together                [['a',[0]],['c',[0,0,0]],['g',[]],['a']]
       F       - flatten                     ['a',0,'c',0,0,0,'g','a']
         L}    - length of right (InStr)     5
        ḣ      - head to index               ['a',0,'c',0,0] (if shorter or equal, no effect)
           a   - AND with InStr (vectorises) ['n',0,'l',0,0]
            ḟ0 - filter out zeros            ['n','l']

JavaScript (ES6), 79 байт

f=([t,...T],s,z=T[0])=>z&&s?s[0]+f(T,s.slice(t>z||(parseInt(t+z,36)-370)%37)):s

Використовує той же алгоритм для обчислення відстані між літерами, як і мій остання відповідь .

Тестові приклади:

f=([t,...T],s,z=T[0])=>z&&s?s[0]+f(T,s.slice(t>z||(parseInt(t+z,36)-370)%37)):s

console.log(f('abcfg','qrstuvw')) // -> qrsvw
console.log(f('abqrs','qwertyuiopasdfghjklzxcvbnm')) // -> qwjklzxcvbnm
console.log(f('za','qr')) // -> qr
console.log(f('azazaz','qwertyuioplkjhgfdsazxcvbnmnbvcxzasdfghjklpoiuytrewq')) // -> qmn

APL (Dyalog Classic) , 35 34 32 байт

{⍵∩⍨⊃¨↓∘⍵¨+\0,1⌈(-2-/⎕ucs⍺),=⍨⍵}

Спробуйте в Інтернеті!

K (ngn / k) , 27 24 25 байт

{y[+\0,1|1_-':x,!#y]^" "}

Спробуйте в Інтернеті!

{y[+\0,1|1_-':x,!#y]^" "}

{                       } function with x and y as arguments
                 #y       the length of y
                !#y       0 1 2 ... (#y)-1
              x,          x concatenated with
           -':            differences between pairs
         1_               rm extra leading item
       1|                 max between 1 and
     0,                   prepend 0
   +\                     partial sums
 y[                ]      index y with that
                    ^" "  rm spaces due to out-of-bounds indexing

Хаскелл , 49 байт

(x:r)#(y:n:s)=x:drop(length[y..n]-2)r#(n:s)
r#_=r

Спробуйте в Інтернеті!

Perl 5 , 45 байт

s/./v0.$;x(ord($')-1-ord$&)/eg;$_|=<>;s/\W//g

Спробуйте в Інтернеті!

Рубі , 68 64 байт

->m,z,i=1{z[i,[0,m[i].ord+~m[i-1].ord].max]&&='';m[i+=1]?redo:z}

Спробуйте в Інтернеті!

Вугілля , 29 28 байт

⭆η×ιＩ§⁺⭆θ⁺×0∧μ⊖⁻℅λ℅§θ⊖μ1⭆η1κ

Спробуйте в Інтернеті!Посилання на багатослівну версію коду. Спираючись на свою відповідь Там, я зафіксував це скотчем. Пояснення:

       ⭆θ⁺×0∧μ⊖⁻℅λ℅§θ⊖μ1        Fix it with tape, but map to 1s and 0s
      ⁺                 ⭆η1     Append extra 1s just in case
⭆η                              Map over the second string
     §                     κ    Get the character from the fixed string
    Ｉ                           Cast to integer
  ×ι                            Repeat the current character that many times
                                Implicitly print

Примітка. Це має бути 28 байт, але Andпорушено під час написання.

Java 8, 117 байт

a->b->{for(int i=0,j;++i<a.length;b=j>0&b.length()>=i+j?b.substring(0,i)+b.substring(i+j):b)j=a[i]+~a[i-1];return b;}

Пояснення:

Спробуйте в Інтернеті.

a->b->{                   // Method with char-array + String parameters and String return
  for(int i=0,j;++i<a.length;
                          //  Loop `i` in range [1; length_of_array)
      b=                  //    After every iteration: change the String-input to:
        j>0               //     If `j` is larger than 0,
        &b.length()>=i+j? //     and the length of `b` is larger or equal to `i+j`:
         b.substring(0,i) //      Take the substring [0; i)
         +b.substring(i+j)//      + the substring [i+j; end_of_string]
        :                 //     Else:
         b)               //      Leave `b` the same
    j=a[i]+~a[i-1];       //   Set `j` to the difference between two adjacent chars - 1
  return b;}              //  Return the modified input-String