อ่านข้อความของฟอนต์ millitext

มีแบบอักษรที่นี่ที่เหมาะกับตัวละครแต่ละตัวในบล็อก 1x5 พิกเซลเดียว มันทำเช่นนี้ (สมมติว่าคุณกำลังใช้หน้าจอ LCD) โดยใช้ช่อง RGB ของแต่ละพิกเซลเพื่อขยายหนึ่งพิกเซลเป็นสามคอลัมน์ย่อยหนึ่งคอลัมน์สำหรับแต่ละช่อง งานของคุณคือใช้ข้อความที่เข้ารหัสในฟอนต์นี้และ 'ถอดรหัส' มัน

Millitext ตัวอักษร

CHARACTER: 0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ
ENCODING:  WYWBMRRMMMWYWYWWWMWBMRMYGYGYCWMMMMMW
           MGBWMRRMMMMMRMRRRMGBMRWMMMMMRGMMMMMB
           MGWWWWWBWWWYRMWWMWGBYRWMMYMYGGMMWGGG
           MGRBBBMBMBMMRMRRMMGBMRMMMRWMBGMCWMGR
           WWWWBWWBWWMYWYWRWMWWMWMMGRCMYGWBMMGW

ฉันได้ย่อแต่ละสีให้เป็นสัญลักษณ์หนึ่งตัว (R = แดง, G = เขียว, B = น้ำเงิน, C = ฟ้า, Y = เหลือง, M = ม่วงแดง, W = ขาว)

รูปแบบอินพุต

รูปแบบการป้อนข้อมูลสำหรับการเปิดค่อนข้างสวย คุณสามารถมีอินพุตเป็นอาร์เรย์ที่มีแต่ละคอลัมน์, อาร์เรย์ที่มีแต่ละแถวchar[][], หรืออะไรทำนองนั้น นอกจากนี้คุณยังสามารถเลือกใช้คำเต็ม "แดง", "เขียว", "สีน้ำเงิน" ด้วยตัวพิมพ์ใหญ่ / ตัวพิมพ์เล็กที่คุณเลือก (แต่จะต้องสอดคล้องกันสำหรับแต่ละคำ! คุณไม่สามารถใช้ "RED" และยังทำ "สีเขียว" หรือ "น้ำเงิน")

หากภาษาของคุณให้การสนับสนุนคุณสามารถป้อนเป็นสีได้ (อย่างไรก็ตามอาจใช้งานได้ฉันไม่รู้มือข้างนอก)

คุณสามารถสันนิษฐานได้ว่าข้อมูลที่ป้อนจะมีเฉพาะอักขระที่เข้ารหัสในตัวอักษรด้านบน (โดยเฉพาะจะไม่มีการเว้นวรรคหรือเครื่องหมายวรรคตอนในผลลัพธ์ของคุณ)

รูปแบบผลลัพธ์

คุณสามารถส่งออกสตริงหรือเรียงลำดับของตัวละครบางอย่าง คุณสามารถเลือกได้ว่าตัวอักษรจะเป็นตัวพิมพ์ใหญ่หรือตัวพิมพ์เล็ก แต่ตัวอักษรทั้งหมดต้องมีตัวพิมพ์เล็กเหมือนกัน

ตัวอย่าง

MWRRGMGYRY
MRRRMMMMRM
WWRRMWMYRM -> HELLOWORLD
MRRRMWMMRM
MWWWGMGMWY

กฎระเบียบ

นี่คือรหัสกอล์ฟคำตอบที่สั้นที่สุดชนะ!

ชุดทดสอบ

WMWGMWWMYYGMYWGMBMMYWYGMWYWMWRWWMYGW
GMRMMGRMMMMMMRMMBMWMRMMMRMGMRRMBMMMR
GWWMMGRYYYMWMWMGBMWYWMMMWYGWWRWGGMMM -> THEQUICKBROWNFOXJUMPEDOVERTHELAZYDOG
GMRWMGRMMMMWMRMMBMMRRMMCRMGMRRMRGMMM
GMWCWWWMYMGMMRGMWWMRWYGBWMGMWWMWGYGW

