একটি সাধারণ লাইন সম্পাদক তৈরি করুন

Question

এতে: লাইন ব্রেক ছাড়াই একটি স্ট্রিং *
ব্যবহারকারীকে লাইনটি সম্পাদনা ও জমা দেওয়ার মঞ্জুরি দিন
: পরিবর্তিত স্ট্রিং (optionচ্ছিকভাবে একটি পিছনের লাইনব্রেক সহ)

লাইন সম্পাদককে সর্বনিম্ন ব্যবহারকারীকে এটির অনুমতি দিতে হবে:

1. বাম এবং ডান একটি দৃশ্যমান কার্সার সরান

2. কার্সার অবস্থানে অক্ষরগুলি sertোকান এবং / অথবা orোকান

3. কার্সার অবস্থানে অক্ষর মুছে ফেলুন

4. নতুন স্ট্রিং জমা দিন, অর্থাত্ সম্পাদনা বন্ধ করুন পরিবর্তিত স্ট্রিংটি ফিরে / মুদ্রিত / প্রদর্শিত / সংরক্ষণের কারণ হতে পারে ... (অন্য কোনও পাঠ্য ছাড়াই)

প্রশংসা করা হয়েছে, তবে প্রয়োজন নেই:

• আপনার কোড ব্যাখ্যা।

• একটি অনলাইন টেস্টিং সাইটের সাথে লিঙ্ক করুন যা আপনার প্রোগ্রাম / ফাংশনটি প্রদর্শন করতে পারে

• একটি অ্যানিমেটেড চিত্র ব্যবহারের প্রদর্শন করছে (উদাহরণস্বরূপ, টিআইও, ইন্টারঅ্যাক্টিভিটির অনুমতি দেয় না)

বিঃদ্রঃ:

• কী-বাইন্ডিংগুলি কেবল পরামর্শ

• জিইউআই বা ভিজ্যুয়াল স্টাইলিংয়ের প্রয়োজন নেই

উদাহরণ

নিম্নলিখিতটিতে কার্সারটি চিত্রিত হয়েছে _।

ইন: Just some text
: সম্পাদনা করতে ব্যবহারকারীকে অনুমতি
 Just some text_  ব্যবহারকারী ছাপাখানা ←(বাম তীর কী) নয়টি বার
 Just ̲some text  ব্যবহারকারী ছাপাখানা Delচারবার
 Just ̲ text  ব্যবহারকারী ছাপাখানা  ব্যবহারকারী ছাপাখানা বাইরে:any
 Just any_text Enter
Just any text

ইন: Remove me
সম্পাদন করা ব্যবহারকারীর অনুমতি দিন:
 Remove me_  ব্যবহারকারী presses Backspaceনয়টি বার
 _  ব্যবহারকারী ছাপাখানা বাইরে: (খালি STRING)Enter
 

---

* তুচ্ছ সম্পাদকীয় সমাধানগুলি রোধ করতে, এটি সম্পাদনা কমান্ডের চেয়ে আলাদা ইনপুট পদ্ধতির মাধ্যমে সরবরাহ করা আবশ্যক, বা তাদের সাথে একটি নতুন লাইন বা অনুরূপ দ্বারা পৃথক করা উচিত।

Comments

আই / ও-র জন্য কি আমাদের সেই সঠিক কীগুলি ব্যবহার করতে হবে? এছাড়াও, আমরা কি পাঠ্য সংরক্ষণ করতে একটি ফাইল তৈরি করতে পারি?

— আর

@ রিকার কী-বাইন্ডিংগুলি কেবলমাত্র পরামর্শ । ইনপুট এবং আউটপুট পদ্ধতিগুলি পিপিসি ডিফল্ট অনুসরণ করে ।

— অ্যাডম

স্ট্রিংয়ে কি নতুন লাইন থাকতে পারে? এবং একটি নতুন লাইন "জমা দেওয়ার" জন্য ব্যবহার করা যেতে পারে?

— কনর ও'ব্রায়েন

@ কনরও'ব্রায়ান না; সরল রেখা সম্পাদক । হ্যাঁ; সম্পাদককে অবশ্যই সর্বনিম্ন ব্যবহারকারীকে

— এটির

যদি আপনি প্রশ্নের আসল শর্তে লাইনটি নির্দিষ্ট করে থাকেন তবে এটি চমৎকার হবে কারণ এই সাইটের শিরোনামগুলি হুবহু নির্দিষ্টকরণ নয় ...

— কনর

Answer 1

