Програмирование pic на СИ.

[ALEKS1102X]

[uquote="КРАМ",url="/forum/viewtopic.php?p=4786858#p4786858"][uquote="ALEKS1102X",url="/forum/viewtopic.php?p=4786745#p4786745"]Покажи в том для стм - как ты ножкой передёргиваешь с той скоростью - сколько вообще способен проц?
Я к примеру... бла...бла...бла...[/uquote]
Кстати, вдогон.
У STM32 и AT32 в домене портов регистр управления побитной установкой/сбросом ног порта позволяет СИНХРОННО и НЕЗАВИСИМО от немодифицируемых пинов порта установить значения пинов порта без RMW. В PIC это приводит к необходимости математики с портом, то есть с RMW, а значит не за один, а за два цикла.
В ARM, если отказаться от управления через указатель на структуру, то прямое управление портом тоже сведется к двум циклам вместо трех.
И еще нужно учесть, что ногодрыг на предельных скоростях ядра в PIC возможен только на медленных МК. На быстрых не позволит шина и конвейер. То есть писать вплотную инструкции вывода в порт невозможно - они будут исполняться с пропусками. Это происходит уже в МК с производительностью 70 мипс и более (dsPIC33EP, например). Приходится вставлять NOP-ы на АСМе или их вставляет компилятор Си автоматически.
Ну и если не прибегать к доступу к полям структуры регистра, то прямой доступ к регистрам порта в ARM внезапно занимает всего два машинных цикла:

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

  405:         GPIOD->scr=0x00010002;       
