破碎的凯普斯基凯·菲亚斯科

25

您的一些员工的Capslock键已损坏，而您更换它们太便宜了。通过创建最短的程序来纠正他们的工作来帮助他们！只需将给定字符串中的每个字符从大写字母转换为小写字母，反之亦然...但这是有误的！

您也对圣诞节感到非常兴奋！因此，您将留下一个微小的“错误”，该错误无法纠正Christmas（不区分大小写）序列中的字母。

输入项

对于输入，您将使用一个单个字符串（或字节数组），其中可能包含0x20和0x7e（- ~）之间的换行符和ascii 。您无需担心回车符或字符串中是否包含其他任何字符。

输出量

输出应仅包含提供的字符串，并且将大写和小写字符互换（当然还有圣诞节错误！）。它最多可以包含一个额外的尾随空白。

圣诞虫

让我们用一个例子来解释一下：

Input: i CAN HARDLY WORK LIKE THIS please GET ME A NEW KEYBOARD FOR cHRISTMAS
Output: I Can HaRdly work lIke thiS PLEASE geT Me A new keyboard for ChriStmas

can包含“ c”，这是圣诞节的首个字母，因此不会更改。in中的下一个字母Christmas是“ h”，它在in中hardly（也包含“ r”），因此不会更改，依此类推。Christmas本身只有一个字母不变，因为到代码到达那里时，它实际上正在寻找“ s”，而不是“ c”。

一旦找到序列，它应该从“ c”重新开始，并再次开始迭代Christmas。因此ChristmasChristmas将保持不变。

测试用例

Input: Hello World!
Output: hELLO wORLD!

Input: I like pie :)
Output: i LIKE PIE :)

Input: hELP my KeYboarD
       iS BROKEN
Output: Help MY kEyBOARd
        Is broken

Input: cHRISTMAS IS COMING REALLY SOON!
Output: cHRISTMAS is Coming really soon!

Input: C is the first letter in cHRISTMAS
Output: C IS ThE FIrST LETTER iN ChriSTMAS

优胜者

这是代码高尔夫球，所以最短的答案会成功！

code-golf  string 
— 红星编码器
source
5
“没有内置的软件可以解决大多数挑战”是一个非常奇怪的限制。当交换挑战的一半是确定哪些字母不在“圣诞节”中时，“交换案例”真的会引起很多问题吗？
— ATaco
1
— 丹尼斯
@ATaco，由于对沙箱的反馈，我在最后一分钟添加了它，但我同意，因此已将其删除。
— redstarcoder '16
另外，在测试案例3中，您交换了圣诞节的第一个h。
— ATaco
@ATaco，它Christmas顺序搜索，因此将忽略“ h”，直到找到“ c”，然后再搜索“ h”，然后是“ r”，等等
— 。– redstarcoder

Answers:

9

05AB1E，16个字节

感谢Emigna节省了一个字节并修复了一个错误！

vyÐl'ŒÎ¾èQi¼ëš}?

说明：

vy                # For each character in the string...
  Ð               #   Triplicate that character
   l              #   Convert to lowercase
    'ŒÎ           #   Compressed version of "christmas"
       ¾          #   Push the counting variable (let's call this N)
        è         #   Get the nth character of "christmas", with modular indexing
         Qi   }   #   If equal...
           ¼      #      N += 1
            ë     #   Else...
             š    #      Swapcase
               ?  #   Print that character

使用CP-1252编码。在线尝试！

— 阿德南
source
1
这可以和换行符一起使用吗？
— redstarcoder
@redstarcoder糟糕，没有。现在已修复。
— 阿德南
2
这看起来就像金属丝。：D
— 泰特斯
1
输出不正确（例如，尝试以圣诞节作为输入），但是如果删除，u它应该可以工作。
— Emigna '16
1
@Izzy 05ab1e已经存在了很长时间。
— 帕维尔
5

V，38，36字节