এপিএল (ডায়ালগ) , 5 বাইট

⍞←⍞⋄⍞

এটি ট্রেডফ্যান, সুতরাং এটি ব্যবহার করার জন্য, করুন

∇a
⍞←⍞⋄⍞
∇

এবং তারপরে এটি ব্যবহার করে কল করুন aযার পরে আপনি প্রারম্ভিক স্ট্রিং সরবরাহ করেন এবং তারপরে আপনি স্ট্রিংটি সম্পাদনা করতে পারবেন।

Answer 2

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

আমি বুঝতে পারছি না কেন এটি এত বেশি উপার্জন পাচ্ছে!

s=>prompt(s,s)

অ্যাডামের পরামর্শের জন্য একটি বাইট ধন্যবাদ সংরক্ষণ করা যে আমি এর মধ্যে মূল আসলটি প্রদর্শন করি prompt।

---

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

f=
s=>prompt(s,s)
console.log(f("Edit this ..."))

Comments

এর ""সাথে 0বা এমনকি প্রতিস্থাপন করে একটি বাইট সংরক্ষণ করুন s(যাতে ব্যবহারকারী সম্পাদনার সময় মূল পাঠ্যটি দেখতে পারে - একটি ঝরঝরে বৈশিষ্ট্য)।

— অ্যাডম

Answer 3

4.x, 25 টি অক্ষর

read -ei "$*" t
echo "$t"

নমুনা রান:

bash-4.3$ bash interactive.sh hello world
hello golfing world
hello golfing world

(উপরের লাইন 2 ইন্টারেক্টিভ সম্পাদনা ছিল, ফলাফলের পাঠ্যের আউটপুট 3 লাইন)

Comments

আমার জন্য কাজ করে না -bash: read: -i: invalid option? manশুধুমাত্র ersপতাকা অনুমোদিত অনুমোদিত বলে ।

— আর

হ্যাঁ, আমি প্রায় জিজ্ঞাসা করতে -ei

— চলেছিলাম

-iবাশ ৪.০-এ প্রবর্তিত হয়েছিল (ফেব্রুয়ারী ২০০৯-এ প্রকাশিত) - “-আই পাঠ্য পাঠ্যপুস্তকের প্রাথমিক পাঠ্য হিসাবে পাঠ্যটি ব্যবহার করুন”।

— মান্যাটওয়ার্ক 16

আমি ভাবছি, বিড়াল কি কাজ করবে?

— ম্যাথু রোহ

catকেবল আগত প্রবাহের জন্য অপেক্ষা করছে, যার জন্য শেল কোনও সম্পাদনা কার্যকারিতা সরবরাহ করবে না। কমপক্ষে ডিফল্টরূপে নয়।

— manatwork

Answer 4

বাশ + ভী / ভিম, 14 বাইট

echo $1>a;vi a

viওরফে অন্য vimMacOS উপর, আমি অন্যান্য অপারেটিং সিস্টেমের সম্পর্কে জানি না।

Comments

হয়তো আমি কিছু মিস করছি, তবে এটি কি পরিবর্তিত স্ট্রিং আউটপুট করার প্রয়োজনীয়তা পূরণ করে?

— গ্রেসন কেন্ট

@ গ্রেসান কেন্ট আপনি আঘাত করে বাঁচাতে বা ছেড়ে দিতে পারেন :wq!বা :x, তাই আমারও তাই মনে হয়। কী হিসাবে যোগ্যতা অর্জন করবে সে সম্পর্কে ওপি কিছুটা অস্পষ্ট।

— আর

Answer 5

এইচটিএমএল + জাভাস্ক্রিপ্ট (ES6), 77 66 64 বাইট

এইচটিএমএল

<input id=t

জাভাস্ক্রিপ্ট

onkeyup=e=>e.which-13||alert(t.value);f=a=>t.value=a;

জার্গ হালসারম্যানের জন্য 10 বাইট এবং লূকের জন্য 2 বাইট ধন্যবাদ সংরক্ষণিত।

onkeyup=e=>e.which-13||alert(t.value);f=a=>t.value=a;

f("Remove Me");

<input id=t>

Comments

আপনি ইনপুট এলিমেন্টের জন্য বৈশিষ্ট্যটির বৈশিষ্ট্যটি সরিয়ে ফেলতে পারেন

— Jürg Hülsermann

oninputপরিবর্তে আপনার সম্ভবত ব্যবহার করা উচিত ।

— ম্যাথু রোহ

@ সিগএসইজিভি আমি চাপ oninputদিলে আগুন লাগে বলে মনে করি নাEnter

