пзц побаловался :)

[porutchik]

запопала тут статейка про китайский deepseek https://aftershock.news/?q=node/1467870
решил его озадачить (во втором вопросе ошибся в слове, тем не менее):

Spoiler

P.S. а что с мейл.облака картинки не подхватывает?

[porutchik]

диалог не в сриншотах:

Конечно! Чем могу помочь?

я пока из любопытства. Знаком ли тебе язык программирования Clarion ToopSpeed?

Spoiler

Да, я знаком с языком программирования Clarion и средой разработки TopSpeed. Это довольно специализированный инструмент, который используется в основном для разработки бизнес-приложений и баз данных. Clarion был популярен в 1980-х и 1990-х годах, особенно среди разработчиков, которые создавали приложения для управления данными, такие как учётные системы, CRM и ERP.

Основные особенности Clarion:
Простота разработки: Clarion использует шаблоны и визуальные инструменты, что упрощает создание приложений.

Встроенная поддержка баз данных: Clarion легко интегрируется с различными СУБД, включая собственный формат файлов TPS (TopSpeed).

Язык программирования: Clarion имеет свой собственный язык, который сочетает в себе элементы процедурного и декларативного программирования.

Кроссплатформенность: Современные версии Clarion поддерживают разработку для Windows и даже веб-приложений.

Пример кода на Clarion:
clarion
Copy
PROGRAM
MAP
END

CODE
MESSAGE('Привет, мир!')
Современное состояние:
Хотя Clarion уже не так популярен, как раньше, он всё ещё используется в некоторых нишевых проектах, особенно в legacy-системах. Сообщество разработчиков Clarion активно поддерживает его, и существуют современные версии среды разработки, такие как Clarion# (интеграция с .NET).

Если у тебя есть конкретные вопросы по Clarion или TopSpeed, задавай!

а создать код простого класса на Clarion взаимодействия с Microcoft Excel млжешь?

Spoiler

Конечно! В Clarion можно взаимодействовать с Microsoft Excel через COM-объекты. Это позволяет автоматизировать создание, редактирование и управление Excel-файлами. Вот пример простого класса для работы с Excel:

Пример класса на Clarion для работы с Excel
clarion
Copy
PROGRAM

MAP
INCLUDE('ABFILE.INC') ! Подключение стандартных библиотек
END

CLASS(ExcelHandler) ! Объявление класса
PROCEDURE(CreateExcelFile, STRING(FileName)) ! Метод для создания Excel-файла
PROCEDURE(WriteData, STRING(SheetName), STRING(Cell), STRING(Value)) ! Метод для записи данных
PROCEDURE(CloseExcel) ! Метод для закрытия Excel
END

ExcelHandler CLASS, TYPE
ExcelApp &COM ! Объект Excel Application
ExcelWorkbook &COM ! Объект Workbook
ExcelWorksheet &COM ! Объект Worksheet
FileName STRING(256)
END

ExcelHandler.CreateExcelFile PROCEDURE(STRING(FileName))
CODE
SELF.FileName = FileName
SELF.ExcelApp &= NEW COM('Excel.Application') ! Создаем объект Excel
SELF.ExcelApp.Visible = TRUE ! Делаем Excel видимым (для отладки)
SELF.ExcelWorkbook &= SELF.ExcelApp.Workbooks.Add() ! Создаем новую книгу
SELF.ExcelWorksheet &= SELF.ExcelWorkbook.Worksheets(1) ! Выбираем первый лист

ExcelHandler.WriteData PROCEDURE(STRING(SheetName), STRING(Cell), STRING(Value))
CODE
SELF.ExcelWorksheet.Name = SheetName ! Устанавливаем имя листа
SELF.ExcelWorksheet.Range(Cell).Value = Value ! Записываем значение в ячейку

ExcelHandler.CloseExcel PROCEDURE()
CODE
SELF.ExcelWorkbook.SaveAs(SELF.FileName) ! Сохраняем файл
SELF.ExcelApp.Quit() ! Закрываем Excel
DISPOSE(SELF.ExcelApp) ! Освобождаем объект
DISPOSE(SELF.ExcelWorkbook)
DISPOSE(SELF.ExcelWorksheet)

! Основной код программы
CODE
ExcelHandlerObj &ExcelHandler
ExcelHandlerObj &= NEW ExcelHandler

ExcelHandlerObj.CreateExcelFile('C:\Test.xlsx') ! Создаем файл Excel
ExcelHandlerObj.WriteData('Лист1', 'A1', 'Привет, Excel!') ! Записываем данные
ExcelHandlerObj.CloseExcel() ! Закрываем Excel

DISPOSE(ExcelHandlerObj) ! Освобождаем объект
Как это работает:
Создание Excel-файла:

Используется COM-объект Excel.Application для запуска Excel.

Создается новая книга (Workbook) и лист (Worksheet).

Запись данных:

Метод WriteData позволяет записать значение в указанную ячейку на листе.

Сохранение и закрытие:

Файл сохраняется по указанному пути, и Excel закрывается.

