LINUX.ORG.RU

Был какой-то у них там язык, типа нашего 1C.

EXL ★★★★★
()
Ответ на: комментарий от monk

Класс, хотя это больше похоже на идейных китайских националистов. Найти бы проект хотя бы с сотней звёзд - это была бы уже победа.

den73 ★★★★★
() автор топика

Почему именно гитхаб? Лучше искать на coding.net.

NeXTSTEP ★★
()
Ответ на: комментарий от den73

Класс, хотя это больше похоже на идейных китайских националистов.

Ну, если найти код на github с русскими идентификаторами и не 1С, то там тоже будут скорее всего идейные националисты.

Найти бы проект хотя бы с сотней звёзд - это была бы уже победа.,

Формально подходит https://github.com/program-in-chinese/overview. Код с идентификаторами смотреть в https://github.com/program-in-chinese/overview/tree/master/%E7%A4%BA%E4%BE%8B%E4%BB%A3%E7%A0%81

monk ★★★★★
()
Ответ на: комментарий от monk

Ммм, ну да. Найти бы проект хотя бы со 182 звёздами :)

Ну, если найти код на github с русскими идентификаторами и не 1С, то там тоже будут скорее всего идейные националисты.

У меня есть примеры, но я же не буду здесь заниматься рекламой своего сайта. Скажу только, что это код на языке PL/1 и используется он на МКС :)

den73 ★★★★★
() автор топика
Последнее исправление: den73 (всего исправлений: 1)
Ответ на: комментарий от monk
/*
 ИЩЕТ В ТЕКУЩЕЙ ПАПКЕ ФАЙЛЫ ISS*.TXT, ИЗВЛЕКАЕТ ИЗ НИХ:
 ИМЯ ФАЙЛА NASA PHOTO ID (СТРОКА 1),
 Lens ID (СТРОКА 17),
 Focus Mode (СТРОКА 19)
*/
EXIFTXT:PROC(ПАРАМ) MAIN;

%INCLUDE 'Z:SERVICE.DCL';

ОПС ПАРАМ ТЕКСТ(*)РД;

?DO_KONEC=ДА;
РАЗОБРАТЬ_ОДИН_ФАЙЛ(ПАРАМ);

РАЗОБРАТЬ_ОДИН_ФАЙЛ:PROC(ИМЯ);

ОПИСАНИЕ
ИМЯ       CHAR(*)VAR,
(CCC,CC1) CHAR(*)VAR,
(
FILENAME,
LENSID,
FOCUSMODE
)                  CHAR(*)VAR,
(I,J)              FIXED(31),
V720               BIT,
F_EXIF             FILE;

КОГДА НЕТ_ФАЙЛА(F_EXIF) ИДТИ НА_ВЫХОД;

ОТКРЫТЬ ФАЙЛ(F_EXIF) ДЛЯ_ВВОДА ТЕКСТОВЫЙ ПО_ИМЕНИ(ИМЯ);

КОГДА КОНЕЦ_ФАЙЛА(F_EXIF) ИДТИ НА_ВЫХОД;

PUT SKIP;
I=0;
V720 = НЕТ;
FILENAME,
LENSID,
FOCUSMODE = '';

ЦИКЛ ПОВТОРЯЯ;
   READ FILE(F_EXIF) INTO(CCC);
   I+=1;
//   ЕСЛИ I ^= 1 & I ^= 17 & I ^= 19 ТОГДА ОПЯТЬ;
   ССС=ЗАМЕНИТЬ(CCC,' ','^I');

   J=ИСКАТЬ(CCC,':');
   ЕСЛИ J=0 ТОГДА ОПЯТЬ;

   CC1=ПОДСТРОКА(CCC,1,J);
   СС1=ОЧИСТИТЬ(CC1);

   ЕСЛИ J=ДЛИНА(ССС)
      ТОГДА ССС='';
      ИНАЧЕ CCC=ПОДСТРОКА(CCC,J+1);
   ССС=ОЧИСТИТЬ(CCC);

   ЕСЛИ I = 1  & ИСКАТЬ(СС1,'ExifToolVersion') = 1 ТОГДА
      ЕСЛИ index(ССС,'7.')=1 ТОГДА V720 = ДА;

   ЕСЛИ V720
      ТОГДА
      {;
      ПРОВЕРИТЬ(2,  'FileName ' ,FILENAME);
      ПРОВЕРИТЬ(39, 'FocusMode ',FOCUSMODE);
      ПРОВЕРИТЬ(146,'LensID '   ,LENSID);
      };
      ИНАЧЕ
      {;
      ПРОВЕРИТЬ(1,  'NASA PHOTO ID:',FILENAME);
      ПРОВЕРИТЬ(17, 'Lens ID:'      ,LENSID);
      ПРОВЕРИТЬ(19, 'Focus Mode:'   ,FOCUSMODE);
      };