— টম

e.which==13?alert(t.value):0-> e.which-13||alert(t.value)দুটি বাইট সংরক্ষণ করে।

— লুক 18

Answer 6

পাইথন 2 , 275 200 বাইট

বিজয়ী নয়, তবে এটি এখানে:

from msvcrt import*
s=list(input())[::-1]
c=i=0
def p(a):print''.join(a)[::-1]
while'\r'!=c:p(s[:i]+['<']+s[i:]);c=getch();x=c!='\b';exec["s[i:i+1-x]=c*x","i=(i-1+2*(c<'\\t'))%-~len(s)"][x*' '>c]
p(s)

ব্যাখ্যা:

এটি ইনপুটটি বিপরীত করে (সহ [::-1]), এবং সেই বিপরীত ইনপুটটিতে অক্ষরগুলি বাদ দিয়ে এবং সন্নিবেশ করে যাতে কার্সারটি সরে না যেতে পারে works মুদ্রণের সময় এটি আবার বিপরীত হয়।

ব্যবহার:

[ট্যাব] কী সরানোর জন্য ডানদিকে সরানোর জন্য
[Ctrl + C] বাম দিকে
[ব্যাকস্পেস] মুছে ফেলার জন্য
[ফিরতি] সম্পাদনা শেষ করতে
অন্য কোনও কী, পাঠ্যে সন্নিবেশ করা হবে

উদাহরণ:

ওপির উদাহরণ ব্যবহার করে

ইন: Just some text
 Just some text>
 Just some> text  ব্যবহারকারী Ctrl+Cপাঁচবার টিপুন
 Just > text  ব্যবহারকারী Backspaceচারবার
 Just any> text  চাপুন  ব্যবহারকারী চাপুন বার বার ব্যবহারকারী টিপে :any
 Just any> text Enter
Just any text

ইনলাইন সম্পাদক সংস্করণ:

আপনি যদি পাঠ্যটি ইনলাইন সম্পাদনা করতে চান ,'\r',তবে printবিবৃতিটির শেষে যুক্ত করুন :

def p(a):print''.join(a)[::-1],'\r',

Comments

+1 খুব সুন্দর। প্রথম উত্তর যা প্রকৃত সম্পাদক বাস্তবায়িত করে, পূর্ব বিদ্যমান বিদ্যমান কার্যকারিতার উপর নির্ভর করার বিপরীতে। আমি এটি করার জন্য আরও একটি চ্যালেঞ্জ পোস্ট করার বিষয়ে বিবেচনা করছি।

— অ্যাডম

বাম এবং ডান জন্য অন্যান্য কী ব্যবহার করে আপনি কি বাইটগুলি সংরক্ষণ করতে পারবেন না?

— অ্যাডম

আমি চরিত্রগুলি হিসাবে -এবং +এটি হিসাবে অনুমান করতে পারতাম তবে সম্পাদক তখন সেই চরিত্রগুলি গ্রহণ করতে অক্ষম হবে

— ফিলিপ নারদী বাটিস্তা

কীভাবে \tএবং \v?

— অ্যাডম

এটাই ব্যবহারকারীর সমস্যা, না? নিয়ন্ত্রণ + কে, সম্ভবত?

— অ্যাডম

Answer 7

সি + এনসিউরাস, 573 বাইট

#include <curses.h>
i;j;k;s;c;p;int main(a,b)char**b;{char*q;char t[999];if(a&&(q=b[1]))while(*q)t[s++]=*q++;i=s;initscr();noecho();keypad(stdscr,1);do{for(j=0;j<i;j++)addch(t[j]);addch('|');for(j=i;t[j];j++)addch(t[j]);c=getch();switch(c){case KEY_LEFT:if(i)i--;break;case KEY_RIGHT:if(i<s)i++;break;case 8:case 127:case KEY_BACKSPACE:if(i){for(k=i-1;k<s;k++)t[k]=t[k+1];i--;s--;}break;case KEY_DC:if(i<s){for(k=i;k<s;k++)t[k]=t[k+1];s--;}break;default:if(c>31&c<127){for(k=s;k>i;k--)t[k]=t[k-1];t[i]=c;i++;s++;}}clear();}while(c!=10);printw(t);getch();endwin();return 0;}

পরীক্ষা

• সংকলন এবং ইনপুট দিয়ে চালান Just some text।

• বাম-তীর বোতামটি নয়বার টিপুন।

• মুছে ফেলা বোতামটি চারবার টিপুন।