Важные моменты:
Убедись, что на компьютере установлен Microsoft Excel, так как COM-объекты требуют его наличия.

Если Excel не должен быть видимым, установи SELF.ExcelApp.Visible = FALSE.

Не забудь освобождать COM-объекты с помощью DISPOSE, чтобы избежать утечек памяти.

Если нужно что-то доработать или объяснить подробнее, дай знать!

у пеня одно сокращение - пзц )
Понял, шутка принята! Если что-то непонятно или нужно упростить/ускорить, всегда готов помочь. Clarion — это действительно специфический инструмент, и иногда работа с ним может вызывать такие эмоции.

[Admin]

Вот если бы чатгпт умел тестировать то что написал, "цены бы ему не было"

[porutchik]

сегодня убедился на тестах, что ответы он не тянет поиском из и-нета, как многие думают

[gopstop2007]

сегодня убедился на тестах, что ответы он не тянет поиском из и-нета, как многие думают

тянет, только не общедоступных. )

[porutchik]

тянет, только не общедоступных. )

как это работает
на тот вопрос, что я ему задал (если бы он использовал поиск) получил бы сразу правильный ответ. И если глянуть интерфейс

Spoiler

deep06.png (5.71 КБ) 38404 просмотра

у них есть принудительное включение поиска. И да система доступна всего неделю

[PavelNK]

Создай код простого класса на Clarion взаимодействия с Microsoft Excel

Код: Выделить всё

! Пример класса для работы с Microsoft Excel

  MAP
    MODULE('ExcelWrapper')
      ExcelWrapperClass CLASS
      Init              PROCEDURE()
      OpenWorkbook      PROCEDURE(STRING filename)
      CreateWorkbook    PROCEDURE()
      SetCellValue      PROCEDURE(LONG row, LONG col, STRING value)
      GetCellValue      PROCEDURE(LONG row, LONG col), STRING
      SaveWorkbook      PROCEDURE(STRING filename)
      CloseWorkbook     PROCEDURE()
      Free              PROCEDURE()
      excelApp          &COMObject
      excelWorkbook     &COMObject
      excelSheet        &COMObject
                    END
    END
  END

! Реализация класса
ExcelWrapperClass.Init PROCEDURE()
  CODE
    SELF.excelApp = NEW COMObject('Excel.Application')
    SELF.excelApp.Visible = FALSE ! Скрыть Excel

ExcelWrapperClass.OpenWorkbook PROCEDURE(STRING filename)
  CODE
    SELF.excelWorkbook = SELF.excelApp.Workbooks.Open(filename)
    SELF.excelSheet = SELF.excelWorkbook.Sheets(1) ! Выбираем первый лист

ExcelWrapperClass.CreateWorkbook PROCEDURE()
  CODE
    SELF.excelWorkbook = SELF.excelApp.Workbooks.Add()
    SELF.excelSheet = SELF.excelWorkbook.Sheets(1) ! Выбираем первый лист

ExcelWrapperClass.SetCellValue PROCEDURE(LONG row, LONG col, STRING value)
  CODE
    SELF.excelSheet.Cells(row, col).Value = value

ExcelWrapperClass.GetCellValue PROCEDURE(LONG row, LONG col), STRING
  CODE
    RETURN SELF.excelSheet.Cells(row, col).Value

ExcelWrapperClass.SaveWorkbook PROCEDURE(STRING filename)
  CODE
    SELF.excelWorkbook.SaveAs(filename)

ExcelWrapperClass.CloseWorkbook PROCEDURE()
  CODE
    IF SELF.excelWorkbook <> NULL THEN
      SELF.excelWorkbook.Close(FALSE) ! Закрыть без сохранения
      SELF.excelWorkbook &= NULL
    END

ExcelWrapperClass.Free PROCEDURE()
  CODE
    IF SELF.excelApp <> NULL THEN
      SELF.excelApp.Quit()
      SELF.excelApp &= NULL
    END

[PavelNK]

Юзал https://chat.deepseek.com/

[PavelNK]

И даже рассказал, как использовать

[Ал]

https://habr.com/ru/companies/raft/articles/876746/

https://habr.com/ru/articles/876320/

[porutchik]

https://habr.com/ru/companies/raft/articles/876746/
https://habr.com/ru/articles/876320/

из коментов к локальной модели:

@NeyroEntuziast Случайно не видели тестов насколько 70b уступает 671b? Вчера искал где можно продать почки для покупки нескольких А100/H100, чтобы запустить 671b, c грустью понял, что у меня нет столько почек( Пришлось остановится на 70b, буду на стенде на инстинкте 210 пробовать. Если лень позволит напишу, что получится.

Где-то проскакивала информация что китайцы делают 4090, 48Gb, не могу найти продавцов, если у кого есть ссылка киньте пожалуйста.

Было бы интересно если кто ни будь попробовал на паре 7900ХТ/ХТХ запустить, там в пересчете на доллар памяти вдвое больше чем у 4090 и сравнить с 4090

По ощущениям R1 интереснее о1. И рассуждения у нее забавные, кинул ей немного кривой код, так она там целую повесть написала (12 831 символ), что же имел ввиду пользователь и считать ли это ошибкой или это специально задумано, не пришла к однозначному выводу, начала покрывать код тестами, в результате решила, что поскольку на краевых значениях код не эффективен, то это бага, а не фича и исправила, то что ей не понравилось)