ÄVumaOchristmasòÉf2x`a@"maj~HòHdjV~

在线尝试！（包含输入和预期输出以进行比较）

当我第一次看到这个时，我认为这将非常容易。实际上，如果不是因为“ christmas”错误，则仅为2个字节：V~。圣诞节漏洞使答案变得非常棘手，因此变得更加困难。

像往常一样，这是一个十六进制转储：

00000000: c456 756d 614f 6368 7269 7374 6d61 731b  .VumaOchristmas.
00000010: f2c9 6632 7860 6140 226d 616a 7e48 f248  ..f2x`a@"maj~H.H
00000020: 646a 567e                                djV~
— DJMcMayhem
source
我想知道更多有关V的信息
— 。– ckjbgames
@ckjbgames很酷，我很乐意回答您的任何问题！您可以随时在vim-golf室中对我进行ping操作。现在，我正在努力使V的学习/创建教程更容易一些。
— DJMcMayhem
4

PHP，113个 110 102字节

while($o=ord($c=$argv[1][$i++]))echo chr(32|$o==ord(christmas[$k%9])?$o|0&$k++:ctype_alpha($c)*32^$o);

从第一个命令行参数获取输入。用运行-r。

分解 

while($o=ord($c=$argv[1][$i++]))// loop through string characters
    echo chr(
        32|$o==ord(christmas[$k%9]) // if $c equals next character in "christmas"
            ?$o|0&$k++              // no change, increase "christmas" index
            :ctype_alpha($c)        // else if $c is a letter
                    *32^$o          // toggle bit 5 of the ascii code
        );
— 泰特斯
source
2

MATL，36 30字节

"@tk'schristma'H)=?HQXHx}Yo]&h

带换行符的字符串需要通过与ASCII代码串联来定义10（请参见测试用例链接中的示例）。

在线尝试！或验证所有测试用例。

说明

"              % Implicit input of a string. For each character in that string
  @            %   Push current character
  tk           %   Duplicate and convert to lowercase
  'schristma'  %   Push string. This is 'Christmas' in lowercase and circularly
               %   shifted such that the 'c' is in the second position
  H            %   Push contents of clipboard H, which is initiallized to 2.
               %   This value will be gradually increased when a new character
               %   from the the sequence is found
  )            %   Get character from 'schristma' at that (modular) position
  =            %   Are they equal?
  ?            %   If so
    HQ         %     Push contents of clipboard H and add 1
    XHx        %     Copy into clipboard K and delete
  }            %   Else
    Yo         %     Change case
  ]            %   End
  &h           %   Concatenate stack contents horizontally. This gives a string 
               %   with all characters processed up to now
               % Implicit end. Implicit display
— 路易斯·门多
source
2

Perl 6，84个字节

{my $i=0;[~] (.lc~~"christmas".comb[$i%9]??(++$i&&$_)!!.ord>90??.uc!!.lc for .comb)}
— 短信
source
2

C＃197字节

不会因此而取胜，但希望可以使用最小的C＃实现...

string C(string s){int i=0,j=0;var r="";for(;i<s.Length;){char c=s[i++],o=(char)32;if(c=="christmas"[j]|c=="CHRISTMAS"[j])j=j>7?0:j+1;else if(c>64&c<91)c+=o;else if(c>96&c<123)c-=o;r+=c;}return r;}

说明：

string C(string s)
{
    // define our two index ints
    // i for indexing across the input string
    // j for indexing across christmas
    int i = 0, j = 0;

    // r is our return string
    var r = "";

    // declare our loop
    // skip the initialisation and afterthought
    for (; i < s.Length;)
    {
        // get our current character c, and increment index i
        // initial our offset char o (difference between upper and lower case)
        char c = s[i++], o = (char)32;

        // check if c is the current character in our christmas bug
        if (c == "christmas"[j] | c == "CHRISTMAS"[j])
            // increment j (or reset to 0)
            j = j > 7 ? 0 : j + 1;

        // else if c is an upper case char
        else if (c > 64 & c < 91)
            // add our offset to make it lower case
            c += o;

        // else if c is lower case
        else if (c > 96 & c < 123)
            // subtract our offset to make it upper case
            c -= o;

        // append c to our return string r
        r += c;
    }

    return r;
}
— 埃雷森
source
2

JavaScript，122 118 114 107 104 93字节

