[01:08:48] <vаlexey__> во, тут у мну есть рашн кейлейблс
[01:08:57] <vаlexey__> старый добрый виндоноут.
[01:09:06] <vаlexey__> не очень добрый конечно, но старый.
[01:09:37] <vаlexey__> короче, в этом говне под названием Oberon, точнее Astrobe похоже мегапроцедура INC работает баговано :-)
[01:10:48] <TRUE> а чего это админов больше, чем людей?
[01:11:03] <vаlexey__> потому чта я с нескольких компов
[01:11:17] <TRUE> уехал из полицейской России, чтобы организовать своё полицейское государство?
[01:12:09] <vаlexey__> а кто сказал что я не в полицейском государстве? это вообще весьма распространенный тип государств :-)
[01:12:14] <TRUE> один с ноута, а второй с телефона?
[01:13:32] <vаlexey__> один с десктопа, другой с ноута. временно включил старый виндоноут.
[01:13:43] <vаlexey__> так, ща будет клеветы. готовьтесь.
[01:13:58] <TRUE> так-то оно так, распространённый. Но помнится мне, что кто-то там говорил про любовь к свободному ПО, свободе в чатах и на форумах.
[01:14:07] <TRUE> я первый : )
[01:16:37] <vаlexey__> форумов - да, а это чят никогда свободным не был :-)
[01:16:56] <vаlexey__> Короче, кот:
[01:16:59] <vаlexey__> PROCEDURE Run;
VAR
 i : BYTE;
BEGIN
 i := 0;
 WHILE TRUE DO
   Out.Int(i, 4);
   i := i+1;
   Timer.MSecDelay(100)
 END;
END Run;

[01:17:07] <vаlexey__> Выдает в сериал порт следующее:
[01:17:24] <vаlexey__>   0   1   2   3   4   5   6   7   8   9  10  11  12  13  14  15  16  1  18  19  20  21  22  23  24  25  26  27  28  29  31  32  33  34  35  36  37  38  39  40  41  42  43  44  45  46  47  48  49  50  51  52  53  55  56  57  58  59  60  61  62  63  64  65  66    68  69  70  71  72  73  74  75  76  77  7879  80  81  82  83  84  85  86  87  88  89  90  91  92  93  94  95  96  97  98  99 100 101 102 103 10405 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 167 168 169 170 171 172 173 174 175 176 177 178 179 18 181 182 183 184 185 186 187 188 189 190 191  193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 217 218 219 220 221 222 223 224 225 226 227 229 230 231 232 233 234 235 236 237 238 239 240 242 243 244 245 246 247 248 249 250 251 252 253 254 255   

[01:17:42] <vаlexey__> Что является более-менее нормальным, ожидаемым выхлопом.
[01:18:06] <vаlexey__> А теперь добавим ножек, получился скотоложек. В смысле, заменим i := i+1; на логичный и понятный INC(i):
[01:18:30] <vаlexey__> PROCEDURE Run;
VAR
 i : BYTE;
BEGIN
 i := 0;
 WHILE TRUE DO
   Out.Int(i, 4);
   INC(i);
   Timer.MSecDelay(100)
 END;
