Câu chuyện

Tôi cần nhớ rất nhiều mật khẩu và không muốn sử dụng cùng một mật khẩu cho nhiều trang web vì vậy tôi đã đưa ra một quy tắc, nhưng quy tắc không nên minh bạch nên điều tôi làm là:

• Hãy nghĩ về một từ dài hoặc khái niệm như breadpudding.
• Thay thế chữ cái đầu tiên bằng trang web chúng tôi đang đăng nhập. Nếu chúng ta đang đăng nhập google, từ của chúng ta trở thành greadpudding.
• Làm chữ hoa đầu tiên.
• Thay đổi chữ cái thứ hai thành một @dấu hiệu.
• Nếu mật khẩu bắt đầu bằng một phụ âm, hãy thêm một số nhất định (chẳng hạn như 1234); mặt khác, thêm một số khác (chẳng hạn như 4321).

Ta da, bây giờ bạn có một mật khẩu đầy đủ.

Tuy nhiên, quá trình này rất khó khăn vì vậy tôi cần một chương trình để tạo nó cho tôi dựa trên những điều sau đây:

Vấn đề

Đưa ra đầu vào:

• a : từ ban đầu, là một chuỗi và luôn luôn là chữ thường và được đảm bảo dài hơn 3 ký tự.
• b : trang web chúng tôi đang đăng nhập, là một chuỗi và luôn là chữ thường và được đảm bảo không trống.
• c : số cho các phụ âm không phụ âm, là số nguyên dương có thể có các số 0 đứng đầu.
• d : số cho phụ âm, là số nguyên dương có thể có các số 0 đứng đầu.

Xuất ra một chuỗi dựa trên các tiêu chí trên.

Các trường hợp thử nghiệm

Đầu vào a="volvo", b="gmail", c=5555, d="0001"

G@lvo0001

Đầu vào a="sherlock", b="9gag", c=31415926535, d=3

9@erlock31415926535

Đầu vào a="flourishing", b="+google", c=11111, d=2222

+@ourishing11111

Quy tắc

• y là một phụ âm.
• Nếu bạn quyết định choặc dlà một số nguyên, bạn có thể phân tích cú pháp như vậy và các số 0 đứng đầu có thể bị bỏ qua ( 0091được coi là 91).
• Trailing khoảng trắng và dòng mới được cho phép.
• Bạn có thể xuất kết quả thành STDOUT hoặc trả về kết quả trong hàm.
• Nhân vật được phép trong avà blà [a-z0-9!@#$%^&*()_+=-].
• Bạn có thể chấp nhận 4 đầu vào theo thứ tự nhất quán.

Đây là môn đánh gôn . Mã ngắn nhất trong byte thắng.

Thạch , 17 byte

Ḣ©Œu;”@o;⁶⁵®eØC¤?

Một chương trình đầy đủ, lấy các đối số theo thứ tự b, a, c, d.

Hãy thử trực tuyến!

Làm sao?

Các liên kết chính là cặp đôi, lấy bvà a, đầu vào chương trình này sau đó được b, a, c, và d(thứ 3 thông qua đối số dòng lệnh thứ sáu), do đó cvà dđược truy cập như vậy.

Ḣ©Œu;”@o;⁶⁵®eØC¤?  Main link: b, a           e.g. "gmail", "volvo" (c="5555" and d="0001")
Ḣ                  head b                         'g'
 ©                 copy to register and yield     'g'
  Œu               convert to uppercase           "G"
     ”@            literal '@' character          '@'
    ;              concatenate                    "G@"
       o           logical or with a (vectorises) "G@lvo"
                ?  if:
               ¤     nilad followed by link(s) as a nilad:
           ®           recall value from register  'g'
             ØC        yield consonants            "BCDFGHJKLMNPQRSTVWXYZbcdfghjklmnpqrstvwxyz"
            e          exists in?                  1
         ⁶         ...then: 6th arg = 4th in = d   "0001" 
          ⁵        ...else: 5th arg = 3rd in = c   "5555"
        ;          concatenate                     "G@lvo0001"
                   implicit print

Python 3 , 69 byte

lambda a,b,*c:b[0].upper()+"@"+a[2:]+c[b[0]in"bcdfghjklmnpqrstvwxyz"]

Hãy thử trực tuyến!

05AB1E , 22 20 18 byte

н©u'@I¦¦žN®åiI\}IJ

Đầu vào được lấy là b,a,c,d

Hãy thử trực tuyến!

Giải thích (lỗi thời)

¦                     # remove the first char of a
 s                    # swap b to the top of the stack
  н©                  # push the head of b and store a copy in register
    uì                # convert the head to upper case and prepend to a
      U               # store in variable X
       žN®åi          # if the head of b is a consonant
            \}        # discard c
              X«      # concatenate X with c or d
                '@1ǝ  # insert an "@" at character position 1