JavaScript (ES6),  103 100 93 92  90 ไบต์

บันทึกแล้ว 9 ไบต์ขอบคุณ @ShieruAsakoto

รับอินพุตเป็นอาร์เรย์ของคอลัมน์ ส่งคืนอาร์เรย์ของอักขระ

a=>a.map(s=>"H-L-D--VGQ87MR6TZ-KJ9WC05BUXF1YI2EON3S-A-P4"[parseInt(s,35)%1161%219%152%43])

ลองออนไลน์!

เยลลี่ , 50 ไบต์

Oḅ⁹%211“ẎP\7ßɱðvs*Ḋ⁹UfRMJiẒVƑ).Z½Ƈ"}~ḌyH⁵Ŀ⁶Ṿ‘iⱮịØB

ลองออนไลน์!

ลิงก์ monadic ยอมรับอินพุตเป็นรายการของคอลัมน์และส่งออกสตริงวุ้นของการแปล คำอธิบายที่สมบูรณ์ที่ต้องติดตาม แต่ขึ้นอยู่กับข้อเท็จจริงที่ว่าแต่ละชุดที่เป็นไปได้ของตัวอักษร 5 ตัวนั้นไม่เหมือนกันเมื่อแปลงเป็นรหัสจุดแปลงกลับจากฐาน 256 เป็นทศนิยมแล้วปรับเปลี่ยน 211

ทางเลือกโดยใช้ฟอนต์คงที่ของ Arnauld (49 ไบต์และใช้หลักการเดียวกัน)

คำอธิบาย

O                   | Convert to code points
 ḅ⁹                 | Convert from base 256 to decimal
   %211             | Mod 211
       “Ẏ...Ṿ‘iⱮ    | Find indices in [209,80,92,55,21,162,24,118,115,42,193,137,85,102,82,77,74,105,189,86,146,41,46,90,10,144,34,125,126,173,121,72,133,199,134,186]
                ịØB | Index into 01234567890ABCDEFGHIJKLMNOPQRSTUVWXYZ

dzaima / APL, 80 79 73 72 71 ไบต์

' P  FL6BDEZQA SY574H TVOK J 08  M  U IC92XW 3G1RN'⊇⍨52|8965|2411⊥¨⎕ucs

ลองออนไลน์!

05AB1E , 45 44 ไบต์

40ö98%•Wþ@»Ý¢a:µ@,–çòßuÒ¹₃©6µć‚FVÝ∊J?•2ôžLR‡

ลองออนไลน์!

รับอินพุตเป็นอาร์เรย์ของคอลัมน์และส่งออกอาร์เรย์ของอักขระ

คำอธิบาย:

40ö                       # convert each column from base 40
   98%                    # modulo 98
      •...•2ô             # compressed array: [20, 32, 82, 30, 27, 28, 76, 89, 46, 96, 36, 4, 18, 12, 80, 75, 50, 86, 42, 2, 52, 92, 48, 0, 84, 1, 88, 90, 10, 26, 70, 41, 94, 64, 14, 60]
             žLR          # built-in array 0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz
                ‡         # transliterate

R , 143 128 ไบต์

function(v)c(0:9,LETTERS)[match(colSums((sapply(v,U<-utf8ToInt)*194:198)%%45:41),U("#</Eb=,n9J.M4Z+%*V N[Hd\\B?1Oj>KgRYT2")+34)]

ลองออนไลน์!

ฟังก์ชั่นรับเวกเตอร์ของสตริง (สอดคล้องกับคอลัมน์) เป็นอินพุตเช่น:

MWRRG
MRRRM
WWRRM -> c('MMWMM','WRWRW','RRRRW','RRRRW','GMMMG') -> HELLO
MRRRM
MWWWG

คำอธิบาย:

ทำการดำเนินการต่อไปนี้สำหรับแต่ละสตริงที่เข้ารหัส (เช่น 'CRGBY' = 'S'):

        TO ASCII      MULTIPLICATION             MODULO              SUM &              TO
        CODEPOINT                                                    OFFSET             ASCII
