[1.7.10] ComputerCraft [1.74]

Написал свою реализацию read(), назвал её smart_read

На сколько я понял Апокалипса, таким образом событие, перехваченное основной программой, передается в сопрограмму.

Подозреваю, что smart_read планируется для реализации многооконного ввода с которого всё и началось. Тогда у меня вопрос, а зачем обрабатываются события типа CTRL+клавиша?

функция завершения ввода по какой-то кнопке... я не знаю куда это приткнуть

Я бы выбрал read.

Зачем ты ловишь key, а потом char, если не реализуешь ctrl?

local event,key=os[paste][/paste]pullEvent("key")	os[paste][/paste]startTimer(0[paste][/paste]1)	local event2,key2=os[paste][/paste]pullEvent()

if event2 ~= "timer" then event,key=event2,key2 end

Курсор не мигает из-за цикла

И текст больше длины экрана не введешь.

Когда нажимается клавиша, и если она букв-цифр то происходит два события(key, char), одно за другим.

local event,key=os[paste][/paste]pullEvent("key")   os[paste][/paste]startTimer(0[paste][/paste]1)   local event2,key2=os[paste][/paste]pullEvent()

if event2 ~= "timer" then event,key=event2,key2 end

e, p1 = os[paste][/paste]pullEvent("key")name = keys[paste][/paste]getName(p1)if name and string[paste][/paste]len(name) == 1 then  e = "char"  p1 = nameend

Да, спасибо, что объяснил мне то, что я объяснял тебе.

Ты используешь код, который я писал для обработки ctrl, но не для того.

Можно сделать проще и быстрее:

Это понятно, но зачем? Ведь user, и pass не принимают значения, зачем им их передавать?

На сколько я понял Апокалипса, таким образом событие, перехваченное основной программой, передается в сопрограмму.

user = coroutine[paste][/paste]create(  function()    return read()   end)

Это понятно, но зачем? Ведь user, и pass не принимают значения, зачем им их передавать?

Ага, благодарю, теперь всё понятно.

Хочу посмотреть, как она устроенна.

function read( _sFormat )	if _sFormat and _sFormat ~= "*l" then		error( "Unsupported format" )	end	return _G[paste][/paste]read()end

private Varargs ioread(IoLib[paste][/paste]File var1, Varargs var2) throws IOException {      int var4 = var2[paste][/paste]narg();      LuaValue[] var5 = new LuaValue[var4];      int var3 = 0;      while(true) {         if(var3 < var4) {            LuaValue var7;            LuaValue var6;            label32:            switch((var6 = var2[paste][/paste]arg(var3 + 1))[paste][/paste]type()) {            case 3:               var7 = freadbytes(var1, var6[paste][/paste]toint());               break;            case 4:               LuaString var8 = var6[paste][/paste]checkstring();               if(var8[paste][/paste]m_length == 2 && var8[paste][/paste]m_bytes[var8[paste][/paste]m_offset] == 42) {                  switch(var8[paste][/paste]m_bytes[var8[paste][/paste]m_offset + 1]) {                  case 97:                     var7 = freadall(var1);                     break label32;                  case 108:                     var7 = freadline(var1);                     break label32;                  case 110:                     var7 = freadnumber(var1);                     break label32;                  }               }            default:               return argerror(var3 + 1, "(invalid format)");            }            if(!(var5[var3++] = var7)[paste][/paste]isnil()) {               continue;            }         }         return (Varargs)(var3 == 0?NIL:varargsOf(var5, 0, var3));      }   }

Любые значение переданные после нити в resume выбрасывают событие.

function foo(a)  while true do    print('arg: '[paste][/paste][paste][/paste]a)    e = os[paste][/paste]pullEvent()    print('event: '[paste][/paste][paste][/paste]e)  endendrou = coroutine[paste][/paste]create(foo)coroutine[paste][/paste]resume(rou, 'is_arg')coroutine[paste][/paste]resume(rou, 'is_event')coroutine[paste][/paste]resume(rou, 'is_event_too')

>arg: is_arg>event: is_event>arg: is_arg>event: is_event_too

while true doturtle[paste][/paste]attack()sleep(0)end

Привет апокалипсис слушай составь программу что бы можно было выйти из золотого компа и на улучшенном мониторе играть в worm

и что бы время показывалось на мониторе время с обновлением

while true do    term[paste][/paste]clearLine()    write(textutils[paste][/paste]formatTime(os[paste][/paste]time(), true))    sleep(1)end