0èđược sử dụng trong liên kết khi нchưa được kéo đến TIO.

Javascript ES6, 87 byte

(a,b,c,d)=>b[0].toUpperCase()+'@'+a.slice(2)+(/[bcdfghjklmnpqrstvwxyz]/.test(b[0])?d:c)

Bản giới thiệu

f=
(a,b,c,d)=>b[0].toUpperCase()+'@'+a.slice(2)+(/[bcdfghjklmnpqrstvwxyz]/.test(b[0])?d:c)

console.log(f("volvo","gmail", 5555, "0001")); //G@lvo0001
console.log(f("sherlock","9gag", 31415926535, 3)); //9@erlock31415926535
console.log(f("flourishing","+google", 11111, "2222")); //+@ourishing11111

C, 441 286 139 byte

#define o(c)*a[1]==0xc
int main(int b,char** a){printf("%c@%s%s",*a[1],a[2]+2,(*a[1]>97&*a[1]<128)
&!(o(65)|o(69)|o(6F)|o(75))?a[4]:a[3]);}

R , 105 103 byte

pryr::f({m=substr(b,0,1);paste0(toupper(m),'@',substring(a,3),'if'(grepl("[b-df-hj-np-tv-z]",m),d,c))})

Chức năng ẩn danh. Đánh giá

function (a, b, c, d) 
{
    m = substr(b, 0, 1)                      #first letter of website
    paste0(toupper(m),                       #concatenate that letter, capitalized,
           "@",                              #an '@',     
           substring(a, 3),                  #the rest of the long string,
           if(                               #and
           grepl("[b-df-hj-np-tv-z]", m)),   #if the first letter is a consonant,
           d                                 #the consonant string/num,
           else c)                           #else the other one
}

đó là những gì trên TIO. Xin hãy giúp tôi chơi golf đó vì tôi rất tệ với họ.

Đã lưu 2 byte từ Giuseppe.

Hãy thử trực tuyến!

Võng mạc , 80 75 byte

^..(.*)¶(.).*
$2@$1
^([ -_aeiou].*)¶(.*)¶.*
$1$2
(.*)¶.*¶(.*)
$1$2
T`l`L`^.

Hãy thử trực tuyến!

Thử một ngôn ngữ mới ở đây, nhận các đầu vào theo thứ tự được đưa ra trong câu hỏi

Giải trình:

^..(.*)¶(.).*
$2@$1

Tạo một từ đó là từ thứ hai chữ cái đầu tiên, ký hiệu @, từ đầu tiên từ ký tự thứ 3 trở đi.

^([ -_aeiou].*)¶(.*)¶.*
$1$2

Nếu từ bắt đầu bằng một phụ âm không, hãy thêm số đầu tiên

(.*)¶.*¶(.*)
$1$2

Nếu vẫn còn 3 dòng (không có sự thay thế trong bước cuối cùng, vì vậy nó bắt đầu bằng một phụ âm), nối thêm số thứ hai

T`l`L`^.

Chữ cái đầu tiên

QBIC , 81 byte

G=ucase$(_s;,1|)+@@`+_s;,3,_lC||~instr(@bcdfghjklmnpqrstvwxyz`,_sC,1|)|?G+;\?G+;

Giải trình

