我注意到某个游戏有一个奇特的寿命计数器，而不是停在这999，获得了新的数字-在未来数冠百元👑00。之后👑99来到冠百个crownty（👑👑0）和最后一个号码，之后👑👑9，被冠百crownty冠或👑👑👑，这将是1110十进制。

你的任务是写一个程序或功能是输出这个计数器。

给定范围内的整数[0,1110]（包括两端），输出三个字符串，其中

• 每个字符都来自列表 0123456789👑
• 冠（👑）只能显示为最左侧的字符，也可以显示为左侧的冠
• 当此数字读取为十进制数字，但冠冕计数为时10，您将获得原始数字

测试用例

   0 → "000"
  15 → "015"
 179 → "179"
 999 → "999"
1000 → "👑00"
1097 → "👑97"
1100 → "👑👑0"
1108 → "👑👑8"
1110 → "👑👑👑"

您可以使用任何非十进制字符代替冠。为了鼓励漂亮地打印，冠字符（UTF8字节序列“ \ 240 \ 159 \ 145 \ 145”）算作一个字节而不是四个字节。您的程序不必处理超出有效范围的数字。

这是代码高尔夫球，因此最短的答案（以字节为单位）会胜出！

05AB1E，20 18 字节

₄‹i₄+¦ëTð.;„1 „  :

为冠使用空格。

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

说明：

₄‹i               # If the (implicit) input is smaller than 1000:
   ₄+             #  Add 1000 to the (implicit) input
     ¦            #  And remove the leading 1 (so the leading zeros are added)
                  #   i.e. 17 → 1017 → "017"
  ë               # Else:
   Tð.;           #  Replace the first "10" with a space " "
                  #   i.e. 1010 → " 10"
                  #   i.e. 1101 → "1 1"
                  #   i.e. 1110 → "11 "
       „1 „  :    #  Replace every "1 " with "  " (until it no longer changes)
                  #   i.e. " 10" → " 10"
                  #   i.e. "1 1" → "  1"
                  #   i.e. "11 " → "   "

JavaScript（Node.js），50字节

f=(n,p=1e3)=>n<p?(n+p+'').slice(1):'#'+f(n-p,p/10)

在线尝试！

TIO基于Arnauld的回答。将👑显示为#。

JavaScript（ES6）， 62 46  44字节

@nwellnhof节省了2个字节

将冠冕输出为x字符。

n=>(n+1e4+'').replace(/1+0/,'xxx').slice(-3)

在线尝试！

怎么样？

我们将$10000$添加到输入中，将其强制为字符串，查找/1+0/模式并将其替换为xxx。最后，我们返回3个尾随字符。

例子：

$$\begin{align}&0 &\rightarrow &\text{ "}\color{red}{\text{10}}\text{000"} &\rightarrow &\text{ "xxx000"} &\rightarrow &\text{ "000"}\\ &123 &\rightarrow &\text{ "}\color{red}{\text{10}}\text{123"} &\rightarrow &\text{ "xxx123"} &\rightarrow &\text{ "123"}\\ &1023 &\rightarrow &\text{ "}\color{red}{\text{110}}\text{23"} &\rightarrow &\text{ "xxx23"} &\rightarrow &\text{ "x23"}\\ &1103 &\rightarrow &\text{ "}\color{red}{\text{1110}}\text{3"} &\rightarrow &\text{ "xxx3"} &\rightarrow &\text{ "xx3"}\\ &1110 &\rightarrow &\text{ "}\color{red}{\text{11110}}\text{"} &\rightarrow &\text{ "xxx"} &\rightarrow &\text{ "xxx"} \end{align}$$

莎士比亚程序设计语言，763个 692 690 689 683字节

,.Ajax,.Ford,.Page,.Act I:.Scene I:.[Enter Ajax and Ford]Ford:Listen tothy!Ajax:You big big cat.Scene V:.Ajax:Remember the remainder of the quotient betweenI twice the sum ofa cat a big big cat.Ford:You be the quotient betweenyou twice the sum ofa cat a big big cat.Ajax:You be the sum ofyou a pig.Be you nicer zero?If solet usScene V.Ford:You big big cat.[Exit Ajax][Enter Page]Page:Recall.Ford:You be I.Scene X:.Page:Recall.Am I nicer zero?If notopen heart.If notlet usScene L.Ford:You big big big big big cat.Speak thy.Am I worse a cat?If soyou zero.Scene L:.[Exit Page][Enter Ajax]Ford:You be the sum ofyou a pig.Is you nicer a cat?[Exit Ajax][Enter Page]Ford:If solet usScene X.

在线尝试！