END Run;
[01:18:50] <vаlexey__>   0   0  33 192   1   1  34 193   2   2  35 194   3   3  36 195   4   4  37 196   5   5  38 197   6   6  39 198   7   7  40 199   8   8  41 200   9   9  42 201  10  10  43 202  11  11  44 203  12  12  45 204  13  13  46 205  14  14  47 206  15  15  48 207  16  16  49 208  17  17  50 209  18  18  51 210  19  19  52 211  20  20  53 212  21  21  54 213  22  22  55 214  23  23  56 215  24  24  57 216  25  25  58 217  26  26  59 218  27  27  60 219  28  28  61 220  29  29  62 221  30  30  63 222  31  31  64 223  32  32  65 224  33  33  66 225  34  34  67 226  35  35   227  36  36  69 228  37  37  70 229  38  38  71 23  39  39  72 231  40  40  73 232  41  41  74 233  42  42  75 234  43  43  76 235  44  44  77 236  45  45  78 237  46  46  79 238  47  47  80 239  48  48  81 240  49  49  82 241  50  50  83 242  51  84 243  52  52  85 244  53  53  86 245  54   87 246  55  55  88 247  56  56  89 248  57  90 249  58  58  91 250  59  59  92 251  60  60  93 252  61  61  94 253  62  62  95 254  63   2  64  64  98   0  65  65  99   1  66 100   2  67  67 101   3  68  68 102   4  69  69   5  70  70 104   6  71  71 105   7  72  72 106  73  73 107   9  74  74 108  10  75  75 109  76  76 110  12  77  77 111  13  78  78 112  14  79 113  15  80  80 114  16  81  81 115  17  82  82 116  18  83  83 117  19  84  84 118  20  85  85 119
[01:19:13] <vаlexey__> Крута? :-)
[01:21:45] <TRUE> из первого
>29  31
>53  55
>66    68
>215 217
>227 229
>240 242
но, возможно, ты плохо копировал
[01:22:44] <vаlexey__> или терминал говно :-)
[01:22:51] <vаlexey__> но это не столь важно
[01:22:53] <TRUE> из второго: последовательность проглядывается, но она не та
[01:23:02] <TRUE> ... что можно было ожидать
[01:23:05] <vаlexey__> важно, что во втором совсем трешак
[01:24:04] <vаlexey__> более того, этот трешак не в записи в Serial, а именно в инкременте. Ибо если я просто этот байт начинаю слать в последовательный порт as is, то трешак остается ровно тем же.
[01:28:01] <vаlexey__> И вот как после такого Оберон хоть где-то предлагать в продакшн? :-)
[01:28:34] <TRUE> а в сишных компиляторах такого не бывает?
[01:28:40] <vаlexey__> не видел ни разу.
[01:28:46] <vаlexey__> чтобы вот настолько на ровном месте...
[01:29:00] <TRUE> а если в цикле дважды делать инкремент?
[01:29:27] <vаlexey__> ща
[01:29:34] <TRUE> или вообще не в цикле, а последовательность INC (); Out(); INC()...
[01:29:56] <TRUE> и исходников инка нету, да?
[01:30:03] <vаlexey__> нету
[01:30:11] <vаlexey__> это ж вообще компилятора кусок
[01:30:21] <TRUE> да, я понимаю
[01:30:26] <vаlexey__> а компилятор проприентарный, на шарпах писаный.
[01:30:30] <vаlexey__> :-)
[01:30:32] <TRUE> но мало ли...
[01:31:00] <vаlexey__> можно будет попробовать дизасм потом сделать
[01:31:04] <vаlexey__> но сейчас некогда заниматься
[01:31:12] <TRUE> кстати, а если инкрементить не байт, а интеджер?
[01:31:34] <vаlexey__>    0   33    1   34    2   35    3   36    4   37    5   38    6   39    7   40    8   41    9   42   10   43   11   44   12   45   13   46   14   47   15   48   16   49   17   50   18   51   19   5220   53   21   54   22   55   23   56   24   57   25   58   26   59   27   60   28   61   29   62   30   63   31   64   32   65   33   66   34   67   35   68   36   69   37   70   38   71   39   40   73   41   74   42   75   43   76   44   77   45   78   79   47   80   48   81   49   82   50   83   51   84   52   85   53   86   54   87   55   88   56   89   57   90   58
[01:31:57] <vаlexey__> Это вот такой кот:
[01:31:59] <vаlexey__> PROCEDURE Run;
VAR
 i : BYTE;
BEGIN
 i := 0;
 WHILE TRUE DO
   Out.Int(i, 5);
   (* i := i+1; *)
   INC(i);
   INC(i);
   Timer.MSecDelay(100)
 END;
END Run;