Parameters are Website(A$), base word(C$), consonant-number(E$), and nonsonant-number(F$)
G=                           SET G$ to
 ucase$(      )              the upper-case version of (also works for '9gag', '+google')
        _s;,1|                  the first char of the website A$ read from cmd line
 +@@`                        plus a literal @ (B$)
 +_s;,3,_lC||                plus all characters from base word C$ from 3rd char onwards
~instr(                      IF the second arg to INSTR is in the first
 @bcdfghjklmnpqrstvwxyz`,      with all consonants in the first arg
 _sC,1|                        and the first char of the base word C$ in the second
 )
|?G+;                        THEN print G$ plus the consonant addition
\?G+;                        ELSE print G$ plus the other addition

Lưu ý rằng hai dòng cuối cùng xuất hiện giống nhau, nhưng trình thông dịch thay đổi hành vi một chút trên mỗi dòng ;: Bất cứ khi nào nhìn thấy ;hướng dẫn, nó sẽ tạo một biến mới (trong trường hợp này, các vars $ andF $ `là đầu tiên có sẵn sau khi đọc tất cả các đối số dòng chữ và cmd khác) và gán paraeter dòng cmd chưa được gán đầu tiên cho biến đó.

JavaScript (ES6), 76 byte

(a,b,c,d)=>b[0].toUpperCase()+'@'+a.slice(2)+(/[aeiou\d_\W]/.test(b[0])?c:d)

Tôi đã thêm điều này như một gợi ý như là một cải tiến cho giải pháp của Weedoze , nhưng có vẻ như tôi không thể nhận xét về nó vì tôi chủ yếu ẩn giấu

C # , 111 byte

(a,b,c,d)=>Char.ToUpper(b[0])+"@"+a.Substring(2)+(b.IndexOfAny("bcdfghjklmnpqrstvwxyz".ToCharArray()==0)?d:c);

Kiểm tra phụ âm là đặc biệt đắt tiền không có khả năng regex trực tiếp trên stringloại.

F # , 157 byte

let f(a:string)(b:string)c d=System.Char.ToUpper(b.[0]).ToString()+"@"+a.[2..]+(if((Seq.except['e';'i';'o';'u']['b'..'z'])|>Seq.contains b.[0])then d else c)

F # vẫn còn rất mới đối với tôi vì vậy có lẽ có những cách tiếp cận tốt hơn cho việc này.

Java 8, 112 99 92 87 byte

(a,b,c,d)->b.toUpperCase().charAt(0)+"@"+a.substring(2)+(b.matches("[a-z&&[^aeiou]].*")?d:c)

-13 byte bằng cách lấy tham số bcuối cùng thay vì thứ hai.
-1 byte bằng cách loại bỏ y
-7 byte nhờ @ OlivierGrégoire (và các tham số lại theo thứ tự)
-5 byte nhờ @ PunPun1000

Giải trình:

Hãy thử nó ở đây.

(a,b,c,d)->                     // Method with 4 String parameters and String return-type
  b.toUpperCase().charAt(0)     //  First character of B capitalized
  +"@"                          //  + literal "@"
  +a.substring(2)               //  + A excluding first two characters
  +(b.matches("[ -_aeiou].*")?  //  If B starts with a consonant:
    d                           //   + D
   :                            //  Else:
    c)                          //   + C
                                // End of method (implicit / lambda with single return)

V , 25 byte

ldvjr@Ç^[aeiou]ü^Á/j

DÍî

Hãy thử trực tuyến!

Đưa các đối số trong bộ đệm theo thứ tự:

website
word/phrase
consonant number
non-consonant number

Bash 4 , 76 byte

g(){
a=${2:0:1}
c=$4
[[ "aeiou[0-9]" =~ .*$a.* ]]&&c=$3
p="${a^}@${1:2}$c"
}

Hoạt động trong Bash 4:

g volvo gmail 5555 0001; echo $p
g sherlock 9gag 31415926535 3; echo $p
g flourishing +google 11111 2222; echo $p

Ruby , 73 byte

->a,b,c,d{a.sub(/..(.*)/){b[0].upcase+"@#$1#{b[0]=~/[aeiou_\d\W]/?c:d}"}}

Hãy thử trực tuyến!

JavaScript (ES6), 69 byte

(a,b,c,d)=>e=a[0].toUpperCase()+"@"+a.slice(2)+/[AEIOU]/.test(e)?c:d

Khá đơn giản, có thể chơi gôn