КОНЕЦ;

НА_ВЫХОД:
PUT EDIT(FILENAME,';',LENSID,';',FOCUSMODE)(A);
ВОЗВРАТ;

НА_СООБЩЕНИЕ: PUT SKIP LIST(ИМЯ,I,CC1,CCC);

ПРОВЕРИТЬ:PROC(I1,ОБРАЗЕЦ,КУДА);
ОПИСАНИЕ
I1             FIXED(31),
(ОБРАЗЕЦ,КУДА) CHAR(*)VAR;
 
//ЕСЛИ I ^= I1 ТОГДА ВОЗВРАТ;
ЕСЛИ ИСКАТЬ(СС1,ОБРАЗЕЦ)=1
   ТОГДА КУДА=ССС;
//   ИНАЧЕ ИДТИ НА_СООБЩЕНИЕ;

КОНЕЦ ПРОВЕРИТЬ;
КОНЕЦ РАЗОБРАТЬ_ОДИН_ФАЙЛ;

END EXIFTXT;
den73 ★★★★★
() автор топика
Ответ на: комментарий от den73

Скажу только, что это код на языке PL/1 и используется он на МКС

Он на github и у него больше 100 звёзд?

monk ★★★★★
()
Ответ на: комментарий от monk

Отнюдь :) Если код используется в китайском луноходе и прислан разработчиком, то тоже пойдёт.

den73 ★★★★★
() автор топика
Ответ на: комментарий от den73

Ммм, ну да. Найти бы проект хотя бы со 182 звёздами :)

https://github.com/audreyt/lingua-sinica-perlyuyan

Пример кода:

use Lingua::Sinica::PerlYuYan;

註俄農式乘法
無警兮

          用
         通兮
        副俄農
       始吾起純
      衰又純添合
     賦諸兮吾純果
    兮當起純衰大壹
   合始純衰賦整純衰
  除貳兮純添賦貳乘純
 添兮純果賦純果加純添
倘壹等純衰模貳終純果終

use Test::More tests => 1;
is 俄農(18,23), 414;
monk ★★★★★
()
Ответ на: комментарий от monk

Эххх, хотелось бы какой-нибудь бизнес-логики, а не игрушек. Но не надо так сильно стараться, я думал, кто-нибудь вспомнит слёту. А что такое coding.net и где там вообще исходники? Я как-то за 2 минуты ничего не нашёл.

den73 ★★★★★
() автор топика
Ответ на: комментарий от den73

Вряд ли такое может существовать. Вся бизнес логика на github опирается на открытые библиотеки. Которые англоязычные. Смешивать два языка в одном тексте не лучшая идея с точки зрения читабельности. А свой 1С (чтобы был не только язык, но и хотя бы несколько миллионов строк кода на нём) китайцы не написали.

monk ★★★★★
()
Ответ на: комментарий от monk

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

Я уже начинаю думать, что это миф :)

den73 ★★★★★
() автор топика
Ответ на: комментарий от anonymous

Познание и является целью, чо за вопросы.

Познание и является целью, чо за вопросы.

den73 ★★★★★
() автор топика

Решили последовать тренду и экспортировать яролит в поднебесную?)

whoisyou
()
Ответ на: комментарий от den73

На голанге не нашёл. Зато нашёл драйверы на питоне:

