Last news
- Известный ресторан ландшафтных блюд Москвы: ландшафтное блюдо английского меню, скандинавского меню и многих других
- Статья 2
- При ДТП, долго ли делается независимая экспертиза автомобиля - Осмотр повреждённого автомобиля, соответствующие фото-таблицы, экспертизы судебные трасологически
- Оценочная компания ООО «БНО». Услуги профессиональных оценщиков предприятий
- Электромеханические приводы и системы
Search
Средства разработки для PICMICRO - Средства разработки для PICMICRO
- Подробности
- Категория: Электроприводы
- Опубликовано 13.07.2011 07:52
- Автор: Super User
- Просмотров: 5430
- Средства разработки для PICMICRO
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
- 21
- 22
- 23
- 24
- 25
- 26
- 27
- 28
- 29
- 30
- 31
- 32
- 33
- 34
- 35
- 36
- 37
- 38
- 39
- 40
- 41
- 42
- 43
- 44
- 45
- 46
- 47
- 48
- 49
- 50
- 51
- 52
- 53
- 54
- 55
- 56
- 57
- 58
- 59
- 60
- 61
- 62
- 63
- 64
- 65
- 66
- 67
- 68
- 69
- 70
- 71
- 72
- 73
- 74
- 75
- 76
- 77
- 78
- 79
- 80
- 81
- 82
- 83
- 84
- 85
- 86
- 87
- 88
- 89
- 90
- 91
- 92
- 93
- 94
- 95
- 96
- 97
- 98
- 99
- 100
- 101
- 102
- 103
- 104
- 105
- 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
- Все страницы
Страница 114 из 133
; Вычислить значение температуры ; в градусах Цельсия
if SP[ 0 ] <= 99 then DispTens ; Не выводить, если темпера-
; тура выше 100С
PORTB = 'V call SendCHAR
DispTens if SP[ 0 ] <= 9 then DispOnes
; Вывести на экран значение десятков
PORTB = ( ( SP[ 0 ] / 10 ) / / 10 ) + 'О'
call SendCHAR ; Послать в ЖКИ число десятков
DispOnes PORTB = ( SP[ 0 ] / / 10 ) + 'О1 call SendCHAR
; Вывести на экран значение единиц
; Теперь определить, следует ли модифицировать значение времени
UPDTime ; Обновить значение времени
if ( FracHi & 0x04 ) == 0 then Loop ; Ничего не посыпать в ЖКИ
if ( PORTA & 1) != О then CheckTime ; Клавиша "Set" нажата?