Вот кусок)

Делает покрытие

"Похоже, код работает. Тогда в чём проблема? Может, пользователь забыл добавить уменьшение i или что-то ещё? Или, возможно, он вводит данные неправильно? Но код использует input().split(), что должно работать. Но тогда почему пользователь говорит, что есть проблема? Может, он не получает ожидаемый результат?"

Делает покрытие с другими значениями

"Всё равно работает. Может, проблема в другом. Посмотрю на код ещё раз."

Делает еще тесты находит лажу и начинает про нее рассуждать)

[Ал]

Наверное всё так, но есть нюансы - https://newsstreet.ru/blog/technology/34718.html

https://apidog.com/blog/free-deepseek-r1-vscode-cline/

[porutchik]

Хорошо, пользователь спрашивает, знаком ли я с языком шаблонов Clarion. Сначала нужно вспомнить, что такое Clarion. Это язык программирования и среда разработки, в основном для бизнес-приложений и баз данных. Язык шаблонов, вероятно, относится к системе шаблонов, которые используются в Clarion для генерации кода.

Я помню, что в Clarion есть шаблоны для быстрого создания форм, отчетов, обработки данных. Эти шаблоны позволяют разработчикам настраивать стандартные элементы, не начиная с нуля. Нужно проверить, есть ли специфические термины или концепции, связанные с шаблонами в Clarion, например, ABC (Application Builder Classes) или другие фреймворки.

Следует объяснить, что шаблоны в Clarion работают через генерацию кода на основе выбранных опций, что ускоряет разработку. Возможно, стоит упомянуть такие вещи как мастеры (Wizards), которые помогают в создании шаблонов. Также важно отметить, что шаблоны могут быть кастомизированы под нужды проекта.

Нужно убедиться, что информация точная. Если есть сомнения, стоит указать, что знания основаны на общей информации о Clarion, а не на глубоком практическом опыте. Также полезно предложить помощь, если у пользователя есть конкретные вопросы по шаблонам или синтаксису.

Да, я знаком с языком шаблонов Clarion. Clarion — это язык программирования и среда разработки, ориентированные на создание бизнес-приложений и работу с базами данных. Его система шаблонов (Templates) — одна из ключевых особенностей, позволяющая ускорять разработку за счёт генерации кода на основе предопределённых шаблонов. Вот основные аспекты:

1. Для чего используются шаблоны в Clarion?
Автоматизация рутинных задач: Шаблоны генерируют код для форм, отчетов, обработки данных (CRUD), окон диалога и других элементов интерфейса.

Стандартизация: Обеспечивают единый стиль кода и архитектуру, что упрощает поддержку проектов.

Интеграция с СУБД: Упрощают работу с базами данных (например, через поддержку ODBC, SQL-запросов).

2. Типы шаблонов
Встроенные шаблоны: Стандартные шаблоны для создания окон, меню, таблиц и отчетов.

ABC-шаблоны (Application Builder Classes): Набор классов для объектно-ориентированной разработки, включая элементы управления и логику работы с данными.

Пользовательские шаблоны: Разработчики могут создавать свои шаблоны для повторного использования в проектах.

3. Работа с шаблонами
Мастера (Wizards): Графические интерфейсы для настройки шаблонов (например, мастер создания формы для таблицы данных).

Настройка параметров: При использовании шаблона можно задавать свойства (например, тип поля, валидацию, привязку к данным).

Генерация кода: После настройки шаблон генерирует код на Clarion, который можно дополнительно редактировать.

4. Примеры использования
Создание формы для редактирования данных:

Код: Выделить всё

PROGRAM
MAP
END
WINDOW('Редактирование клиента'), AT(,,200,200), SYSTEM
  STRING('Имя:'), AT(10,10)
  ENTRY(@Name), AT(50,10)
  BUTTON('Сохранить'), AT(10,50), USE(?SaveBtn)

Шаблон может автоматически добавить код для загрузки/сохранения данных в БД.

5. Кастомизация
Шаблоны можно модифицировать через Clarion Template Language (CTL), который позволяет описывать логику генерации кода.

Пример CTL:

Код: Выделить всё

#TEMPLATE(MyTemplate, 'Мой шаблон')
#FIELDNAMES(%FieldName)
#CODE
%FieldName = TRIM(%FieldName)
#ENDCODE

6. Популярные инструменты
Clarion IDE: Включает редакторы шаблонов и мастеров.

Third-party шаблоны: Например, библиотеки для интеграции с веб-сервисами или сложными UI-элементами.

Если у вас есть конкретный вопрос (например, по синтаксису шаблонов, настройке или примеру), спрашивайте!

[porutchik]

критическая масса подвалила и началось:

The server is busy. Please try again later.

[porutchik]

закинул ему свой шаблон. Получил интересные идеи, немного исправлений и добавленные коментарии