---------------------------------------------------------------------------------------------

'C'        67        67 * 194 = 12998       12998 %% 45 = 38  \
'R'        82        82 * 195 = 15990       15990 %% 44 = 18  |
'G'  --->  71  --->  71 * 196 = 13916  ---> 13916 %% 43 = 27  |---> (140 - 34) = 106 ---> 'j'
'B'        66        66 * 197 = 13002       13002 %% 42 = 24  |
'Y'        89        89 * 198 = 17622       17622 %% 41 = 33  /

เราได้รับสตริงต่อไปที่ตัวละครแต่ละตัวที่สอดคล้องกับ'#</Eb=,n9J.M4Z+%*V N[Hd\B?1Oj>KgRYT2''0123456789ABCDEFGHIJKLMNOPQR'

ดังนั้นรหัสดำเนินการการดำเนินงานที่อธิบายไว้ในสายการป้อนข้อมูลแล้วค้นหาจดหมายของพวกเขาภายในได้รับตำแหน่งในสตริง'#</Eb=,n9J.M4Z+%*V N[Hd\B?1Oj>KgRYT2''0123456789ABCDEFGHIJKLMNOPQR'

ถ่าน , 66 ไบต์

ＷＳ§”*&_⟲⎇4>υ≧Y⪪ml^π≕t.A；p↶⧴q⊗Ｈε‖r¡¡ºÞd⸿σＣ⁺⮌”﹪﹪﹪⍘ιWMYCBGR³⁶⁰¦¹¹³¦⁷¹

ลองออนไลน์! การเชื่อมโยงคือการใช้รหัสเวอร์ชันอย่างละเอียด รับอินพุตเป็นรายการของคอลัมน์ที่ถูกยกเลิกด้วยบรรทัดว่าง คำอธิบาย:

ＷＳ

อินพุตสตริงจนกระทั่งมีค่าว่าง

§”*&_⟲⎇4>υ≧Y⪪ml^π≕t.A；p↶⧴q⊗Ｈε‖r¡¡ºÞd⸿σＣ⁺⮌”

จัดทำดัชนีลงในสายอักขระOV EX8HSCF5IA L TG 17 M P9RB 4 K ZY2 0JW 63Q ND Uซึ่งมีความยาวต่อท้าย 56 อักขระ

﹪﹪﹪⍘ιWMYCBGR³⁶⁰¦¹¹³¦⁷¹

ทำการแปลงฐาน 7 โดยใช้ตัวอักษรWMYCBGRจากนั้นลดโมดูโล 360 ต่อเนื่อง 113, 71, และ 56 อย่างต่อเนื่องผ่านการทำดัชนีแบบวนรอบ

ฐาน 7 ของฉันมีอาการไม่ดีด้วยตัวอักษรตายตัวของ @ Arnauld; หลังจากการค้นหาบางอย่างฉันยังอยู่ที่ 73 ไบต์ การใช้วิธีการของ @ Grimy ลดขนาดลงเหลือ 67 ไบต์ อย่างไรก็ตามในที่สุดฉันก็ติดตามโซลูชัน 66 ไบต์:

ＷＳ§”*&″ÀＭ↔↓<Ｊ;×⊟ςF,Ｇηe↖ητγ´ＷＩＹ³﹪▶⟧9?δc⁶ＡxDê↷hＰiψ”﹪﹪﹪⍘ι⁴⁷¦²³⁷¦⁷³¦⁶⁷

ลองออนไลน์! การเชื่อมโยงคือการใช้รหัสเวอร์ชันอย่างละเอียด คำอธิบาย:

ＷＳ

อินพุตสตริงจนกระทั่งมีค่าว่าง

§”*&″ÀＭ↔↓<Ｊ;×⊟ςF,Ｇηe↖ητγ´ＷＩＹ³﹪▶⟧9?δc⁶ＡxDê↷hＰiψ”

จัดทำดัชนีลงในสตริงID HAM178 VS4F 3R EP6CQ Z UB O 0 X 9 G 5TNJKL2Y Wซึ่งมีความยาว 63 อักขระ