0x08002E9A 4815      LDR           r0,[pc,#84]  ; @0x08002EF0
0x08002E9C 6008      STR           r0,[r1,#0x00]
..............
0x08002EF0 0002      DCW           0x0002
0x08002EF2 0001      DCW           0x0001
...........

Сиречь, НИЧЕМ не отличается от быстрых PIC.
[/uquote]

КРАМ! ... ты когда бухаешь и уходишь в ГЛУБОКУЮююююю .... жопу
Ты не забывай правила общие по работе мк (микроконтроллеров)
Давай я тебе небольшой ликбез сделаю
Итак, было дерево, а под ним Адам и Ева .... ТЬФУ ты! Не с того начал

Итак, была некая кучка логических элементов, изначально конечно был набор транзисторов
И некто зхадумался - а зачем кучка, если можно систематизировать?
С этого момента - пошёл отсчёт микроконтроллеров

Тебе вообще принцип работы мк от микрочип, или систему АРМ?
И рассказать - какое ядро и в каком месте выигрывает ?
Или ты просто забежал потрещать?

[КРАМ]

[uquote="ALEKS1102X",url="/forum/viewtopic.php?p=4786886#p4786886"]Тебе вообще принцип работы мк от микрочип, или систему АРМ?
И рассказать - какое ядро и в каком месте выигрывает ?[/uquote]
Ты вообще ничего не знаешь об архитектурах МК.
Ни про PIC, ни про ARM.
Особенно если учесть, что у Микрочипа поддерживаются целых пять разных архитектур.
Вся твоя болтовня на эту тему непригодна даже как пустопорожний треп. Просто пустое место. Рандомный набор слов.

[ALEKS1102X]

Да я как бы и не против
Главное - Чтобы ты тут знал, и помогал людям
А я так.... сижу тут и подпёрдываю ....

И ДА! твой код уёбищный

Когда пишут на СИ - "GPIOD->scr=0x00010002;" не используют ЯВНЫЕ константы
Убого использовать : 0x00010002
попытайся использовать :
#define _ХРЕН_В_ЖОПУ_РАЗРАБОТЧИКА 0x00010002

Это будет более универсально, когда тебя в попец будут иметь

[КРАМ]

[uquote="ALEKS1102X",url="/forum/viewtopic.php?p=4786897#p4786897"]сижу тут и подпёрдываю[/uquote]
Ты тут даже этого не делаешь.
Белый шум извлекаемый тобой в принципе не несет никакой информации.
Бестолковые ссылки на облако вместо использования штатных средств форума какгбэ намекаэ на твою техническую несостоятельность...

В чем тут помощь, милейший?

[ALEKS1102X]

[uquote="КРАМ",url="/forum/viewtopic.php?p=4786900#p4786900"][uquote="ALEKS1102X",url="/forum/viewtopic.php?p=4786897#p4786897"]сижу тут и подпёрдываю[/uquote]
Ты тут даже этого не делаешь.
Белый шум извлекаемый тобой в принципе не несет никакой информации.
Бестолковые ссылки на облако вместо использования штатных средств форума какгбэ намекаэ на твою техническую несостоятельность...

В чем тут помощь, милейший?[/uquote]

Я тут людям помогаю
А ты тут фуфлишь

Расставь приоритеты - если мозгов хватит

[КРАМ]

[uquote="ALEKS1102X",url="/forum/viewtopic.php?p=4786897#p4786897"]Когда пишут на СИ - "GPIOD->scr=0x00010002;" не используют ЯВНЫЕ константы
Убого использовать : 0x00010002[/uquote]
А кто тебе сказал, что я использую явные константы в реальном коде?
Дурень, я написал константу лишь для того, чтобы сопоставить код дизасму.
Это просто синтетический код. Для примера работы компилятора.
Для тех, кто в танке и ничего не смыслит в программировании поясняю.
0x00010002 ЯВНО говорит понимающему о том, что нулевой и первый бит порта будут модифицированы одновременно. Один установлен, а другой сброшен.
Дефайн этой константы имеет смысл тогда и только тогда, когда известен схемотехнический смысл этих двух бит.
Но тебе, двоечнику, это невдомек... У тебя каждое следующее выступление нелепее предыдущего...

[Аlex]

Ребята, если не прекратите флуд, буду выписывать санкции всем участникам, без разбора. Вникать в ваш текст нет желания.

[cxem]

Это будет работать?
ELM327 PIC18F25K80 K-Line Fast Init 38400-10400

Спойлер

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

#include <xc.h>
#include <stdint.h>
#include <stdbool.h>

#pragma config FOSC = HS1, PLLCFG = ON, WDTEN = OFF, MCLRE = ON
#define _XTAL_FREQ 16000000 

#define K_OUT       LATBbits.LATB0
#define K_IN        PORTCbits.RC1
#define K_OUT_TRIS  TRISBbits.TRISB0
#define K_IN_TRIS   TRISCbits.TRISC1
#define BIT_TIME    93 

// Функция для больших задержек (исправляет ошибку 1355)
void delay_ms_long(uint16_t ms) {
    while(ms--) {
        __delay_ms(1);
    }
}

void KLine_Init(void) {
    ANCON0 = 0; ANCON1 = 0; 
    K_OUT_TRIS = 0; K_IN_TRIS = 1;
    K_OUT = 1; 
    delay_ms_long(100);
}

void KLine_SendByte(uint8_t data) {
    bool gie_status = INTCONbits.GIE;
    INTCONbits.GIE = 0; 
    
    K_OUT = 0; __delay_us(BIT_TIME); 
    for (uint8_t i = 0; i < 8; i++) {
        if(data & 0x01) K_OUT = 1; else K_OUT = 0;
        data >>= 1;
        __delay_us(BIT_TIME - 2); // -2 мкс на выполнение кода
    }
    K_OUT = 1; __delay_us(BIT_TIME); 
    INTCONbits.GIE = gie_status;
}

int16_t KLine_ReadByte(uint16_t timeout_ms) {
    uint8_t data = 0;
    // Ожидание старт-бита
    while (K_IN) {
        __delay_us(10);
        if (timeout_ms > 0) timeout_ms--; else return -1;
    }

    __delay_us(BIT_TIME + (BIT_TIME / 2)); 
    for (uint8_t i = 0; i < 8; i++) {
        if (K_IN) data |= (1 << i);
        __delay_us(BIT_TIME - 2);
    }
    __delay_us(BIT_TIME); 
    return (int16_t)data;
}

void KLine_SendPacket(uint8_t *buf, uint8_t len) {
    uint8_t cs = 0;
    for (uint8_t i = 0; i < len; i++) {
        KLine_SendByte(buf[i]);
        cs += buf[i];
        KLine_ReadByte(50); // Эхо
    }
    KLine_SendByte(cs);
    KLine_ReadByte(50);
}

void KLine_FastInit(void) {
    K_OUT = 0; delay_ms_long(25);
    K_OUT = 1; delay_ms_long(25);
}

void main(void) {
    KLine_Init();
    TRISBbits.TRISB4 = 0; // Настройка светодиода
    
    uint8_t start_msg[] = {0x81, 0x11, 0xF1, 0x81}; 

    while(1) {
        KLine_FastInit();
        delay_ms_long(50); 
        
        KLine_SendPacket(start_msg, 4);
        
        int16_t resp = KLine_ReadByte(200); 
        if (resp != -1) {
            LATBbits.LATB4 = 1; delay_ms_long(100); LATBbits.LATB4 = 0;
        }
        
        delay_ms_long(5000); 
    }
}

[ALEKS1102X]

Добрый день!

cxem - это Ваша ЛИЧНАЯ схема, или изменить ничего нельзя?

K-Line обычно работает как УАРТ на скорости 9600 бод (бит в секунду).
Первый порт УАРТ у Вас занят кан шиной, а второй - на пинах RB7, RB6. У вас там светодиоды, и скорость 10400 бод

Работать то наверное будет, но сильно будет тормозить и глючить
Самая основная ошибка людей - что они обрабатываю задержки в подпрограммах (функциях)
Заведите себе некий таймер, работайте с ним в прерывании - пусть он считает ваши задержки
А сами в это время в основном коде- опрашивайте - досчитал некий счётчик до нужного тайминга или нет ?!?
Можно завести несколько таймеров, у вас их как минимум ПЯТЬ! два восьмибитных, и три 16-ти битных
И вместо того - чтобы сидеть в ПП задержки - Вы наверное будете чем-то полезным заниматься

Мои советы - это не последняя инстанция, каждый решает САМ - как ему писать прошивку.

[cxem]

Сам сижу паяю. Это адаптер ELM327 в упрощённой форме (скорость 10400, пробужение ЭБУ 25/25мс, адрес ЭБУ 8110F1)
В программирование ничего не понимаю.
Код мне написал ИИ
Но неверно, вот что показывает осциллограф:

[ALEKS1102X]

Ну тогда понятно :)
А Вы какать тоже с ИИ ходите? :) не советует - как напрягаться и как булькать какахами? :)
Забейте на эту интернет помойку :) Никакого ИИ НЕТ в природе :) Есть помощник, который собирает всё говно из интернет помойки :)
Отключите доступ к инету, и ваш ИИ - обсерется быстро и навсегда ! :)
И естественно - ничего он Вам не напишет :) Так ... соберёт весь помой из инета :)