https://github.com/cflw/network_device_script/blob/master/%E7%BD%91%E7%BB%9C%E8%AE%BE%E5%A4%87%E8%84%9A%E6%9C%AC/%E5%8D%9A%E8%BE%BE%E5%91%BD%E4%BB%A4%E8%A1%8C/%E5%9F%BA%E6%9C%AC%E8%A1%A8%E4%BF%A1%E6%81%AF.py

Их там много. От Cisco и Huawei до ZTE.

monk ★★★★★
()

А можно свои иероглифы изобрести и пусть попробуют его разобрать «китайские товарищи».

Владимир

anonymous
()
Ответ на: комментарий от anonymous

А можно свои иероглифы изобрести и пусть попробуют его разобрать «китайские товарищи».

Можно просто программировать по-русски. Один из самых сложных языков в в мире, однако.

monk ★★★★★
()
Ответ на: комментарий от monk

Хорошая шутка, но доля истины в ней имеется /ИИ/.

Владимир

anonymous
()
Ответ на: комментарий от den73

«182 звезды нужно хотя бы», это уже не познание.

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

anonymous
()
Ответ на: комментарий от monk

Учитывая, что китайский иероглиф - это не буква, а как минимум слово, а то и фраза, то. Пипец какой же длинный термин - факториал - у китайцев..

https://github.com/program-in-chinese/overview/blob/master/%E7%A4%BA%E4%BE%8B%E4%BB%A3%E7%A0%81/%E6%96%90%E6%B3%A2%E9%82%A3%E5%A5%91.js

anonymous
()
Ответ на: комментарий от anonymous

Учитывая, что китайский иероглиф - это не буква, а как минимум слово, а то и фраза

Это если по смыслу. А фонетически в заимствованных словах это слог. 斐波那契 = fěi-bō-na-qì. Хотя можно и перевести (по смыслу иероглифов). Будет «ах, какое изящное соглашение», что в некотором смысле описывает последовательность Фибоначчи.

monk ★★★★★
()
Ответ на: комментарий от den73

因子 — множитель (интересно, что дословно «символ причины»). У нас тоже «фактор» и «множитель» (как в «факторизация», «факториал») и неким образом «причина» (как в «фактор страха»).

факториал — 阶乘, дословно «умножение ранга». Китайцы не любят заимствовать слова, если есть возможность описать.

monk ★★★★★
()
Ответ на: комментарий от den73

Ну. Я писал и думал о Фибоначчи, но написал почему-то факториал. Звиняйте.

По алгоритму же понятно, да.

anonymous
()
Ответ на: комментарий от den73

Эххх, хотелось бы какой-нибудь бизнес-логики, а не игрушек.

есть не на китайском, а на японском: Nadesico сайт проекта v2 v1 (v1 на Delphi ещё) батарейки

фича языка: склонения/спряжения, падежи. синтаксис марсианский, то есть, японский

Это японский язык разработки или программирования, основанный на японском языке .ПК / смартфон / планшет с, различная окружающая среда в деятельности можно использовать . Образование и хобби, для работы использовать вы можете

например, поддерживаются размерности физических констант.

anonymous
()
Ответ на: комментарий от anonymous

Спасибо, думаю, что это сайт Дмитрия Караваева. Я недавно приводил код, который как раз этим компилятором скомпилирован, и он летает на МКС.

den73 ★★★★★
() автор топика
Ответ на: комментарий от den73

Искал «китайские аналоги гитхаба»

наткнулся на какой-то форум для начинающих, на китайском, про ассемблер +win64 + linux. посещаемость дикая (100 000+), хелловорды публикуют туда же прям в форум. разделы про ассемблер и го там понравились.

сейчас что-то сходу ссылку не припомню.

anonymous
()
Ответ на: комментарий от anonymous

«Мои года, мое богатство».

PS: Посмотрим, тот ли это PL-1, который использовал 1000000 лет назад.

Владимир

anonymous
()
Ответ на: комментарий от anonymous

FAQ там, как я понял, по конкретному компилятору, а не по языку вообще.

hobbit ★★★★★
()
Ответ на: комментарий от den73

Вот и автор того сайта, видимо, не знает…

hobbit ★★★★★
()
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.