﹪﹪﹪⍘ι⁴⁷¦²³⁷¦⁷³¦⁶⁷

ทำการแปลงฐาน -47 โดยใช้ตัวอักษร0-9A-Za-kจากนั้นลดโมดูโลแบบต่อเนื่อง 237, 73, 67 และ 63 โดยนัยผ่านการจัดทำดัชนีแบบวนรอบ

CJam (63 ไบต์)

{{Gb"õáÖÅ{a("{i%}/"@/Ö´çýß}yùÜÅ©GôÉç¢"256b43b'0f+=}%}

หรือในรูปแบบ xxd

0000000: 7b7b 4762 22f5 e1d6 c59f 7b61 2822 7b69  {{Gb".....{a("{i
0000010: 257d 2f22 0b8a 8340 982f d6b4 e793 fddf  %}/"...@./......
0000020: 7d79 f9dc c519 17a9 0e47 0ef4 c9e7 a222  }y.......G....."
0000030: 3235 3662 3433 6227 3066 2b3d 7d25 7d    256b43b'0f+=}%}

นี่คือบล็อก (ฟังก์ชัน) ที่ไม่ระบุชื่อซึ่งคาดว่าอินพุตเป็นรายการของคอลัมน์ สาธิตออนไลน์

เช่นเดียวกับคำตอบอื่น ๆ การแปลงฐานนี้จะตามด้วยเชน% เพื่อหาตารางการค้นหาสั้น ๆ ในกรณีนี้ผมใช้ฐาน 16% [245 225 214 197 159 123 97 40]และห่วงโซ่

เยลลี่ 48 ไบต์

OḌ%⁽qƥ%⁹%53“ð×⁼ẎėWWæ¤jḌṛ>÷ƭÑṙsṛḌz0Ġọµḷ’b51¤iⱮịØB

Monadic Link ยอมรับรายการของอักขระตัวพิมพ์ใหญ่ (แต่ละคอลัมน์เป็นคอลัมน์) ซึ่งให้รายการของอักขระ

ลองออนไลน์!

อย่างไร?

OḌ%⁽qƥ%⁹%53“...’b51¤iⱮịØB - Link: columns
O                         - ordinals
 Ḍ                        - convert from base ten
  %⁽qƥ                    - modulo 29415
      %⁹                  - modulo 256
        %53               - modulo 53
                    iⱮ    - map with first index of x in:
                   ¤      -   nilad followed by link(s) as a nilad:
           “...’          -     22270425059867513817410846141176204460122938458128124185752719
                b         -     convert to base
                 51       -       51
                          -     ... = [38,13,19,27,10,16,20,11,35,31,4,17,9,0,50,45,24,25,34,39,22,29,41,32,3,7,46,5,48,18,6,44,28,14,1,8]
                      ị   - index into
                       ØB -   "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz"

Ruby , 109 ไบต์

->n{n.map{|i|"6&\278$Cc\17Y9\23T\r]{v^Ox\16_+!Qj\fbH
hraD*Ap".index((i.to_i(36)%245%119+8).chr).to_s(36)}*""}

ลองออนไลน์!

Stax , 46 ไบต์

é►^njÖ_╪»Θîq╪↨δXû=▀úæ5?ªoéV╫╫╩ßH‼╒C═e┼$⌠°JqUu⌡

เรียกใช้และแก้ไขข้อบกพร่อง

แต่ละคอลัมน์จะถอดรหัสเป็นฐาน -36 โมดูลัสต่อเนื่องของ 8273 จากนั้นนำไปใช้กับ 95 ค่านี้ให้ตัวเลขเฉพาะค้นหาในสตริงคงที่

มันจะใส่ข้อมูลในรูปแบบที่ระบุในตัวอย่างและต้องแปลงให้คอลัมน์ ฉันจะสามารถบันทึกไบต์โดยใช้รูปแบบการป้อนข้อมูลที่แตกต่างกันซึ่งฉันอาจทำในบางจุด