А если хотите доступ к мозгам авто, то купите программу у https://topdiag.by/ :)
стоит копейки - там 50 баксов плюс/минус. Подходит любой адаптер типа на FT232RL или аналогичных CH341 :)
На Али стоят копейки :)
Вы больше деньжат потратите на тот недоносок "ИИ" - а толку будет НУЛЬ :)

А вот интересно :)
А Вы лично - знаете протоколы, по которым каждая фирма общается между своими модулями внутри ???
Я к примеру - не знаю, но я могу эти протоколы снять с помощью анализаторов :) и то - нужно чтобы подогнали авто, чтобы я в этот момент не был занят другим.
Опять-же, нужен рабочий блок, который общается с машиной, она же просто так - лоху со стороны отвечать тоже не будет :)
А Вы то куда лезете со своими нульцевыми знаниями ???
На ХОПок решили взять? ну...ну .... :)

[cxem]

ИИ справился с поставленной задачей:

Спойлер

#include <xc.h>
#include <stdint.h>

// Частота 16 МГц (4 МГц кварц + PLL x4)
#define _XTAL_FREQ 16000000

// Настройки битов конфигурации
#pragma config FOSC = HS2, PLLCFG = ON, WDTEN = OFF

// Пин согласно схеме (инвертирующий транзистор)
#define K_TX LATBbits.LATB0

// Скорость 10400 бит/с
#define BIT_DELAY 96

// --- Функция для длинных задержек (исправляет ошибку 1355) ---
void delay_ms_long(uint16_t ms) {
while(ms--) {
__delay_ms(1);
}
}

// --- Функция отправки байта (Soft UART с инверсией) ---
void k_send_byte(uint8_t data) {
K_TX = 1; // Start bit (0V в линии)
__delay_us(BIT_DELAY);
for (int i = 0; i < 8; i++) {
K_TX = (data & 1) ? 0 : 1; // Инверсия
data >>= 1;
__delay_us(BIT_DELAY);
}
K_TX = 0; // Stop bit (12V в линии)
__delay_us(BIT_DELAY);
}