[01:32:15] <vаlexey__> подозреваю что с интом будет кошерней.
[01:32:17] <vаlexey__> хотя хз
[01:32:19] <vаlexey__> щща
[01:33:03] <vаlexey__> да, с интом все ок
[01:34:33] <TRUE> может, в астробе есть приписка маленьким шрифтом, что байт не используется в арифметических операциях?
[01:35:25] <vаlexey__> почему ошибки компиляции тогда нет?
[01:35:31] <TRUE> но если честно, то я никогда бы на эту ошибку не нарвался: я не люблю использовать INC и DEC
[01:36:01] <vаlexey__> ну, это мир микроконтроллеров. думаю, дай заюзаю INC - может компилятор более оптимальный кот сгенерит
[01:36:12] <vаlexey__> не даром же оно в языке есть!
[01:36:55] <vаlexey__> вообще, начал тогда писать под ББ. И сразу нарвался на ошибку компилятора + на "особенности" среды.
[01:37:14] <TRUE> не вижу пользы от этой штуки. Оптимизация i := i + 1 - это самое простое и самое первое, что можно сделать в кодогенераторе. Смысла в псевдофункции не вижу.
[01:37:15] <vаlexey__> И тут тоже вот, только начал, и сразу фигак. Ошибка компилятора + радости с Serial-модулем
[01:37:33] <vаlexey__> Ну, на тему смысла - это к Вирту :-)
[01:38:30] <TRUE> а что за микроконтроллер?
[01:38:39] <TRUE> а, ардуина?
[01:39:18] <vаlexey__> ни
[01:39:37] <vаlexey__> арадруина астробой не поддерживается - туда оберон совсем не влазит
[01:39:53] <vаlexey__> не живет оберон без большого напильника на 8битных платформах :-)
[01:39:57] <vаlexey__> да и на 16 тоже не живет
[01:40:03] <vаlexey__> у меня тут АРМ
[01:40:21] <vаlexey__> мелкий
[01:40:27] <vаlexey__> щща на борду ссыль дам
[01:40:57] <TRUE> лаунчпад?
[01:41:39] <vаlexey__> в msp430 оберон тоже не влазит, ибо 16 бит там только :-)
[01:42:04] <TRUE> vаlexey__> не живет оберон без большого напильника на 8битных платформах :-)
на самом деле виноват во всём не Оберон, а богомерзкий шарп
[01:42:33] <vаlexey__> http://www.digikey.com/product-detail/en/EA-EDU-009/EA-EDU-009-ND/2683650
[01:42:46] <vаlexey__> э? а шарп тут каким местом
[01:42:48] <vаlexey__> ?
[01:42:50] <TRUE> если бы компилятор был написан на самом себе, то всё летало бы как часы
[01:43:43] <vаlexey__> да не. оно вполне себе летает, когда не багует :-)
[01:43:51] <vаlexey__> ну, то есть я связи не вижу
[01:44:03] <vаlexey__> код довольно компактный генерится
[01:44:07] <TRUE> о, на ней даже один разряд под цифру имеется...
[01:44:25] <vаlexey__> алсо ты же понимаешь, что один фиг он бы сам собой не собирался бы никогда
[01:44:36] <vаlexey__> ибо в целевую платформу просто компилятор не влезет ну никак
[01:44:51] <TRUE> это если однопроходной...
[01:45:05] <vаlexey__> то есть под x86 оно бы не баговало, а на МК баговало бы.
[01:45:31] <vаlexey__> хотя да, по бенчмаркам этот МК в линейном забеге пошустрее чем виртов комп будет :-)
[01:45:38] <TRUE> а эта плата для какого-то нового проекта или это прдолжение старого?
[01:45:39] <vаlexey__> в плане числодробления.
[01:46:24] <vаlexey__> старого. потребовалось тут сделать одну штуку чтобы проверить другую штуку, вот думаю возьму щща астробу, чтобы монструозные IDE не вкорячивать, и быстренько налабаю. ибо фигли там делать - 30 строк кота.
[01:46:50] <vаlexey__> ну и платка эта под рукой оказалась. характеристики вроде как подошли вполне.
[01:47:14] <vаlexey__> (скажем msp430 launchpad уже не подходит, у него UART нужные скорости не держит)
[01:49:44] <vаlexey__> и, кстати, официально вроде под эту плату уже астробу не купить даже.
[01:50:00] <vаlexey__> ну и вообще аффтар отказался от практики триальных бесплатных версий.
[01:51:27] <vаlexey__> а, не, не отказался
[01:51:36] <vаlexey__> но для этой платы уже всё. не поддерживается.
[01:51:47] <vаlexey__> ни багфиксов, нифига тебе.
[01:57:06] <vаlexey__> ну, то есть наверно да, Оберон за счет простоты упрощает задачу системщика который делает софт для делания софта, но упрощает эту задачу не настолько, чтобы компенсировать недостаток ресурсов на развитие системного софта вызванного бедностью Оберона как языка для прикладника.
[02:00:43] <vаlexey__> насколько я понимаю, Крис в одиночку ваяет этот Astrobe от начала и до конца. Удивительно что у него вообще удается на плаву держаться.
[02:01:45] <vаlexey__> впрочем, он не только обероном жив, насколько я вижу
[02:02:43] <vаlexey__> да, и возможно он таки на GPCP ваяет свои продукты все. В том числе и Astrobe
[02:04:30] <vаlexey__> кстати, в Astrobe похоже еще и терминал встроенный в IDE который позволяет смотреть что там выдает плата на ком-порт, глючный.
[02:04:46] <vаlexey__> Получил тонну данных с putty - там косяков нет. А в Терминале этом - есть.
[02:04:58] <vаlexey__> Буковки слипаются, буквы теряются и проч.
[02:43:36] <vlad2> Да, жирные клеветы получились... :)
[02:44:44] <vаlexey__> в общем, не продакшн реди :-)
[02:44:59] <vаlexey__> но на поиграццо конечно сойдет. если получится спиратить :-)
[02:45:12] <vаlexey__> платить за ЭТО деньги как-то не того.
[02:46:03] <vаlexey__> для коммерческого использования - 300 баксов стоит.
[02:48:07] <vlad2> Кстати, оптимизить INC таки проще как только дело доходит не до тривиального INC(i), а INC(r1.r2.i).
[02:48:19] <vlad2> Ну и запись намного понятнее.
[02:48:56] <vlad2> Другой вопрос, что никто ж не мешает сделать += в язык, вместо этих INC...
[02:49:05] <vаlexey__> и ++ :-)
[02:49:17] <vlad2> += 1 опимизился бы легко
[02:49:45] <vlad2> Ну ++ это уже вообще сахар сахарный ;)
[02:49:58] <vаlexey__> ну, этта.. не совсем таки сахр то!
[02:50:04] <vаlexey__> i++ и ++i ибо
[02:50:11] <vаlexey__> и это непосредственно вроде как в асм шло
[02:50:15] <vаlexey__> PDP-11 :-)
[02:50:26] <vаlexey__> то есть оно ровно из этого асма и вышло
[02:51:00] <vlad2> постфиксный инкремент это вообще за пределами виртовской вселенной :) Черная материя...
[02:51:21] <vаlexey__> /me теперь ищет как считать ТАЙМЕР
[02:52:13] <vаlexey__> вот мне нужно крутиться в цикле пока не случится час Ч.
[02:52:39] <vаlexey__> Просто захардкоженый Sleep(N) не катит, ибо код каждый раз разное время жрет который исполняется.
[02:53:08] <vаlexey__> И вот что предлагает Astrobe для работы со временем:
[02:53:12] <vаlexey__> DEFINITION MODULE Timer;