f=
s=>s.replace(/./g,c=>(k=c.toLowerCase())=='christmas'[i%9]?++i&&c:k!=c?k:c.toUpperCase(),i=0)


F=s=>console.log(f(s))
F(`Hello World!`)
F(`I like pie :)`)
F(`hELP my KeYboarD
       iS BROKEN`)
F(`cHRISTMAS IS COMING REALLY SOON!`)
F(`C is the first letter in cHRISTMAS`)
展开摘要

  • 感谢@Neil 11个字节。
— 华盛顿瓜迪斯
source
您不能k!=c?k:c.toUpperCase()用来节省一些字节吗？
— 尼尔
1

Perl 6字节

{my$i=0;S:g{.?<!{'christmas'.comb[$i%9]eq$/.lc&&++$i}>}=$/eq$/.lc??$/.uc!!$/.lc}

试试吧

{   # bare block lambda with implicit parameter ｢$_｣

  my $i = 0;             # counter

  S                      # substitute and return ( implicitly against ｢$_｣ )
  :global
  {
    .                    # any char
    ?                    # work around a bug where ｢$/｣ doesn't get set

    <!{                  # fail this match if this block returns True
      'christmas'.comb\  # a list of the characters of ｢christmas｣
      [ $i % 9 ]         # grab a char from the list
      eq                 # is it equal to
      $/.lc              # the lowercase version of the char
      &&                 # if so
      ++$i               # increment ｢$i｣ ( result is True )
    }>

  }

  =                      # for each matched char

  $/ eq $/.lc            # is it lowercase?
  ?? $/.uc               # the uppercase it
  !! $/.lc               # otherwise lowercase it
}
— 布拉德·吉尔伯特b2gills
source
我不认为省略空格my $i=0;是合法的。如果出现更多与空白相关的语法错误，我也不会感到惊讶。
— bb94
1
@ bb94我从字面上包括指向将运行代码的站点的链接。如果您不相信这种做法会成功，那么为什么不尝试一下呢。我的意思是我写$/ eq $/.lc而不是$/.lc eq $/为了可以删除之前的空间eq。
— 布拉德·吉尔伯特b2gills '16
@ bb94我可以确认它是否在链接编译器上正常工作。
— redstarcoder
1

Java 7，200字节

String c(char[]a){String r="";int i=0,s;Character l='a';for(char c:a)if((s="christma".indexOf(l=l.toLowerCase(c)))==i|i>7&s==4){r+=c;i=i>7?0:i+1;}else r+=l.isUpperCase(c)?l:l.toUpperCase(c);return r;}

丑陋，但确实有效。.毫无疑问，可以再打更多的高尔夫球..我生锈了..

取消高尔夫：

String c(char[] a){
  String r = "";
  int i = 0,
      s;
  Character l = 'a';
  for(char c : a){
    if((s = "christma".indexOf(l = l.toLowerCase(c))) == i) | i > 7 & s == 4){
      r += c;
      i = i > 7
           ? 0
           : i+1;
    } else{
      r += l.isUpperCase(c)
       ? l
       : l.toUpperCase(c);
    }
  }
  return r;
}

测试代码：

在这里尝试。

class M{
  static String c(char[]a){String r="";int i=0,s;Character l='a';for(char c:a)if((s="christma".indexOf(l=l.toLowerCase(c)))==i|i>7&s==4){r+=c;i=i>7?0:i+1;}else r+=l.isUpperCase(c)?l:l.toUpperCase(c);return r;}

  public static void main(String[] a){
    System.out.println(c("i CAN HARDLY WORK LIKE THIS please GET ME A NEW KEYBOARD FOR cHRISTMAS".toCharArray()));
    System.out.println(c("Hello World!".toCharArray()));
    System.out.println(c("I like pie :)".toCharArray()));
    System.out.println(c("hELP my KeYboarD\niS BROKEN".toCharArray()));
    System.out.println(c("cHRISTMAS IS COMING REALLY SOON!".toCharArray()));
    System.out.println(c("C is the first letter in cHRISTMAS".toCharArray()));
  }
}

输出：