// --- Функция отправки пакета с автоматическим расчетом CS ---
void k_send_packet(uint8_t format, uint8_t target, uint8_t source, uint8_t service, uint8_t data_byte) {
uint8_t cs = format + target + source + service + data_byte; // Сумма всех байт
k_send_byte(format);
k_send_byte(target);
k_send_byte(source);
k_send_byte(service);
k_send_byte(data_byte);
k_send_byte(cs); // Отправляем итоговую контрольную сумму
}

void main(void) {
// 1. Инициализация
ANCON0 = 0; ANCON1 = 0;
TRISBbits.TRISB0 = 0;

// 2. Линия в 12В (300 мс)
K_TX = 0;
delay_ms_long(300);

// 3. Fast Init (25мс Low / 25мс High)
K_TX = 1; delay_ms_long(25);
K_TX = 0; delay_ms_long(25);

// 4. Start Communication (81 10 F1 81 03)
// Используем нашу новую функцию: CS посчитается автоматически
k_send_packet(0x81, 0x10, 0xF1, 0x81, 0x00); // 0x00 тут лишний байт,
// но для 81 10 F1 81 проще вызвать k_send_byte вручную один раз:
/*
k_send_byte(0x81); k_send_byte(0x10); k_send_byte(0xF1);
k_send_byte(0x81); k_send_byte(0x03);
*/

// 5. Основной цикл с поддержкой сессии (Tester Present 3E 00)
while(1) {
// Команда Tester Present: 82 10 F1 3E 01 + CS
// Формат 82 (2 байта данных: 3E и 01)
k_send_byte(0x82);
k_send_byte(0x10);
k_send_byte(0xF1);
k_send_byte(0x3E); // Service: Tester Present
k_send_byte(0x01); // Sub-function: Send response
k_send_byte(0xC2); // CS: 82+10+F1+3E+01 = 0x1C2 -> C2

// Пауза 3 секунды между запросами удержания сессии
for(int i = 0; i < 30; i++) {
delay_ms_long(100);
}
}
}

[ALEKS1102X]

Вы на 100 % уверены, что программа сбора мусора по интернет помойке - вкартце "ИИ" - справилась с задачей?
Т.е. тот код, который я у себя в архиве занёс в файл "ИИ справился.txt" - это ИМЕННО то, что вам и было нужно ?

Смешно
Посмотрите мой архив: https://drive.google.com/file/d/1qRdzyE ... sp=sharing
Посмотрите на свой код: ИИ справился
Посмотрите на свою схему - где на "INT0" повесили выход, а на "RC1" вход
Посмотрите вообще - как инициализируются ножки того проца, как инициализируется УСАРТ на том порте - куда вы повесили "типа блювал" модуль
Нарисуйте даже в уме приблизительную программу - как будете работать с пинами шины K-Line, когда будет приходить запрос по блютуз.
Наконец, инициализируйте нНОРМАЛЬНО тот УАРТ , который будет работать с шиной "БЛЮВАЛ_немного" Организуйте буфер у проца - откуда будете инфу компу пихать, и в какую будете принимать ...
У вас вообще по сути : голимотья
Вы будете работать с некой программой от "хрен пойми кого", приэтом, вы значете что передавать между модулями:
// 5. Основной цикл с поддержкой сессии (Tester Present 3E 00)
while(1) {
// Команда Tester Present: 82 10 F1 3E 01 + CS
// Формат 82 (2 байта данных: 3E и 01)

...
И вы наверное даже знаете - чем отвечать компьютеру назад? ДА?
Я уже не говорю про протоколы ....

https://drive.google.com/file/d/1iFSoZ7 ... sp=sharing

У меня нет слов! ВЫ БОГ! Вам не хватает одного - ШНОБЕЛЬ премии ....

Добавлено after 3 hours 38 minutes 30 seconds:
Не знаю - кто там меня минусует ?!? Ну поставьте наконец -99999 Мне просто интересно - вылезет за пределы информационной и разговорной части ???

[zAries]

Особенно понравилась папка "ИИ чудо для лохов.zip"
а так же бред "Моё описание).txt"
В чём помощь обществу, брат ???
Уймите уже свои амбиции, займитесь чем то полезным, хватит засорять эфир.

[КРАМ]

[uquote="zAries",url="/forum/viewtopic.php?p=4789028#p4789028"]Особенно понравилась папка "ИИ чудо для лохов.zip"[/uquote]
Этот клоун даже не понимает, что качать 1,1 гигабайта его графомании никто не будет...

[ALEKS1102X]

Ребят! :)
Я смотрю вы парочкой заходите :)
И кто же из вас - папа? :)