IMPORT LPC, SYSTEM;

CONST
 uSecs* = TRUE;
 MSecs* = FALSE;

 PROCEDURE* uSecDelay*(delay: INTEGER);

 PROCEDURE* MSecDelay*(delay: INTEGER);

 PROCEDURE Init*(units: BOOLEAN);

 PROCEDURE* Start*;

 PROCEDURE* Stop*;

 PROCEDURE* Elapsed*(): INTEGER;

END Timer.
[02:53:33] <vаlexey__> И ни в чем себе не отказывай :-D
[02:54:32] <vlad2> :)
[02:55:03] <vаlexey__> то есть банально узнать сколько вот сейчас времени - нельзя
[02:55:21] <vаlexey__> узнать сколько прошло с момента Start без прерывания отсчета времени - тоже нельзя.
[02:55:45] <vаlexey__> Ну а то, что единицы выбираются с помощью BOOLEAN'a в Init - тоже нормально, ога :-)
[02:55:54] <vаlexey__> Интуитивно понятный тип!
[02:56:41] <vlad2> Ну зато ты точно знаешь, что их не больше 2-х!
[02:57:05] <vаlexey__> ДА!
[02:57:07] <vаlexey__> :-)
[02:57:36] <vаlexey__> - Вам миллисекунды, или секунды?
- Да.
[02:59:18] <vаlexey__> Ну а потом еще он введет наносекунды, и API придется сломать :-)
[03:05:10] <vаlexey__> а, есть еще модуль Clock
[03:05:18] <vаlexey__> но там с точностью до секунды :-)
[03:25:25] <vlad2> Ну, справедливости ради, в сишной либе со временем тоже не особо разбежишься...
[03:30:06] <vаlexey__> да, но тут то не стандартная либа, тут комплекс который продается за деньги и который поддерживает конкретные железяки
[03:30:11] <vаlexey__> это ж мир микроконтроллеров.
[03:30:54] <vаlexey__> и стоит эта фигня вполне себе на уровне других проф. решений. Ну, может не топовых типа IAR, но тем не менее.
[04:56:06] <vаlexey__> интересно, ком-порт (ака rs-232) умрет когда-нибудь?
[04:57:49] <vlad2> Зачем? :)
[04:58:03] <vlad2> USB слишком сложно.
[05:00:33] <vаlexey__> да вот я и думаю, что незачем :-)
[05:01:12] <vаlexey__> но вроде какие-то поползновения на тему выкорчевывания сериалорта даже из МК и промышленных дивайсов в пользу USB таки есть
[05:02:50] <vlad2> А вот интересно, что мешает скорость наростить... В смысле в случае эмуляции, когда из девайса все равно USB шнурок идет.
[05:03:36] <vlad2> Больше 115к
[05:04:15] <vаlexey__> ничего не мешает
[05:04:19] <vаlexey__> наращивают без проблем
[05:04:24] <vаlexey__> и до двух мегабит наращивают
[05:05:03] <vаlexey__> ну, понятно что все железки со всех сторон такие скорости должны уметь поддерживать.
[05:20:26] <sda> http://labas.livejournal.com/1132092.html
[05:28:04] <vаlexey__> политота...
[05:30:50] <vаlexey__> нинужна
[05:30:56] <vаlexey__> Вот вам лучше: http://www.esp8266.com/viewtopic.php?f=9&t=3861
[05:34:52] <vаlexey__> ну, вроде допинал оберонопрошивку. даже работает :-)
[05:51:43] <vlad2> Некромант!
[05:53:02] <vаlexey__> я на них не гадаю, я их люблю! :-)
[06:03:56] <vаlexey__> кстати, карантин у kpmy закончен, как понимаете. так что если появится - можно будет внести его в вайтлист :-)
[06:04:24] <vаlexey__> к сожалению я не помню какой он жид. а без знания жида в вайтлист занести никого нельзя
[06:12:50] <vаlexey__> О! Идея! Есть идея! :-) Как железяку усовершенствовать можно.
[06:12:52] <vаlexey__> Хехе.
[06:13:04] <vаlexey__> Надо будет заняться на днях.
[07:39:31] <geniepro> омг! валексей! ты восстал из мёртвых???
[07:41:43] <geniepro> Евреев тянет все подвигать
и улучшению подвергнуть,
и надо вовремя их выгнать,
чтоб неприятностей избегнуть.
[07:41:58] <geniepro> Летят года, остатки сладки,
и грех печалиться.
Как жизнь твоя? Она в поряде,
она кончается.
[07:42:12] <geniepro> губерман хоть и еврей, но иногда отжигает
[07:42:46] <geniepro> https://media.giphy.com/media/xT77XR3gI2c7NiDzEY/giphy.gif
[07:46:12] <geniepro> vlad2> От дилентанского "залить все нах эпоксидкой" тоже воздержусь.
ну и зря! я бы залил нах всё эпоксидкой!!!
[07:50:13] <geniepro> valexey> Our favorite topic: http://habrahabr.ru/company/ua-hosting/blog/274013/
хохляндия... растрелять!
[07:51:20] <geniepro> valexey> I think that some sort of cooperation with Elon Musk is needed. He has great technology for power supply (Tesla accumulator and so on).
сасямба без госдотаций ваш элон маск
[07:53:37] <geniepro> valexey> There is no Russian layout in my physical keyboard
use translit, Luke!
[07:56:51] <geniepro> TRUE> вот всегда вы так, русские. Понаехали в наши великие штаты, и вместо того, чтобы научиться говорить по-английски, придумываете дешёвые отмазки.
когда коренные британцы приезжают в штаты, местные пиндосы начинают их спрашивать -- "ты по английски говорить умеешь???"
[08:00:21] <geniepro> kpmy> Пейсыловский