I Can HaRdly work lIke thiS PLEASE geT Me A new keyboard for ChriStmas
hELLO wORLD!
i LIKE PIE :)
Help MY kEyBOARd
Is broken
cHRISTMAS is Coming really soon!
C IS ThE FIrST LETTER iN ChriSTMAS
— 凯文·克鲁伊森
source
2
Java击败了Haskell和C＃！
— 帕维尔
1

Python 100字节

def a(s,i=0,g=''):
 for c in s:a=c.lower()=='christmas'[i%9];i+=a;g+=[c.swapcase(),c][a]
 return g
— 科马克
source
1

Ruby，63 + 1 = 64字节

使用-p标志。

i=0;gsub(/./){|c|c=~/#{"christmas"[i%9]}/i?(i+=1;c):c.swapcase}
— 价值墨水
source
0

C＃239个字符

var s=Console.ReadLine().ToCharArray();int j=0,i=0;var c="christmas";for(;j<s.Length;j++)if(s[j]==c[i%9]|s[j]==(c[i%9]-32))i++;else if(s[j]>64&s[j]<91)s[j]=(char)(s[j]+32);else if(s[j]>96&s[j]<123)s[j]=(char)(s[j]-32);Console.WriteLine(s);

更明确的版本：

var s = Console.ReadLine().ToCharArray();
int j = 0,i = 0;
var c = "christmas";
for (var j = 0; j < s.Length; j++)
   if (s[j] == c[i%9]|s[j] == (c[i%9] - 32))// non case sensitive compare with c 
      i++;//next char in christmas
   else
      if (s[j] > 64 & s[j] < 91)//if between A and Z
         s[j] = (char)(s[j] + 32);//convert to a-z
      else
         if (s[j] > 96 & s[j] < 123)//if between a and z
            s[j] = (char)(s[j] - 32);//convert to A-Z
Console.WriteLine(s);

这是一个非常幼稚的解决方案，并且可能会得到改进（也许我们可以允许隐式转换为char？）。

它假定位于函数内部，从控制台读取（stdin），然后写入控制台（stdout）。

编辑：Char.IsUpper（s [j]）比s [j]> 64 && s [j] <91长2个字节，Char.ToUpper也比我的版本长。

— 讽刺
source
0

哈斯克尔，222个 207字节

import Data.Char
s=(+(-65)).ord
f=(`divMod`32).s
l=[['a'..'z'],['A'..'Z']]
c=cycle$map s"CHRISTMAS"
k _[]=[]
k(a:b)(x:y)|isAlpha x=let(d,m)=f x in if(m==a)then(x:k b y)else(l!!d!!m:k(a:b)y)|1>0=x:k(a:b)y
main=interact$k c

更新：

import Data.Char
s=(+(-65)).ord
k _[]=[]
k(a:b)(x:y)|isAlpha x=let(d,m)=s x`divMod`32 in if(m==a)then(x:k b y)else([['a'..'z'],['A'..'Z']]!!d!!m:k(a:b)y)|1>0=x:k(a:b)y
main=interact$k$cycle$map s"CHRISTMAS"

怎么运行的：

s=(+(-65)).ord

sx = x的ASCII值-'A'的ASCII值

f=(`divMod`32).s

f（sx）=（0，sx）大写，（1，（s x-32））小写

l=[['a'..'z'],['A'..'Z']]

并行字母列表，可通过f索引（小写-> 1->大写，大写-> 0->小写）

c = cycle $ map s "CHRISTMAS"

重复大写圣诞节的ascii值的无限列表

k _ []=[]

基本情况

k (a:b) (x:y) | isAlpha x = let (d,m) =f x
                             in if m == a
                                then x : k b y
                                else (l!!d)!!m : k (a:b) y
              | 1 > 0 = x : k (a:b) y

返回非字母数字字符，并且如果字母的s值与圣诞节的当前字母相同（转至下一个字母），则保留该字母，否则将其转换为另一种情况并继续

main=interact$k c

IO

— 始祖鸟
source
By using our site, you acknowledge that you have read and understand our Cookie Policy and Privacy Policy.
Licensed under cc by-sa 3.0 with attribution required.