Извините, это шутка.
А по вопросу - ну из Ваших сообщений - толку то точно нет никакого :)
А из моих - ну пусть товарищ посмотрит хотя бы на то - сколько нужно инфы пихать в комп и обратно :)
А ведь его сборщик помойных идей "типа" ИИ - ничего не написал ему про инициализацию нужных функций, про необходимость создания неких массивов - куда/откуда эта инфа будет в тот УСБ/ТТЛ/блютуз пихаться :)
Помойщик ему написал софтовый УСАРТ :)
И товарищ говорит - что работает! Ну так пусть выложит подтверждение, что через блюпуп он общается на такой-то скорости, а через k-line на другой ?!?
В чём проблема? Скорости мизерные, самый простой но действенный анализатор https://ozon.by/product/logicheskiy-ana ... J2XFAnN0vE
купить - меньше СЕМИ баксов :)
Ну так кцпи - и покажи - как там твой софтовый уарт работает :) Если вообще - работает :)

Для КРАМА - поменяй комп, 1 ГБ я по телефону качаю меньше минуты, а там проц - кастрат :) А для моего компа - это дело пяти секунд :)

[zAries]

[uquote="ALEKS1102X",url="/forum/viewtopic.php?p=4789053#p4789053"]...И кто же из вас - папа? ...[/uquote]
Ещё один пук, и для вас, сударыня, будут оба.
------------
Просьба к админам - снесите уже эту помойку.

[КРАМ]

1,1 гигабайт за 5 сек - это 220 мбайт/ с. То есть нетто 2 гигабита/с. А брутто еще больше.
Расскажи нам сказку про свой комп и мобильный телефон...
Это во первых. А во вторых, причем тут комп?
Скорость обмена определяет не комп, а раздача сервера и выделенный провайдером рейт канала последней мили.
Ну и в третьих, никому не всралось копаться в твоем мусоре такого размера.
Желаешь продемонстрировать свое мастерство - изволь приводить код и схемы в удобочитаемом виде инструментами сайта.

[ALEKS1102X]

У меня тариф "ЯСНА 200 Smart Видеоконтроль", только плачу я не 52 бел/руб а 47 (46,8) бел/руб со скидкой, и я в ваших пук и как не нуждаюсь
Скачка - около 200 Мегабит в секунду https://finbelarus.org/tarify-yasna/
Тариф безлимитный, и при своей мизерной зарплате в 1000 баксов - я могу себе позволить интернет за 16 баксов

Для zAries - я же извинился !?!

Для КРАМ - а я это и не для Вас выкладывал
Пусть копается тот - кому это интересно. А Вы бы лучше что путное ему подкинули, чем трещать тут в холостую и зарабатывать себе плюсики

[КРАМ]

[uquote="ALEKS1102X",url="/forum/viewtopic.php?p=4789061#p4789061"]У меня тариф
Скачка - около 200 Мегабит в секунду[/uquote]
Ну и каким таким образом ты со своими счастливыми 200 мегабитами скачиваешь со скоростью более 2 ГИГАбит? И это без учета того, что бесплатное облако тебе с такой скоростью ничего не отдаст.
Из этого следует простой вывод - ты банальный лгун. Причем во всем остальном.
[uquote="ALEKS1102X",url="/forum/viewtopic.php?p=4789061#p4789061"]Пусть копается тот - кому это интересно.[/uquote]

Найди хотя бы одного.
Для того, чтобы в твоем мусоре такого размера хоть кто то пожелал копаться, нужно сначала заработать очень хорошую репутацию.
Поэтому в архивах ЛИ (если ты не в курсе - это твой соотечественник - Леонид Иванович Ридико, которого знает весь русскоговорящий радиотехнический интернет ) копаться будут. А в твоем мусоре - никогда.

ЗЫ. Ты так и не ответил на простой вопрос. Зачем тебе понадобилось писать в ЕЕПРОМ текущее время ЧАСОВ и зачем это делать в одну и ту же пару адресов?
Конкретный и очень интересный вопрос.