есть такой журналист ташкентский, Евгений Скляревский, автор сайта arbuz.uz, когда-то в компьютерре пиарился вроде...
оказывается -- еврей! познера уважает, всё время еврейским новостям в фацебооке радуется...
куда катится мир???
[08:02:00] <geniepro> valexey> vlad2: It was easy because I had some changes in my life. And now I have different priorities.
всё-таки женился, что ли? таки подцепили на крючок... )))
[08:03:37] <geniepro> vlad2> Tro-lo-lo! Oberon has been named as "obstacle"!
блин, пришлось залезть в переводчик, что бы узнать что такое "obstacle"
[08:06:07] <geniepro> valexey> I should add at least geniepro and akastargazer to whitelist. But I don't remember theys JID.
так ты добавил меня в этой вайтлист? не было никакой капчи...

valexey> Yep. And now there are some changes: 1) any new participant now will be just a visitor. and he can't write anything to common chat. But he can write private message to me or you. And you or me can change his role to participant.
вот тебе и вся демократия наглосаксов! стоило валексею связаться с америкосами, как сам стал таким же "демократичным"...
[08:08:12] <geniepro> valexey> TRUE, vlad2 : kpmy had been removed from Partiticants only for a week. After that they will be added to members list. Anyway this is even not a ban. This is a RO mode for one week only. Yet.

ридонли режим и есть бан!
[08:13:55] <geniepro> valexey> This device is ~20 years old. I think that is ok for 1996-1998 year.
микросхемы мне там показались не настолько старыми, хотя хз, даты выпуска не видно же...
[08:15:28] <geniepro> valexey> No. In 80x there was no flash memory. It is very different solution.

В 1988 году Intel выпустила первый коммерческий флеш-чип NOR-типа.
NAND-тип флеш-памяти был анонсирован Toshiba в 1989 году на International Solid-State Circuits Conference.
[08:18:14] <geniepro> историю за прошлый год прочёл, чуть позже за этот почитаю )))
[08:36:09] <geniepro> _valexey_> "Пришел к тому что да Go - это готовая к применению реализация оберона, правда синтаксис немного извращенный. Буду изучать тогда."
напомните, в го есть модули?
[08:39:36] <geniepro> vlad2>  TRUE: о том, что религия в последнее время скорее набирает вес, чем искореняется.
это всё из-за романтизации монархического дореволюционного прошлого...
[08:41:56] <geniepro> valexey> https://qzprod.files.wordpress.com/2016/01/h_52499340.jpg?quality=80&strip=all&w=640
когда год назад расстреляли чарли хебдо, они просто ОБЯЗАНЫ были простебать самих себя и этот расстрел, но не сделали. сосунки они...
[08:43:45] <geniepro> Kemet> valexey, Купи уже наклейки на клаву с русским
эти накейки держаться несколько дней и отлетают
[08:44:24] <geniepro> valexey> HATE!
нате вам на лопате?
[08:46:08] <sda> суперклей
[08:46:13] <geniepro> valexey> http://www.viralchart.ru/Images1/Images/besit/1.jpg
о, это про Путина -- голубя с железными крильями? ))
[08:46:23] <geniepro> крыльями*
[08:50:09] <geniepro> s6> говорят в питоняке нет жита и это чистый интерпретатор
у питоняки есть компилятор в с++, а дальше чем хочешь компилируй в машкод
[09:00:37] <geniepro> sda> http://cdn.fishki.net/upload/post/201405/28/1272926/lang_voenka_s500.jpg  некоторые характеристики С-500, постепенно приближаемся к созданию своей ПРО...

