সমস্ত এএসসিআইআই ট্রেনের উপরে


45

সমস্ত এএসসিআইআই ট্রেনের উপরে!

    o O O   ___     ___     ___     ___     ___     ___     ___     ___     ___  
   o       | C |   | O |   | D |   | E |   |   |   | G |   | O |   | L |   | F | 
  TS__[O]  |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___| 
 {======|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|
./o--000'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'

আপনি ট্রেনে চড়ার জন্য সেরা প্রস্তুত থাকবেন, কারণ আপনি যে ট্রেনটি চালাবেন সেটি তৈরি করতে চলেছেন। একটি স্ট্রিং দেওয়া sহয়েছে, উপরে চিত্রিত হিসাবে সম্পূর্ণরূপে গঠিত ট্রেন আউটপুট। প্রথম জিনিসটি আউটপুট হ'ল ইঞ্জিনটি সর্বদা আপনার স্ট্রিংটি ধরে রাখবে, নীচে একা দেখানো হয়েছে:

    o O O 
   o      
  TS__[O] 
 {======| 
./o--000' 

লোকোমোটিভ অনুসরণ করে রেল-গাড়িগুলি আপনার মূল্যবান কার্গোটির প্রতিটি চরিত্র ধারণ করে। আনলোড করার সময় বিভ্রান্তি বাঁচাতে, আপনার সংস্থা আপনাকে এই গাড়ির বাইরের দিকে লেবেল লাগিয়েছে। প্রশ্নযুক্ত গাড়িগুলি সর্বদা এটির মতো দেখায়:

   ___ 
  | # |
  |___|
_|"""""|
"`-0-0-'

যেখানে #"কার্গো" হোল্ডের ভিতরে থাকা চরিত্রের প্রতিনিধি। প্রতিটি গাড়িতে ইঞ্জিন চালনা করাও আপনার কাজের অংশ, কারণ আপনাকে এই পুরো চালানের তরলতা এবং সাফল্য তদারকি করার দায়িত্ব দেওয়া হয়েছে। সুতরাং, একবার আপনি সমস্ত গাড়ীর লেবেল লাগিয়ে ট্র্যাকগুলিতে ইঞ্জিনটি পেয়ে গেলে ট্রেনটি একত্রিত হয়ে রোল করার জন্য আপনাকে অবশ্যই নিশ্চিত করতে হবে।

বিধি

  • আপনার প্রোগ্রামটি নেওয়া উচিত কেবলমাত্র একটি ইনপুট একক স্ট্রিং।
  • ইঞ্জিনটি সর্বদা আউটপুট থাকতে হবে, এমনকি আপনার চালানটি খালি রয়েছে।
  • প্রতিটি গাড়ি কেবল একটি চরিত্র ধারণ করতে পারে, আপনার ভাগ্যটি চাপবেন না যাতে আপনি পণ্যটির ক্ষতি করতে পারেন।
  • আপনার কেবলমাত্র নিম্নলিখিত মুদ্রণযোগ্য ASCII অক্ষরকে সমর্থন করতে হবে: _-0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz
    আপনি যদি আরও বেশি করে শেষ করেন তবে তাও ঠিক আছে তবে এটি সর্বনিম্ন ন্যূনতম।
  • 1-2 টি ট্রেলিং স্পেসগুলি গ্রহণযোগ্য, যেমনটি একটি একক পেছনের নতুন লাইন।
  • এটি , সংক্ষিপ্ততম বাইট-কাউন্ট জেতা।


1
আমি মনে করি না এটি আসলে কলমোগোরভ-জটিলতাএই মেটা পোস্টের উপর ভিত্তি করে এই প্রশ্নটি অবশ্যই আমাদের সংজ্ঞায় ফিটিং এবং ফিটিংয়ের মধ্যে নেই বলে আমি ব্যক্তিগতভাবে বলব যে এটি এই প্রশ্নের অনুরূপ ট্যাগটিকে ফিট করে না যা স্ট্রিং মোড়ানোর জন্যও জিজ্ঞাসা করে।
গম উইজার্ড 4

5
এটি সুন্দর
অসি

@ ওয়েট উইজার্ড এটি একাধিক জেনারের মিশ্রণ। ইঞ্জিনটি কলমোগ্রভ জটিলতায় পড়বে, পুরো জিনিসটি ASCII-Art এর অধীনে ছিল এবং এটি সম্ভবত স্ট্রিং ম্যানিপুলেশনে কিছুটা পড়ে যায় falls
ম্যাজিক অক্টোপাস আরন

আমি এই ছাপে ছিলাম যে ট্রেনের আসল প্যাটার্নটি সংকুচিত করা ট্যাগটির উপযুক্ত হবে; তবে আমি যুক্তিটি থামাতে কেবল এটি সরিয়ে ফেলব।
যাদু অক্টোপাস উরন

উত্তর:


4

05AB1E , 101 99 বাইট

নিষ্পাপ প্রথম প্রচেষ্টা।

"    o O O   o"ð7×"TS__[O] {======|./o--000'"J5ä¹v… _ €ÐJy“ | ÿ |   |___| _|"""""|"`-0-0-'“«5ä})øJ»

এটি অনলাইন চেষ্টা করুন!


ঠিক আছে, কোডটি কোনও ট্রেনের মতো নয়, তবে এটি এখন জিতেছে।
ম্যাজিক অক্টোপাস উর্ন 14

37

জাভাস্ক্রিপ্ট (ES6), 149 144 বাইট

s=>`    o O Oa   ___  
   o     a  | $& | 
  TS__[O]a  |___| 
 {======|a_|"""""|
./o--000'a"\`-0-0-'`.replace(/a(.*)/g,(_,c)=>s.replace(/./g,c))

আমি মনে করি না ইঞ্জিনটি নিজেই সংকুচিত হতে পারে তবে সম্ভবত এটি সম্ভব।

পরীক্ষার স্নিপেট


প্রচুর পুনরাবৃত্তি করা অক্ষর, এর থেকে আরও কিছু বাইট ছড়িয়ে দেওয়া সম্ভব।
প্রাচ্য

17
সোর্স কোড :-)
লুইস মেন্ডো

15
উত্সাহিত মূলত কোডটি ট্রেনের মতো দেখায়
রোহান ঝুনঝুনওয়ালা

বোনাস পয়েন্ট কারণ এটি ঠিক সেখানে ব্রাউজারে চলে!
ডিজিএম

6

বেফুঞ্জ, 276 270 বাইট

p1p~:7>7+#:`#~_$:v
>#p0p10:p00:+1g00_v#:
v"!!```!!!"v>0p01g\-0g1+53p  
v"!}!#!}!!"v0 p115<
v"!}```}!!"v^:-1<
v"}#####}`">00g:|
>"(.1.1.a#"^+<v1<
v"P!P!p!!! "v5>g00p
v"!!!!!p!!!"v6
v"^P\``TU!!"vp
v"}>>>>>>|!"v+
>"(111..p0/"v6
v-1:g110">>"<g
>:11p!#v_p011^
#-:#1_@>$$$$>,#

এটি অনলাইন চেষ্টা করুন!

ব্যাখ্যা

গাড়ি এবং ইঞ্জিনটি 3 থেকে 12 লাইনগুলিতে পাঁচটি স্ট্রিংয়ের দুটি সেট হিসাবে এনকোড করা হয়েছে অক্ষরের মানগুলি 1 দ্বারা বন্ধ হয়ে যায় যাতে ডাবল উদ্ধৃতিগুলি যাতে বেফঞ্জ স্ট্রিংয়ে ব্যবহার করা যায় না সেগুলি মোকাবেলা করা এড়ানো যায়।

কোডটি স্ট্যাকের উপর ট্রেনটি রেন্ডার করার জন্য প্রয়োজনীয় অক্ষরের পুরো সেট তৈরি করে কাজ করে। আউটপুট প্রতিটি লাইন জন্য, একটি উপযুক্ত গাড়ী স্ট্রিং প্রথমে স্ট্যাকের সাথে যুক্ত করা হয়, কার্গোয়ের জন্য প্রয়োজনীয় হিসাবে বহুবার পুনরাবৃত্তি করা হয় এবং তারপরে উপযুক্ত ইঞ্জিনের স্ট্রিংয়ের একটি অনুলিপি।

প্রতিটি লাইন তৈরির পরে, স্ট্রিংয়ের বাম দিকে নীচের তীরগুলির একটি জোড়া একটি ডান তীর দ্বারা প্রতিস্থাপন করা হয়েছে, সুতরাং লুপের পরবর্তী পুনরাবৃত্তিটি গাড়ীর জন্য পৃথক জোড়া স্ট্রিং ব্যবহার করে কোডের মাধ্যমে একটি পৃথক পথ অনুসরণ করে এবং ইঞ্জিন।

সমস্ত ডেটা স্ট্যাকের উপরে তৈরি হয়ে গেলে, একটি চূড়ান্ত রেন্ডারিং লুপ থাকে যা অক্ষরগুলি লিখে দেয়, প্রতি বার 1 টি বিয়োগ করে প্রাথমিক এনকোডিংয়ের জন্য অ্যাকাউন্ট করে।

বোনাস হিসাবে, উত্সটি বন্দুকের বুকে আকারে তৈরি করা হয়েছে , যদি ট্রেনের আক্রমণে আসে। গল্ফাররা আমার বন্দুকের জালটি ধ্বংস করে দিয়েছে।


গল্ফাররা আমার বন্দুকের জাল, এলওএল ধ্বংস করেছে। +1 টি। তবুও, এটি সি # এবং জাভা মারছে।
Zacharý

6

পিএইচপি, 218 211 204 187 183 বাইট

    o O O<?for(;$y<5;print"\n".["   o     ","  TS__[O]"," {======|","./o--000'"][+$y++])for($p=0;$c=a&$argn[$p++];)echo["   ___  ","  | $c | ","  |___| ",'_|"""""|',"\"`-0-0-'"][+$y];

এসটিডিআইএন থেকে ইনপুট নেয়; সাথে চালানো -nR

ইঞ্জিন বা ওয়াগনকে সংকুচিত করতে স্টোরেজে সাশ্রয়ের চেয়ে ডিকম্প্রেস করার জন্য আরও কোডের প্রয়োজন হবে।
আমি এখানে আর কোনও সম্ভাবনা দেখছি না।


a&$c=$argn পরিবর্তে""<$c=$argv[1]
জার্গ হালসারম্যান

@ জার্গহ্লসারম্যান এই পোস্টটি প্রাচীন ছিল। :)
তিতাস