• চাপুন aতারপর nতারপর y।

• Enterবন্ধ করতে টিপুন ।

বিশদ

#include <curses.h>

int main(int argc, char ** argv)
{
    char*q = 0;
    char t[999] = {0};
    int j = 0, k = 0;
    int i = 0; // cursor before first char
    int s = 0; // current size
    int c = 0; // current input
    int p = 0;

    // copy first command-line argument
    if(argc>0 && (q=argv[1]))while(*q)t[s++]=*q++; i=s;

    initscr(); // initiate NCURSES
    noecho(); // input does not echo on entry
    keypad(stdscr,TRUE); // handle all input

    do
    {
        // print current content with cursor
        for(j=0;j<i;j++) addch(t[j]);
        addch('|'); for(j=i;t[j];j++) addch(t[j]);

//      printw("\n\n> key %d pressed",c); // debug

        c = getch(); // read next char

        switch(c)
        {
            case KEY_LEFT: // left arrow; cursor left
            if(i > 0) i--;
            break;

            case KEY_RIGHT: // right arrow; cursor right
            if(i < s) i++;
            break;

            case 8: // backspace; remove previous char
            case 127:
            case KEY_BACKSPACE:
            if(i > 0)
            {
                for(k=i-1; k<s; k++) t[k]=t[k+1];
                i--;s--;
            }
            break;

            case KEY_DC: // delete; remove next char
            if(i < s)
            {
                for(k=i; k<s; k++) t[k]=t[k+1];
                s--;
            }
            break;

            default: // none of the above

            if(c > 31 && c < 127) // printable char
            {
                for(k=s; k>i; k--) t[k]=t[k-1];
                t[i] = c;i++;s++;
            }
        }

        clear(); // clear screen
        if(c == 10) break;
    }
    while(c);

    addch('\n');
    printw(t); // print final result
    getch(); // wait for any input
    endwin();
    return 0;
}

Comments

KEY_*কিছু বাইট সংরক্ষণের জন্য আপনি কি স্বতন্ত্র পূর্ণসংখ্যার দ্বারা প্রতিস্থাপন করতে পারবেন না ?

— সার্জিওল

Answer 8

ভিবিএস স্ক্রিপ্ট, 23 40 বাইট

MsgBox InputBox("",,Wscript.Arguments(0))

Answer 9

সি #, 53 বাইট

s=>{SendKeys.SendWait(s);return Console.ReadLine();};

যেখানে sপরিবর্তন করতে একটি স্ট্রিং এবং আউটপুট হল নতুন মান।

সেন্ডকিস.সেন্ডওয়েট : প্রদত্ত কীগুলি সক্রিয় অ্যাপ্লিকেশনে প্রেরণ করে এবং তারপরে বার্তাগুলি প্রক্রিয়া করার জন্য অপেক্ষা করে।

বা by৪ বাইট যদি আমরা উইন্ডোজ ফর্ম প্রসঙ্গে না থাকি:

s=>{System.Windows.Forms.SendKeys.SendWait(s);return Console.ReadLine();};

Answer 10

রুবি, 9 19 22 84 বাইট

->s{r=Readline;r.pre_input_hook=->{r.insert_text s;r.redisplay};r.readline}

এটি একটি রিডলাইন প্রাক ইনপুট হুক তৈরি করে যা পাঠ্যগুলি সন্নিবেশ করে এবং তারপরে পুনরায় প্রদর্শন করে is এর পরে, আইআরবি বিভ্রান্ত হয়ে যায় তাই এটি কোনও ফাইল থেকে চালানো নিশ্চিত করুন। ল্যাম্বদা হিসাবে চালান, এটি আর্গুমেন্ট হিসাবে ইনপুট স্ট্রিং নেয় এবং আউটপুট স্ট্রিং প্রদান করে।

puts Readline.readline

লাইন সম্পাদনা সম্পাদনের জন্য এটি পঠন পাঠাগারটি ব্যবহার করে। আমার আগের উত্তরটি কেবল ব্যাকস্পেসের অনুমতি দিয়েছে।

puts gets

এটি সত্যই সত্যই স্ব-বর্ণনামূলক।

সম্পাদনা: আমাকে একটি ব্যাখ্যা জিজ্ঞাসা করা হয়েছে। এটি সমান puts(gets)। getsএকটি লাইন সম্পাদকের সাথে একটি স্ট্রিং ইনপুট করে। putsএটি আউটপুট।

Comments