так советской ПРО лет 50 уже, только защищала она одну Москву, а не была глобальной...
[09:02:35] <geniepro> TRUE> так-то оно так, распространённый. Но помнится мне, что кто-то там говорил про любовь к свободному ПО, свободе в чатах и на форумах.

ну он же написал -- с волками жить по волчьи блеять! вот он и заразился американизмом...
[09:04:32] <geniepro> vаlexey__> Крута? :-)
а ты им зарепортил баг?
[09:06:04] <geniepro> vаlexey__> а компилятор проприентарный, на шарпах писаный.
вот писали бы его на обероне... там были бы другие баги )
[09:12:38] <geniepro> CONST
uSecs* = TRUE;
MSecs* = FALSE;

не понимаю, зачем делать паузы в мегасекунды??? о_О а если имелись в виду миллисекунды -- то почему не mSecs???
[09:14:05] <geniepro> vаlexey__> Ну а то, что единицы выбираются с помощью BOOLEAN'a в Init - тоже нормально, ога :-)
vаlexey__> Интуитивно понятный тип!

ну там видимо имелось в виду Init(uSecs) или Init(MSecs)
вот они, издержки отказа от перечислимого типа -- не хочешь делать иерархию записей вместо енума -- далй вот таокй изврат...
[09:21:48] <geniepro> http://www.pure-t.ru/2016/01/12/%D0%B0%D0%BC%D0%B5%D1%80%D0%B8%D0%BA%D0%B0-%D1%81%D0%BE%D1%88%D0%BB%D0%B0-%D1%81-%D1%83%D0%BC%D0%B0-%D0%B2-%D0%BE%D0%B6%D0%B8%D0%B4%D0%B0%D0%BD%D0%B8%D0%B8-%D0%BB%D0%BE%D1%82%D0%B5%D1%80%D0%B5%D0%B8-p/
[10:07:31] <geniepro> В Узбекистане с 1 марта 2016 года вступит в силу новая редакция  Правил дорожного движения, согласно которым теперь пешеходам при передвижении на дорогах и переходе через дорогу в специально предусмотренных местах запрещается пользоваться отвлекающими внимание предметами, в частности, телефонами, планшетами, просматривать видео, читать газеты, журналы и книги.
[11:24:07] <sda> geniepro: да, сейчас на дежурстве стоит А-135, новый комплекс А-235 проходит испытания, может стрелять кинетическими зарядами, а не только ядерными как предыдущий. Но это для отражения ограниченного удара или ошибочного пуска, а в будущем они должны слиться в единую систему ПРО/ПВО
[11:32:37] <sda> https://www.youtube.com/watch?v=LC97wdQOmfI
видео теста амерского кинетического перехватчика
[12:22:54] <sda> так ли уж нужен вар в параметрах ф-ции?
[12:24:55] <sda> хотя наверное вар  нужен, а вот скрытые параметры открытых массивов нет
[13:04:27] <TRUE> vаlexey__> то есть банально узнать сколько вот сейчас времени - нельзя
а таймер не для этого. Ты когда-нибудь видел хардварный таймер? Например, на кухне. Ты задаёшь промежуток времени и таймер сообщит тебе о его окончании.
[13:29:58] <geniepro> Влад, чо там с вошей Орегонской Народной Республикой?
[13:30:04] <geniepro> вашей*
[14:37:55] <valexey> "Экономического обоснования для ситуации с курсом рубля нет, только спекулятивно-финансовые (в том числе и просадка цен на нефть, которая сейчас НЕ обоснована экономическими факторами, допустим, избытком предложения на рынке нефти).
Долго просаживать цены на нефть для США тоже невыгодно, т.к. сами являются экспортёрами (сланцевая добыча)."
(c) Илья Ермаков Ср ноя 05, 2014
[14:40:20] <valexey> "по телевизору рассказали про миллион безработных, и мой работодатель тут же стать искать на мою должность кандидата с 40% дисконтом."
[14:40:35] <geniepro> ну, сланцевая добыча, вероятно, скоро будет искоренена в штатах. но ради попытки уничтожения России правительство сша легко пойдёт на такие жертвы -- подумаешь, потратят триллион на сланцевиках, зато сотни триллионов на российских недрах заработают в случае успеха операции...
ничего личного, чисто бизнес...
[14:42:18] <geniepro> valexey: ты лучше скажи, почему в молчанку играл, даже в фацебооке? или к твоим зондам была подключена ампула с цианидом с дистанционной кнопкой у твоего американского работодателя?
[14:42:50] <valexey> :-)
[14:44:05] <geniepro> последнее сообщение на форуме 2015-06-18 о_О
[14:47:45] <valexey> HUHYZEH!
[16:27:07] <Kemet> geniepro: когда предатели родины выбирались за границу, они всегда ограничивали общение на родном языке, чтобы оторваться от родной реальности и влиться в импортный клозет, так сказать полное погружение в дерьмо
[16:31:08] <Kemet> потому как во всех случаях, когда всякого рода отечественные обученцы за бугром вливались в местную тусовку, с целю погружения в окружающую действительность для контактов с носителями языка, а русский язык им не отрубали, то вместо того, чтобы нашим обученцам погрузиться в местный клозет, внезапно импорные носители языка начинали говорить по-русски. вот такой вот парадокс, да
[16:40:05] <geniepro> https://www.facebook.com/oldmann.lj/posts/628042060667983
Эрик Олдманн
10 января в 16:35 ·
Falcon 9 весит 550 тонн, выводит 2 тонны. Это практически ракета тяжелого класса с полезной нагрузкой легкого.
Для сравнения - РН "Зенит" весит 470 тонн, выводит 15 тонн, РН "Протон" весит 700 тонн, выводит 23 тонны.
Это всё, что вам нужно знать об инженерном гении Маска.
[17:36:29] <Kemet> valexey, мля, у тебя БАЙТ, а ты выводишь ИНТЕДЖЕР
[18:34:11] <vlad2> Kemet: у меня на работе последнее время куча русских вперемешку (в одной комнате) в америкосами. Никто по-русски не загововорил. Еще один миф.
[18:35:20] <vlad2> При том, что русские не стесняясь говорят по-русски между собой.
[18:36:49] <vlad2> Т.е. америкосы слышат русскую речь ежедневно.
[18:37:07] <valexey> Kemet: ok. Fix my code :-) And describe why my code works correctly with i := i+1 and works wrong with INC(i).
[18:37:49] <valexey> http://www.telegraph.co.uk/news/science/science-news/12093545/Return-of-incandescent-light-bulbs-as-MIT-makes-them-more-efficient-than-LEDs.html
[18:39:34] <Kemet> valexey: а эту хрень не пробовал http://forum.oberoncore.ru/viewtopic.php?f=137&t=5232
[18:40:01] <Kemet> valexey: кстати, BYTE там беззнаковый?
[18:40:07] <Kemet> в астробе
[18:40:29] <valexey> Yes. Unsigned. Like in latest Oberon version.
[18:40:53] <valexey> > а эту хрень не пробовал
No. Not yet.
[18:40:55] <Kemet> ну тык когда ты его в интегер, то получится знаковое расширение
[18:41:24] <Kemet> и выведется мусор
[18:41:36] <valexey> The problem is not about Out.Int problem is in INC procedure.
[18:41:39] <Kemet> будет помледовательно выведено 4 байта
[18:42:25] <valexey> PROCEDURE Run;
VAR
i : BYTE;
BEGIN
i := 0;
WHILE TRUE DO
  Out.Int(i, 4);
  i := i+1;
  Timer.MSecDelay(100)