4

পাইথন 2, 176 বাইট

lambda i:'\n'.join(map(''.join,zip(*[["    o O O","   o     ","  TS__[O]"," {======|","./o--000'"]]+[["   ___  ",'  | '+x+' | ',"  |___| ",'_|"""""|',"\"`-0-0-'"]for x in i])))

উদাহরণ:

print f('Python')

দেয়

    o O O   ___     ___     ___     ___     ___     ___  
   o       | P |   | y |   | t |   | h |   | o |   | n | 
  TS__[O]  |___|   |___|   |___|   |___|   |___|   |___| 
 {======|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|
./o--000'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'

4

পাওয়ারশেল, 167 166 বাইট

$l=($a=$args[0]).Length;"    o O O"+"   ___  "*$l;"   o     "+($a[0..$l]|%{"  | $_ |"});"  TS__[O]"+"  |___| "*$l;" {======|"+'_|"""""|'*$l;"./o--000'"+'"`-0-0-'''*$l

উদাহরণ:

.\train.ps1 "PowerShell!"
    o O O   ___     ___     ___     ___     ___     ___     ___     ___     ___     ___     ___  
   o       | P |   | o |   | w |   | e |   | r |   | S |   | h |   | e |   | l |   | l |   | ! |
  TS__[O]  |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___| 
 {======|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|
./o--000'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'

সম্ভবত অবৈধ! কোনও দাগ ছাড়াই চালিত হলে এটি একটি খালি স্ট্রিং চেষ্টা করে মুদ্রণ করবে এবং এর মতো দেখতে:

    o O O
   o       |  |
  TS__[O]
 {======|
./o--000'

যদি খালি ইনপুট স্ট্রিং দিয়ে চালানো হয় তবে এটি সঠিকভাবে ফিরে আসবে:

.\train.ps1 ""
    o O O
   o     
  TS__[O]
 {======|
./o--000'

(কিন্ডা) অবরুদ্ধ:

$l=($a=$args[0]).Length
"    o O O"+"   ___  "*$l
"   o     "+($a[0..$l]|%{"  | $_ |"})
"  TS__[O]"+"  |___| "*$l
" {======|"+'_|"""""|'*$l
"./o--000'"+'"`-0-0-'''*$l

পাওয়ারশেলে সংক্ষিপ্ততর সংক্ষেপণ হতে চলেছে +'c'*xযেখানে সিটি চর এবং x হল পুনরাবৃত্তির সংখ্যা, এবং এটি কেবল পিছনে বা শীর্ষস্থানীয় পুনরাবৃত্তির জন্য, যে কোনও কেন্দ্রের স্ট্রিংয়ের পুনরাবৃত্তিগুলির জন্য একটি অতিরিক্ত +এবং অতিরিক্ত প্রয়োজন হবে "- সুতরাং এটির কোনও মানে নেই যেখানে আমি যে কোনও স্থান সাশ্রয় করে কম্প্রেশন দেখতে পাচ্ছি এবং কেবলমাত্র পুনরাবৃত্তি চর সেটটি ___কেবলমাত্র 3 টি অক্ষর।

ব্যাখ্যা:

$l=($a=$args[0]).Length প্রথম আরগটি নিন, এটিকে $ a তে রাখুন, তারপরে $ a এর দৈর্ঘ্য নিন এবং এটি into l এ রাখুন, এটি আপনার প্রয়োজন কেবলমাত্র পরিবর্তনশীল।

" o O O"+" ___ "*$l অন্যান্য বিটগুলির মধ্যে বেশিরভাগগুলি বাম-অংশের এই ফর্ম্যাটটি অনুসরণ করে এবং তারপরে ডান অংশটি প্রয়োজনীয় অক্ষরের সংখ্যা বার করে দেয়।

" o "+([char[]]$a|%{" | $_ |"})লুপ ( |%{}) এর মাধ্যমে $ a এর জন্য একটি চর অ্যারে হিসাবে, তাই foreach (char $_ in $a)নন-পাইপলাইন সংস্করণের জন্য, তারপর লেখটিকে লেখার মধ্যে রাখুন।

এটি একটি অত্যন্ত সহজ পদ্ধিতি, তবে যেহেতু আমি অতীত স্ট্রিংগুলি সংকুচিত করার জন্য ভাল উপায় খুঁজে পাচ্ছি না এটি এটি সবচেয়ে দরকারী বলে মনে হয়।

1 টি বাইট ব্রেন্টিস্টকে ধন্যবাদ! এবং এখানে আমি ভাবছিলাম যে এটি কোনও ছোট হবে না ..


আপনাকে কোনও আরগস হ্যান্ডেল করতে হয়নি :)।
যাদু অক্টোপাস উরন 17

@ কারাসোকম্পুটিং ইয়ে, আমাকে জানানোর জন্য ধন্যবাদ
কলস

নিস! আপনি পরিবর্তন করে 1 বাইট সংরক্ষণ করতে পারবেন [char[]]$aকরার $a[0..$l] :)
briantist

আহ ঘোষিত হওয়ার আগে $lএবং এটি সম্পর্কে সম্পূর্ণরূপে ভুলে যাওয়ার আগে চর অ্যারে ব্যবহার করছিল । তার জন্য ধন্যবাদ!
colsw

2

জাভা, 361 বাইট

class C {static void main(String[]v){Scanner q = new Scanner(System.in);String i = q.nextLine();String[] t = {"    o O O   ", "   o       ", "  TS__[O]  ", " {======|", "./o--000'",};for (char c: i.toCharArray()) {t[0]+="___     ";t[1]+="| # |   ".replace('#',c);t[2]+="|___|   ";t[3]+="_|\"\"\"\"\"|";t[4]+="\"`-0-0-'";}for(String p:t) System.out.println(p);}}
class C {
    static void main(String[]v)  {
        Scanner q = new Scanner(System.in);
        String i = q.nextLine();
        String[] t = {
                "    o O O   ",
                "   o       ",
                "  TS__[O]  ",
                " {======|",
                "./o--000'",
        };
        for (char c: i.toCharArray()) {
            t[0]+="___     ";
            t[1]+="| # |   ".replace('#',c);
            t[2]+="|___|   ";
            t[3]+="_|\"\"\"\"\"|";
            t[4]+="\"`-0-0-'";
        }
        for(String p:t)
            System.out.println(p);

    }
}

উদাহরণ

java
    o O O   ___     ___     ___     ___     
   o       | j |   | a |   | v |   | a |   
  TS__[O]  |___|   |___|   |___|   |___|   
 {======|_|"""""|_|"""""|_|"""""|_|"""""|
./o--000'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'

1
আমি জানি এটি এক বছর অর্ধেক হয়ে গেছে, তবে আপনি বেশ খানিকটা গল্ফ করতে পারেন (স্পেসগুলি সরিয়েও): interface C{static void main(String[]v){String n="\n",b=" o O O ",c=" o ",d=" TS__[O] ",e=" {======|",f="./o--000'";for(String x:new java.util.Scanner(System.in).nextLine().split("")){b+="___ ";c+="| "+x+" | ";d+="|___| ";e+="_|\"\"\"\"\"|";f+="\"`-0-0-'";}System.out.print(b+n+c+n+d+n+e+n+f);}}( ৩১৮ বাইট ) অথবা আরও বেশি বিকল্প আপনি যদি বিকল্প ইনপুট ( 279 বাইট ) new java.util.Scanner(System.in).nextLine()দিয়ে প্রতিস্থাপন করেন তবে এখানে চেষ্টা করে দেখুনv[0]
কেভিন ক্রুইজসেন

2

পার্ল, 137 বাইট

-pFপতাকাগুলির জন্য কোডের 132 বাইট + 5 বাইট ।

ascii_train.pl:

#!/usr/bin/perl -apF
s/./  | $& | /g;$_="    o O O!   ___  
   o     $_
  TS__[0]!  |___| 
 {======|!".'_|"""""|'."
./o--000'!\"`-0-0-'";s/!(.*)/$1x@F/ge

নোট করুন যে আমি কোডটিতে -aপতাকা যুক্ত করেছি , তবে এটি কেবল কারণ পার্লের পুরানো সংস্করণগুলি ব্যবহার করার -aসময় প্রয়োজন -F

এটি চালানোর জন্য:

echo -n "code-golf" | perl ascii_train.pl

চূড়ান্ত নিউলাইন ছাড়াই ইনপুট সরবরাহ করতে হবে ( echo -nউদাহরণস্বরূপ)।

ব্যাখ্যা:
আমি যা দেখেছি তা থেকে, এটি প্রায় ETHPr Productions এর জাভাস্ক্রিপ্ট উত্তর মত একই ধারণা।
এখানে খুব বেশি কিছু চলছে না: দুর্ভাগ্যক্রমে xঅপারেটরগুলি ব্যবহারের যোগ্য হয়ে উঠতে প্যাটার্নগুলি কিছুটা কম short
প্রথমে ট্রেনের দ্বিতীয় স্তরের গঠনের জন্য s/./ | $& | /gইনপুটটির প্রতিটি অক্ষরকে |(এবং স্পেস) দিয়ে ঘিরে ।
তারপরে সেই দীর্ঘ স্ট্রিংয়ের অভ্যন্তরে, একটি !এবং একটি নতুন লাইনের মধ্যেকার সবকিছুই এমন একটি প্যাটার্ন যা আমরা গাড়িগুলি তৈরির জন্য পুনরাবৃত্তি করতে চাই। সেই পুনরাবৃত্তিটি রেজেক্সকে ধন্যবাদ দেওয়া হয়েছে s/!(.*)/$1x@F/ge। (আমি ব্যবহার করেছি !কারণ ইনপুটটিতে এটি থাকতে পারে না)।


1

সি #, 277 বাইট

Golfed:

string T(string s){var o=new string[]{"     o O O","   o        ","   TS__[O]","  {======|","./ o--000'" };for(int i=0;i<s.Length;i++){o[0]+="   ___  ";o[1]+="| # |   ".Replace("#",s[i]+"");o[2]+="  |___| ";o[3]+="_|\"\"\"\"\"|";o[4]+="\"`-0-0-'";}return string.Join("\r\n",o);

Ungolfed:

public string T(string s)
{
  var o = new string[] { "     o O O", "   o        ", "   TS__[O]",
    "  {======|", "./ o--000'" };

  for (int i = 0; i < s.Length; i++)
  {
    o[0] += "   ___  ";
    o[1] += "| # |   ".Replace("#", s[i] + "");
    o[2] += "  |___| ";
    o[3] += "_|\"\"\"\"\"|";
    o[4] += "\"`-0-0-'";
  }

  return string.Join("\r\n", o);
}

পরীক্ষামূলক:

Console.Write(new AllAboardTheASCIITrain().T(""));

     o O O
   o        
   TS__[O]
  {======|
./ o--000'

এবং...

Console.Write(new AllAboardTheASCIITrain().T("Programming Puzzles & Code Golf"));

     o O O   ___     ___     ___     ___     ___     ___     ___     ___     ___     ___     ___     ___     ___     ___     ___     ___     ___     ___     ___     ___     ___     ___     ___     ___     ___     ___     ___     ___     ___     ___     ___  
   o        | P |   | r |   | o |   | g |   | r |   | a |   | m |   | m |   | i |   | n |   | g |   |   |   | P |   | u |   | z |   | z |   | l |   | e |   | s |   |   |   | & |   |   |   | C |   | o |   | d |   | e |   |   |   | G |   | o |   | l |   | f |   
   TS__[O]  |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___| 
  {======|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|
./ o--000'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'

1

সি # 221 বাইট

এখানে বিশেষ কিছু ঘটছে না .. কেবল প্রতিটি লাইন তৈরি করে নতুন লাইনে তাদের সাথে যোগ দিন।

s=>{var t=new[]{"    o O O","   o     ","  TS__[O]"," {======|","./o--000'"};foreach(var c in s){t[0]+="   ___  ";t[1]+=$"  | {c} | ";t[2]+="  |___| ";t[3]+="_|\"\"\"\"\"|";t[4]+="\"`-0-0-'";}return string.Join("\n",t);};

1

সি, 217 212 208 বাইট

i;f(char*t){char d[]="    o O O   o       TS__[O] {======|./o--000'   ___    | C |   |___| _|\"\"\"\"\"|\"`-0-0-'",*p;for(;i<5;i++){printf("%.9s",d+i*9);for(p=t;d[57]=*p++;)printf("%.8s",d+45+i*8);puts("");}}

এটি অনলাইনে চেষ্টা করুন

আউটপুট:

    o O O   ___     ___     ___     ___     ___     ___     ___     ___     ___     ___     ___     ___     ___     ___  
   o       | C |   | O |   | D |   | E |   |   |   | G |   | O |   | L |   | F |   |   |   | I |   | N |   |   |   | C | 
  TS__[O]  |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___| 
 {======|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|
./o--000'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'

1

এসওজিএল ভি0.12 , 57 56 বাইট

Τ¡ā↓mΛC┌─⁵℮Ƨ⅛□→(š;∞⅟¹°⅔Ζ‽ζ÷⁴‘9n,{"s=Ο!NθæιžGš‼t╬¼Xg`‘8n┼

এখানে চেষ্টা করুন!

ব্যাখ্যা:

..‘             push a compressed string of the locomotive in a single line
   9n           split in line lengths of 9
     ,{         for each character in the input
       "..‘       push a compressed string of a wagon in a single line
           8n     split to line lengths of 8
             ┼    add horizontally

1

Jq 1.5 , 178 বাইট

[["    o O O   o       TS__[O] {======|./o--000'"|_nwise(9)]]+[range(length)as$i|[.[$i:$i+1]|"   ___    | \(.) |   |___| _|\"\"\"\"\"|\"`-0-0-'"|_nwise(8)]]|transpose|map(add)[]

সম্প্রসারিত

# engine
def E:"    o O O   o       TS__[O] {======|./o--000'"|_nwise(9);

# car (note string interpolation)
def C:"   ___    | \(.) |   |___| _|\"\"\"\"\"|\"`-0-0-'"|_nwise(8);

  # generate train
  [[E]] + [range(length) as $i| [.[$i:$i+1] |C]]

  # combine rows and concatenate strings     
| transpose | map(add)[]

নমুনা রান

$ jq -MRr train.jq <<< "golf"
    o O O   ___     ___     ___     ___  
   o       | g |   | o |   | l |   | f | 
  TS__[O]  |___|   |___|   |___|   |___| 
 {======|_|"""""|_|"""""|_|"""""|_|"""""|
./o--000'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'

$ wc -c < train.jq
  178

এটি অনলাইনে চেষ্টা করুন


0

এক্সেল ভিবিএ, 218 বাইট

বেনামে VBE তাত্ক্ষণিক উইন্ডো ফাংশন যা VBE তাত্ক্ষণিক উইন্ডোতে পরিসীমা [A1]এবং আউটপুটগুলি থেকে ইনপুট নেয়

[B1]=[Len(A1)]:?"    o O O"[Rept("   ___  ",B1)]:?"   o     ";:For i=1To[B1]:?"  | "Mid([A1],i,1)" | ";:Next:?:?"  TS__[O]"[Rept("  |___| ",B1)]:?" {======|"[Rept("_|""""""""""|",B1)]:?"./o--000'"[Rept("""`-0-0-'",B1)]

পাঠযোগ্যতার জন্য ফর্ম্যাট করা

[B1]=[Len(A1)]
?"    o O O"[Rept("   ___  ",B1)]
?"   o     ";:For i=1To[B1]:?"  | "Mid([A1],i,1)" | ";:Next:?:
?"  TS__[O]"[Rept("  |___| ",B1)]:
?" {======|"[Rept("_|""""""""""|",B1)]:
?"./o--000'"[Rept("""`-0-0-'",B1)]

নমুনা আউটপুট

    o O O   ___     ___     ___     ___     ___     ___     ___     ___     ___     ___     ___  
   o       | V |   | B |   | A |   |   |   | E |   | x |   | p |   | r |   | e |   | s |   | s | 
  TS__[O]  |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___|   |___| 
 {======|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|_|"""""|
./o--000'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'"`-0-0-'
আমাদের সাইট ব্যবহার করে, আপনি স্বীকার করেছেন যে আপনি আমাদের কুকি নীতি এবং গোপনীয়তা নীতিটি পড়েছেন এবং বুঝতে পেরেছেন ।
Licensed under cc by-sa 3.0 with attribution required.