用" "代替冠。以另外4个字节为代价，可以将其修改为显示“可见”字符。

说明：

,.Ajax,.Ford,.Page,.Act I:.Scene I:.[Enter Ajax and Ford]

    Boilerplate, introducing the characters.

Ford:Listen tothy!

    Input a value to Ajax.

Ajax:You big big cat.

    Set Ford's value to 4 (we will be pushing 4 digits from Ajax onto Ford's personal stack).

Scene V:.Ajax:Remember the remainder of the quotient betweenI twice the sum ofa cat a big big cat.Ford:You be the quotient betweenyou twice the sum ofa cat a big big cat.

    DIGIT-PUSHING LOOP: Push Ajax's last digit onto Ford's stack; divide Ajax by 10.

Ajax:You be the sum ofyou a pig.Be you nicer zero?If solet usScene V.

    Decrement Ford; loop until Ford is 0.

Ford:You big big cat.

    Set Ajax's value to 4 (we will pop 3 digits from Ford's stack in the next loop).

[Exit Ajax][Enter Page]Page:Recall.Ford:You be I.

    Pop the top value off Ford's stack, and store that into Page.
    Here, Page will contain 0 if there are no crowns to be drawn,
    and 1 if there are crowns to be drawn.

Scene X:.Page:Recall.Am I nicer zero?If notopen heart.If notlet usScene L.

    DIGIT-DRAWING LOOP: Pop the top value off of Ford's stack and set Ford equal to that value.
    If there are no crowns to be drawn, output Ford's literal value here, and skip the crown-drawing section.

Ford:You big big big big big cat.Speak thy.Am I worse a cat?If soyou zero.

    Draw crown.
    If we are drawing crowns, and Ford contains 0 here, then we are now done drawing crowns, and thus we store 0 into Page.
    (Put in one more "big" for the crown to look like an @ symbol.)

Scene L:.[Exit Page][Enter Ajax]Ford:You be the sum ofyou a pig.Is you nicer a cat?[Exit Ajax][Enter Page]Ford:If solet usScene X.

    Decrement Ajax; loop until Ajax is 1 (i.e. 3 times).

Python 2，53字节

脱帽向阿尔诺为-22个字节。递归仍然是成功的。

lambda k:re.sub("1+0","CCC",`k+10000`)[-3:]
import re

在线尝试！

Python 2，51个字节

相反，它实现了tsh的递归方法。由于ovs，节省了2个字节。

f=lambda n,p=1000:n/p and'C'+f(n-p,p/10)or`n+p`[1:]

在线尝试！

Python 2，52字节

lambda n:['%03d'%n,'%3s'%`n`.lstrip('1')[1:]][n>999]

在线尝试！

视网膜0.8.2，41字节

\b((.)|..)\b
$#2$*00$&
T`d`_#`(?=....)1+0

在线尝试！使用#s代替👑s。链接包括测试用例。说明：

\b((.)|..)\b
$#2$*00$&

将1位和2位数字填充到三位数字。

T`d`_#`(?=....)1+0

1将4位数的前导s 更改为#s并删除下一个0。

果冻，19 个字节 -0 = 19

<ȷ¬ȧDi0ɓ⁶ẋ⁹Ḋ;+ȷDḊṫʋ

完整的程序使用空格字符作为表冠打印结果。
（作为单子链接，将生成整数和空格字符的混合列表）

在线尝试！或查看测试套件。

...也许递归实现会更短。

怎么样？

<ȷ¬ȧDi0ɓ⁶ẋ⁹Ḋ;+ȷDḊṫʋ - Main Link: integer, N    e.g. 1010       or   10
 ȷ                  - literal 1000                  1000            1000
<                   - less than?                    0               1
  ¬                 - logical not                   1               0
    D               - to decimal list               [1,0,1,0]       [1,0]
   ȧ                - logical and                   [1,0,1,0]       0
      0             - literal zero                  0               0
     i              - first index - call this I     2               1  (0 treated as [0] by i)
       ɓ            - new dyadic chain with swapped arguments - i.e. f(N, I)
        ⁶           - literal space character       ' '             ' '
          ⁹         - chain's right argument        2               1
         ẋ          - repeat                        [' ',' ']       [' ']
           Ḋ        - dequeue                       [' ']           []
                  ʋ - last four links as a dyad - i.e. f(N, I)
             +ȷ     -   add 1000                    2010            1010
               D    -   to decimal list             [2,0,1,0]       [1,0,1,0]
                Ḋ   -   dequeue                     [0,1,0]         [0,1,0]
                 ṫ  -   tail from index (I)         [1,0]           [0,1,0]
            ;       - concatenate                   [' ',1,0]       [0,1,0]
                    - implicit print                " 10"           "010"