পদ্ধতিটি কল করুন: r.insert_text(s).redisplayএবং নিম্নলিখিতগুলি সরিয়ে দিন ;। বিটিডাব্লু, আমি যেমন আমাদের নীতিটি বুঝতে পারি, আপনার উল্লেখ করা উচিত যে আপনার কোডটি চালু আছে irb, কারণ অন্যথায় Readlineআপনার কোডের প্রয়োজন হবে ।

— manatwork

Answer 11

পিএইচপি + এইচটিএমএল, 26 বাইট

<input value=<?=$_GET[0]?>

ব্রাউজারটি স্বয়ংক্রিয়ভাবে ক্লোজিং ট্যাগ যুক্ত করে

G _GEThttp://example.com?0=input এইচটিএমএল ইনপুট তৈরির মতো ইউআরএল ব্যবহার করে<input value=input

এবং এটি স্ট্রিং ইনপুট জন্য আউটপুট

<input value=input

Comments

আমার কি এই কাজগুলি ধরে নেওয়া উচিত? হতে পারে আপনি কোনও ব্যাখ্যা, বা লিঙ্ক, বা অ্যানিমেশন যুক্ত করতে পারেন?

— অ্যাডম

@ অ্যাডম হ্যাঁ আপনি এটি ধরে নিতে পারেন সম্ভবত আপনি এটির উন্নতি করতে এবং autofocusএর শুরুতে কার্সারটি দেওয়ার জন্য বৈশিষ্ট্যটি সেট করবেন । অন্যান্য এইচটিএমএল উপাদানগুলিও আপনি সম্পাদনা করতে পারবেন যদি আপনি বৈশিষ্ট্যটি সেট করেনcontenteditable

— Jörg Hülsermann

ইনপুট =test></input><script>alert("Hi");//some malicious code\n</script>

— রোমান গ্রাফ

@ রোমানগ্রাফ খারাপ ছেলে। হ্যাঁ জাভাস্ক্রিপ্ট ফিল্টার করা ভাল

— জার্গ হালসারম্যান

Answer 12

টিসিএল, 17

puts [gets stdin]

অনলাইন দোভাষীগণ এটি প্রদর্শনের জন্য কেবল স্তন্যপান করেন, তারপরে আমি উইন্ডোজ কমান্ড শেল থেকে কিছু চিত্র প্রদর্শন করি:

পরীক্ষার মামলা ১

পরীক্ষার মামলা 2

Comments

আপনি এই এক ব্যাখ্যা করতে পারেন?

— অ্যাডম

আমি এর উইন্ডোজ কমান্ড লাইনে চলমান চিত্রগুলি যুক্ত করতে পারি।

— সার্জিওল

@ অ্যাডেম: আপনি কী চান কোডটি কী করছে বা চিত্রগুলি যথেষ্ট তা আমি এখনও বোঝাতে চাই?

— sergiol

এটা যথেষ্ট.

— অ্যাডম

Answer 13

এএইচকে , 32 বাইট

InputBox,s,,,,,,,,,,%1%
Send,%s%

InputBoxভেরিয়েবল হিসাবে টাইপ করা যাহা কিছু সঞ্চয় করে এবং ভেরিয়েবলের sপ্রারম্ভিক প্রম্পট দেয় 1যা প্রথম পাস হওয়া প্যারামিটার।
Sendবর্তমান উইন্ডোতে কীস্ট্রোক প্রেরণ করে। এই ক্ষেত্রে, এটির বিষয়বস্তু হবে s।
MsgBoxগল্ফিংয়ের জন্য একটি বিকল্প ছিল তবে Sendএটি 2 বাইট সংক্ষিপ্ত।

Comments

@ অ্যাডাম আমি সেই অংশটি ভুলভাবে লিখছি। আমি উত্তর আপডেট করেছি।

— ইঞ্জিনিয়ার টোস্ট

এখন এটা ভাল।

— অ্যাডম

Answer 14

এক্সেল ভিবিএ তাত্ক্ষণিক উইন্ডো কমান্ড - 22 বাইট

[a1]=inputbox(0,,[a1])

Comments

এটি কেবলমাত্র একটি আংশিক সমাধান, কারণ আপনার প্রাথমিক মান ("হাই") হার্ড-কোডেড। প্রাথমিক মানটি কোথাও (একটি ঘর বা প্রম্পট বা একটি ফাইল ...) থেকে পড়তে হবে এবং চূড়ান্ত মানটি অবশ্যই কোথাও স্থাপন করতে হবে (একটি ঘর, একটি বার্তা বাক্স, একটি ফাইল, ...)।

