В: рядок без розривів рядків *
Дозволити користувачеві редагувати та надсилати рядок
Вихід: модифікована рядок (необов'язково із заднім рядком)

Редактор рядків повинен як мінімум дозволяти користувачеві:

1. перемістити видимий курсор вліво і вправо

2. вставити та / або перезаписати символи на позиції курсору

3. видалити символи в позиції курсору

4. подати новий рядок, тобто припинити редагування, тому що змінений рядок буде повернутий / надрукований / відображений / збережений… (без іншого тексту)

Оцінено, але не потрібно:

• пояснення вашого коду.

• посилання на веб-сайт для тестування, який може продемонструвати вашу програму / функцію

• анімоване зображення, що демонструє використання (TIO, наприклад, не дозволяє взаємодія)

Примітка:

• прив'язки клавіш - лише пропозиції

• GUI або візуальний стиль не потрібно

Приклади

Далі курсор зображено с _.

В: Just some text
Дозволити користувачеві редагувати:
 Just some text_  Користувач натискає ←(ліва клавіша зі стрілкою) дев'ять разів
 Just ̲some text  Користувач натискає Delчотири рази
 Just ̲ text  Користувач натискає  Користувач натискає :any
 Just any_text Enter
Just any text

В: Remove me
Дозволити користувачеві редагувати:
 Remove me_  Користувач натискає Backspaceдев'ять разів
 _  Користувач натискає : (порожній рядок)Enter
 

* Щоб запобігти тривіальним рішенням редактора, це повинно або надаватися за допомогою іншого способу введення, ніж команди редагування, або бути відокремленим від них новим рядком або подібним.

APL (Dyalog) , 5 байт

⍞←⍞⋄⍞

Це tradfn, тому, щоб його використовувати, зробіть

∇a
⍞←⍞⋄⍞
∇

А потім зателефонуйте, використовуючи a, після чого ви подаєте початковий рядок, а потім зможете редагувати рядок.

JavaScript (ES6), 15 14 байт

Я не розумію, чому це отримує так багато відгуків!

s=>prompt(s,s)

Збережено байт завдяки пропозиції Адама , щоб я відображав оригінальний вхід у prompt.

Спробуй це

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

Bash 4.x, 25 символів

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

Проба зразка:

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

(У другому рядку вище було інтерактивне редагування, у рядку 3 - результат результату тексту.)

Bash + Vi / Vim, 14 байт

echo $1>a;vi a

viє псевдонімом vimна MacOS, я не знаю про інших операційних системах.

HTML + JavaScript (ES6), 77 66 64 байт

HTML

<input id=t

JavaScript

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>

Python 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]), виключаючи та вставляючи символи в цей перевернутий вхід, щоб курсор не мав рухатися. Знову повертається під час друку.

Використання:

[Tab] для переміщення вправо
[Ctrl + C] для переміщення вліво
[Backspace] для видалення
[Return] для завершення редагування
Будь-яка інша клавіша буде вставлена ​​в текст

Приклад:

На прикладі ОП

В: 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',

C + NCURSES, 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;
}

VBScript, 23 40 байт

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

C #, 53 байти

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

Де sслід змінити рядок, а вихід - нове значення.

SendKeys.SendWait : надсилає задані ключі активній програмі, а потім чекає, коли повідомлення будуть оброблені.

або 74 байти, якщо ми не в контексті Windows Forms:

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

Рубі, 9 19 22 84 байт

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

Це створює гачок попереднього введення Readline, який вставляє текст s і потім повторно відображає. Після цього irb заплутається, тому переконайтеся, що запустити це з файлу. Запускається як лямбда, він приймає рядок введення як аргумент і повертає вихідний рядок.

puts Readline.readline

При цьому використовується бібліотека Readline для редагування рядків. Моя попередня відповідь дозволяла лише зворотні простори.

puts gets

Це дійсно, справді само собою пояснюється.

Редагувати: мене попросили пояснити. Це еквівалентно puts(gets). getsвводить рядок за допомогою редактора рядків. putsвиводить його.

PHP + HTML, 26 байт

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

Браузер автоматично додає тег, що закривається

$ _GET Використання URL-адреси, такої як http://example.com?0=inputвведення створюється в HTML<input value=input

І це вихід для рядкового вводу

<input value=input

Tcl, 17

puts [gets stdin]

Онлайн-перекладачі просто смокчуть, щоб продемонструвати це, тоді я демонструю кілька зображень із командної оболонки Windows:

Тестовий випадок 1

Тестовий випадок 2

AHK , 32 байти

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

InputBoxзберігає те, що вводиться як змінну, sі дає початковий запит змінної, 1яка є першим переданим параметром.
Sendнадсилає натискання клавіш на поточне вікно. У цьому випадку це буде вміст s.
MsgBoxбув варіант, але для гри в гольф на Send2 байти коротше.

Команда негайних вікон Excel VBA - 22 байти

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

ZX Spectrum BASIC, 7 байт

Тривіальний, що додається для повноти ( INPUTі PRINTє одним байтовим жетоном кожен).

INPUT a$: PRINT a$

SmileBASIC, 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

Створює функцію Eз 1 аргументом та 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)

Інтерпретатор команд Windows, 16 байт

set/pa=
echo %a%

Це дуже банально; інтерпретатор команд є тривіально "редактором рядків".

Commodore BASIC (C64Mini, C64 / 128, VIC-20 тощо) 179 токенізованих байків BASIC

Це слід вводити в бізнес-режимі (великі та малі символи)

 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$як і всі рядки в Commodore BASIC, становить 255 символів, тому будь-який більше, ніж це, призведе до збою програми. Я знайду спосіб зробити> 255 символів, якщо це необхідно.