Python 2，40个字节

lambda n:'%3s'%`10000+n`.lstrip('1')[1:]

在线尝试！

实现类似于Xcoder先生基于正则表达式的答案的想法，但没有正则表达式。我们删除前导10000+n字符1 和下一个字符，然后使用空格填充到长度3。结果类似于ovs的解决方案，lstrip但不需要两种情况。

干净，87字节

不输出冠（使用c）。

import StdEnv,Text
$n#i=3-n/1000-n/1100-n/1110
=("ccc"+lpad(""<+n rem(10^i))i'0')%(i,9)

在线尝试！

$ n                   // function $ of `n`
 # i =                // define `i` as (the number of digits that aren't crowns)
  3 -                 // three minus
  n / 1000 -          // 1 if first digit is crown
  n / 1100 -          // 1 if second digit is crown
  n / 1110            // 1 if third digit is crown
 = (                  // the string formed by
  "ccc" +             // prefixing three crowns to
  lpad (              // the padding of
   "" <+ n rem (10^i) // non-crown digits of `n`
  ) i '0'             // with zeroes
 ) % (i, 9)           // and removing the extra crowns

干净的 99-3 = 96字节

这个有冠冕。

import StdEnv,Text
$n#i=3-n/1000-n/1100-n/1110
=("👑👑👑"+lpad(""<+n rem(10^i))i'0')%(i*4,99)

在线尝试！

Japt，20个字节

天真的（而且有点醉！）Arnauld的解决方案。用途"为冠。

U+A³ s r"^21*0"_çQÃÅ

试试吧

Java 10，84 83字节

n->{for(int p=100,t;p>0;n-=t%12*p,p/=10)System.out.printf("%c",t=n/p>9?46:48+n/p);}

@tsh的C注释端口。
用.代替冠。

在线尝试。

替代方法（84（87-3）个字节）：

n->f(n,1000)String f(int n,int p){return n<p?(n+p+"").substring(1):"👑"+f(n-p,p/10);}

@tsh的JavaScript的答案端口。

在线尝试。

APL（Dyalog Unicode），32字节

1e3∘{⍵<⍺:1↓⍕⍵+⍺⋄'C',(⍵-⍺)∇⍨⍺÷10}

在线尝试！

前缀直接功能。

@tsh的JS Answer的端口。

怎么样：

1e3∘{⍵<⍺:1↓⍕⍵+⍺⋄'C',(⍵-⍺)∇⍨⍺÷10} ⍝ Main function, arguments ⍵ and ⍺ (⍵ → input, ⍺ → 1000).
     ⍵<⍺:                          ⍝ If ⍵<⍺
         1↓                        ⍝ Drop (↓) the first element (1) of
           ⍕                       ⍝ Format (⍕); 'stringify'
            ⍵+⍺                    ⍝ ⍵+⍺
               ⋄                   ⍝ else
                'C',               ⍝ Concatenate (,) the literal 'C' with
                         ∇⍨        ⍝ Recursive call (∇) with swapped arguments (⍨)
                    (⍵-⍺)  ⍺÷10    ⍝ New arguments; ⍵ → ⍵-⍺; ⍺ → ⍺÷10

PHP，71字节

for($n=$argn,$x=1e4;1<$x/=10;$n%=$n<$x?$x/10:$x)echo$n<$x?$n/$x*10|0:C;

打印C冠冕。与管道一起运行-nR或在线尝试。

Haskell，48个字节

('2'#).show.(+1000)
n#(a:x)|n==a='c':'1'#x|1>0=x

在线尝试！

C， 84  58字节

感谢@tsh保存25个字节，感谢@ceilingcat保存一个字节！

f(n,p){for(p=1e3;p/=10;)n-=putchar(n/p>9?46:48+n/p)%12*p;}

在线尝试！

sed，39岁

48个字节，但分数为39，因为每个s都计为1。

/..../s/^1+0/👑👑👑/
s/^/00/
s/.*(...)/\1/

在线尝试！

Perl 6、38-9 = 29个字节

-2个字节，感谢Jo King

{~m/...$/}o{S/1+0/👑👑👑/}o*+1e4

在线尝试！

受Arnauld JavaScript解决方案的启发。

干净，96个字节

我认为Super Mario 3D Land，New Super Mao Bros.2和Super Mario 3D World对此都有反作用。

import StdEnv,Text
$n#i=3-n/1000-n/1100-n/1110
=("👑👑👑"+lpad(""<+n rem(10^i))i'0')%(i*4,99

我同意Clean。

确认我没有作弊。