— Adám

inputbox(0,,"Hi")একটি বাইট সংরক্ষণ করুন

— ফিলিপ নারদী

@ অ্যাডম ধন্যবাদ স্থির এখন এটি সেল এ 1 থেকে পড়ছে

— রোহান

আমার মনে হয় আপনার দরকার [a1]=inputbox(0,,[a1])বা কিছু দরকার , অন্যথায়, কোথায় aযায়? কোনও ভেরিয়েবলে সংরক্ষণ করা কোনও বৈধ আউটপুট পদ্ধতি নয় ।

— অ্যাডাম

এটি এটি কোষ এ 1 থেকে এসেছিল

— রোহান

Answer 15

জেডএক্স স্পেকট্রাম বেসিক, 7 বাইট

তুচ্ছ, সম্পূর্ণতার জন্য অন্তর্ভুক্ত ( INPUTএবং PRINTপ্রতিটি বাইট টোকেন হয়)।

INPUT a$: PRINT a$

Comments

এটির প্রাথমিক মান কীভাবে পাওয়া যায় a$?

— অ্যাডম

@ অ্যাডম এটি a$কীবোর্ড ইনপুট দ্বারা প্রাথমিক মান পায় ; a$মূলশব্দ দিয়ে অতিরিক্ত লেখা হবে INPUT।

— শান বেবারস

Answer 16

স্মাইলব্যাসিক, 138 বাইট

DEF E S@L
WAIT
B=BUTTON(1)C=C-(B==4&&C)+(B>7&&C<LEN(S))I$=INKEY$()IF"\u0008"<I$THEN B=I$<"\u000E"S=SUBST$(S,C,B,I$*!B)?S?" "*C;1IF"\u0008"!=I$GOTO@L
END

E1 টি আর্গুমেন্ট এবং 0 আউটপুট দিয়ে একটি ফাংশন তৈরি করে । (আউটপুট কনসোলে প্রদর্শিত হবে)

পালানো অক্ষরগুলি প্রকৃত প্রতীক হওয়া উচিত, তবে তারা এখানে প্রদর্শিত হবে না।

নিয়ন্ত্রণ:

Normal keys: Insert a character before the cursor.
Enter: Delete the character at the cursor.
Backspace: Submit.
D-pad left: Move cursor left.
All buttons except up, down, and left on the d-pad: Move cursor right.

অক্ষর সন্নিবেশ / মোছা পিছনের দিকে তাই এটি ব্যবহার করা খুব বিরক্তিকর (তবে এখনও প্রয়োজনীয়তাগুলি পূরণ করতে হবে)।

Just some text
1             
'(press right 5 times)
Just some text
     1
'(press enter 4 times)
Just  text
     1
'(press a)
Just a text
     1
'(press right)
Just a text
      1
'(...)
Just any text
       1
'(press backspace)

Answer 17

উইন্ডোজ কমান্ড ইন্টারপ্রেটার, 16 বাইট

set/pa=
echo %a%

এটি অত্যন্ত তুচ্ছ; কমান্ড ইন্টারপ্রেটার তুচ্ছভাবে একটি "লাইন সম্পাদক"।

Answer 18

কমোডোর বেসিক (সি 64 মিনি, সি 64/128, ভিসি -20 ইত্যাদি ...) 179 টোকেনযুক্ত বেসিক বাইট

এটি ব্যবসায়ের মোডে টাইপ করা উচিত (আপার / লোয়ার কেস অক্ষর)

 0a$="Just some text":?"{SHIFT+CLR/HOME}"a$"_":fOi=0to1step0:getk$:on-(k$<>"")goS2:goS1:nE
 1?"{CTRL+N}{CLR/HOME}"a$"_  ";:return
 2ifasc(k$)<>20thena$=a$+k$:on-(asc(k$)=13)goS4:return
 3if-(len(a$))thena$=leF(a$,len(a$)-1):goS4:return
 4?"{ARROW LEFT}{ARROW LEFT}{ARROW LEFT}  ":return

বেসিক পাঠ্য সম্পাদনা + মুছে ফেলুন + নতুন লাইন মঞ্জুরি দেয়। a$কমোডোর বেসিকের সমস্ত স্ট্রিংয়ের সর্বাধিক আকার 255 টি অক্ষর, সুতরাং এর চেয়ে আর কোনও প্রোগ্রাম ক্র্যাশ করবে। যদি প্রয়োজন হয় তবে আমি 255 অক্ষর করার একটি উপায় খুঁজে পাব।