- •Р оссийский государственный университет нефти и газа
- •Введение
- •Классификация методов измерения, анализ влияния факторов на измерение
- •Маятниковый копер jbw150
- •Неразрушающие методы и приборы
- •Нормативные документы
- •Методы испытаний
- •1) Ударная прочность по Изоду iso 180 (astm d256)
- •2) Ударная прочность по Шарпи iso 179 (astm d256)
- •3) Ударная прочность по Гарднеру.
- •Статические характеристики приборов
- •Динамические характеристики приборов
- •Средства анализа и обработки информации
- •Автоматизация процессов управления испытаниями и обработки результатов
- •Программа калибровки
- •Применение управляющих эвм при испытаниях материалов
- •Список использованной литературы
Автоматизация процессов управления испытаниями и обработки результатов
В зависимости от назначения, типа и условий эксплуатации маятниковых копров измерительная информация с них может поступать как в аналоговом, так и цифровом виде. Для визуальных наблюдений информация об измеряемых параметрах представляется на цифровых индикаторах либо стрелочных приборах.
В настоящее время в качестве выходных приборов все шире используются экраны дисплеев, на которых измеряемые параметры представляются в виде графиков, диаграмм и таблиц. При этом, как правило, параллельно происходит запись измерительной информации на соответствующий носитель.
Измерительная информация может передаваться через выходные приборы в систему мониторинга объектов для принятия решений.
Программа калибровки
Protocol ( )
Char S1 [40], S2[40], S3[40], Si[ ]
/*S1 – протокол №…*/
/*S2 – дата */
/*S3 – время */
Gets (S1);
Cprintf (“протокол №…/n”, strlen (S1));
Gets (S2);
Cprintf (“дата …/n”, strlen (S1));
Gets (S3);
Cprintf (“время…/n”, strlen (S1));
………
Return ( );
#define STAT 0 x 309 /*Регистр состояния макетной платы*/
#define CNTRL 0 x 30С /*Управляющий регистр макетной платы*/
#define ADC 0 x 308 /* АЦП: адрес и данные*/
#define STRTAD 0x30A /*Регистр запуска преобразования*/
main ( )
{
int rab15, rab150, rabx, slope, S, udarnayavyazkost;
char c=0
output(CNTRL,1); /*Установка второго бита в управляющем*/
/*регистре для разрешения запуска программы*/
/*преобразования*/
output(ADC,1): /*Выбор канала 1*/
cprintf («Ввести значение площади S= м2. \ n»);
cprintf («Калибровка 1: задать значение работы=15 Дж. \ n»);
cprintf («Через 1 минуту нажмите любую клавишу. \n»);
while (!kbhite()); /*Ждать нажатия клавиши*/
rab15=get_data() /*Получить значение ударной вязкости для работы 15 Дж*/
cprintf («Ввести значение площади S= м2. \ n»);
cprintf («Калибровка 2: задать значение работы=150 Дж. \ n»);
cprintf («Через 5 минут нажмите любую клавишу. \n»)
while (!kbhit()); /*Ждать нажатия клавиши*/
rab150=get_data()
slope=135/(rab150-rab15); /*Расчет коэффициента линейной*/
/*зависимости ударной вязкости от работы*/
cprintf («Нажмите любую клавишу для отсчета ударной вязкости. \n»);
cprintf («Нажмите е для выхода из программы. \n»);
while(c!=’e’) /*Повторять, пока не нажата клавиша е*/
{
If (kbhit() /*Отсчет ударной вязкости, если нажата*/
/*любая клавиша*/
{
rabx=get_data();
udarnayavyazkost=slope*(rabx/S); /*Расчет ударной вязкости */
cprintf («Ударная вязкость = Дж/м2 d/n», udarnayavyazkost);
c=getch();
}
}
}
get=data()
{
int datum;
outp(STRTAD); /*Запуск преобразования*/
while(!(inp(STAT)&2)); /*Ждать завершения преобразования*/
datum=inp(ADC);
return(datum);
}