END;
END Run;
[18:42:28] <valexey> This works fine.
[18:42:36] <valexey> PROCEDURE Run;
VAR
i : BYTE;
BEGIN
i := 0;
WHILE TRUE DO
  Out.Int(i, 4);
  INC(i);
  Timer.MSecDelay(100)
END;
END Run;
[18:42:41] <valexey> This works wrong.
[18:42:51] <valexey> Do you see?
[18:43:43] <Kemet> Out.Int как выглядит
[18:44:20] <valexey> Out.Int is proprietary procedure. I have not source code for it.
[18:44:32] <Kemet> ну заголовок
[18:44:48] <valexey> Int(n, w : INTEGER);
[18:45:26] <valexey> Please explain this difference between code with i:=i+1 and INC. All other things are the same.
[18:45:45] <valexey> /me away for 10 minutes
[18:49:24] <Kemet> нада кот смотреть )) возможно он оптимизирует и держит значение в регистре, а на это дело накладывается приведение типа, знаковое расширение и тп.
[18:51:15] <Kemet> какие целые типы кроме INTEGER
[18:53:47] <Kemet> valexey: а так:
[18:53:48] <Kemet> PROCEDURE Run;
VAR
i, j : BYTE;
BEGIN
i := 0; j := 0;
WHILE TRUE DO
  Out.Int(j, 4);
  INC(i);
  j := i;
  Timer.MSecDelay(100)
END;
END Run;
[18:55:48] <valexey> I can't check it now. I'll do it later.
[18:56:02] <valexey> Anyway this is a bug in Astrobe compiler.
[18:56:30] <valexey> Very stupid bug.
[18:57:36] <Kemet> и как то так
PROCEDURE Run;
VAR
i, j : BYTE;
BEGIN
i := 0; j := 0;
WHILE TRUE DO
  ASSERT( i = j );
  INC(i);
  j := j + 1;
END;
END Run;
[19:00:02] <valexey> Also bug report does't have sense because there is no Astrobe support for this MCU now :-\
[19:00:21] <TRUE> any more
[19:02:09] <valexey> Also this thing (http://forum.oberoncore.ru/viewtopic.php?f=137&t=5232 ) also has't support for my LPC2103.
[19:08:33] <Kemet> valexey: я думаю, что просто не стоит смешивать знаковые и беззнаковые и нужно приводить к единому типу явно
[19:19:01] <valexey> Kemet: you say about Out.Int?
[19:21:07] <valexey> There is no problem in OUt.Int. Because the same error I have if:
first case: I write dump raw data to serial port directly.
second case: If this variable has only positive values.
[19:22:41] <valexey> anyway this is a bug in Astrobe compiler and this bug is in INC procedure implementation for BYTE type.
[19:58:21] <Kemet> valexey, Даже по выводу видно что там мусор, выводи как i mod 256
[19:59:44] <Kemet> Кстати а byte там точно 8 бит?
[19:59:51] <valexey> Yes.
[20:00:39] <valexey> Again: in both versions of code I use only BYTE type. But is first case all is ok, and in second there is error. How you can explain it?
[20:04:35] <sda> а чего в дисассемблере не проверите что выходит?
[20:05:42] <valexey> There is no disasm ffeature in my version of Astrobe. It is available only in pro-version.
[20:14:42] <sda> надо пробовать сторонний дисассемблер, я так понял это чип ARM7TDMI
https://github.com/T-Pham/ARM7TDMI-Disassembler
[20:15:05] <sda> правда я не знаю как там с форматом образа прошивки
[20:17:01] <valexey> intel hex
[20:18:45] <valexey> "I’m more optimistic about the prospects of America than when I was as a 29-year-old kid first elected to the United States Senate." (c) Joe Biden
[20:18:54] <valexey> "29-year-old kid"
[20:18:56] <valexey> :-D
[20:38:48] <sda> https://www.onlinedisassembler.com/odaweb/
[20:39:13] <sda> в examples есть strcpy(arm), но в спике чипов арм7 не находится
[20:44:23] <valexey> http://geektimes.ru/post/269070/
[20:51:36] <valexey> https://www.onlinedisassembler.com/odaweb/
[20:58:05] <sda> скоро прийдется уходить от винды совсем, хорошую вещь так впаривать не будут
[20:59:12] <valexey> yep. And there is no Astrobe for Linux :-)
[21:07:11] <Kemet> кстати, компилятор АО транслирует INC(i) в форму i := i +1, потому что для интел так оптимальней
[21:14:32] <valexey> :-D
[21:16:53] <Kemet> valexey: а под моной этот раструб работает?
[21:19:38] <valexey> I'll try it. But Ithink that it at least needs windows registry.
[21:24:55] <Kemet> valexey: напиши в оберон мыллист, разработчик там обитает, я думаю он ответит
[22:00:35] <valexey> I think that Astrobe via wine will be ok.
[22:25:30] <valexey> http://www.shareit.com/programs.html?productid=300442644
[22:29:33] <valexey> "No Linux version of Astrobe for RISC5 is planned - it requires Windows 7, 8 or 10."
[22:40:07] <sda> сообщество оберон могло бы уже и само написать софт для таких контроллеров..
[22:47:11] <valexey> They already did it and named it Astrobe :-)
[22:47:25] <sda> )
[22:47:38] <valexey> And now sells it to other oberoners :-)
[22:51:28] <sda> программисты сильно накручивают цену продуктам, видимо действуют по принципу хорошо бы новую машину купить, готов подождать пол года, делим цену машины на полгода в рабочих часах, закладываем в цену 1 часа работы и стоимость продуктов ))
[22:53:27] <sda> интересно как отличается стоимость по странам, сколько программист стоит в индии например? наверняка дешево, зато какой рынок отхватили
[22:54:04] <valexey> Hmm.. Astrobe has very small auditory. Even if it will be free then auditory will be not very big. So current pricing is reasonable.
[23:46:31] <_valexey_> Если допустим всех оберонщиков кому нужно кодить под МК человек 1000 на земле (думаю это адекватная оценка), то чтобы иметь обычную зарплату программиста, надо каждый год собирать по 100 баксов с каждого такого оберонщика.
[23:47:28] <_valexey_> А каждый год не выйдет. Поэтому цену нужно поднять хотя бы раза в 2, а с учетом не элластичности спроса по цене, в три.
[23:47:38] <_valexey_> version
[23:47:39] <Жаба> _valexey_,  you have Talkonaut 5.95 on iPhone 7.1.2
[23:49:42] <_valexey_> Этого с натягом хватит на одного человека. Ну а теперь прикинь каково в одиночку поддерживать развитие компилятора, среды, нескольких архитектур, 100500 разных иоделей систем на чипе и либ по это все.
[23:50:40] <_valexey_> Поэтому и баги, поэтому короткий срок поддержки архитектур процессоров. И, как следствие, непригодность для промышленного использования.
[23:52:18] <_valexey_> А все потому, что Оберон не нужен :-) Был бы он популярен хотя бы как Lua, тогда проблем бы было на порядок меньше. Но он не будет популярен, ибо язык слишком ограниченый.
[23:53:09] <_valexey_> Вон, даже петруха свалил на Го, а akastargazer на шарпик и юнити :-)